mirror of
https://https.git.savannah.gnu.org/git/gnulib.git
synced 2026-06-15 15:25:49 +00:00
Bruno Haible
64e78e4467
Done through sed -e 's/strcmp \([(][^()]*[)]\) == 0/streq \1/' * tests/**/*.[hc]: Use streq instead of strcmp ... == 0. * modules/*-tests (Dependencies): Add streq.
85 lines
2.7 KiB
C
85 lines
2.7 KiB
C
/* Test of obstack_[v][z]printf() functions.
|
|
Copyright (C) 2008-2026 Free Software Foundation, Inc.
|
|
|
|
This program is free software: you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation, either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <https://www.gnu.org/licenses/>. */
|
|
|
|
/* Written by Eric Blake <ebb9@byu.net>, 2008. */
|
|
|
|
#define obstack_chunk_alloc xmalloc
|
|
#define obstack_chunk_free free
|
|
|
|
static void
|
|
test_function (RETTYPE (*my_obstack_printf) (struct obstack *, const char *, ...))
|
|
{
|
|
struct obstack obs;
|
|
obstack_init (&obs);
|
|
/* In general, be careful that arguments to obstack_* don't have
|
|
side effects, as not all compilers evaluate macro arguments only
|
|
once. */
|
|
|
|
/* Grow the obstack to near its boundary, then check that short
|
|
output longer than the obstack free space grows the obstack. */
|
|
{
|
|
char *base = obstack_base (&obs);
|
|
char *new_base;
|
|
RETTYPE result;
|
|
int room = obstack_room (&obs) - 4;
|
|
|
|
obstack_blank_fast (&obs, room);
|
|
result = my_obstack_printf (&obs, "%d %s", 123, "456");
|
|
ASSERT (result == 7);
|
|
ASSERT (result + room == obstack_object_size (&obs));
|
|
obstack_1grow (&obs, 0);
|
|
new_base = obstack_finish (&obs);
|
|
ASSERT (base != new_base);
|
|
ASSERT (streq (new_base + room, "123 456"));
|
|
}
|
|
|
|
/* Check that strings shorter than the obstack free space don't
|
|
cause a reshuffling of the obstack. */
|
|
{
|
|
char *base = obstack_base (&obs);
|
|
char *new_base;
|
|
RETTYPE result;
|
|
int room = obstack_room (&obs);
|
|
|
|
ASSERT (8 < room);
|
|
result = my_obstack_printf (&obs, "%d %s", 123, "456");
|
|
ASSERT (result == 7);
|
|
ASSERT (result == obstack_object_size (&obs));
|
|
new_base = obstack_base (&obs);
|
|
ASSERT (base == new_base);
|
|
ASSERT (strncmp (base, "123 456", result) == 0);
|
|
obstack_finish (&obs);
|
|
}
|
|
|
|
/* Check for generating much more output than a chunk size. */
|
|
{
|
|
char *base = obstack_base (&obs);
|
|
char *new_base;
|
|
RETTYPE result;
|
|
|
|
ASSERT (obstack_chunk_size (&obs) < 10000);
|
|
result = my_obstack_printf (&obs, "%010000d", 0);
|
|
ASSERT (result == 10000);
|
|
ASSERT (result == obstack_object_size (&obs));
|
|
new_base = obstack_base (&obs);
|
|
ASSERT (base != new_base);
|
|
for (int i = 0; i < 10000; i++)
|
|
ASSERT (new_base[i] == '0');
|
|
}
|
|
|
|
obstack_free (&obs, NULL);
|
|
}
|