1 /* Semctl for architectures where word sized unions are passed indirectly
2 Copyright (C) 1995-2015 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@gnu.ai.mit.edu>, August 1995.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <http://www.gnu.org/licenses/>. */
27 #include <sys/syscall.h>
29 #include <shlib-compat.h>
33 struct __old_ipc_perm sem_perm
; /* operation permission struct */
34 __time_t sem_otime
; /* last semop() time */
35 __time_t sem_ctime
; /* last time changed by semctl() */
36 struct sem
*__sembase
; /* ptr to first semaphore in array */
37 struct sem_queue
*__sem_pending
; /* pending operations */
38 struct sem_queue
*__sem_pending_last
; /* last pending operation */
39 struct sem_undo
*__undo
; /* ondo requests on this array */
40 unsigned short int sem_nsems
; /* number of semaphores in set */
43 /* Define a `union semun' suitable for Linux here. */
46 int val
; /* value for SETVAL */
47 struct semid_ds
*buf
; /* buffer for IPC_STAT & IPC_SET */
48 unsigned short int *array
; /* array for GETALL & SETALL */
49 struct seminfo
*__buf
; /* buffer for IPC_INFO */
50 struct __old_semid_ds
*__old_buf
;
53 /* Return identifier for array of NSEMS semaphores associated with
55 #if SHLIB_COMPAT (libc, GLIBC_2_0, GLIBC_2_2)
56 int __old_semctl (int semid
, int semnum
, int cmd
, ...);
58 int __new_semctl (int semid
, int semnum
, int cmd
, ...);
60 #if SHLIB_COMPAT (libc, GLIBC_2_0, GLIBC_2_2)
62 attribute_compat_text_section
63 __old_semctl (int semid
, int semnum
, int cmd
, ...)
68 /* Get the argument only if required. */
72 case SETVAL
: /* arg.val */
73 case GETALL
: /* arg.array */
75 case IPC_STAT
: /* arg.buf */
78 case IPC_INFO
: /* arg.__buf */
81 arg
= va_arg (ap
, union semun
);
86 return INLINE_SYSCALL (ipc
, 5, IPCOP_semctl
, semid
, semnum
, cmd
,
89 compat_symbol (libc
, __old_semctl
, semctl
, GLIBC_2_0
);
93 __new_semctl (int semid
, int semnum
, int cmd
, ...)
98 /* Get the argument only if required. */
102 case SETVAL
: /* arg.val */
103 case GETALL
: /* arg.array */
105 case IPC_STAT
: /* arg.buf */
108 case IPC_INFO
: /* arg.__buf */
111 arg
= va_arg (ap
, union semun
);
116 return INLINE_SYSCALL (ipc
, 5, IPCOP_semctl
, semid
, semnum
, cmd
| __IPC_64
,
120 versioned_symbol (libc
, __new_semctl
, semctl
, GLIBC_2_2
);