1 /* Test of obstack_printf() and obstack_vprintf() functions.
2 Copyright (C) 2008-2009 Free Software Foundation, Inc.
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 3 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */
17 /* Written by Eric Blake <ebb9@byu.net>, 2008. */
23 #include "signature.h"
24 SIGNATURE_CHECK (obstack_printf, int, (struct obstack *, char const *, ...));
25 SIGNATURE_CHECK (obstack_vprintf, int, (struct obstack *, char const *,
37 #define ASSERT(expr) \
42 fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \
49 #define obstack_chunk_alloc xmalloc
50 #define obstack_chunk_free free
53 test_function (int (*my_obstack_printf) (struct obstack *, const char *, ...))
57 /* In general, be careful that arguments to obstack_* don't have
58 side effects, as not all compilers evaluate macro arguments only
61 /* Grow the obstack to near its boundary, then check that short
62 output longer than the obstack free space grows the obstack. */
64 char *base = obstack_base (&obs);
67 int room = obstack_room (&obs) - 4;
69 obstack_blank_fast (&obs, room);
70 result = my_obstack_printf (&obs, "%d %s", 123, "456");
72 ASSERT (result + room == obstack_object_size (&obs));
73 obstack_1grow (&obs, 0);
74 new_base = obstack_finish (&obs);
75 ASSERT (base != new_base);
76 ASSERT (strcmp (new_base + room, "123 456") == 0);
79 /* Check that strings shorter than the obstack free space don't
80 cause a reshuffling of the obstack. */
82 char *base = obstack_base (&obs);
85 int room = obstack_room (&obs);
88 result = my_obstack_printf (&obs, "%d %s", 123, "456");
90 ASSERT (result == obstack_object_size (&obs));
91 new_base = obstack_base (&obs);
92 ASSERT (base == new_base);
93 ASSERT (strncmp (base, "123 456", result) == 0);
94 obstack_finish (&obs);
97 /* Check for generating much more output than a chunk size. */
99 char *base = obstack_base (&obs);
104 ASSERT (obstack_chunk_size (&obs) < 10000);
105 result = my_obstack_printf (&obs, "%010000d", 0);
106 ASSERT (result == 10000);
107 ASSERT (result == obstack_object_size (&obs));
108 new_base = obstack_base (&obs);
109 ASSERT (base != new_base);
110 for (i = 0; i < 10000; i++)
111 ASSERT (new_base[i] == '0');
114 obstack_free (&obs, NULL);
118 my_obstack_printf (struct obstack *obs, const char *format, ...)
123 va_start (args, format);
124 ret = obstack_vprintf (obs, format, args);
130 test_obstack_vprintf ()
132 test_function (my_obstack_printf);
136 test_obstack_printf ()
138 test_function (obstack_printf);
142 main (int argc, char *argv[])
144 set_program_name (argv[0]);
146 test_obstack_vprintf ();
147 test_obstack_printf ();