Ginit.c revision 7d46a21e0a2cb561e4cad57b101a7137e01023dc 
1/* libunwind - a platform-independent unwind library
2   Copyright (C) 2006-2007 IBM
3   Contributed by
4     Corey Ashford <cjashfor@us.ibm.com>
5     Jose Flavio Aguilar Paulino <jflavio@br.ibm.com> <joseflavio@gmail.com>
6
7This file is part of libunwind.
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#include <stdlib.h>
29#include <string.h>
30
31#include "ucontext_i.h"
32#include "unwind_i.h"
33
34#ifdef UNW_REMOTE_ONLY
35
36/* unw_local_addr_space is a NULL pointer in this case.  */
37PROTECTED unw_addr_space_t unw_local_addr_space;
38
39#else /* !UNW_REMOTE_ONLY */
40
41static struct unw_addr_space local_addr_space;
42
43PROTECTED unw_addr_space_t unw_local_addr_space = &local_addr_space;
44
45static void *
46uc_addr (ucontext_t *uc, int reg)
47{
48  void *addr;
49
50  if ((unsigned) (reg - UNW_PPC64_R0) < 32)
51    addr = &uc->uc_mcontext.gp_regs[reg - UNW_PPC64_R0];
52
53  else if ((unsigned) (reg - UNW_PPC64_F0) < 32)
54    addr = &uc->uc_mcontext.fp_regs[reg - UNW_PPC64_F0];
55
56  else if ((unsigned) (reg - UNW_PPC64_V0) < 32)
57    addr = (uc->uc_mcontext.v_regs == 0) ? NULL : &uc->uc_mcontext.v_regs->vrregs[reg - UNW_PPC64_V0][0];
58
59  else
60    {
61      unsigned gregs_idx;
62
63      switch (reg)
64	{
65	case UNW_PPC64_NIP:
66	  gregs_idx = NIP_IDX;
67	  break;
68	case UNW_PPC64_CTR:
69	  gregs_idx = CTR_IDX;
70	  break;
71	case UNW_PPC64_LR:
72	  gregs_idx = LINK_IDX;
73	  break;
74	case UNW_PPC64_XER:
75	  gregs_idx = XER_IDX;
76	  break;
77	case UNW_PPC64_CR0:
78	  gregs_idx = CCR_IDX;
79	  break;
80	default:
81	  return NULL;
82	}
83      addr = &uc->uc_mcontext.gp_regs[gregs_idx];
84    }
85  return addr;
86}
87
88# ifdef UNW_LOCAL_ONLY
89
90HIDDEN void *
91tdep_uc_addr (ucontext_t *uc, int reg)
92{
93  return uc_addr (uc, reg);
94}
95
96# endif	/* UNW_LOCAL_ONLY */
97
98HIDDEN unw_dyn_info_list_t _U_dyn_info_list;
99
100
101static void
102put_unwind_info (unw_addr_space_t as, unw_proc_info_t *proc_info, void *arg)
103{
104  /* it's a no-op */
105}
106
107static int
108get_dyn_info_list_addr (unw_addr_space_t as, unw_word_t *dyn_info_list_addr,
109			void *arg)
110{
111  *dyn_info_list_addr = (unw_word_t) &_U_dyn_info_list;
112  return 0;
113}
114
115static int
116access_mem (unw_addr_space_t as, unw_word_t addr, unw_word_t *val, int write,
117	    void *arg)
118{
119  if (write)
120    {
121      /* ANDROID support update. */
122      if (maps_is_writable(as->map_list, addr))
123        {
124          Debug (12, "mem[%lx] <- %lx\n", addr, *val);
125          *(unw_word_t *) addr = *val;
126        }
127      else
128        {
129          Debug (12, "Unwritable memory mem[%lx] <- %lx\n", addr, *val);
130          return -1;
131        }
132      /* End of ANDROID update. */
133    }
134  else
135    {
136      /* ANDROID support update. */
137      if (maps_is_readable(as->map_list, addr))
138        {
139          *val = *(unw_word_t *) addr;
140          Debug (12, "mem[%lx] -> %lx\n", addr, *val);
141        }
142      else
143        {
144          Debug (12, "Unreadable memory mem[%lx] -> XXX\n", addr);
145          return -1;
146        }
147      /* End of ANDROID update. */
148    }
149  return 0;
150}
151
152static int
153access_reg (unw_addr_space_t as, unw_regnum_t reg, unw_word_t *val,
154	    int write, void *arg)
155{
156  unw_word_t *addr;
157  ucontext_t *uc = arg;
158
159  if (UNW_PPC64_F0 <= reg && reg <= UNW_PPC64_F31)
160    goto badreg;
161  if (UNW_PPC64_V0 <= reg && reg <= UNW_PPC64_V31)
162    goto badreg;
163
164  addr = uc_addr (uc, reg);
165  if (!addr)
166    goto badreg;
167
168  if (write)
169    {
170      *(unw_word_t *) addr = *val;
171      Debug (12, "%s <- %lx\n", unw_regname (reg), *val);
172    }
173  else
174    {
175      *val = *(unw_word_t *) addr;
176      Debug (12, "%s -> %lx\n", unw_regname (reg), *val);
177    }
178  return 0;
179
180badreg:
181  Debug (1, "bad register number %u\n", reg);
182  return -UNW_EBADREG;
183}
184
185static int
186access_fpreg (unw_addr_space_t as, unw_regnum_t reg, unw_fpreg_t *val,
187	      int write, void *arg)
188{
189  ucontext_t *uc = arg;
190  unw_fpreg_t *addr;
191
192  if ((unsigned) (reg - UNW_PPC64_F0) < 0)
193    goto badreg;
194
195  if ((unsigned) (reg - UNW_PPC64_V0) >= 32)
196    goto badreg;
197
198
199  addr = uc_addr (uc, reg);
200  if (!addr)
201    goto badreg;
202
203  if (write)
204    {
205      Debug (12, "%s <- %016Lf\n", unw_regname (reg), *val);
206      *(unw_fpreg_t *) addr = *val;
207    }
208  else
209    {
210      *val = *(unw_fpreg_t *) addr;
211      Debug (12, "%s -> %016Lf\n", unw_regname (reg), *val);
212    }
213  return 0;
214
215badreg:
216  Debug (1, "bad register number %u\n", reg);
217  /* attempt to access a non-preserved register */
218  return -UNW_EBADREG;
219}
220
221static int
222get_static_proc_name (unw_addr_space_t as, unw_word_t ip,
223		      char *buf, size_t buf_len, unw_word_t *offp,
224		      void *arg)
225{
226  return _Uelf64_get_proc_name (as, getpid (), ip, buf, buf_len, offp);
227}
228
229HIDDEN void
230ppc64_local_addr_space_init (void)
231{
232  memset (&local_addr_space, 0, sizeof (local_addr_space));
233  local_addr_space.caching_policy = UNW_CACHE_GLOBAL;
234  local_addr_space.acc.find_proc_info = dwarf_find_proc_info;
235  local_addr_space.acc.put_unwind_info = put_unwind_info;
236  local_addr_space.acc.get_dyn_info_list_addr = get_dyn_info_list_addr;
237  local_addr_space.acc.access_mem = access_mem;
238  local_addr_space.acc.access_reg = access_reg;
239  local_addr_space.acc.access_fpreg = access_fpreg;
240  local_addr_space.acc.resume = ppc64_local_resume;
241  local_addr_space.acc.get_proc_name = get_static_proc_name;
242  unw_flush_cache (&local_addr_space, 0, 0);
243}
244
245#endif /* !UNW_REMOTE_ONLY */
246