xnu-1504.3.12.tar.gz

[apple/xnu.git] / bsd / dev / memdev.c

diff --git a/bsd/dev/memdev.c b/bsd/dev/memdev.c
index c8580af9cf84de119d830d567bdadc11f9ee8c45..fe07f5e539c8f125e2eb877a3cd7e25b68646c03 100644 (file)
--- a/bsd/dev/memdev.c
+++ b/bsd/dev/memdev.c
@@ -1,31 +1,29 @@
 /*
 /*

- * Copyright (c) 2004 Apple Computer, Inc. All rights reserved.
+ * Copyright (c) 2004-2006 Apple Computer, Inc. All rights reserved.

  *
  *

- * @APPLE_LICENSE_OSREFERENCE_HEADER_START@
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_START@

  * 
  * 

- * This file contains Original Code and/or Modifications of Original Code 
- * as defined in and that are subject to the Apple Public Source License 
- * Version 2.0 (the 'License'). You may not use this file except in 
- * compliance with the License.  The rights granted to you under the 
- * License may not be used to create, or enable the creation or 
- * redistribution of, unlawful or unlicensed copies of an Apple operating 
- * system, or to circumvent, violate, or enable the circumvention or 
- * violation of, any terms of an Apple operating system software license 
- * agreement.
- *
- * Please obtain a copy of the License at 
- * http://www.opensource.apple.com/apsl/ and read it before using this 
- * file.
- *
- * The 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, QUIET ENJOYMENT OR NON-INFRINGEMENT. 
- * Please see the License for the specific language governing rights and 
+ * This file contains Original Code and/or Modifications of Original Code
+ * as defined in and that are subject to the Apple Public Source License
+ * Version 2.0 (the 'License'). You may not use this file except in
+ * compliance with the License. The rights granted to you under the License
+ * may not be used to create, or enable the creation or redistribution of,
+ * unlawful or unlicensed copies of an Apple operating system, or to
+ * circumvent, violate, or enable the circumvention or violation of, any
+ * terms of an Apple operating system software license agreement.
+ * 
+ * Please obtain a copy of the License at
+ * http://www.opensource.apple.com/apsl/ and read it before using this file.
+ * 
+ * The 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, QUIET ENJOYMENT OR NON-INFRINGEMENT.
+ * Please see the License for the specific language governing rights and

  * limitations under the License.
  * limitations under the License.

- *
- * @APPLE_LICENSE_OSREFERENCE_HEADER_END@
+ * 
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_END@

  */
 /*
  * Copyright (c) 1988 University of Utah.
  */
 /*
  * Copyright (c) 1988 University of Utah.


@@ -96,6 +94,7 @@
 #include <vm/pmap.h>
 #include <vm/vm_pager.h>
 #include <mach/memory_object_types.h>
 #include <vm/pmap.h>
 #include <vm/vm_pager.h>
 #include <mach/memory_object_types.h>

+#include <kern/debug.h>

 
 #include <miscfs/devfs/devfs.h>
 
 
 #include <miscfs/devfs/devfs.h>
 


@@ -109,10 +108,15 @@ static strategy_fcn_t     mdevstrategy;
 static int                             mdevbioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p);
 static int                             mdevcioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p);
 static int                             mdevrw(dev_t dev, struct uio *uio, int ioflag);
 static int                             mdevbioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p);
 static int                             mdevcioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p);
 static int                             mdevrw(dev_t dev, struct uio *uio, int ioflag);

+
+#ifdef CONFIG_MEMDEV_INSECURE
+

 static char *                  nonspace(char *pos, char *end);
 static char *                  getspace(char *pos, char *end);
 static char *                  cvtnum(char *pos, char *end, unsigned int *num);
 
 static char *                  nonspace(char *pos, char *end);
 static char *                  getspace(char *pos, char *end);
 static char *                  cvtnum(char *pos, char *end, unsigned int *num);
 

+#endif /* CONFIG_MEMDEV_INSECURE */
+

 extern void            bcopy_phys(addr64_t from, addr64_t to, vm_size_t bytes);
 extern void            mapping_set_mod(ppnum_t pn);
 extern ppnum_t         pmap_find_phys(pmap_t pmap, addr64_t va);
 extern void            bcopy_phys(addr64_t from, addr64_t to, vm_size_t bytes);
 extern void            mapping_set_mod(ppnum_t pn);
 extern ppnum_t         pmap_find_phys(pmap_t pmap, addr64_t va);


