2 * $Id: unix.c,v 1.45 2003-06-06 21:18:00 srittau 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>
28 #else /* STDC_HEADERS */
32 #endif /* HAVE_STRCHR */
33 char *strchr (), *strrchr ();
35 #define memcpy(d,s,n) bcopy ((s), (d), (n))
36 #define memmove(d,s,n) bcopy ((s), (d), (n))
37 #endif /* ! HAVE_MEMCPY */
38 #endif /* STDC_HEADERS */
42 #endif /* HAVE_FCNTL_H */
44 #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 : 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 /* --------------------- */
367 int setfilemode (path, mode)
371 if (!path->st_valid) {
375 if (path->st_errno) {
379 if (setfilmode( path->u_name, mode, &path->st) < 0)
381 /* we need to set write perm if read set for resource fork */
382 return setfilmode(ad_path( path->u_name, ADFLAGS_HF ), ad_hf_mode(mode), &path->st);
385 /* --------------------- */
386 int setfilmode(name, mode, st)
392 mode_t mask = S_IRUSR |S_IWUSR | S_IRGRP | S_IWGRP |S_IROTH | S_IWOTH;
395 if (stat(name, &sb) != 0)
399 mode &= mask; /* keep only rw-rw-rw in mode */
400 mode |= st->st_mode & ~mask; /* keep other bits from previous mode */
401 if ( chmod( name, mode & ~default_options.umask ) < 0 && errno != EPERM ) {
407 /* --------------------- */
408 int setdirunixmode( mode, noadouble, dropbox )
413 if ( stickydirmode(".AppleDouble", DIRBITS | mode, dropbox) < 0 && !noadouble)
416 if ( stickydirmode(".", DIRBITS | mode, dropbox) < 0 )
421 /* --------------------- */
422 int setdirmode( mode, noadouble, dropbox )
427 char buf[ MAXPATHLEN + 1];
433 if (( dir = opendir( "." )) == NULL ) {
434 LOG(log_error, logtype_afpd, "setdirmode: opendir .: %s", strerror(errno) );
438 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
439 if ( *dirp->d_name == '.' ) {
442 if ( stat( dirp->d_name, &st ) < 0 ) {
443 LOG(log_error, logtype_afpd, "setdirmode: stat %s: %s",
444 dirp->d_name, strerror(errno) );
448 if (!S_ISDIR(st.st_mode)) {
449 if (setfilmode(dirp->d_name, mode, &st) < 0) {
450 LOG(log_error, logtype_afpd, "setdirmode: chmod %s: %s",
451 dirp->d_name, strerror(errno) );
456 /* XXX: need to preserve special modes */
457 else if (S_ISDIR(st.st_mode)) {
458 if (stickydirmode(dirp->d_name, DIRBITS | mode, dropbox) < 0)
460 } else if (stickydirmode(dirp->d_name, mode, dropbox) < 0)
467 /* change perm of .AppleDouble's files
469 if (( dir = opendir( ".AppleDouble" )) == NULL ) {
471 goto setdirmode_noadouble;
472 LOG(log_error, logtype_afpd, "setdirmode: opendir .AppleDouble: %s", strerror(errno) );
475 strcpy( buf, ".AppleDouble" );
477 m = strchr( buf, '\0' );
478 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
479 if ( strcmp( dirp->d_name, "." ) == 0 ||
480 strcmp( dirp->d_name, ".." ) == 0 ) {
484 strcat( buf, dirp->d_name );
486 if ( stat( buf, &st ) < 0 ) {
487 LOG(log_error, logtype_afpd, "setdirmode: stat %s: %s", buf, strerror(errno) );
490 if (!S_ISDIR(st.st_mode)) {
491 if (setfilmode(buf, ad_hf_mode(mode), &st) < 0) {
492 /* FIXME what do we do then? */
498 /* XXX: use special bits to tag directory permissions */
500 /* XXX: need to preserve special modes */
501 if ( stickydirmode(".AppleDouble", DIRBITS | mode, dropbox) < 0 )
504 setdirmode_noadouble:
505 /* XXX: need to preserve special modes */
506 if ( stickydirmode(".", DIRBITS | mode, dropbox) < 0 )
511 int setdeskowner( uid, gid )
515 char wd[ MAXPATHLEN + 1];
516 char modbuf[12 + 1], *m;
517 struct dirent *deskp, *subp;
520 if ( getcwd( wd, MAXPATHLEN ) == NULL ) {
523 if ( chdir( ".AppleDesktop" ) < 0 ) {
526 if (( desk = opendir( "." )) == NULL ) {
527 if ( chdir( wd ) < 0 ) {
528 LOG(log_error, logtype_afpd, "setdeskowner: chdir %s: %s", wd, strerror(errno) );
532 for ( deskp = readdir( desk ); deskp != NULL; deskp = readdir( desk )) {
533 if ( strcmp( deskp->d_name, "." ) == 0 ||
534 strcmp( deskp->d_name, ".." ) == 0 ||
535 strlen( deskp->d_name ) > 2 ) {
538 strcpy( modbuf, deskp->d_name );
539 strcat( modbuf, "/" );
540 m = strchr( modbuf, '\0' );
541 if (( sub = opendir( deskp->d_name )) == NULL ) {
544 for ( subp = readdir( sub ); subp != NULL; subp = readdir( sub )) {
545 if ( strcmp( subp->d_name, "." ) == 0 ||
546 strcmp( subp->d_name, ".." ) == 0 ) {
550 strcat( modbuf, subp->d_name );
551 /* XXX: add special any uid, ignore group bits */
552 if ( chown( modbuf, uid, gid ) < 0 && errno != EPERM ) {
553 LOG(log_error, logtype_afpd, "setdeskown: chown %s: %s",
554 modbuf, strerror(errno) );
558 /* XXX: add special any uid, ignore group bits */
559 if ( chown( deskp->d_name, uid, gid ) < 0 && errno != EPERM ) {
560 LOG(log_error, logtype_afpd, "setdeskowner: chown %s: %s",
561 deskp->d_name, strerror(errno) );
565 if ( chdir( wd ) < 0 ) {
566 LOG(log_error, logtype_afpd, "setdeskowner: chdir %s: %s", wd, strerror(errno) );
569 if ( chown( ".AppleDesktop", uid, gid ) < 0 && errno != EPERM ) {
570 LOG(log_error, logtype_afpd, "setdeskowner: chown .AppleDesktop: %s",
577 /* uid/gid == 0 need to be handled as special cases. they really mean
578 * that user/group should inherit from other, but that doesn't fit
579 * into the unix permission scheme. we can get around this by
580 * co-opting some bits. */
581 int setdirowner( uid, gid, noadouble )
586 char buf[ MAXPATHLEN + 1];
592 if (( dir = opendir( "." )) == NULL ) {
595 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
596 if ( *dirp->d_name == '.' ) {
599 if ( stat( dirp->d_name, &st ) < 0 ) {
600 LOG(log_error, logtype_afpd, "setdirowner: stat %s: %s",
601 dirp->d_name, strerror(errno) );
604 if (( st.st_mode & S_IFMT ) == S_IFREG ) {
605 if ( chown( dirp->d_name, uid, gid ) < 0 && errno != EPERM ) {
606 LOG(log_debug, logtype_afpd, "setdirowner: chown %s: %s",
607 dirp->d_name, strerror(errno) );
608 /* return ( -1 ); Sometimes this is okay */
613 if (( dir = opendir( ".AppleDouble" )) == NULL ) {
615 goto setdirowner_noadouble;
618 strcpy( buf, ".AppleDouble" );
620 m = strchr( buf, '\0' );
621 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
622 if ( strcmp( dirp->d_name, "." ) == 0 ||
623 strcmp( dirp->d_name, ".." ) == 0 ) {
627 strcat( buf, dirp->d_name );
628 if ( chown( buf, uid, gid ) < 0 && errno != EPERM ) {
629 LOG(log_debug, logtype_afpd, "setdirowner: chown %d/%d %s: %s",
630 uid, gid, buf, strerror(errno) );
631 /* return ( -1 ); Sometimes this is okay */
637 * We cheat: we know that chown doesn't do anything.
639 if ( stat( ".AppleDouble", &st ) < 0 ) {
640 LOG(log_error, logtype_afpd, "setdirowner: stat .AppleDouble: %s", strerror(errno) );
643 if ( gid && gid != st.st_gid && chown( ".AppleDouble", uid, gid ) < 0 &&
645 LOG(log_debug, logtype_afpd, "setdirowner: chown %d/%d .AppleDouble: %s",
646 uid, gid, strerror(errno) );
647 /* return ( -1 ); Sometimes this is okay */
650 setdirowner_noadouble:
651 if ( stat( ".", &st ) < 0 ) {
654 if ( gid && gid != st.st_gid && chown( ".", uid, gid ) < 0 &&
656 LOG(log_debug, logtype_afpd, "setdirowner: chown %d/%d .: %s",
657 uid, gid, strerror(errno) );
664 /* recursive chown()ing of a directory */
665 static int recursive_chown(const char *path, uid_t uid, gid_t gid) {
668 struct dirent *entry;
671 char newpath[PATH_MAX+1];
672 newpath[PATH_MAX] = '\0';
674 if (chown(path, uid, gid) < 0) {
675 LOG(log_error, logtype_afpd, "cannot chown() file [%s] (uid = %d): %s\n", path, uid, strerror(errno));
679 if (stat(path, &sbuf) < 0) {
680 LOG(log_error, logtype_afpd, "cannot chown() file [%s] (uid = %d): %s\n", path, uid, strerror(errno));
684 if (S_ISDIR(sbuf.st_mode)) {
685 odir = opendir(path);
687 LOG(log_error, logtype_afpd, "cannot opendir() [%s] (uid = %d): %s\n", path, uid, strerror(errno));
688 goto recursive_chown_end;
690 while (NULL != (entry=readdir(odir)) ) {
691 name = entry->d_name;
692 if (name[0] == '.' && name[1] == '\0')
694 if (name[0] == '.' && name[1] == '.' && name[2] == '\0')
696 sprintf(newpath, "%s/%s", path, name);
697 if (recursive_chown(newpath, uid, gid) < 0)
710 /* This is equivalent of unix rename(). */
711 int unix_rename(const char *oldpath, const char *newpath)
714 char pd_name[PATH_MAX+1];
720 if (rename(oldpath, newpath) < 0)
723 for (i = 0; i <= PATH_MAX && newpath[i] != '\0'; i++)
724 pd_name[i] = newpath[i];
727 while (i > 0 && pd_name[i] != '/') i--;
728 if (pd_name[i] == '/') i++;
730 pd_name[i++] = '.'; pd_name[i++] = '\0';
732 if (stat(pd_name, &pd_stat) < 0) {
733 LOG(log_error, logtype_afpd, "stat() of parent dir failed: pd_name = %s, uid = %d: %s\n",
734 pd_name, geteuid(), strerror(errno));
738 /* So we have SGID bit set... */
739 if ((S_ISGID & pd_stat.st_mode) != 0) {
742 LOG(log_error, logtype_afpd, "seteuid() failed: %s\n", strerror(errno));
743 if (recursive_chown(newpath, uid, pd_stat.st_gid) < 0)
744 LOG(log_error, logtype_afpd, "chown() of parent dir failed: newpath=%s, uid=%d: %s\n",
745 pd_name, geteuid(), strerror(errno));