etc/afpd/unix.c

   1 /*
   2  * $Id: unix.c,v 1.43.2.1.2.4 2004-03-11 02:02:03 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 <stdio.h>
  13 #include <stdlib.h>
  14
  15 /* STDC check */
  16 #ifdef STDC_HEADERS
  17 #include <string.h>
  18 #else /* STDC_HEADERS */
  19
  20 #ifndef HAVE_STRCHR
  21 #define strchr index
  22 #define strrchr index
  23 #endif /* HAVE_STRCHR */
  24 char *strchr (), *strrchr ();
  25
  26 #ifndef HAVE_MEMCPY
  27 #define memcpy(d,s,n) bcopy ((s), (d), (n))
  28 #define memmove(d,s,n) bcopy ((s), (d), (n))
  29 #endif /* ! HAVE_MEMCPY */
  30 #endif /* STDC_HEADERS */
  31
  32 #include <errno.h>
  33 #include <dirent.h>
  34 #include <limits.h>
  35 #include <sys/param.h>
  36 #include <atalk/logger.h>
  37 #include <atalk/adouble.h>
  38 #include <atalk/afp.h>
  39
  40 #include "auth.h"
  41 #include "directory.h"
  42 #include "volume.h"
  43 #include "unix.h"
  44 #include "fork.h"
  45
  46 /*
  47  * Get the free space on a partition.
  48  */
  49 int ustatfs_getvolspace( vol, bfree, btotal, bsize )
  50 const struct vol        *vol;
  51 VolSpace    *bfree, *btotal;
  52 u_int32_t   *bsize;
  53 {
  54     VolSpace maxVolSpace = (~(VolSpace)0);
  55
  56 #ifdef ultrix
  57     struct fs_data      sfs;
  58 #else /*ultrix*/
  59     struct statfs       sfs;
  60 #endif /*ultrix*/
  61
  62
  63     if ( statfs( vol->v_path, &sfs ) < 0 ) {
  64         LOG(log_error, logtype_afpd, "ustatfs_getvolspace unable to stat %s", vol->v_path);
  65         return( AFPERR_PARAM );
  66     }
  67
  68 #ifdef ultrix
  69     *bfree = (VolSpace) sfs.fd_req.bfreen;
  70     *bsize = 1024;
  71 #else /* !ultrix */
  72     *bfree = (VolSpace) sfs.f_bavail;
  73     *bsize = sfs.f_frsize;
  74 #endif /* ultrix */
  75
  76     if ( *bfree > maxVolSpace / *bsize ) {
  77         *bfree = maxVolSpace;
  78     } else {
  79         *bfree *= *bsize;
  80     }
  81
  82 #ifdef ultrix
  83     *btotal = (VolSpace)
  84               ( sfs.fd_req.btot - ( sfs.fd_req.bfree - sfs.fd_req.bfreen ));
  85 #else /* !ultrix */
  86     *btotal = (VolSpace)
  87               ( sfs.f_blocks - ( sfs.f_bfree - sfs.f_bavail ));
  88 #endif /* ultrix */
  89
  90     /* see similar block above comments */
  91     if ( *btotal > maxVolSpace / *bsize ) {
  92         *btotal = maxVolSpace;
  93     } else {
  94         *btotal *= *bsize;
  95     }
  96
  97     return( AFP_OK );
  98 }
  99
 100 static __inline__ int utombits( bits )
 101 mode_t  bits;
 102 {
 103     int         mbits;
 104
 105     mbits = 0;
 106
 107     mbits |= ( bits & ( S_IREAD >> 6 ))  ? AR_UREAD  : 0;
 108     mbits |= ( bits & ( S_IWRITE >> 6 )) ? AR_UWRITE : 0;
 109     /* Do we really need this? */
 110     mbits |= ( bits & ( S_IEXEC >> 6) ) ? AR_USEARCH : 0;
 111
 112     return( mbits );
 113 }
 114
 115 /* --------------------------------
 116     cf AFP 3.0 page 63
 117 */
 118 void utommode( stat, ma )
 119 struct stat             *stat;
 120 struct maccess  *ma;
 121 {
 122 mode_t mode;
 123
 124     mode = stat->st_mode;
 125     ma->ma_world = utombits( mode );
 126     mode = mode >> 3;
 127
 128     ma->ma_group = utombits( mode );
 129     mode = mode >> 3;
 130
 131     ma->ma_owner = utombits( mode );
 132
 133     /* ma_user is a union of all permissions but we must follow
 134      * unix perm
 135     */
 136     if ( (uuid == stat->st_uid) || (uuid == 0)) {
 137         ma->ma_user = ma->ma_owner | AR_UOWN;
 138     }
 139     else if ( gmem( stat->st_gid )) {
 140         ma->ma_user = ma->ma_group;
 141     }
 142     else {
 143         ma->ma_user = ma->ma_world;
 144     }
 145
 146     /*
 147      * There are certain things the mac won't try if you don't have
 148      * the "owner" bit set, even tho you can do these things on unix wiht
 149      * only write permission.  What were the things?
 150      *
 151      * FIXME and so what ?
 152      */
 153 #if 0
 154     if ( ma->ma_user & AR_UWRITE ) {
 155         ma->ma_user |= AR_UOWN;
 156     }
 157 #endif
 158 }
 159
 160
 161 #ifdef accessmode
 162 #undef accessmode
 163 #endif
 164 /*
 165  * Calculate the mode for a directory using a stat() call to
 166  * estimate permission.
 167  *
 168  * Note: the previous method, using access(), does not work correctly
 169  * over NFS.
 170  * FIXME what about ACL?
 171  */
 172 void accessmode( path, ma, dir, st )
 173 char            *path;
 174 struct maccess  *ma;
 175 struct dir      *dir;
 176 struct stat     *st;
 177
 178 {
 179 struct stat     sb;
 180
 181     ma->ma_user = ma->ma_owner = ma->ma_world = ma->ma_group = 0;
 182     if (!st) {
 183         if (stat(path, &sb) != 0)
 184             return;
 185         st = &sb;
 186     }
 187     utommode( st, ma );
 188     return;
 189 }
 190
 191 int gmem( gid )
 192 const gid_t     gid;
 193 {
 194     int         i;
 195
 196     for ( i = 0; i < ngroups; i++ ) {
 197         if ( groups[ i ] == gid ) {
 198             return( 1 );
 199         }
 200     }
 201     return( 0 );
 202 }
 203
 204 static __inline__ mode_t mtoubits( bits )
 205 u_char  bits;
 206 {
 207     mode_t      mode;
 208
 209     mode = 0;
 210
 211     mode |= ( bits & AR_UREAD ) ? ( (S_IREAD | S_IEXEC) >> 6 ) : 0;
 212     mode |= ( bits & AR_UWRITE ) ? ( (S_IWRITE | S_IEXEC) >> 6 ) : 0;
 213     /* I don't think there's a way to set the SEARCH bit by itself on a Mac
 214         mode |= ( bits & AR_USEARCH ) ? ( S_IEXEC >> 6 ) : 0; */
 215
 216     return( mode );
 217 }
 218
 219 /* ----------------------------------
 220    from the finder's share windows (menu--> File--> sharing...)
 221    and from AFP 3.0 spec page 63
 222    the mac mode should be save somewhere
 223 */
 224 mode_t mtoumode( ma )
 225 struct maccess  *ma;
 226 {
 227     mode_t              mode;
 228
 229     mode = 0;
 230     mode |= mtoubits( ma->ma_owner |ma->ma_world);
 231     mode = mode << 3;
 232
 233     mode |= mtoubits( ma->ma_group |ma->ma_world);
 234     mode = mode << 3;
 235
 236     mode |= mtoubits( ma->ma_world );
 237
 238     return( mode );
 239 }
 240
 241 /*
 242    a dropbox is a folder where w is set but not r eg:
 243    rwx-wx-wx or rwx-wx--
 244    rwx----wx (is not asked by a Mac with OS >= 8.0 ?)
 245 */
 246 static int stickydirmode(name, mode, dropbox)
 247 char * name;
 248 const mode_t mode;
 249 const int dropbox;
 250 {
 251     int retval = 0;
 252
 253 #ifdef DROPKLUDGE
 254     /* Turn on the sticky bit if this is a drop box, also turn off the setgid bit */
 255     if (dropbox) {
 256         int uid;
 257
 258         if ( ( (mode & S_IWOTH) && !(mode & S_IROTH)) ||
 259              ( (mode & S_IWGRP) && !(mode & S_IRGRP)) )
 260         {
 261             uid=geteuid();
 262             if ( seteuid(0) < 0) {
 263                 LOG(log_error, logtype_afpd, "stickydirmode: unable to seteuid root: %s", strerror(errno));
 264             }
 265             if ( (retval=chmod( name, ( (DIRBITS | mode | S_ISVTX) & ~default_options.umask) )) < 0) {
 266                 LOG(log_error, logtype_afpd, "stickydirmode: chmod \"%s\": %s", name, strerror(errno) );
 267             } else {
 268 #ifdef DEBUG
 269                 LOG(log_info, logtype_afpd, "stickydirmode: (debug) chmod \"%s\": %s", name, strerror(retval) );
 270 #endif /* DEBUG */
 271             }
 272             seteuid(uid);
 273             return retval;
 274         }
 275     }
 276 #endif /* DROPKLUDGE */
 277
 278     /*
 279      *  Ignore EPERM errors:  We may be dealing with a directory that is
 280      *  group writable, in which case chmod will fail.
 281      */
 282     if ( (chmod( name, (DIRBITS | mode) & ~default_options.umask ) < 0) && errno != EPERM)  {
 283         LOG(log_error, logtype_afpd, "stickydirmode: chmod \"%s\": %s",name, strerror(errno) );
 284         retval = -1;
 285     }
 286
 287     return retval;
 288 }
 289
 290 int setdeskmode( mode )
 291 const mode_t    mode;
 292 {
 293     char                wd[ MAXPATHLEN + 1];
 294     struct stat         st;
 295     char                modbuf[ 12 + 1], *m;
 296     struct dirent       *deskp, *subp;
 297     DIR                 *desk, *sub;
 298
 299     if ( getcwd( wd , MAXPATHLEN) == NULL ) {
 300         return( -1 );
 301     }
 302     if ( chdir( ".AppleDesktop" ) < 0 ) {
 303         return( -1 );
 304     }
 305     if (( desk = opendir( "." )) == NULL ) {
 306         if ( chdir( wd ) < 0 ) {
 307             LOG(log_error, logtype_afpd, "setdeskmode: chdir %s: %s", wd, strerror(errno) );
 308         }
 309         return( -1 );
 310     }
 311     for ( deskp = readdir( desk ); deskp != NULL; deskp = readdir( desk )) {
 312         if ( strcmp( deskp->d_name, "." ) == 0 ||
 313                 strcmp( deskp->d_name, ".." ) == 0 || strlen( deskp->d_name ) > 2 ) {
 314             continue;
 315         }
 316         strcpy( modbuf, deskp->d_name );
 317         strcat( modbuf, "/" );
 318         m = strchr( modbuf, '\0' );
 319         if (( sub = opendir( deskp->d_name )) == NULL ) {
 320             continue;
 321         }
 322         for ( subp = readdir( sub ); subp != NULL; subp = readdir( sub )) {
 323             if ( strcmp( subp->d_name, "." ) == 0 ||
 324                     strcmp( subp->d_name, ".." ) == 0 ) {
 325                 continue;
 326             }
 327             *m = '\0';
 328             strcat( modbuf, subp->d_name );
 329             /* XXX: need to preserve special modes */
 330             if (stat(modbuf, &st) < 0) {
 331                 LOG(log_error, logtype_afpd, "setdeskmode: stat %s: %s",
 332                     modbuf, strerror(errno) );
 333                 continue;
 334             }
 335
 336             if (S_ISDIR(st.st_mode)) {
 337                 if ( chmod( modbuf,  (DIRBITS | mode) & ~default_options.umask ) < 0 && errno != EPERM ) {
 338                     LOG(log_error, logtype_afpd, "setdeskmode: chmod %s: %s",
 339                         modbuf, strerror(errno) );
 340                 }
 341             } else if ( chmod( modbuf,  mode & ~default_options.umask ) < 0 && errno != EPERM ) {
 342                 LOG(log_error, logtype_afpd, "setdeskmode: chmod %s: %s",
 343                     modbuf, strerror(errno) );
 344             }
 345
 346         }
 347         closedir( sub );
 348         /* XXX: need to preserve special modes */
 349         if ( chmod( deskp->d_name,  (DIRBITS | mode) & ~default_options.umask ) < 0 && errno != EPERM ) {
 350             LOG(log_error, logtype_afpd, "setdeskmode: chmod %s: %s",
 351                 deskp->d_name, strerror(errno) );
 352         }
 353     }
 354     closedir( desk );
 355     if ( chdir( wd ) < 0 ) {
 356         LOG(log_error, logtype_afpd, "setdeskmode: chdir %s: %s", wd, strerror(errno) );
 357         return -1;
 358     }
 359     /* XXX: need to preserve special modes */
 360     if ( chmod( ".AppleDesktop",  (DIRBITS | mode) & ~default_options.umask ) < 0 && errno != EPERM ) {
 361         LOG(log_error, logtype_afpd, "setdeskmode: chmod .AppleDesktop: %s", strerror(errno) );
 362     }
 363     return( 0 );
 364 }
 365
 366 /* --------------------- */
 367 int setfilunixmode (vol, path, mode)
 368 const struct vol *vol;
 369 struct path* path;
 370 mode_t mode;
 371 {
 372     if (!path->st_valid) {
 373         of_stat(path);
 374     }
 375
 376     if (path->st_errno) {
 377         return -1;
 378     }
 379
 380     if (setfilmode( path->u_name, mode, &path->st) < 0)
 381         return -1;
 382     /* we need to set write perm if read set for resource fork */
 383     return setfilmode(vol->ad_path( path->u_name, ADFLAGS_HF ), ad_hf_mode(mode), &path->st);
 384 }
 385
 386 /* --------------------- */
 387 int setfilmode(name, mode, st)
 388 char * name;
 389 mode_t mode;
 390 struct stat *st;
 391 {
 392 struct stat sb;
 393 mode_t mask = S_IRUSR |S_IWUSR | S_IRGRP | S_IWGRP |S_IROTH | S_IWOTH;
 394
 395     if (!st) {
 396         if (stat(name, &sb) != 0)
 397             return -1;
 398         st = &sb;
 399     }
 400    mode &= mask;        /* keep only rw-rw-rw in mode */
 401    mode |= st->st_mode & ~mask; /* keep other bits from previous mode */
 402    if ( chmod( name,  mode & ~default_options.umask ) < 0 && errno != EPERM ) {
 403        return -1;
 404    }
 405    return 0;
 406 }
 407
 408 /* --------------------- */
 409 int setdirunixmode( vol, mode )
 410 const struct vol *vol;
 411 const mode_t     mode;
 412 {
 413     int dropbox = (vol->v_flags & AFPVOL_DROPBOX);
 414
 415     if (vol->v_adouble != AD_VERSION2_OSX) {
 416         if (stickydirmode(".AppleDouble", DIRBITS | mode, dropbox) < 0 && !vol_noadouble(vol))
 417             return  -1 ;
 418     }
 419
 420     if ( stickydirmode(".", DIRBITS | mode, dropbox) < 0 )
 421         return -1;
 422     return 0;
 423 }
 424
 425 /* --------------------- */
 426 int setdirmode( vol, mode )
 427 const struct vol *vol;
 428 const mode_t mode;
 429 {
 430     char                buf[ MAXPATHLEN + 1];
 431     struct stat         st;
 432     char                *m;
 433     struct dirent       *dirp;
 434     DIR                 *dir;
 435     int                 osx = vol->v_adouble == AD_VERSION2_OSX;
 436     int                 hf_mode = ad_hf_mode(mode);
 437     int                 dropbox = (vol->v_flags & AFPVOL_DROPBOX);
 438
 439     if (( dir = opendir( "." )) == NULL ) {
 440         LOG(log_error, logtype_afpd, "setdirmode: opendir .: %s", strerror(errno) );
 441         return( -1 );
 442     }
 443
 444     for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
 445         /* FIXME */
 446         if ( *dirp->d_name == '.' && (!osx || dirp->d_name[1] != '_')) {
 447             continue;
 448         }
 449         if ( stat( dirp->d_name, &st ) < 0 ) {
 450             LOG(log_error, logtype_afpd, "setdirmode: stat %s: %s",
 451                 dirp->d_name, strerror(errno) );
 452             continue;
 453         }
 454
 455         if (!S_ISDIR(st.st_mode)) {
 456            int setmode = (osx && *dirp->d_name == '.')?hf_mode:mode;
 457
 458            if (setfilmode(dirp->d_name, setmode, &st) < 0) {
 459                 LOG(log_error, logtype_afpd, "setdirmode: chmod %s: %s",
 460                     dirp->d_name, strerror(errno) );
 461                 return -1;
 462            }
 463         }
 464 #if 0
 465             /* XXX: need to preserve special modes */
 466         else if (S_ISDIR(st.st_mode)) {
 467                 if (stickydirmode(dirp->d_name, DIRBITS | mode, dropbox) < 0)
 468                     return (-1);
 469             } else if (stickydirmode(dirp->d_name, mode, dropbox) < 0)
 470                 return (-1);
 471         }
 472 #endif
 473     }
 474     closedir( dir );
 475
 476     if (osx) {
 477         goto setdirmode_noadouble;
 478     }
 479
 480     /* change perm of .AppleDouble's files
 481     */
 482     if (( dir = opendir( ".AppleDouble" )) == NULL ) {
 483         if (vol_noadouble(vol))
 484             goto setdirmode_noadouble;
 485         LOG(log_error, logtype_afpd, "setdirmode: opendir .AppleDouble: %s", strerror(errno) );
 486         return( -1 );
 487     }
 488     strcpy( buf, ".AppleDouble" );
 489     strcat( buf, "/" );
 490     m = strchr( buf, '\0' );
 491     for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
 492         if ( strcmp( dirp->d_name, "." ) == 0 ||
 493                 strcmp( dirp->d_name, ".." ) == 0 ) {
 494             continue;
 495         }
 496         *m = '\0';
 497         strcat( buf, dirp->d_name );
 498
 499         if ( stat( buf, &st ) < 0 ) {
 500             LOG(log_error, logtype_afpd, "setdirmode: stat %s: %s", buf, strerror(errno) );
 501             continue;
 502         }
 503         if (!S_ISDIR(st.st_mode)) {
 504            if (setfilmode(buf, hf_mode , &st) < 0) {
 505                /* FIXME what do we do then? */
 506            }
 507         }
 508     } /* end for */
 509     closedir( dir );
 510
 511     /* XXX: use special bits to tag directory permissions */
 512
 513     /* XXX: need to preserve special modes */
 514     if ( stickydirmode(".AppleDouble", DIRBITS | mode, dropbox) < 0 )
 515         return( -1 );
 516
 517 setdirmode_noadouble:
 518     /* XXX: need to preserve special modes */
 519     if ( stickydirmode(".", DIRBITS | mode, dropbox) < 0 )
 520         return( -1 );
 521     return( 0 );
 522 }
 523
 524 int setdeskowner( uid, gid )
 525 const uid_t     uid;
 526 const gid_t     gid;
 527 {
 528     char                wd[ MAXPATHLEN + 1];
 529     char                modbuf[12 + 1], *m;
 530     struct dirent       *deskp, *subp;
 531     DIR                 *desk, *sub;
 532
 533     if ( getcwd( wd, MAXPATHLEN ) == NULL ) {
 534         return( -1 );
 535     }
 536     if ( chdir( ".AppleDesktop" ) < 0 ) {
 537         return( -1 );
 538     }
 539     if (( desk = opendir( "." )) == NULL ) {
 540         if ( chdir( wd ) < 0 ) {
 541             LOG(log_error, logtype_afpd, "setdeskowner: chdir %s: %s", wd, strerror(errno) );
 542         }
 543         return( -1 );
 544     }
 545     for ( deskp = readdir( desk ); deskp != NULL; deskp = readdir( desk )) {
 546         if ( strcmp( deskp->d_name, "." ) == 0 ||
 547                 strcmp( deskp->d_name, ".." ) == 0 ||
 548                 strlen( deskp->d_name ) > 2 ) {
 549             continue;
 550         }
 551         strcpy( modbuf, deskp->d_name );
 552         strcat( modbuf, "/" );
 553         m = strchr( modbuf, '\0' );
 554         if (( sub = opendir( deskp->d_name )) == NULL ) {
 555             continue;
 556         }
 557         for ( subp = readdir( sub ); subp != NULL; subp = readdir( sub )) {
 558             if ( strcmp( subp->d_name, "." ) == 0 ||
 559                     strcmp( subp->d_name, ".." ) == 0 ) {
 560                 continue;
 561             }
 562             *m = '\0';
 563             strcat( modbuf, subp->d_name );
 564             /* XXX: add special any uid, ignore group bits */
 565             if ( chown( modbuf, uid, gid ) < 0 && errno != EPERM ) {
 566                 LOG(log_error, logtype_afpd, "setdeskown: chown %s: %s",
 567                     modbuf, strerror(errno) );
 568             }
 569         }
 570         closedir( sub );
 571         /* XXX: add special any uid, ignore group bits */
 572         if ( chown( deskp->d_name, uid, gid ) < 0 && errno != EPERM ) {
 573             LOG(log_error, logtype_afpd, "setdeskowner: chown %s: %s",
 574                 deskp->d_name, strerror(errno) );
 575         }
 576     }
 577     closedir( desk );
 578     if ( chdir( wd ) < 0 ) {
 579         LOG(log_error, logtype_afpd, "setdeskowner: chdir %s: %s", wd, strerror(errno) );
 580         return -1;
 581     }
 582     if ( chown( ".AppleDesktop", uid, gid ) < 0 && errno != EPERM ) {
 583         LOG(log_error, logtype_afpd, "setdeskowner: chown .AppleDesktop: %s",
 584             strerror(errno) );
 585     }
 586     return( 0 );
 587 }
 588
 589
 590 /* ---------------------------------
 591  * uid/gid == 0 need to be handled as special cases. they really mean
 592  * that user/group should inherit from other, but that doesn't fit
 593  * into the unix permission scheme. we can get around this by
 594  * co-opting some bits. */
 595 int setdirowner(vol, uid, gid )
 596 const struct vol *vol;
 597 const uid_t     uid;
 598 const gid_t     gid;
 599 {
 600     char                buf[ MAXPATHLEN + 1];
 601     struct stat         st;
 602     char                *m;
 603     struct dirent       *dirp;
 604     DIR                 *dir;
 605     int                 osx = vol->v_adouble == AD_VERSION2_OSX;
 606     int                 noadouble = vol_noadouble(vol);
 607
 608     if (( dir = opendir( "." )) == NULL ) {
 609         return( -1 );
 610     }
 611     for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
 612         if ( *dirp->d_name == '.' && (!osx || dirp->d_name[1] != '_')) {
 613             continue;
 614         }
 615         if ( stat( dirp->d_name, &st ) < 0 ) {
 616             LOG(log_error, logtype_afpd, "setdirowner: stat %s: %s",
 617                 dirp->d_name, strerror(errno) );
 618             continue;
 619         }
 620         if (( st.st_mode & S_IFMT ) == S_IFREG ) {
 621             if ( chown( dirp->d_name, uid, gid ) < 0 && errno != EPERM ) {
 622                 LOG(log_debug, logtype_afpd, "setdirowner: chown %s: %s",
 623                     dirp->d_name, strerror(errno) );
 624                 /* return ( -1 ); Sometimes this is okay */
 625             }
 626         }
 627     }
 628     closedir( dir );
 629
 630     if (osx) {
 631        goto setdirowner_noadouble;
 632     }
 633
 634     if (( dir = opendir( ".AppleDouble" )) == NULL ) {
 635         if (noadouble)
 636             goto setdirowner_noadouble;
 637         return( -1 );
 638     }
 639     strcpy( buf, ".AppleDouble" );
 640     strcat( buf, "/" );
 641     m = strchr( buf, '\0' );
 642     for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
 643         if ( strcmp( dirp->d_name, "." ) == 0 ||
 644                 strcmp( dirp->d_name, ".." ) == 0 ) {
 645             continue;
 646         }
 647         *m = '\0';
 648         strcat( buf, dirp->d_name );
 649         if ( chown( buf, uid, gid ) < 0 && errno != EPERM ) {
 650             LOG(log_debug, logtype_afpd, "setdirowner: chown %d/%d %s: %s",
 651                 uid, gid, buf, strerror(errno) );
 652             /* return ( -1 ); Sometimes this is okay */
 653         }
 654     }
 655     closedir( dir );
 656
 657     /*
 658      * We cheat: we know that chown doesn't do anything.
 659      */
 660     if ( stat( ".AppleDouble", &st ) < 0 ) {
 661         LOG(log_error, logtype_afpd, "setdirowner: stat .AppleDouble: %s", strerror(errno) );
 662         return( -1 );
 663     }
 664     if ( gid && gid != st.st_gid && chown( ".AppleDouble", uid, gid ) < 0 &&
 665             errno != EPERM ) {
 666         LOG(log_debug, logtype_afpd, "setdirowner: chown %d/%d .AppleDouble: %s",
 667             uid, gid, strerror(errno) );
 668         /* return ( -1 ); Sometimes this is okay */
 669     }
 670
 671 setdirowner_noadouble:
 672     if ( stat( ".", &st ) < 0 ) {
 673         return( -1 );
 674     }
 675     if ( gid && gid != st.st_gid && chown( ".", uid, gid ) < 0 &&
 676             errno != EPERM ) {
 677         LOG(log_debug, logtype_afpd, "setdirowner: chown %d/%d .: %s",
 678             uid, gid, strerror(errno) );
 679     }
 680
 681     return( 0 );
 682 }
 683
 684 #if 0
 685 /* recursive chown()ing of a directory */
 686 static int recursive_chown(const char *path, uid_t uid, gid_t gid) {
 687     struct stat sbuf;
 688     DIR *odir = NULL;
 689     struct dirent *entry;
 690     char *name;
 691     int ret = 0;
 692     char newpath[PATH_MAX+1];
 693     newpath[PATH_MAX] = '\0';
 694
 695     if (chown(path, uid, gid) < 0) {
 696         LOG(log_error, logtype_afpd, "cannot chown() file [%s] (uid = %d): %s\n", path, uid, strerror(errno));
 697         return -1;
 698     }
 699
 700     if (stat(path, &sbuf) < 0) {
 701         LOG(log_error, logtype_afpd, "cannot chown() file [%s] (uid = %d): %s\n", path, uid, strerror(errno));
 702         return -1;
 703     }
 704
 705     if (S_ISDIR(sbuf.st_mode)) {
 706         odir = opendir(path);
 707         if (odir == NULL) {
 708             LOG(log_error, logtype_afpd, "cannot opendir() [%s] (uid = %d): %s\n", path, uid, strerror(errno));
 709             goto recursive_chown_end;
 710         }
 711         while (NULL != (entry=readdir(odir)) ) {
 712             name = entry->d_name;
 713             if (name[0] == '.' && name[1] == '\0')
 714                 continue;
 715             if (name[0] == '.' && name[1] == '.' && name[2] == '\0')
 716                 continue;
 717             sprintf(newpath, "%s/%s", path, name);
 718             if (recursive_chown(newpath, uid, gid) < 0)
 719                 ret = -1;
 720         } /* while */
 721     } /* if */
 722
 723 recursive_chown_end:
 724     if (odir != NULL) {
 725         closedir(odir);
 726     }
 727     return ret;
 728 }
 729 #endif
 730
 731 /* This is equivalent of unix rename(). */
 732 int unix_rename(const char *oldpath, const char *newpath)
 733 {
 734 #if 0
 735         char pd_name[PATH_MAX+1];
 736         int i;
 737         struct stat pd_stat;
 738         uid_t uid;
 739 #endif
 740
 741         if (rename(oldpath, newpath) < 0)
 742                 return -1;
 743 #if 0
 744         for (i = 0; i <= PATH_MAX && newpath[i] != '\0'; i++)
 745                 pd_name[i] = newpath[i];
 746         pd_name[i] = '\0';
 747
 748         while (i > 0 && pd_name[i] != '/') i--;
 749         if (pd_name[i] == '/') i++;
 750
 751         pd_name[i++] = '.'; pd_name[i++] = '\0';
 752
 753         if (stat(pd_name, &pd_stat) < 0) {
 754             LOG(log_error, logtype_afpd, "stat() of parent dir failed: pd_name = %s, uid = %d: %s\n",
 755                 pd_name, geteuid(), strerror(errno));
 756                 return 0;
 757         }
 758
 759         /* So we have SGID bit set... */
 760         if ((S_ISGID & pd_stat.st_mode) != 0) {
 761             uid = geteuid();
 762             if (seteuid(0) < 0)
 763                 LOG(log_error, logtype_afpd, "seteuid() failed: %s\n", strerror(errno));
 764             if (recursive_chown(newpath, uid, pd_stat.st_gid) < 0)
 765                 LOG(log_error, logtype_afpd, "chown() of parent dir failed: newpath=%s, uid=%d: %s\n",
 766                     pd_name, geteuid(), strerror(errno));
 767             seteuid(uid);
 768         }
 769 #endif
 770         return 0;
 771 }
 772