libcli/security Provide a common, top level libcli/security/security.h
[kai/samba.git] / source3 / smbd / smb2_tcon.c
1 /*
2    Unix SMB/CIFS implementation.
3    Core SMB2 server
4
5    Copyright (C) Stefan Metzmacher 2009
6
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 3 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with this program.  If not, see <http://www.gnu.org/licenses/>.
19 */
20
21 #include "includes.h"
22 #include "smbd/globals.h"
23 #include "../libcli/smb/smb_common.h"
24 #include "../libcli/security/security.h"
25
26 static NTSTATUS smbd_smb2_tree_connect(struct smbd_smb2_request *req,
27                                        const char *in_path,
28                                        uint8_t *out_share_type,
29                                        uint32_t *out_share_flags,
30                                        uint32_t *out_capabilities,
31                                        uint32_t *out_maximal_access,
32                                        uint32_t *out_tree_id);
33
34 NTSTATUS smbd_smb2_request_process_tcon(struct smbd_smb2_request *req)
35 {
36         const uint8_t *inbody;
37         int i = req->current_idx;
38         uint8_t *outhdr;
39         DATA_BLOB outbody;
40         size_t expected_body_size = 0x09;
41         size_t body_size;
42         uint16_t in_path_offset;
43         uint16_t in_path_length;
44         DATA_BLOB in_path_buffer;
45         char *in_path_string;
46         size_t in_path_string_size;
47         uint8_t out_share_type = 0;
48         uint32_t out_share_flags = 0;
49         uint32_t out_capabilities = 0;
50         uint32_t out_maximal_access = 0;
51         uint32_t out_tree_id = 0;
52         NTSTATUS status;
53         bool ok;
54
55         if (req->in.vector[i+1].iov_len != (expected_body_size & 0xFFFFFFFE)) {
56                 return smbd_smb2_request_error(req, NT_STATUS_INVALID_PARAMETER);
57         }
58
59         inbody = (const uint8_t *)req->in.vector[i+1].iov_base;
60
61         body_size = SVAL(inbody, 0x00);
62         if (body_size != expected_body_size) {
63                 return smbd_smb2_request_error(req, NT_STATUS_INVALID_PARAMETER);
64         }
65
66         in_path_offset = SVAL(inbody, 0x04);
67         in_path_length = SVAL(inbody, 0x06);
68
69         if (in_path_offset != (SMB2_HDR_BODY + (body_size & 0xFFFFFFFE))) {
70                 return smbd_smb2_request_error(req, NT_STATUS_INVALID_PARAMETER);
71         }
72
73         if (in_path_length > req->in.vector[i+2].iov_len) {
74                 return smbd_smb2_request_error(req, NT_STATUS_INVALID_PARAMETER);
75         }
76
77         in_path_buffer.data = (uint8_t *)req->in.vector[i+2].iov_base;
78         in_path_buffer.length = in_path_length;
79
80         ok = convert_string_talloc(req, CH_UTF16, CH_UNIX,
81                                    in_path_buffer.data,
82                                    in_path_buffer.length,
83                                    &in_path_string,
84                                    &in_path_string_size, false);
85         if (!ok) {
86                 return smbd_smb2_request_error(req, NT_STATUS_ILLEGAL_CHARACTER);
87         }
88
89         status = smbd_smb2_tree_connect(req, in_path_string,
90                                         &out_share_type,
91                                         &out_share_flags,
92                                         &out_capabilities,
93                                         &out_maximal_access,
94                                         &out_tree_id);
95         if (!NT_STATUS_IS_OK(status)) {
96                 return smbd_smb2_request_error(req, status);
97         }
98
99         outhdr = (uint8_t *)req->out.vector[i].iov_base;
100
101         outbody = data_blob_talloc(req->out.vector, NULL, 0x10);
102         if (outbody.data == NULL) {
103                 return smbd_smb2_request_error(req, NT_STATUS_NO_MEMORY);
104         }
105
106         SIVAL(outhdr, SMB2_HDR_TID, out_tree_id);
107
108         SSVAL(outbody.data, 0x00, 0x10);        /* struct size */
109         SCVAL(outbody.data, 0x02,
110               out_share_type);                  /* share type */
111         SCVAL(outbody.data, 0x03, 0);           /* reserved */
112         SIVAL(outbody.data, 0x04,
113               out_share_flags);                 /* share flags */
114         SIVAL(outbody.data, 0x08,
115               out_capabilities);                /* capabilities */
116         SIVAL(outbody.data, 0x0C,
117               out_maximal_access);              /* maximal access */
118
119         return smbd_smb2_request_done(req, outbody, NULL);
120 }
121
122 static int smbd_smb2_tcon_destructor(struct smbd_smb2_tcon *tcon)
123 {
124         if (tcon->session == NULL) {
125                 return 0;
126         }
127
128         idr_remove(tcon->session->tcons.idtree, tcon->tid);
129         DLIST_REMOVE(tcon->session->tcons.list, tcon);
130
131         if (tcon->compat_conn) {
132                 set_current_service(tcon->compat_conn, 0, true);
133                 close_cnum(tcon->compat_conn, tcon->session->vuid);
134         }
135
136         tcon->compat_conn = NULL;
137         tcon->tid = 0;
138         tcon->session = NULL;
139
140         return 0;
141 }
142
143 static NTSTATUS smbd_smb2_tree_connect(struct smbd_smb2_request *req,
144                                        const char *in_path,
145                                        uint8_t *out_share_type,
146                                        uint32_t *out_share_flags,
147                                        uint32_t *out_capabilities,
148                                        uint32_t *out_maximal_access,
149                                        uint32_t *out_tree_id)
150 {
151         const char *share = in_path;
152         fstring service;
153         int snum = -1;
154         struct smbd_smb2_tcon *tcon;
155         connection_struct *compat_conn = NULL;
156         user_struct *compat_vuser = req->session->compat_vuser;
157         int id;
158         NTSTATUS status;
159
160         if (strncmp(share, "\\\\", 2) == 0) {
161                 const char *p = strchr(share+2, '\\');
162                 if (p) {
163                         share = p + 1;
164                 }
165         }
166
167         DEBUG(10,("smbd_smb2_tree_connect: path[%s] share[%s]\n",
168                   in_path, share));
169
170         fstrcpy(service, share);
171
172         strlower_m(service);
173
174         /* TODO: do more things... */
175         if (strequal(service,HOMES_NAME)) {
176                 if (compat_vuser->homes_snum == -1) {
177                         DEBUG(2, ("[homes] share not available for "
178                                 "user %s because it was not found "
179                                 "or created at session setup "
180                                 "time\n",
181                                 compat_vuser->server_info->unix_name));
182                         return NT_STATUS_BAD_NETWORK_NAME;
183                 }
184                 snum = compat_vuser->homes_snum;
185         } else if ((compat_vuser->homes_snum != -1)
186                    && strequal(service,
187                         lp_servicename(compat_vuser->homes_snum))) {
188                 snum = compat_vuser->homes_snum;
189         } else {
190                 snum = find_service(service);
191         }
192
193         if (snum < 0) {
194                 DEBUG(3,("smbd_smb2_tree_connect: couldn't find service %s\n",
195                          service));
196                 return NT_STATUS_BAD_NETWORK_NAME;
197         }
198
199         /* create a new tcon as child of the session */
200         tcon = talloc_zero(req->session, struct smbd_smb2_tcon);
201         if (tcon == NULL) {
202                 return NT_STATUS_NO_MEMORY;
203         }
204         id = idr_get_new_random(req->session->tcons.idtree,
205                                 tcon,
206                                 req->session->tcons.limit);
207         if (id == -1) {
208                 TALLOC_FREE(tcon);
209                 return NT_STATUS_INSUFFICIENT_RESOURCES;
210         }
211         tcon->tid = id;
212         tcon->snum = snum;
213
214         DLIST_ADD_END(req->session->tcons.list, tcon,
215                       struct smbd_smb2_tcon *);
216         tcon->session = req->session;
217         talloc_set_destructor(tcon, smbd_smb2_tcon_destructor);
218
219         compat_conn = make_connection_snum(req->sconn,
220                                         snum, req->session->compat_vuser,
221                                         data_blob_null, "???",
222                                         &status);
223         if (compat_conn == NULL) {
224                 TALLOC_FREE(tcon);
225                 return status;
226         }
227         tcon->compat_conn = talloc_move(tcon, &compat_conn);
228         tcon->compat_conn->cnum = tcon->tid;
229
230         if (IS_PRINT(tcon->compat_conn)) {
231                 *out_share_type = SMB2_SHARE_TYPE_PRINT;
232         } else if (IS_IPC(tcon->compat_conn)) {
233                 *out_share_type = SMB2_SHARE_TYPE_PIPE;
234         } else {
235                 *out_share_type = SMB2_SHARE_TYPE_DISK;
236         }
237
238         *out_share_flags = SMB2_SHAREFLAG_ALLOW_NAMESPACE_CACHING;
239
240         if (lp_msdfs_root(SNUM(tcon->compat_conn)) && lp_host_msdfs()) {
241                 *out_share_flags |= (SMB2_SHAREFLAG_DFS|SMB2_SHAREFLAG_DFS_ROOT);
242                 *out_capabilities = SMB2_SHARE_CAP_DFS;
243         } else {
244                 *out_capabilities = 0;
245         }
246
247         switch(lp_csc_policy(SNUM(tcon->compat_conn))) {
248         case CSC_POLICY_MANUAL:
249                 break;
250         case CSC_POLICY_DOCUMENTS:
251                 *out_share_flags |= SMB2_SHAREFLAG_AUTO_CACHING;
252                 break;
253         case CSC_POLICY_PROGRAMS:
254                 *out_share_flags |= SMB2_SHAREFLAG_VDO_CACHING;
255                 break;
256         case CSC_POLICY_DISABLE:
257                 *out_share_flags |= SMB2_SHAREFLAG_NO_CACHING;
258                 break;
259         default:
260                 break;
261         }
262
263         *out_maximal_access = FILE_GENERIC_ALL;
264
265         *out_tree_id = tcon->tid;
266         return NT_STATUS_OK;
267 }
268
269 NTSTATUS smbd_smb2_request_check_tcon(struct smbd_smb2_request *req)
270 {
271         const uint8_t *inhdr;
272         const uint8_t *outhdr;
273         int i = req->current_idx;
274         uint32_t in_tid;
275         void *p;
276         struct smbd_smb2_tcon *tcon;
277         bool chained_fixup = false;
278
279         inhdr = (const uint8_t *)req->in.vector[i+0].iov_base;
280
281         in_tid = IVAL(inhdr, SMB2_HDR_TID);
282
283         if (in_tid == (0xFFFFFFFF)) {
284                 if (req->async) {
285                         /*
286                          * async request - fill in tid from
287                          * already setup out.vector[].iov_base.
288                          */
289                         outhdr = (const uint8_t *)req->out.vector[i].iov_base;
290                         in_tid = IVAL(outhdr, SMB2_HDR_TID);
291                 } else if (i > 2) {
292                         /*
293                          * Chained request - fill in tid from
294                          * the previous request out.vector[].iov_base.
295                          */
296                         outhdr = (const uint8_t *)req->out.vector[i-3].iov_base;
297                         in_tid = IVAL(outhdr, SMB2_HDR_TID);
298                         chained_fixup = true;
299                 }
300         }
301
302         /* lookup an existing session */
303         p = idr_find(req->session->tcons.idtree, in_tid);
304         if (p == NULL) {
305                 return NT_STATUS_NETWORK_NAME_DELETED;
306         }
307         tcon = talloc_get_type_abort(p, struct smbd_smb2_tcon);
308
309         if (!change_to_user(tcon->compat_conn,req->session->vuid)) {
310                 return NT_STATUS_ACCESS_DENIED;
311         }
312
313         /* should we pass FLAG_CASELESS_PATHNAMES here? */
314         if (!set_current_service(tcon->compat_conn, 0, true)) {
315                 return NT_STATUS_ACCESS_DENIED;
316         }
317
318         req->tcon = tcon;
319
320         if (chained_fixup) {
321                 /* Fix up our own outhdr. */
322                 outhdr = (const uint8_t *)req->out.vector[i].iov_base;
323                 SIVAL(outhdr, SMB2_HDR_TID, in_tid);
324         }
325
326         return NT_STATUS_OK;
327 }
328
329 NTSTATUS smbd_smb2_request_process_tdis(struct smbd_smb2_request *req)
330 {
331         const uint8_t *inbody;
332         int i = req->current_idx;
333         DATA_BLOB outbody;
334         size_t expected_body_size = 0x04;
335         size_t body_size;
336
337         if (req->in.vector[i+1].iov_len != (expected_body_size & 0xFFFFFFFE)) {
338                 return smbd_smb2_request_error(req, NT_STATUS_INVALID_PARAMETER);
339         }
340
341         inbody = (const uint8_t *)req->in.vector[i+1].iov_base;
342
343         body_size = SVAL(inbody, 0x00);
344         if (body_size != expected_body_size) {
345                 return smbd_smb2_request_error(req, NT_STATUS_INVALID_PARAMETER);
346         }
347
348         /*
349          * TODO: cancel all outstanding requests on the tcon
350          *       and delete all file handles.
351          */
352         TALLOC_FREE(req->tcon);
353
354         outbody = data_blob_talloc(req->out.vector, NULL, 0x04);
355         if (outbody.data == NULL) {
356                 return smbd_smb2_request_error(req, NT_STATUS_NO_MEMORY);
357         }
358
359         SSVAL(outbody.data, 0x00, 0x04);        /* struct size */
360         SSVAL(outbody.data, 0x02, 0);           /* reserved */
361
362         return smbd_smb2_request_done(req, outbody, NULL);
363 }