etc/afpd/filedir.c

   1 /*
   2  * $Id: filedir.c,v 1.45.2.2.2.12 2004-08-11 03:13:21 bfernhomberg Exp $
   3  *
   4  * Copyright (c) 1990,1993 Regents of The University of Michigan.
   5  * All Rights Reserved.  See COPYRIGHT.
   6  */
   7
   8 #ifdef HAVE_CONFIG_H
   9 #include "config.h"
  10 #endif /* HAVE_CONFIG_H */
  11
  12 #include <stdio.h>
  13 #include <stdlib.h>
  14 /* STDC check */
  15 #if STDC_HEADERS
  16 #include <string.h>
  17 #else /* STDC_HEADERS */
  18 #ifndef HAVE_STRCHR
  19 #define strchr index
  20 #define strrchr index
  21 #endif /* HAVE_STRCHR */
  22 char *strchr (), *strrchr ();
  23 #ifndef HAVE_MEMCPY
  24 #define memcpy(d,s,n) bcopy ((s), (d), (n))
  25 #define memmove(d,s,n) bcopy ((s), (d), (n))
  26 #endif /* ! HAVE_MEMCPY */
  27 #endif /* STDC_HEADERS */
  28
  29 #ifdef HAVE_STRINGS_H
  30 #include <strings.h>
  31 #endif
  32 #include <dirent.h>
  33 #include <errno.h>
  34 #include <sys/param.h>
  35 #include <atalk/adouble.h>
  36
  37 #include <atalk/afp.h>
  38 #include <atalk/util.h>
  39 #include <atalk/cnid.h>
  40 #include <atalk/logger.h>
  41
  42 #include "directory.h"
  43 #include "desktop.h"
  44 #include "volume.h"
  45 #include "fork.h"
  46 #include "file.h"
  47 #include "globals.h"
  48 #include "filedir.h"
  49 #include "unix.h"
  50
  51 #ifdef DROPKLUDGE
  52 int matchfile2dirperms(upath, vol, did)
  53 /* Since it's kinda' big; I decided against an
  54 inline function */
  55 char    *upath;
  56 struct vol  *vol;
  57 int             did;
  58 /* The below code changes the way file ownership is determined in the name of
  59 fixing dropboxes.  It has known security problem.  See the netatalk FAQ for
  60 more information */
  61 {
  62     struct stat st, sb;
  63     struct dir  *dir;
  64     char        *adpath;
  65     uid_t       uid;
  66     int         ret = AFP_OK;
  67 #ifdef DEBUG
  68     LOG(log_info, logtype_afpd, "begin matchfile2dirperms:");
  69 #endif /* DEBUG */
  70
  71     if (stat(upath, &st ) < 0) {
  72         LOG(log_error, logtype_afpd, "Could not stat %s: %s", upath, strerror(errno));
  73         return AFPERR_NOOBJ ;
  74     }
  75
  76     adpath = vol->ad_path( upath, ADFLAGS_HF );
  77     /* FIXME dirsearch doesn't move cwd to did ! */
  78     if (( dir = dirlookup( vol, did )) == NULL ) {
  79         LOG(log_error, logtype_afpd, "matchfile2dirperms: Unable to get directory info.");
  80         ret = AFPERR_NOOBJ;
  81     }
  82     else if (stat(".", &sb) < 0) {
  83         LOG(log_error, logtype_afpd,
  84             "matchfile2dirperms: Error checking directory \"%s\": %s",
  85             dir->d_m_name, strerror(errno));
  86         ret = AFPERR_NOOBJ;
  87     }
  88     else {
  89         uid=geteuid();
  90         if ( uid != sb.st_uid )
  91         {
  92             seteuid(0);
  93             if (lchown(upath, sb.st_uid, sb.st_gid) < 0)
  94             {
  95                 LOG(log_error, logtype_afpd,
  96                     "matchfile2dirperms(%s): Error changing owner/gid: %s",
  97                     upath, strerror(errno));
  98                 ret = AFPERR_ACCESS;
  99             }
 100             else if (chmod(upath,(st.st_mode&~default_options.umask)| S_IRGRP| S_IROTH) < 0)
 101             {
 102                 LOG(log_error, logtype_afpd,
 103                     "matchfile2dirperms(%s): Error adding file read permissions: %s",
 104                     upath, strerror(errno));
 105                 ret = AFPERR_ACCESS;
 106             }
 107             else if (lchown(adpath, sb.st_uid, sb.st_gid) < 0)
 108             {
 109                 LOG(log_error, logtype_afpd,
 110                     "matchfile2dirperms(%s): Error changing AppleDouble owner/gid: %s",
 111                     adpath, strerror(errno));
 112                 ret = AFPERR_ACCESS;
 113             }
 114             else if (chmod(adpath, (st.st_mode&~default_options.umask)| S_IRGRP| S_IROTH) < 0)
 115             {
 116                 LOG(log_error, logtype_afpd,
 117                     "matchfile2dirperms(%s):  Error adding AD file read permissions: %s",
 118                     adpath, strerror(errno));
 119                 ret = AFPERR_ACCESS;
 120             }
 121             seteuid(uid);
 122         }
 123     } /* end else if stat success */
 124
 125 #ifdef DEBUG
 126     LOG(log_info, logtype_afpd, "end matchfile2dirperms:");
 127 #endif /* DEBUG */
 128     return ret;
 129 }
 130 #endif
 131
 132 int afp_getfildirparams(obj, ibuf, ibuflen, rbuf, rbuflen )
 133 AFPObj      *obj;
 134 char    *ibuf, *rbuf;
 135 int             ibuflen, *rbuflen;
 136 {
 137     struct stat         *st;
 138     struct vol          *vol;
 139     struct dir          *dir;
 140     u_int32_t           did;
 141     int                 buflen, ret;
 142     u_int16_t           fbitmap, dbitmap, vid;
 143     struct path         *s_path;
 144
 145 #ifdef DEBUG
 146     LOG(log_info, logtype_afpd, "begin afp_getfildirparams:");
 147 #endif /* DEBUG */
 148
 149     *rbuflen = 0;
 150     ibuf += 2;
 151
 152     memcpy( &vid, ibuf, sizeof( vid ));
 153     ibuf += sizeof( vid );
 154     if (NULL == ( vol = getvolbyvid( vid )) ) {
 155         return( AFPERR_PARAM );
 156     }
 157
 158     memcpy( &did, ibuf, sizeof( did ));
 159     ibuf += sizeof( did );
 160
 161     if (NULL == ( dir = dirlookup( vol, did )) ) {
 162         return afp_errno;
 163     }
 164
 165     memcpy( &fbitmap, ibuf, sizeof( fbitmap ));
 166     fbitmap = ntohs( fbitmap );
 167     ibuf += sizeof( fbitmap );
 168     memcpy( &dbitmap, ibuf, sizeof( dbitmap ));
 169     dbitmap = ntohs( dbitmap );
 170     ibuf += sizeof( dbitmap );
 171
 172     if (NULL == ( s_path = cname( vol, dir, &ibuf )) ) {
 173         return get_afp_errno(AFPERR_NOOBJ);
 174     }
 175
 176     st   = &s_path->st;
 177     if (!s_path->st_valid) {
 178         /* it's a dir and it should be there
 179          * because we chdir in it in cname or
 180          * it's curdir (maybe deleted, but then we can't know).
 181          * So we need to try harder.
 182          */
 183         of_statdir(vol, s_path);
 184     }
 185     if ( s_path->st_errno != 0 ) {
 186         return( AFPERR_NOOBJ );
 187     }
 188
 189     buflen = 0;
 190     if (S_ISDIR(st->st_mode)) {
 191         if (dbitmap) {
 192             dir = s_path->d_dir;
 193             if (!dir)
 194                 return AFPERR_NOOBJ;
 195
 196             ret = getdirparams(vol, dbitmap, s_path, dir,
 197                                  rbuf + 3 * sizeof( u_int16_t ), &buflen );
 198             if (ret != AFP_OK )
 199                 return( ret );
 200         }
 201         /* this is a directory */
 202         *(rbuf + 2 * sizeof( u_int16_t )) = (char) FILDIRBIT_ISDIR;
 203     } else {
 204         if (fbitmap && AFP_OK != (ret = getfilparams(vol, fbitmap, s_path, curdir,
 205                                             rbuf + 3 * sizeof( u_int16_t ), &buflen )) ) {
 206             return( ret );
 207         }
 208         /* this is a file */
 209         *(rbuf + 2 * sizeof( u_int16_t )) = FILDIRBIT_ISFILE;
 210     }
 211     *rbuflen = buflen + 3 * sizeof( u_int16_t );
 212     fbitmap = htons( fbitmap );
 213     memcpy( rbuf, &fbitmap, sizeof( fbitmap ));
 214     rbuf += sizeof( fbitmap );
 215     dbitmap = htons( dbitmap );
 216     memcpy( rbuf, &dbitmap, sizeof( dbitmap ));
 217     rbuf += sizeof( dbitmap ) + sizeof( u_char );
 218     *rbuf = 0;
 219
 220 #ifdef DEBUG
 221     LOG(log_info, logtype_afpd, "end afp_getfildirparams:");
 222 #endif /* DEBUG */
 223
 224     return( AFP_OK );
 225 }
 226
 227 int afp_setfildirparams(obj, ibuf, ibuflen, rbuf, rbuflen )
 228 AFPObj      *obj;
 229 char    *ibuf, *rbuf;
 230 int             ibuflen, *rbuflen;
 231 {
 232     struct stat *st;
 233     struct vol  *vol;
 234     struct dir  *dir;
 235     struct path *path;
 236     u_int16_t   vid, bitmap;
 237     int         did, rc;
 238
 239 #ifdef DEBUG
 240     LOG(log_info, logtype_afpd, "begin afp_setfildirparams:");
 241 #endif /* DEBUG */
 242
 243     *rbuflen = 0;
 244     ibuf += 2;
 245     memcpy( &vid, ibuf, sizeof(vid));
 246     ibuf += sizeof( vid );
 247
 248     if (NULL == ( vol = getvolbyvid( vid )) ) {
 249         return( AFPERR_PARAM );
 250     }
 251
 252     if (vol->v_flags & AFPVOL_RO)
 253         return AFPERR_VLOCK;
 254
 255     memcpy( &did, ibuf, sizeof( did));
 256     ibuf += sizeof( did);
 257
 258     if (NULL == ( dir = dirlookup( vol, did )) ) {
 259         return afp_errno;
 260     }
 261
 262     memcpy( &bitmap, ibuf, sizeof( bitmap ));
 263     bitmap = ntohs( bitmap );
 264     ibuf += sizeof( bitmap );
 265
 266     if (NULL == ( path = cname( vol, dir, &ibuf ))) {
 267         return get_afp_errno(AFPERR_NOOBJ);
 268     }
 269
 270     st   = &path->st;
 271     if (!path->st_valid) {
 272         /* it's a dir and it should be there
 273          * because we chdir in it in cname
 274          */
 275         of_statdir(vol, path);
 276     }
 277
 278     if ( path->st_errno != 0 ) {
 279         return( AFPERR_NOOBJ );
 280     }
 281     /*
 282      * If ibuf is odd, make it even.
 283      */
 284     if ((u_long)ibuf & 1 ) {
 285         ibuf++;
 286     }
 287
 288     if (S_ISDIR(st->st_mode)) {
 289         rc = setdirparams(vol, path, bitmap, ibuf );
 290     } else {
 291         rc = setfilparams(vol, path, bitmap, ibuf );
 292     }
 293     if ( rc == AFP_OK ) {
 294         setvoltime(obj, vol );
 295     }
 296
 297 #ifdef DEBUG
 298     LOG(log_info, logtype_afpd, "end afp_setfildirparams:");
 299 #endif /* DEBUG */
 300
 301     return( rc );
 302 }
 303
 304 /* --------------------------------------------
 305    Factorise some checks on a pathname
 306 */
 307 int check_name(const struct vol *vol, char *name)
 308 {
 309     /* check for illegal characters in the unix filename */
 310     if (!wincheck(vol, name))
 311         return AFPERR_PARAM;
 312
 313     if ((vol->v_flags & AFPVOL_NOHEX) && strchr(name, '/'))
 314         return AFPERR_PARAM;
 315
 316     if (!vol->validupath(vol, name))
 317         return AFPERR_EXIST;
 318
 319     /* check for vetoed filenames */
 320     if (veto_file(vol->v_veto, name))
 321         return AFPERR_EXIST;
 322     return 0;
 323 }
 324
 325 /* -------------------------
 326     move and rename sdir:oldname to curdir:newname in volume vol
 327
 328     special care is needed for lock
 329 */
 330 static int moveandrename(vol, sdir, oldname, newname, isdir)
 331 const struct vol        *vol;
 332 struct dir      *sdir;
 333 char        *oldname;
 334 char        *newname;
 335 int         isdir;
 336 {
 337     char            *p;
 338     char            *upath;
 339     int             rc;
 340     struct stat     *st;
 341     int             adflags;
 342     struct adouble      ad;
 343     struct adouble      *adp;
 344     struct ofork        *opened = NULL;
 345     struct path         path;
 346     cnid_t      id;
 347     ucs2_t *oldname_w, *newname_w;
 348     void *oldname_w_p = &oldname_w, *newname_w_p = &newname_w;
 349
 350     ad_init(&ad, vol->v_adouble);
 351     adp = &ad;
 352     adflags = 0;
 353
 354     if (!isdir) {
 355         p = mtoupath(vol, oldname, sdir->d_did, utf8_encoding());
 356         if (!p) {
 357             return AFPERR_PARAM; /* can't convert */
 358         }
 359         id = cnid_get(vol->v_cdb, sdir->d_did, p, strlen(p));
 360         p = ctoupath( vol, sdir, oldname );
 361         if (!p) {
 362             return AFPERR_PARAM; /* pathname too long */
 363         }
 364         path.st_valid = 0;
 365         path.u_name = p;
 366         if ((opened = of_findname(&path))) {
 367             /* reuse struct adouble so it won't break locks */
 368             adp = opened->of_ad;
 369         }
 370     }
 371     else {
 372         id = sdir->d_did; /* we already have the CNID */
 373         p = ctoupath( vol, sdir->d_parent, oldname );
 374         if (!p) {
 375             return AFPERR_PARAM;
 376         }
 377         adflags = ADFLAGS_DIR;
 378     }
 379     /*
 380      * p now points to the full pathname of the source fs object.
 381      *
 382      * we are in the dest folder so we need to use p for ad_open
 383     */
 384
 385     if (!ad_metadata(p, adflags, adp)) {
 386     u_int16_t bshort;
 387
 388         ad_getattr(adp, &bshort);
 389         ad_close( adp, ADFLAGS_HF );
 390         if ((bshort & htons(ATTRBIT_NORENAME)))
 391             return(AFPERR_OLOCK);
 392     }
 393
 394     if (NULL == (upath = mtoupath(vol, newname, curdir->d_did, utf8_encoding()))){
 395         return AFPERR_PARAM;
 396     }
 397     path.u_name = upath;
 398     st = &path.st;
 399     if (0 != (rc = check_name(vol, upath))) {
 400             return  rc;
 401     }
 402
 403     /* source == destination. we just silently accept this. */
 404     if (curdir == sdir) {
 405         if (strcmp(oldname, newname) == 0)
 406             return AFP_OK;
 407
 408         /* deal with case insensitive, case-preserving filesystems. */
 409         if ((stat(upath, st) == 0)) {
 410             if ((size_t)-1 == (convert_string_allocate(vol->v_volcharset, CH_UCS2, oldname,
 411                                 strlen(oldname), oldname_w_p)) ) {
 412                 return AFPERR_MISC; /* conversion error has already been logged */
 413             }
 414             if ((size_t)-1 == (convert_string_allocate(vol->v_volcharset, CH_UCS2, newname,
 415                                 strlen(newname), newname_w_p)) ) {
 416                 free(oldname_w);
 417                 return AFPERR_MISC; /* conversion error has already been logged */
 418             }
 419             if (!strcasecmp_w(oldname_w, newname_w)) {
 420                 free(oldname_w);
 421                 free(newname_w);
 422                 return AFPERR_EXIST;
 423             }
 424             free (oldname_w);
 425             free (newname_w);
 426         }
 427     } else if (stat(upath, st ) == 0)
 428         return AFPERR_EXIST;
 429
 430     if ( !isdir ) {
 431         path.st_valid = 1;
 432         path.st_errno = errno;
 433         if (of_findname(&path)) {
 434             rc = AFPERR_EXIST; /* was AFPERR_BUSY; */
 435         } else {
 436             rc = renamefile(vol, p, upath, newname, adp );
 437             if (rc == AFP_OK)
 438                 of_rename(vol, opened, sdir, oldname, curdir, newname);
 439         }
 440     } else {
 441         rc = renamedir(vol, p, upath, sdir, curdir, newname);
 442     }
 443     if ( rc == AFP_OK && id ) {
 444         /* renaming may have moved the file/dir across a filesystem */
 445         if (stat(upath, st) < 0)
 446             return AFPERR_MISC;
 447
 448         /* fix up the catalog entry */
 449         cnid_update(vol->v_cdb, id, st, curdir->d_did, upath, strlen(upath));
 450     }
 451
 452     return rc;
 453 }
 454
 455 /* -------------------------------------------- */
 456 int afp_rename(obj, ibuf, ibuflen, rbuf, rbuflen )
 457 AFPObj      *obj;
 458 char    *ibuf, *rbuf;
 459 int             ibuflen, *rbuflen;
 460 {
 461     struct vol  *vol;
 462     struct dir  *sdir;
 463     char        *oldname, *newname;
 464     struct path *path;
 465     u_int32_t   did;
 466     int         plen;
 467     u_int16_t   vid;
 468     int         isdir = 0;
 469     int         rc;
 470 #ifdef DEBUG
 471     LOG(log_info, logtype_afpd, "begin afp_rename:");
 472 #endif /* DEBUG */
 473
 474     *rbuflen = 0;
 475     ibuf += 2;
 476
 477     memcpy( &vid, ibuf, sizeof( vid ));
 478     ibuf += sizeof( vid );
 479     if (NULL == ( vol = getvolbyvid( vid )) ) {
 480         return( AFPERR_PARAM );
 481     }
 482
 483     if (vol->v_flags & AFPVOL_RO)
 484         return AFPERR_VLOCK;
 485
 486     memcpy( &did, ibuf, sizeof( did ));
 487     ibuf += sizeof( did );
 488     if (NULL == ( sdir = dirlookup( vol, did )) ) {
 489         return afp_errno;
 490     }
 491
 492     /* source pathname */
 493     if (NULL == ( path = cname( vol, sdir, &ibuf )) ) {
 494         return get_afp_errno(AFPERR_NOOBJ);
 495     }
 496
 497     sdir = curdir;
 498     newname = obj->newtmp;
 499     oldname = obj->oldtmp;
 500     isdir = path_isadir(path);
 501     if ( *path->m_name != '\0' ) {
 502         strcpy(oldname, path->m_name); /* an extra copy for of_rename */
 503         if (isdir) {
 504             /* curdir parent dir, need to move sdir back */
 505             sdir = path->d_dir;
 506         }
 507     }
 508     else {
 509         if ( sdir->d_parent == NULL ) { /* root directory */
 510             return( AFPERR_NORENAME );
 511         }
 512         /* move to destination dir */
 513         if ( movecwd( vol, sdir->d_parent ) < 0 ) {
 514             return afp_errno;
 515         }
 516         strcpy(oldname, sdir->d_m_name);
 517     }
 518
 519     /* another place where we know about the path type */
 520     if ((plen = copy_path_name(newname, ibuf)) < 0) {
 521         return( AFPERR_PARAM );
 522     }
 523
 524     if (!plen) {
 525         return AFP_OK; /* newname == oldname same dir */
 526     }
 527
 528     rc = moveandrename(vol, sdir, oldname, newname, isdir);
 529
 530     if ( rc == AFP_OK ) {
 531         setvoltime(obj, vol );
 532     }
 533
 534 #ifdef DEBUG
 535     LOG(log_info, logtype_afpd, "end afp_rename:");
 536 #endif /* DEBUG */
 537
 538     return( rc );
 539 }
 540
 541 /* ------------------------------- */
 542 int afp_delete(obj, ibuf, ibuflen, rbuf, rbuflen )
 543 AFPObj      *obj;
 544 char    *ibuf, *rbuf;
 545 int             ibuflen, *rbuflen;
 546 {
 547     struct vol          *vol;
 548     struct dir          *dir;
 549     struct path         *s_path;
 550     char                *upath;
 551     int                 did, rc;
 552     u_int16_t           vid;
 553
 554 #ifdef DEBUG
 555     LOG(log_info, logtype_afpd, "begin afp_delete:");
 556 #endif /* DEBUG */
 557
 558     *rbuflen = 0;
 559     ibuf += 2;
 560
 561     memcpy( &vid, ibuf, sizeof( vid ));
 562     ibuf += sizeof( vid );
 563     if (NULL == ( vol = getvolbyvid( vid )) ) {
 564         return( AFPERR_PARAM );
 565     }
 566
 567     if (vol->v_flags & AFPVOL_RO)
 568         return AFPERR_VLOCK;
 569
 570     memcpy( &did, ibuf, sizeof( did ));
 571     ibuf += sizeof( int );
 572     if (NULL == ( dir = dirlookup( vol, did )) ) {
 573         return afp_errno;
 574     }
 575
 576     if (NULL == ( s_path = cname( vol, dir, &ibuf )) ) {
 577         return get_afp_errno(AFPERR_NOOBJ);
 578     }
 579
 580     upath = s_path->u_name;
 581     if ( path_isadir( s_path) ) {
 582         if (*s_path->m_name != '\0') {
 583             rc = AFPERR_ACCESS;
 584         }
 585         else {
 586             rc = deletecurdir( vol, obj->oldtmp, AFPOBJ_TMPSIZ);
 587         }
 588     } else if (of_findname(s_path)) {
 589         rc = AFPERR_BUSY;
 590     } else {
 591         rc = deletefile(vol, upath, 1);
 592     }
 593     if ( rc == AFP_OK ) {
 594         curdir->offcnt--;
 595         setvoltime(obj, vol );
 596     }
 597
 598 #ifdef DEBUG
 599     LOG(log_info, logtype_afpd, "end afp_delete:");
 600 #endif /* DEBUG */
 601
 602     return( rc );
 603 }
 604 /* ------------------------ */
 605 char *absupath( vol, dir, u )
 606 const struct vol        *vol;
 607 struct dir      *dir;
 608 char    *u;
 609 {
 610     struct dir  *d;
 611     static char path[ MAXPATHLEN + 1];
 612     char        *p;
 613     int         len;
 614
 615     if (u == NULL)
 616         return NULL;
 617
 618     p = path + sizeof( path ) - 1;
 619     *p = '\0';
 620     len = strlen( u );
 621     p -= len;
 622     memcpy( p, u, len );
 623     if (dir) for ( d = dir; d->d_parent; d = d->d_parent ) {
 624         u = d->d_u_name;
 625         len = strlen( u );
 626         if (p -len -1 < path) {
 627             /* FIXME
 628                rather rare so LOG error and/or client message ?
 629             */
 630             return NULL;
 631         }
 632         *--p = '/';
 633         p -= len;
 634         memcpy( p, u, len );
 635     }
 636     len = strlen( vol->v_path );
 637     if (p -len -1 < path) {
 638         return NULL;
 639     }
 640     *--p = '/';
 641     p -= len;
 642     memcpy( p, vol->v_path, len );
 643
 644     return( p );
 645 }
 646
 647 /* ------------------------
 648  * FIXME dir could be NULL
 649 */
 650 char *ctoupath( vol, dir, name )
 651 const struct vol        *vol;
 652 struct dir      *dir;
 653 char    *name;
 654 {
 655     return absupath(vol, dir, mtoupath(vol, name, dir->d_did, utf8_encoding()));
 656 }
 657
 658 /* ------------------------- */
 659 int afp_moveandrename(obj, ibuf, ibuflen, rbuf, rbuflen )
 660 AFPObj      *obj;
 661 char    *ibuf, *rbuf;
 662 int             ibuflen, *rbuflen;
 663 {
 664     struct vol  *vol;
 665     struct dir  *sdir, *ddir;
 666     int         isdir;
 667     char        *oldname, *newname;
 668     struct path *path;
 669     int         did;
 670     int         pdid;
 671     int         plen;
 672     u_int16_t   vid;
 673     int         rc;
 674 #ifdef DROPKLUDGE
 675     int         retvalue;
 676 #endif /* DROPKLUDGE */
 677
 678 #ifdef DEBUG
 679     LOG(log_info, logtype_afpd, "begin afp_moveandrename:");
 680 #endif /* DEBUG */
 681
 682     *rbuflen = 0;
 683     ibuf += 2;
 684
 685     memcpy( &vid, ibuf, sizeof( vid ));
 686     ibuf += sizeof( vid );
 687     if (NULL == ( vol = getvolbyvid( vid )) ) {
 688         return( AFPERR_PARAM );
 689     }
 690
 691     if (vol->v_flags & AFPVOL_RO)
 692         return AFPERR_VLOCK;
 693
 694     /* source did followed by dest did */
 695     memcpy( &did, ibuf, sizeof( did ));
 696     ibuf += sizeof( int );
 697     if (NULL == ( sdir = dirlookup( vol, did )) ) {
 698         return afp_errno; /* was AFPERR_PARAM */
 699     }
 700
 701     memcpy( &did, ibuf, sizeof( did ));
 702     ibuf += sizeof( int );
 703
 704     /* source pathname */
 705     if (NULL == ( path = cname( vol, sdir, &ibuf )) ) {
 706         return get_afp_errno(AFPERR_NOOBJ);
 707     }
 708
 709     sdir = curdir;
 710     newname = obj->newtmp;
 711     oldname = obj->oldtmp;
 712
 713     isdir = path_isadir(path);
 714     if ( *path->m_name != '\0' ) {
 715         if (isdir) {
 716             sdir = path->d_dir;
 717         }
 718         strcpy(oldname, path->m_name); /* an extra copy for of_rename */
 719     } else {
 720         strcpy(oldname, sdir->d_m_name);
 721     }
 722
 723     /* get the destination directory */
 724     if (NULL == ( ddir = dirlookup( vol, did )) ) {
 725         return afp_errno; /*  was AFPERR_PARAM */
 726     }
 727     if (NULL == ( path = cname( vol, ddir, &ibuf ))) {
 728         return( AFPERR_NOOBJ );
 729     }
 730     pdid = curdir->d_did;
 731     if ( *path->m_name != '\0' ) {
 732         return path_error(path, AFPERR_NOOBJ);
 733     }
 734
 735     /* one more place where we know about path type */
 736     if ((plen = copy_path_name(newname, ibuf)) < 0) {
 737         return( AFPERR_PARAM );
 738     }
 739
 740     if (!plen) {
 741         strcpy(newname, oldname);
 742     }
 743
 744     rc = moveandrename(vol, sdir, oldname, newname, isdir);
 745
 746     if ( rc == AFP_OK ) {
 747         char *upath = mtoupath(vol, newname, pdid, utf8_encoding());
 748
 749         if (NULL == upath) {
 750             return AFPERR_PARAM;
 751         }
 752         curdir->offcnt++;
 753         sdir->offcnt--;
 754 #ifdef DROPKLUDGE
 755         if (vol->v_flags & AFPVOL_DROPBOX) {
 756             /* FIXME did is not always the source id */
 757             if ((retvalue=matchfile2dirperms (upath, vol, did)) != AFP_OK) {
 758                 return retvalue;
 759             }
 760         }
 761         else
 762 #endif /* DROPKLUDGE */
 763             /* if unix priv don't try to match perm with dest folder */
 764             if (!isdir && !vol_unix_priv(vol)) {
 765                 int  admode = ad_mode("", 0777);
 766
 767                 setfilmode(upath, admode, NULL);
 768                 setfilmode(vol->ad_path( upath, ADFLAGS_HF ), ad_hf_mode(admode), NULL);
 769             }
 770         setvoltime(obj, vol );
 771     }
 772
 773 #ifdef DEBUG
 774     LOG(log_info, logtype_afpd, "end afp_moveandrename:");
 775 #endif /* DEBUG */
 776
 777     return( rc );
 778 }
 779
 780 int veto_file(const char*veto_str, const char*path)
 781 /* given a veto_str like "abc/zxc/" and path "abc", return 1
 782  * veto_str should be '/' delimited
 783  * if path matches any one of the veto_str elements exactly, then 1 is returned
 784  * otherwise, 0 is returned.
 785  */
 786 {
 787     int i;      /* index to veto_str */
 788     int j;      /* index to path */
 789
 790     if ((veto_str == NULL) || (path == NULL))
 791         return 0;
 792     /*
 793     #ifdef DEBUG
 794         LOG(log_debug, logtype_afpd, "veto_file \"%s\", \"%s\"", veto_str, path);
 795     #endif
 796     */
 797     for(i=0, j=0; veto_str[i] != '\0'; i++) {
 798         if (veto_str[i] == '/') {
 799             if ((j>0) && (path[j] == '\0'))
 800                 return 1;
 801             j = 0;
 802         } else {
 803             if (veto_str[i] != path[j]) {
 804                 while ((veto_str[i] != '/')
 805                         && (veto_str[i] != '\0'))
 806                     i++;
 807                 j = 0;
 808                 continue;
 809             }
 810             j++;
 811         }
 812     }
 813     return 0;
 814 }
 815