]> Git Repo - binutils.git/blob - gdb/netbsd-tdep.c
Automatic date update in version.in
[binutils.git] / gdb / netbsd-tdep.c
1 /* Common target-dependent code for NetBSD systems.
2
3    Copyright (C) 2002-2022 Free Software Foundation, Inc.
4
5    Contributed by Wasabi Systems, Inc.
6   
7    This file is part of GDB.
8   
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3 of the License, or
12    (at your option) any later version.
13
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18
19    You should have received a copy of the GNU General Public License
20    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
21
22 #include "defs.h"
23 #include "auxv.h"
24 #include "solib-svr4.h"
25 #include "netbsd-tdep.h"
26 #include "gdbarch.h"
27 #include "objfiles.h"
28 #include "xml-syscall.h"
29
30 /* Flags in the 'kve_protection' field in struct kinfo_vmentry.  These
31    match the KVME_PROT_* constants in <sys/sysctl.h>.  */
32
33 #define KINFO_VME_PROT_READ     0x00000001
34 #define KINFO_VME_PROT_WRITE    0x00000002
35 #define KINFO_VME_PROT_EXEC     0x00000004
36
37 /* Flags in the 'kve_flags' field in struct kinfo_vmentry.  These
38    match the KVME_FLAG_* constants in <sys/sysctl.h>.  */
39
40 #define KINFO_VME_FLAG_COW              0x00000001
41 #define KINFO_VME_FLAG_NEEDS_COPY       0x00000002
42 #define KINFO_VME_FLAG_NOCOREDUMP       0x00000004
43 #define KINFO_VME_FLAG_PAGEABLE         0x00000008
44 #define KINFO_VME_FLAG_GROWS_UP         0x00000010
45 #define KINFO_VME_FLAG_GROWS_DOWN       0x00000020
46
47 /* FIXME: kettenis/20060115: We should really eliminate the next two
48    functions completely.  */
49
50 struct link_map_offsets *
51 nbsd_ilp32_solib_svr4_fetch_link_map_offsets (void)
52 {
53   return svr4_ilp32_fetch_link_map_offsets ();
54 }
55
56 struct link_map_offsets *
57 nbsd_lp64_solib_svr4_fetch_link_map_offsets (void)
58 {
59   return svr4_lp64_fetch_link_map_offsets ();
60 }
61
62 int
63 nbsd_pc_in_sigtramp (CORE_ADDR pc, const char *func_name)
64 {
65   /* Check for libc-provided signal trampoline.  All such trampolines
66      have function names which begin with "__sigtramp".  */
67
68   return (func_name != NULL
69           && startswith (func_name, "__sigtramp"));
70 }
71
72 /* This enum is derived from NETBSD's <sys/signal.h>.  */
73
74 enum
75   {
76    NBSD_SIGHUP = 1,
77    NBSD_SIGINT = 2,
78    NBSD_SIGQUIT = 3,
79    NBSD_SIGILL = 4,
80    NBSD_SIGTRAP = 5,
81    NBSD_SIGABRT = 6,
82    NBSD_SIGEMT = 7,
83    NBSD_SIGFPE = 8,
84    NBSD_SIGKILL = 9,
85    NBSD_SIGBUS = 10,
86    NBSD_SIGSEGV = 11,
87    NBSD_SIGSYS = 12,
88    NBSD_SIGPIPE = 13,
89    NBSD_SIGALRM = 14,
90    NBSD_SIGTERM = 15,
91    NBSD_SIGURG = 16,
92    NBSD_SIGSTOP = 17,
93    NBSD_SIGTSTP = 18,
94    NBSD_SIGCONT = 19,
95    NBSD_SIGCHLD = 20,
96    NBSD_SIGTTIN = 21,
97    NBSD_SIGTTOU = 22,
98    NBSD_SIGIO = 23,
99    NBSD_SIGXCPU = 24,
100    NBSD_SIGXFSZ = 25,
101    NBSD_SIGVTALRM = 26,
102    NBSD_SIGPROF = 27,
103    NBSD_SIGWINCH = 28,
104    NBSD_SIGINFO = 29,
105    NBSD_SIGUSR1 = 30,
106    NBSD_SIGUSR2 = 31,
107    NBSD_SIGPWR = 32,
108    NBSD_SIGRTMIN = 33,
109    NBSD_SIGRTMAX = 63,
110   };
111
112 /* Implement the "gdb_signal_from_target" gdbarch method.  */
113
114 static enum gdb_signal
115 nbsd_gdb_signal_from_target (struct gdbarch *gdbarch, int signal)
116 {
117   switch (signal)
118     {
119     case 0:
120       return GDB_SIGNAL_0;
121
122     case NBSD_SIGHUP:
123       return GDB_SIGNAL_HUP;
124
125     case NBSD_SIGINT:
126       return GDB_SIGNAL_INT;
127
128     case NBSD_SIGQUIT:
129       return GDB_SIGNAL_QUIT;
130
131     case NBSD_SIGILL:
132       return GDB_SIGNAL_ILL;
133
134     case NBSD_SIGTRAP:
135       return GDB_SIGNAL_TRAP;
136
137     case NBSD_SIGABRT:
138       return GDB_SIGNAL_ABRT;
139
140     case NBSD_SIGEMT:
141       return GDB_SIGNAL_EMT;
142
143     case NBSD_SIGFPE:
144       return GDB_SIGNAL_FPE;
145
146     case NBSD_SIGKILL:
147       return GDB_SIGNAL_KILL;
148
149     case NBSD_SIGBUS:
150       return GDB_SIGNAL_BUS;
151
152     case NBSD_SIGSEGV:
153       return GDB_SIGNAL_SEGV;
154
155     case NBSD_SIGSYS:
156       return GDB_SIGNAL_SYS;
157
158     case NBSD_SIGPIPE:
159       return GDB_SIGNAL_PIPE;
160
161     case NBSD_SIGALRM:
162       return GDB_SIGNAL_ALRM;
163
164     case NBSD_SIGTERM:
165       return GDB_SIGNAL_TERM;
166
167     case NBSD_SIGURG:
168       return GDB_SIGNAL_URG;
169
170     case NBSD_SIGSTOP:
171       return GDB_SIGNAL_STOP;
172
173     case NBSD_SIGTSTP:
174       return GDB_SIGNAL_TSTP;
175
176     case NBSD_SIGCONT:
177       return GDB_SIGNAL_CONT;
178
179     case NBSD_SIGCHLD:
180       return GDB_SIGNAL_CHLD;
181
182     case NBSD_SIGTTIN:
183       return GDB_SIGNAL_TTIN;
184
185     case NBSD_SIGTTOU:
186       return GDB_SIGNAL_TTOU;
187
188     case NBSD_SIGIO:
189       return GDB_SIGNAL_IO;
190
191     case NBSD_SIGXCPU:
192       return GDB_SIGNAL_XCPU;
193
194     case NBSD_SIGXFSZ:
195       return GDB_SIGNAL_XFSZ;
196
197     case NBSD_SIGVTALRM:
198       return GDB_SIGNAL_VTALRM;
199
200     case NBSD_SIGPROF:
201       return GDB_SIGNAL_PROF;
202
203     case NBSD_SIGWINCH:
204       return GDB_SIGNAL_WINCH;
205
206     case NBSD_SIGINFO:
207       return GDB_SIGNAL_INFO;
208
209     case NBSD_SIGUSR1:
210       return GDB_SIGNAL_USR1;
211
212     case NBSD_SIGUSR2:
213       return GDB_SIGNAL_USR2;
214
215     case NBSD_SIGPWR:
216       return GDB_SIGNAL_PWR;
217
218     /* SIGRTMIN and SIGRTMAX are not continuous in <gdb/signals.def>,
219        therefore we have to handle them here.  */
220     case NBSD_SIGRTMIN:
221       return GDB_SIGNAL_REALTIME_33;
222
223     case NBSD_SIGRTMAX:
224       return GDB_SIGNAL_REALTIME_63;
225     }
226
227   if (signal >= NBSD_SIGRTMIN + 1 && signal <= NBSD_SIGRTMAX - 1)
228     {
229       int offset = signal - NBSD_SIGRTMIN + 1;
230
231       return (enum gdb_signal) ((int) GDB_SIGNAL_REALTIME_34 + offset);
232     }
233
234   return GDB_SIGNAL_UNKNOWN;
235 }
236
237 /* Implement the "gdb_signal_to_target" gdbarch method.  */
238
239 static int
240 nbsd_gdb_signal_to_target (struct gdbarch *gdbarch,
241                 enum gdb_signal signal)
242 {
243   switch (signal)
244     {
245     case GDB_SIGNAL_0:
246       return 0;
247
248     case GDB_SIGNAL_HUP:
249       return NBSD_SIGHUP;
250
251     case GDB_SIGNAL_INT:
252       return NBSD_SIGINT;
253
254     case GDB_SIGNAL_QUIT:
255       return NBSD_SIGQUIT;
256
257     case GDB_SIGNAL_ILL:
258       return NBSD_SIGILL;
259
260     case GDB_SIGNAL_TRAP:
261       return NBSD_SIGTRAP;
262
263     case GDB_SIGNAL_ABRT:
264       return NBSD_SIGABRT;
265
266     case GDB_SIGNAL_EMT:
267       return NBSD_SIGEMT;
268
269     case GDB_SIGNAL_FPE:
270       return NBSD_SIGFPE;
271
272     case GDB_SIGNAL_KILL:
273       return NBSD_SIGKILL;
274
275     case GDB_SIGNAL_BUS:
276       return NBSD_SIGBUS;
277
278     case GDB_SIGNAL_SEGV:
279       return NBSD_SIGSEGV;
280
281     case GDB_SIGNAL_SYS:
282       return NBSD_SIGSYS;
283
284     case GDB_SIGNAL_PIPE:
285       return NBSD_SIGPIPE;
286
287     case GDB_SIGNAL_ALRM:
288       return NBSD_SIGALRM;
289
290     case GDB_SIGNAL_TERM:
291       return NBSD_SIGTERM;
292
293     case GDB_SIGNAL_URG:
294       return NBSD_SIGSTOP;
295
296     case GDB_SIGNAL_TSTP:
297       return NBSD_SIGTSTP;
298
299     case GDB_SIGNAL_CONT:
300       return NBSD_SIGCONT;
301
302     case GDB_SIGNAL_CHLD:
303       return NBSD_SIGCHLD;
304
305     case GDB_SIGNAL_TTIN:
306       return NBSD_SIGTTIN;
307
308     case GDB_SIGNAL_TTOU:
309       return NBSD_SIGTTOU;
310
311     case GDB_SIGNAL_IO:
312       return NBSD_SIGIO;
313
314     case GDB_SIGNAL_XCPU:
315       return NBSD_SIGXCPU;
316
317     case GDB_SIGNAL_XFSZ:
318       return NBSD_SIGXFSZ;
319
320     case GDB_SIGNAL_VTALRM:
321       return NBSD_SIGVTALRM;
322
323     case GDB_SIGNAL_PROF:
324       return NBSD_SIGPROF;
325
326     case GDB_SIGNAL_WINCH:
327       return NBSD_SIGWINCH;
328
329     case GDB_SIGNAL_INFO:
330       return NBSD_SIGINFO;
331
332     case GDB_SIGNAL_USR1:
333       return NBSD_SIGUSR1;
334
335     case GDB_SIGNAL_USR2:
336       return NBSD_SIGUSR2;
337
338     case GDB_SIGNAL_PWR:
339       return NBSD_SIGPWR;
340
341     /* GDB_SIGNAL_REALTIME_33 is not continuous in <gdb/signals.def>,
342        therefore we have to handle it here.  */
343     case GDB_SIGNAL_REALTIME_33:
344       return NBSD_SIGRTMIN;
345
346     /* Same comment applies to _64.  */
347     case GDB_SIGNAL_REALTIME_63:
348       return NBSD_SIGRTMAX;
349     }
350
351   if (signal >= GDB_SIGNAL_REALTIME_34
352       && signal <= GDB_SIGNAL_REALTIME_62)
353     {
354       int offset = signal - GDB_SIGNAL_REALTIME_32;
355
356       return NBSD_SIGRTMIN + 1 + offset;
357     }
358
359   return -1;
360 }
361
362 /* Shared library resolver handling.  */
363
364 static CORE_ADDR
365 nbsd_skip_solib_resolver (struct gdbarch *gdbarch, CORE_ADDR pc)
366 {
367   struct bound_minimal_symbol msym;
368
369   msym = lookup_minimal_symbol ("_rtld_bind_start", NULL, NULL);
370   if (msym.minsym && msym.value_address () == pc)
371     return frame_unwind_caller_pc (get_current_frame ());
372   else
373     return find_solib_trampoline_target (get_current_frame (), pc);
374 }
375
376 struct nbsd_gdbarch_data
377 {
378   struct type *siginfo_type = nullptr;
379 };
380
381 static const registry<gdbarch>::key<nbsd_gdbarch_data>
382      nbsd_gdbarch_data_handle;
383
384 static struct nbsd_gdbarch_data *
385 get_nbsd_gdbarch_data (struct gdbarch *gdbarch)
386 {
387   struct nbsd_gdbarch_data *result = nbsd_gdbarch_data_handle.get (gdbarch);
388   if (result == nullptr)
389     result = nbsd_gdbarch_data_handle.emplace (gdbarch);
390   return result;
391 }
392
393 /* Implement the "get_siginfo_type" gdbarch method.  */
394
395 static struct type *
396 nbsd_get_siginfo_type (struct gdbarch *gdbarch)
397 {
398   nbsd_gdbarch_data *nbsd_gdbarch_data = get_nbsd_gdbarch_data (gdbarch);
399   if (nbsd_gdbarch_data->siginfo_type != NULL)
400     return nbsd_gdbarch_data->siginfo_type;
401
402   type *char_type = builtin_type (gdbarch)->builtin_char;
403   type *int_type = builtin_type (gdbarch)->builtin_int;
404   type *long_type = builtin_type (gdbarch)->builtin_long;
405
406   type *void_ptr_type
407     = lookup_pointer_type (builtin_type (gdbarch)->builtin_void);
408
409   type *int32_type = builtin_type (gdbarch)->builtin_int32;
410   type *uint32_type = builtin_type (gdbarch)->builtin_uint32;
411   type *uint64_type = builtin_type (gdbarch)->builtin_uint64;
412
413   bool lp64 = void_ptr_type->length () == 8;
414   size_t char_bits = gdbarch_addressable_memory_unit_size (gdbarch) * 8;
415
416   /* pid_t */
417   type *pid_type = arch_type (gdbarch, TYPE_CODE_TYPEDEF,
418                               int32_type->length () * char_bits, "pid_t");
419   pid_type->set_target_type (int32_type);
420
421   /* uid_t */
422   type *uid_type = arch_type (gdbarch, TYPE_CODE_TYPEDEF,
423                               uint32_type->length () * char_bits, "uid_t");
424   uid_type->set_target_type (uint32_type);
425
426   /* clock_t */
427   type *clock_type = arch_type (gdbarch, TYPE_CODE_TYPEDEF,
428                                 int_type->length () * char_bits, "clock_t");
429   clock_type->set_target_type (int_type);
430
431   /* lwpid_t */
432   type *lwpid_type = arch_type (gdbarch, TYPE_CODE_TYPEDEF,
433                                 int32_type->length () * char_bits,
434                                 "lwpid_t");
435   lwpid_type->set_target_type (int32_type);
436
437   /* union sigval */
438   type *sigval_type = arch_composite_type (gdbarch, NULL, TYPE_CODE_UNION);
439   sigval_type->set_name (gdbarch_obstack_strdup (gdbarch, "sigval"));
440   append_composite_type_field (sigval_type, "sival_int", int_type);
441   append_composite_type_field (sigval_type, "sival_ptr", void_ptr_type);
442
443   /* union _option */
444   type *option_type = arch_composite_type (gdbarch, NULL, TYPE_CODE_UNION);
445   option_type->set_name (gdbarch_obstack_strdup (gdbarch, "_option"));
446   append_composite_type_field (option_type, "_pe_other_pid", pid_type);
447   append_composite_type_field (option_type, "_pe_lwp", lwpid_type);
448
449   /* union _reason */
450   type *reason_type = arch_composite_type (gdbarch, NULL, TYPE_CODE_UNION);
451
452   /* _rt */
453   type *t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
454   append_composite_type_field (t, "_pid", pid_type);
455   append_composite_type_field (t, "_uid", uid_type);
456   append_composite_type_field (t, "_value", sigval_type);
457   append_composite_type_field (reason_type, "_rt", t);
458
459   /* _child */
460   t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
461   append_composite_type_field (t, "_pid", pid_type);
462   append_composite_type_field (t, "_uid", uid_type);
463   append_composite_type_field (t, "_status", int_type);
464   append_composite_type_field (t, "_utime", clock_type);
465   append_composite_type_field (t, "_stime", clock_type);
466   append_composite_type_field (reason_type, "_child", t);
467
468   /* _fault */
469   t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
470   append_composite_type_field (t, "_addr", void_ptr_type);
471   append_composite_type_field (t, "_trap", int_type);
472   append_composite_type_field (t, "_trap2", int_type);
473   append_composite_type_field (t, "_trap3", int_type);
474   append_composite_type_field (reason_type, "_fault", t);
475
476   /* _poll */
477   t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
478   append_composite_type_field (t, "_band", long_type);
479   append_composite_type_field (t, "_fd", int_type);
480   append_composite_type_field (reason_type, "_poll", t);
481
482   /* _syscall */
483   t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
484   append_composite_type_field (t, "_sysnum", int_type);
485   append_composite_type_field (t, "_retval",
486                                init_vector_type (int_type, 2));
487   append_composite_type_field (t, "_error", int_type);
488   append_composite_type_field (t, "_args",
489                                init_vector_type (uint64_type, 8));
490   append_composite_type_field (reason_type, "_syscall", t);
491
492   /* _ptrace_state */
493   t = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
494   append_composite_type_field (t, "_pe_report_event", int_type);
495   append_composite_type_field (t, "_option", option_type);
496   append_composite_type_field (reason_type, "_ptrace_state", t);
497
498   /* struct _ksiginfo */
499   type *ksiginfo_type = arch_composite_type (gdbarch, NULL, TYPE_CODE_STRUCT);
500   ksiginfo_type->set_name (gdbarch_obstack_strdup (gdbarch, "_ksiginfo"));
501   append_composite_type_field (ksiginfo_type, "_signo", int_type);
502   append_composite_type_field (ksiginfo_type, "_code", int_type);
503   append_composite_type_field (ksiginfo_type, "_errno", int_type);
504   if (lp64)
505     append_composite_type_field (ksiginfo_type, "_pad", int_type);
506   append_composite_type_field (ksiginfo_type, "_reason", reason_type);
507
508   /* union siginfo */
509   type *siginfo_type = arch_composite_type (gdbarch, NULL, TYPE_CODE_UNION);
510   siginfo_type->set_name (gdbarch_obstack_strdup (gdbarch, "siginfo"));
511   append_composite_type_field (siginfo_type, "si_pad",
512                                init_vector_type (char_type, 128));
513   append_composite_type_field (siginfo_type, "_info", ksiginfo_type);
514
515   nbsd_gdbarch_data->siginfo_type = siginfo_type;
516
517   return siginfo_type;
518 }
519
520 /* See netbsd-tdep.h.  */
521
522 void
523 nbsd_info_proc_mappings_header (int addr_bit)
524 {
525   gdb_printf (_("Mapped address spaces:\n\n"));
526   if (addr_bit == 64)
527     {
528       gdb_printf ("  %18s %18s %10s %10s %9s %s\n",
529                   "Start Addr",
530                   "  End Addr",
531                   "      Size", "    Offset", "Flags  ", "File");
532     }
533   else
534     {
535       gdb_printf ("\t%10s %10s %10s %10s %9s %s\n",
536                   "Start Addr",
537                   "  End Addr",
538                   "      Size", "    Offset", "Flags  ", "File");
539     }
540 }
541
542 /* Helper function to generate mappings flags for a single VM map
543    entry in 'info proc mappings'.  */
544
545 static const char *
546 nbsd_vm_map_entry_flags (int kve_flags, int kve_protection)
547 {
548   static char vm_flags[9];
549
550   vm_flags[0] = (kve_protection & KINFO_VME_PROT_READ) ? 'r' : '-';
551   vm_flags[1] = (kve_protection & KINFO_VME_PROT_WRITE) ? 'w' : '-';
552   vm_flags[2] = (kve_protection & KINFO_VME_PROT_EXEC) ? 'x' : '-';
553   vm_flags[3] = ' ';
554   vm_flags[4] = (kve_flags & KINFO_VME_FLAG_COW) ? 'C' : '-';
555   vm_flags[5] = (kve_flags & KINFO_VME_FLAG_NEEDS_COPY) ? 'N' : '-';
556   vm_flags[6] = (kve_flags & KINFO_VME_FLAG_PAGEABLE) ? 'P' : '-';
557   vm_flags[7] = (kve_flags & KINFO_VME_FLAG_GROWS_UP) ? 'U'
558     : (kve_flags & KINFO_VME_FLAG_GROWS_DOWN) ? 'D' : '-';
559   vm_flags[8] = '\0';
560
561   return vm_flags;
562 }
563
564 void
565 nbsd_info_proc_mappings_entry (int addr_bit, ULONGEST kve_start,
566                                ULONGEST kve_end, ULONGEST kve_offset,
567                                int kve_flags, int kve_protection,
568                                const char *kve_path)
569 {
570   if (addr_bit == 64)
571     {
572       gdb_printf ("  %18s %18s %10s %10s %9s %s\n",
573                   hex_string (kve_start),
574                   hex_string (kve_end),
575                   hex_string (kve_end - kve_start),
576                   hex_string (kve_offset),
577                   nbsd_vm_map_entry_flags (kve_flags, kve_protection),
578                   kve_path);
579     }
580   else
581     {
582       gdb_printf ("\t%10s %10s %10s %10s %9s %s\n",
583                   hex_string (kve_start),
584                   hex_string (kve_end),
585                   hex_string (kve_end - kve_start),
586                   hex_string (kve_offset),
587                   nbsd_vm_map_entry_flags (kve_flags, kve_protection),
588                   kve_path);
589     }
590 }
591
592 /* Implement the "get_syscall_number" gdbarch method.  */
593
594 static LONGEST
595 nbsd_get_syscall_number (struct gdbarch *gdbarch, thread_info *thread)
596 {
597
598   /* NetBSD doesn't use gdbarch_get_syscall_number since NetBSD
599      native targets fetch the system call number from the
600      'si_sysnum' member of siginfo_t in nbsd_nat_target::wait.
601      However, system call catching requires this function to be
602      set.  */
603
604   internal_error (_("nbsd_get_sycall_number called"));
605 }
606
607 /* See netbsd-tdep.h.  */
608
609 void
610 nbsd_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
611 {
612   set_gdbarch_gdb_signal_from_target (gdbarch, nbsd_gdb_signal_from_target);
613   set_gdbarch_gdb_signal_to_target (gdbarch, nbsd_gdb_signal_to_target);
614   set_gdbarch_skip_solib_resolver (gdbarch, nbsd_skip_solib_resolver);
615   set_gdbarch_auxv_parse (gdbarch, svr4_auxv_parse);
616   set_gdbarch_get_siginfo_type (gdbarch, nbsd_get_siginfo_type);
617
618   /* `catch syscall' */
619   set_xml_syscall_file_name (gdbarch, "syscalls/netbsd.xml");
620   set_gdbarch_get_syscall_number (gdbarch, nbsd_get_syscall_number);
621 }
This page took 0.057536 seconds and 4 git commands to generate.