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
  21 #include <linux/capability.h>
  22 #include <linux/config.h>
  23 #include <linux/slab.h>
  24 #include <linux/msg.h>
  25 #include <linux/spinlock.h>
  26 #include <linux/init.h>
  27 #include <linux/proc_fs.h>
  28 #include <linux/list.h>
  29 #include <linux/security.h>
  30 #include <linux/sched.h>
  31 #include <linux/syscalls.h>
  32 #include <linux/audit.h>
  33 #include <linux/seq_file.h>
  34 #include <linux/mutex.h>
  35 #include <linux/vs_base.h>
  36
  37 #include <asm/current.h>
  38 #include <asm/uaccess.h>
  39 #include "util.h"
  40
  41 /* sysctl: */
  42 int msg_ctlmax = MSGMAX;
  43 int msg_ctlmnb = MSGMNB;
  44 int msg_ctlmni = MSGMNI;
  45
  46 /* one msg_receiver structure for each sleeping receiver */
  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 msg_ids;
  73
  74 #define msg_lock(id)    ((struct msg_queue*)ipc_lock(&msg_ids,id))
  75 #define msg_unlock(msq) ipc_unlock(&(msq)->q_perm)
  76 #define msg_rmid(id)    ((struct msg_queue*)ipc_rmid(&msg_ids,id))
  77 #define msg_checkid(msq, msgid) \
  78         ipc_checkid(&msg_ids,&msq->q_perm,msgid)
  79 #define msg_buildid(id, seq) \
  80         ipc_buildid(&msg_ids, id, seq)
  81
  82 static void freeque (struct msg_queue *msq, int id);
  83 static int newque (key_t key, int msgflg);
  84 #ifdef CONFIG_PROC_FS
  85 static int sysvipc_msg_proc_show(struct seq_file *s, void *it);
  86 #endif
  87
  88 void __init msg_init (void)
  89 {
  90         ipc_init_ids(&msg_ids,msg_ctlmni);
  91         ipc_init_proc_interface("sysvipc/msg",
  92                                 "       key      msqid perms      cbytes       qnum lspid lrpid   uid   gid  cuid  cgid      stime      rtime      ctime\n",
  93                                 &msg_ids,
  94                                 sysvipc_msg_proc_show);
  95 }
  96
  97 static int newque (key_t key, int msgflg)
  98 {
  99         int id;
 100         int retval;
 101         struct msg_queue *msq;
 102
 103         msq  = ipc_rcu_alloc(sizeof(*msq));
 104         if (!msq)
 105                 return -ENOMEM;
 106
 107         msq->q_perm.mode = (msgflg & S_IRWXUGO);
 108         msq->q_perm.key = key;
 109         msq->q_perm.xid = vx_current_xid();
 110
 111         msq->q_perm.security = NULL;
 112         retval = security_msg_queue_alloc(msq);
 113         if (retval) {
 114                 ipc_rcu_putref(msq);
 115                 return retval;
 116         }
 117
 118         id = ipc_addid(&msg_ids, &msq->q_perm, msg_ctlmni);
 119         if(id == -1) {
 120                 security_msg_queue_free(msq);
 121                 ipc_rcu_putref(msq);
 122                 return -ENOSPC;
 123         }
 124
 125         msq->q_id = msg_buildid(id,msq->q_perm.seq);
 126         msq->q_stime = msq->q_rtime = 0;
 127         msq->q_ctime = get_seconds();
 128         msq->q_cbytes = msq->q_qnum = 0;
 129         msq->q_qbytes = msg_ctlmnb;
 130         msq->q_lspid = msq->q_lrpid = 0;
 131         INIT_LIST_HEAD(&msq->q_messages);
 132         INIT_LIST_HEAD(&msq->q_receivers);
 133         INIT_LIST_HEAD(&msq->q_senders);
 134         msg_unlock(msq);
 135
 136         return msq->q_id;
 137 }
 138
 139 static inline void ss_add(struct msg_queue* msq, struct msg_sender* mss)
 140 {
 141         mss->tsk=current;
 142         current->state=TASK_INTERRUPTIBLE;
 143         list_add_tail(&mss->list,&msq->q_senders);
 144 }
 145
 146 static inline void ss_del(struct msg_sender* mss)
 147 {
 148         if(mss->list.next != NULL)
 149                 list_del(&mss->list);
 150 }
 151
 152 static void ss_wakeup(struct list_head* h, int kill)
 153 {
 154         struct list_head *tmp;
 155
 156         tmp = h->next;
 157         while (tmp != h) {
 158                 struct msg_sender* mss;
 159
 160                 mss = list_entry(tmp,struct msg_sender,list);
 161                 tmp = tmp->next;
 162                 if(kill)
 163                         mss->list.next=NULL;
 164                 wake_up_process(mss->tsk);
 165         }
 166 }
 167
 168 static void expunge_all(struct msg_queue* msq, int res)
 169 {
 170         struct list_head *tmp;
 171
 172         tmp = msq->q_receivers.next;
 173         while (tmp != &msq->q_receivers) {
 174                 struct msg_receiver* msr;
 175
 176                 msr = list_entry(tmp,struct msg_receiver,r_list);
 177                 tmp = tmp->next;
 178                 msr->r_msg = NULL;
 179                 wake_up_process(msr->r_tsk);
 180                 smp_mb();
 181                 msr->r_msg = ERR_PTR(res);
 182         }
 183 }
 184 /*
 185  * freeque() wakes up waiters on the sender and receiver waiting queue,
 186  * removes the message queue from message queue ID
 187  * array, and cleans up all the messages associated with this queue.
 188  *
 189  * msg_ids.mutex and the spinlock for this message queue is hold
 190  * before freeque() is called. msg_ids.mutex remains locked on exit.
 191  */
 192 static void freeque (struct msg_queue *msq, int id)
 193 {
 194         struct list_head *tmp;
 195
 196         expunge_all(msq,-EIDRM);
 197         ss_wakeup(&msq->q_senders,1);
 198         msq = msg_rmid(id);
 199         msg_unlock(msq);
 200
 201         tmp = msq->q_messages.next;
 202         while(tmp != &msq->q_messages) {
 203                 struct msg_msg* msg = list_entry(tmp,struct msg_msg,m_list);
 204                 tmp = tmp->next;
 205                 atomic_dec(&msg_hdrs);
 206                 free_msg(msg);
 207         }
 208         atomic_sub(msq->q_cbytes, &msg_bytes);
 209         security_msg_queue_free(msq);
 210         ipc_rcu_putref(msq);
 211 }
 212
 213 asmlinkage long sys_msgget (key_t key, int msgflg)
 214 {
 215         int id, ret = -EPERM;
 216         struct msg_queue *msq;
 217
 218         mutex_lock(&msg_ids.mutex);
 219         if (key == IPC_PRIVATE)
 220                 ret = newque(key, msgflg);
 221         else if ((id = ipc_findkey(&msg_ids, key)) == -1) { /* key not used */
 222                 if (!(msgflg & IPC_CREAT))
 223                         ret = -ENOENT;
 224                 else
 225                         ret = newque(key, msgflg);
 226         } else if (msgflg & IPC_CREAT && msgflg & IPC_EXCL) {
 227                 ret = -EEXIST;
 228         } else {
 229                 msq = msg_lock(id);
 230                 BUG_ON(msq==NULL);
 231                 if (ipcperms(&msq->q_perm, msgflg))
 232                         ret = -EACCES;
 233                 else {
 234                         int qid = msg_buildid(id, msq->q_perm.seq);
 235                         ret = security_msg_queue_associate(msq, msgflg);
 236                         if (!ret)
 237                                 ret = qid;
 238                 }
 239                 msg_unlock(msq);
 240         }
 241         mutex_unlock(&msg_ids.mutex);
 242         return ret;
 243 }
 244
 245 static inline unsigned long copy_msqid_to_user(void __user *buf, struct msqid64_ds *in, int version)
 246 {
 247         switch(version) {
 248         case IPC_64:
 249                 return copy_to_user (buf, in, sizeof(*in));
 250         case IPC_OLD:
 251             {
 252                 struct msqid_ds out;
 253
 254                 memset(&out,0,sizeof(out));
 255
 256                 ipc64_perm_to_ipc_perm(&in->msg_perm, &out.msg_perm);
 257
 258                 out.msg_stime           = in->msg_stime;
 259                 out.msg_rtime           = in->msg_rtime;
 260                 out.msg_ctime           = in->msg_ctime;
 261
 262                 if(in->msg_cbytes > USHRT_MAX)
 263                         out.msg_cbytes  = USHRT_MAX;
 264                 else
 265                         out.msg_cbytes  = in->msg_cbytes;
 266                 out.msg_lcbytes         = in->msg_cbytes;
 267
 268                 if(in->msg_qnum > USHRT_MAX)
 269                         out.msg_qnum    = USHRT_MAX;
 270                 else
 271                         out.msg_qnum    = in->msg_qnum;
 272
 273                 if(in->msg_qbytes > USHRT_MAX)
 274                         out.msg_qbytes  = USHRT_MAX;
 275                 else
 276                         out.msg_qbytes  = in->msg_qbytes;
 277                 out.msg_lqbytes         = in->msg_qbytes;
 278
 279                 out.msg_lspid           = in->msg_lspid;
 280                 out.msg_lrpid           = in->msg_lrpid;
 281
 282                 return copy_to_user (buf, &out, sizeof(out));
 283             }
 284         default:
 285                 return -EINVAL;
 286         }
 287 }
 288
 289 struct msq_setbuf {
 290         unsigned long   qbytes;
 291         uid_t           uid;
 292         gid_t           gid;
 293         mode_t          mode;
 294 };
 295
 296 static inline unsigned long copy_msqid_from_user(struct msq_setbuf *out, void __user *buf, int version)
 297 {
 298         switch(version) {
 299         case IPC_64:
 300             {
 301                 struct msqid64_ds tbuf;
 302
 303                 if (copy_from_user (&tbuf, buf, sizeof (tbuf)))
 304                         return -EFAULT;
 305
 306                 out->qbytes             = tbuf.msg_qbytes;
 307                 out->uid                = tbuf.msg_perm.uid;
 308                 out->gid                = tbuf.msg_perm.gid;
 309                 out->mode               = tbuf.msg_perm.mode;
 310
 311                 return 0;
 312             }
 313         case IPC_OLD:
 314             {
 315                 struct msqid_ds tbuf_old;
 316
 317                 if (copy_from_user (&tbuf_old, buf, sizeof (tbuf_old)))
 318                         return -EFAULT;
 319
 320                 out->uid                = tbuf_old.msg_perm.uid;
 321                 out->gid                = tbuf_old.msg_perm.gid;
 322                 out->mode               = tbuf_old.msg_perm.mode;
 323
 324                 if(tbuf_old.msg_qbytes == 0)
 325                         out->qbytes     = tbuf_old.msg_lqbytes;
 326                 else
 327                         out->qbytes     = tbuf_old.msg_qbytes;
 328
 329                 return 0;
 330             }
 331         default:
 332                 return -EINVAL;
 333         }
 334 }
 335
 336 asmlinkage long sys_msgctl (int msqid, int cmd, struct msqid_ds __user *buf)
 337 {
 338         int err, version;
 339         struct msg_queue *msq;
 340         struct msq_setbuf setbuf;
 341         struct kern_ipc_perm *ipcp;
 342
 343         if (msqid < 0 || cmd < 0)
 344                 return -EINVAL;
 345
 346         version = ipc_parse_version(&cmd);
 347
 348         switch (cmd) {
 349         case IPC_INFO:
 350         case MSG_INFO:
 351         {
 352                 struct msginfo msginfo;
 353                 int max_id;
 354                 if (!buf)
 355                         return -EFAULT;
 356                 /* We must not return kernel stack data.
 357                  * due to padding, it's not enough
 358                  * to set all member fields.
 359                  */
 360
 361                 err = security_msg_queue_msgctl(NULL, cmd);
 362                 if (err)
 363                         return err;
 364
 365                 memset(&msginfo,0,sizeof(msginfo));
 366                 msginfo.msgmni = msg_ctlmni;
 367                 msginfo.msgmax = msg_ctlmax;
 368                 msginfo.msgmnb = msg_ctlmnb;
 369                 msginfo.msgssz = MSGSSZ;
 370                 msginfo.msgseg = MSGSEG;
 371                 mutex_lock(&msg_ids.mutex);
 372                 if (cmd == MSG_INFO) {
 373                         msginfo.msgpool = msg_ids.in_use;
 374                         msginfo.msgmap = atomic_read(&msg_hdrs);
 375                         msginfo.msgtql = atomic_read(&msg_bytes);
 376                 } else {
 377                         msginfo.msgmap = MSGMAP;
 378                         msginfo.msgpool = MSGPOOL;
 379                         msginfo.msgtql = MSGTQL;
 380                 }
 381                 max_id = msg_ids.max_id;
 382                 mutex_unlock(&msg_ids.mutex);
 383                 if (copy_to_user (buf, &msginfo, sizeof(struct msginfo)))
 384                         return -EFAULT;
 385                 return (max_id < 0) ? 0: max_id;
 386         }
 387         case MSG_STAT:
 388         case IPC_STAT:
 389         {
 390                 struct msqid64_ds tbuf;
 391                 int success_return;
 392                 if (!buf)
 393                         return -EFAULT;
 394                 if(cmd == MSG_STAT && msqid >= msg_ids.entries->size)
 395                         return -EINVAL;
 396
 397                 memset(&tbuf,0,sizeof(tbuf));
 398
 399                 msq = msg_lock(msqid);
 400                 if (msq == NULL)
 401                         return -EINVAL;
 402
 403                 if(cmd == MSG_STAT) {
 404                         success_return = msg_buildid(msqid, msq->q_perm.seq);
 405                 } else {
 406                         err = -EIDRM;
 407                         if (msg_checkid(msq,msqid))
 408                                 goto out_unlock;
 409                         success_return = 0;
 410                 }
 411                 err = -EACCES;
 412                 if (ipcperms (&msq->q_perm, S_IRUGO))
 413                         goto out_unlock;
 414
 415                 err = security_msg_queue_msgctl(msq, cmd);
 416                 if (err)
 417                         goto out_unlock;
 418
 419                 kernel_to_ipc64_perm(&msq->q_perm, &tbuf.msg_perm);
 420                 tbuf.msg_stime  = msq->q_stime;
 421                 tbuf.msg_rtime  = msq->q_rtime;
 422                 tbuf.msg_ctime  = msq->q_ctime;
 423                 tbuf.msg_cbytes = msq->q_cbytes;
 424                 tbuf.msg_qnum   = msq->q_qnum;
 425                 tbuf.msg_qbytes = msq->q_qbytes;
 426                 tbuf.msg_lspid  = msq->q_lspid;
 427                 tbuf.msg_lrpid  = msq->q_lrpid;
 428                 msg_unlock(msq);
 429                 if (copy_msqid_to_user(buf, &tbuf, version))
 430                         return -EFAULT;
 431                 return success_return;
 432         }
 433         case IPC_SET:
 434                 if (!buf)
 435                         return -EFAULT;
 436                 if (copy_msqid_from_user (&setbuf, buf, version))
 437                         return -EFAULT;
 438                 break;
 439         case IPC_RMID:
 440                 break;
 441         default:
 442                 return  -EINVAL;
 443         }
 444
 445         mutex_lock(&msg_ids.mutex);
 446         msq = msg_lock(msqid);
 447         err=-EINVAL;
 448         if (msq == NULL)
 449                 goto out_up;
 450
 451         err = -EIDRM;
 452         if (msg_checkid(msq,msqid))
 453                 goto out_unlock_up;
 454         ipcp = &msq->q_perm;
 455
 456         err = audit_ipc_obj(ipcp);
 457         if (err)
 458                 goto out_unlock_up;
 459
 460         err = -EPERM;
 461         if (current->euid != ipcp->cuid &&
 462             current->euid != ipcp->uid && !capable(CAP_SYS_ADMIN))
 463             /* We _could_ check for CAP_CHOWN above, but we don't */
 464                 goto out_unlock_up;
 465
 466         err = security_msg_queue_msgctl(msq, cmd);
 467         if (err)
 468                 goto out_unlock_up;
 469
 470         switch (cmd) {
 471         case IPC_SET:
 472         {
 473                 err = audit_ipc_set_perm(setbuf.qbytes, setbuf.uid, setbuf.gid, setbuf.mode, ipcp);
 474                 if (err)
 475                         goto out_unlock_up;
 476
 477                 err = -EPERM;
 478                 if (setbuf.qbytes > msg_ctlmnb && !capable(CAP_SYS_RESOURCE))
 479                         goto out_unlock_up;
 480
 481                 msq->q_qbytes = setbuf.qbytes;
 482
 483                 ipcp->uid = setbuf.uid;
 484                 ipcp->gid = setbuf.gid;
 485                 ipcp->mode = (ipcp->mode & ~S_IRWXUGO) |
 486                         (S_IRWXUGO & setbuf.mode);
 487                 msq->q_ctime = get_seconds();
 488                 /* sleeping receivers might be excluded by
 489                  * stricter permissions.
 490                  */
 491                 expunge_all(msq,-EAGAIN);
 492                 /* sleeping senders might be able to send
 493                  * due to a larger queue size.
 494                  */
 495                 ss_wakeup(&msq->q_senders,0);
 496                 msg_unlock(msq);
 497                 break;
 498         }
 499         case IPC_RMID:
 500                 freeque (msq, msqid);
 501                 break;
 502         }
 503         err = 0;
 504 out_up:
 505         mutex_unlock(&msg_ids.mutex);
 506         return err;
 507 out_unlock_up:
 508         msg_unlock(msq);
 509         goto out_up;
 510 out_unlock:
 511         msg_unlock(msq);
 512         return err;
 513 }
 514
 515 static int testmsg(struct msg_msg* msg,long type,int mode)
 516 {
 517         switch(mode)
 518         {
 519                 case SEARCH_ANY:
 520                         return 1;
 521                 case SEARCH_LESSEQUAL:
 522                         if(msg->m_type <=type)
 523                                 return 1;
 524                         break;
 525                 case SEARCH_EQUAL:
 526                         if(msg->m_type == type)
 527                                 return 1;
 528                         break;
 529                 case SEARCH_NOTEQUAL:
 530                         if(msg->m_type != type)
 531                                 return 1;
 532                         break;
 533         }
 534         return 0;
 535 }
 536
 537 static inline int pipelined_send(struct msg_queue* msq, struct msg_msg* msg)
 538 {
 539         struct list_head* tmp;
 540
 541         tmp = msq->q_receivers.next;
 542         while (tmp != &msq->q_receivers) {
 543                 struct msg_receiver* msr;
 544                 msr = list_entry(tmp,struct msg_receiver,r_list);
 545                 tmp = tmp->next;
 546                 if(testmsg(msg,msr->r_msgtype,msr->r_mode) &&
 547                    !security_msg_queue_msgrcv(msq, msg, msr->r_tsk, msr->r_msgtype, msr->r_mode)) {
 548                         list_del(&msr->r_list);
 549                         if(msr->r_maxsize < msg->m_ts) {
 550                                 msr->r_msg = NULL;
 551                                 wake_up_process(msr->r_tsk);
 552                                 smp_mb();
 553                                 msr->r_msg = ERR_PTR(-E2BIG);
 554                         } else {
 555                                 msr->r_msg = NULL;
 556                                 msq->q_lrpid = msr->r_tsk->pid;
 557                                 msq->q_rtime = get_seconds();
 558                                 wake_up_process(msr->r_tsk);
 559                                 smp_mb();
 560                                 msr->r_msg = msg;
 561                                 return 1;
 562                         }
 563                 }
 564         }
 565         return 0;
 566 }
 567
 568 asmlinkage long sys_msgsnd (int msqid, struct msgbuf __user *msgp, size_t msgsz, int msgflg)
 569 {
 570         struct msg_queue *msq;
 571         struct msg_msg *msg;
 572         long mtype;
 573         int err;
 574
 575         if (msgsz > msg_ctlmax || (long) msgsz < 0 || msqid < 0)
 576                 return -EINVAL;
 577         if (get_user(mtype, &msgp->mtype))
 578                 return -EFAULT;
 579         if (mtype < 1)
 580                 return -EINVAL;
 581
 582         msg = load_msg(msgp->mtext, msgsz);
 583         if(IS_ERR(msg))
 584                 return PTR_ERR(msg);
 585
 586         msg->m_type = mtype;
 587         msg->m_ts = msgsz;
 588
 589         msq = msg_lock(msqid);
 590         err=-EINVAL;
 591         if(msq==NULL)
 592                 goto out_free;
 593
 594         err= -EIDRM;
 595         if (msg_checkid(msq,msqid))
 596                 goto out_unlock_free;
 597
 598         for (;;) {
 599                 struct msg_sender s;
 600
 601                 err=-EACCES;
 602                 if (ipcperms(&msq->q_perm, S_IWUGO))
 603                         goto out_unlock_free;
 604
 605                 err = security_msg_queue_msgsnd(msq, msg, msgflg);
 606                 if (err)
 607                         goto out_unlock_free;
 608
 609                 if(msgsz + msq->q_cbytes <= msq->q_qbytes &&
 610                                 1 + msq->q_qnum <= msq->q_qbytes) {
 611                         break;
 612                 }
 613
 614                 /* queue full, wait: */
 615                 if(msgflg&IPC_NOWAIT) {
 616                         err=-EAGAIN;
 617                         goto out_unlock_free;
 618                 }
 619                 ss_add(msq, &s);
 620                 ipc_rcu_getref(msq);
 621                 msg_unlock(msq);
 622                 schedule();
 623
 624                 ipc_lock_by_ptr(&msq->q_perm);
 625                 ipc_rcu_putref(msq);
 626                 if (msq->q_perm.deleted) {
 627                         err = -EIDRM;
 628                         goto out_unlock_free;
 629                 }
 630                 ss_del(&s);
 631
 632                 if (signal_pending(current)) {
 633                         err=-ERESTARTNOHAND;
 634                         goto out_unlock_free;
 635                 }
 636         }
 637
 638         msq->q_lspid = current->tgid;
 639         msq->q_stime = get_seconds();
 640
 641         if(!pipelined_send(msq,msg)) {
 642                 /* noone is waiting for this message, enqueue it */
 643                 list_add_tail(&msg->m_list,&msq->q_messages);
 644                 msq->q_cbytes += msgsz;
 645                 msq->q_qnum++;
 646                 atomic_add(msgsz,&msg_bytes);
 647                 atomic_inc(&msg_hdrs);
 648         }
 649
 650         err = 0;
 651         msg = NULL;
 652
 653 out_unlock_free:
 654         msg_unlock(msq);
 655 out_free:
 656         if(msg!=NULL)
 657                 free_msg(msg);
 658         return err;
 659 }
 660
 661 static inline int convert_mode(long* msgtyp, int msgflg)
 662 {
 663         /*
 664          *  find message of correct type.
 665          *  msgtyp = 0 => get first.
 666          *  msgtyp > 0 => get first message of matching type.
 667          *  msgtyp < 0 => get message with least type must be < abs(msgtype).
 668          */
 669         if(*msgtyp==0)
 670                 return SEARCH_ANY;
 671         if(*msgtyp<0) {
 672                 *msgtyp=-(*msgtyp);
 673                 return SEARCH_LESSEQUAL;
 674         }
 675         if(msgflg & MSG_EXCEPT)
 676                 return SEARCH_NOTEQUAL;
 677         return SEARCH_EQUAL;
 678 }
 679
 680 asmlinkage long sys_msgrcv (int msqid, struct msgbuf __user *msgp, size_t msgsz,
 681                             long msgtyp, int msgflg)
 682 {
 683         struct msg_queue *msq;
 684         struct msg_msg *msg;
 685         int mode;
 686
 687         if (msqid < 0 || (long) msgsz < 0)
 688                 return -EINVAL;
 689         mode = convert_mode(&msgtyp,msgflg);
 690
 691         msq = msg_lock(msqid);
 692         if(msq==NULL)
 693                 return -EINVAL;
 694
 695         msg = ERR_PTR(-EIDRM);
 696         if (msg_checkid(msq,msqid))
 697                 goto out_unlock;
 698
 699         for (;;) {
 700                 struct msg_receiver msr_d;
 701                 struct list_head* tmp;
 702
 703                 msg = ERR_PTR(-EACCES);
 704                 if (ipcperms (&msq->q_perm, S_IRUGO))
 705                         goto out_unlock;
 706
 707                 msg = ERR_PTR(-EAGAIN);
 708                 tmp = msq->q_messages.next;
 709                 while (tmp != &msq->q_messages) {
 710                         struct msg_msg *walk_msg;
 711                         walk_msg = list_entry(tmp,struct msg_msg,m_list);
 712                         if(testmsg(walk_msg,msgtyp,mode) &&
 713                            !security_msg_queue_msgrcv(msq, walk_msg, current, msgtyp, mode)) {
 714                                 msg = walk_msg;
 715                                 if(mode == SEARCH_LESSEQUAL && walk_msg->m_type != 1) {
 716                                         msg=walk_msg;
 717                                         msgtyp=walk_msg->m_type-1;
 718                                 } else {
 719                                         msg=walk_msg;
 720                                         break;
 721                                 }
 722                         }
 723                         tmp = tmp->next;
 724                 }
 725                 if(!IS_ERR(msg)) {
 726                         /* Found a suitable message. Unlink it from the queue. */
 727                         if ((msgsz < msg->m_ts) && !(msgflg & MSG_NOERROR)) {
 728                                 msg = ERR_PTR(-E2BIG);
 729                                 goto out_unlock;
 730                         }
 731                         list_del(&msg->m_list);
 732                         msq->q_qnum--;
 733                         msq->q_rtime = get_seconds();
 734                         msq->q_lrpid = current->tgid;
 735                         msq->q_cbytes -= msg->m_ts;
 736                         atomic_sub(msg->m_ts,&msg_bytes);
 737                         atomic_dec(&msg_hdrs);
 738                         ss_wakeup(&msq->q_senders,0);
 739                         msg_unlock(msq);
 740                         break;
 741                 }
 742                 /* No message waiting. Wait for a message */
 743                 if (msgflg & IPC_NOWAIT) {
 744                         msg = ERR_PTR(-ENOMSG);
 745                         goto out_unlock;
 746                 }
 747                 list_add_tail(&msr_d.r_list,&msq->q_receivers);
 748                 msr_d.r_tsk = current;
 749                 msr_d.r_msgtype = msgtyp;
 750                 msr_d.r_mode = mode;
 751                 if(msgflg & MSG_NOERROR)
 752                         msr_d.r_maxsize = INT_MAX;
 753                  else
 754                         msr_d.r_maxsize = msgsz;
 755                 msr_d.r_msg = ERR_PTR(-EAGAIN);
 756                 current->state = TASK_INTERRUPTIBLE;
 757                 msg_unlock(msq);
 758
 759                 schedule();
 760
 761                 /* Lockless receive, part 1:
 762                  * Disable preemption.  We don't hold a reference to the queue
 763                  * and getting a reference would defeat the idea of a lockless
 764                  * operation, thus the code relies on rcu to guarantee the
 765                  * existance of msq:
 766                  * Prior to destruction, expunge_all(-EIRDM) changes r_msg.
 767                  * Thus if r_msg is -EAGAIN, then the queue not yet destroyed.
 768                  * rcu_read_lock() prevents preemption between reading r_msg
 769                  * and the spin_lock() inside ipc_lock_by_ptr().
 770                  */
 771                 rcu_read_lock();
 772
 773                 /* Lockless receive, part 2:
 774                  * Wait until pipelined_send or expunge_all are outside of
 775                  * wake_up_process(). There is a race with exit(), see
 776                  * ipc/mqueue.c for the details.
 777                  */
 778                 msg = (struct msg_msg*) msr_d.r_msg;
 779                 while (msg == NULL) {
 780                         cpu_relax();
 781                         msg = (struct msg_msg*) msr_d.r_msg;
 782                 }
 783
 784                 /* Lockless receive, part 3:
 785                  * If there is a message or an error then accept it without
 786                  * locking.
 787                  */
 788                 if(msg != ERR_PTR(-EAGAIN)) {
 789                         rcu_read_unlock();
 790                         break;
 791                 }
 792
 793                 /* Lockless receive, part 3:
 794                  * Acquire the queue spinlock.
 795                  */
 796                 ipc_lock_by_ptr(&msq->q_perm);
 797                 rcu_read_unlock();
 798
 799                 /* Lockless receive, part 4:
 800                  * Repeat test after acquiring the spinlock.
 801                  */
 802                 msg = (struct msg_msg*)msr_d.r_msg;
 803                 if(msg != ERR_PTR(-EAGAIN))
 804                         goto out_unlock;
 805
 806                 list_del(&msr_d.r_list);
 807                 if (signal_pending(current)) {
 808                         msg = ERR_PTR(-ERESTARTNOHAND);
 809 out_unlock:
 810                         msg_unlock(msq);
 811                         break;
 812                 }
 813         }
 814         if (IS_ERR(msg))
 815                 return PTR_ERR(msg);
 816
 817         msgsz = (msgsz > msg->m_ts) ? msg->m_ts : msgsz;
 818         if (put_user (msg->m_type, &msgp->mtype) ||
 819             store_msg(msgp->mtext, msg, msgsz)) {
 820                     msgsz = -EFAULT;
 821         }
 822         free_msg(msg);
 823         return msgsz;
 824 }
 825
 826 #ifdef CONFIG_PROC_FS
 827 static int sysvipc_msg_proc_show(struct seq_file *s, void *it)
 828 {
 829         struct msg_queue *msq = it;
 830
 831         if (!vx_check(msq->q_perm.xid, VX_IDENT))
 832                 return 0;
 833
 834         return seq_printf(s,
 835                           "%10d %10d  %4o  %10lu %10lu %5u %5u %5u %5u %5u %5u %10lu %10lu %10lu\n",
 836                           msq->q_perm.key,
 837                           msq->q_id,
 838                           msq->q_perm.mode,
 839                           msq->q_cbytes,
 840                           msq->q_qnum,
 841                           msq->q_lspid,
 842                           msq->q_lrpid,
 843                           msq->q_perm.uid,
 844                           msq->q_perm.gid,
 845                           msq->q_perm.cuid,
 846                           msq->q_perm.cgid,
 847                           msq->q_stime,
 848                           msq->q_rtime,
 849                           msq->q_ctime);
 850 }
 851 #endif