annotate libbacktrace/allocfail.c @ 158:494b0b89df80 default tip

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 1830386684a0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
145
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
1 /* allocfail.c -- Test for libbacktrace library
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
2 Copyright (C) 2018-2020 Free Software Foundation, Inc.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
3
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
4 Redistribution and use in source and binary forms, with or without
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
5 modification, are permitted provided that the following conditions are
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
6 met:
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
7
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
8 (1) Redistributions of source code must retain the above copyright
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
9 notice, this list of conditions and the following disclaimer.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
10
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
11 (2) Redistributions in binary form must reproduce the above copyright
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
12 notice, this list of conditions and the following disclaimer in
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
13 the documentation and/or other materials provided with the
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
14 distribution.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
15
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
16 (3) The name of the author may not be used to
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
17 endorse or promote products derived from this software without
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
18 specific prior written permission.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
19
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
20 THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
21 IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
22 WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
23 DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
24 INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
25 (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
26 SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
27 HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
28 STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
29 IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
30 POSSIBILITY OF SUCH DAMAGE. */
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
31
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
32 #include <assert.h>
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
33 #include <stdio.h>
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
34 #include <stdlib.h>
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
35 #include <string.h>
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
36 #include <unistd.h>
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
37
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
38 #include "filenames.h"
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
39
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
40 #include "backtrace.h"
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
41 #include "backtrace-supported.h"
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
42
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
43 #include "testlib.h"
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
44
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
45 extern uint64_t get_nr_allocs (void);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
46 extern void set_fail_at_alloc (uint64_t);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
47 extern int at_fail_alloc_p (void);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
48
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
49 static int test1 (void) __attribute__ ((noinline, unused));
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
50 static int f2 (int) __attribute__ ((noinline));
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
51 static int f3 (int, int) __attribute__ ((noinline));
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
52
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
53 static unsigned callback_errors = 0;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
54
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
55 static void
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
56 error_callback_full (void *vdata ATTRIBUTE_UNUSED,
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
57 const char *msg ATTRIBUTE_UNUSED,
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
58 int errnum ATTRIBUTE_UNUSED)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
59 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
60 if (at_fail_alloc_p ())
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
61 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
62 set_fail_at_alloc (0);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
63 return;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
64 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
65
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
66 callback_errors++;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
67 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
68
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
69 static int
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
70 callback_full (void *vdata ATTRIBUTE_UNUSED, uintptr_t pc ATTRIBUTE_UNUSED,
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
71 const char *filename ATTRIBUTE_UNUSED,
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
72 int lineno ATTRIBUTE_UNUSED,
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
73 const char *function ATTRIBUTE_UNUSED)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
74 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
75
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
76 return 0;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
77 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
78
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
79 static int
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
80 test1 (void)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
81 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
82 return f2 (__LINE__) + 1;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
83 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
84
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
85 static int
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
86 f2 (int f1line)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
87 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
88 return f3 (f1line, __LINE__) + 2;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
89 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
90
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
91 static int
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
92 f3 (int f1line ATTRIBUTE_UNUSED, int f2line ATTRIBUTE_UNUSED)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
93 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
94 int i;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
95
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
96 i = backtrace_full (state, 0, callback_full, error_callback_full, NULL);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
97
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
98 if (i != 0)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
99 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
100 fprintf (stderr, "test1: unexpected return value %d\n", i);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
101 ++failures;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
102 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
103
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
104 if (callback_errors)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
105 ++failures;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
106
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
107 return failures;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
108 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
109
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
110 /* Run all the tests. */
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
111
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
112 int
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
113 main (int argc, char **argv)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
114 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
115 uint64_t fail_at = 0;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
116
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
117 if (argc == 2)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
118 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
119 fail_at = atoi (argv[1]);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
120 set_fail_at_alloc (fail_at);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
121 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
122
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
123 state = backtrace_create_state (argv[0], BACKTRACE_SUPPORTS_THREADS,
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
124 error_callback_full, NULL);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
125 if (state == NULL)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
126 exit (failures ? EXIT_FAILURE : EXIT_SUCCESS);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
127
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
128 #if BACKTRACE_SUPPORTED
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
129 test1 ();
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
130 #endif
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
131
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
132 if (argc == 1)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
133 fprintf (stderr, "%llu\n", (long long unsigned) get_nr_allocs ());
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
134
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
135 exit (failures ? EXIT_FAILURE : EXIT_SUCCESS);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
136 }