root/source3/modules/vfs_netatalk.c

/* [<][>][^][v][top][bottom][index][help] */

DEFINITIONS

This source file includes following definitions.
  1. atalk_get_path_ptr
  2. atalk_build_paths
  3. atalk_unlink_file
  4. atalk_add_to_list
  5. atalk_rrmdir
  6. atalk_opendir
  7. atalk_rmdir
  8. atalk_rename
  9. atalk_unlink
  10. atalk_chmod
  11. atalk_chown
  12. atalk_lchown
  13. vfs_netatalk_init

   1 /* 
   2  * AppleTalk VFS module for Samba-3.x
   3  *
   4  * Copyright (C) Alexei Kotovich, 2002
   5  * Copyright (C) Stefan (metze) Metzmacher, 2003
   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 
  23 #undef DBGC_CLASS
  24 #define DBGC_CLASS DBGC_VFS
  25 
  26 #define APPLEDOUBLE     ".AppleDouble"
  27 #define ADOUBLEMODE     0777
  28 
  29 /* atalk functions */
  30 
  31 static int atalk_build_paths(TALLOC_CTX *ctx, const char *path,
  32   const char *fname, char **adbl_path, char **orig_path, 
  33   SMB_STRUCT_STAT *adbl_info, SMB_STRUCT_STAT *orig_info);
  34 
  35 static int atalk_unlink_file(const char *path);
  36 
  37 static int atalk_get_path_ptr(char *path)
     /* [<][>][^][v][top][bottom][index][help] */
  38 {
  39         int i   = 0;
  40         int ptr = 0;
  41         
  42         for (i = 0; path[i]; i ++) {
  43                 if (path[i] == '/')
  44                         ptr = i;
  45                 /* get out some 'spam';) from win32's file name */
  46                 else if (path[i] == ':') {
  47                         path[i] = '\0';
  48                         break;
  49                 }
  50         }
  51         
  52         return ptr;
  53 }
  54 
  55 static int atalk_build_paths(TALLOC_CTX *ctx, const char *path, const char *fname,
     /* [<][>][^][v][top][bottom][index][help] */
  56                               char **adbl_path, char **orig_path,
  57                               SMB_STRUCT_STAT *adbl_info, SMB_STRUCT_STAT *orig_info)
  58 {
  59         int ptr0 = 0;
  60         int ptr1 = 0;
  61         char *dname = 0;
  62         char *name  = 0;
  63 
  64         if (!ctx || !path || !fname || !adbl_path || !orig_path ||
  65                 !adbl_info || !orig_info)
  66                 return -1;
  67 #if 0
  68         DEBUG(3, ("ATALK: PATH: %s[%s]\n", path, fname));
  69 #endif
  70         if (strstr(path, APPLEDOUBLE) || strstr(fname, APPLEDOUBLE)) {
  71                 DEBUG(3, ("ATALK: path %s[%s] already contains %s\n", path, fname, APPLEDOUBLE));
  72                 return -1;
  73         }
  74 
  75         if (fname[0] == '.') ptr0 ++;
  76         if (fname[1] == '/') ptr0 ++;
  77 
  78         *orig_path = talloc_asprintf(ctx, "%s/%s", path, &fname[ptr0]);
  79 
  80         /* get pointer to last '/' */
  81         ptr1 = atalk_get_path_ptr(*orig_path);
  82 
  83         sys_lstat(*orig_path, orig_info);
  84 
  85         if (S_ISDIR(orig_info->st_mode)) {
  86                 *adbl_path = talloc_asprintf(ctx, "%s/%s/%s/", 
  87                   path, &fname[ptr0], APPLEDOUBLE);
  88         } else {
  89                 dname = talloc_strdup(ctx, *orig_path);
  90                 dname[ptr1] = '\0';
  91                 name = *orig_path;
  92                 *adbl_path = talloc_asprintf(ctx, "%s/%s/%s", 
  93                   dname, APPLEDOUBLE, &name[ptr1 + 1]);
  94         }
  95 #if 0
  96         DEBUG(3, ("ATALK: DEBUG:\n%s\n%s\n", *orig_path, *adbl_path)); 
  97 #endif
  98         sys_lstat(*adbl_path, adbl_info);
  99         return 0;
 100 }
 101 
 102 static int atalk_unlink_file(const char *path)
     /* [<][>][^][v][top][bottom][index][help] */
 103 {
 104         int ret = 0;
 105 
 106         become_root();
 107         ret = unlink(path);
 108         unbecome_root();
 109         
 110         return ret;
 111 }
 112 
 113 static void atalk_add_to_list(name_compare_entry **list)
     /* [<][>][^][v][top][bottom][index][help] */
 114 {
 115         int i, count = 0;
 116         name_compare_entry *new_list = 0;
 117         name_compare_entry *cur_list = 0;
 118 
 119         cur_list = *list;
 120 
 121         if (cur_list) {
 122                 for (i = 0, count = 0; cur_list[i].name; i ++, count ++) {
 123                         if (strstr(cur_list[i].name, APPLEDOUBLE))
 124                                 return;
 125                 }
 126         }
 127 
 128         if (!(new_list = SMB_CALLOC_ARRAY(name_compare_entry, (count == 0 ? 1 : count + 1))))
 129                 return;
 130 
 131         for (i = 0; i < count; i ++) {
 132                 new_list[i].name    = SMB_STRDUP(cur_list[i].name);
 133                 new_list[i].is_wild = cur_list[i].is_wild;
 134         }
 135 
 136         new_list[i].name    = SMB_STRDUP(APPLEDOUBLE);
 137         new_list[i].is_wild = False;
 138 
 139         free_namearray(*list);
 140 
 141         *list = new_list;
 142         new_list = 0;
 143         cur_list = 0;
 144 }
 145 
 146 static void atalk_rrmdir(TALLOC_CTX *ctx, char *path)
     /* [<][>][^][v][top][bottom][index][help] */
 147 {
 148         char *dpath;
 149         SMB_STRUCT_DIRENT *dent = 0;
 150         SMB_STRUCT_DIR *dir;
 151 
 152         if (!path) return;
 153 
 154         dir = sys_opendir(path);
 155         if (!dir) return;
 156 
 157         while (NULL != (dent = sys_readdir(dir))) {
 158                 if (strcmp(dent->d_name, ".") == 0 ||
 159                     strcmp(dent->d_name, "..") == 0)
 160                         continue;
 161                 if (!(dpath = talloc_asprintf(ctx, "%s/%s", 
 162                                               path, dent->d_name)))
 163                         continue;
 164                 atalk_unlink_file(dpath);
 165         }
 166 
 167         sys_closedir(dir);
 168 }
 169 
 170 /* Disk operations */
 171 
 172 /* Directory operations */
 173 
 174 static SMB_STRUCT_DIR *atalk_opendir(struct vfs_handle_struct *handle, const char *fname, const char *mask, uint32 attr)
     /* [<][>][^][v][top][bottom][index][help] */
 175 {
 176         SMB_STRUCT_DIR *ret = 0;
 177 
 178         ret = SMB_VFS_NEXT_OPENDIR(handle, fname, mask, attr);
 179 
 180         /*
 181          * when we try to perform delete operation upon file which has fork
 182          * in ./.AppleDouble and this directory wasn't hidden by Samba,
 183          * MS Windows explorer causes the error: "Cannot find the specified file"
 184          * There is some workaround to avoid this situation, i.e. if
 185          * connection has not .AppleDouble entry in either veto or hide 
 186          * list then it would be nice to add one.
 187          */
 188 
 189         atalk_add_to_list(&handle->conn->hide_list);
 190         atalk_add_to_list(&handle->conn->veto_list);
 191 
 192         return ret;
 193 }
 194 
 195 static int atalk_rmdir(struct vfs_handle_struct *handle, const char *path)
     /* [<][>][^][v][top][bottom][index][help] */
 196 {
 197         bool add = False;
 198         TALLOC_CTX *ctx = 0;
 199         char *dpath;
 200 
 201         if (!handle->conn->origpath || !path) goto exit_rmdir;
 202 
 203         /* due to there is no way to change bDeleteVetoFiles variable
 204          * from this module, gotta use talloc stuff..
 205          */
 206 
 207         strstr(path, APPLEDOUBLE) ? (add = False) : (add = True);
 208 
 209         if (!(ctx = talloc_init("remove_directory")))
 210                 goto exit_rmdir;
 211 
 212         if (!(dpath = talloc_asprintf(ctx, "%s/%s%s", 
 213           handle->conn->origpath, path, add ? "/"APPLEDOUBLE : "")))
 214                 goto exit_rmdir;
 215 
 216         atalk_rrmdir(ctx, dpath);
 217 
 218 exit_rmdir:
 219         talloc_destroy(ctx);
 220         return SMB_VFS_NEXT_RMDIR(handle, path);
 221 }
 222 
 223 /* File operations */
 224 
 225 static int atalk_rename(struct vfs_handle_struct *handle, const char *oldname, const char *newname)
     /* [<][>][^][v][top][bottom][index][help] */
 226 {
 227         int ret = 0;
 228         char *adbl_path = 0;
 229         char *orig_path = 0;
 230         SMB_STRUCT_STAT adbl_info;
 231         SMB_STRUCT_STAT orig_info;
 232         TALLOC_CTX *ctx;
 233 
 234         ret = SMB_VFS_NEXT_RENAME(handle, oldname, newname);
 235 
 236         if (!oldname) return ret;
 237 
 238         if (!(ctx = talloc_init("rename_file")))
 239                 return ret;
 240 
 241         if (atalk_build_paths(ctx, handle->conn->origpath, oldname, &adbl_path, &orig_path,
 242           &adbl_info, &orig_info) != 0)
 243                 goto exit_rename;
 244 
 245         if (S_ISDIR(orig_info.st_mode) || S_ISREG(orig_info.st_mode)) {
 246                 DEBUG(3, ("ATALK: %s has passed..\n", adbl_path));              
 247                 goto exit_rename;
 248         }
 249 
 250         atalk_unlink_file(adbl_path);
 251 
 252 exit_rename:
 253         talloc_destroy(ctx);
 254         return ret;
 255 }
 256 
 257 static int atalk_unlink(struct vfs_handle_struct *handle, const char *path)
     /* [<][>][^][v][top][bottom][index][help] */
 258 {
 259         int ret = 0, i;
 260         char *adbl_path = 0;
 261         char *orig_path = 0;
 262         SMB_STRUCT_STAT adbl_info;
 263         SMB_STRUCT_STAT orig_info;
 264         TALLOC_CTX *ctx;
 265 
 266         ret = SMB_VFS_NEXT_UNLINK(handle, path);
 267 
 268         if (!path) return ret;
 269 
 270         /* no .AppleDouble sync if veto or hide list is empty,
 271          * otherwise "Cannot find the specified file" error will be caused
 272          */
 273 
 274         if (!handle->conn->veto_list) return ret;
 275         if (!handle->conn->hide_list) return ret;
 276 
 277         for (i = 0; handle->conn->veto_list[i].name; i ++) {
 278                 if (strstr(handle->conn->veto_list[i].name, APPLEDOUBLE))
 279                         break;
 280         }
 281 
 282         if (!handle->conn->veto_list[i].name) {
 283                 for (i = 0; handle->conn->hide_list[i].name; i ++) {
 284                         if (strstr(handle->conn->hide_list[i].name, APPLEDOUBLE))
 285                                 break;
 286                         else {
 287                                 DEBUG(3, ("ATALK: %s is not hidden, skipped..\n",
 288                                   APPLEDOUBLE));                
 289                                 return ret;
 290                         }
 291                 }
 292         }
 293 
 294         if (!(ctx = talloc_init("unlink_file")))
 295                 return ret;
 296 
 297         if (atalk_build_paths(ctx, handle->conn->origpath, path, &adbl_path, &orig_path,
 298           &adbl_info, &orig_info) != 0)
 299                 goto exit_unlink;
 300 
 301         if (S_ISDIR(orig_info.st_mode) || S_ISREG(orig_info.st_mode)) {
 302                 DEBUG(3, ("ATALK: %s has passed..\n", adbl_path));
 303                 goto exit_unlink;
 304         }
 305 
 306         atalk_unlink_file(adbl_path);
 307 
 308 exit_unlink:    
 309         talloc_destroy(ctx);
 310         return ret;
 311 }
 312 
 313 static int atalk_chmod(struct vfs_handle_struct *handle, const char *path, mode_t mode)
     /* [<][>][^][v][top][bottom][index][help] */
 314 {
 315         int ret = 0;
 316         char *adbl_path = 0;
 317         char *orig_path = 0;
 318         SMB_STRUCT_STAT adbl_info;
 319         SMB_STRUCT_STAT orig_info;
 320         TALLOC_CTX *ctx;
 321 
 322         ret = SMB_VFS_NEXT_CHMOD(handle, path, mode);
 323 
 324         if (!path) return ret;
 325 
 326         if (!(ctx = talloc_init("chmod_file")))
 327                 return ret;
 328 
 329         if (atalk_build_paths(ctx, handle->conn->origpath, path, &adbl_path, &orig_path,
 330           &adbl_info, &orig_info) != 0)
 331                 goto exit_chmod;
 332 
 333         if (!S_ISDIR(orig_info.st_mode) && !S_ISREG(orig_info.st_mode)) {
 334                 DEBUG(3, ("ATALK: %s has passed..\n", orig_path));              
 335                 goto exit_chmod;
 336         }
 337 
 338         chmod(adbl_path, ADOUBLEMODE);
 339 
 340 exit_chmod:     
 341         talloc_destroy(ctx);
 342         return ret;
 343 }
 344 
 345 static int atalk_chown(struct vfs_handle_struct *handle, const char *path, uid_t uid, gid_t gid)
     /* [<][>][^][v][top][bottom][index][help] */
 346 {
 347         int ret = 0;
 348         char *adbl_path = 0;
 349         char *orig_path = 0;
 350         SMB_STRUCT_STAT adbl_info;
 351         SMB_STRUCT_STAT orig_info;
 352         TALLOC_CTX *ctx;
 353 
 354         ret = SMB_VFS_NEXT_CHOWN(handle, path, uid, gid);
 355 
 356         if (!path) return ret;
 357 
 358         if (!(ctx = talloc_init("chown_file")))
 359                 return ret;
 360 
 361         if (atalk_build_paths(ctx, handle->conn->origpath, path, &adbl_path, &orig_path,
 362           &adbl_info, &orig_info) != 0)
 363                 goto exit_chown;
 364 
 365         if (!S_ISDIR(orig_info.st_mode) && !S_ISREG(orig_info.st_mode)) {
 366                 DEBUG(3, ("ATALK: %s has passed..\n", orig_path));              
 367                 goto exit_chown;
 368         }
 369 
 370         if (chown(adbl_path, uid, gid) == -1) {
 371                 DEBUG(3, ("ATALK: chown error %s\n", strerror(errno)));
 372         }
 373 
 374 exit_chown:     
 375         talloc_destroy(ctx);
 376         return ret;
 377 }
 378 
 379 static int atalk_lchown(struct vfs_handle_struct *handle, const char *path, uid_t uid, gid_t gid)
     /* [<][>][^][v][top][bottom][index][help] */
 380 {
 381         int ret = 0;
 382         char *adbl_path = 0;
 383         char *orig_path = 0;
 384         SMB_STRUCT_STAT adbl_info;
 385         SMB_STRUCT_STAT orig_info;
 386         TALLOC_CTX *ctx;
 387 
 388         ret = SMB_VFS_NEXT_CHOWN(handle, path, uid, gid);
 389 
 390         if (!path) return ret;
 391 
 392         if (!(ctx = talloc_init("lchown_file")))
 393                 return ret;
 394 
 395         if (atalk_build_paths(ctx, handle->conn->origpath, path, &adbl_path, &orig_path,
 396           &adbl_info, &orig_info) != 0)
 397                 goto exit_lchown;
 398 
 399         if (!S_ISDIR(orig_info.st_mode) && !S_ISREG(orig_info.st_mode)) {
 400                 DEBUG(3, ("ATALK: %s has passed..\n", orig_path));              
 401                 goto exit_lchown;
 402         }
 403 
 404         if (lchown(adbl_path, uid, gid) == -1) {
 405                 DEBUG(3, ("ATALK: lchown error %s\n", strerror(errno)));
 406         }
 407 
 408 exit_lchown:    
 409         talloc_destroy(ctx);
 410         return ret;
 411 }
 412 
 413 static vfs_op_tuple atalk_ops[] = {
 414     
 415         /* Directory operations */
 416 
 417         {SMB_VFS_OP(atalk_opendir),             SMB_VFS_OP_OPENDIR,     SMB_VFS_LAYER_TRANSPARENT},
 418         {SMB_VFS_OP(atalk_rmdir),               SMB_VFS_OP_RMDIR,       SMB_VFS_LAYER_TRANSPARENT},
 419 
 420         /* File operations */
 421 
 422         {SMB_VFS_OP(atalk_rename),              SMB_VFS_OP_RENAME,      SMB_VFS_LAYER_TRANSPARENT},
 423         {SMB_VFS_OP(atalk_unlink),              SMB_VFS_OP_UNLINK,      SMB_VFS_LAYER_TRANSPARENT},
 424         {SMB_VFS_OP(atalk_chmod),               SMB_VFS_OP_CHMOD,       SMB_VFS_LAYER_TRANSPARENT},
 425         {SMB_VFS_OP(atalk_chown),               SMB_VFS_OP_CHOWN,       SMB_VFS_LAYER_TRANSPARENT},
 426         {SMB_VFS_OP(atalk_lchown),              SMB_VFS_OP_LCHOWN,      SMB_VFS_LAYER_TRANSPARENT},
 427         
 428         /* Finish VFS operations definition */
 429         
 430         {SMB_VFS_OP(NULL),                      SMB_VFS_OP_NOOP,        SMB_VFS_LAYER_NOOP}
 431 };
 432 
 433 NTSTATUS vfs_netatalk_init(void);
 434 NTSTATUS vfs_netatalk_init(void)
     /* [<][>][^][v][top][bottom][index][help] */
 435 {
 436         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "netatalk", atalk_ops);
 437 }

/* [<][>][^][v][top][bottom][index][help] */