77d67968acae7ccd465303c0d7ea005e43e59599
[libc-test] / src / general / sem.c
1 #include <pthread.h>
2 #include <stdlib.h>
3 #include <unistd.h>
4 #include <stdio.h>
5 #include <errno.h>
6 #include <string.h>
7 #include <semaphore.h>
8 #include <time.h>
9 #include <fcntl.h>
10 #include "test.h"
11
12 #define TEST(r, f, x, m) ( \
13         ((r) = (f)) == (x) || \
14         (error("%s failed (" m ")\n", #f, r, x), 0) )
15
16 #define TEST_S(s, x, m) ( \
17         !strcmp((s),(x)) || \
18         (error("[%s] != [%s] (%s)\n", s, x, m), 0) )
19
20 int main(void)
21 {
22         int r;
23         char buf[100];
24         struct timespec ts;
25         sem_t *sem, *sem2;
26         int val;
27
28         clock_gettime(CLOCK_REALTIME, &ts);
29         snprintf(buf, sizeof buf, "/testsuite-%d-%d", (int)getpid(), (int)ts.tv_nsec);
30
31         TEST(r, !(sem=sem_open(buf, O_CREAT|O_EXCL, 0700, 1)), 0, "could not open sem");
32
33         TEST(r, sem_getvalue(sem, &val), 0, "failed to get sem value");
34         TEST(r, val, 1, "wrong initial semaphore value");
35
36         TEST(r, !(sem2=sem_open(buf, 0)), 0, "could not reopen sem");
37         TEST(r, sem!=sem2, 0, "reopened sem has different address");
38
39         TEST(r, sem_wait(sem), 0, "failed on sem wait");
40         TEST(r, sem_getvalue(sem2, &val), 0, "failed to get sem value");
41         TEST(r, val, 0, "wrong semaphore value on second handle");
42
43         TEST(r, sem_post(sem), 0, "failed on sem post");
44         TEST(r, sem_getvalue(sem2, &val), 0, "failed to get sem value");
45         TEST(r, val, 1, "wrong semaphore value on second handle");
46
47         TEST(r, sem_close(sem), 0, "failed to close sem");
48         TEST(r, sem_close(sem), 0, "failed to close sem second time");
49         TEST(r, sem_unlink(buf), 0, "failed to unlink sem");
50         return test_status;
51 }