1/* libunwind - a platform-independent unwind library
2   Copyright (C) 2003 Hewlett-Packard Co
3	Contributed by David Mosberger-Tang <davidm@hpl.hp.com>
4
5This file is part of libunwind.
6
7Copyright (c) 2003 Hewlett-Packard Co.
8
9Permission is hereby granted, free of charge, to any person obtaining
10a copy of this software and associated documentation files (the
11"Software"), to deal in the Software without restriction, including
12without limitation the rights to use, copy, modify, merge, publish,
13distribute, sublicense, and/or sell copies of the Software, and to
14permit persons to whom the Software is furnished to do so, subject to
15the following conditions:
16
17The above copyright notice and this permission notice shall be
18included in all copies or substantial portions of the Software.
19
20THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
21EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
22MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
23NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
24LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
25OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
26WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.  */
27
28/* This test program checks whether proc_info lookup failures are
29   cached.  They must NOT be cached because it could otherwise turn
30   temporary failures into permanent ones.  Furthermore, we allow apps
31   to return -UNW_ESTOPUNWIND to terminate unwinding (though this
32   feature is deprecated and dynamic unwind info should be used
33   instead).  */
34
35#include <stdio.h>
36#include <string.h>
37
38#include <libunwind.h>
39#include "compiler.h"
40
41int errors;
42
43#define panic(args...)					\
44	{ ++errors; fprintf (stderr, args); return -1; }
45
46static int
47find_proc_info (unw_addr_space_t as UNUSED,
48                unw_word_t ip UNUSED,
49                unw_proc_info_t *pip UNUSED,
50                int need_unwind_info UNUSED,
51                void *arg UNUSED)
52{
53  return -UNW_ESTOPUNWIND;
54}
55
56static int
57access_mem (unw_addr_space_t as UNUSED,
58            unw_word_t addr UNUSED,
59            unw_word_t *valp, int write,
60            void *arg UNUSED)
61{
62  if (!write)
63    *valp = 0;
64  return 0;
65}
66
67static int
68access_reg (unw_addr_space_t as UNUSED,
69            unw_regnum_t regnum UNUSED,
70            unw_word_t *valp, int write,
71            void *arg UNUSED)
72{
73  if (!write)
74    *valp = 32;
75  return 0;
76}
77
78static int
79access_fpreg (unw_addr_space_t as UNUSED,
80              unw_regnum_t regnum UNUSED,
81              unw_fpreg_t *valp, int write,
82              void *arg UNUSED)
83{
84  if (!write)
85    memset (valp, 0, sizeof (*valp));
86  return 0;
87}
88
89static int
90get_dyn_info_list_addr (unw_addr_space_t as UNUSED,
91                        unw_word_t *dilap UNUSED,
92                        void *arg UNUSED)
93{
94  return -UNW_ENOINFO;
95}
96
97static void
98put_unwind_info (unw_addr_space_t as UNUSED,
99                 unw_proc_info_t *pi UNUSED,
100                 void *arg UNUSED)
101{
102  ++errors;
103  fprintf (stderr, "%s() got called!\n", __FUNCTION__);
104}
105
106static int
107resume (unw_addr_space_t as UNUSED,
108        unw_cursor_t *reg UNUSED,
109        void *arg UNUSED)
110{
111  panic ("%s() got called!\n", __FUNCTION__);
112}
113
114static int
115get_proc_name (unw_addr_space_t as UNUSED,
116               unw_word_t ip UNUSED,
117               char *buf UNUSED,
118               size_t buf_len UNUSED,
119               unw_word_t *offp UNUSED,
120               void *arg UNUSED)
121{
122  panic ("%s() got called!\n", __FUNCTION__);
123}
124
125int
126main (int argc, char **argv)
127{
128  unw_accessors_t acc;
129  unw_addr_space_t as;
130  int ret, verbose = 0;
131  unw_cursor_t c;
132
133  if (argc > 1 && strcmp (argv[1], "-v") == 0)
134    verbose = 1;
135
136  memset (&acc, 0, sizeof (acc));
137  acc.find_proc_info = find_proc_info;
138  acc.put_unwind_info = put_unwind_info;
139  acc.get_dyn_info_list_addr = get_dyn_info_list_addr;
140  acc.access_mem = access_mem;
141  acc.access_reg = access_reg;
142  acc.access_fpreg = access_fpreg;
143  acc.resume = resume;
144  acc.get_proc_name = get_proc_name;
145
146  as = unw_create_addr_space (&acc, 0);
147  if (!as)
148    panic ("unw_create_addr_space() failed\n");
149
150  unw_set_caching_policy (as, UNW_CACHE_GLOBAL);
151
152  ret = unw_init_remote (&c, as, NULL);
153  if (ret < 0)
154    panic ("unw_init_remote() returned %d instead of 0\n", ret);
155
156  ret = unw_step (&c);
157  if (ret != -UNW_ESTOPUNWIND)
158    panic ("First call to unw_step() returned %d instead of %d\n",
159	   ret, -UNW_ESTOPUNWIND);
160
161  ret = unw_step (&c);
162  if (ret != -UNW_ESTOPUNWIND)
163    panic ("Second call to unw_step() returned %d instead of %d\n",
164	   ret, -UNW_ESTOPUNWIND);
165
166  unw_destroy_addr_space (as);
167
168  if (verbose)
169    printf ("SUCCESS\n");
170  return 0;
171}
172