shm.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:17k
源码类别:

Linux/Unix编程

开发平台:

Unix_Linux

  1. /*
  2.  * linux/ipc/shm.c
  3.  * Copyright (C) 1992, 1993 Krishna Balasubramanian
  4.  *  Many improvements/fixes by Bruno Haible.
  5.  * Replaced `struct shm_desc' by `struct vm_area_struct', July 1994.
  6.  * Fixed the shm swap deallocation (shm_unuse()), August 1998 Andrea Arcangeli.
  7.  *
  8.  * /proc/sysvipc/shm support (c) 1999 Dragos Acostachioaie <dragos@iname.com>
  9.  * BIGMEM support, Andrea Arcangeli <andrea@suse.de>
  10.  * SMP thread shm, Jean-Luc Boyard <jean-luc.boyard@siemens.fr>
  11.  * HIGHMEM support, Ingo Molnar <mingo@redhat.com>
  12.  * Make shmmax, shmall, shmmni sysctl'able, Christoph Rohland <cr@sap.com>
  13.  * Shared /dev/zero support, Kanoj Sarcar <kanoj@sgi.com>
  14.  * Move the mm functionality over to mm/shmem.c, Christoph Rohland <cr@sap.com>
  15.  *
  16.  */
  17. #include <linux/config.h>
  18. #include <linux/slab.h>
  19. #include <linux/shm.h>
  20. #include <linux/init.h>
  21. #include <linux/file.h>
  22. #include <linux/mman.h>
  23. #include <linux/proc_fs.h>
  24. #include <asm/uaccess.h>
  25. #include "util.h"
  26. struct shmid_kernel /* private to the kernel */
  27. {
  28. struct kern_ipc_perm shm_perm;
  29. struct file * shm_file;
  30. int id;
  31. unsigned long shm_nattch;
  32. unsigned long shm_segsz;
  33. time_t shm_atim;
  34. time_t shm_dtim;
  35. time_t shm_ctim;
  36. pid_t shm_cprid;
  37. pid_t shm_lprid;
  38. };
  39. #define shm_flags shm_perm.mode
  40. static struct file_operations shm_file_operations;
  41. static struct vm_operations_struct shm_vm_ops;
  42. static struct ipc_ids shm_ids;
  43. #define shm_lock(id) ((struct shmid_kernel*)ipc_lock(&shm_ids,id))
  44. #define shm_unlock(id) ipc_unlock(&shm_ids,id)
  45. #define shm_lockall() ipc_lockall(&shm_ids)
  46. #define shm_unlockall() ipc_unlockall(&shm_ids)
  47. #define shm_get(id) ((struct shmid_kernel*)ipc_get(&shm_ids,id))
  48. #define shm_buildid(id, seq) 
  49. ipc_buildid(&shm_ids, id, seq)
  50. static int newseg (key_t key, int shmflg, size_t size);
  51. static void shm_open (struct vm_area_struct *shmd);
  52. static void shm_close (struct vm_area_struct *shmd);
  53. #ifdef CONFIG_PROC_FS
  54. static int sysvipc_shm_read_proc(char *buffer, char **start, off_t offset, int length, int *eof, void *data);
  55. #endif
  56. size_t shm_ctlmax = SHMMAX;
  57. size_t  shm_ctlall = SHMALL;
  58. int  shm_ctlmni = SHMMNI;
  59. static int shm_tot; /* total number of shared memory pages */
  60. void __init shm_init (void)
  61. {
  62. ipc_init_ids(&shm_ids, 1);
  63. #ifdef CONFIG_PROC_FS
  64. create_proc_read_entry("sysvipc/shm", 0, 0, sysvipc_shm_read_proc, NULL);
  65. #endif
  66. }
  67. static inline int shm_checkid(struct shmid_kernel *s, int id)
  68. {
  69. if (ipc_checkid(&shm_ids,&s->shm_perm,id))
  70. return -EIDRM;
  71. return 0;
  72. }
  73. static inline struct shmid_kernel *shm_rmid(int id)
  74. {
  75. return (struct shmid_kernel *)ipc_rmid(&shm_ids,id);
  76. }
  77. static inline int shm_addid(struct shmid_kernel *shp)
  78. {
  79. return ipc_addid(&shm_ids, &shp->shm_perm, shm_ctlmni+1);
  80. }
  81. static inline void shm_inc (int id) {
  82. struct shmid_kernel *shp;
  83. if(!(shp = shm_lock(id)))
  84. BUG();
  85. shp->shm_atim = CURRENT_TIME;
  86. shp->shm_lprid = current->pid;
  87. shp->shm_nattch++;
  88. shm_unlock(id);
  89. }
  90. /* This is called by fork, once for every shm attach. */
  91. static void shm_open (struct vm_area_struct *shmd)
  92. {
  93. shm_inc (shmd->vm_file->f_dentry->d_inode->i_ino);
  94. }
  95. /*
  96.  * shm_destroy - free the struct shmid_kernel
  97.  *
  98.  * @shp: struct to free
  99.  *
  100.  * It has to be called with shp and shm_ids.sem locked,
  101.  * but returns with shp unlocked and freed.
  102.  */
  103. static void shm_destroy (struct shmid_kernel *shp)
  104. {
  105. shm_tot -= (shp->shm_segsz + PAGE_SIZE - 1) >> PAGE_SHIFT;
  106. shm_rmid (shp->id);
  107. shm_unlock(shp->id);
  108. shmem_lock(shp->shm_file, 0);
  109. fput (shp->shm_file);
  110. kfree (shp);
  111. }
  112. /*
  113.  * remove the attach descriptor shmd.
  114.  * free memory for segment if it is marked destroyed.
  115.  * The descriptor has already been removed from the current->mm->mmap list
  116.  * and will later be kfree()d.
  117.  */
  118. static void shm_close (struct vm_area_struct *shmd)
  119. {
  120. struct file * file = shmd->vm_file;
  121. int id = file->f_dentry->d_inode->i_ino;
  122. struct shmid_kernel *shp;
  123. down (&shm_ids.sem);
  124. /* remove from the list of attaches of the shm segment */
  125. if(!(shp = shm_lock(id)))
  126. BUG();
  127. shp->shm_lprid = current->pid;
  128. shp->shm_dtim = CURRENT_TIME;
  129. shp->shm_nattch--;
  130. if(shp->shm_nattch == 0 &&
  131.    shp->shm_flags & SHM_DEST)
  132. shm_destroy (shp);
  133. else
  134. shm_unlock(id);
  135. up (&shm_ids.sem);
  136. }
  137. static int shm_mmap(struct file * file, struct vm_area_struct * vma)
  138. {
  139. UPDATE_ATIME(file->f_dentry->d_inode);
  140. vma->vm_ops = &shm_vm_ops;
  141. shm_inc(file->f_dentry->d_inode->i_ino);
  142. return 0;
  143. }
  144. static struct file_operations shm_file_operations = {
  145. mmap: shm_mmap
  146. };
  147. static struct vm_operations_struct shm_vm_ops = {
  148. open: shm_open, /* callback for a new vm-area open */
  149. close: shm_close, /* callback for when the vm-area is released */
  150. nopage: shmem_nopage,
  151. };
  152. static int newseg (key_t key, int shmflg, size_t size)
  153. {
  154. int error;
  155. struct shmid_kernel *shp;
  156. int numpages = (size + PAGE_SIZE -1) >> PAGE_SHIFT;
  157. struct file * file;
  158. char name[13];
  159. int id;
  160. if (size < SHMMIN || size > shm_ctlmax)
  161. return -EINVAL;
  162. if (shm_tot + numpages >= shm_ctlall)
  163. return -ENOSPC;
  164. shp = (struct shmid_kernel *) kmalloc (sizeof (*shp), GFP_USER);
  165. if (!shp)
  166. return -ENOMEM;
  167. sprintf (name, "SYSV%08x", key);
  168. file = shmem_file_setup(name, size);
  169. error = PTR_ERR(file);
  170. if (IS_ERR(file))
  171. goto no_file;
  172. error = -ENOSPC;
  173. id = shm_addid(shp);
  174. if(id == -1) 
  175. goto no_id;
  176. shp->shm_perm.key = key;
  177. shp->shm_flags = (shmflg & S_IRWXUGO);
  178. shp->shm_cprid = current->pid;
  179. shp->shm_lprid = 0;
  180. shp->shm_atim = shp->shm_dtim = 0;
  181. shp->shm_ctim = CURRENT_TIME;
  182. shp->shm_segsz = size;
  183. shp->shm_nattch = 0;
  184. shp->id = shm_buildid(id,shp->shm_perm.seq);
  185. shp->shm_file = file;
  186. file->f_dentry->d_inode->i_ino = shp->id;
  187. file->f_op = &shm_file_operations;
  188. shm_tot += numpages;
  189. shm_unlock (id);
  190. return shp->id;
  191. no_id:
  192. fput(file);
  193. no_file:
  194. kfree(shp);
  195. return error;
  196. }
  197. asmlinkage long sys_shmget (key_t key, size_t size, int shmflg)
  198. {
  199. struct shmid_kernel *shp;
  200. int err, id = 0;
  201. down(&shm_ids.sem);
  202. if (key == IPC_PRIVATE) {
  203. err = newseg(key, shmflg, size);
  204. } else if ((id = ipc_findkey(&shm_ids, key)) == -1) {
  205. if (!(shmflg & IPC_CREAT))
  206. err = -ENOENT;
  207. else
  208. err = newseg(key, shmflg, size);
  209. } else if ((shmflg & IPC_CREAT) && (shmflg & IPC_EXCL)) {
  210. err = -EEXIST;
  211. } else {
  212. shp = shm_lock(id);
  213. if(shp==NULL)
  214. BUG();
  215. if (shp->shm_segsz < size)
  216. err = -EINVAL;
  217. else if (ipcperms(&shp->shm_perm, shmflg))
  218. err = -EACCES;
  219. else
  220. err = shm_buildid(id, shp->shm_perm.seq);
  221. shm_unlock(id);
  222. }
  223. up(&shm_ids.sem);
  224. return err;
  225. }
  226. static inline unsigned long copy_shmid_to_user(void *buf, struct shmid64_ds *in, int version)
  227. {
  228. switch(version) {
  229. case IPC_64:
  230. return copy_to_user(buf, in, sizeof(*in));
  231. case IPC_OLD:
  232.     {
  233. struct shmid_ds out;
  234. ipc64_perm_to_ipc_perm(&in->shm_perm, &out.shm_perm);
  235. out.shm_segsz = in->shm_segsz;
  236. out.shm_atime = in->shm_atime;
  237. out.shm_dtime = in->shm_dtime;
  238. out.shm_ctime = in->shm_ctime;
  239. out.shm_cpid = in->shm_cpid;
  240. out.shm_lpid = in->shm_lpid;
  241. out.shm_nattch = in->shm_nattch;
  242. return copy_to_user(buf, &out, sizeof(out));
  243.     }
  244. default:
  245. return -EINVAL;
  246. }
  247. }
  248. struct shm_setbuf {
  249. uid_t uid;
  250. gid_t gid;
  251. mode_t mode;
  252. };
  253. static inline unsigned long copy_shmid_from_user(struct shm_setbuf *out, void *buf, int version)
  254. {
  255. switch(version) {
  256. case IPC_64:
  257.     {
  258. struct shmid64_ds tbuf;
  259. if (copy_from_user(&tbuf, buf, sizeof(tbuf)))
  260. return -EFAULT;
  261. out->uid = tbuf.shm_perm.uid;
  262. out->gid = tbuf.shm_perm.gid;
  263. out->mode = tbuf.shm_flags;
  264. return 0;
  265.     }
  266. case IPC_OLD:
  267.     {
  268. struct shmid_ds tbuf_old;
  269. if (copy_from_user(&tbuf_old, buf, sizeof(tbuf_old)))
  270. return -EFAULT;
  271. out->uid = tbuf_old.shm_perm.uid;
  272. out->gid = tbuf_old.shm_perm.gid;
  273. out->mode = tbuf_old.shm_flags;
  274. return 0;
  275.     }
  276. default:
  277. return -EINVAL;
  278. }
  279. }
  280. static inline unsigned long copy_shminfo_to_user(void *buf, struct shminfo64 *in, int version)
  281. {
  282. switch(version) {
  283. case IPC_64:
  284. return copy_to_user(buf, in, sizeof(*in));
  285. case IPC_OLD:
  286.     {
  287. struct shminfo out;
  288. if(in->shmmax > INT_MAX)
  289. out.shmmax = INT_MAX;
  290. else
  291. out.shmmax = (int)in->shmmax;
  292. out.shmmin = in->shmmin;
  293. out.shmmni = in->shmmni;
  294. out.shmseg = in->shmseg;
  295. out.shmall = in->shmall; 
  296. return copy_to_user(buf, &out, sizeof(out));
  297.     }
  298. default:
  299. return -EINVAL;
  300. }
  301. }
  302. static void shm_get_stat (unsigned long *rss, unsigned long *swp) 
  303. {
  304. struct shmem_inode_info *info;
  305. int i;
  306. *rss = 0;
  307. *swp = 0;
  308. for(i = 0; i <= shm_ids.max_id; i++) {
  309. struct shmid_kernel* shp;
  310. struct inode * inode;
  311. shp = shm_get(i);
  312. if(shp == NULL)
  313. continue;
  314. inode = shp->shm_file->f_dentry->d_inode;
  315. info = SHMEM_I(inode);
  316. spin_lock (&info->lock);
  317. *rss += inode->i_mapping->nrpages;
  318. *swp += info->swapped;
  319. spin_unlock (&info->lock);
  320. }
  321. }
  322. asmlinkage long sys_shmctl (int shmid, int cmd, struct shmid_ds *buf)
  323. {
  324. struct shm_setbuf setbuf;
  325. struct shmid_kernel *shp;
  326. int err, version;
  327. if (cmd < 0 || shmid < 0)
  328. return -EINVAL;
  329. version = ipc_parse_version(&cmd);
  330. switch (cmd) { /* replace with proc interface ? */
  331. case IPC_INFO:
  332. {
  333. struct shminfo64 shminfo;
  334. memset(&shminfo,0,sizeof(shminfo));
  335. shminfo.shmmni = shminfo.shmseg = shm_ctlmni;
  336. shminfo.shmmax = shm_ctlmax;
  337. shminfo.shmall = shm_ctlall;
  338. shminfo.shmmin = SHMMIN;
  339. if(copy_shminfo_to_user (buf, &shminfo, version))
  340. return -EFAULT;
  341. /* reading a integer is always atomic */
  342. err= shm_ids.max_id;
  343. if(err<0)
  344. err = 0;
  345. return err;
  346. }
  347. case SHM_INFO:
  348. {
  349. struct shm_info shm_info;
  350. memset(&shm_info,0,sizeof(shm_info));
  351. down(&shm_ids.sem);
  352. shm_lockall();
  353. shm_info.used_ids = shm_ids.in_use;
  354. shm_get_stat (&shm_info.shm_rss, &shm_info.shm_swp);
  355. shm_info.shm_tot = shm_tot;
  356. shm_info.swap_attempts = 0;
  357. shm_info.swap_successes = 0;
  358. err = shm_ids.max_id;
  359. shm_unlockall();
  360. up(&shm_ids.sem);
  361. if(copy_to_user (buf, &shm_info, sizeof(shm_info)))
  362. return -EFAULT;
  363. return err < 0 ? 0 : err;
  364. }
  365. case SHM_STAT:
  366. case IPC_STAT:
  367. {
  368. struct shmid64_ds tbuf;
  369. int result;
  370. memset(&tbuf, 0, sizeof(tbuf));
  371. shp = shm_lock(shmid);
  372. if(shp==NULL)
  373. return -EINVAL;
  374. if(cmd==SHM_STAT) {
  375. err = -EINVAL;
  376. if (shmid > shm_ids.max_id)
  377. goto out_unlock;
  378. result = shm_buildid(shmid, shp->shm_perm.seq);
  379. } else {
  380. err = shm_checkid(shp,shmid);
  381. if(err)
  382. goto out_unlock;
  383. result = 0;
  384. }
  385. err=-EACCES;
  386. if (ipcperms (&shp->shm_perm, S_IRUGO))
  387. goto out_unlock;
  388. kernel_to_ipc64_perm(&shp->shm_perm, &tbuf.shm_perm);
  389. tbuf.shm_segsz = shp->shm_segsz;
  390. tbuf.shm_atime = shp->shm_atim;
  391. tbuf.shm_dtime = shp->shm_dtim;
  392. tbuf.shm_ctime = shp->shm_ctim;
  393. tbuf.shm_cpid = shp->shm_cprid;
  394. tbuf.shm_lpid = shp->shm_lprid;
  395. tbuf.shm_nattch = shp->shm_nattch;
  396. shm_unlock(shmid);
  397. if(copy_shmid_to_user (buf, &tbuf, version))
  398. return -EFAULT;
  399. return result;
  400. }
  401. case SHM_LOCK:
  402. case SHM_UNLOCK:
  403. {
  404. /* Allow superuser to lock segment in memory */
  405. /* Should the pages be faulted in here or leave it to user? */
  406. /* need to determine interaction with current->swappable */
  407. if (!capable(CAP_IPC_LOCK))
  408. return -EPERM;
  409. shp = shm_lock(shmid);
  410. if(shp==NULL)
  411. return -EINVAL;
  412. err = shm_checkid(shp,shmid);
  413. if(err)
  414. goto out_unlock;
  415. if(cmd==SHM_LOCK) {
  416. shmem_lock(shp->shm_file, 1);
  417. shp->shm_flags |= SHM_LOCKED;
  418. } else {
  419. shmem_lock(shp->shm_file, 0);
  420. shp->shm_flags &= ~SHM_LOCKED;
  421. }
  422. shm_unlock(shmid);
  423. return err;
  424. }
  425. case IPC_RMID:
  426. {
  427. /*
  428.  * We cannot simply remove the file. The SVID states
  429.  * that the block remains until the last person
  430.  * detaches from it, then is deleted. A shmat() on
  431.  * an RMID segment is legal in older Linux and if 
  432.  * we change it apps break...
  433.  *
  434.  * Instead we set a destroyed flag, and then blow
  435.  * the name away when the usage hits zero.
  436.  */
  437. down(&shm_ids.sem);
  438. shp = shm_lock(shmid);
  439. err = -EINVAL;
  440. if (shp == NULL) 
  441. goto out_up;
  442. err = shm_checkid(shp, shmid);
  443. if(err)
  444. goto out_unlock_up;
  445. if (current->euid != shp->shm_perm.uid &&
  446.     current->euid != shp->shm_perm.cuid && 
  447.     !capable(CAP_SYS_ADMIN)) {
  448. err=-EPERM;
  449. goto out_unlock_up;
  450. }
  451. if (shp->shm_nattch){
  452. shp->shm_flags |= SHM_DEST;
  453. /* Do not find it any more */
  454. shp->shm_perm.key = IPC_PRIVATE;
  455. shm_unlock(shmid);
  456. } else
  457. shm_destroy (shp);
  458. up(&shm_ids.sem);
  459. return err;
  460. }
  461. case IPC_SET:
  462. {
  463. if(copy_shmid_from_user (&setbuf, buf, version))
  464. return -EFAULT;
  465. down(&shm_ids.sem);
  466. shp = shm_lock(shmid);
  467. err=-EINVAL;
  468. if(shp==NULL)
  469. goto out_up;
  470. err = shm_checkid(shp,shmid);
  471. if(err)
  472. goto out_unlock_up;
  473. err=-EPERM;
  474. if (current->euid != shp->shm_perm.uid &&
  475.     current->euid != shp->shm_perm.cuid && 
  476.     !capable(CAP_SYS_ADMIN)) {
  477. goto out_unlock_up;
  478. }
  479. shp->shm_perm.uid = setbuf.uid;
  480. shp->shm_perm.gid = setbuf.gid;
  481. shp->shm_flags = (shp->shm_flags & ~S_IRWXUGO)
  482. | (setbuf.mode & S_IRWXUGO);
  483. shp->shm_ctim = CURRENT_TIME;
  484. break;
  485. }
  486. default:
  487. return -EINVAL;
  488. }
  489. err = 0;
  490. out_unlock_up:
  491. shm_unlock(shmid);
  492. out_up:
  493. up(&shm_ids.sem);
  494. return err;
  495. out_unlock:
  496. shm_unlock(shmid);
  497. return err;
  498. }
  499. /*
  500.  * Fix shmaddr, allocate descriptor, map shm, add attach descriptor to lists.
  501.  */
  502. asmlinkage long sys_shmat (int shmid, char *shmaddr, int shmflg, ulong *raddr)
  503. {
  504. struct shmid_kernel *shp;
  505. unsigned long addr;
  506. unsigned long size;
  507. struct file * file;
  508. int    err;
  509. unsigned long flags;
  510. unsigned long prot;
  511. unsigned long o_flags;
  512. int acc_mode;
  513. void *user_addr;
  514. if (shmid < 0)
  515. return -EINVAL;
  516. if ((addr = (ulong)shmaddr)) {
  517. if (addr & (SHMLBA-1)) {
  518. if (shmflg & SHM_RND)
  519. addr &= ~(SHMLBA-1);    /* round down */
  520. else
  521. return -EINVAL;
  522. }
  523. flags = MAP_SHARED | MAP_FIXED;
  524. } else {
  525. if ((shmflg & SHM_REMAP))
  526. return -EINVAL;
  527. flags = MAP_SHARED;
  528. }
  529. if (shmflg & SHM_RDONLY) {
  530. prot = PROT_READ;
  531. o_flags = O_RDONLY;
  532. acc_mode = S_IRUGO;
  533. } else {
  534. prot = PROT_READ | PROT_WRITE;
  535. o_flags = O_RDWR;
  536. acc_mode = S_IRUGO | S_IWUGO;
  537. }
  538. /*
  539.  * We cannot rely on the fs check since SYSV IPC does have an
  540.  * additional creator id...
  541.  */
  542. shp = shm_lock(shmid);
  543. if(shp == NULL)
  544. return -EINVAL;
  545. err = shm_checkid(shp,shmid);
  546. if (err) {
  547. shm_unlock(shmid);
  548. return err;
  549. }
  550. if (ipcperms(&shp->shm_perm, acc_mode)) {
  551. shm_unlock(shmid);
  552. return -EACCES;
  553. }
  554. file = shp->shm_file;
  555. size = file->f_dentry->d_inode->i_size;
  556. shp->shm_nattch++;
  557. shm_unlock(shmid);
  558. down_write(&current->mm->mmap_sem);
  559. if (addr && !(shmflg & SHM_REMAP)) {
  560. user_addr = ERR_PTR(-EINVAL);
  561. if (find_vma_intersection(current->mm, addr, addr + size))
  562. goto invalid;
  563. /*
  564.  * If shm segment goes below stack, make sure there is some
  565.  * space left for the stack to grow (at least 4 pages).
  566.  */
  567. if (addr < current->mm->start_stack &&
  568.     addr > current->mm->start_stack - size - PAGE_SIZE * 5)
  569. goto invalid;
  570. }
  571. user_addr = (void*) do_mmap (file, addr, size, prot, flags, 0);
  572. invalid:
  573. up_write(&current->mm->mmap_sem);
  574. down (&shm_ids.sem);
  575. if(!(shp = shm_lock(shmid)))
  576. BUG();
  577. shp->shm_nattch--;
  578. if(shp->shm_nattch == 0 &&
  579.    shp->shm_flags & SHM_DEST)
  580. shm_destroy (shp);
  581. else
  582. shm_unlock(shmid);
  583. up (&shm_ids.sem);
  584. *raddr = (unsigned long) user_addr;
  585. err = 0;
  586. if (IS_ERR(user_addr))
  587. err = PTR_ERR(user_addr);
  588. return err;
  589. }
  590. /*
  591.  * detach and kill segment if marked destroyed.
  592.  * The work is done in shm_close.
  593.  */
  594. asmlinkage long sys_shmdt (char *shmaddr)
  595. {
  596. struct mm_struct *mm = current->mm;
  597. struct vm_area_struct *shmd, *shmdnext;
  598. int retval = -EINVAL;
  599. down_write(&mm->mmap_sem);
  600. for (shmd = mm->mmap; shmd; shmd = shmdnext) {
  601. shmdnext = shmd->vm_next;
  602. if (shmd->vm_ops == &shm_vm_ops
  603.     && shmd->vm_start - (shmd->vm_pgoff << PAGE_SHIFT) == (ulong) shmaddr) {
  604. do_munmap(mm, shmd->vm_start, shmd->vm_end - shmd->vm_start);
  605. retval = 0;
  606. }
  607. }
  608. up_write(&mm->mmap_sem);
  609. return retval;
  610. }
  611. #ifdef CONFIG_PROC_FS
  612. static int sysvipc_shm_read_proc(char *buffer, char **start, off_t offset, int length, int *eof, void *data)
  613. {
  614. off_t pos = 0;
  615. off_t begin = 0;
  616. int i, len = 0;
  617. down(&shm_ids.sem);
  618. len += sprintf(buffer, "       key      shmid perms       size  cpid  lpid nattch   uid   gid  cuid  cgid      atime      dtime      ctimen");
  619. for(i = 0; i <= shm_ids.max_id; i++) {
  620. struct shmid_kernel* shp;
  621. shp = shm_lock(i);
  622. if(shp!=NULL) {
  623. #define SMALL_STRING "%10d %10d  %4o %10u %5u %5u  %5d %5u %5u %5u %5u %10lu %10lu %10lun"
  624. #define BIG_STRING   "%10d %10d  %4o %21u %5u %5u  %5d %5u %5u %5u %5u %10lu %10lu %10lun"
  625. char *format;
  626. if (sizeof(size_t) <= sizeof(int))
  627. format = SMALL_STRING;
  628. else
  629. format = BIG_STRING;
  630. len += sprintf(buffer + len, format,
  631. shp->shm_perm.key,
  632. shm_buildid(i, shp->shm_perm.seq),
  633. shp->shm_flags,
  634. shp->shm_segsz,
  635. shp->shm_cprid,
  636. shp->shm_lprid,
  637. shp->shm_nattch,
  638. shp->shm_perm.uid,
  639. shp->shm_perm.gid,
  640. shp->shm_perm.cuid,
  641. shp->shm_perm.cgid,
  642. shp->shm_atim,
  643. shp->shm_dtim,
  644. shp->shm_ctim);
  645. shm_unlock(i);
  646. pos += len;
  647. if(pos < offset) {
  648. len = 0;
  649. begin = pos;
  650. }
  651. if(pos > offset + length)
  652. goto done;
  653. }
  654. }
  655. *eof = 1;
  656. done:
  657. up(&shm_ids.sem);
  658. *start = buffer + (offset - begin);
  659. len -= (offset - begin);
  660. if(len > length)
  661. len = length;
  662. if(len < 0)
  663. len = 0;
  664. return len;
  665. }
  666. #endif