2 * $Id: unix.c,v 1.42 2003-01-12 14:40:03 didg Exp $
4 * Copyright (c) 1990,1993 Regents of The University of Michigan.
5 * All Rights Reserved. See COPYRIGHT.
10 #endif /* HAVE_CONFIG_H */
16 #include <sys/types.h>
17 #include <sys/param.h>
19 #include <atalk/logger.h>
20 #include <netatalk/endian.h>
23 #include <atalk/adouble.h>
24 #include <atalk/afp.h>
29 #else /* STDC_HEADERS */
33 #endif /* HAVE_STRCHR */
34 char *strchr (), *strrchr ();
36 #define memcpy(d,s,n) bcopy ((s), (d), (n))
37 #define memmove(d,s,n) bcopy ((s), (d), (n))
38 #endif /* ! HAVE_MEMCPY */
39 #endif /* STDC_HEADERS */
43 #endif /* HAVE_FCNTL_H */
45 #include "directory.h"
50 * Get the free space on a partition.
52 int ustatfs_getvolspace( vol, bfree, btotal, bsize )
53 const struct vol *vol;
54 VolSpace *bfree, *btotal;
57 VolSpace maxVolSpace = (~(VolSpace)0);
66 if ( statfs( vol->v_path, &sfs ) < 0 ) {
67 LOG(log_error, logtype_afpd, "ustatfs_getvolspace unable to stat %s", vol->v_path);
68 return( AFPERR_PARAM );
72 *bfree = (VolSpace) sfs.fd_req.bfreen;
75 *bfree = (VolSpace) sfs.f_bavail;
76 *bsize = sfs.f_frsize;
79 if ( *bfree > maxVolSpace / *bsize ) {
87 ( sfs.fd_req.btot - ( sfs.fd_req.bfree - sfs.fd_req.bfreen ));
90 ( sfs.f_blocks - ( sfs.f_bfree - sfs.f_bavail ));
93 /* see similar block above comments */
94 if ( *btotal > maxVolSpace / *bsize ) {
95 *btotal = maxVolSpace;
103 static __inline__ int utombits( bits )
110 mbits |= ( bits & ( S_IREAD >> 6 )) ? (AR_UREAD | AR_USEARCH) : 0;
111 mbits |= ( bits & ( S_IWRITE >> 6 )) ? AR_UWRITE : 0;
112 /* Do we really need this?
113 mbits |= ( bits & ( S_IEXEC >> 6) ) ? AR_USEARCH : 0; */
118 /* --------------------------------
121 void utommode( stat, ma )
127 mode = stat->st_mode;
128 ma->ma_world = utombits( mode );
131 ma->ma_group = utombits( mode );
134 ma->ma_owner = utombits( mode );
136 /* ma_user is a union of all permissions but we must follow
139 if ( (uuid == stat->st_uid) || (uuid == 0)) {
140 ma->ma_user = ma->ma_owner | AR_UOWN;
142 else if ( gmem( stat->st_gid )) {
143 ma->ma_user = ma->ma_group;
146 ma->ma_user = ma->ma_world;
150 * There are certain things the mac won't try if you don't have
151 * the "owner" bit set, even tho you can do these things on unix wiht
152 * only write permission. What were the things?
154 * FIXME and so what ?
157 if ( ma->ma_user & AR_UWRITE ) {
158 ma->ma_user |= AR_UOWN;
165 * Calculate the mode for a directory using a stat() call to
166 * estimate permission.
168 * Note: the previous method, using access(), does not work correctly
170 * FIXME what about ACL?
172 void accessmode( path, ma, dir, st )
181 ma->ma_user = ma->ma_owner = ma->ma_world = ma->ma_group = 0;
183 if (stat(path, &sb) != 0)
196 for ( i = 0; i < ngroups; i++ ) {
197 if ( groups[ i ] == gid ) {
204 static __inline__ mode_t mtoubits( bits )
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; */
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
224 mode_t mtoumode( ma )
230 mode |= mtoubits( ma->ma_owner |ma->ma_world);
233 mode |= mtoubits( ma->ma_group |ma->ma_world);
236 mode |= mtoubits( ma->ma_world );
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 ?)
246 static int stickydirmode(name, mode, dropbox)
254 /* Turn on the sticky bit if this is a drop box, also turn off the setgid bit */
258 if ( ( (mode & S_IWOTH) && !(mode & S_IROTH)) ||
259 ( (mode & S_IWGRP) && !(mode & S_IRGRP)) )
262 if ( seteuid(0) < 0) {
263 LOG(log_error, logtype_afpd, "stickydirmode: unable to seteuid root: %s", strerror(errno));
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) );
269 LOG(log_info, logtype_afpd, "stickydirmode: (debug) chmod \"%s\": %s", name, strerror(retval) );
276 #endif /* DROPKLUDGE */
279 * Ignore EPERM errors: We may be dealing with a directory that is
280 * group writable, in which case chmod will fail.
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) );
290 int setdeskmode( mode )
293 char wd[ MAXPATHLEN + 1];
295 char modbuf[ 12 + 1], *m;
296 struct dirent *deskp, *subp;
299 if ( getcwd( wd , MAXPATHLEN) == NULL ) {
302 if ( chdir( ".AppleDesktop" ) < 0 ) {
305 if (( desk = opendir( "." )) == NULL ) {
306 if ( chdir( wd ) < 0 ) {
307 LOG(log_error, logtype_afpd, "setdeskmode: chdir %s: %s", wd, strerror(errno) );
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 ) {
316 strcpy( modbuf, deskp->d_name );
317 strcat( modbuf, "/" );
318 m = strchr( modbuf, '\0' );
319 if (( sub = opendir( deskp->d_name )) == NULL ) {
322 for ( subp = readdir( sub ); subp != NULL; subp = readdir( sub )) {
323 if ( strcmp( subp->d_name, "." ) == 0 ||
324 strcmp( subp->d_name, ".." ) == 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) );
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) );
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) );
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) );
355 if ( chdir( wd ) < 0 ) {
356 LOG(log_error, logtype_afpd, "setdeskmode: chdir %s: %s", wd, strerror(errno) );
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) );
366 int setfilmode(name, mode, st)
372 mode_t mask = S_IRUSR |S_IWUSR | S_IRGRP | S_IWGRP |S_IROTH | S_IWOTH;
375 if (stat(name, &sb) != 0)
379 mode &= mask; /* keep only rw-rw-rw in mode */
380 mode |= st->st_mode & ~mask; /* keep other bits from previous mode */
381 if ( chmod( name, mode & ~default_options.umask ) < 0 && errno != EPERM ) {
387 int setdirmode( mode, noadouble, dropbox )
392 char buf[ MAXPATHLEN + 1];
398 if (( dir = opendir( "." )) == NULL ) {
399 LOG(log_error, logtype_afpd, "setdirmode: opendir .: %s", strerror(errno) );
403 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
404 if ( *dirp->d_name == '.' ) {
407 if ( stat( dirp->d_name, &st ) < 0 ) {
408 LOG(log_error, logtype_afpd, "setdirmode: stat %s: %s",
409 dirp->d_name, strerror(errno) );
413 if (!S_ISDIR(st.st_mode)) {
414 if (setfilmode(dirp->d_name, mode, &st) < 0) {
415 LOG(log_error, logtype_afpd, "setdirmode: chmod %s: %s",
416 dirp->d_name, strerror(errno) );
421 /* XXX: need to preserve special modes */
422 else if (S_ISDIR(st.st_mode)) {
423 if (stickydirmode(dirp->d_name, DIRBITS | mode, dropbox) < 0)
425 } else if (stickydirmode(dirp->d_name, mode, dropbox) < 0)
432 /* change perm of .AppleDouble's files
434 if (( dir = opendir( ".AppleDouble" )) == NULL ) {
436 goto setdirmode_noadouble;
437 LOG(log_error, logtype_afpd, "setdirmode: opendir .AppleDouble: %s", strerror(errno) );
440 strcpy( buf, ".AppleDouble" );
442 m = strchr( buf, '\0' );
443 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
444 if ( strcmp( dirp->d_name, "." ) == 0 ||
445 strcmp( dirp->d_name, ".." ) == 0 ) {
449 strcat( buf, dirp->d_name );
451 if ( stat( buf, &st ) < 0 ) {
452 LOG(log_error, logtype_afpd, "setdirmode: stat %s: %s", buf, strerror(errno) );
455 if (!S_ISDIR(st.st_mode)) {
456 if (setfilmode(buf, ad_hf_mode(mode), &st) < 0) {
457 /* FIXME what do we do then? */
463 /* XXX: use special bits to tag directory permissions */
465 /* XXX: need to preserve special modes */
466 if ( stickydirmode(".AppleDouble", DIRBITS | mode, dropbox) < 0 )
469 setdirmode_noadouble:
470 /* XXX: need to preserve special modes */
471 if ( stickydirmode(".", DIRBITS | mode, dropbox) < 0 )
476 int setdeskowner( uid, gid )
480 char wd[ MAXPATHLEN + 1];
481 char modbuf[12 + 1], *m;
482 struct dirent *deskp, *subp;
485 if ( getcwd( wd, MAXPATHLEN ) == NULL ) {
488 if ( chdir( ".AppleDesktop" ) < 0 ) {
491 if (( desk = opendir( "." )) == NULL ) {
492 if ( chdir( wd ) < 0 ) {
493 LOG(log_error, logtype_afpd, "setdeskowner: chdir %s: %s", wd, strerror(errno) );
497 for ( deskp = readdir( desk ); deskp != NULL; deskp = readdir( desk )) {
498 if ( strcmp( deskp->d_name, "." ) == 0 ||
499 strcmp( deskp->d_name, ".." ) == 0 ||
500 strlen( deskp->d_name ) > 2 ) {
503 strcpy( modbuf, deskp->d_name );
504 strcat( modbuf, "/" );
505 m = strchr( modbuf, '\0' );
506 if (( sub = opendir( deskp->d_name )) == NULL ) {
509 for ( subp = readdir( sub ); subp != NULL; subp = readdir( sub )) {
510 if ( strcmp( subp->d_name, "." ) == 0 ||
511 strcmp( subp->d_name, ".." ) == 0 ) {
515 strcat( modbuf, subp->d_name );
516 /* XXX: add special any uid, ignore group bits */
517 if ( chown( modbuf, uid, gid ) < 0 && errno != EPERM ) {
518 LOG(log_error, logtype_afpd, "setdeskown: chown %s: %s",
519 modbuf, strerror(errno) );
523 /* XXX: add special any uid, ignore group bits */
524 if ( chown( deskp->d_name, uid, gid ) < 0 && errno != EPERM ) {
525 LOG(log_error, logtype_afpd, "setdeskowner: chown %s: %s",
526 deskp->d_name, strerror(errno) );
530 if ( chdir( wd ) < 0 ) {
531 LOG(log_error, logtype_afpd, "setdeskowner: chdir %s: %s", wd, strerror(errno) );
534 if ( chown( ".AppleDesktop", uid, gid ) < 0 && errno != EPERM ) {
535 LOG(log_error, logtype_afpd, "setdeskowner: chown .AppleDesktop: %s",
542 /* uid/gid == 0 need to be handled as special cases. they really mean
543 * that user/group should inherit from other, but that doesn't fit
544 * into the unix permission scheme. we can get around this by
545 * co-opting some bits. */
546 int setdirowner( uid, gid, noadouble )
551 char buf[ MAXPATHLEN + 1];
557 if (( dir = opendir( "." )) == NULL ) {
560 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
561 if ( *dirp->d_name == '.' ) {
564 if ( stat( dirp->d_name, &st ) < 0 ) {
565 LOG(log_error, logtype_afpd, "setdirowner: stat %s: %s",
566 dirp->d_name, strerror(errno) );
569 if (( st.st_mode & S_IFMT ) == S_IFREG ) {
570 if ( chown( dirp->d_name, uid, gid ) < 0 && errno != EPERM ) {
571 LOG(log_debug, logtype_afpd, "setdirowner: chown %s: %s",
572 dirp->d_name, strerror(errno) );
573 /* return ( -1 ); Sometimes this is okay */
578 if (( dir = opendir( ".AppleDouble" )) == NULL ) {
580 goto setdirowner_noadouble;
583 strcpy( buf, ".AppleDouble" );
585 m = strchr( buf, '\0' );
586 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
587 if ( strcmp( dirp->d_name, "." ) == 0 ||
588 strcmp( dirp->d_name, ".." ) == 0 ) {
592 strcat( buf, dirp->d_name );
593 if ( chown( buf, uid, gid ) < 0 && errno != EPERM ) {
594 LOG(log_debug, logtype_afpd, "setdirowner: chown %d/%d %s: %s",
595 uid, gid, buf, strerror(errno) );
596 /* return ( -1 ); Sometimes this is okay */
602 * We cheat: we know that chown doesn't do anything.
604 if ( stat( ".AppleDouble", &st ) < 0 ) {
605 LOG(log_error, logtype_afpd, "setdirowner: stat .AppleDouble: %s", strerror(errno) );
608 if ( gid && gid != st.st_gid && chown( ".AppleDouble", uid, gid ) < 0 &&
610 LOG(log_debug, logtype_afpd, "setdirowner: chown %d/%d .AppleDouble: %s",
611 uid, gid, strerror(errno) );
612 /* return ( -1 ); Sometimes this is okay */
615 setdirowner_noadouble:
616 if ( stat( ".", &st ) < 0 ) {
619 if ( gid && gid != st.st_gid && chown( ".", uid, gid ) < 0 &&
621 LOG(log_debug, logtype_afpd, "setdirowner: chown %d/%d .: %s",
622 uid, gid, strerror(errno) );
628 /* recursive chown()ing of a directory */
629 static int recursive_chown(const char *path, uid_t uid, gid_t gid) {
632 struct dirent *entry;
635 char newpath[PATH_MAX+1];
636 newpath[PATH_MAX] = '\0';
638 if (chown(path, uid, gid) < 0) {
639 LOG(log_error, logtype_afpd, "cannot chown() file [%s] (uid = %d): %s\n", path, uid, strerror(errno));
643 if (stat(path, &sbuf) < 0) {
644 LOG(log_error, logtype_afpd, "cannot chown() file [%s] (uid = %d): %s\n", path, uid, strerror(errno));
648 if (S_ISDIR(sbuf.st_mode)) {
649 odir = opendir(path);
651 LOG(log_error, logtype_afpd, "cannot opendir() [%s] (uid = %d): %s\n", path, uid, strerror(errno));
652 goto recursive_chown_end;
654 while (NULL != (entry=readdir(odir)) ) {
655 name = entry->d_name;
656 if (name[0] == '.' && name[1] == '\0')
658 if (name[0] == '.' && name[1] == '.' && name[2] == '\0')
660 sprintf(newpath, "%s/%s", path, name);
661 if (recursive_chown(newpath, uid, gid) < 0)
673 /* This is equivalent of unix rename(). */
674 int unix_rename(const char *oldpath, const char *newpath)
676 char pd_name[PATH_MAX+1];
681 if (rename(oldpath, newpath) < 0)
684 for (i = 0; i <= PATH_MAX && newpath[i] != '\0'; i++)
685 pd_name[i] = newpath[i];
688 while (i > 0 && pd_name[i] != '/') i--;
689 if (pd_name[i] == '/') i++;
691 pd_name[i++] = '.'; pd_name[i++] = '\0';
693 if (stat(pd_name, &pd_stat) < 0) {
694 LOG(log_error, logtype_afpd, "stat() of parent dir failed: pd_name = %s, uid = %d: %s\n",
695 pd_name, geteuid(), strerror(errno));
699 /* So we have SGID bit set... */
700 if ((S_ISGID & pd_stat.st_mode) != 0) {
703 LOG(log_error, logtype_afpd, "seteuid() failed: %s\n", strerror(errno));
704 if (recursive_chown(newpath, uid, pd_stat.st_gid) < 0)
705 LOG(log_error, logtype_afpd, "chown() of parent dir failed: newpath=%s, uid=%d: %s\n",
706 pd_name, geteuid(), strerror(errno));