1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
|
/*
* __syscall_fcntl() for uClibc
*
* Copyright (C) 2006 Steven J. Hill <sjhill@realitydiluted.com>
* Copyright (C) 2000-2006 Erik Andersen <andersen@uclibc.org>
*
* Licensed under the LGPL v2.1, see the file COPYING.LIB in this tarball.
*/
#include <sys/syscall.h>
#include <stdarg.h>
#include <cancel.h> /* Must come before <fcntl.h>. */
#include <fcntl.h>
#include <bits/wordsize.h>
int __NC(fcntl)(int fd, int cmd, long arg)
{
#if __WORDSIZE == 32
if (cmd == F_GETLK64 || cmd == F_SETLK64 || cmd == F_SETLKW64) {
# if defined __NR_fcntl64 || !defined __NR_fcntl
return INLINE_SYSCALL(fcntl64, 3, fd, cmd, arg);
# else
__set_errno(ENOSYS);
return -1;
# endif
}
#endif
#if defined __NR_fcntl
return INLINE_SYSCALL(fcntl, 3, fd, cmd, arg);
#else
__set_errno(ENOSYS);
return -1;
#endif
}
int fcntl(int fd, int cmd, ...)
{
va_list ap;
long arg;
#ifdef __NEW_THREADS
int oldtype, result;
#endif
va_start (ap, cmd);
arg = va_arg (ap, long);
va_end (ap);
if (SINGLE_THREAD_P || (cmd != F_SETLKW && cmd != F_SETLKW64))
#if defined __NR_fcntl
return __NC(fcntl)(fd, cmd, arg);
#else
return INLINE_SYSCALL(fcntl64, 3, fd, cmd, arg);
#endif
#ifdef __NEW_THREADS
oldtype = LIBC_CANCEL_ASYNC ();
#if defined __NR_fcntl
result = __NC(fcntl)(fd, cmd, arg);
#else
result = INLINE_SYSCALL(fcntl64, 3, fd, cmd, arg);
#endif
LIBC_CANCEL_RESET (oldtype);
return result;
#endif
}
lt_strong_alias(fcntl)
lt_libc_hidden(fcntl)
#if !defined __NR_fcntl64 && __WORDSIZE == 32
strong_alias_untyped(fcntl,fcntl64)
lt_strong_alias(fcntl64)
lt_libc_hidden(fcntl64)
#endif
|
