r2916: longhorn client doesn't bother setting the directory bit in ntcreatex
[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             !(name->dos.attrib & FILE_ATTRIBUTE_DIRECTORY)) {
115                 return NT_STATUS_NOT_A_DIRECTORY;
116         }
117
118         if (name->dos.attrib & FILE_ATTRIBUTE_DIRECTORY) {
119                 flags = O_RDONLY | O_DIRECTORY;
120                 if (pvfs->flags & PVFS_FLAG_READONLY) {
121                         goto do_open;
122                 }
123                 switch (io->generic.in.open_disposition) {
124                 case NTCREATEX_DISP_CREATE:
125                         if (mkdir(name->full_name, 0755) == -1) {
126                                 return pvfs_map_errno(pvfs,errno);
127                         }
128                         break;
129                 case NTCREATEX_DISP_OPEN_IF:
130                         if (mkdir(name->full_name, 0755) == -1 && errno != EEXIST) {
131                                 return pvfs_map_errno(pvfs,errno);
132                         }
133                         break;
134                 }
135         }
136
137 do_open:
138         fd = open(name->full_name, flags, 0644);
139         if (fd == -1) {
140                 if (errno == 0)
141                         errno = ENOENT;
142                 return pvfs_map_errno(pvfs,errno);
143         }
144
145         f = talloc_p(pvfs, struct pvfs_file);
146         if (f == NULL) {
147                 close(fd);
148                 return NT_STATUS_NO_MEMORY;
149         }
150
151         /* re-resolve the open fd */
152         status = pvfs_resolve_name_fd(pvfs, fd, name);
153         if (!NT_STATUS_IS_OK(status)) {
154                 return status;
155         }
156
157         f->fnum = fd;
158         f->fd = fd;
159         f->name = talloc_steal(f, name);
160         f->session = req->session;
161         f->smbpid = req->smbpid;
162
163         /* setup a destructor to avoid file descriptor leaks on
164            abnormal termination */
165         talloc_set_destructor(f, pvfs_fd_destructor);
166
167         DLIST_ADD(pvfs->open_files, f);
168
169         ZERO_STRUCT(io->generic.out);
170         
171         io->generic.out.create_time = name->dos.create_time;
172         io->generic.out.access_time = name->dos.access_time;
173         io->generic.out.write_time = name->dos.write_time;
174         io->generic.out.change_time = name->dos.change_time;
175         io->generic.out.fnum = f->fnum;
176         io->generic.out.alloc_size = name->dos.alloc_size;
177         io->generic.out.size = name->st.st_size;
178         io->generic.out.attrib = name->dos.attrib;
179         io->generic.out.is_directory = (name->dos.attrib & FILE_ATTRIBUTE_DIRECTORY)?1:0;
180
181         return NT_STATUS_OK;
182 }
183
184
185 /*
186   close a file
187 */
188 NTSTATUS pvfs_close(struct ntvfs_module_context *ntvfs,
189                     struct smbsrv_request *req, union smb_close *io)
190 {
191         struct pvfs_state *pvfs = ntvfs->private_data;
192         struct pvfs_file *f;
193         NTSTATUS status;
194
195         if (io->generic.level != RAW_CLOSE_CLOSE) {
196                 /* we need a mapping function */
197                 return NT_STATUS_INVALID_LEVEL;
198         }
199
200         f = pvfs_find_fd(pvfs, req, io->close.in.fnum);
201         if (!f) {
202                 return NT_STATUS_INVALID_HANDLE;
203         }
204
205         if (close(f->fd) != 0) {
206                 status = pvfs_map_errno(pvfs, errno);
207         } else {
208                 status = NT_STATUS_OK;
209         }
210
211         talloc_set_destructor(f, NULL);
212
213         DLIST_REMOVE(pvfs->open_files, f);
214         talloc_free(f);
215
216         return status;
217 }
218
219
220 /*
221   logoff - close all file descriptors open by a vuid
222 */
223 NTSTATUS pvfs_logoff(struct ntvfs_module_context *ntvfs,
224                      struct smbsrv_request *req)
225 {
226         struct pvfs_state *pvfs = ntvfs->private_data;
227         struct pvfs_file *f, *next;
228
229         for (f=pvfs->open_files;f;f=next) {
230                 next = f->next;
231                 if (f->session == req->session) {
232                         talloc_set_destructor(f, NULL);
233                         DLIST_REMOVE(pvfs->open_files, f);
234                         talloc_free(f);
235                 }
236         }
237
238         return NT_STATUS_OK;
239 }
240
241
242 /*
243   exit - close files for the current pid
244 */
245 NTSTATUS pvfs_exit(struct ntvfs_module_context *ntvfs,
246                    struct smbsrv_request *req)
247 {
248         struct pvfs_state *pvfs = ntvfs->private_data;
249         struct pvfs_file *f, *next;
250
251         for (f=pvfs->open_files;f;f=next) {
252                 next = f->next;
253                 if (f->smbpid == req->smbpid) {
254                         talloc_set_destructor(f, NULL);
255                         DLIST_REMOVE(pvfs->open_files, f);
256                         talloc_free(f);
257                 }
258         }
259
260         return NT_STATUS_OK;
261 }