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