@@ -142,7 +146,7 @@ static struct cdevsw mdevcdevsw = {
        /* ioctl */     mdevcioctl,
        /* stop */      eno_stop,
        /* reset */     eno_reset,
        /* ioctl */     mdevcioctl,
        /* stop */      eno_stop,
        /* reset */     eno_reset,

-       /* ttys */      0,
+       /* ttys */      NULL,

        /* select */    eno_select,
        /* mmap */      eno_mmap,
        /* strategy */  eno_strat,
        /* select */    eno_select,
        /* mmap */      eno_mmap,
        /* strategy */  eno_strat,


@@ -152,7 +156,7 @@ static struct cdevsw mdevcdevsw = {
 };
 
 struct mdev {
 };
 
 struct mdev {

-       vm_offset_t     mdBase;         /* file size in bytes */
+       uint64_t        mdBase;         /* file size in bytes */

        uint32_t        mdSize;         /* file size in bytes */
        int                     mdFlags;        /* flags */
        int                     mdSecsize;      /* sector size */
        uint32_t        mdSize;         /* file size in bytes */
        int                     mdFlags;        /* flags */
        int                     mdSecsize;      /* sector size */


@@ -173,6 +177,7 @@ int mdevCMajor = -1;
 static int mdevioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p, int is_char);
 dev_t mdevadd(int devid, ppnum_t base, unsigned int size, int phys);
 dev_t mdevlookup(int devid);
 static int mdevioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p, int is_char);
 dev_t mdevadd(int devid, ppnum_t base, unsigned int size, int phys);
 dev_t mdevlookup(int devid);

