s3: VFS: vfs_acl_tdb. Implement unlinkat().
[samba.git] / source3 / modules / vfs_acl_tdb.c
1 /*
2  * Store Windows ACLs in a tdb.
3  *
4  * Copyright (C) Volker Lendecke, 2008
5  * Copyright (C) Jeremy Allison, 2008
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/smbd.h"
23 #include "system/filesys.h"
24 #include "librpc/gen_ndr/xattr.h"
25 #include "dbwrap/dbwrap.h"
26 #include "dbwrap/dbwrap_open.h"
27 #include "auth.h"
28 #include "util_tdb.h"
29 #include "vfs_acl_common.h"
30
31 #undef DBGC_CLASS
32 #define DBGC_CLASS DBGC_VFS
33
34 #define ACL_MODULE_NAME "acl_tdb"
35
36 static unsigned int ref_count;
37 static struct db_context *acl_db;
38
39 /*******************************************************************
40  Open acl_db if not already open, increment ref count.
41 *******************************************************************/
42
43 static bool acl_tdb_init(void)
44 {
45         char *dbname;
46
47         if (acl_db) {
48                 ref_count++;
49                 return true;
50         }
51
52         dbname = state_path(talloc_tos(), "file_ntacls.tdb");
53
54         if (dbname == NULL) {
55                 errno = ENOSYS;
56                 return false;
57         }
58
59         become_root();
60         acl_db = db_open(NULL, dbname, 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0600,
61                          DBWRAP_LOCK_ORDER_1, DBWRAP_FLAG_NONE);
62         unbecome_root();
63
64         if (acl_db == NULL) {
65 #if defined(ENOTSUP)
66                 errno = ENOTSUP;
67 #else
68                 errno = ENOSYS;
69 #endif
70                 TALLOC_FREE(dbname);
71                 return false;
72         }
73
74         ref_count++;
75         TALLOC_FREE(dbname);
76         return true;
77 }
78
79 /*******************************************************************
80  Lower ref count and close acl_db if zero.
81 *******************************************************************/
82
83 static void disconnect_acl_tdb(struct vfs_handle_struct *handle)
84 {
85         SMB_VFS_NEXT_DISCONNECT(handle);
86         ref_count--;
87         if (ref_count == 0) {
88                 TALLOC_FREE(acl_db);
89         }
90 }
91
92 /*******************************************************************
93  Fetch_lock the tdb acl record for a file
94 *******************************************************************/
95
96 static struct db_record *acl_tdb_lock(TALLOC_CTX *mem_ctx,
97                                         struct db_context *db,
98                                         const struct file_id *id)
99 {
100         uint8_t id_buf[16];
101
102         /* For backwards compatibility only store the dev/inode. */
103         push_file_id_16((char *)id_buf, id);
104         return dbwrap_fetch_locked(db,
105                                    mem_ctx,
106                                    make_tdb_data(id_buf,
107                                                  sizeof(id_buf)));
108 }
109
110 /*******************************************************************
111  Delete the tdb acl record for a file
112 *******************************************************************/
113
114 static NTSTATUS acl_tdb_delete(vfs_handle_struct *handle,
115                                 struct db_context *db,
116                                 SMB_STRUCT_STAT *psbuf)
117 {
118         NTSTATUS status;
119         struct file_id id = vfs_file_id_from_sbuf(handle->conn, psbuf);
120         struct db_record *rec = acl_tdb_lock(talloc_tos(), db, &id);
121
122         /*
123          * If rec == NULL there's not much we can do about it
124          */
125
126         if (rec == NULL) {
127                 DEBUG(10,("acl_tdb_delete: rec == NULL\n"));
128                 TALLOC_FREE(rec);
129                 return NT_STATUS_OK;
130         }
131
132         status = dbwrap_record_delete(rec);
133         TALLOC_FREE(rec);
134         return status;
135 }
136
137 /*******************************************************************
138  Pull a security descriptor into a DATA_BLOB from a tdb store.
139 *******************************************************************/
140
141 static NTSTATUS get_acl_blob(TALLOC_CTX *ctx,
142                         vfs_handle_struct *handle,
143                         files_struct *fsp,
144                         const struct smb_filename *smb_fname,
145                         DATA_BLOB *pblob)
146 {
147         uint8_t id_buf[16];
148         TDB_DATA data;
149         struct file_id id;
150         struct db_context *db = acl_db;
151         NTSTATUS status = NT_STATUS_OK;
152         SMB_STRUCT_STAT sbuf;
153
154         ZERO_STRUCT(sbuf);
155
156         if (fsp) {
157                 status = vfs_stat_fsp(fsp);
158                 sbuf = fsp->fsp_name->st;
159         } else {
160                 int ret = vfs_stat_smb_basename(handle->conn,
161                                 smb_fname,
162                                 &sbuf);
163                 if (ret == -1) {
164                         status = map_nt_error_from_unix(errno);
165                 }
166         }
167
168         if (!NT_STATUS_IS_OK(status)) {
169                 return status;
170         }
171
172         id = vfs_file_id_from_sbuf(handle->conn, &sbuf);
173
174         /* For backwards compatibility only store the dev/inode. */
175         push_file_id_16((char *)id_buf, &id);
176
177         status = dbwrap_fetch(db,
178                               ctx,
179                               make_tdb_data(id_buf, sizeof(id_buf)),
180                               &data);
181         if (!NT_STATUS_IS_OK(status)) {
182                 return NT_STATUS_INTERNAL_DB_CORRUPTION;
183         }
184
185         pblob->data = data.dptr;
186         pblob->length = data.dsize;
187
188         DEBUG(10,("get_acl_blob: returned %u bytes from file %s\n",
189                 (unsigned int)data.dsize, smb_fname->base_name ));
190
191         if (pblob->length == 0 || pblob->data == NULL) {
192                 return NT_STATUS_NOT_FOUND;
193         }
194         return NT_STATUS_OK;
195 }
196
197 /*******************************************************************
198  Store a DATA_BLOB into a tdb record given an fsp pointer.
199 *******************************************************************/
200
201 static NTSTATUS store_acl_blob_fsp(vfs_handle_struct *handle,
202                                 files_struct *fsp,
203                                 DATA_BLOB *pblob)
204 {
205         uint8_t id_buf[16];
206         struct file_id id;
207         TDB_DATA data;
208         struct db_context *db = acl_db;
209         struct db_record *rec;
210         NTSTATUS status;
211
212         DEBUG(10,("store_acl_blob_fsp: storing blob length %u on file %s\n",
213                   (unsigned int)pblob->length, fsp_str_dbg(fsp)));
214
215         status = vfs_stat_fsp(fsp);
216         if (!NT_STATUS_IS_OK(status)) {
217                 return status;
218         }
219
220         id = vfs_file_id_from_sbuf(handle->conn, &fsp->fsp_name->st);
221
222         /* For backwards compatibility only store the dev/inode. */
223         push_file_id_16((char *)id_buf, &id);
224         rec = dbwrap_fetch_locked(db, talloc_tos(),
225                                   make_tdb_data(id_buf,
226                                                 sizeof(id_buf)));
227         if (rec == NULL) {
228                 DEBUG(0, ("store_acl_blob_fsp_tdb: fetch_lock failed\n"));
229                 return NT_STATUS_INTERNAL_DB_CORRUPTION;
230         }
231         data.dptr = pblob->data;
232         data.dsize = pblob->length;
233         return dbwrap_record_store(rec, data, 0);
234 }
235
236 /*********************************************************************
237  On unlink we need to delete the tdb record (if using tdb).
238 *********************************************************************/
239
240 static int unlink_acl_tdb(vfs_handle_struct *handle,
241                           const struct smb_filename *smb_fname)
242 {
243         struct smb_filename *smb_fname_tmp = NULL;
244         struct db_context *db = acl_db;
245         int ret = -1;
246
247         smb_fname_tmp = cp_smb_filename_nostream(talloc_tos(), smb_fname);
248         if (smb_fname_tmp == NULL) {
249                 errno = ENOMEM;
250                 goto out;
251         }
252
253         if (smb_fname_tmp->flags & SMB_FILENAME_POSIX_PATH) {
254                 ret = SMB_VFS_LSTAT(handle->conn, smb_fname_tmp);
255         } else {
256                 ret = SMB_VFS_STAT(handle->conn, smb_fname_tmp);
257         }
258
259         if (ret == -1) {
260                 goto out;
261         }
262
263         ret = unlink_acl_common(handle, smb_fname_tmp);
264
265         if (ret == -1) {
266                 goto out;
267         }
268
269         acl_tdb_delete(handle, db, &smb_fname_tmp->st);
270  out:
271         return ret;
272 }
273
274 /*********************************************************************
275  On unlinkat we need to delete the tdb record (if using tdb).
276 *********************************************************************/
277
278 static int unlinkat_acl_tdb(vfs_handle_struct *handle,
279                         struct files_struct *dirfsp,
280                         const struct smb_filename *smb_fname,
281                         int flags)
282 {
283         struct smb_filename *smb_fname_tmp = NULL;
284         struct db_context *db = acl_db;
285         int ret = -1;
286
287         smb_fname_tmp = cp_smb_filename_nostream(talloc_tos(), smb_fname);
288         if (smb_fname_tmp == NULL) {
289                 errno = ENOMEM;
290                 goto out;
291         }
292
293         if (smb_fname_tmp->flags & SMB_FILENAME_POSIX_PATH) {
294                 ret = SMB_VFS_LSTAT(handle->conn, smb_fname_tmp);
295         } else {
296                 ret = SMB_VFS_STAT(handle->conn, smb_fname_tmp);
297         }
298
299         if (ret == -1) {
300                 goto out;
301         }
302
303         if (flags & AT_REMOVEDIR) {
304                 ret = rmdir_acl_common(handle, smb_fname_tmp);
305         } else {
306                 ret = unlink_acl_common(handle, smb_fname_tmp);
307         }
308
309         if (ret == -1) {
310                 goto out;
311         }
312
313         acl_tdb_delete(handle, db, &smb_fname_tmp->st);
314  out:
315         return ret;
316 }
317
318 /*********************************************************************
319  On rmdir we need to delete the tdb record (if using tdb).
320 *********************************************************************/
321
322 static int rmdir_acl_tdb(vfs_handle_struct *handle,
323                 const struct smb_filename *smb_fname)
324 {
325
326         SMB_STRUCT_STAT sbuf;
327         struct db_context *db = acl_db;
328         int ret = -1;
329
330         ret = vfs_stat_smb_basename(handle->conn, smb_fname, &sbuf);
331         if (ret == -1) {
332                 return -1;
333         }
334
335         ret = rmdir_acl_common(handle, smb_fname);
336         if (ret == -1) {
337                 return -1;
338         }
339
340         acl_tdb_delete(handle, db, &sbuf);
341         return 0;
342 }
343
344 /*******************************************************************
345  Handle opening the storage tdb if so configured.
346 *******************************************************************/
347
348 static int connect_acl_tdb(struct vfs_handle_struct *handle,
349                                 const char *service,
350                                 const char *user)
351 {
352         int ret = SMB_VFS_NEXT_CONNECT(handle, service, user);
353         bool ok;
354         struct acl_common_config *config = NULL;
355
356         if (ret < 0) {
357                 return ret;
358         }
359
360         if (!acl_tdb_init()) {
361                 SMB_VFS_NEXT_DISCONNECT(handle);
362                 return -1;
363         }
364
365         ok = init_acl_common_config(handle, ACL_MODULE_NAME);
366         if (!ok) {
367                 DBG_ERR("init_acl_common_config failed\n");
368                 return -1;
369         }
370
371         /* Ensure we have the parameters correct if we're
372          * using this module. */
373         DEBUG(2,("connect_acl_tdb: setting 'inherit acls = true' "
374                 "'dos filemode = true' and "
375                 "'force unknown acl user = true' for service %s\n",
376                 service ));
377
378         lp_do_parameter(SNUM(handle->conn), "inherit acls", "true");
379         lp_do_parameter(SNUM(handle->conn), "dos filemode", "true");
380         lp_do_parameter(SNUM(handle->conn), "force unknown acl user", "true");
381
382         SMB_VFS_HANDLE_GET_DATA(handle, config,
383                                 struct acl_common_config,
384                                 return -1);
385
386         if (config->ignore_system_acls) {
387                 mode_t create_mask = lp_create_mask(SNUM(handle->conn));
388                 char *create_mask_str = NULL;
389
390                 if ((create_mask & 0666) != 0666) {
391                         create_mask |= 0666;
392                         create_mask_str = talloc_asprintf(handle, "0%o",
393                                                           create_mask);
394                         if (create_mask_str == NULL) {
395                                 DBG_ERR("talloc_asprintf failed\n");
396                                 return -1;
397                         }
398
399                         DBG_NOTICE("setting 'create mask = %s'\n", create_mask_str);
400
401                         lp_do_parameter (SNUM(handle->conn),
402                                         "create mask", create_mask_str);
403
404                         TALLOC_FREE(create_mask_str);
405                 }
406
407                 DBG_NOTICE("setting 'directory mask = 0777', "
408                            "'store dos attributes = yes' and all "
409                            "'map ...' options to 'no'\n");
410
411                 lp_do_parameter(SNUM(handle->conn), "directory mask", "0777");
412                 lp_do_parameter(SNUM(handle->conn), "map archive", "no");
413                 lp_do_parameter(SNUM(handle->conn), "map hidden", "no");
414                 lp_do_parameter(SNUM(handle->conn), "map readonly", "no");
415                 lp_do_parameter(SNUM(handle->conn), "map system", "no");
416                 lp_do_parameter(SNUM(handle->conn), "store dos attributes",
417                                 "yes");
418         }
419
420         return 0;
421 }
422
423 /*********************************************************************
424  Remove a Windows ACL - we're setting the underlying POSIX ACL.
425 *********************************************************************/
426
427 static int sys_acl_set_file_tdb(vfs_handle_struct *handle,
428                         const struct smb_filename *smb_fname_in,
429                         SMB_ACL_TYPE_T type,
430                         SMB_ACL_T theacl)
431 {
432         struct db_context *db = acl_db;
433         int ret = -1;
434         int saved_errno = 0;
435         struct smb_filename *smb_fname = NULL;
436
437         smb_fname = cp_smb_filename_nostream(talloc_tos(), smb_fname_in);
438         if (smb_fname == NULL) {
439                 return -1;
440         };
441
442         ret = SMB_VFS_STAT(handle->conn, smb_fname);
443         if (ret == -1) {
444                 saved_errno = errno;
445                 goto fail;
446         }
447
448         ret = SMB_VFS_NEXT_SYS_ACL_SET_FILE(handle,
449                                                 smb_fname,
450                                                 type,
451                                                 theacl);
452         if (ret == -1) {
453                 saved_errno = errno;
454                 goto fail;
455         }
456
457         acl_tdb_delete(handle, db, &smb_fname->st);
458
459 fail:
460         TALLOC_FREE(smb_fname);
461
462         if (saved_errno != 0) {
463                 errno = saved_errno;
464         }
465         return ret;
466 }
467
468 /*********************************************************************
469  Remove a Windows ACL - we're setting the underlying POSIX ACL.
470 *********************************************************************/
471
472 static int sys_acl_set_fd_tdb(vfs_handle_struct *handle,
473                             files_struct *fsp,
474                             SMB_ACL_T theacl)
475 {
476         struct db_context *db = acl_db;
477         NTSTATUS status;
478         int ret;
479
480         status = vfs_stat_fsp(fsp);
481         if (!NT_STATUS_IS_OK(status)) {
482                 return -1;
483         }
484
485         ret = SMB_VFS_NEXT_SYS_ACL_SET_FD(handle,
486                                                 fsp,
487                                                 theacl);
488         if (ret == -1) {
489                 return -1;
490         }
491
492         acl_tdb_delete(handle, db, &fsp->fsp_name->st);
493         return 0;
494 }
495
496 static NTSTATUS acl_tdb_fget_nt_acl(vfs_handle_struct *handle,
497                                     files_struct *fsp,
498                                     uint32_t security_info,
499                                     TALLOC_CTX *mem_ctx,
500                                     struct security_descriptor **ppdesc)
501 {
502         NTSTATUS status;
503         status = get_nt_acl_common(get_acl_blob, handle, fsp, NULL,
504                                    security_info, mem_ctx, ppdesc);
505         return status;
506 }
507
508 static NTSTATUS acl_tdb_get_nt_acl(vfs_handle_struct *handle,
509                                    const struct smb_filename *smb_fname,
510                                    uint32_t security_info,
511                                    TALLOC_CTX *mem_ctx,
512                                    struct security_descriptor **ppdesc)
513 {
514         NTSTATUS status;
515         status = get_nt_acl_common(get_acl_blob, handle, NULL, smb_fname,
516                                    security_info, mem_ctx, ppdesc);
517         return status;
518 }
519
520 static NTSTATUS acl_tdb_fset_nt_acl(vfs_handle_struct *handle,
521                                     files_struct *fsp,
522                                     uint32_t security_info_sent,
523                                     const struct security_descriptor *psd)
524 {
525         NTSTATUS status;
526         status = fset_nt_acl_common(get_acl_blob, store_acl_blob_fsp,
527                                     ACL_MODULE_NAME,
528                                     handle, fsp, security_info_sent, psd);
529         return status;
530 }
531
532 static struct vfs_fn_pointers vfs_acl_tdb_fns = {
533         .connect_fn = connect_acl_tdb,
534         .disconnect_fn = disconnect_acl_tdb,
535         .rmdir_fn = rmdir_acl_tdb,
536         .unlink_fn = unlink_acl_tdb,
537         .unlinkat_fn = unlinkat_acl_tdb,
538         .chmod_fn = chmod_acl_module_common,
539         .fchmod_fn = fchmod_acl_module_common,
540         .fget_nt_acl_fn = acl_tdb_fget_nt_acl,
541         .get_nt_acl_fn = acl_tdb_get_nt_acl,
542         .fset_nt_acl_fn = acl_tdb_fset_nt_acl,
543         .sys_acl_set_file_fn = sys_acl_set_file_tdb,
544         .sys_acl_set_fd_fn = sys_acl_set_fd_tdb
545 };
546
547 static_decl_vfs;
548 NTSTATUS vfs_acl_tdb_init(TALLOC_CTX *ctx)
549 {
550         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "acl_tdb",
551                                 &vfs_acl_tdb_fns);
552 }