2 * Copyright (c) 1989, 1992, 1993
3 * The Regents of the University of California. All rights reserved.
5 * This code is derived from software developed by the Computer Systems
6 * Engineering group at Lawrence Berkeley Laboratory under DARPA contract
7 * BG 91-66 and contributed to Berkeley.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * from: FreeBSD: src/lib/libkvm/kvm_i386.c,v 1.15 2001/10/10 17:48:43
36 #include <sys/cdefs.h>
37 __FBSDID("$FreeBSD$");
39 #if defined(LIBC_SCCS) && !defined(lint)
41 static char sccsid
[] = "@(#)kvm_hp300.c 8.1 (Berkeley) 6/4/93";
43 #endif /* LIBC_SCCS and not lint */
46 * sparc64 machine dependent routines for kvm.
49 #include <sys/param.h>
59 #include <vm/vm_param.h>
61 #include <machine/kerneldump.h>
62 #include <machine/tte.h>
63 #include <machine/tlb.h>
64 #include <machine/tsb.h>
68 #include "kvm_private.h"
71 #define btop(x) (sparc64_btop(x))
72 #define ptob(x) (sparc64_ptob(x))
77 vm_size_t vm_tsb_mask
;
79 struct sparc64_dump_reg
*vm_regions
;
83 _kvm_freevtop(kvm_t
*kd
)
86 free(kd
->vmst
->vm_regions
);
92 _kvm_read_phys(kvm_t
*kd
, off_t pos
, void *buf
, size_t size
)
95 /* XXX This has to be a raw file read, kvm_read is virtual. */
96 if (lseek(kd
->pmfd
, pos
, SEEK_SET
) == -1) {
97 _kvm_syserr(kd
, kd
->program
, "_kvm_read_phys: lseek");
100 if (read(kd
->pmfd
, buf
, size
) != size
) {
101 _kvm_syserr(kd
, kd
->program
, "_kvm_read_phys: read");
108 _kvm_reg_cmp(const void *a
, const void *b
)
110 const struct sparc64_dump_reg
*ra
, *rb
;
114 if (ra
->dr_pa
< rb
->dr_pa
)
116 else if (ra
->dr_pa
>= rb
->dr_pa
+ rb
->dr_size
)
122 #define KVM_OFF_NOTFOUND 0
125 _kvm_find_off(struct vmstate
*vm
, vm_offset_t pa
, vm_size_t size
)
127 struct sparc64_dump_reg
*reg
, key
;
131 reg
= bsearch(&key
, vm
->vm_regions
, vm
->vm_nregions
,
132 sizeof(*vm
->vm_regions
), _kvm_reg_cmp
);
134 return (KVM_OFF_NOTFOUND
);
136 if (o
+ size
> reg
->dr_size
)
137 return (KVM_OFF_NOTFOUND
);
138 return (reg
->dr_offs
+ o
);
142 _kvm_initvtop(kvm_t
*kd
)
144 struct sparc64_dump_hdr hdr
;
145 struct sparc64_dump_reg
*regs
;
151 vm
= (struct vmstate
*)_kvm_malloc(kd
, sizeof(*vm
));
153 _kvm_err(kd
, kd
->program
, "cannot allocate vm");
158 if (!_kvm_read_phys(kd
, 0, &hdr
, sizeof(hdr
)))
162 regsz
= hdr
.dh_nregions
* sizeof(*regs
);
163 regs
= _kvm_malloc(kd
, regsz
);
165 _kvm_err(kd
, kd
->program
, "cannot allocate regions");
168 if (!_kvm_read_phys(kd
, sizeof(hdr
), regs
, regsz
))
170 qsort(regs
, hdr
.dh_nregions
, sizeof(*regs
), _kvm_reg_cmp
);
172 vm
->vm_tsb_mask
= hdr
.dh_tsb_mask
;
173 vm
->vm_regions
= regs
;
174 vm
->vm_nregions
= hdr
.dh_nregions
;
175 vm
->vm_tsb_off
= _kvm_find_off(vm
, hdr
.dh_tsb_pa
, hdr
.dh_tsb_size
);
176 if (vm
->vm_tsb_off
== KVM_OFF_NOTFOUND
) {
177 _kvm_err(kd
, kd
->program
, "tsb not found in dump");
190 _kvm_kvatop(kvm_t
*kd
, u_long va
, off_t
*pa
)
196 off_t tte_off
, pa_off
;
200 pg_off
= va
& PAGE_MASK
;
201 if (va
>= VM_MIN_DIRECT_ADDRESS
)
202 pa_off
= TLB_DIRECT_TO_PHYS(va
) & ~PAGE_MASK
;
206 tte_off
= kd
->vmst
->vm_tsb_off
+
207 ((vpn
& kd
->vmst
->vm_tsb_mask
) << TTE_SHIFT
);
208 if (!_kvm_read_phys(kd
, tte_off
, &tte
, sizeof(tte
)))
210 if (!tte_match(&tte
, va
))
212 pa_off
= TTE_GET_PA(&tte
);
215 rest
= PAGE_SIZE
- pg_off
;
216 pa_off
= _kvm_find_off(kd
->vmst
, pa_off
, rest
);
217 if (pa_off
== KVM_OFF_NOTFOUND
)
219 *pa
= pa_off
+ pg_off
;
223 _kvm_err(kd
, 0, "invalid address (%x)", va
);