]> git.saurik.com Git - apple/xnu.git/blobdiff - bsd/kern/posix_shm.c
xnu-3247.1.106.tar.gz
[apple/xnu.git] / bsd / kern / posix_shm.c
index 985538e690659bed2482e9c55834f4d8902ae865..e14baf815e932decbe39ea8506c53805c35e514a 100644 (file)
@@ -85,7 +85,7 @@
 #include <vm/vm_protos.h>
 
 #define f_flag f_fglob->fg_flag
-#define f_type f_fglob->fg_type
+#define f_type f_fglob->fg_ops->fo_type
 #define f_msgcount f_fglob->fg_msgcount
 #define f_cred f_fglob->fg_cred
 #define f_ops f_fglob->fg_ops
@@ -178,7 +178,7 @@ static int pshm_write (struct fileproc *fp, struct uio *uio,
 static int pshm_ioctl (struct fileproc *fp, u_long com,
                    caddr_t data, vfs_context_t ctx);
 static int pshm_select (struct fileproc *fp, int which, void *wql, vfs_context_t ctx);
-static int pshm_close(struct pshmnode *pnode);
+static int pshm_close(struct pshminfo *pinfo, int dropref);
 static int pshm_closefile (struct fileglob *fg, vfs_context_t ctx);
 
 static int pshm_kqfilter(struct fileproc *fp, struct knote *kn, vfs_context_t ctx);
@@ -190,10 +190,18 @@ static void pshm_cache_delete(struct pshmcache *pcp);
 static void pshm_cache_purge(void);
 #endif /* NOT_USED */
 static int pshm_cache_search(struct pshminfo **pshmp, struct pshmname *pnp,
-       struct pshmcache **pcache);
-
-struct         fileops pshmops =
-       { pshm_read, pshm_write, pshm_ioctl, pshm_select, pshm_closefile, pshm_kqfilter, 0 };
+       struct pshmcache **pcache, int addref);
+
+static const struct fileops pshmops = {
+       DTYPE_PSXSHM,
+       pshm_read,
+       pshm_write,
+       pshm_ioctl,
+       pshm_select,
+       pshm_closefile,
+       pshm_kqfilter,
+       0
+};
 
 static lck_grp_t       *psx_shm_subsys_lck_grp;
 static lck_grp_attr_t  *psx_shm_subsys_lck_grp_attr;
