1 #include <stdio.h>
2 #include <errno.h>
3 #include <sys/sem.h>
4
5 union semun {
6 int val; /* Value for SETVAL */
7 struct semid_ds *buf; /* Buffer for IPC_STAT, IPC_SET */
8 unsigned short *array; /* Array for GETALL, SETALL */
9 struct seminfo *__buf; /* Buffer for IPC_INFO
10 (Linux-specific) */
11 };
12
13 int
main(void)14 main(void)
15 {
16 int rc, id;
17 union semun un;
18 struct semid_ds ds;
19 struct seminfo info;
20
21 id = semget(IPC_PRIVATE, 1, 0600);
22 if (id < 0)
23 return 77;
24 printf("semget\\(IPC_PRIVATE, 1, 0600\\) += %d\n", id);
25
26 un.buf = &ds;
27 if (semctl(id, 0, IPC_STAT, un))
28 goto fail;
29 printf("semctl\\(%d, 0, (IPC_64\\|)?IPC_STAT, \\[?%p\\]?\\) += 0\n",
30 id, &ds);
31
32 un.__buf = &info;
33 int max = semctl(0, 0, SEM_INFO, un);
34 if (max < 0)
35 goto fail;
36 printf("semctl\\(0, 0, (IPC_64\\|)?SEM_INFO, \\[?%p\\]?\\) += %d\n",
37 &info, max);
38
39 un.buf = &ds;
40 rc = semctl(id, 0, SEM_STAT, un);
41 if (rc != id) {
42 /*
43 * In linux < v2.6.24-rc1 the first argument must be
44 * an index in the kernel's internal array.
45 */
46 if (-1 != rc || EINVAL != errno)
47 goto fail;
48 printf("semctl\\(%d, 0, (IPC_64\\|)?SEM_STAT, \\[?%p\\]?\\)"
49 " += -1 EINVAL \\(Invalid argument\\)\n", id, &ds);
50 } else {
51 printf("semctl\\(%d, 0, (IPC_64\\|)?SEM_STAT, \\[?%p\\]?\\)"
52 " += %d\n", id, &ds, id);
53 }
54
55 rc = 0;
56 done:
57 if (semctl(id, 0, IPC_RMID, 0) < 0)
58 return 1;
59 printf("semctl\\(%d, 0, (IPC_64\\|)?IPC_RMID, \\[?0\\]?\\) += 0\n", id);
60 return rc;
61
62 fail:
63 rc = 1;
64 goto done;
65 }
66