1 /* Copyright (C) 1995-2013 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Ulrich Drepper <drepper@gnu.ai.mit.edu>, August 1995.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
26 #include <sys/syscall.h>
27 #include <shlib-compat.h>
29 #include <kernel-features.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
*__unbounded __sembase
; /* ptr to first semaphore in array */
37 struct sem_queue
*__unbounded __sem_pending
; /* pending operations */
38 struct sem_queue
*__unbounded __sem_pending_last
; /* last pending operation */
39 struct sem_undo
*__unbounded __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 #include <bp-checks.h>
54 #include <bp-semctl.h> /* definition of CHECK_SEMCTL needs union semum */
56 /* Return identifier for array of NSEMS semaphores associated with
58 #if SHLIB_COMPAT (libc, GLIBC_2_0, GLIBC_2_2)
59 int __old_semctl (int semid
, int semnum
, int cmd
, ...);
61 int __new_semctl (int semid
, int semnum
, int cmd
, ...);
63 #if SHLIB_COMPAT (libc, GLIBC_2_0, GLIBC_2_2)
65 attribute_compat_text_section
66 __old_semctl (int semid
, int semnum
, int cmd
, ...)
73 /* Get the argument only if required. */
77 case SETVAL
: /* arg.val */
78 case GETALL
: /* arg.array */
80 case IPC_STAT
: /* arg.buf */
83 case IPC_INFO
: /* arg.__buf */
86 arg
= va_arg (ap
, union semun
);
93 return INLINE_SYSCALL (ipc
, 5, IPCOP_semctl
, semid
, semnum
, cmd
,
94 CHECK_SEMCTL (&arg
, semid
, cmd
));
96 compat_symbol (libc
, __old_semctl
, semctl
, GLIBC_2_0
);
100 __new_semctl (int semid
, int semnum
, int cmd
, ...)
107 /* Get the argument only if required. */
111 case SETVAL
: /* arg.val */
112 case GETALL
: /* arg.array */
114 case IPC_STAT
: /* arg.buf */
117 case IPC_INFO
: /* arg.__buf */
120 arg
= va_arg (ap
, union semun
);
127 #if __ASSUME_IPC64 > 0
128 return INLINE_SYSCALL (ipc
, 5, IPCOP_semctl
, semid
, semnum
, cmd
| __IPC_64
,
129 CHECK_SEMCTL (&arg
, semid
, cmd
| __IPC_64
));
138 return INLINE_SYSCALL (ipc
, 5, IPCOP_semctl
, semid
, semnum
, cmd
,
139 CHECK_SEMCTL (&arg
, semid
, cmd
));
143 int save_errno
= errno
, result
;
144 struct __old_semid_ds old
;
145 struct semid_ds
*buf
;
147 /* Unfortunately there is no way how to find out for sure whether
148 we should use old or new semctl. */
149 result
= INLINE_SYSCALL (ipc
, 5, IPCOP_semctl
, semid
, semnum
, cmd
| __IPC_64
,
150 CHECK_SEMCTL (&arg
, semid
, cmd
| __IPC_64
));
151 if (result
!= -1 || errno
!= EINVAL
)
154 __set_errno(save_errno
);
156 arg
.__old_buf
= &old
;
159 old
.sem_perm
.uid
= buf
->sem_perm
.uid
;
160 old
.sem_perm
.gid
= buf
->sem_perm
.gid
;
161 old
.sem_perm
.mode
= buf
->sem_perm
.mode
;
162 if (old
.sem_perm
.uid
!= buf
->sem_perm
.uid
||
163 old
.sem_perm
.gid
!= buf
->sem_perm
.gid
)
165 __set_errno (EINVAL
);
169 result
= INLINE_SYSCALL (ipc
, 5, IPCOP_semctl
, semid
, semnum
, cmd
,
170 CHECK_SEMCTL (&arg
, semid
, cmd
));
171 if (result
!= -1 && cmd
!= IPC_SET
)
173 memset(buf
, 0, sizeof(*buf
));
174 buf
->sem_perm
.__key
= old
.sem_perm
.__key
;
175 buf
->sem_perm
.uid
= old
.sem_perm
.uid
;
176 buf
->sem_perm
.gid
= old
.sem_perm
.gid
;
177 buf
->sem_perm
.cuid
= old
.sem_perm
.cuid
;
178 buf
->sem_perm
.cgid
= old
.sem_perm
.cgid
;
179 buf
->sem_perm
.mode
= old
.sem_perm
.mode
;
180 buf
->sem_perm
.__seq
= old
.sem_perm
.__seq
;
181 buf
->sem_otime
= old
.sem_otime
;
182 buf
->sem_ctime
= old
.sem_ctime
;
183 buf
->sem_nsems
= old
.sem_nsems
;
190 versioned_symbol (libc
, __new_semctl
, semctl
, GLIBC_2_2
);