1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
|
/* Test case by Alexandre Duret-Lutz <duret_g@epita.fr>.
* test_obstack_printf() added by Anthony G. Basile <blueness.gentoo.org>.
*/
#include <features.h>
#include <obstack.h>
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#define obstack_chunk_alloc verbose_malloc
#define obstack_chunk_free verbose_free
#define ALIGN_BOUNDARY 64
#define ALIGN_MASK (ALIGN_BOUNDARY - 1)
#define OBJECT_SIZE 1000
static void *
verbose_malloc (size_t size)
{
void *buf = malloc (size);
printf ("malloc (%zu) => %p\n", size, buf);
return buf;
}
static void
verbose_free (void *buf)
{
free (buf);
printf ("free (%p)\n", buf);
}
int
test_obstack_alloc (void)
{
int result = 0;
int align = 2;
while (align <= 64)
{
struct obstack obs;
int i;
int align_mask = align - 1;
printf ("\n Alignment mask: %d\n", align_mask);
obstack_init (&obs);
obstack_alignment_mask (&obs) = align_mask;
/* finish an empty object to take alignment into account */
obstack_finish (&obs);
/* let's allocate some objects and print their addresses */
for (i = 15; i > 0; --i)
{
void *obj = obstack_alloc (&obs, OBJECT_SIZE);
printf ("obstack_alloc (%u) => %p \t%s\n", OBJECT_SIZE, obj,
((uintptr_t) obj & align_mask) ? "(not aligned)" : "");
result |= ((uintptr_t) obj & align_mask) != 0;
}
/* clean up */
obstack_free (&obs, 0);
align <<= 1;
}
return result;
}
int
test_obstack_printf (void)
{
int result = 0;
int n;
char *s;
struct obstack ob;
obstack_init (&ob);
n = obstack_printf (&ob, "%s%d%c", "testing 1 ... 2 ... ", 3, '\n');
result |= (n != 22);
printf("obstack_printf => %d\n", n);
n = obstack_printf (&ob, "%s%d%c", "testing 3 ... 2 ... ", 1, '\0');
result |= (n != 22);
printf("obstack_printf => %d\n", n);
s = obstack_finish (&ob);
printf("obstack_printf => %s\n", s);
obstack_free (&ob, NULL);
return result;
}
int
main (void)
{
int result = 0;
result |= test_obstack_alloc();
result |= test_obstack_printf();
return result;
}
|
