1/* libunwind - a platform-independent unwind library
2   Copyright (C) 2008 CodeSourcery
3
4This file is part of libunwind.
5
6Permission is hereby granted, free of charge, to any person obtaining
7a copy of this software and associated documentation files (the
8"Software"), to deal in the Software without restriction, including
9without limitation the rights to use, copy, modify, merge, publish,
10distribute, sublicense, and/or sell copies of the Software, and to
11permit persons to whom the Software is furnished to do so, subject to
12the following conditions:
13
14The above copyright notice and this permission notice shall be
15included in all copies or substantial portions of the Software.
16
17THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
18EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
19MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
20NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
21LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
22OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
23WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.  */
24
25#include <stdlib.h>
26#include <string.h>
27
28#include "unwind_i.h"
29
30#ifdef UNW_REMOTE_ONLY
31
32/* unw_local_addr_space is a NULL pointer in this case.  */
33PROTECTED unw_addr_space_t unw_local_addr_space;
34
35#else /* !UNW_REMOTE_ONLY */
36
37static struct unw_addr_space local_addr_space;
38
39PROTECTED unw_addr_space_t unw_local_addr_space = &local_addr_space;
40
41static inline void *
42uc_addr (unw_tdep_context_t *uc, int reg)
43{
44  if (reg >= UNW_ARM_R0 && reg < UNW_ARM_R0 + 16)
45    return &uc->regs[reg - UNW_ARM_R0];
46  else
47    return NULL;
48}
49
50# ifdef UNW_LOCAL_ONLY
51
52HIDDEN void *
53tdep_uc_addr (unw_tdep_context_t *uc, int reg)
54{
55  return uc_addr (uc, reg);
56}
57
58# endif /* UNW_LOCAL_ONLY */
59
60HIDDEN unw_dyn_info_list_t _U_dyn_info_list;
61
62/* XXX fix me: there is currently no way to locate the dyn-info list
63       by a remote unwinder.  On ia64, this is done via a special
64       unwind-table entry.  Perhaps something similar can be done with
65       DWARF2 unwind info.  */
66
67static int
68get_dyn_info_list_addr (unw_addr_space_t as, unw_word_t *dyn_info_list_addr,
69			void *arg)
70{
71  *dyn_info_list_addr = (unw_word_t) &_U_dyn_info_list;
72  return 0;
73}
74
75static int
76access_mem (unw_addr_space_t as, unw_word_t addr, unw_word_t *val, int write,
77	    void *arg)
78{
79  if (write)
80    {
81      /* ANDROID support update. */
82#ifdef UNW_LOCAL_ONLY
83      if (map_local_is_writable (addr))
84        {
85#endif
86          Debug (16, "mem[%x] <- %x\n", addr, *val);
87          *(unw_word_t *) addr = *val;
88#ifdef UNW_LOCAL_ONLY
89        }
90      else
91        {
92          Debug (16, "Unwritable memory mem[%x] <- %x\n", addr, *val);
93          return -1;
94        }
95#endif
96      /* End of ANDROID update. */
97    }
98  else
99    {
100      /* ANDROID support update. */
101#ifdef UNW_LOCAL_ONLY
102      if (map_local_is_readable (addr))
103        {
104#endif
105          *val = *(unw_word_t *) addr;
106          Debug (16, "mem[%x] -> %x\n", addr, *val);
107#ifdef UNW_LOCAL_ONLY
108        }
109      else
110        {
111          Debug (16, "Unreadable memory mem[%x] -> XXX\n", addr);
112          return -1;
113        }
114#endif
115      /* End of ANDROID update. */
116    }
117  return 0;
118}
119
120static int
121access_reg (unw_addr_space_t as, unw_regnum_t reg, unw_word_t *val, int write,
122	    void *arg)
123{
124  unw_word_t *addr;
125  unw_tdep_context_t *uc = arg;
126
127  if (unw_is_fpreg (reg))
128    goto badreg;
129
130Debug (16, "reg = %s\n", unw_regname (reg));
131  if (!(addr = uc_addr (uc, reg)))
132    goto badreg;
133
134  if (write)
135    {
136      *(unw_word_t *) addr = *val;
137      Debug (12, "%s <- %x\n", unw_regname (reg), *val);
138    }
139  else
140    {
141      *val = *(unw_word_t *) addr;
142      Debug (12, "%s -> %x\n", unw_regname (reg), *val);
143    }
144  return 0;
145
146 badreg:
147  Debug (1, "bad register number %u\n", reg);
148  return -UNW_EBADREG;
149}
150
151static int
152access_fpreg (unw_addr_space_t as, unw_regnum_t reg, unw_fpreg_t *val,
153	      int write, void *arg)
154{
155  unw_tdep_context_t *uc = arg;
156  unw_fpreg_t *addr;
157
158  if (!unw_is_fpreg (reg))
159    goto badreg;
160
161  if (!(addr = uc_addr (uc, reg)))
162    goto badreg;
163
164  if (write)
165    {
166      Debug (12, "%s <- %08lx.%08lx.%08lx\n", unw_regname (reg),
167	     ((long *)val)[0], ((long *)val)[1], ((long *)val)[2]);
168      *(unw_fpreg_t *) addr = *val;
169    }
170  else
171    {
172      *val = *(unw_fpreg_t *) addr;
173      Debug (12, "%s -> %08lx.%08lx.%08lx\n", unw_regname (reg),
174	     ((long *)val)[0], ((long *)val)[1], ((long *)val)[2]);
175    }
176  return 0;
177
178 badreg:
179  Debug (1, "bad register number %u\n", reg);
180  /* attempt to access a non-preserved register */
181  return -UNW_EBADREG;
182}
183
184static int
185get_static_proc_name (unw_addr_space_t as, unw_word_t ip,
186		      char *buf, size_t buf_len, unw_word_t *offp,
187		      void *arg)
188{
189  return _Uelf32_get_proc_name (as, getpid (), ip, buf, buf_len, offp);
190}
191
192HIDDEN void
193arm_local_addr_space_init (void)
194{
195  memset (&local_addr_space, 0, sizeof (local_addr_space));
196  local_addr_space.caching_policy = UNW_CACHE_GLOBAL;
197  local_addr_space.acc.find_proc_info = arm_find_proc_info;
198  local_addr_space.acc.put_unwind_info = arm_put_unwind_info;
199  local_addr_space.acc.get_dyn_info_list_addr = get_dyn_info_list_addr;
200  local_addr_space.acc.access_mem = access_mem;
201  local_addr_space.acc.access_reg = access_reg;
202  local_addr_space.acc.access_fpreg = access_fpreg;
203  local_addr_space.acc.resume = arm_local_resume;
204  local_addr_space.acc.get_proc_name = get_static_proc_name;
205  unw_flush_cache (&local_addr_space, 0, 0);
206
207  map_local_init ();
208}
209
210#endif /* !UNW_REMOTE_ONLY */
211