/* * Copyright (c) 2000-2004 Apple Computer, Inc. All rights reserved. * * @APPLE_LICENSE_HEADER_START@ * * The contents of this file constitute Original Code as defined in and * are subject to the Apple Public Source License Version 1.1 (the * "License"). You may not use this file except in compliance with the * License. Please obtain a copy of the License at * http://www.apple.com/publicsource and read it before using this file. * * This Original Code and all software distributed under the License are * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES, * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY, * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT. Please see the * License for the specific language governing rights and limitations * under the License. * * @APPLE_LICENSE_HEADER_END@ */ /*- * Copyright (c) 1988 University of Utah. * Copyright (c) 1982, 1986, 1990, 1993 * The Regents of the University of California. All rights reserved. * * This code is derived from software contributed to Berkeley by * the Systems Programming Group of the University of Utah Computer * Science Department, and code derived from software contributed to * Berkeley by William Jolitz. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the University of * California, Berkeley and its contributors. * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * from: Utah $Hdr: mem.c 1.13 89/10/08$ * @(#)mem.c 8.1 (Berkeley) 6/11/93 */ #include <mach_load.h> /* * Memory special file */ #include <sys/param.h> #include <sys/dir.h> #include <sys/proc.h> #include <sys/systm.h> #include <sys/vm.h> #include <sys/uio_internal.h> #include <sys/malloc.h> #include <vm/pmap.h> #include <vm/vm_map.h> #include <vm/vm_kern.h> #include <mach/vm_param.h> #include <ppc/Diagnostics.h> #include <ppc/mappings.h> static caddr_t devzerobuf; extern pmap_t kernel_pmap; extern boolean_t kernacc(off_t, size_t ); int mmread(dev_t dev, struct uio *uio); int mmrw(dev_t dev, struct uio *uio, enum uio_rw rw); int mmioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p); int mmwrite(dev_t dev, struct uio *uio); int mmread(dev, uio) dev_t dev; struct uio *uio; { return (mmrw(dev, uio, UIO_READ)); } int mmwrite(dev, uio) dev_t dev; struct uio *uio; { return (mmrw(dev, uio, UIO_WRITE)); } int mmioctl(__unused dev_t dev, u_long cmd, __unused caddr_t data, __unused int flag, __unused struct proc *p) { switch (cmd) { case FIONBIO: case FIOASYNC: /* OK to do nothing: we always return immediately */ break; default: return ENODEV; } return (0); } int mmrw(dev, uio, rw) dev_t dev; struct uio *uio; enum uio_rw rw; { register int o; #if LP64KERN register uint64_t c; #else register uint c; #endif addr64_t vll; int error = 0; vm_offset_t where; while (uio_resid(uio) > 0 && error == 0) { if (uio_iov_len(uio) == 0) { uio_next_iov(uio); uio->uio_iovcnt--; if (uio->uio_iovcnt < 0) panic("mmrw"); continue; } switch (minor(dev)) { /* minor device 0 is physical memory */ case 0: vll = trunc_page_64(uio->uio_offset); if(((vll >> 31) == 1) || vll >= ((dgWork.dgFlags & enaDiagDM) ? mem_actual : max_mem)) goto fault; if(dgWork.dgFlags & enaDiagDM) { /* Can we really get all memory? */ if (kmem_alloc_pageable(kernel_map, &where, PAGE_SIZE) != KERN_SUCCESS) { goto fault; } else { addr64_t collad; collad = mapping_make(kernel_pmap, (addr64_t)where, (ppnum_t)(vll >> 12), 0, 1, VM_PROT_READ); /* Map it in for the moment */ if(collad) { /* See if it failed (shouldn't happen) */ kmem_free(kernel_map, where, PAGE_SIZE); /* Toss the page */ goto fault; /* Kill the transfer */ } } } else { if (kmem_alloc(kernel_map, &where, 4096) != KERN_SUCCESS) { goto fault; } } o = uio->uio_offset - vll; // LP64todo - fix this! c = min(PAGE_SIZE - o, uio_iov_len(uio)); error = uiomove((caddr_t)(where + o), c, uio); if(dgWork.dgFlags & enaDiagDM) (void)mapping_remove(kernel_pmap, (addr64_t)where); /* Unmap it */ kmem_free(kernel_map, where, PAGE_SIZE); continue; /* minor device 1 is kernel memory */ case 1: /* Do some sanity checking */ if (((addr64_t)uio->uio_offset > vm_last_addr) || ((addr64_t)uio->uio_offset < VM_MIN_KERNEL_ADDRESS)) goto fault; c = uio_iov_len(uio); if (!kernacc(uio->uio_offset, c)) goto fault; error = uiomove64(uio->uio_offset, c, uio); continue; /* minor device 2 is EOF/RATHOLE */ case 2: if (rw == UIO_READ) return (0); c = uio_iov_len(uio); break; /* minor device 3 is ZERO/RATHOLE */ case 3: if(devzerobuf == NULL) { MALLOC(devzerobuf, caddr_t,PAGE_SIZE, M_TEMP, M_WAITOK); bzero(devzerobuf, PAGE_SIZE); } if(uio->uio_rw == UIO_WRITE) { c = uio_iov_len(uio); break; } // LP64todo - fix this! c = min(uio_iov_len(uio), PAGE_SIZE); error = uiomove(devzerobuf, c, uio); continue; default: goto fault; break; } if (error) break; uio_iov_base_add(uio, c); uio->uio_offset += c; #if LP64KERN uio_setresid(uio, (uio_resid(uio) - c)); uio_iov_len_add(uio, -((int64_t)c)); #else uio_setresid(uio, (uio_resid(uio) - c)); uio_iov_len_add(uio, -((int)c)); #endif } return (error); fault: return (EFAULT); }