@@ -229,7 +237,7 @@ pshm_lock_init( void )
 
 static int
 pshm_cache_search(struct pshminfo **pshmp, struct pshmname *pnp,
-       struct pshmcache **pcache)
+       struct pshmcache **pcache, int addref)
 {
        struct pshmcache *pcp, *nnp;
        struct pshmhashhead *pcpp;
@@ -258,12 +266,13 @@ pshm_cache_search(struct pshminfo **pshmp, struct pshmname *pnp,
                /* TOUCH(ncp); */
                *pshmp = pcp->pshminfo;
                *pcache = pcp;
+               if (addref)
+                       pcp->pshminfo->pshm_usecount++;
                return (-1);
        }
 
        /*
         * We found a "negative" match, ENOENT notifies client of this match.
-        * The nc_vpid field records whether this is a whiteout.
         */
        pshmstats.neghits++;
        return (ENOENT);
@@ -287,16 +296,13 @@ pshm_cache_add(struct pshminfo *pshmp, struct pshmname *pnp, struct pshmcache *p
 
 
        /*  if the entry has already been added by some one else return */
-       if (pshm_cache_search(&dpinfo, pnp, &dpcp) == -1) {
+       if (pshm_cache_search(&dpinfo, pnp, &dpcp, 0) == -1) {
                return(EEXIST);
        }
        pshmnument++;
 
        /*
         * Fill in cache info, if vp is NULL this is a "negative" cache entry.
-        * For negative entries, we have to record whether it is a whiteout.
-        * the whiteout flag is stored in the nc_vpid field which is
-        * otherwise unused.
         */
        pcp->pshminfo = pshmp;
        pcp->pshm_nlen = pnp->pshm_namelen;
@@ -438,6 +444,14 @@ shm_open(proc_t p, struct shm_open_args *uap, int32_t *retval)
        if (error) 
                goto bad;
 
+       cmode &=  ALLPERMS;
+
+       fmode = FFLAGS(uap->oflag);
+       if ((fmode & (FREAD | FWRITE)) == 0) {
+               error = EINVAL;
+               goto bad;
+       }
+
        /*
         * We allocate a new entry if we are less than the maximum
         * allowed and the one at the front of the LRU list is in use.
@@ -466,27 +480,42 @@ shm_open(proc_t p, struct shm_open_args *uap, int32_t *retval)
 
        PSHM_SUBSYS_LOCK();
 
-       error = pshm_cache_search(&pinfo, &nd, &pcache);
+       /*
+        * If we find the entry in the cache, this will take a reference,
+        * allowing us to unlock it for the permissions check.
+        */
+       error = pshm_cache_search(&pinfo, &nd, &pcache, 1);
+
+       PSHM_SUBSYS_UNLOCK();
 
        if (error == ENOENT) {
                error = EINVAL;
-               goto bad_locked;
-
+               goto bad;
        }
+
        if (!error) {
                incache = 0;
-       } else
+               if (fmode & O_CREAT) {
+                       /*  create a new one (commit the allocation) */
+                       pinfo = new_pinfo;
+                       pinfo->pshm_flags = PSHM_DEFINED | PSHM_INCREATE;
+                       pinfo->pshm_usecount = 1; /* existence reference */
+                       pinfo->pshm_mode = cmode;
+                       pinfo->pshm_uid = kauth_getuid();
+                       pinfo->pshm_gid = kauth_getgid();
+                       bcopy(pnbuf, &pinfo->pshm_name[0], pathlen);
+                       pinfo->pshm_name[pathlen]=0;
+#if CONFIG_MACF
+                       error = mac_posixshm_check_create(kauth_cred_get(), nameptr);
+                       if (error) {
+                               goto bad;
+                       }
+                       mac_posixshm_label_associate(kauth_cred_get(), pinfo, nameptr);
+#endif
+               }
+       } else {
                incache = 1;
-       fmode = FFLAGS(uap->oflag);
-       if ((fmode & (FREAD | FWRITE))==0) {
-               error = EINVAL;
-               goto bad_locked;
-       }
-
-       cmode &=  ALLPERMS;
-
-       if (fmode & O_CREAT) {
-               if (incache) {
+               if (fmode & O_CREAT) {
                        /*  already exists */
                        if ((fmode & O_EXCL)) {
                                AUDIT_ARG(posix_ipc_perm, pinfo->pshm_uid,
@@ -495,65 +524,53 @@ shm_open(proc_t p, struct shm_open_args *uap, int32_t *retval)
 
                                /* shm obj exists and opened O_EXCL */
                                error = EEXIST;
-                               goto bad_locked;
+                               goto bad;
                        } 
 
                        if( pinfo->pshm_flags & PSHM_INDELETE) {
                                error = ENOENT;
-                               goto bad_locked;
+                               goto bad;
                        }       
                        AUDIT_ARG(posix_ipc_perm, pinfo->pshm_uid,
                                        pinfo->pshm_gid, pinfo->pshm_mode);
 #if CONFIG_MACF        
-                       if ((error = mac_posixshm_check_open(kauth_cred_get(), pinfo))) {
-                               goto bad_locked;
+                       if ((error = mac_posixshm_check_open(kauth_cred_get(), pinfo, fmode))) {
+                               goto bad;
                        }
 #endif
                        if ( (error = pshm_access(pinfo, fmode, kauth_cred_get(), p)) ) {
-                               goto bad_locked;
+                               goto bad;
                        }
-               } else {
-                       /*  create a new one (commit the allocation) */
-                       pinfo = new_pinfo;
-                       pinfo->pshm_flags = PSHM_DEFINED | PSHM_INCREATE;
-                       pinfo->pshm_usecount = 1; /* existence reference */
-                       pinfo->pshm_mode = cmode;
-                       pinfo->pshm_uid = kauth_cred_getuid(kauth_cred_get());
-                       pinfo->pshm_gid = kauth_cred_get()->cr_gid;
-                       bcopy(pnbuf, &pinfo->pshm_name[0], PSHMNAMLEN);
-                       pinfo->pshm_name[PSHMNAMLEN]=0;
-#if CONFIG_MACF
-                       error = mac_posixshm_check_create(kauth_cred_get(), nameptr);
-                       if (error) {
-                               goto bad_locked;
-                       }
-                       mac_posixshm_label_associate(kauth_cred_get(), pinfo, nameptr);
-#endif
                }
-       } else {
+       }
+       if (!(fmode & O_CREAT)) {
                if (!incache) {
                        /* O_CREAT is not set and the object does not exist */
                        error = ENOENT;
-                       goto bad_locked;
+                       goto bad;
                }
                if( pinfo->pshm_flags & PSHM_INDELETE) {
                        error = ENOENT;
-                       goto bad_locked;
+                       goto bad;
                }       
 #if CONFIG_MACF        
-               if ((error = mac_posixshm_check_open(kauth_cred_get(), pinfo))) {
-                       goto bad_locked;
+               if ((error = mac_posixshm_check_open(kauth_cred_get(), pinfo, fmode))) {
+                       goto bad;
                }
 #endif
 
                if ((error = pshm_access(pinfo, fmode, kauth_cred_get(), p))) {
-                       goto bad_locked;
+                       goto bad;
                }
        }
        if (fmode & O_TRUNC) {
                error = EINVAL;
-               goto bad_locked;
+               goto bad;
        }
+
+
+       PSHM_SUBSYS_LOCK();
+
 #if DIAGNOSTIC 
        if (fmode & FWRITE)
                pinfo->pshm_writecount++;
@@ -565,9 +582,13 @@ shm_open(proc_t p, struct shm_open_args *uap, int32_t *retval)
                if ( (error = pshm_cache_add(pinfo, &nd, pcp)) ) {
                        goto bad_locked;
                }
+               /*
+                * add reference for the new entry; otherwise, we obtained
+                * one from the cache hit earlier.
+                */
+               pinfo->pshm_usecount++;
        }
        pinfo->pshm_flags &= ~PSHM_INCREATE;
-       pinfo->pshm_usecount++; /* extra reference for the new fd */
        new_pnode->pinfo = pinfo;
 
        PSHM_SUBSYS_UNLOCK();
@@ -589,7 +610,6 @@ shm_open(proc_t p, struct shm_open_args *uap, int32_t *retval)
 
        proc_fdlock(p);
        fp->f_flag = fmode & FMASK;
-       fp->f_type = DTYPE_PSXSHM;
        fp->f_ops = &pshmops;
        fp->f_data = (caddr_t)new_pnode;
        *fdflags(p, indx) |= UF_EXCLOSE;
@@ -604,6 +624,17 @@ shm_open(proc_t p, struct shm_open_args *uap, int32_t *retval)
 bad_locked:
        PSHM_SUBSYS_UNLOCK();
 bad:
+       /*
+        * If we obtained the entry from the cache, we need to drop the
+        * reference; holding the reference may have prevented unlinking,
+        * so we need to call pshm_close() to get the full effect.
+        */
+       if (incache) {
+               PSHM_SUBSYS_LOCK();
+               pshm_close(pinfo, 1);
+               PSHM_SUBSYS_UNLOCK();
+       }
+
        if (pcp != NULL)
                FREE(pcp, M_SHM);
 
@@ -633,12 +664,16 @@ pshm_truncate(__unused proc_t p, struct fileproc *fp, __unused int fd,
        struct pshmnode * pnode ;
        kern_return_t kret;
        mem_entry_name_port_t mem_object;
-       mach_vm_size_t size, total_size, alloc_size;
+       mach_vm_size_t total_size, alloc_size;
+       memory_object_size_t mosize;
        struct pshmobj *pshmobj, *pshmobj_next, **pshmobj_next_p;
+       vm_map_t        user_map;
 #if CONFIG_MACF
        int error;
 #endif
 
+       user_map = current_map();
+
        if (fp->f_type != DTYPE_PSXSHM) {
                return(EINVAL);
        }
@@ -658,7 +693,7 @@ pshm_truncate(__unused proc_t p, struct fileproc *fp, __unused int fd,
                return(EINVAL);
        }
 #if CONFIG_MACF
-       error = mac_posixshm_check_truncate(kauth_cred_get(), pinfo, size);
+       error = mac_posixshm_check_truncate(kauth_cred_get(), pinfo, length);
        if (error) {
                PSHM_SUBSYS_UNLOCK();
                return(error);
@@ -666,19 +701,20 @@ pshm_truncate(__unused proc_t p, struct fileproc *fp, __unused int fd,
 #endif
 
        pinfo->pshm_flags |= PSHM_ALLOCATING;
-       total_size = round_page_64(length);
+       total_size = vm_map_round_page(length,
+                                      vm_map_page_mask(user_map));
        pshmobj_next_p = &pinfo->pshm_memobjects;
 
        for (alloc_size = 0;
             alloc_size < total_size;
-            alloc_size += size) {
+            alloc_size += mosize) {
 
                PSHM_SUBSYS_UNLOCK();
 
-               size = MIN(total_size - alloc_size, ANON_MAX_SIZE);
+               mosize = MIN(total_size - alloc_size, ANON_MAX_SIZE);
                kret = mach_make_memory_entry_64(
                        VM_MAP_NULL,
-                       &size,
+                       &mosize,
                        0,
                        MAP_MEM_NAMED_CREATE | VM_PROT_DEFAULT,
                        &mem_object,
@@ -699,14 +735,15 @@ pshm_truncate(__unused proc_t p, struct fileproc *fp, __unused int fd,
                PSHM_SUBSYS_LOCK();
 
                pshmobj->pshmo_memobject = (void *) mem_object;
-               pshmobj->pshmo_size = size;
+               pshmobj->pshmo_size = mosize;
                pshmobj->pshmo_next = NULL;
                
                *pshmobj_next_p = pshmobj;
                pshmobj_next_p = &pshmobj->pshmo_next;
        }
        
-       pinfo->pshm_flags = PSHM_ALLOCATED;
+       pinfo->pshm_flags |= PSHM_ALLOCATED;
+       pinfo->pshm_flags &= ~(PSHM_ALLOCATING);
        pinfo->pshm_length = total_size;
        PSHM_SUBSYS_UNLOCK();
        return(0);
@@ -787,48 +824,23 @@ pshm_stat(struct pshmnode *pnode, void *ub, int isstat64)
 int
 pshm_access(struct pshminfo *pinfo, int mode, kauth_cred_t cred, __unused proc_t p)
 {
-       mode_t mask;
-       int is_member;
+       int mode_req = ((mode & FREAD) ? S_IRUSR : 0) |
+                      ((mode & FWRITE) ? S_IWUSR : 0);
 
        /* Otherwise, user id 0 always gets access. */
        if (!suser(cred, NULL))
                return (0);
 
-       mask = 0;
-
-       /* Otherwise, check the owner. */
-       if (kauth_cred_getuid(cred) == pinfo->pshm_uid) {
-               if (mode & FREAD)
-                       mask |= S_IRUSR;
-               if (mode & FWRITE)
-                       mask |= S_IWUSR;
-               return ((pinfo->pshm_mode & mask) == mask ? 0 : EACCES);
-       }
-
-       /* Otherwise, check the groups. */
-       if (kauth_cred_ismember_gid(cred, pinfo->pshm_gid, &is_member) == 0 && is_member) {
-               if (mode & FREAD)
-                       mask |= S_IRGRP;
-               if (mode & FWRITE)
-                       mask |= S_IWGRP;
-               return ((pinfo->pshm_mode & mask) == mask ? 0 : EACCES);
-       }
-
-       /* Otherwise, check everyone else. */
-       if (mode & FREAD)
-               mask |= S_IROTH;
-       if (mode & FWRITE)
-               mask |= S_IWOTH;
-       return ((pinfo->pshm_mode & mask) == mask ? 0 : EACCES);
+       return(posix_cred_access(cred, pinfo->pshm_uid, pinfo->pshm_gid, pinfo->pshm_mode, mode_req));
 }
 
 int
 pshm_mmap(__unused proc_t p, struct mmap_args *uap, user_addr_t *retval, struct fileproc *fp, off_t pageoff) 
 {
-       mach_vm_offset_t        user_addr = (mach_vm_offset_t)uap->addr;
-       mach_vm_size_t          user_size = (mach_vm_size_t)uap->len ;
-       mach_vm_offset_t        user_start_addr;
-       mach_vm_size_t          map_size, mapped_size;
+       vm_map_offset_t user_addr = (vm_map_offset_t)uap->addr;
+       vm_map_size_t   user_size = (vm_map_size_t)uap->len ;
+       vm_map_offset_t user_start_addr;
+       vm_map_size_t   map_size, mapped_size;
        int prot = uap->prot;
        int flags = uap->flags;
        vm_object_offset_t file_pos = (vm_object_offset_t)uap->pos;
@@ -894,9 +906,11 @@ pshm_mmap(__unused proc_t p, struct mmap_args *uap, user_addr_t *retval, struct
 
        if ((flags & MAP_FIXED) == 0) {
                alloc_flags = VM_FLAGS_ANYWHERE;
-               user_addr = mach_vm_round_page(user_addr); 
+               user_addr = vm_map_round_page(user_addr,
+                                             vm_map_page_mask(user_map)); 
        } else {
-               if (user_addr != mach_vm_trunc_page(user_addr))
+               if (user_addr != vm_map_round_page(user_addr,
+                                                  vm_map_page_mask(user_map)))
                        return (EINVAL);
                /*
                 * We do not get rid of the existing mappings here because
@@ -1051,17 +1065,17 @@ shm_unlink(__unused proc_t p, struct shm_unlink_args *uap,
        }
 
        PSHM_SUBSYS_LOCK();
-       error = pshm_cache_search(&pinfo, &nd, &pcache);
+       error = pshm_cache_search(&pinfo, &nd, &pcache, 0);
 
        if (error == ENOENT) {
                PSHM_SUBSYS_UNLOCK();
-               error = EINVAL;
                goto bad;
 
        }
+       /* During unlink lookup failure also implies ENOENT */ 
        if (!error) {
                PSHM_SUBSYS_UNLOCK();
-               error = EINVAL;
+               error = ENOENT;
                goto bad;
        } else
                incache = 1;
@@ -1095,15 +1109,23 @@ shm_unlink(__unused proc_t p, struct shm_unlink_args *uap,
        AUDIT_ARG(posix_ipc_perm, pinfo->pshm_uid, pinfo->pshm_gid,
                  pinfo->pshm_mode);
 
-       /*
-        * JMM - How should permissions be checked?
+       /* 
+        * following file semantics, unlink should be allowed 
+        * for users with write permission only. 
         */
+       if ( (error = pshm_access(pinfo, FWRITE, kauth_cred_get(), p)) ) {
+               PSHM_SUBSYS_UNLOCK();
+               goto bad;
+       }
 
        pinfo->pshm_flags |= PSHM_INDELETE;
        pshm_cache_delete(pcache);
        pinfo->pshm_flags |= PSHM_REMOVED;
        /* release the existence reference */
        if (!--pinfo->pshm_usecount) {
+#if CONFIG_MACF
+               mac_posixshm_label_destroy(pinfo);
+#endif
                PSHM_SUBSYS_UNLOCK();
                /*
                 * If this is the last reference going away on the object,
@@ -1132,16 +1154,16 @@ bad:
 
 /* already called locked */
 static int
-pshm_close(struct pshmnode *pnode)
+pshm_close(struct pshminfo *pinfo, int dropref)
 {
-       int error=0;
-       struct pshminfo *pinfo;
+       int error = 0;
        struct pshmobj *pshmobj, *pshmobj_next;
 
-       if ((pinfo = pnode->pinfo) == PSHMINFO_NULL)
-               return(EINVAL);
-
-       if ((pinfo->pshm_flags & PSHM_ALLOCATED) != PSHM_ALLOCATED) {
+       /*
+        * If we are dropping the reference we took on the cache object, don't
+        * enforce the allocation requirement.
+        */
+       if ( !dropref && ((pinfo->pshm_flags & PSHM_ALLOCATED) != PSHM_ALLOCATED)) {
                return(EINVAL);
        }
 #if DIAGNOSTIC
@@ -1170,7 +1192,6 @@ pshm_close(struct pshmnode *pnode)
                PSHM_SUBSYS_LOCK();
                FREE(pinfo,M_SHM);
        }
-       FREE(pnode, M_SHM);
        return (error);
 }
 
@@ -1178,11 +1199,20 @@ pshm_close(struct pshmnode *pnode)
 static int
 pshm_closefile(struct fileglob *fg, __unused vfs_context_t ctx)
 {
-       int error;
+       int error = EINVAL;
+       struct pshmnode *pnode;
 
        PSHM_SUBSYS_LOCK();
-       error =  pshm_close(((struct pshmnode *)fg->fg_data));
+
+       if ((pnode = (struct pshmnode *)fg->fg_data) != NULL) {
+               if (pnode->pinfo != PSHMINFO_NULL) {
+                       error =  pshm_close(pnode->pinfo, 0);
+               }
+               FREE(pnode, M_SHM);
+       }
+
        PSHM_SUBSYS_UNLOCK();
+
        return(error);
 }