1#include <sys/sem.h>
2#include <stdarg.h>
3#include <endian.h>
4#include "syscall.h"
5#include "ipc.h"
6
7#if __BYTE_ORDER != __BIG_ENDIAN
8#undef SYSCALL_IPC_BROKEN_MODE
9#endif
10
11union semun {
12 int val;
13 struct semid_ds *buf;
14 unsigned short *array;
15};
16
17int semctl(int id, int num, int cmd, ...)
18{
19 union semun arg = {0};
20 va_list ap;
21 switch (cmd & ~IPC_TIME64) {
22 case SETVAL: case GETALL: case SETALL: case IPC_SET:
23 case IPC_INFO: case SEM_INFO:
24 case IPC_STAT & ~IPC_TIME64:
25 case SEM_STAT & ~IPC_TIME64:
26 case SEM_STAT_ANY & ~IPC_TIME64:
27 va_start(ap, cmd);
28 arg = va_arg(ap, union semun);
29 va_end(ap);
30 }
31#if IPC_TIME64
32 struct semid_ds out, *orig;
33 if (cmd&IPC_TIME64) {
34 out = (struct semid_ds){0};
35 orig = arg.buf;
36 arg.buf = &out;
37 }
38#endif
39#ifdef SYSCALL_IPC_BROKEN_MODE
40 struct semid_ds tmp;
41 if (cmd == IPC_SET) {
42 tmp = *arg.buf;
43 tmp.sem_perm.mode *= 0x10000U;
44 arg.buf = &tmp;
45 }
46#endif
47#ifndef SYS_ipc
48 int r = __syscall(SYS_semctl, id, num, IPC_CMD(cmd), arg.buf);
49#else
50 int r = __syscall(SYS_ipc, IPCOP_semctl, id, num, IPC_CMD(cmd), &arg.buf);
51#endif
52#ifdef SYSCALL_IPC_BROKEN_MODE
53 if (r >= 0) switch (cmd | IPC_TIME64) {
54 case IPC_STAT:
55 case SEM_STAT:
56 case SEM_STAT_ANY:
57 arg.buf->sem_perm.mode >>= 16;
58 }
59#endif
60#if IPC_TIME64
61 if (r >= 0 && (cmd&IPC_TIME64)) {
62 arg.buf = orig;
63 *arg.buf = out;
64 IPC_HILO(arg.buf, sem_otime);
65 IPC_HILO(arg.buf, sem_ctime);
66 }
67#endif
68 return __syscall_ret(r);
69}