etc/afpd/filedir.c

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