1/* Native-dependent code for VAX UNIXen (including older BSD's).
2
3   Copyright 2004 Free Software Foundation, Inc.
4
5   This file is part of GDB.
6
7   This program is free software; you can redistribute it and/or modify
8   it under the terms of the GNU General Public License as published by
9   the Free Software Foundation; either version 2 of the License, or
10   (at your option) any later version.
11
12   This program is distributed in the hope that it will be useful,
13   but WITHOUT ANY WARRANTY; without even the implied warranty of
14   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15   GNU General Public License for more details.
16
17   You should have received a copy of the GNU General Public License
18   along with this program; if not, write to the Free Software
19   Foundation, Inc., 59 Temple Place - Suite 330,
20   Boston, MA 02111-1307, USA.  */
21
22#include "defs.h"
23#include "inferior.h"
24
25#include "gdb_assert.h"
26#include <sys/types.h>
27#include <sys/dir.h>
28#include <sys/user.h>
29
30#ifdef HAVE_SYS_PTRACE_H
31#include <sys/ptrace.h>
32#endif
33
34#ifndef PT_READ_U
35#define PT_READ_U 3
36#endif
37
38#ifdef SYS_REG_H
39/* UNIX 32V and derivatives (including 3BSD).  */
40#include <sys/reg.h>
41#else
42/* 4.2BSD and derivatives.  */
43#include <machine/reg.h>
44#endif
45
46#include "vax-tdep.h"
47
48/* Address of the user structure.  This is the the value for 32V; 3BSD
49   uses a different value, but hey, who's still using those systems?  */
50CORE_ADDR vax_kernel_u_addr = 0x80020000;
51
52/* Location of the user's stored registers; usage is `u.u_ar0[XX]'.
53   For 4.2BSD and ULTRIX these are negative!  See <machine/reg.h>.  */
54static int vax_register_index[] =
55{
56  R0, R1, R2, R3, R4, R5,
57  R6, R7, R8, R9, R10, R11,
58  AP, FP, SP, PC, PS
59};
60
61CORE_ADDR
62vax_register_u_addr (CORE_ADDR u_ar0, int regnum)
63{
64  gdb_assert (regnum >= 0 && regnum < ARRAY_SIZE (vax_register_index));
65
66  /* Type is `int *u_ar0'.  See <sys/user.h>.  */
67  return u_ar0 + vax_register_index[regnum - VAX_R0_REGNUM] * 4;
68}
69
70
71CORE_ADDR
72vax_register_u_offset (int regnum)
73{
74  size_t u_ar0_offset = offsetof (struct user, u_ar0);
75  CORE_ADDR u_ar0;
76  int pid;
77
78  errno = 0;
79  pid = PIDGET (inferior_ptid);
80  u_ar0 = ptrace (PT_READ_U, pid, u_ar0_offset, 0);
81  if (errno)
82    perror_with_name ("Unable to determine location of registers");
83
84  return vax_register_u_addr (u_ar0, regnum) - vax_kernel_u_addr;
85}
86
87
88#include <nlist.h>
89
90#ifndef _PATH_UNIX
91#define _PATH_UNIX "/vmunix"
92#endif
93
94/* Provide a prototype to silence -Wmissing-prototypes.  */
95void _initialize_vax_nat (void);
96
97void
98_initialize_vax_nat (void)
99{
100  struct nlist names[2];
101
102  names[0].n_name = "_u";
103  names[1].n_name = NULL;
104  if (nlist (_PATH_UNIX, names) == 0)
105    vax_kernel_u_addr = names[0].n_value;
106}
107