2 * Copyright (C) 2002 Benno Rice
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY Benno Rice ``AS IS'' AND ANY EXPRESS OR
15 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
16 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
17 * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
18 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
19 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
20 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
21 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
22 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
23 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 * Copyright (C) 1993 Wolfgang Solfrank.
27 * Copyright (C) 1993 TooLs GmbH.
28 * All rights reserved.
30 * Redistribution and use in source and binary forms, with or without
31 * modification, are permitted provided that the following conditions
33 * 1. Redistributions of source code must retain the above copyright
34 * notice, this list of conditions and the following disclaimer.
35 * 2. Redistributions in binary form must reproduce the above copyright
36 * notice, this list of conditions and the following disclaimer in the
37 * documentation and/or other materials provided with the distribution.
38 * 3. All advertising materials mentioning features or use of this software
39 * must display the following acknowledgement:
40 * This product includes software developed by TooLs GmbH.
41 * 4. The name of TooLs GmbH may not be used to endorse or promote products
42 * derived from this software without specific prior written permission.
44 * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
45 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
46 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
47 * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
48 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
49 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
50 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
51 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
52 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
53 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
56 #include <sys/cdefs.h>
57 __FBSDID("$FreeBSD$");
59 #include <sys/param.h>
61 #include <sys/mutex.h>
62 #include <sys/systm.h>
67 #include <vm/vm_map.h>
69 #include <machine/pcb.h>
70 #include <machine/sr.h>
71 #include <machine/slb.h>
72 #include <machine/vmparam.h>
76 * Makes sure that the right segment of userspace is mapped in.
81 set_user_sr(pmap_t pm, volatile const void *addr)
86 /* Try lockless look-up first */
87 slb = user_va_to_slb_entry(pm, (vm_offset_t)addr);
90 /* If it isn't there, we need to pre-fault the VSID */
92 slbv = va_to_vsid(pm, (vm_offset_t)addr) << SLBV_VSID_SHIFT;
98 /* Mark segment no-execute */
101 /* If we have already set this VSID, we can just return */
102 if (curthread->td_pcb->pcb_cpu.aim.usr_vsid == slbv)
105 __asm __volatile("isync");
106 curthread->td_pcb->pcb_cpu.aim.usr_segm =
107 (uintptr_t)addr >> ADDR_SR_SHFT;
108 curthread->td_pcb->pcb_cpu.aim.usr_vsid = slbv;
109 __asm __volatile ("slbie %0; slbmte %1, %2; isync" ::
110 "r"(USER_ADDR), "r"(slbv), "r"(USER_SLB_SLBE));
114 set_user_sr(pmap_t pm, volatile const void *addr)
118 vsid = va_to_vsid(pm, (vm_offset_t)addr);
120 /* Mark segment no-execute */
123 /* If we have already set this VSID, we can just return */
124 if (curthread->td_pcb->pcb_cpu.aim.usr_vsid == vsid)
127 __asm __volatile("isync");
128 curthread->td_pcb->pcb_cpu.aim.usr_segm =
129 (uintptr_t)addr >> ADDR_SR_SHFT;
130 curthread->td_pcb->pcb_cpu.aim.usr_vsid = vsid;
131 __asm __volatile("mtsr %0,%1; isync" :: "n"(USER_SR), "r"(vsid));
136 map_user_ptr(pmap_t pm, volatile const void *uaddr, void **kaddr, size_t ulen,
141 *kaddr = (char *)USER_ADDR + ((uintptr_t)uaddr & ~SEGMENT_MASK);
143 l = ((char *)USER_ADDR + SEGMENT_LENGTH) - (char *)(*kaddr);
151 set_user_sr(pm, uaddr);
155 #else /* Book-E uses a combined kernel/user mapping */
157 map_user_ptr(pmap_t pm, volatile const void *uaddr, void **kaddr, size_t ulen,
161 if ((uintptr_t)uaddr + ulen > VM_MAXUSER_ADDRESS + PAGE_SIZE)
164 *kaddr = (void *)(uintptr_t)uaddr;
173 copyout(const void *kaddr, void *udaddr, size_t len)
183 pm = &td->td_proc->p_vmspace->vm_pmap;
185 td->td_pcb->pcb_onfault = &env;
187 td->td_pcb->pcb_onfault = NULL;
195 if (map_user_ptr(pm, udaddr, (void **)&p, len, &l)) {
196 td->td_pcb->pcb_onfault = NULL;
207 td->td_pcb->pcb_onfault = NULL;
212 copyin(const void *udaddr, void *kaddr, size_t len)
222 pm = &td->td_proc->p_vmspace->vm_pmap;
224 td->td_pcb->pcb_onfault = &env;
226 td->td_pcb->pcb_onfault = NULL;
234 if (map_user_ptr(pm, udaddr, (void **)&p, len, &l)) {
235 td->td_pcb->pcb_onfault = NULL;
246 td->td_pcb->pcb_onfault = NULL;
251 copyinstr(const void *udaddr, void *kaddr, size_t len, size_t *done)
263 for (l = 0; len-- > 0; l++) {
264 if ((c = fubyte(up++)) < 0) {
284 subyte(volatile void *addr, int byte)
292 pm = &td->td_proc->p_vmspace->vm_pmap;
294 td->td_pcb->pcb_onfault = &env;
296 td->td_pcb->pcb_onfault = NULL;
300 if (map_user_ptr(pm, addr, (void **)&p, sizeof(*p), NULL)) {
301 td->td_pcb->pcb_onfault = NULL;
307 td->td_pcb->pcb_onfault = NULL;
313 suword32(volatile void *addr, int word)
321 pm = &td->td_proc->p_vmspace->vm_pmap;
323 td->td_pcb->pcb_onfault = &env;
325 td->td_pcb->pcb_onfault = NULL;
329 if (map_user_ptr(pm, addr, (void **)&p, sizeof(*p), NULL)) {
330 td->td_pcb->pcb_onfault = NULL;
336 td->td_pcb->pcb_onfault = NULL;
342 suword(volatile void *addr, long word)
350 pm = &td->td_proc->p_vmspace->vm_pmap;
352 td->td_pcb->pcb_onfault = &env;
354 td->td_pcb->pcb_onfault = NULL;
358 if (map_user_ptr(pm, addr, (void **)&p, sizeof(*p), NULL)) {
359 td->td_pcb->pcb_onfault = NULL;
365 td->td_pcb->pcb_onfault = NULL;
371 suword64(volatile void *addr, int64_t word)
373 return (suword(addr, (long)word));
377 suword32(volatile void *addr, int32_t word)
379 return (suword(addr, (long)word));
384 fubyte(volatile const void *addr)
393 pm = &td->td_proc->p_vmspace->vm_pmap;
395 td->td_pcb->pcb_onfault = &env;
397 td->td_pcb->pcb_onfault = NULL;
401 if (map_user_ptr(pm, addr, (void **)&p, sizeof(*p), NULL)) {
402 td->td_pcb->pcb_onfault = NULL;
408 td->td_pcb->pcb_onfault = NULL;
413 fuword16(volatile const void *addr)
421 pm = &td->td_proc->p_vmspace->vm_pmap;
423 td->td_pcb->pcb_onfault = &env;
425 td->td_pcb->pcb_onfault = NULL;
429 if (map_user_ptr(pm, addr, (void **)&p, sizeof(*p), NULL)) {
430 td->td_pcb->pcb_onfault = NULL;
436 td->td_pcb->pcb_onfault = NULL;
441 fueword32(volatile const void *addr, int32_t *val)
449 pm = &td->td_proc->p_vmspace->vm_pmap;
451 td->td_pcb->pcb_onfault = &env;
453 td->td_pcb->pcb_onfault = NULL;
457 if (map_user_ptr(pm, addr, (void **)&p, sizeof(*p), NULL)) {
458 td->td_pcb->pcb_onfault = NULL;
464 td->td_pcb->pcb_onfault = NULL;
470 fueword64(volatile const void *addr, int64_t *val)
478 pm = &td->td_proc->p_vmspace->vm_pmap;
480 td->td_pcb->pcb_onfault = &env;
482 td->td_pcb->pcb_onfault = NULL;
486 if (map_user_ptr(pm, addr, (void **)&p, sizeof(*p), NULL)) {
487 td->td_pcb->pcb_onfault = NULL;
493 td->td_pcb->pcb_onfault = NULL;
499 fueword(volatile const void *addr, long *val)
507 pm = &td->td_proc->p_vmspace->vm_pmap;
509 td->td_pcb->pcb_onfault = &env;
511 td->td_pcb->pcb_onfault = NULL;
515 if (map_user_ptr(pm, addr, (void **)&p, sizeof(*p), NULL)) {
516 td->td_pcb->pcb_onfault = NULL;
522 td->td_pcb->pcb_onfault = NULL;
527 casueword32(volatile uint32_t *addr, uint32_t old, uint32_t *oldvalp,
536 pm = &td->td_proc->p_vmspace->vm_pmap;
538 td->td_pcb->pcb_onfault = &env;
540 td->td_pcb->pcb_onfault = NULL;
544 if (map_user_ptr(pm, (void *)(uintptr_t)addr, (void **)&p, sizeof(*p),
546 td->td_pcb->pcb_onfault = NULL;
551 "1:\tlwarx %0, 0, %2\n\t" /* load old value */
552 "cmplw %3, %0\n\t" /* compare */
553 "bne 2f\n\t" /* exit if not equal */
554 "stwcx. %4, 0, %2\n\t" /* attempt to store */
555 "bne- 1b\n\t" /* spin if failed */
556 "b 3f\n\t" /* we've succeeded */
558 "stwcx. %0, 0, %2\n\t" /* clear reservation (74xx) */
560 : "=&r" (val), "=m" (*p)
561 : "r" (p), "r" (old), "r" (new), "m" (*p)
564 td->td_pcb->pcb_onfault = NULL;
570 #ifndef __powerpc64__
572 casueword(volatile u_long *addr, u_long old, u_long *oldvalp, u_long new)
575 return (casueword32((volatile uint32_t *)addr, old,
576 (uint32_t *)oldvalp, new));
580 casueword(volatile u_long *addr, u_long old, u_long *oldvalp, u_long new)
588 pm = &td->td_proc->p_vmspace->vm_pmap;
590 td->td_pcb->pcb_onfault = &env;
592 td->td_pcb->pcb_onfault = NULL;
596 if (map_user_ptr(pm, (void *)(uintptr_t)addr, (void **)&p, sizeof(*p),
598 td->td_pcb->pcb_onfault = NULL;
603 "1:\tldarx %0, 0, %2\n\t" /* load old value */
604 "cmpld %3, %0\n\t" /* compare */
605 "bne 2f\n\t" /* exit if not equal */
606 "stdcx. %4, 0, %2\n\t" /* attempt to store */
607 "bne- 1b\n\t" /* spin if failed */
608 "b 3f\n\t" /* we've succeeded */
610 "stdcx. %0, 0, %2\n\t" /* clear reservation (74xx) */
612 : "=&r" (val), "=m" (*p)
613 : "r" (p), "r" (old), "r" (new), "m" (*p)
616 td->td_pcb->pcb_onfault = NULL;