kvm_vax.c revision 1.14 1 1.14 thorpej /* $NetBSD: kvm_vax.c,v 1.14 2001/11/29 23:32:42 thorpej Exp $ */
2 1.3 thorpej
3 1.1 ragge /*-
4 1.1 ragge * Copyright (c) 1992, 1993
5 1.1 ragge * The Regents of the University of California. All rights reserved.
6 1.1 ragge *
7 1.1 ragge * This code is derived from software developed by the Computer Systems
8 1.1 ragge * Engineering group at Lawrence Berkeley Laboratory under DARPA contract
9 1.1 ragge * BG 91-66 and contributed to Berkeley.
10 1.1 ragge *
11 1.1 ragge * Redistribution and use in source and binary forms, with or without
12 1.1 ragge * modification, are permitted provided that the following conditions
13 1.1 ragge * are met:
14 1.1 ragge * 1. Redistributions of source code must retain the above copyright
15 1.1 ragge * notice, this list of conditions and the following disclaimer.
16 1.1 ragge * 2. Redistributions in binary form must reproduce the above copyright
17 1.1 ragge * notice, this list of conditions and the following disclaimer in the
18 1.1 ragge * documentation and/or other materials provided with the distribution.
19 1.1 ragge * 3. All advertising materials mentioning features or use of this software
20 1.1 ragge * must display the following acknowledgement:
21 1.1 ragge * This product includes software developed by the University of
22 1.1 ragge * California, Berkeley and its contributors.
23 1.1 ragge * 4. Neither the name of the University nor the names of its contributors
24 1.1 ragge * may be used to endorse or promote products derived from this software
25 1.1 ragge * without specific prior written permission.
26 1.1 ragge *
27 1.1 ragge * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
28 1.1 ragge * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29 1.1 ragge * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
30 1.1 ragge * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
31 1.1 ragge * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32 1.1 ragge * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
33 1.1 ragge * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
34 1.1 ragge * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
35 1.1 ragge * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
36 1.1 ragge * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
37 1.1 ragge * SUCH DAMAGE.
38 1.1 ragge */
39 1.1 ragge
40 1.1 ragge /*
41 1.1 ragge * VAX machine dependent routines for kvm. Hopefully, the forthcoming
42 1.1 ragge * vm code will one day obsolete this module. Furthermore, I hope it
43 1.1 ragge * gets here soon, because this basically is an error stub! (sorry)
44 1.1 ragge * This code may not work anyway.
45 1.1 ragge */
46 1.1 ragge
47 1.1 ragge #include <sys/param.h>
48 1.1 ragge #include <sys/user.h>
49 1.1 ragge #include <sys/proc.h>
50 1.1 ragge #include <sys/stat.h>
51 1.1 ragge #include <unistd.h>
52 1.1 ragge #include <nlist.h>
53 1.6 ragge #include <stdlib.h>
54 1.1 ragge #include <kvm.h>
55 1.1 ragge
56 1.10 mrg #include <uvm/uvm_extern.h>
57 1.1 ragge
58 1.13 chuck #include <machine/vmparam.h>
59 1.13 chuck
60 1.1 ragge #include <limits.h>
61 1.1 ragge #include <db.h>
62 1.1 ragge
63 1.1 ragge #include "kvm_private.h"
64 1.13 chuck
65 1.1 ragge
66 1.1 ragge struct vmstate {
67 1.1 ragge u_long end;
68 1.1 ragge };
69 1.1 ragge
70 1.1 ragge void
71 1.1 ragge _kvm_freevtop(kd)
72 1.1 ragge kvm_t *kd;
73 1.1 ragge {
74 1.1 ragge if (kd->vmst != 0)
75 1.1 ragge free(kd->vmst);
76 1.1 ragge }
77 1.1 ragge
78 1.1 ragge int
79 1.1 ragge _kvm_initvtop(kd)
80 1.1 ragge kvm_t *kd;
81 1.1 ragge {
82 1.7 perry struct vmstate *vm;
83 1.1 ragge struct stat st;
84 1.14 thorpej struct nlist nl[2];
85 1.1 ragge
86 1.1 ragge vm = (struct vmstate *)_kvm_malloc(kd, sizeof(*vm));
87 1.1 ragge if (vm == 0)
88 1.1 ragge return (-1);
89 1.1 ragge
90 1.1 ragge kd->vmst = vm;
91 1.1 ragge
92 1.1 ragge if (fstat(kd->pmfd, &st) < 0)
93 1.1 ragge return (-1);
94 1.1 ragge
95 1.1 ragge /* Get end of kernel address */
96 1.14 thorpej nl[0].n_name = "_end";
97 1.14 thorpej nl[1].n_name = 0;
98 1.14 thorpej if (kvm_nlist(kd, nl) != 0) {
99 1.1 ragge _kvm_err(kd, kd->program, "pmap_stod: no such symbol");
100 1.1 ragge return (-1);
101 1.1 ragge }
102 1.14 thorpej vm->end = (u_long)nl[0].n_value;
103 1.1 ragge
104 1.1 ragge return (0);
105 1.1 ragge }
106 1.1 ragge
107 1.1 ragge #define VA_OFF(va) (va & (NBPG - 1))
108 1.1 ragge
109 1.1 ragge /*
110 1.1 ragge * Translate a kernel virtual address to a physical address using the
111 1.1 ragge * mapping information in kd->vm. Returns the result in pa, and returns
112 1.8 simonb * the number of bytes that are contiguously available from this
113 1.1 ragge * physical address. This routine is used only for crashdumps.
114 1.1 ragge */
115 1.1 ragge int
116 1.1 ragge _kvm_kvatop(kd, va, pa)
117 1.1 ragge kvm_t *kd;
118 1.1 ragge u_long va;
119 1.1 ragge u_long *pa;
120 1.1 ragge {
121 1.12 matt u_long end;
122 1.1 ragge
123 1.12 matt if (va < (u_long) KERNBASE) {
124 1.12 matt _kvm_err(kd, 0, "invalid address (%lx<%lx)", va, (u_long) KERNBASE);
125 1.1 ragge return (0);
126 1.1 ragge }
127 1.1 ragge
128 1.1 ragge end = kd->vmst->end;
129 1.1 ragge if (va >= end) {
130 1.12 matt _kvm_err(kd, 0, "invalid address (%lx>=%lx)", va, end);
131 1.1 ragge return (0);
132 1.1 ragge }
133 1.1 ragge
134 1.12 matt *pa = (va - (u_long) KERNBASE);
135 1.1 ragge return (end - va);
136 1.1 ragge }
137 1.4 ragge
138 1.8 simonb /*
139 1.4 ragge * Translate a physical address to a file-offset in the crash-dump.
140 1.4 ragge * XXX - crash-dumps doesn't work anyway.
141 1.4 ragge */
142 1.4 ragge off_t
143 1.4 ragge _kvm_pa2off(kd, pa)
144 1.4 ragge kvm_t *kd;
145 1.8 simonb u_long pa;
146 1.4 ragge {
147 1.4 ragge return(kd->dump_off + pa);
148 1.4 ragge }
149 1.4 ragge
150 1.5 gwr
151 1.5 gwr /*
152 1.5 gwr * Machine-dependent initialization for ALL open kvm descriptors,
153 1.5 gwr * not just those for a kernel crash dump. Some architectures
154 1.5 gwr * have to deal with these NOT being constants! (i.e. m68k)
155 1.5 gwr */
156 1.5 gwr int
157 1.5 gwr _kvm_mdopen(kd)
158 1.5 gwr kvm_t *kd;
159 1.5 gwr {
160 1.5 gwr
161 1.5 gwr kd->usrstack = USRSTACK;
162 1.5 gwr kd->min_uva = VM_MIN_ADDRESS;
163 1.5 gwr kd->max_uva = VM_MAXUSER_ADDRESS;
164 1.5 gwr
165 1.5 gwr return (0);
166 1.5 gwr }
167