Fix pthread_mutexattr_getrobust_np definition
[kopensolaris-gnu/glibc.git] / rt / tst-mqueue4.c
1 /* Test message queue passing.
2    Copyright (C) 2004 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4    Contributed by Jakub Jelinek <jakub@redhat.com>, 2004.
5
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Lesser General Public
8    License as published by the Free Software Foundation; either
9    version 2.1 of the License, or (at your option) any later version.
10
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
15
16    You should have received a copy of the GNU Lesser General Public
17    License along with the GNU C Library; if not, write to the Free
18    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19    02111-1307 USA.  */
20
21 #include <errno.h>
22 #include <fcntl.h>
23 #include <mqueue.h>
24 #include <limits.h>
25 #include <signal.h>
26 #include <stdio.h>
27 #include <stdlib.h>
28 #include <string.h>
29 #include <sys/time.h>
30 #include <sys/wait.h>
31 #include <time.h>
32 #include <unistd.h>
33 #include "tst-mqueue.h"
34
35 #define TIMEOUT 4
36 #define TEST_FUNCTION do_test ()
37 static int
38 do_test (void)
39 {
40   int result = 0;
41
42   char name[sizeof "/tst-mqueue4-" + sizeof (pid_t) * 3 + NAME_MAX];
43   char *p;
44   p = name + snprintf (name, sizeof (name), "/tst-mqueue4-%u", getpid ());
45   struct mq_attr attr = { .mq_maxmsg = 2, .mq_msgsize = 2 };
46   mqd_t q = mq_open (name, O_CREAT | O_EXCL | O_RDWR, 0600, &attr);
47
48   if (q == (mqd_t) -1)
49     {
50       printf ("mq_open failed with: %m\n");
51       return result;
52     }
53   else
54     add_temp_mq (name);
55
56   *p = '.';
57   memset (p + 1, 'x', NAME_MAX + 1 - (p - name));
58   name[NAME_MAX + 1] = '\0';
59
60   mqd_t q2 = mq_open (name, O_CREAT | O_EXCL | O_RDWR, 0600, &attr);
61   if (q2 == (mqd_t) -1)
62     {
63       printf ("mq_open with NAME_MAX long name compoment failed with: %m\n");
64       result = 1;
65     }
66
67   if (mq_unlink (name) != 0)
68     {
69       printf ("mq_unlink failed: %m\n");
70       result = 1;
71     }
72
73   if (mq_close (q2) != 0)
74     {
75       printf ("mq_close failed: %m\n");
76       result = 1;
77     }
78
79   name[NAME_MAX + 1] = 'x';
80   name[NAME_MAX + 2] = '\0';
81   q2 = mq_open (name, O_CREAT | O_EXCL | O_RDWR, 0600, &attr);
82   if (q2 != (mqd_t) -1)
83     {
84       puts ("mq_open with too long name component unexpectedly succeeded");
85       mq_unlink (name);
86       mq_close (q2);
87       result = 1;
88     }
89   else if (errno != ENAMETOOLONG)
90     {
91       printf ("mq_open with too long name component did not fail with "
92               "ENAMETOOLONG: %m\n");
93       result = 1;
94     }
95
96   if (mq_unlink (name) == 0)
97     {
98       puts ("mq_unlink with too long name component unexpectedly succeeded");
99       result = 1;
100     }
101   else if (errno != ENAMETOOLONG)
102     {
103       printf ("mq_unlink with too long name component did not fail with "
104               "ENAMETOOLONG: %m\n");
105       result = 1;
106     }
107
108   *p = '\0';
109   attr.mq_maxmsg = 1;
110   attr.mq_msgsize = 3;
111   q2 = mq_open (name, O_CREAT | O_RDWR, 0600, &attr);
112   if (q2 == (mqd_t) -1)
113     {
114       printf ("mq_open without O_EXCL failed with %m\n");
115       result = 1;
116     }
117
118   char buf[3];
119   strcpy (buf, "jk");
120   if (mq_send (q, buf, 2, 4) != 0)
121     {
122       printf ("mq_send failed: %m\n");
123       result = 1;
124     }
125
126   if (mq_send (q, buf + 1, 1, 5) != 0)
127     {
128       printf ("mq_send failed: %m\n");
129       result = 1;
130     }
131
132   if (mq_getattr (q2, &attr) != 0)
133     {
134       printf ("mq_getattr failed: %m\n");
135       result = 1;
136     }
137
138   if ((attr.mq_flags & O_NONBLOCK)
139       || attr.mq_maxmsg != 2
140       || attr.mq_msgsize != 2
141       || attr.mq_curmsgs != 2)
142     {
143       printf ("mq_getattr returned unexpected { .mq_flags = %ld,\n"
144               ".mq_maxmsg = %ld, .mq_msgsize = %ld, .mq_curmsgs = %ld }\n",
145               attr.mq_flags, attr.mq_maxmsg, attr.mq_msgsize, attr.mq_curmsgs);
146       result = 1;
147     }
148
149   struct timespec ts;
150   if (clock_gettime (CLOCK_REALTIME, &ts) == 0)
151     ++ts.tv_sec;
152   else
153     {
154       ts.tv_sec = time (NULL) + 1;
155       ts.tv_nsec = 0;
156     }
157
158   if (mq_timedsend (q2, buf, 1, 1, &ts) == 0)
159     {
160       puts ("mq_timedsend unexpectedly succeeded");
161       result = 1;
162     }
163   else if (errno != ETIMEDOUT)
164     {
165       printf ("mq_timedsend did not fail with ETIMEDOUT: %m\n");
166       result = 1;
167     }
168
169   if (mq_close (q2) != 0)
170     {
171       printf ("mq_close failed: %m\n");
172       result = 1;
173     }
174
175   q2 = mq_open (name, O_RDONLY, 0600);
176   if (q2 == (mqd_t) -1)
177     {
178       printf ("mq_open without O_CREAT failed with %m\n");
179       result = 1;
180     }
181
182   mqd_t q3 = mq_open (name, O_RDONLY, 0600);
183   if (q3 == (mqd_t) -1)
184     {
185       printf ("mq_open without O_CREAT failed with %m\n");
186       result = 1;
187     }
188
189   memset (buf, ' ', sizeof (buf));
190
191   unsigned int prio;
192   ssize_t rets = mq_receive (q2, buf, 2, &prio);
193   if (rets != 1)
194     {
195       if (rets == -1)
196         printf ("mq_receive failed with: %m\n");
197       else
198         printf ("mq_receive returned %zd != 1\n", rets);
199       result = 1;
200     }
201   else if (prio != 5 || memcmp (buf, "k  ", 3) != 0)
202     {
203       printf ("mq_receive returned prio %u (2) buf \"%c%c%c\" (\"k  \")\n",
204               prio, buf[0], buf[1], buf[2]);
205       result = 1;
206     }
207
208   if (mq_getattr (q3, &attr) != 0)
209     {
210       printf ("mq_getattr failed: %m\n");
211       result = 1;
212     }
213
214   if ((attr.mq_flags & O_NONBLOCK)
215       || attr.mq_maxmsg != 2
216       || attr.mq_msgsize != 2
217       || attr.mq_curmsgs != 1)
218     {
219       printf ("mq_getattr returned unexpected { .mq_flags = %ld,\n"
220               ".mq_maxmsg = %ld, .mq_msgsize = %ld, .mq_curmsgs = %ld }\n",
221               attr.mq_flags, attr.mq_maxmsg, attr.mq_msgsize, attr.mq_curmsgs);
222       result = 1;
223     }
224
225   rets = mq_receive (q3, buf, 2, NULL);
226   if (rets != 2)
227     {
228       if (rets == -1)
229         printf ("mq_receive failed with: %m\n");
230       else
231         printf ("mq_receive returned %zd != 2\n", rets);
232       result = 1;
233     }
234   else if (memcmp (buf, "jk ", 3) != 0)
235     {
236       printf ("mq_receive returned buf \"%c%c%c\" != \"jk \"\n",
237               buf[0], buf[1], buf[2]);
238       result = 1;
239     }
240
241   if (clock_gettime (CLOCK_REALTIME, &ts) == 0)
242     ++ts.tv_sec;
243   else
244     {
245       ts.tv_sec = time (NULL) + 1;
246       ts.tv_nsec = 0;
247     }
248
249   if (mq_timedreceive (q2, buf, 2, NULL, &ts) != -1)
250     {
251       puts ("mq_timedreceive on empty queue unexpectedly succeeded");
252       result = 1;
253     }
254   else if (errno != ETIMEDOUT)
255     {
256       printf ("mq_timedreceive on empty queue did not fail with "
257               "ETIMEDOUT: %m\n");
258       result = 1;
259     }
260
261   if (mq_unlink (name) != 0)
262     {
263       printf ("mq_unlink failed: %m\n");
264       result = 1;
265     }
266
267   if (mq_close (q) != 0)
268     {
269       printf ("mq_close failed: %m\n");
270       result = 1;
271     }
272
273   if (mq_close (q2) != 0)
274     {
275       printf ("mq_close failed: %m\n");
276       result = 1;
277     }
278
279   if (mq_close (q3) != 0)
280     {
281       printf ("mq_close failed: %m\n");
282       result = 1;
283     }
284
285   return result;
286 }
287
288 #include "../test-skeleton.c"