1 /*
2 * Copyright (c) 2015 Dmitry V. Levin <ldv@altlinux.org>
3 * Copyright (c) 2015 Andreas Schwab <schwab@suse.de>
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 #include <stdio.h>
30 #include <errno.h>
31 #include <sys/sem.h>
32
33 union semun {
34 int val; /* Value for SETVAL */
35 struct semid_ds *buf; /* Buffer for IPC_STAT, IPC_SET */
36 unsigned short *array; /* Array for GETALL, SETALL */
37 struct seminfo *__buf; /* Buffer for IPC_INFO
38 (Linux-specific) */
39 };
40
41 int
main(void)42 main(void)
43 {
44 int rc, id;
45 union semun un;
46 struct semid_ds ds;
47 struct seminfo info;
48
49 id = semget(IPC_PRIVATE, 1, 0600);
50 if (id < 0)
51 return 77;
52 printf("semget\\(IPC_PRIVATE, 1, 0600\\) += %d\n", id);
53
54 un.buf = &ds;
55 if (semctl(id, 0, IPC_STAT, un))
56 goto fail;
57 printf("semctl\\(%d, 0, (IPC_64\\|)?IPC_STAT, \\[?%p\\]?\\) += 0\n",
58 id, &ds);
59
60 un.__buf = &info;
61 int max = semctl(0, 0, SEM_INFO, un);
62 if (max < 0)
63 goto fail;
64 printf("semctl\\(0, 0, (IPC_64\\|)?SEM_INFO, \\[?%p\\]?\\) += %d\n",
65 &info, max);
66
67 un.buf = &ds;
68 rc = semctl(id, 0, SEM_STAT, un);
69 if (rc != id) {
70 /*
71 * In linux < v2.6.24-rc1 the first argument must be
72 * an index in the kernel's internal array.
73 */
74 if (-1 != rc || EINVAL != errno)
75 goto fail;
76 printf("semctl\\(%d, 0, (IPC_64\\|)?SEM_STAT, \\[?%p\\]?\\)"
77 " += -1 EINVAL \\(Invalid argument\\)\n", id, &ds);
78 } else {
79 printf("semctl\\(%d, 0, (IPC_64\\|)?SEM_STAT, \\[?%p\\]?\\)"
80 " += %d\n", id, &ds, id);
81 }
82
83 rc = 0;
84 done:
85 if (semctl(id, 0, IPC_RMID, 0) < 0)
86 return 1;
87 printf("semctl\\(%d, 0, (IPC_64\\|)?IPC_RMID, \\[?0\\]?\\) += 0\n", id);
88 return rc;
89
90 fail:
91 rc = 1;
92 goto done;
93 }
94