dsdb: Improve code clarity for ldb_extended_dn_in_openldap mode
[obnox/samba/samba-obnox.git] / source3 / modules / vfs_cap.c
1 /*
2  * CAP VFS module for Samba 3.x Version 0.3
3  *
4  * Copyright (C) Tim Potter, 1999-2000
5  * Copyright (C) Alexander Bokovoy, 2002-2003
6  * Copyright (C) Stefan (metze) Metzmacher, 2003
7  * Copyright (C) TAKAHASHI Motonobu (monyo), 2003
8  * Copyright (C) Jeremy Allison, 2007
9  *
10  * This program is free software; you can redistribute it and/or modify
11  * it under the terms of the GNU General Public License as published by
12  * the Free Software Foundation; either version 3 of the License, or
13  * (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, see <http://www.gnu.org/licenses/>.
22  */
23
24
25 #include "includes.h"
26 #include "smbd/smbd.h"
27
28 /* cap functions */
29 static char *capencode(TALLOC_CTX *ctx, const char *from);
30 static char *capdecode(TALLOC_CTX *ctx, const char *from);
31
32 static uint64_t cap_disk_free(vfs_handle_struct *handle, const char *path,
33         bool small_query, uint64_t *bsize,
34         uint64_t *dfree, uint64_t *dsize)
35 {
36         char *cappath = capencode(talloc_tos(), path);
37
38         if (!cappath) {
39                 errno = ENOMEM;
40                 return (uint64_t)-1;
41         }
42         return SMB_VFS_NEXT_DISK_FREE(handle, cappath, small_query, bsize,
43                                         dfree, dsize);
44 }
45
46 static DIR *cap_opendir(vfs_handle_struct *handle, const char *fname, const char *mask, uint32 attr)
47 {
48         char *capname = capencode(talloc_tos(), fname);
49
50         if (!capname) {
51                 errno = ENOMEM;
52                 return NULL;
53         }
54         return SMB_VFS_NEXT_OPENDIR(handle, capname, mask, attr);
55 }
56
57 static struct dirent *cap_readdir(vfs_handle_struct *handle,
58                                       DIR *dirp,
59                                       SMB_STRUCT_STAT *sbuf)
60 {
61         struct dirent *result;
62         struct dirent *newdirent;
63         char *newname;
64         size_t newnamelen;
65         DEBUG(3,("cap: cap_readdir\n"));
66
67         result = SMB_VFS_NEXT_READDIR(handle, dirp, NULL);
68         if (!result) {
69                 return NULL;
70         }
71
72         newname = capdecode(talloc_tos(), result->d_name);
73         if (!newname) {
74                 return NULL;
75         }
76         DEBUG(3,("cap: cap_readdir: %s\n", newname));
77         newnamelen = strlen(newname)+1;
78         newdirent = (struct dirent *)talloc_array(talloc_tos(),
79                         char,
80                         sizeof(struct dirent)+
81                                 newnamelen);
82         if (!newdirent) {
83                 return NULL;
84         }
85         memcpy(newdirent, result, sizeof(struct dirent));
86         memcpy(&newdirent->d_name, newname, newnamelen);
87         return newdirent;
88 }
89
90 static int cap_mkdir(vfs_handle_struct *handle, const char *path, mode_t mode)
91 {
92         char *cappath = capencode(talloc_tos(), path);
93
94         if (!cappath) {
95                 errno = ENOMEM;
96                 return -1;
97         }
98         return SMB_VFS_NEXT_MKDIR(handle, cappath, mode);
99 }
100
101 static int cap_rmdir(vfs_handle_struct *handle, const char *path)
102 {
103         char *cappath = capencode(talloc_tos(), path);
104
105         if (!cappath) {
106                 errno = ENOMEM;
107                 return -1;
108         }
109         return SMB_VFS_NEXT_RMDIR(handle, cappath);
110 }
111
112 static int cap_open(vfs_handle_struct *handle, struct smb_filename *smb_fname,
113                     files_struct *fsp, int flags, mode_t mode)
114 {
115         char *cappath;
116         char *tmp_base_name = NULL;
117         int ret;
118
119         cappath = capencode(talloc_tos(), smb_fname->base_name);
120
121         if (!cappath) {
122                 errno = ENOMEM;
123                 return -1;
124         }
125
126         tmp_base_name = smb_fname->base_name;
127         smb_fname->base_name = cappath;
128
129         DEBUG(3,("cap: cap_open for %s\n", smb_fname_str_dbg(smb_fname)));
130         ret = SMB_VFS_NEXT_OPEN(handle, smb_fname, fsp, flags, mode);
131
132         smb_fname->base_name = tmp_base_name;
133         TALLOC_FREE(cappath);
134
135         return ret;
136 }
137
138 static int cap_rename(vfs_handle_struct *handle,
139                       const struct smb_filename *smb_fname_src,
140                       const struct smb_filename *smb_fname_dst)
141 {
142         char *capold = NULL;
143         char *capnew = NULL;
144         struct smb_filename *smb_fname_src_tmp = NULL;
145         struct smb_filename *smb_fname_dst_tmp = NULL;
146         int ret = -1;
147
148         capold = capencode(talloc_tos(), smb_fname_src->base_name);
149         capnew = capencode(talloc_tos(), smb_fname_dst->base_name);
150         if (!capold || !capnew) {
151                 errno = ENOMEM;
152                 goto out;
153         }
154
155         /* Setup temporary smb_filename structs. */
156         smb_fname_src_tmp = cp_smb_filename(talloc_tos(), smb_fname_src);
157         if (smb_fname_src_tmp == NULL) {
158                 errno = ENOMEM;
159                 goto out;
160         }
161         smb_fname_dst_tmp = cp_smb_filename(talloc_tos(), smb_fname_dst);
162         if (smb_fname_dst_tmp == NULL) {
163                 errno = ENOMEM;
164                 goto out;
165         }
166
167         smb_fname_src_tmp->base_name = capold;
168         smb_fname_dst_tmp->base_name = capnew;
169
170         ret = SMB_VFS_NEXT_RENAME(handle, smb_fname_src_tmp,
171                                   smb_fname_dst_tmp);
172  out:
173         TALLOC_FREE(capold);
174         TALLOC_FREE(capnew);
175         TALLOC_FREE(smb_fname_src_tmp);
176         TALLOC_FREE(smb_fname_dst_tmp);
177
178         return ret;
179 }
180
181 static int cap_stat(vfs_handle_struct *handle, struct smb_filename *smb_fname)
182 {
183         char *cappath;
184         char *tmp_base_name = NULL;
185         int ret;
186
187         cappath = capencode(talloc_tos(), smb_fname->base_name);
188
189         if (!cappath) {
190                 errno = ENOMEM;
191                 return -1;
192         }
193
194         tmp_base_name = smb_fname->base_name;
195         smb_fname->base_name = cappath;
196
197         ret = SMB_VFS_NEXT_STAT(handle, smb_fname);
198
199         smb_fname->base_name = tmp_base_name;
200         TALLOC_FREE(cappath);
201
202         return ret;
203 }
204
205 static int cap_lstat(vfs_handle_struct *handle, struct smb_filename *smb_fname)
206 {
207         char *cappath;
208         char *tmp_base_name = NULL;
209         int ret;
210
211         cappath = capencode(talloc_tos(), smb_fname->base_name);
212
213         if (!cappath) {
214                 errno = ENOMEM;
215                 return -1;
216         }
217
218         tmp_base_name = smb_fname->base_name;
219         smb_fname->base_name = cappath;
220
221         ret = SMB_VFS_NEXT_LSTAT(handle, smb_fname);
222
223         smb_fname->base_name = tmp_base_name;
224         TALLOC_FREE(cappath);
225
226         return ret;
227 }
228
229 static int cap_unlink(vfs_handle_struct *handle,
230                       const struct smb_filename *smb_fname)
231 {
232         struct smb_filename *smb_fname_tmp = NULL;
233         char *cappath = NULL;
234         int ret;
235
236         cappath = capencode(talloc_tos(), smb_fname->base_name);
237         if (!cappath) {
238                 errno = ENOMEM;
239                 return -1;
240         }
241
242         /* Setup temporary smb_filename structs. */
243         smb_fname_tmp = cp_smb_filename(talloc_tos(), smb_fname);
244         if (smb_fname_tmp == NULL) {
245                 errno = ENOMEM;
246                 return -1;
247         }
248
249         smb_fname_tmp->base_name = cappath;
250
251         ret = SMB_VFS_NEXT_UNLINK(handle, smb_fname_tmp);
252
253         TALLOC_FREE(smb_fname_tmp);
254         return ret;
255 }
256
257 static int cap_chmod(vfs_handle_struct *handle, const char *path, mode_t mode)
258 {
259         char *cappath = capencode(talloc_tos(), path);
260
261         if (!cappath) {
262                 errno = ENOMEM;
263                 return -1;
264         }
265         return SMB_VFS_NEXT_CHMOD(handle, cappath, mode);
266 }
267
268 static int cap_chown(vfs_handle_struct *handle, const char *path, uid_t uid, gid_t gid)
269 {
270         char *cappath = capencode(talloc_tos(), path);
271
272         if (!cappath) {
273                 errno = ENOMEM;
274                 return -1;
275         }
276         return SMB_VFS_NEXT_CHOWN(handle, cappath, uid, gid);
277 }
278
279 static int cap_lchown(vfs_handle_struct *handle, const char *path, uid_t uid, gid_t gid)
280 {
281         char *cappath = capencode(talloc_tos(), path);
282
283         if (!cappath) {
284                 errno = ENOMEM;
285                 return -1;
286         }
287         return SMB_VFS_NEXT_LCHOWN(handle, cappath, uid, gid);
288 }
289
290 static int cap_chdir(vfs_handle_struct *handle, const char *path)
291 {
292         char *cappath = capencode(talloc_tos(), path);
293
294         if (!cappath) {
295                 errno = ENOMEM;
296                 return -1;
297         }
298         DEBUG(3,("cap: cap_chdir for %s\n", path));
299         return SMB_VFS_NEXT_CHDIR(handle, cappath);
300 }
301
302 static int cap_ntimes(vfs_handle_struct *handle,
303                       const struct smb_filename *smb_fname,
304                       struct smb_file_time *ft)
305 {
306         struct smb_filename *smb_fname_tmp = NULL;
307         char *cappath = NULL;
308         int ret;
309
310         cappath = capencode(talloc_tos(), smb_fname->base_name);
311
312         if (!cappath) {
313                 errno = ENOMEM;
314                 return -1;
315         }
316
317         /* Setup temporary smb_filename structs. */
318         smb_fname_tmp = cp_smb_filename(talloc_tos(), smb_fname);
319         if (smb_fname_tmp == NULL) {
320                 errno = ENOMEM;
321                 return -1;
322         }
323
324         smb_fname_tmp->base_name = cappath;
325
326         ret = SMB_VFS_NEXT_NTIMES(handle, smb_fname_tmp, ft);
327
328         TALLOC_FREE(smb_fname_tmp);
329         return ret;
330 }
331
332
333 static int cap_symlink(vfs_handle_struct *handle, const char *oldpath,
334                        const char *newpath)
335 {
336         char *capold = capencode(talloc_tos(), oldpath);
337         char *capnew = capencode(talloc_tos(), newpath);
338
339         if (!capold || !capnew) {
340                 errno = ENOMEM;
341                 return -1;
342         }
343         return SMB_VFS_NEXT_SYMLINK(handle, capold, capnew);
344 }
345
346 static int cap_readlink(vfs_handle_struct *handle, const char *path,
347                         char *buf, size_t bufsiz)
348 {
349         char *cappath = capencode(talloc_tos(), path);
350
351         if (!cappath) {
352                 errno = ENOMEM;
353                 return -1;
354         }
355         return SMB_VFS_NEXT_READLINK(handle, cappath, buf, bufsiz);
356 }
357
358 static int cap_link(vfs_handle_struct *handle, const char *oldpath, const char *newpath)
359 {
360         char *capold = capencode(talloc_tos(), oldpath);
361         char *capnew = capencode(talloc_tos(), newpath);
362
363         if (!capold || !capnew) {
364                 errno = ENOMEM;
365                 return -1;
366         }
367         return SMB_VFS_NEXT_LINK(handle, capold, capnew);
368 }
369
370 static int cap_mknod(vfs_handle_struct *handle, const char *path, mode_t mode, SMB_DEV_T dev)
371 {
372         char *cappath = capencode(talloc_tos(), path);
373
374         if (!cappath) {
375                 errno = ENOMEM;
376                 return -1;
377         }
378         return SMB_VFS_NEXT_MKNOD(handle, cappath, mode, dev);
379 }
380
381 static char *cap_realpath(vfs_handle_struct *handle, const char *path)
382 {
383         /* monyo need capencode'ed and capdecode'ed? */
384         char *cappath = capencode(talloc_tos(), path);
385
386         if (!cappath) {
387                 errno = ENOMEM;
388                 return NULL;
389         }
390         return SMB_VFS_NEXT_REALPATH(handle, cappath);
391 }
392
393 static int cap_chmod_acl(vfs_handle_struct *handle, const char *path, mode_t mode)
394 {
395         char *cappath = capencode(talloc_tos(), path);
396
397         /* If the underlying VFS doesn't have ACL support... */
398         if (!cappath) {
399                 errno = ENOMEM;
400                 return -1;
401         }
402         return SMB_VFS_NEXT_CHMOD_ACL(handle, cappath, mode);
403 }
404
405 static SMB_ACL_T cap_sys_acl_get_file(vfs_handle_struct *handle,
406                                       const char *path, SMB_ACL_TYPE_T type,
407                                       TALLOC_CTX *mem_ctx)
408 {
409         char *cappath = capencode(talloc_tos(), path);
410
411         if (!cappath) {
412                 errno = ENOMEM;
413                 return (SMB_ACL_T)NULL;
414         }
415         return SMB_VFS_NEXT_SYS_ACL_GET_FILE(handle, cappath, type, mem_ctx);
416 }
417
418 static int cap_sys_acl_set_file(vfs_handle_struct *handle, const char *path, SMB_ACL_TYPE_T acltype, SMB_ACL_T theacl)
419 {
420         char *cappath = capencode(talloc_tos(), path);
421
422         if (!cappath) {
423                 errno = ENOMEM;
424                 return -1;
425         }
426         return SMB_VFS_NEXT_SYS_ACL_SET_FILE(handle, cappath, acltype, theacl);
427 }
428
429 static int cap_sys_acl_delete_def_file(vfs_handle_struct *handle, const char *path)
430 {
431         char *cappath = capencode(talloc_tos(), path);
432
433         if (!cappath) {
434                 errno = ENOMEM;
435                 return -1;
436         }
437         return SMB_VFS_NEXT_SYS_ACL_DELETE_DEF_FILE(handle, cappath);
438 }
439
440 static ssize_t cap_getxattr(vfs_handle_struct *handle, const char *path, const char *name, void *value, size_t size)
441 {
442         char *cappath = capencode(talloc_tos(), path);
443         char *capname = capencode(talloc_tos(), name);
444
445         if (!cappath || !capname) {
446                 errno = ENOMEM;
447                 return -1;
448         }
449         return SMB_VFS_NEXT_GETXATTR(handle, cappath, capname, value, size);
450 }
451
452 static ssize_t cap_fgetxattr(vfs_handle_struct *handle, struct files_struct *fsp, const char *path, void *value, size_t size)
453 {
454         char *cappath = capencode(talloc_tos(), path);
455
456         if (!cappath) {
457                 errno = ENOMEM;
458                 return -1;
459         }
460         return SMB_VFS_NEXT_FGETXATTR(handle, fsp, cappath, value, size);
461 }
462
463 static ssize_t cap_listxattr(vfs_handle_struct *handle, const char *path, char *list, size_t size)
464 {
465         char *cappath = capencode(talloc_tos(), path);
466
467         if (!cappath) {
468                 errno = ENOMEM;
469                 return -1;
470         }
471         return SMB_VFS_NEXT_LISTXATTR(handle, cappath, list, size);
472 }
473
474 static int cap_removexattr(vfs_handle_struct *handle, const char *path, const char *name)
475 {
476         char *cappath = capencode(talloc_tos(), path);
477         char *capname = capencode(talloc_tos(), name);
478
479         if (!cappath || !capname) {
480                 errno = ENOMEM;
481                 return -1;
482         }
483         return SMB_VFS_NEXT_REMOVEXATTR(handle, cappath, capname);
484 }
485
486 static int cap_fremovexattr(vfs_handle_struct *handle, struct files_struct *fsp, const char *path)
487 {
488         char *cappath = capencode(talloc_tos(), path);
489
490         if (!cappath) {
491                 errno = ENOMEM;
492                 return -1;
493         }
494         return SMB_VFS_NEXT_FREMOVEXATTR(handle, fsp, cappath);
495 }
496
497 static int cap_setxattr(vfs_handle_struct *handle, const char *path, const char *name, const void *value, size_t size, int flags)
498 {
499         char *cappath = capencode(talloc_tos(), path);
500         char *capname = capencode(talloc_tos(), name);
501
502         if (!cappath || !capname) {
503                 errno = ENOMEM;
504                 return -1;
505         }
506         return SMB_VFS_NEXT_SETXATTR(handle, cappath, capname, value, size, flags);
507 }
508
509 static int cap_fsetxattr(vfs_handle_struct *handle, struct files_struct *fsp, const char *path, const void *value, size_t size, int flags)
510 {
511         char *cappath = capencode(talloc_tos(), path);
512
513         if (!cappath) {
514                 errno = ENOMEM;
515                 return -1;
516         }
517         return SMB_VFS_NEXT_FSETXATTR(handle, fsp, cappath, value, size, flags);
518 }
519
520 static struct vfs_fn_pointers vfs_cap_fns = {
521         .disk_free_fn = cap_disk_free,
522         .opendir_fn = cap_opendir,
523         .readdir_fn = cap_readdir,
524         .mkdir_fn = cap_mkdir,
525         .rmdir_fn = cap_rmdir,
526         .open_fn = cap_open,
527         .rename_fn = cap_rename,
528         .stat_fn = cap_stat,
529         .lstat_fn = cap_lstat,
530         .unlink_fn = cap_unlink,
531         .chmod_fn = cap_chmod,
532         .chown_fn = cap_chown,
533         .lchown_fn = cap_lchown,
534         .chdir_fn = cap_chdir,
535         .ntimes_fn = cap_ntimes,
536         .symlink_fn = cap_symlink,
537         .readlink_fn = cap_readlink,
538         .link_fn = cap_link,
539         .mknod_fn = cap_mknod,
540         .realpath_fn = cap_realpath,
541         .chmod_acl_fn = cap_chmod_acl,
542         .sys_acl_get_file_fn = cap_sys_acl_get_file,
543         .sys_acl_set_file_fn = cap_sys_acl_set_file,
544         .sys_acl_delete_def_file_fn = cap_sys_acl_delete_def_file,
545         .getxattr_fn = cap_getxattr,
546         .fgetxattr_fn = cap_fgetxattr,
547         .listxattr_fn = cap_listxattr,
548         .removexattr_fn = cap_removexattr,
549         .fremovexattr_fn = cap_fremovexattr,
550         .setxattr_fn = cap_setxattr,
551         .fsetxattr_fn = cap_fsetxattr
552 };
553
554 NTSTATUS vfs_cap_init(void);
555 NTSTATUS vfs_cap_init(void)
556 {
557         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "cap",
558                                 &vfs_cap_fns);
559 }
560
561 /* For CAP functions */
562 #define hex_tag ':'
563 #define hex2bin(c)              hex2bin_table[(unsigned char)(c)]
564 #define bin2hex(c)              bin2hex_table[(unsigned char)(c)]
565 #define is_hex(s)               ((s)[0] == hex_tag)
566
567 static unsigned char hex2bin_table[256] = {
568 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x00 */
569 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x10 */
570 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x20 */
571 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, 0, 0, 0, 0, 0, /* 0x30 */
572 0000, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0000, /* 0x40 */
573 0000, 0000, 0000, 0000, 0000, 0000, 0000, 0000,
574 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x50 */
575 0000, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0000, /* 0x60 */
576 0000, 0000, 0000, 0000, 0000, 0000, 0000, 0000,
577 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x70 */
578 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x80 */
579 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x90 */
580 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xa0 */
581 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xb0 */
582 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xc0 */
583 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xd0 */
584 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0xe0 */
585 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0  /* 0xf0 */
586 };
587 static unsigned char bin2hex_table[256] = "0123456789abcdef";
588
589 /*******************************************************************
590   original code -> ":xx"  - CAP format
591 ********************************************************************/
592
593 static char *capencode(TALLOC_CTX *ctx, const char *from)
594 {
595         char *out = NULL;
596         const char *p1;
597         char *to = NULL;
598         size_t len = 0;
599
600         for (p1 = from; *p1; p1++) {
601                 if ((unsigned char)*p1 >= 0x80) {
602                         len += 3;
603                 } else {
604                         len++;
605                 }
606         }
607         len++;
608
609         to = talloc_array(ctx, char, len);
610         if (!to) {
611                 return NULL;
612         }
613
614         for (out = to; *from;) {
615                 /* buffer husoku error */
616                 if ((unsigned char)*from >= 0x80) {
617                         *out++ = hex_tag;
618                         *out++ = bin2hex (((*from)>>4)&0x0f);
619                         *out++ = bin2hex ((*from)&0x0f);
620                         from++;
621                 } else {
622                         *out++ = *from++;
623                 }
624         }
625         *out = '\0';
626         return to;
627 }
628
629 /*******************************************************************
630   CAP -> original code
631 ********************************************************************/
632 /* ":xx" -> a byte */
633
634 static char *capdecode(TALLOC_CTX *ctx, const char *from)
635 {
636         const char *p1;
637         char *out = NULL;
638         char *to = NULL;
639         size_t len = 0;
640
641         for (p1 = from; *p1; len++) {
642                 if (is_hex(p1)) {
643                         p1 += 3;
644                 } else {
645                         p1++;
646                 }
647         }
648         len++;
649
650         to = talloc_array(ctx, char, len);
651         if (!to) {
652                 return NULL;
653         }
654
655         for (out = to; *from;) {
656                 if (is_hex(from)) {
657                         *out++ = (hex2bin(from[1])<<4) | (hex2bin(from[2]));
658                         from += 3;
659                 } else {
660                         *out++ = *from++;
661                 }
662         }
663         *out = '\0';
664         return to;
665 }