sysdeps/unix/sysv/linux/fcntl.c

   1 /* Copyright (C) 2000, 2002, 2003, 2004 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 <sysdep-cancel.h>      /* Must come before <fcntl.h>.  */
  22 #include <fcntl.h>
  23 #include <stdarg.h>
  24
  25 #include <sys/syscall.h>
  26
  27
  28 #ifndef NO_CANCELLATION
  29 int
  30 __fcntl_nocancel (int fd, int cmd, ...)
  31 {
  32   va_list ap;
  33   void *arg;
  34
  35   va_start (ap, cmd);
  36   arg = va_arg (ap, void *);
  37   va_end (ap);
  38
  39   return INLINE_SYSCALL (fcntl, 3, fd, cmd, arg);
  40 }
  41 #endif
  42
  43
  44 int
  45 __libc_fcntl (int fd, int cmd, ...)
  46 {
  47   va_list ap;
  48   void *arg;
  49
  50   va_start (ap, cmd);
  51   arg = va_arg (ap, void *);
  52   va_end (ap);
  53
  54   if (SINGLE_THREAD_P || cmd != F_SETLKW)
  55     return INLINE_SYSCALL (fcntl, 3, fd, cmd, arg);
  56
  57   int oldtype = LIBC_CANCEL_ASYNC ();
  58
  59   int result = INLINE_SYSCALL (fcntl, 3, fd, cmd, arg);
  60
  61   LIBC_CANCEL_RESET (oldtype);
  62
  63   return result;
  64 }
  65 libc_hidden_def (__libc_fcntl)
  66
  67 weak_alias (__libc_fcntl, __fcntl)
  68 libc_hidden_weak (__fcntl)
  69 weak_alias (__libc_fcntl, fcntl)