ipc.c
上传用户:lgb322
上传日期:2013-02-24
资源大小:30529k
文件大小:4k
源码类别:

嵌入式Linux

开发平台:

Unix_Linux

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