+void mdevremoveall(void);

 
 static int mdevclose(__unused dev_t dev, __unused int flags, 
                                          __unused int devtype, __unused struct proc *p) {
 
 static int mdevclose(__unused dev_t dev, __unused int flags, 
                                          __unused int devtype, __unused struct proc *p) {


@@ -208,7 +213,7 @@ static int mdevrw(dev_t dev, struct uio *uio, __unused int ioflag) {
        
        saveflag = uio->uio_segflg;                                                     /* Remember what the request is */
 #if LP64_DEBUG
        
        saveflag = uio->uio_segflg;                                                     /* Remember what the request is */
 #if LP64_DEBUG

-       if (IS_VALID_UIO_SEGFLG(uio->uio_segflg) == 0) {
+       if (UIO_IS_USER_SPACE(uio) == 0 && UIO_IS_SYS_SPACE(uio) == 0) {

          panic("mdevrw - invalid uio_segflg\n"); 
        }
 #endif /* LP64_DEBUG */
          panic("mdevrw - invalid uio_segflg\n"); 
        }
 #endif /* LP64_DEBUG */


@@ -283,9 +288,9 @@ static void mdevstrategy(struct buf *bp) {
                                lop = min((4096 - (vaddr & 4095)), (4096 - (fvaddr & 4095)));   /* Get smallest amount left on sink and source */
                                csize = min(lop, left);                                 /* Don't move more than we need to */
                                
                                lop = min((4096 - (vaddr & 4095)), (4096 - (fvaddr & 4095)));   /* Get smallest amount left on sink and source */
                                csize = min(lop, left);                                 /* Don't move more than we need to */
                                

-                               pp = pmap_find_phys(kernel_pmap, (addr64_t)((unsigned int)vaddr));      /* Get the sink physical address */
+                               pp = pmap_find_phys(kernel_pmap, (addr64_t)((uintptr_t)vaddr)); /* Get the sink physical address */

                                if(!pp) {                                                               /* Not found, what gives? */
                                if(!pp) {                                                               /* Not found, what gives? */

-                                       panic("mdevstrategy: sink address %016llX not mapped\n", (addr64_t)((unsigned int)vaddr));
+                                       panic("mdevstrategy: sink address %016llX not mapped\n", (addr64_t)((uintptr_t)vaddr));

                                }
                                paddr = (addr64_t)(((addr64_t)pp << 12) | (addr64_t)(vaddr & 4095));    /* Get actual address */
                                bcopy_phys(fvaddr, paddr, csize);               /* Copy this on in */
                                }
                                paddr = (addr64_t)(((addr64_t)pp << 12) | (addr64_t)(vaddr & 4095));    /* Get actual address */
                                bcopy_phys(fvaddr, paddr, csize);               /* Copy this on in */


@@ -309,9 +314,9 @@ static void mdevstrategy(struct buf *bp) {
                                lop = min((4096 - (vaddr & 4095)), (4096 - (fvaddr & 4095)));   /* Get smallest amount left on sink and source */
                                csize = min(lop, left);                                 /* Don't move more than we need to */
                                
                                lop = min((4096 - (vaddr & 4095)), (4096 - (fvaddr & 4095)));   /* Get smallest amount left on sink and source */
                                csize = min(lop, left);                                 /* Don't move more than we need to */
                                

-                               pp = pmap_find_phys(kernel_pmap, (addr64_t)((unsigned int)vaddr));      /* Get the source physical address */
+                               pp = pmap_find_phys(kernel_pmap, (addr64_t)((uintptr_t)vaddr)); /* Get the source physical address */

                                if(!pp) {                                                               /* Not found, what gives? */
                                if(!pp) {                                                               /* Not found, what gives? */

-                                       panic("mdevstrategy: source address %016llX not mapped\n", (addr64_t)((unsigned int)vaddr));
+                                       panic("mdevstrategy: source address %016llX not mapped\n", (addr64_t)((uintptr_t)vaddr));

                                }
                                paddr = (addr64_t)(((addr64_t)pp << 12) | (addr64_t)(vaddr & 4095));    /* Get actual address */
                        
                                }
                                paddr = (addr64_t)(((addr64_t)pp << 12) | (addr64_t)(vaddr & 4095));    /* Get actual address */
                        


@@ -346,7 +351,7 @@ static int mdevcioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc
 static int mdevioctl(dev_t dev, u_long cmd, caddr_t data, __unused int flag, 
                                         struct proc *p, int is_char) {
        int error;
 static int mdevioctl(dev_t dev, u_long cmd, caddr_t data, __unused int flag, 
                                         struct proc *p, int is_char) {
        int error;

-       u_long *f;
+       u_int32_t *f;

        u_int64_t *o;
        int devid;
 
        u_int64_t *o;
        int devid;
 


@@ -357,7 +362,7 @@ static int mdevioctl(dev_t dev, u_long cmd, caddr_t data, __unused int flag,
        error = proc_suser(p);                  /* Are we superman? */
        if (error) return (error);                                                      /* Nope... */
 
        error = proc_suser(p);                  /* Are we superman? */
        if (error) return (error);                                                      /* Nope... */
 

-       f = (u_long*)data;
+       f = (u_int32_t*)data;

        o = (u_int64_t *)data;
 
        switch (cmd) {
        o = (u_int64_t *)data;
 
        switch (cmd) {


@@ -428,6 +433,8 @@ static      int mdevsize(dev_t dev) {
 
 void mdevinit(__unused int the_cnt) {
 
 
 void mdevinit(__unused int the_cnt) {
 

+#ifdef CONFIG_MEMDEV_INSECURE
+

        int devid, phys;
        ppnum_t base;
        unsigned int size;
        int devid, phys;
        ppnum_t base;
        unsigned int size;


@@ -472,10 +479,14 @@ void mdevinit(__unused int the_cnt) {
                dev = mdevadd(devid, base >> 12, size >> 12, phys);     /* Go add the device */ 
        }
 
                dev = mdevadd(devid, base >> 12, size >> 12, phys);     /* Go add the device */ 
        }
 

+#endif /* CONFIG_MEMDEV_INSECURE */
+

        return;
 
 }
 
        return;
 
 }
 

+#ifdef CONFIG_MEMDEV_INSECURE
+

 char *nonspace(char *pos, char *end) {                                 /* Find next non-space in string */
 
        if(pos >= end) return end;                                                      /* Don't go past end */
 char *nonspace(char *pos, char *end) {                                 /* Find next non-space in string */
 
        if(pos >= end) return end;                                                      /* Don't go past end */


@@ -530,6 +541,8 @@ char *cvtnum(char *pos, char *end, unsigned int *num) {             /* Convert to a number
        }
 }
 
        }
 }
 

+#endif /* CONFIG_MEMDEV_INSECURE */
+

 dev_t mdevadd(int devid, ppnum_t base, unsigned int size, int phys) {
        
        int i;
 dev_t mdevadd(int devid, ppnum_t base, unsigned int size, int phys) {
        
        int i;


@@ -543,7 +556,7 @@ dev_t mdevadd(int devid, ppnum_t base, unsigned int size, int phys) {
                                continue;                                                               /* Skip check */
                        }
                        if(!(((base + size -1 ) < mdev[i].mdBase) || ((mdev[i].mdBase + mdev[i].mdSize - 1) < base))) { /* Is there any overlap? */
                                continue;                                                               /* Skip check */
                        }
                        if(!(((base + size -1 ) < mdev[i].mdBase) || ((mdev[i].mdBase + mdev[i].mdSize - 1) < base))) { /* Is there any overlap? */

-                               panic("mdevadd: attempt to add overlapping memory device at %08X-%08X\n", mdev[i].mdBase, mdev[i].mdBase + mdev[i].mdSize - 1);
+                               panic("mdevadd: attempt to add overlapping memory device at %08lX-%08lX\n", (long) mdev[i].mdBase, (long) mdev[i].mdBase + mdev[i].mdSize - 1);

                        }
                }
                if(devid < 0) {                                                                 /* Do we have free slots? */
                        }
                }
                if(devid < 0) {                                                                 /* Do we have free slots? */


@@ -552,10 +565,10 @@ dev_t mdevadd(int devid, ppnum_t base, unsigned int size, int phys) {
        }
        else {
                if(devid >= 16) {                                                               /* Giving us something bogus? */
        }
        else {
                if(devid >= 16) {                                                               /* Giving us something bogus? */

-                       panic("mdevadd: attempt to explicitly add a bogus memory device: &08X\n", devid);
+                       panic("mdevadd: attempt to explicitly add a bogus memory device: %08X\n", devid);

                }
                if(mdev[devid].mdFlags &mdInited) {                             /* Already there? */
                }
                if(mdev[devid].mdFlags &mdInited) {                             /* Already there? */

-                       panic("mdevadd: attempt to explicitly add a previously defined memory device: &08X\n", devid);
+                       panic("mdevadd: attempt to explicitly add a previously defined memory device: %08X\n", devid);

                }
        }
        
                }
        }
        


@@ -610,3 +623,24 @@ dev_t mdevlookup(int devid) {
        if(!(mdev[devid].mdFlags & mdInited)) return -1;        /* This one hasn't been defined */
        return mdev[devid].mdBDev;                                                      /* Return the device number */
 }
        if(!(mdev[devid].mdFlags & mdInited)) return -1;        /* This one hasn't been defined */
        return mdev[devid].mdBDev;                                                      /* Return the device number */
 }

+
+void mdevremoveall(void) {
+
+       int i;
+
+       for(i = 0; i < 16; i++) {
+               if(!(mdev[i].mdFlags & mdInited)) continue;     /* Ignore unused mdevs */
+
+               devfs_remove(mdev[i].mdbdevb);                  /* Remove the block device */
+               devfs_remove(mdev[i].mdcdevb);                  /* Remove the character device */
+
+               mdev[i].mdBase = 0;                             /* Clear the mdev's storage */
+               mdev[i].mdSize = 0;
+               mdev[i].mdSecsize = 0;
+               mdev[i].mdFlags = 0;
+               mdev[i].mdBDev = 0;
+               mdev[i].mdCDev = 0;
+               mdev[i].mdbdevb = 0;
+               mdev[i].mdcdevb = 0;
+       }
+}