2 #define _XOPEN_SOURCE 700
14 static const char path[] = ".";
15 static const int id = 'x';
19 error("%s failed: %s\n", #f, strerror(errno)); \
22 #define EQ(a,b,fmt) do{ \
24 error("%s == %s failed: " fmt "\n", #a, #b, a, b); \
32 struct msqid_ds qid_ds;
36 } msg = {1, "test message"};
39 T(k = ftok(path, id));
41 /* make sure we get a clean message queue id */
42 T(qid = msgget(k, IPC_CREAT|0666));
43 T(msgctl(qid, IPC_RMID, 0));
44 T(qid = msgget(k, IPC_CREAT|IPC_EXCL|0666));
51 if (msgget(k, IPC_CREAT|IPC_EXCL|0666) != -1 || errno != EEXIST)
52 error("msgget(IPC_CREAT|IPC_EXCL) should have failed with EEXIST, got %s\n", strerror(errno));
54 /* check if msgget initilaized the msqid_ds structure correctly */
55 T(msgctl(qid, IPC_STAT, &qid_ds));
56 EQ(qid_ds.msg_perm.cuid, geteuid(), "got %d, want %d");
57 EQ(qid_ds.msg_perm.uid, geteuid(), "got %d, want %d");
58 EQ(qid_ds.msg_perm.cgid, getegid(), "got %d, want %d");
59 EQ(qid_ds.msg_perm.gid, getegid(), "got %d, want %d");
60 EQ(qid_ds.msg_perm.mode & 0x1ff, 0666, "got %o, want %o");
61 EQ(qid_ds.msg_qnum, 0, "got %d, want %d");
62 EQ(qid_ds.msg_lspid, 0, "got %d, want %d");
63 EQ(qid_ds.msg_lrpid, 0, "got %d, want %d");
64 EQ((long)qid_ds.msg_stime, 0, "got %ld, want %d");
65 EQ((long)qid_ds.msg_rtime, 0, "got %ld, want %d");
66 if (qid_ds.msg_ctime < t)
67 error("qid_ds.msg_ctime >= t failed: got %ld, want %ld\n", (long)qid_ds.msg_ctime, (long)t);
68 if (qid_ds.msg_qbytes <= 0)
69 error("qid_ds.msg_qbytes > 0 failed: got %d, want 0\n", qid_ds.msg_qbytes, t);
72 T(msgsnd(qid, &msg, sizeof msg.data, IPC_NOWAIT));
73 T(msgctl(qid, IPC_STAT, &qid_ds));
74 EQ(qid_ds.msg_qnum, 1, "got %d, want %d");
75 EQ(qid_ds.msg_lspid, getpid(), "got %d, want %d");
76 if (qid_ds.msg_stime < t)
77 error("msg_stime is %ld want >= %ld\n", (long)qid_ds.msg_stime, (long)t);
90 T(k = ftok(path, id));
91 T(qid = msgget(k, 0));
94 if (msgrcv(qid, &msg, 0, msgtyp, 0) != -1 || errno != E2BIG)
95 error("msgrcv should have failed when msgsize==0 with E2BIG, got %s\n", strerror(errno));
98 T(msgrcv(qid, &msg, sizeof msg.data, msgtyp, IPC_NOWAIT));
99 if (strcmp(msg.data,"test message") != 0)
100 error("received \"%s\" instead of \"%s\"\n", msg.data, "test message");
103 if (msgrcv(qid, &msg, sizeof msg.data, msgtyp, MSG_NOERROR|IPC_NOWAIT) != -1 || errno != ENOMSG)
104 error("msgrcv should have failed when ther is no msg with ENOMSG, got %s\n", strerror(errno));
107 T(msgctl(qid, IPC_RMID, 0));
118 error("fork failed: %s\n", strerror(errno));
122 T(waitpid(p, &status, 0));
123 if (!WIFEXITED(status) || WEXITSTATUS(status) != 0)
124 error("child exit status: %d\n", status);