(__libc_fcntl): Only enable cancellation if absolutely needed.
[kopensolaris-gnu/glibc.git] / sysdeps / unix / sysv / linux / i386 / fcntl.c
1 /* Copyright (C) 2000, 2002, 2003 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3
4    The GNU C Library is free software; you can redistribute it and/or
5    modify it under the terms of the GNU Lesser General Public
6    License as published by the Free Software Foundation; either
7    version 2.1 of the License, or (at your option) any later version.
8
9    The GNU C Library is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12    Lesser General Public License for more details.
13
14    You should have received a copy of the GNU Lesser General Public
15    License along with the GNU C Library; if not, write to the Free
16    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
17    02111-1307 USA.  */
18
19 #include <assert.h>
20 #include <errno.h>
21 #include <fcntl.h>
22 #include <stdarg.h>
23
24 #include <sysdep-cancel.h>
25 #include <sys/syscall.h>
26 #include "../kernel-features.h"
27
28 #if __ASSUME_FCNTL64 == 0
29 /* This variable is shared with all files that check for fcntl64.  */
30 int __have_no_fcntl64;
31
32
33 static int
34 do_fcntl (int fd, int cmd, void *arg)
35 {
36 # ifdef __NR_fcntl64
37   if (! __have_no_fcntl64)
38     {
39       int result = INLINE_SYSCALL (fcntl64, 3, fd, cmd, arg);
40       if (result >= 0 || errno != ENOSYS)
41         return result;
42
43       __have_no_fcntl64 = 1;
44     }
45 # endif
46   switch (cmd)
47     {
48     case F_GETLK64:
49       /* Convert arg from flock64 to flock and back.  */
50       {
51         struct flock fl;
52         struct flock64 *fl64 = arg;
53         int res;
54
55         fl.l_start = (off_t)fl64->l_start;
56         /* Check if we can represent the values with the smaller type.  */
57         if ((off64_t) fl.l_start != fl64->l_start)
58           {
59             __set_errno (EOVERFLOW);
60             return -1;
61           }
62         fl.l_len = (off_t) fl64->l_len;
63         /* Check if we can represent the values with the smaller type.  */
64         if ((off64_t) fl.l_len != fl64->l_len)
65           {
66             __set_errno (EOVERFLOW);
67             return -1;
68           }
69         fl.l_type = fl64->l_type;
70         fl.l_whence = fl64->l_whence;
71         fl.l_pid = fl64->l_pid;
72
73         res = INLINE_SYSCALL (fcntl, 3, fd, F_GETLK, &fl);
74         if (res  != 0)
75           return res;
76         /* Everything ok, convert back.  */
77         fl64->l_type = fl.l_type;
78         fl64->l_whence = fl.l_whence;
79         fl64->l_start = fl.l_start;
80         fl64->l_len = fl.l_len;
81         fl64->l_pid = fl.l_pid;
82
83         return 0;
84       }
85     case F_SETLK64:
86     case F_SETLKW64:
87       /* Try to convert arg from flock64 to flock.  */
88       {
89         struct flock fl;
90         struct flock64 *fl64 = arg;
91
92         fl.l_start = (off_t) fl64->l_start;
93         /* Check if we can represent the values with the smaller type.  */
94         if ((off64_t) fl.l_start != fl64->l_start)
95           {
96             __set_errno (EOVERFLOW);
97             return -1;
98           }
99         fl.l_len = (off_t)fl64->l_len;
100         /* Check if we can represent the values with the smaller type.  */
101         if ((off64_t) fl.l_len != fl64->l_len)
102           {
103             __set_errno (EOVERFLOW);
104             return -1;
105           }
106         fl.l_type = fl64->l_type;
107         fl.l_whence = fl64->l_whence;
108         fl.l_pid = fl64->l_pid;
109         assert (F_SETLK - F_SETLKW == F_SETLK64 - F_SETLKW64);
110         return INLINE_SYSCALL (fcntl, 3, fd, cmd + F_SETLK - F_SETLK64, &fl);
111       }
112     default:
113       return INLINE_SYSCALL (fcntl, 3, fd, cmd, arg);
114     }
115   return -1;
116 }
117 #endif  /* __ASSUME_FCNTL64  */
118
119
120 int
121 __libc_fcntl (int fd, int cmd, ...)
122 {
123   va_list ap;
124   void *arg;
125
126   va_start (ap, cmd);
127   arg = va_arg (ap, void *);
128   va_end (ap);
129
130 #if __ASSUME_FCNTL64 > 0
131   if (SINGLE_THREAD_P || (cmd != F_SETLKW && cmd != F_SETLKW64))
132     return INLINE_SYSCALL (fcntl64, 3, fd, cmd, arg);
133
134   int oldtype = LIBC_CANCEL_ASYNC ();
135
136   int result = INLINE_SYSCALL (fcntl64, 3, fd, cmd, arg);
137 #else
138   if (SINGLE_THREAD_P || (cmd != F_SETLKW && cmd != F_SETLKW64))
139     return do_fcntl (fd, cmd, arg);
140
141   int oldtype = LIBC_CANCEL_ASYNC ();
142
143   int result = do_fcntl (fd, cmd, arg);
144 #endif
145
146   LIBC_CANCEL_RESET (oldtype);
147
148   return result;
149 }
150 libc_hidden_def (__libc_fcntl)
151
152 weak_alias (__libc_fcntl, __fcntl)
153 libc_hidden_weak (__fcntl)
154 weak_alias (__libc_fcntl, fcntl)