kvm_m68k.c revision 1.11 1 /* $NetBSD: kvm_m68k.c,v 1.11 1997/04/09 21:15:50 thorpej Exp $ */
2
3 /*-
4 * Copyright (c) 1997 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Gordon W. Ross and Jason R. Thorpe.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 /*
40 * Run-time kvm dispatcher for m68k machines.
41 * The actual MD code is in the files:
42 * kvm_m68k_cmn.c kvm_sun3.c ...
43 */
44
45 #include <sys/param.h>
46 #include <sys/sysctl.h>
47 #include <sys/kcore.h>
48
49 #include <stdio.h>
50 #include <string.h>
51 #include <stdlib.h>
52
53 #include <unistd.h>
54 #include <limits.h>
55 #include <nlist.h>
56 #include <kvm.h>
57 #include <db.h>
58
59 #include <machine/kcore.h>
60
61 #include "kvm_private.h"
62 #include "kvm_m68k.h"
63
64 struct name_ops {
65 const char *name;
66 struct kvm_ops *ops;
67 };
68
69 /*
70 * Match specific kcore types first, falling into a default.
71 */
72 static struct name_ops optbl[] = {
73 { "sun3", &_kvm_ops_sun3 },
74 { "sun3x", &_kvm_ops_sun3x },
75 { NULL, &_kvm_ops_cmn },
76 };
77
78 /*
79 * Prepare for translation of kernel virtual addresses into offsets
80 * into crash dump files. This is where we do the dispatch work.
81 */
82 int
83 _kvm_initvtop(kd)
84 kvm_t *kd;
85 {
86 cpu_kcore_hdr_t *h;
87 struct name_ops *nop;
88 struct vmstate *vm;
89
90 vm = (struct vmstate *)_kvm_malloc(kd, sizeof (*vm));
91 if (vm == 0)
92 return (-1);
93
94 kd->vmst = vm;
95
96 /*
97 * Use the machine name in the kcore header to determine
98 * our ops vector. When we reach an ops vector with
99 * no name, we've found a default.
100 */
101 h = kd->cpu_data;
102 h->name[sizeof(h->name) - 1] = '\0'; /* sanity */
103 for (nop = optbl; nop->name != NULL; nop++)
104 if (strcmp(nop->name, h->name) == 0)
105 break;
106
107 vm->ops = nop->ops;
108
109 /*
110 * Compute pgshift and pgofset.
111 */
112 for (vm->pgshift = 0; (1 << vm->pgshift) < h->page_size; vm->pgshift++)
113 /* nothing */ ;
114 if ((1 << vm->pgshift) != h->page_size)
115 goto bad;
116 vm->pgofset = h->page_size - 1;
117
118 if ((vm->ops->initvtop)(kd) < 0)
119 goto bad;
120
121 return (0);
122
123 bad:
124 kd->vmst = NULL;
125 free(vm);
126 return (-1);
127 }
128
129 void
130 _kvm_freevtop(kd)
131 kvm_t *kd;
132 {
133 (kd->vmst->ops->freevtop)(kd);
134 free(kd->vmst);
135 }
136
137 int
138 _kvm_kvatop(kd, va, pap)
139 kvm_t *kd;
140 u_long va;
141 u_long *pap;
142 {
143 return ((kd->vmst->ops->kvatop)(kd, va, pap));
144 }
145
146 off_t
147 _kvm_pa2off(kd, pa)
148 kvm_t *kd;
149 u_long pa;
150 {
151 return ((kd->vmst->ops->pa2off)(kd, pa));
152 }
153