arch/sparc64/solaris/ipc.c

   1 /* $Id: ipc.c,v 1.5 1999/12/09 00:41:00 davem Exp $
   2  * ipc.c: Solaris IPC emulation
   3  *
   4  * Copyright (C) 1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
   5  */
   6
   7 #include <linux/kernel.h>
   8 #include <linux/types.h>
   9 #include <linux/wait.h>
  10 #include <linux/mm.h>
  11 #include <linux/shm.h>
  12 #include <linux/sem.h>
  13 #include <linux/msg.h>
  14
  15 #include <asm/uaccess.h>
  16 #include <asm/string.h>
  17 #include <asm/ipc.h>
  18
  19 #include "conv.h"
  20
  21 struct solaris_ipc_perm {
  22         s32     uid;
  23         s32     gid;
  24         s32     cuid;
  25         s32     cgid;
  26         u32     mode;
  27         u32     seq;
  28         int     key;
  29         s32     pad[4];
  30 };
  31
  32 struct solaris_shmid_ds {
  33         struct solaris_ipc_perm shm_perm;
  34         int                     shm_segsz;
  35         u32                     shm_amp;
  36         unsigned short          shm_lkcnt;
  37         char                    __padxx[2];
  38         s32                     shm_lpid;
  39         s32                     shm_cpid;
  40         u32                     shm_nattch;
  41         u32                     shm_cnattch;
  42         s32                     shm_atime;
  43         s32                     shm_pad1;
  44         s32                     shm_dtime;
  45         s32                     shm_pad2;
  46         s32                     shm_ctime;
  47         s32                     shm_pad3;
  48         unsigned short          shm_cv;
  49         char                    shm_pad4[2];
  50         u32                     shm_sptas;
  51         s32                     shm_pad5[2];
  52 };
  53
  54 asmlinkage long solaris_shmsys(int cmd, u32 arg1, u32 arg2, u32 arg3)
  55 {
  56         int (*sys_ipc)(unsigned,int,int,unsigned long,void __user *,long) =
  57                 (int (*)(unsigned,int,int,unsigned long,void __user *,long))SYS(ipc);
  58         mm_segment_t old_fs;
  59         unsigned long raddr;
  60         int ret;
  61
  62         switch (cmd) {
  63         case 0: /* shmat */
  64                 old_fs = get_fs();
  65                 set_fs(KERNEL_DS);
  66                 ret = sys_ipc(SHMAT, arg1, arg3 & ~0x4000, (unsigned long)&raddr, A(arg2), 0);
  67                 set_fs(old_fs);
  68                 if (ret >= 0) return (u32)raddr;
  69                 else return ret;
  70         case 1: /* shmctl */
  71                 switch (arg2) {
  72                 case 3: /* SHM_LOCK */
  73                 case 4: /* SHM_UNLOCK */
  74                         return sys_ipc(SHMCTL, arg1, (arg2 == 3) ? SHM_LOCK : SHM_UNLOCK, 0, NULL, 0);
  75                 case 10: /* IPC_RMID */
  76                         return sys_ipc(SHMCTL, arg1, IPC_RMID, 0, NULL, 0);
  77                 case 11: /* IPC_SET */
  78                         {
  79                                 struct shmid_ds s;
  80                                 struct solaris_shmid_ds __user *p = A(arg3);
  81
  82                                 if (get_user (s.shm_perm.uid, &p->shm_perm.uid) ||
  83                                     __get_user (s.shm_perm.gid, &p->shm_perm.gid) ||
  84                                     __get_user (s.shm_perm.mode, &p->shm_perm.mode))
  85                                         return -EFAULT;
  86                                 old_fs = get_fs();
  87                                 set_fs(KERNEL_DS);
  88                                 ret = sys_ipc(SHMCTL, arg1, IPC_SET, 0, &s, 0);
  89                                 set_fs(old_fs);
  90                                 return ret;
  91                         }
  92                 case 12: /* IPC_STAT */
  93                         {
  94                                 struct shmid_ds s;
  95                                 struct solaris_shmid_ds __user *p = A(arg3);
  96
  97                                 old_fs = get_fs();
  98                                 set_fs(KERNEL_DS);
  99                                 ret = sys_ipc(SHMCTL, arg1, IPC_SET, 0, &s, 0);
 100                                 set_fs(old_fs);
 101                                 if (put_user (s.shm_perm.uid, &(p->shm_perm.uid)) ||
 102                                     __put_user (s.shm_perm.gid, &(p->shm_perm.gid)) ||
 103                                     __put_user (s.shm_perm.cuid, &(p->shm_perm.cuid)) ||
 104                                     __put_user (s.shm_perm.cgid, &(p->shm_perm.cgid)) ||
 105                                     __put_user (s.shm_perm.mode, &(p->shm_perm.mode)) ||
 106                                     __put_user (s.shm_perm.seq, &(p->shm_perm.seq)) ||
 107                                     __put_user (s.shm_perm.key, &(p->shm_perm.key)) ||
 108                                     __put_user (s.shm_segsz, &(p->shm_segsz)) ||
 109                                     __put_user (s.shm_lpid, &(p->shm_lpid)) ||
 110                                     __put_user (s.shm_cpid, &(p->shm_cpid)) ||
 111                                     __put_user (s.shm_nattch, &(p->shm_nattch)) ||
 112                                     __put_user (s.shm_atime, &(p->shm_atime)) ||
 113                                     __put_user (s.shm_dtime, &(p->shm_dtime)) ||
 114                                     __put_user (s.shm_ctime, &(p->shm_ctime)))
 115                                         return -EFAULT;
 116                                 return ret;
 117                         }
 118                 default: return -EINVAL;
 119                 }
 120         case 2: /* shmdt */
 121                 return sys_ipc(SHMDT, 0, 0, 0, A(arg1), 0);
 122         case 3: /* shmget */
 123                 return sys_ipc(SHMGET, arg1, arg2, arg3, NULL, 0);
 124         }
 125         return -EINVAL;
 126 }