560d194a3462007a947acc701001b4c9b92e53af
[samba.git] / source / ntvfs / posix / pvfs_open.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    POSIX NTVFS backend - open and close
5
6    Copyright (C) Andrew Tridgell 2004
7
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12    
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17    
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 */
22
23 #include "include/includes.h"
24 #include "vfs_posix.h"
25
26
27 /*
28   find open file handle given fnum
29 */
30 struct pvfs_file *pvfs_find_fd(struct pvfs_state *pvfs,
31                                struct smbsrv_request *req, uint16_t fnum)
32 {
33         struct pvfs_file *f;
34         for (f=pvfs->open_files;f;f=f->next) {
35                 if (f->fnum == fnum) {
36                         if (req->session != f->session) {
37                                 DEBUG(2,("pvfs_find_fd: attempt to use wrong session for fnum %d\n", fnum));
38                                 return NULL;
39                         }
40                         return f;
41                 }
42         }
43         return NULL;
44 }
45
46 /*
47   by using a destructor we make sure that abnormal cleanup will not 
48   leak file descriptors (assuming at least the top level pointer is freed, which
49   will cascade down to here)
50 */
51 static int pvfs_fd_destructor(void *p)
52 {
53         struct pvfs_file *f = p;
54         if (f->fd != -1) {
55                 close(f->fd);
56                 f->fd = -1;
57         }
58         return 0;
59 }
60
61 /*
62   open a file
63   TODO: this is a temporary implementation derived from the simple backend
64   its purpose is to allow other tests to run 
65 */
66 NTSTATUS pvfs_open(struct ntvfs_module_context *ntvfs,
67                    struct smbsrv_request *req, union smb_open *io)
68 {
69         struct pvfs_state *pvfs = ntvfs->private_data;
70         int fd, flags;
71         struct pvfs_filename *name;
72         struct pvfs_file *f;
73         NTSTATUS status;
74
75         if (io->generic.level != RAW_OPEN_GENERIC) {
76                 return ntvfs_map_open(req, io, ntvfs);
77         }
78
79         /* resolve the cifs name to a posix name */
80         status = pvfs_resolve_name(pvfs, req, io->ntcreatex.in.fname,
81                                    PVFS_RESOLVE_NO_WILDCARD, &name);
82         if (!NT_STATUS_IS_OK(status)) {
83                 return status;
84         }
85
86         switch (io->generic.in.open_disposition) {
87         case NTCREATEX_DISP_SUPERSEDE:
88         case NTCREATEX_DISP_OVERWRITE_IF:
89                 flags = O_CREAT | O_TRUNC;
90                 break;
91         case NTCREATEX_DISP_OPEN:
92         case NTCREATEX_DISP_OVERWRITE:
93                 flags = 0;
94                 break;
95         case NTCREATEX_DISP_CREATE:
96                 flags = O_CREAT | O_EXCL;
97                 break;
98         case NTCREATEX_DISP_OPEN_IF:
99                 flags = O_CREAT;
100                 break;
101         default:
102                 flags = 0;
103                 break;
104         }
105         
106         flags |= O_RDWR;
107
108 /* we need to do this differently to support systems without O_DIRECTORY */
109 #ifndef O_DIRECTORY
110 #define O_DIRECTORY 0
111 #endif
112
113         if (io->generic.in.create_options & NTCREATEX_OPTIONS_DIRECTORY) {
114                 flags = O_RDONLY | O_DIRECTORY;
115                 if (pvfs->flags & PVFS_FLAG_READONLY) {
116                         goto do_open;
117                 }
118                 switch (io->generic.in.open_disposition) {
119                 case NTCREATEX_DISP_CREATE:
120                         if (mkdir(name->full_name, 0755) == -1) {
121                                 return pvfs_map_errno(pvfs,errno);
122                         }
123                         break;
124                 case NTCREATEX_DISP_OPEN_IF:
125                         if (mkdir(name->full_name, 0755) == -1 && errno != EEXIST) {
126                                 return pvfs_map_errno(pvfs,errno);
127                         }
128                         break;
129                 }
130         }
131
132 do_open:
133         fd = open(name->full_name, flags, 0644);
134         if (fd == -1) {
135                 if (errno == 0)
136                         errno = ENOENT;
137                 return pvfs_map_errno(pvfs,errno);
138         }
139
140         f = talloc_p(pvfs, struct pvfs_file);
141         if (f == NULL) {
142                 close(fd);
143                 return NT_STATUS_NO_MEMORY;
144         }
145
146         /* re-resolve the open fd */
147         status = pvfs_resolve_name_fd(pvfs, fd, name);
148         if (!NT_STATUS_IS_OK(status)) {
149                 return status;
150         }
151
152         f->fnum = fd;
153         f->fd = fd;
154         f->name = talloc_steal(f, name);
155         f->session = req->session;
156         f->smbpid = req->smbpid;
157
158         /* setup a destructor to avoid file descriptor leaks on
159            abnormal termination */
160         talloc_set_destructor(f, pvfs_fd_destructor);
161
162         DLIST_ADD(pvfs->open_files, f);
163
164         ZERO_STRUCT(io->generic.out);
165         
166         io->generic.out.create_time = name->dos.create_time;
167         io->generic.out.access_time = name->dos.access_time;
168         io->generic.out.write_time = name->dos.write_time;
169         io->generic.out.change_time = name->dos.change_time;
170         io->generic.out.fnum = f->fnum;
171         io->generic.out.alloc_size = name->dos.alloc_size;
172         io->generic.out.size = name->st.st_size;
173         io->generic.out.attrib = name->dos.attrib;
174         io->generic.out.is_directory = (name->dos.attrib & FILE_ATTRIBUTE_DIRECTORY)?1:0;
175
176         return NT_STATUS_OK;
177 }
178
179
180 /*
181   close a file
182 */
183 NTSTATUS pvfs_close(struct ntvfs_module_context *ntvfs,
184                     struct smbsrv_request *req, union smb_close *io)
185 {
186         struct pvfs_state *pvfs = ntvfs->private_data;
187         struct pvfs_file *f;
188         NTSTATUS status;
189
190         if (io->generic.level != RAW_CLOSE_CLOSE) {
191                 /* we need a mapping function */
192                 return NT_STATUS_INVALID_LEVEL;
193         }
194
195         f = pvfs_find_fd(pvfs, req, io->close.in.fnum);
196         if (!f) {
197                 return NT_STATUS_INVALID_HANDLE;
198         }
199
200         if (close(f->fd) != 0) {
201                 status = pvfs_map_errno(pvfs, errno);
202         } else {
203                 status = NT_STATUS_OK;
204         }
205
206         talloc_set_destructor(f, NULL);
207
208         DLIST_REMOVE(pvfs->open_files, f);
209         talloc_free(f);
210
211         return status;
212 }
213
214
215 /*
216   logoff - close all file descriptors open by a vuid
217 */
218 NTSTATUS pvfs_logoff(struct ntvfs_module_context *ntvfs,
219                      struct smbsrv_request *req)
220 {
221         struct pvfs_state *pvfs = ntvfs->private_data;
222         struct pvfs_file *f, *next;
223
224         for (f=pvfs->open_files;f;f=next) {
225                 next = f->next;
226                 if (f->session == req->session) {
227                         talloc_set_destructor(f, NULL);
228                         DLIST_REMOVE(pvfs->open_files, f);
229                         talloc_free(f);
230                 }
231         }
232
233         return NT_STATUS_OK;
234 }
235
236
237 /*
238   exit - close files for the current pid
239 */
240 NTSTATUS pvfs_exit(struct ntvfs_module_context *ntvfs,
241                    struct smbsrv_request *req)
242 {
243         struct pvfs_state *pvfs = ntvfs->private_data;
244         struct pvfs_file *f, *next;
245
246         for (f=pvfs->open_files;f;f=next) {
247                 next = f->next;
248                 if (f->smbpid == req->smbpid) {
249                         talloc_set_destructor(f, NULL);
250                         DLIST_REMOVE(pvfs->open_files, f);
251                         talloc_free(f);
252                 }
253         }
254
255         return NT_STATUS_OK;
256 }