fix idr_find() locking
[linux-2.6.git] / ipc / msg.c
1 /*
2  * linux/ipc/msg.c
3  * Copyright (C) 1992 Krishna Balasubramanian
4  *
5  * Removed all the remaining kerneld mess
6  * Catch the -EFAULT stuff properly
7  * Use GFP_KERNEL for messages as in 1.2
8  * Fixed up the unchecked user space derefs
9  * Copyright (C) 1998 Alan Cox & Andi Kleen
10  *
11  * /proc/sysvipc/msg support (c) 1999 Dragos Acostachioaie <dragos@iname.com>
12  *
13  * mostly rewritten, threaded and wake-one semantics added
14  * MSGMAX limit removed, sysctl's added
15  * (c) 1999 Manfred Spraul <manfred@colorfullife.com>
16  *
17  * support for audit of ipc object properties and permission changes
18  * Dustin Kirkland <dustin.kirkland@us.ibm.com>
19  *
20  * namespaces support
21  * OpenVZ, SWsoft Inc.
22  * Pavel Emelianov <xemul@openvz.org>
23  */
24
25 #include <linux/capability.h>
26 #include <linux/slab.h>
27 #include <linux/msg.h>
28 #include <linux/spinlock.h>
29 #include <linux/init.h>
30 #include <linux/proc_fs.h>
31 #include <linux/list.h>
32 #include <linux/security.h>
33 #include <linux/sched.h>
34 #include <linux/syscalls.h>
35 #include <linux/audit.h>
36 #include <linux/seq_file.h>
37 #include <linux/rwsem.h>
38 #include <linux/nsproxy.h>
39
40 #include <asm/current.h>
41 #include <asm/uaccess.h>
42 #include "util.h"
43
44 /*
45  * one msg_receiver structure for each sleeping receiver:
46  */
47 struct msg_receiver {
48         struct list_head        r_list;
49         struct task_struct      *r_tsk;
50
51         int                     r_mode;
52         long                    r_msgtype;
53         long                    r_maxsize;
54
55         struct msg_msg          *volatile r_msg;
56 };
57
58 /* one msg_sender for each sleeping sender */
59 struct msg_sender {
60         struct list_head        list;
61         struct task_struct      *tsk;
62 };
63
64 #define SEARCH_ANY              1
65 #define SEARCH_EQUAL            2
66 #define SEARCH_NOTEQUAL         3
67 #define SEARCH_LESSEQUAL        4
68
69 static atomic_t msg_bytes =     ATOMIC_INIT(0);
70 static atomic_t msg_hdrs =      ATOMIC_INIT(0);
71
72 static struct ipc_ids init_msg_ids;
73
74 #define msg_ids(ns)     (*((ns)->ids[IPC_MSG_IDS]))
75
76 #define msg_unlock(msq)         ipc_unlock(&(msq)->q_perm)
77 #define msg_buildid(ns, id, seq) \
78         ipc_buildid(&msg_ids(ns), id, seq)
79
80 static void freeque(struct ipc_namespace *, struct msg_queue *);
81 static int newque(struct ipc_namespace *, struct ipc_params *);
82 #ifdef CONFIG_PROC_FS
83 static int sysvipc_msg_proc_show(struct seq_file *s, void *it);
84 #endif
85
86 static void __msg_init_ns(struct ipc_namespace *ns, struct ipc_ids *ids)
87 {
88         ns->ids[IPC_MSG_IDS] = ids;
89         ns->msg_ctlmax = MSGMAX;
90         ns->msg_ctlmnb = MSGMNB;
91         ns->msg_ctlmni = MSGMNI;
92         ipc_init_ids(ids);
93 }
94
95 int msg_init_ns(struct ipc_namespace *ns)
96 {
97         struct ipc_ids *ids;
98
99         ids = kmalloc(sizeof(struct ipc_ids), GFP_KERNEL);
100         if (ids == NULL)
101                 return -ENOMEM;
102
103         __msg_init_ns(ns, ids);
104         return 0;
105 }
106
107 void msg_exit_ns(struct ipc_namespace *ns)
108 {
109         struct msg_queue *msq;
110         int next_id;
111         int total, in_use;
112
113         down_write(&msg_ids(ns).rw_mutex);
114
115         in_use = msg_ids(ns).in_use;
116
117         for (total = 0, next_id = 0; total < in_use; next_id++) {
118                 msq = idr_find(&msg_ids(ns).ipcs_idr, next_id);
119                 if (msq == NULL)
120                         continue;
121                 ipc_lock_by_ptr(&msq->q_perm);
122                 freeque(ns, msq);
123                 total++;
124         }
125
126         up_write(&msg_ids(ns).rw_mutex);
127
128         kfree(ns->ids[IPC_MSG_IDS]);
129         ns->ids[IPC_MSG_IDS] = NULL;
130 }
131
132 void __init msg_init(void)
133 {
134         __msg_init_ns(&init_ipc_ns, &init_msg_ids);
135         ipc_init_proc_interface("sysvipc/msg",
136                                 "       key      msqid perms      cbytes       qnum lspid lrpid   uid   gid  cuid  cgid      stime      rtime      ctime\n",
137                                 IPC_MSG_IDS, sysvipc_msg_proc_show);
138 }
139
140 /*
141  * This routine is called in the paths where the rw_mutex is held to protect
142  * access to the idr tree.
143  */
144 static inline struct msg_queue *msg_lock_check_down(struct ipc_namespace *ns,
145                                                 int id)
146 {
147         struct kern_ipc_perm *ipcp = ipc_lock_check_down(&msg_ids(ns), id);
148
149         return container_of(ipcp, struct msg_queue, q_perm);
150 }
151
152 /*
153  * msg_lock_(check_) routines are called in the paths where the rw_mutex
154  * is not held.
155  */
156 static inline struct msg_queue *msg_lock(struct ipc_namespace *ns, int id)
157 {
158         struct kern_ipc_perm *ipcp = ipc_lock(&msg_ids(ns), id);
159
160         return container_of(ipcp, struct msg_queue, q_perm);
161 }
162
163 static inline struct msg_queue *msg_lock_check(struct ipc_namespace *ns,
164                                                 int id)
165 {
166         struct kern_ipc_perm *ipcp = ipc_lock_check(&msg_ids(ns), id);
167
168         return container_of(ipcp, struct msg_queue, q_perm);
169 }
170
171 static inline void msg_rmid(struct ipc_namespace *ns, struct msg_queue *s)
172 {
173         ipc_rmid(&msg_ids(ns), &s->q_perm);
174 }
175
176 /**
177  * newque - Create a new msg queue
178  * @ns: namespace
179  * @params: ptr to the structure that contains the key and msgflg
180  *
181  * Called with msg_ids.rw_mutex held (writer)
182  */
183 static int newque(struct ipc_namespace *ns, struct ipc_params *params)
184 {
185         struct msg_queue *msq;
186         int id, retval;
187         key_t key = params->key;
188         int msgflg = params->flg;
189
190         msq = ipc_rcu_alloc(sizeof(*msq));
191         if (!msq)
192                 return -ENOMEM;
193
194         msq->q_perm.mode = msgflg & S_IRWXUGO;
195         msq->q_perm.key = key;
196
197         msq->q_perm.security = NULL;
198         retval = security_msg_queue_alloc(msq);
199         if (retval) {
200                 ipc_rcu_putref(msq);
201                 return retval;
202         }
203
204         /*
205          * ipc_addid() locks msq
206          */
207         id = ipc_addid(&msg_ids(ns), &msq->q_perm, ns->msg_ctlmni);
208         if (id == -1) {
209                 security_msg_queue_free(msq);
210                 ipc_rcu_putref(msq);
211                 return -ENOSPC;
212         }
213
214         msq->q_perm.id = msg_buildid(ns, id, msq->q_perm.seq);
215         msq->q_stime = msq->q_rtime = 0;
216         msq->q_ctime = get_seconds();
217         msq->q_cbytes = msq->q_qnum = 0;
218         msq->q_qbytes = ns->msg_ctlmnb;
219         msq->q_lspid = msq->q_lrpid = 0;
220         INIT_LIST_HEAD(&msq->q_messages);
221         INIT_LIST_HEAD(&msq->q_receivers);
222         INIT_LIST_HEAD(&msq->q_senders);
223
224         msg_unlock(msq);
225
226         return msq->q_perm.id;
227 }
228
229 static inline void ss_add(struct msg_queue *msq, struct msg_sender *mss)
230 {
231         mss->tsk = current;
232         current->state = TASK_INTERRUPTIBLE;
233         list_add_tail(&mss->list, &msq->q_senders);
234 }
235
236 static inline void ss_del(struct msg_sender *mss)
237 {
238         if (mss->list.next != NULL)
239                 list_del(&mss->list);
240 }
241
242 static void ss_wakeup(struct list_head *h, int kill)
243 {
244         struct list_head *tmp;
245
246         tmp = h->next;
247         while (tmp != h) {
248                 struct msg_sender *mss;
249
250                 mss = list_entry(tmp, struct msg_sender, list);
251                 tmp = tmp->next;
252                 if (kill)
253                         mss->list.next = NULL;
254                 wake_up_process(mss->tsk);
255         }
256 }
257
258 static void expunge_all(struct msg_queue *msq, int res)
259 {
260         struct list_head *tmp;
261
262         tmp = msq->q_receivers.next;
263         while (tmp != &msq->q_receivers) {
264                 struct msg_receiver *msr;
265
266                 msr = list_entry(tmp, struct msg_receiver, r_list);
267                 tmp = tmp->next;
268                 msr->r_msg = NULL;
269                 wake_up_process(msr->r_tsk);
270                 smp_mb();
271                 msr->r_msg = ERR_PTR(res);
272         }
273 }
274
275 /*
276  * freeque() wakes up waiters on the sender and receiver waiting queue,
277  * removes the message queue from message queue ID IDR, and cleans up all the
278  * messages associated with this queue.
279  *
280  * msg_ids.rw_mutex (writer) and the spinlock for this message queue are held
281  * before freeque() is called. msg_ids.rw_mutex remains locked on exit.
282  */
283 static void freeque(struct ipc_namespace *ns, struct msg_queue *msq)
284 {
285         struct list_head *tmp;
286
287         expunge_all(msq, -EIDRM);
288         ss_wakeup(&msq->q_senders, 1);
289         msg_rmid(ns, msq);
290         msg_unlock(msq);
291
292         tmp = msq->q_messages.next;
293         while (tmp != &msq->q_messages) {
294                 struct msg_msg *msg = list_entry(tmp, struct msg_msg, m_list);
295
296                 tmp = tmp->next;
297                 atomic_dec(&msg_hdrs);
298                 free_msg(msg);
299         }
300         atomic_sub(msq->q_cbytes, &msg_bytes);
301         security_msg_queue_free(msq);
302         ipc_rcu_putref(msq);
303 }
304
305 /*
306  * Called with msg_ids.rw_mutex and ipcp locked.
307  */
308 static inline int msg_security(struct kern_ipc_perm *ipcp, int msgflg)
309 {
310         struct msg_queue *msq = container_of(ipcp, struct msg_queue, q_perm);
311
312         return security_msg_queue_associate(msq, msgflg);
313 }
314
315 asmlinkage long sys_msgget(key_t key, int msgflg)
316 {
317         struct ipc_namespace *ns;
318         struct ipc_ops msg_ops;
319         struct ipc_params msg_params;
320
321         ns = current->nsproxy->ipc_ns;
322
323         msg_ops.getnew = newque;
324         msg_ops.associate = msg_security;
325         msg_ops.more_checks = NULL;
326
327         msg_params.key = key;
328         msg_params.flg = msgflg;
329
330         return ipcget(ns, &msg_ids(ns), &msg_ops, &msg_params);
331 }
332
333 static inline unsigned long
334 copy_msqid_to_user(void __user *buf, struct msqid64_ds *in, int version)
335 {
336         switch(version) {
337         case IPC_64:
338                 return copy_to_user(buf, in, sizeof(*in));
339         case IPC_OLD:
340         {
341                 struct msqid_ds out;
342
343                 memset(&out, 0, sizeof(out));
344
345                 ipc64_perm_to_ipc_perm(&in->msg_perm, &out.msg_perm);
346
347                 out.msg_stime           = in->msg_stime;
348                 out.msg_rtime           = in->msg_rtime;
349                 out.msg_ctime           = in->msg_ctime;
350
351                 if (in->msg_cbytes > USHRT_MAX)
352                         out.msg_cbytes  = USHRT_MAX;
353                 else
354                         out.msg_cbytes  = in->msg_cbytes;
355                 out.msg_lcbytes         = in->msg_cbytes;
356
357                 if (in->msg_qnum > USHRT_MAX)
358                         out.msg_qnum    = USHRT_MAX;
359                 else
360                         out.msg_qnum    = in->msg_qnum;
361
362                 if (in->msg_qbytes > USHRT_MAX)
363                         out.msg_qbytes  = USHRT_MAX;
364                 else
365                         out.msg_qbytes  = in->msg_qbytes;
366                 out.msg_lqbytes         = in->msg_qbytes;
367
368                 out.msg_lspid           = in->msg_lspid;
369                 out.msg_lrpid           = in->msg_lrpid;
370
371                 return copy_to_user(buf, &out, sizeof(out));
372         }
373         default:
374                 return -EINVAL;
375         }
376 }
377
378 struct msq_setbuf {
379         unsigned long   qbytes;
380         uid_t           uid;
381         gid_t           gid;
382         mode_t          mode;
383 };
384
385 static inline unsigned long
386 copy_msqid_from_user(struct msq_setbuf *out, void __user *buf, int version)
387 {
388         switch(version) {
389         case IPC_64:
390         {
391                 struct msqid64_ds tbuf;
392
393                 if (copy_from_user(&tbuf, buf, sizeof(tbuf)))
394                         return -EFAULT;
395
396                 out->qbytes             = tbuf.msg_qbytes;
397                 out->uid                = tbuf.msg_perm.uid;
398                 out->gid                = tbuf.msg_perm.gid;
399                 out->mode               = tbuf.msg_perm.mode;
400
401                 return 0;
402         }
403         case IPC_OLD:
404         {
405                 struct msqid_ds tbuf_old;
406
407                 if (copy_from_user(&tbuf_old, buf, sizeof(tbuf_old)))
408                         return -EFAULT;
409
410                 out->uid                = tbuf_old.msg_perm.uid;
411                 out->gid                = tbuf_old.msg_perm.gid;
412                 out->mode               = tbuf_old.msg_perm.mode;
413
414                 if (tbuf_old.msg_qbytes == 0)
415                         out->qbytes     = tbuf_old.msg_lqbytes;
416                 else
417                         out->qbytes     = tbuf_old.msg_qbytes;
418
419                 return 0;
420         }
421         default:
422                 return -EINVAL;
423         }
424 }
425
426 asmlinkage long sys_msgctl(int msqid, int cmd, struct msqid_ds __user *buf)
427 {
428         struct kern_ipc_perm *ipcp;
429         struct msq_setbuf uninitialized_var(setbuf);
430         struct msg_queue *msq;
431         int err, version;
432         struct ipc_namespace *ns;
433
434         if (msqid < 0 || cmd < 0)
435                 return -EINVAL;
436
437         version = ipc_parse_version(&cmd);
438         ns = current->nsproxy->ipc_ns;
439
440         switch (cmd) {
441         case IPC_INFO:
442         case MSG_INFO:
443         {
444                 struct msginfo msginfo;
445                 int max_id;
446
447                 if (!buf)
448                         return -EFAULT;
449                 /*
450                  * We must not return kernel stack data.
451                  * due to padding, it's not enough
452                  * to set all member fields.
453                  */
454                 err = security_msg_queue_msgctl(NULL, cmd);
455                 if (err)
456                         return err;
457
458                 memset(&msginfo, 0, sizeof(msginfo));
459                 msginfo.msgmni = ns->msg_ctlmni;
460                 msginfo.msgmax = ns->msg_ctlmax;
461                 msginfo.msgmnb = ns->msg_ctlmnb;
462                 msginfo.msgssz = MSGSSZ;
463                 msginfo.msgseg = MSGSEG;
464                 down_read(&msg_ids(ns).rw_mutex);
465                 if (cmd == MSG_INFO) {
466                         msginfo.msgpool = msg_ids(ns).in_use;
467                         msginfo.msgmap = atomic_read(&msg_hdrs);
468                         msginfo.msgtql = atomic_read(&msg_bytes);
469                 } else {
470                         msginfo.msgmap = MSGMAP;
471                         msginfo.msgpool = MSGPOOL;
472                         msginfo.msgtql = MSGTQL;
473                 }
474                 max_id = ipc_get_maxid(&msg_ids(ns));
475                 up_read(&msg_ids(ns).rw_mutex);
476                 if (copy_to_user(buf, &msginfo, sizeof(struct msginfo)))
477                         return -EFAULT;
478                 return (max_id < 0) ? 0 : max_id;
479         }
480         case MSG_STAT:  /* msqid is an index rather than a msg queue id */
481         case IPC_STAT:
482         {
483                 struct msqid64_ds tbuf;
484                 int success_return;
485
486                 if (!buf)
487                         return -EFAULT;
488
489                 if (cmd == MSG_STAT) {
490                         msq = msg_lock(ns, msqid);
491                         if (IS_ERR(msq))
492                                 return PTR_ERR(msq);
493                         success_return = msq->q_perm.id;
494                 } else {
495                         msq = msg_lock_check(ns, msqid);
496                         if (IS_ERR(msq))
497                                 return PTR_ERR(msq);
498                         success_return = 0;
499                 }
500                 err = -EACCES;
501                 if (ipcperms(&msq->q_perm, S_IRUGO))
502                         goto out_unlock;
503
504                 err = security_msg_queue_msgctl(msq, cmd);
505                 if (err)
506                         goto out_unlock;
507
508                 memset(&tbuf, 0, sizeof(tbuf));
509
510                 kernel_to_ipc64_perm(&msq->q_perm, &tbuf.msg_perm);
511                 tbuf.msg_stime  = msq->q_stime;
512                 tbuf.msg_rtime  = msq->q_rtime;
513                 tbuf.msg_ctime  = msq->q_ctime;
514                 tbuf.msg_cbytes = msq->q_cbytes;
515                 tbuf.msg_qnum   = msq->q_qnum;
516                 tbuf.msg_qbytes = msq->q_qbytes;
517                 tbuf.msg_lspid  = msq->q_lspid;
518                 tbuf.msg_lrpid  = msq->q_lrpid;
519                 msg_unlock(msq);
520                 if (copy_msqid_to_user(buf, &tbuf, version))
521                         return -EFAULT;
522                 return success_return;
523         }
524         case IPC_SET:
525                 if (!buf)
526                         return -EFAULT;
527                 if (copy_msqid_from_user(&setbuf, buf, version))
528                         return -EFAULT;
529                 break;
530         case IPC_RMID:
531                 break;
532         default:
533                 return  -EINVAL;
534         }
535
536         down_write(&msg_ids(ns).rw_mutex);
537         msq = msg_lock_check_down(ns, msqid);
538         if (IS_ERR(msq)) {
539                 err = PTR_ERR(msq);
540                 goto out_up;
541         }
542
543         ipcp = &msq->q_perm;
544
545         err = audit_ipc_obj(ipcp);
546         if (err)
547                 goto out_unlock_up;
548         if (cmd == IPC_SET) {
549                 err = audit_ipc_set_perm(setbuf.qbytes, setbuf.uid, setbuf.gid,
550                                          setbuf.mode);
551                 if (err)
552                         goto out_unlock_up;
553         }
554
555         err = -EPERM;
556         if (current->euid != ipcp->cuid &&
557             current->euid != ipcp->uid && !capable(CAP_SYS_ADMIN))
558                 /* We _could_ check for CAP_CHOWN above, but we don't */
559                 goto out_unlock_up;
560
561         err = security_msg_queue_msgctl(msq, cmd);
562         if (err)
563                 goto out_unlock_up;
564
565         switch (cmd) {
566         case IPC_SET:
567         {
568                 err = -EPERM;
569                 if (setbuf.qbytes > ns->msg_ctlmnb && !capable(CAP_SYS_RESOURCE))
570                         goto out_unlock_up;
571
572                 msq->q_qbytes = setbuf.qbytes;
573
574                 ipcp->uid = setbuf.uid;
575                 ipcp->gid = setbuf.gid;
576                 ipcp->mode = (ipcp->mode & ~S_IRWXUGO) |
577                              (S_IRWXUGO & setbuf.mode);
578                 msq->q_ctime = get_seconds();
579                 /* sleeping receivers might be excluded by
580                  * stricter permissions.
581                  */
582                 expunge_all(msq, -EAGAIN);
583                 /* sleeping senders might be able to send
584                  * due to a larger queue size.
585                  */
586                 ss_wakeup(&msq->q_senders, 0);
587                 msg_unlock(msq);
588                 break;
589         }
590         case IPC_RMID:
591                 freeque(ns, msq);
592                 break;
593         }
594         err = 0;
595 out_up:
596         up_write(&msg_ids(ns).rw_mutex);
597         return err;
598 out_unlock_up:
599         msg_unlock(msq);
600         goto out_up;
601 out_unlock:
602         msg_unlock(msq);
603         return err;
604 }
605
606 static int testmsg(struct msg_msg *msg, long type, int mode)
607 {
608         switch(mode)
609         {
610                 case SEARCH_ANY:
611                         return 1;
612                 case SEARCH_LESSEQUAL:
613                         if (msg->m_type <=type)
614                                 return 1;
615                         break;
616                 case SEARCH_EQUAL:
617                         if (msg->m_type == type)
618                                 return 1;
619                         break;
620                 case SEARCH_NOTEQUAL:
621                         if (msg->m_type != type)
622                                 return 1;
623                         break;
624         }
625         return 0;
626 }
627
628 static inline int pipelined_send(struct msg_queue *msq, struct msg_msg *msg)
629 {
630         struct list_head *tmp;
631
632         tmp = msq->q_receivers.next;
633         while (tmp != &msq->q_receivers) {
634                 struct msg_receiver *msr;
635
636                 msr = list_entry(tmp, struct msg_receiver, r_list);
637                 tmp = tmp->next;
638                 if (testmsg(msg, msr->r_msgtype, msr->r_mode) &&
639                     !security_msg_queue_msgrcv(msq, msg, msr->r_tsk,
640                                                msr->r_msgtype, msr->r_mode)) {
641
642                         list_del(&msr->r_list);
643                         if (msr->r_maxsize < msg->m_ts) {
644                                 msr->r_msg = NULL;
645                                 wake_up_process(msr->r_tsk);
646                                 smp_mb();
647                                 msr->r_msg = ERR_PTR(-E2BIG);
648                         } else {
649                                 msr->r_msg = NULL;
650                                 msq->q_lrpid = task_pid_vnr(msr->r_tsk);
651                                 msq->q_rtime = get_seconds();
652                                 wake_up_process(msr->r_tsk);
653                                 smp_mb();
654                                 msr->r_msg = msg;
655
656                                 return 1;
657                         }
658                 }
659         }
660         return 0;
661 }
662
663 long do_msgsnd(int msqid, long mtype, void __user *mtext,
664                 size_t msgsz, int msgflg)
665 {
666         struct msg_queue *msq;
667         struct msg_msg *msg;
668         int err;
669         struct ipc_namespace *ns;
670
671         ns = current->nsproxy->ipc_ns;
672
673         if (msgsz > ns->msg_ctlmax || (long) msgsz < 0 || msqid < 0)
674                 return -EINVAL;
675         if (mtype < 1)
676                 return -EINVAL;
677
678         msg = load_msg(mtext, msgsz);
679         if (IS_ERR(msg))
680                 return PTR_ERR(msg);
681
682         msg->m_type = mtype;
683         msg->m_ts = msgsz;
684
685         msq = msg_lock_check(ns, msqid);
686         if (IS_ERR(msq)) {
687                 err = PTR_ERR(msq);
688                 goto out_free;
689         }
690
691         for (;;) {
692                 struct msg_sender s;
693
694                 err = -EACCES;
695                 if (ipcperms(&msq->q_perm, S_IWUGO))
696                         goto out_unlock_free;
697
698                 err = security_msg_queue_msgsnd(msq, msg, msgflg);
699                 if (err)
700                         goto out_unlock_free;
701
702                 if (msgsz + msq->q_cbytes <= msq->q_qbytes &&
703                                 1 + msq->q_qnum <= msq->q_qbytes) {
704                         break;
705                 }
706
707                 /* queue full, wait: */
708                 if (msgflg & IPC_NOWAIT) {
709                         err = -EAGAIN;
710                         goto out_unlock_free;
711                 }
712                 ss_add(msq, &s);
713                 ipc_rcu_getref(msq);
714                 msg_unlock(msq);
715                 schedule();
716
717                 ipc_lock_by_ptr(&msq->q_perm);
718                 ipc_rcu_putref(msq);
719                 if (msq->q_perm.deleted) {
720                         err = -EIDRM;
721                         goto out_unlock_free;
722                 }
723                 ss_del(&s);
724
725                 if (signal_pending(current)) {
726                         err = -ERESTARTNOHAND;
727                         goto out_unlock_free;
728                 }
729         }
730
731         msq->q_lspid = task_tgid_vnr(current);
732         msq->q_stime = get_seconds();
733
734         if (!pipelined_send(msq, msg)) {
735                 /* noone is waiting for this message, enqueue it */
736                 list_add_tail(&msg->m_list, &msq->q_messages);
737                 msq->q_cbytes += msgsz;
738                 msq->q_qnum++;
739                 atomic_add(msgsz, &msg_bytes);
740                 atomic_inc(&msg_hdrs);
741         }
742
743         err = 0;
744         msg = NULL;
745
746 out_unlock_free:
747         msg_unlock(msq);
748 out_free:
749         if (msg != NULL)
750                 free_msg(msg);
751         return err;
752 }
753
754 asmlinkage long
755 sys_msgsnd(int msqid, struct msgbuf __user *msgp, size_t msgsz, int msgflg)
756 {
757         long mtype;
758
759         if (get_user(mtype, &msgp->mtype))
760                 return -EFAULT;
761         return do_msgsnd(msqid, mtype, msgp->mtext, msgsz, msgflg);
762 }
763
764 static inline int convert_mode(long *msgtyp, int msgflg)
765 {
766         /*
767          *  find message of correct type.
768          *  msgtyp = 0 => get first.
769          *  msgtyp > 0 => get first message of matching type.
770          *  msgtyp < 0 => get message with least type must be < abs(msgtype).
771          */
772         if (*msgtyp == 0)
773                 return SEARCH_ANY;
774         if (*msgtyp < 0) {
775                 *msgtyp = -*msgtyp;
776                 return SEARCH_LESSEQUAL;
777         }
778         if (msgflg & MSG_EXCEPT)
779                 return SEARCH_NOTEQUAL;
780         return SEARCH_EQUAL;
781 }
782
783 long do_msgrcv(int msqid, long *pmtype, void __user *mtext,
784                 size_t msgsz, long msgtyp, int msgflg)
785 {
786         struct msg_queue *msq;
787         struct msg_msg *msg;
788         int mode;
789         struct ipc_namespace *ns;
790
791         if (msqid < 0 || (long) msgsz < 0)
792                 return -EINVAL;
793         mode = convert_mode(&msgtyp, msgflg);
794         ns = current->nsproxy->ipc_ns;
795
796         msq = msg_lock_check(ns, msqid);
797         if (IS_ERR(msq))
798                 return PTR_ERR(msq);
799
800         for (;;) {
801                 struct msg_receiver msr_d;
802                 struct list_head *tmp;
803
804                 msg = ERR_PTR(-EACCES);
805                 if (ipcperms(&msq->q_perm, S_IRUGO))
806                         goto out_unlock;
807
808                 msg = ERR_PTR(-EAGAIN);
809                 tmp = msq->q_messages.next;
810                 while (tmp != &msq->q_messages) {
811                         struct msg_msg *walk_msg;
812
813                         walk_msg = list_entry(tmp, struct msg_msg, m_list);
814                         if (testmsg(walk_msg, msgtyp, mode) &&
815                             !security_msg_queue_msgrcv(msq, walk_msg, current,
816                                                        msgtyp, mode)) {
817
818                                 msg = walk_msg;
819                                 if (mode == SEARCH_LESSEQUAL &&
820                                                 walk_msg->m_type != 1) {
821                                         msg = walk_msg;
822                                         msgtyp = walk_msg->m_type - 1;
823                                 } else {
824                                         msg = walk_msg;
825                                         break;
826                                 }
827                         }
828                         tmp = tmp->next;
829                 }
830                 if (!IS_ERR(msg)) {
831                         /*
832                          * Found a suitable message.
833                          * Unlink it from the queue.
834                          */
835                         if ((msgsz < msg->m_ts) && !(msgflg & MSG_NOERROR)) {
836                                 msg = ERR_PTR(-E2BIG);
837                                 goto out_unlock;
838                         }
839                         list_del(&msg->m_list);
840                         msq->q_qnum--;
841                         msq->q_rtime = get_seconds();
842                         msq->q_lrpid = task_tgid_vnr(current);
843                         msq->q_cbytes -= msg->m_ts;
844                         atomic_sub(msg->m_ts, &msg_bytes);
845                         atomic_dec(&msg_hdrs);
846                         ss_wakeup(&msq->q_senders, 0);
847                         msg_unlock(msq);
848                         break;
849                 }
850                 /* No message waiting. Wait for a message */
851                 if (msgflg & IPC_NOWAIT) {
852                         msg = ERR_PTR(-ENOMSG);
853                         goto out_unlock;
854                 }
855                 list_add_tail(&msr_d.r_list, &msq->q_receivers);
856                 msr_d.r_tsk = current;
857                 msr_d.r_msgtype = msgtyp;
858                 msr_d.r_mode = mode;
859                 if (msgflg & MSG_NOERROR)
860                         msr_d.r_maxsize = INT_MAX;
861                 else
862                         msr_d.r_maxsize = msgsz;
863                 msr_d.r_msg = ERR_PTR(-EAGAIN);
864                 current->state = TASK_INTERRUPTIBLE;
865                 msg_unlock(msq);
866
867                 schedule();
868
869                 /* Lockless receive, part 1:
870                  * Disable preemption.  We don't hold a reference to the queue
871                  * and getting a reference would defeat the idea of a lockless
872                  * operation, thus the code relies on rcu to guarantee the
873                  * existance of msq:
874                  * Prior to destruction, expunge_all(-EIRDM) changes r_msg.
875                  * Thus if r_msg is -EAGAIN, then the queue not yet destroyed.
876                  * rcu_read_lock() prevents preemption between reading r_msg
877                  * and the spin_lock() inside ipc_lock_by_ptr().
878                  */
879                 rcu_read_lock();
880
881                 /* Lockless receive, part 2:
882                  * Wait until pipelined_send or expunge_all are outside of
883                  * wake_up_process(). There is a race with exit(), see
884                  * ipc/mqueue.c for the details.
885                  */
886                 msg = (struct msg_msg*)msr_d.r_msg;
887                 while (msg == NULL) {
888                         cpu_relax();
889                         msg = (struct msg_msg *)msr_d.r_msg;
890                 }
891
892                 /* Lockless receive, part 3:
893                  * If there is a message or an error then accept it without
894                  * locking.
895                  */
896                 if (msg != ERR_PTR(-EAGAIN)) {
897                         rcu_read_unlock();
898                         break;
899                 }
900
901                 /* Lockless receive, part 3:
902                  * Acquire the queue spinlock.
903                  */
904                 ipc_lock_by_ptr(&msq->q_perm);
905                 rcu_read_unlock();
906
907                 /* Lockless receive, part 4:
908                  * Repeat test after acquiring the spinlock.
909                  */
910                 msg = (struct msg_msg*)msr_d.r_msg;
911                 if (msg != ERR_PTR(-EAGAIN))
912                         goto out_unlock;
913
914                 list_del(&msr_d.r_list);
915                 if (signal_pending(current)) {
916                         msg = ERR_PTR(-ERESTARTNOHAND);
917 out_unlock:
918                         msg_unlock(msq);
919                         break;
920                 }
921         }
922         if (IS_ERR(msg))
923                 return PTR_ERR(msg);
924
925         msgsz = (msgsz > msg->m_ts) ? msg->m_ts : msgsz;
926         *pmtype = msg->m_type;
927         if (store_msg(mtext, msg, msgsz))
928                 msgsz = -EFAULT;
929
930         free_msg(msg);
931
932         return msgsz;
933 }
934
935 asmlinkage long sys_msgrcv(int msqid, struct msgbuf __user *msgp, size_t msgsz,
936                            long msgtyp, int msgflg)
937 {
938         long err, mtype;
939
940         err =  do_msgrcv(msqid, &mtype, msgp->mtext, msgsz, msgtyp, msgflg);
941         if (err < 0)
942                 goto out;
943
944         if (put_user(mtype, &msgp->mtype))
945                 err = -EFAULT;
946 out:
947         return err;
948 }
949
950 #ifdef CONFIG_PROC_FS
951 static int sysvipc_msg_proc_show(struct seq_file *s, void *it)
952 {
953         struct msg_queue *msq = it;
954
955         return seq_printf(s,
956                         "%10d %10d  %4o  %10lu %10lu %5u %5u %5u %5u %5u %5u %10lu %10lu %10lu\n",
957                         msq->q_perm.key,
958                         msq->q_perm.id,
959                         msq->q_perm.mode,
960                         msq->q_cbytes,
961                         msq->q_qnum,
962                         msq->q_lspid,
963                         msq->q_lrpid,
964                         msq->q_perm.uid,
965                         msq->q_perm.gid,
966                         msq->q_perm.cuid,
967                         msq->q_perm.cgid,
968                         msq->q_stime,
969                         msq->q_rtime,
970                         msq->q_ctime);
971 }
972 #endif