12 #define TEST(r, f, x, m) ( \
13 ((r) = (f)) == (x) || \
14 (error("%s failed (" m ")\n", #f, r, x), 0) )
16 #define TEST_S(s, x, m) ( \
18 (error("[%s] != [%s] (%s)\n", s, x, m), 0) )
28 clock_gettime(CLOCK_REALTIME, &ts);
29 snprintf(buf, sizeof buf, "/testsuite-%d-%d", (int)getpid(), (int)ts.tv_nsec);
31 TEST(r, !(sem=sem_open(buf, O_CREAT|O_EXCL, 0700, 1)), 0, "could not open sem");
33 TEST(r, sem_getvalue(sem, &val), 0, "failed to get sem value");
34 TEST(r, val, 1, "wrong initial semaphore value");
36 TEST(r, !(sem2=sem_open(buf, 0)), 0, "could not reopen sem");
37 TEST(r, sem!=sem2, 0, "reopened sem has different address");
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");
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");
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");