etc/afpd/filedir.c

   1 /*
   2  * $Id: filedir.c,v 1.16 2001-12-03 05:03:38 jmarcus 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 <sys/syslog.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
  58 int matchfile2dirperms(upath, vol, did)
  59 /* Since it's kinda' big; I decided against an
  60 inline function */
  61 char    *upath;
  62 struct vol  *vol;
  63 int             did;
  64 /* The below code changes the way file ownership is determined in the name of
  65 fixing dropboxes.  It has known security problem.  See the netatalk FAQ for
  66 more information */
  67 {
  68     struct stat st, sb;
  69     struct dir  *dir;
  70     char        adpath[50];
  71     int         uid;
  72
  73 #ifdef DEBUG
  74     syslog (LOG_INFO, "begin matchfile2dirperms:");
  75 #endif /* DEBUG */
  76
  77     if (stat(upath, &st ) < 0)
  78         syslog(LOG_ERR, "Could not stat %s: %s", upath, strerror(errno));
  79     strcpy (adpath, "./.AppleDouble/");
  80     strcat (adpath, upath);
  81     if (( dir = dirsearch( vol, did )) == NULL ) {
  82         syslog (LOG_ERR, "matchfile2dirperms: Unable to get directory info.");
  83         return( AFPERR_NOOBJ );
  84     }
  85     else if (stat(".", &sb) < 0) {
  86         syslog (LOG_ERR,
  87                 "matchfile2dirperms: Error checking directory \"%s\": %s",
  88                 dir->d_name, strerror(errno));
  89         return(AFPERR_NOOBJ );
  90     }
  91     else {
  92         uid=geteuid();
  93         if ( uid != sb.st_uid )
  94         {
  95             seteuid(0);
  96             if (lchown(upath, sb.st_uid, sb.st_gid) < 0)
  97             {
  98                 syslog (LOG_ERR,
  99                         "matchfile2dirperms: Error changing owner/gid of %s: %s",
 100                         upath, strerror(errno));
 101                 return (AFPERR_ACCESS);
 102             }
 103             if (chmod(upath,(st.st_mode&0777&~default_options.umask)| S_IRGRP| S_IROTH) < 0)
 104             {
 105                 syslog (LOG_ERR,
 106                         "matchfile2dirperms:  Error adding file read permissions: %s",
 107                         strerror(errno));
 108                 return (AFPERR_ACCESS);
 109             }
 110 #ifdef DEBUG
 111             else
 112                 syslog (LOG_INFO,
 113                         "matchfile2dirperms:  Added S_IRGRP and S_IROTH: %s",
 114                         strerror(errno));
 115 #endif /* DEBUG */
 116             if (lchown(adpath, sb.st_uid, sb.st_gid) < 0)
 117             {
 118                 syslog (LOG_ERR,
 119                         "matchfile2dirperms: Error changing AppleDouble owner/gid %s: %s",
 120                         adpath, strerror(errno));
 121                 return (AFPERR_ACCESS);
 122             }
 123             if (chmod(adpath, (st.st_mode&0777&~default_options.umask)| S_IRGRP| S_IROTH) < 0)
 124             {
 125                 syslog (LOG_ERR,
 126                         "matchfile2dirperms:  Error adding AD file read permissions: %s",
 127                         strerror(errno));
 128                 return (AFPERR_ACCESS);
 129             }
 130 #ifdef DEBUG
 131             else
 132                 syslog (LOG_INFO,
 133                         "matchfile2dirperms:  Added S_IRGRP and S_IROTH to AD: %s",
 134                         strerror(errno));
 135 #endif /* DEBUG */
 136         }
 137 #ifdef DEBUG
 138         else
 139             syslog (LOG_INFO,
 140                     "matchfile2dirperms: No ownership change necessary.");
 141 #endif /* DEBUG */
 142     } /* end else if stat success */
 143     seteuid(uid); /* Restore process ownership to normal */
 144 #ifdef DEBUG
 145     syslog (LOG_INFO, "end matchfile2dirperms:");
 146 #endif /* DEBUG */
 147
 148     return (AFP_OK);
 149
 150 }
 151
 152
 153 int afp_getfildirparams(obj, ibuf, ibuflen, rbuf, rbuflen )
 154 AFPObj      *obj;
 155 char    *ibuf, *rbuf;
 156 int             ibuflen, *rbuflen;
 157 {
 158     struct stat         st;
 159     struct vol          *vol;
 160     struct dir          *dir;
 161     u_int32_t           did;
 162     int                 buflen, ret;
 163     char                *path;
 164     u_int16_t           fbitmap, dbitmap, vid;
 165
 166 #ifdef DEBUG
 167     syslog(LOG_INFO, "begin afp_getfildirparams:");
 168 #endif /* DEBUG */
 169
 170     *rbuflen = 0;
 171     ibuf += 2;
 172
 173     memcpy( &vid, ibuf, sizeof( vid ));
 174     ibuf += sizeof( vid );
 175     if (( vol = getvolbyvid( vid )) == NULL ) {
 176         return( AFPERR_PARAM );
 177     }
 178
 179     memcpy( &did, ibuf, sizeof( did ));
 180     ibuf += sizeof( did );
 181
 182     if (( dir = dirsearch( vol, did )) == NULL ) {
 183         return( AFPERR_NOOBJ );
 184     }
 185
 186     memcpy( &fbitmap, ibuf, sizeof( fbitmap ));
 187     fbitmap = ntohs( fbitmap );
 188     ibuf += sizeof( fbitmap );
 189     memcpy( &dbitmap, ibuf, sizeof( dbitmap ));
 190     dbitmap = ntohs( dbitmap );
 191     ibuf += sizeof( dbitmap );
 192
 193     if (( path = cname( vol, dir, &ibuf )) == NULL) {
 194         return( AFPERR_NOOBJ );
 195     }
 196
 197     if ( stat( mtoupath(vol, path ), &st ) < 0 ) {
 198         return( AFPERR_NOOBJ );
 199     }
 200
 201     buflen = 0;
 202     if (S_ISDIR(st.st_mode)) {
 203         if (dbitmap) {
 204             ret = getdirparams(vol, dbitmap, ".", curdir,
 205                                &st, 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 && ( ret = getfilparams(vol, fbitmap, path, curdir, &st,
 213                                             rbuf + 3 * sizeof( u_int16_t ), &buflen )) != AFP_OK ) {
 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     syslog(LOG_INFO, "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     char        *path;
 244     u_int16_t   vid, bitmap;
 245     int         did, rc;
 246
 247 #ifdef DEBUG
 248     syslog(LOG_INFO, "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 (( vol = getvolbyvid( vid )) == NULL ) {
 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 (( dir = dirsearch( vol, did )) == NULL ) {
 267         return( AFPERR_NOOBJ );
 268     }
 269
 270     memcpy( &bitmap, ibuf, sizeof( bitmap ));
 271     bitmap = ntohs( bitmap );
 272     ibuf += sizeof( bitmap );
 273
 274     if (( path = cname( vol, dir, &ibuf )) == NULL ) {
 275         return( AFPERR_NOOBJ );
 276     }
 277
 278     if ( stat( mtoupath(vol, path ), &st ) < 0 ) {
 279         return( AFPERR_NOOBJ );
 280     }
 281
 282     /*
 283      * If ibuf is odd, make it even.
 284      */
 285     if ((u_long)ibuf & 1 ) {
 286         ibuf++;
 287     }
 288
 289     if (S_ISDIR(st.st_mode)) {
 290         rc = setdirparams(vol, path, bitmap, ibuf );
 291     } else {
 292         rc = setfilparams(vol, path, bitmap, ibuf );
 293     }
 294     if ( rc == AFP_OK ) {
 295         setvoltime(obj, vol );
 296     }
 297
 298 #ifdef DEBUG
 299     syslog(LOG_INFO, "end afp_setfildirparams:");
 300 #endif /* DEBUG */
 301
 302     return( rc );
 303 }
 304
 305 int afp_rename(obj, ibuf, ibuflen, rbuf, rbuflen )
 306 AFPObj      *obj;
 307 char    *ibuf, *rbuf;
 308 int             ibuflen, *rbuflen;
 309 {
 310     struct adouble      ad;
 311     struct stat         st;
 312     struct vol          *vol;
 313     struct dir          *dir, *odir = NULL;
 314     char                *path, *buf, *upath, *newpath;
 315     char                *newadpath;
 316     u_int32_t           did;
 317     int                 plen;
 318     u_int16_t           vid;
 319 #ifdef CNID_DB
 320     cnid_t              id;
 321 #endif /* CNID_DB */
 322
 323 #ifdef DEBUG
 324     syslog(LOG_INFO, "begin afp_rename:");
 325 #endif /* DEBUG */
 326
 327     *rbuflen = 0;
 328     ibuf += 2;
 329
 330     memcpy( &vid, ibuf, sizeof( vid ));
 331     ibuf += sizeof( vid );
 332     if (( vol = getvolbyvid( vid )) == NULL ) {
 333         return( AFPERR_PARAM );
 334     }
 335
 336     if (vol->v_flags & AFPVOL_RO)
 337         return AFPERR_VLOCK;
 338
 339     memcpy( &did, ibuf, sizeof( did ));
 340     ibuf += sizeof( did );
 341     if (( dir = dirsearch( vol, did )) == NULL ) {
 342         return( AFPERR_NOOBJ );
 343     }
 344
 345     if (( path = cname( vol, dir, &ibuf )) == NULL ) {
 346         return( AFPERR_NOOBJ );
 347     }
 348
 349     /* another place where we know about the path type */
 350     if ( *ibuf++ != 2 ) {
 351         return( AFPERR_PARAM );
 352     }
 353     plen = (unsigned char) *ibuf++;
 354     *( ibuf + plen ) = '\0';
 355
 356     if ( *path == '\0' ) {
 357         if ( curdir->d_parent == NULL ) { /* root directory */
 358             return( AFPERR_NORENAME );
 359         }
 360         odir = curdir;
 361         path = curdir->d_name;
 362         if ( movecwd( vol, curdir->d_parent ) < 0 ) {
 363             return( AFPERR_NOOBJ );
 364         }
 365     }
 366
 367 #ifdef notdef
 368     if ( strcasecmp( path, ibuf ) == 0 ) {
 369         return( AFP_OK );
 370     }
 371 #endif /* notdef */
 372
 373     /* if a curdir/newname ofork exists, return busy */
 374     if (of_findname(vol, curdir, ibuf))
 375         return AFPERR_BUSY;
 376
 377     /* source == destination. just say okay. */
 378     if (strcmp(path, ibuf) == 0)
 379         return AFP_OK;
 380
 381     /* check for illegal characters */
 382     if ((vol->v_flags & AFPVOL_MSWINDOWS) &&
 383             strpbrk(ibuf, MSWINDOWS_BADCHARS))
 384         return AFPERR_PARAM;
 385
 386     newpath = obj->oldtmp;
 387     strcpy( newpath, mtoupath(vol, ibuf ));
 388
 389     if ((vol->v_flags & AFPVOL_NOHEX) && strchr(newpath, '/'))
 390         return AFPERR_PARAM;
 391
 392     if (!validupath(vol, newpath))
 393         return AFPERR_EXIST;
 394
 395     /* check for vetoed filenames */
 396     if (veto_file(vol->v_veto, newpath))
 397         return AFPERR_EXIST;
 398
 399     /* the strdiacasecmp deals with case-insensitive, case preserving
 400        filesystems */
 401     if (stat( newpath, &st ) == 0 && strdiacasecmp(path, ibuf))
 402         return( AFPERR_EXIST );
 403
 404     upath = mtoupath(vol, path);
 405
 406 #ifdef CNID_DB
 407     id = cnid_get(vol->v_db, curdir->d_did, upath, strlen(upath));
 408 #endif /* CNID_DB */
 409
 410     if ( rename( upath, newpath ) < 0 ) {
 411         switch ( errno ) {
 412         case ENOENT :
 413             return( AFPERR_NOOBJ );
 414         case EACCES :
 415             return( AFPERR_ACCESS );
 416         default :
 417             return( AFPERR_PARAM );
 418         }
 419     }
 420
 421 #ifdef CNID_DB
 422     if (stat(newpath, &st) < 0) /* this shouldn't fail */
 423         return AFPERR_MISC;
 424     cnid_update(vol->v_db, id, &st, curdir->d_did, newpath, strlen(newpath));
 425 #endif /* CNID_DB */
 426
 427     if ( !odir ) {
 428         newadpath = obj->newtmp;
 429         strcpy( newadpath, ad_path( newpath, 0 ));
 430         if ( rename( ad_path( upath, 0 ), newadpath ) < 0 ) {
 431             if ( errno == ENOENT ) {    /* no adouble header file */
 432                 if (( unlink( newadpath ) < 0 ) && ( errno != ENOENT )) {
 433                     return( AFPERR_PARAM );
 434                 }
 435                 goto out;
 436             }
 437             return( AFPERR_PARAM );
 438         }
 439
 440         memset(&ad, 0, sizeof(ad));
 441         if ( ad_open( newpath, ADFLAGS_HF, O_RDWR|O_CREAT, 0666,
 442                       &ad) < 0 ) {
 443             return( AFPERR_PARAM );
 444         }
 445     } else {
 446         int isad = 1;
 447
 448         memset(&ad, 0, sizeof(ad));
 449         if ( ad_open( newpath, vol_noadouble(vol)|ADFLAGS_HF|ADFLAGS_DIR,
 450                       O_RDWR|O_CREAT, 0666, &ad) < 0 ) {
 451             if (!((errno == ENOENT) && vol_noadouble(vol)))
 452                 return( AFPERR_PARAM );
 453             isad = 0;
 454         }
 455         if ((buf = realloc( odir->d_name, plen + 1 )) == NULL ) {
 456             syslog( LOG_ERR, "afp_rename: realloc: %s", strerror(errno) );
 457             if (isad) {
 458                 ad_flush(&ad, ADFLAGS_HF); /* in case of create */
 459                 ad_close(&ad, ADFLAGS_HF);
 460             }
 461             return AFPERR_MISC;
 462         }
 463         odir->d_name = buf;
 464         strcpy( odir->d_name, ibuf );
 465         if (!isad)
 466             goto out;
 467     }
 468
 469     ad_setentrylen( &ad, ADEID_NAME, plen );
 470     memcpy( ad_entry( &ad, ADEID_NAME ), ibuf, plen );
 471     ad_flush( &ad, ADFLAGS_HF );
 472     ad_close( &ad, ADFLAGS_HF );
 473
 474 out:
 475     setvoltime(obj, vol );
 476
 477     /* if it's still open, rename the ofork as well. */
 478     if (of_rename(vol, curdir, path, curdir, ibuf) < 0)
 479         return AFPERR_MISC;
 480
 481 #ifdef DEBUG
 482     syslog(LOG_INFO, "end afp_rename:");
 483 #endif /* DEBUG */
 484
 485     return( AFP_OK );
 486 }
 487
 488
 489 int afp_delete(obj, ibuf, ibuflen, rbuf, rbuflen )
 490 AFPObj      *obj;
 491 char    *ibuf, *rbuf;
 492 int             ibuflen, *rbuflen;
 493 {
 494     struct vol          *vol;
 495     struct dir          *dir;
 496     char                *path, *upath;
 497     int                 did, rc;
 498     u_int16_t           vid;
 499
 500 #ifdef DEBUG
 501     syslog(LOG_INFO, "begin afp_delete:");
 502 #endif /* DEBUG */
 503
 504     *rbuflen = 0;
 505     ibuf += 2;
 506
 507     memcpy( &vid, ibuf, sizeof( vid ));
 508     ibuf += sizeof( vid );
 509     if (( vol = getvolbyvid( vid )) == NULL ) {
 510         return( AFPERR_PARAM );
 511     }
 512
 513     if (vol->v_flags & AFPVOL_RO)
 514         return AFPERR_VLOCK;
 515
 516     memcpy( &did, ibuf, sizeof( did ));
 517     ibuf += sizeof( int );
 518     if (( dir = dirsearch( vol, did )) == NULL ) {
 519         return( AFPERR_NOOBJ );
 520     }
 521
 522     if (( path = cname( vol, dir, &ibuf )) == NULL ) {
 523         return( AFPERR_NOOBJ );
 524     }
 525
 526     if ( *path == '\0' ) {
 527         rc = deletecurdir( vol, obj->oldtmp, AFPOBJ_TMPSIZ);
 528     } else if (of_findname(vol, curdir, path)) {
 529         rc = AFPERR_BUSY;
 530     } else if ((rc = deletefile( upath = mtoupath(vol, path ))) == AFP_OK) {
 531 #ifdef CNID_DB /* get rid of entry */
 532         cnid_t id = cnid_get(vol->v_db, curdir->d_did, upath, strlen(upath));
 533         cnid_delete(vol->v_db, id);
 534 #endif /* CNID_DB */
 535     }
 536     if ( rc == AFP_OK ) {
 537         setvoltime(obj, vol );
 538     }
 539
 540 #ifdef DEBUG
 541     syslog(LOG_INFO, "end afp_delete:");
 542 #endif /* DEBUG */
 543
 544     return( rc );
 545 }
 546
 547 char *ctoupath( vol, dir, name )
 548 const struct vol        *vol;
 549 struct dir      *dir;
 550 char    *name;
 551 {
 552     struct dir  *d;
 553     static char path[ MAXPATHLEN + 1];
 554     char        *p, *u;
 555     int         len;
 556
 557     p = path + sizeof( path ) - 1;
 558     *p = '\0';
 559     u = mtoupath(vol, name );
 560     len = strlen( u );
 561     p -= len;
 562     strncpy( p, u, len );
 563     for ( d = dir; d->d_parent; d = d->d_parent ) {
 564         *--p = '/';
 565         u = mtoupath(vol, d->d_name );
 566         len = strlen( u );
 567         p -= len;
 568         strncpy( p, u, len );
 569     }
 570     *--p = '/';
 571     len = strlen( vol->v_path );
 572     p -= len;
 573     strncpy( p, vol->v_path, len );
 574
 575     return( p );
 576 }
 577
 578
 579 int afp_moveandrename(obj, ibuf, ibuflen, rbuf, rbuflen )
 580 AFPObj      *obj;
 581 char    *ibuf, *rbuf;
 582 int             ibuflen, *rbuflen;
 583 {
 584     struct vol  *vol;
 585     struct dir  *sdir, *ddir, *odir = NULL;
 586     struct stat st;
 587     char        *oldname, *newname;
 588     char        *path, *p, *upath;
 589     int         did, rc;
 590     int         plen;
 591     u_int16_t   vid;
 592 #ifdef CNID_DB
 593     cnid_t      id;
 594 #endif /* CNID_DB */
 595 #ifdef DROPKLUDGE
 596     int         retvalue;
 597 #endif /* DROPKLUDGE */
 598
 599 #ifdef DEBUG
 600     syslog(LOG_INFO, "begin afp_moveandrename:");
 601 #endif /* DEBUG */
 602
 603     *rbuflen = 0;
 604     ibuf += 2;
 605
 606     memcpy( &vid, ibuf, sizeof( vid ));
 607     ibuf += sizeof( vid );
 608     if (( vol = getvolbyvid( vid )) == NULL ) {
 609         return( AFPERR_PARAM );
 610     }
 611
 612     if (vol->v_flags & AFPVOL_RO)
 613         return AFPERR_VLOCK;
 614
 615     /* source did followed by dest did */
 616     memcpy( &did, ibuf, sizeof( did ));
 617     ibuf += sizeof( int );
 618     if (( sdir = dirsearch( vol, did )) == NULL ) {
 619         return( AFPERR_PARAM );
 620     }
 621
 622     memcpy( &did, ibuf, sizeof( did ));
 623     ibuf += sizeof( int );
 624
 625     /* source pathname */
 626     if (( path = cname( vol, sdir, &ibuf )) == NULL ) {
 627         return( AFPERR_NOOBJ );
 628     }
 629
 630     sdir = curdir;
 631     newname = obj->newtmp;
 632     oldname = obj->oldtmp;
 633     if ( *path != '\0' ) {
 634         /* not a directory */
 635         strcpy(newname, path);
 636         strcpy(oldname, path); /* an extra copy for of_rename */
 637 #ifdef CNID_DB
 638         p = mtoupath(vol, path);
 639         id = cnid_get(vol->v_db, sdir->d_did, p, strlen(p));
 640 #endif /* CNID_DB */
 641         p = ctoupath( vol, sdir, newname );
 642     } else {
 643         odir = curdir;
 644         strcpy( newname, odir->d_name );
 645         strcpy(oldname, odir->d_name);
 646         p = ctoupath( vol, odir->d_parent, newname );
 647 #ifdef CNID_DB
 648         id = curdir->d_did; /* we already have the CNID */
 649 #endif /* CNID_DB */
 650     }
 651     /*
 652      * p now points to the full pathname of the source fs object.
 653      */
 654
 655     /* get the destination directory */
 656     if (( ddir = dirsearch( vol, did )) == NULL ) {
 657         return( AFPERR_PARAM );
 658     }
 659     if (( path = cname( vol, ddir, &ibuf )) == NULL ) {
 660         return( AFPERR_NOOBJ );
 661     }
 662     if ( *path != '\0' ) {
 663         return( AFPERR_BADTYPE );
 664     }
 665
 666     /* one more place where we know about path type */
 667     if ( *ibuf++ != 2 ) {
 668         return( AFPERR_PARAM );
 669     }
 670
 671     if (( plen = (unsigned char)*ibuf++ ) != 0 ) {
 672         strncpy( newname, ibuf, plen );
 673         newname[ plen ] = '\0';
 674     }
 675
 676     /* check for illegal characters */
 677     if ((vol->v_flags & AFPVOL_MSWINDOWS) &&
 678             strpbrk(newname, MSWINDOWS_BADCHARS))
 679         return AFPERR_PARAM;
 680
 681     upath = mtoupath(vol, newname);
 682
 683     if ((vol->v_flags & AFPVOL_NOHEX) && strchr(upath, '/'))
 684         return AFPERR_PARAM;
 685
 686     if (!validupath(vol, upath))
 687         return AFPERR_EXIST;
 688
 689     /* check for vetoed filenames */
 690     if (veto_file(vol->v_veto, upath))
 691         return AFPERR_EXIST;
 692
 693     /* source == destination. we just silently accept this. */
 694     if (curdir == sdir) {
 695         if (strcmp(oldname, newname) == 0)
 696             return AFP_OK;
 697
 698         /* deal with case insensitive, case-preserving filesystems. */
 699         if ((stat(upath, &st) == 0) && strdiacasecmp(oldname, newname))
 700             return AFPERR_EXIST;
 701
 702     } else if (stat(upath, &st ) == 0)
 703         return( AFPERR_EXIST );
 704
 705     if ( !odir ) {
 706         if (of_findname(vol, curdir, newname)) {
 707             rc = AFPERR_BUSY;
 708         } else if ((rc = renamefile( p, upath, newname,
 709                                      vol_noadouble(vol) )) == AFP_OK) {
 710             /* if it's still open, rename the ofork as well. */
 711             rc = of_rename(vol, sdir, oldname, curdir, newname);
 712         }
 713     } else {
 714         rc = renamedir(p, upath, odir, curdir, newname, vol_noadouble(vol));
 715     }
 716
 717 #ifdef DROPKLUDGE
 718     if (vol->v_flags & AFPVOL_DROPBOX) {
 719         if (retvalue=matchfile2dirperms (newname, vol, did) != AFP_OK) {
 720             return retvalue;
 721         }
 722     }
 723 #endif /* DROPKLUDGE */
 724
 725     if ( rc == AFP_OK ) {
 726 #ifdef CNID_DB
 727         /* renaming may have moved the file/dir across a filesystem */
 728         if (stat(upath, &st) < 0)
 729             return AFPERR_MISC;
 730
 731         /* fix up the catalog entry */
 732         cnid_update(vol->v_db, id, &st, curdir->d_did, upath, strlen(upath));
 733 #endif /* CNID_DB */
 734         setvoltime(obj, vol );
 735     }
 736
 737 #ifdef DEBUG
 738     syslog(LOG_INFO, "end afp_moveandrename:");
 739 #endif /* DEBUG */
 740
 741     return( rc );
 742 }
 743
 744 int veto_file(const char*veto_str, const char*path)
 745 /* given a veto_str like "abc/zxc/" and path "abc", return 1
 746  * veto_str should be '/' delimited
 747  * if path matches any one of the veto_str elements exactly, then 1 is returned
 748  * otherwise, 0 is returned.
 749  */
 750 {
 751     int i;      /* index to veto_str */
 752     int j;      /* index to path */
 753
 754     if ((veto_str == NULL) || (path == NULL))
 755         return 0;
 756     /*
 757     #ifdef DEBUG
 758         syslog(LOG_DEBUG, "veto_file \"%s\", \"%s\"", veto_str, path);
 759     #endif
 760     */
 761     for(i=0, j=0; veto_str[i] != '\0'; i++) {
 762         if (veto_str[i] == '/') {
 763             if ((j>0) && (path[j] == '\0'))
 764                 return 1;
 765             j = 0;
 766         } else {
 767             if (veto_str[i] != path[j]) {
 768                 while ((veto_str[i] != '/')
 769                         && (veto_str[i] != '\0'))
 770                     i++;
 771                 j = 0;
 772                 continue;
 773             }
 774             j++;
 775         }
 776     }
 777     return 0;
 778 }
 779