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
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
|
/* fcntl.cc: fcntl syscall
Copyright 1996, 1997, 1998 Cygnus Solutions.
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 <fcntl.h>
#include <stdarg.h>
#include <errno.h>
#include <unistd.h>
#include "fhandler.h"
#include "dtable.h"
#include "cygerrno.h"
#include "thread.h"
extern "C"
int
_fcntl (int fd, int cmd,...)
{
va_list args;
int arg = 0;
int res;
SetResourceLock(LOCK_FD_LIST,WRITE_LOCK|READ_LOCK, "_fcntl");
if (fdtab.not_open (fd))
{
set_errno (EBADF);
res = -1;
goto done;
}
switch (cmd)
{
case F_DUPFD:
va_start (args, cmd);
arg = va_arg (args,int);
va_end (args);
res = dup2 (fd, fdtab.find_unused_handle (arg));
goto done;
case F_GETFD:
res = fdtab[fd]->get_close_on_exec () ? FD_CLOEXEC : 0;
goto done;
case F_SETFD:
va_start (args, cmd);
arg = va_arg (args, int);
va_end (args);
fdtab[fd]->set_close_on_exec (arg);
res = 0;
goto done;
case F_GETFL:
{
res = fdtab[fd]->get_flags ();
goto done;
}
case F_SETFL:
{
int temp = 0;
va_start (args, cmd);
arg = va_arg (args, int);
va_end (args);
if (arg & O_RDONLY)
temp |= GENERIC_READ;
if (arg & O_WRONLY)
temp |= GENERIC_WRITE;
syscall_printf ("fcntl (%d, F_SETFL, %d)", arg);
fdtab[fd]->set_access (temp);
fdtab[fd]->set_flags (arg);
res = 0;
goto done;
}
case F_GETLK:
case F_SETLK:
case F_SETLKW:
{
struct flock *fl;
va_start (args, cmd);
fl = va_arg (args,struct flock *);
va_end (args);
res = fdtab[fd]->lock (cmd, fl);
goto done;
}
default:
set_errno (EINVAL);
res = -1;
goto done;
}
set_errno (ENOSYS);
res = -1;
done:
ReleaseResourceLock(LOCK_FD_LIST,WRITE_LOCK|READ_LOCK,"_fcntl");
syscall_printf ("%d = fcntl (%d, %d, %d)", res, fd, cmd, arg);
return res;
}
|
