125 lines
		
	
	
		
			2.9 KiB
		
	
	
	
		
			C++
		
	
	
	
			
		
		
	
	
			125 lines
		
	
	
		
			2.9 KiB
		
	
	
	
		
			C++
		
	
	
	
| /* fcntl.cc: fcntl syscall
 | |
| 
 | |
| This file is part of Cygwin.
 | |
| 
 | |
| This software is a copyrighted work licensed under the terms of the
 | |
| Cygwin license.  Please consult the file "CYGWIN_LICENSE" for
 | |
| details. */
 | |
| 
 | |
| #include "winsup.h"
 | |
| #include <unistd.h>
 | |
| #include "cygerrno.h"
 | |
| #include "security.h"
 | |
| #include "path.h"
 | |
| #include "fhandler.h"
 | |
| #include "dtable.h"
 | |
| #include "cygheap.h"
 | |
| #include "cygtls.h"
 | |
| 
 | |
| extern "C" int
 | |
| fcntl64 (int fd, int cmd, ...)
 | |
| {
 | |
|   int res = -1;
 | |
|   intptr_t arg = 0;
 | |
|   va_list args;
 | |
| 
 | |
|   pthread_testcancel ();
 | |
| 
 | |
|   __try
 | |
|     {
 | |
| 
 | |
|       debug_printf ("fcntl(%d, %d, ...)", fd, cmd);
 | |
| 
 | |
|       /* Don't lock the fd table when performing locking calls. */
 | |
|       cygheap_fdget cfd (fd, cmd < F_GETLK || cmd > F_SETLKW);
 | |
|       if (cfd < 0)
 | |
| 	__leave;
 | |
| 
 | |
|       /* FIXME?  All numerical args to fcntl are defined as long on Linux.
 | |
| 	 This relies on a really dirty trick on x86_64:  A 32 bit mov to
 | |
| 	 a register (e.g. mov $1, %edx) always sets the high 32 bit to 0.
 | |
| 	 We're following the Linux lead here since the third arg to any
 | |
| 	 function is in a register anyway (%r8 in MS ABI).  That's the easy
 | |
| 	 case which is covered here by always reading the arg with
 | |
| 	 sizeof (intptr_t) == sizeof (long) == sizeof (void*) which matches
 | |
| 	 all targets.
 | |
| 	 
 | |
| 	 However, the POSIX standard defines all numerical args as type int.
 | |
| 	 If we take that literally, we had a (small) problem on 64 bit, since
 | |
| 	 sizeof (void*) != sizeof (int).  If we would like to follow POSIX more
 | |
| 	 closely than Linux, we'd have to call va_arg on a per cmd basis. */
 | |
| 
 | |
|       va_start (args, cmd);
 | |
|       arg = va_arg (args, intptr_t);
 | |
|       va_end (args);
 | |
| 
 | |
|       switch (cmd)
 | |
| 	{
 | |
| 	case F_DUPFD:
 | |
| 	case F_DUPFD_CLOEXEC:
 | |
| 	  if (arg >= 0 && arg < OPEN_MAX_MAX)
 | |
| 	    {
 | |
| 	      int flags = cmd == F_DUPFD_CLOEXEC ? O_CLOEXEC : 0;
 | |
| 	      res = cygheap->fdtab.dup3 (fd, cygheap_fdnew ((arg) - 1), flags);
 | |
| 	    }
 | |
| 	  else
 | |
| 	    {
 | |
| 	      set_errno (EINVAL);
 | |
| 	      res = -1;
 | |
| 	    }
 | |
| 	  break;
 | |
| 	default:
 | |
| 	  res = cfd->fcntl (cmd, arg);
 | |
| 	  break;
 | |
| 	}
 | |
|     }
 | |
|   __except (EFAULT) {}
 | |
|   __endtry
 | |
|   syscall_printf ("%R = fcntl(%d, %d, %ly)", res, fd, cmd, arg);
 | |
|   return res;
 | |
| }
 | |
| 
 | |
| #ifdef __i386__
 | |
| extern "C" int
 | |
| _fcntl (int fd, int cmd, ...)
 | |
| {
 | |
|   intptr_t arg = 0;
 | |
|   va_list args;
 | |
|   struct __flock32 *src = NULL;
 | |
|   struct flock dst;
 | |
| 
 | |
|   __try
 | |
|     {
 | |
|       va_start (args, cmd);
 | |
|       arg = va_arg (args, intptr_t);
 | |
|       va_end (args);
 | |
|       if (cmd == F_GETLK || cmd == F_SETLK || cmd == F_SETLKW)
 | |
| 	{
 | |
| 	  src = (struct __flock32 *) arg;
 | |
| 	  dst.l_type = src->l_type;
 | |
| 	  dst.l_whence = src->l_whence;
 | |
| 	  dst.l_start = src->l_start;
 | |
| 	  dst.l_len = src->l_len;
 | |
| 	  dst.l_pid = src->l_pid;
 | |
| 	  arg = (intptr_t) &dst;
 | |
| 	}
 | |
|       int res = fcntl64 (fd, cmd, arg);
 | |
|       if (cmd == F_GETLK)
 | |
| 	{
 | |
| 	  src->l_type = dst.l_type;
 | |
| 	  src->l_whence = dst.l_whence;
 | |
| 	  src->l_start = dst.l_start;
 | |
| 	  src->l_len = dst.l_len;
 | |
| 	  src->l_pid = (short) dst.l_pid;
 | |
| 	}
 | |
|       return res;
 | |
|     }
 | |
|   __except (EFAULT)
 | |
|   __endtry
 | |
|   return -1;
 | |
| }
 | |
| #else
 | |
| EXPORT_ALIAS (fcntl64, fcntl)
 | |
| EXPORT_ALIAS (fcntl64, _fcntl)
 | |
| #endif
 |