2 * $Id: unix.c,v 1.50 2008-12-03 18:35:44 didg Exp $
4 * Copyright (c) 1990,1993 Regents of The University of Michigan.
5 * All Rights Reserved. See COPYRIGHT.
10 #endif /* HAVE_CONFIG_H */
18 #else /* STDC_HEADERS */
23 #endif /* HAVE_STRCHR */
24 char *strchr (), *strrchr ();
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 */
35 #include <sys/param.h>
37 #include <atalk/logger.h>
38 #include <atalk/adouble.h>
39 #include <atalk/afp.h>
40 #include <atalk/util.h>
43 #include "directory.h"
49 * Get the free space on a partition.
51 int ustatfs_getvolspace( vol, bfree, btotal, bsize )
52 const struct vol *vol;
53 VolSpace *bfree, *btotal;
56 VolSpace maxVolSpace = (~(VolSpace)0);
65 if ( statfs( vol->v_path, &sfs ) < 0 ) {
66 LOG(log_error, logtype_afpd, "ustatfs_getvolspace unable to stat %s", vol->v_path);
67 return( AFPERR_PARAM );
71 *bfree = (VolSpace) sfs.fd_req.bfreen;
74 *bfree = (VolSpace) sfs.f_bavail;
75 *bsize = sfs.f_frsize;
78 if ( *bfree > maxVolSpace / *bsize ) {
86 ( sfs.fd_req.btot - ( sfs.fd_req.bfree - sfs.fd_req.bfreen ));
89 ( sfs.f_blocks - ( sfs.f_bfree - sfs.f_bavail ));
92 /* see similar block above comments */
93 if ( *btotal > maxVolSpace / *bsize ) {
94 *btotal = maxVolSpace;
102 static int utombits( bits )
109 mbits |= ( bits & ( S_IREAD >> 6 )) ? AR_UREAD : 0;
110 mbits |= ( bits & ( S_IWRITE >> 6 )) ? AR_UWRITE : 0;
111 /* Do we really need this? */
112 mbits |= ( bits & ( S_IEXEC >> 6) ) ? AR_USEARCH : 0;
117 /* --------------------------------
120 void utommode( stat, ma )
126 mode = stat->st_mode;
127 ma->ma_world = utombits( mode );
130 ma->ma_group = utombits( mode );
133 ma->ma_owner = utombits( mode );
135 /* ma_user is a union of all permissions but we must follow
138 if ( (uuid == stat->st_uid) || (uuid == 0)) {
139 ma->ma_user = ma->ma_owner | AR_UOWN;
141 else if ( gmem( stat->st_gid )) {
142 ma->ma_user = ma->ma_group;
145 ma->ma_user = ma->ma_world;
149 * There are certain things the mac won't try if you don't have
150 * the "owner" bit set, even tho you can do these things on unix wiht
151 * only write permission. What were the things?
154 * ditto seems to care if st_uid is 0 ?
155 * was ma->ma_user & AR_UWRITE
156 * but 0 as owner is a can of worms.
158 if ( !stat->st_uid ) {
159 ma->ma_user |= AR_UOWN;
167 * Calculate the mode for a directory using a stat() call to
168 * estimate permission.
170 * Note: the previous method, using access(), does not work correctly
172 * FIXME what about ACL?
174 * dir parameter is used by AFS
176 void accessmode( path, ma, dir, st )
185 ma->ma_user = ma->ma_owner = ma->ma_world = ma->ma_group = 0;
187 if (stat(path, &sb) != 0)
199 for ( i = 0; i < ngroups; i++ ) {
200 if ( groups[ i ] == gid ) {
207 static mode_t mtoubits( bits )
214 mode |= ( bits & AR_UREAD ) ? ( (S_IREAD | S_IEXEC) >> 6 ) : 0;
215 mode |= ( bits & AR_UWRITE ) ? ( (S_IWRITE | S_IEXEC) >> 6 ) : 0;
216 /* I don't think there's a way to set the SEARCH bit by itself on a Mac
217 mode |= ( bits & AR_USEARCH ) ? ( S_IEXEC >> 6 ) : 0; */
222 /* ----------------------------------
223 from the finder's share windows (menu--> File--> sharing...)
224 and from AFP 3.0 spec page 63
225 the mac mode should be save somewhere
227 mode_t mtoumode( ma )
233 mode |= mtoubits( ma->ma_owner |ma->ma_world);
236 mode |= mtoubits( ma->ma_group |ma->ma_world);
239 mode |= mtoubits( ma->ma_world );
244 /* ----------------------------- */
245 char *fullpathname(const char *name)
247 static char wd[ MAXPATHLEN + 1];
249 if ( getcwd( wd , MAXPATHLEN) ) {
250 strlcat(wd, "/", MAXPATHLEN);
251 strlcat(wd, name, MAXPATHLEN);
254 strlcpy(wd, name, MAXPATHLEN);
259 /* -----------------------------
260 a dropbox is a folder where w is set but not r eg:
261 rwx-wx-wx or rwx-wx--
262 rwx----wx (is not asked by a Mac with OS >= 8.0 ?)
264 int stickydirmode(name, mode, dropbox)
272 /* Turn on the sticky bit if this is a drop box, also turn off the setgid bit */
273 if ((dropbox & AFPVOL_DROPBOX)) {
276 if ( ( (mode & S_IWOTH) && !(mode & S_IROTH)) ||
277 ( (mode & S_IWGRP) && !(mode & S_IRGRP)) )
280 if ( seteuid(0) < 0) {
281 LOG(log_error, logtype_afpd, "stickydirmode: unable to seteuid root: %s", strerror(errno));
283 if ( (retval=chmod( name, ( (DIRBITS | mode | S_ISVTX) & ~default_options.umask) )) < 0) {
284 LOG(log_error, logtype_afpd, "stickydirmode: chmod \"%s\": %s", fullpathname(name), strerror(errno) );
287 LOG(log_info, logtype_afpd, "stickydirmode: (debug) chmod \"%s\": %s", fullpathname(name), strerror(retval) );
294 #endif /* DROPKLUDGE */
297 * Ignore EPERM errors: We may be dealing with a directory that is
298 * group writable, in which case chmod will fail.
300 if ( (chmod( name, (DIRBITS | mode) & ~default_options.umask ) < 0) && errno != EPERM &&
301 !(errno == ENOENT && (dropbox & AFPVOL_NOADOUBLE)) )
303 LOG(log_error, logtype_afpd, "stickydirmode: chmod \"%s\": %s", fullpathname(name), strerror(errno) );
310 /* ------------------------- */
311 int dir_rx_set(mode_t mode)
313 return (mode & (S_IXUSR | S_IRUSR)) == (S_IXUSR | S_IRUSR);
316 #define EXEC_MODE (S_IXGRP | S_IXUSR | S_IXOTH)
318 int setdeskmode( mode )
321 char wd[ MAXPATHLEN + 1];
323 char modbuf[ 12 + 1], *m;
324 struct dirent *deskp, *subp;
327 if (!dir_rx_set(mode)) {
328 /* want to remove read and search access to owner it will screw the volume */
331 if ( getcwd( wd , MAXPATHLEN) == NULL ) {
334 if ( chdir( ".AppleDesktop" ) < 0 ) {
337 if (( desk = opendir( "." )) == NULL ) {
338 if ( chdir( wd ) < 0 ) {
339 LOG(log_error, logtype_afpd, "setdeskmode: chdir %s: %s", wd, strerror(errno) );
343 for ( deskp = readdir( desk ); deskp != NULL; deskp = readdir( desk )) {
344 if ( strcmp( deskp->d_name, "." ) == 0 ||
345 strcmp( deskp->d_name, ".." ) == 0 || strlen( deskp->d_name ) > 2 ) {
348 strcpy( modbuf, deskp->d_name );
349 strcat( modbuf, "/" );
350 m = strchr( modbuf, '\0' );
351 if (( sub = opendir( deskp->d_name )) == NULL ) {
354 for ( subp = readdir( sub ); subp != NULL; subp = readdir( sub )) {
355 if ( strcmp( subp->d_name, "." ) == 0 ||
356 strcmp( subp->d_name, ".." ) == 0 ) {
360 strcat( modbuf, subp->d_name );
361 /* XXX: need to preserve special modes */
362 if (stat(modbuf, &st) < 0) {
363 LOG(log_error, logtype_afpd, "setdeskmode: stat %s: %s",fullpathname(modbuf), strerror(errno) );
367 if (S_ISDIR(st.st_mode)) {
368 if ( chmod( modbuf, (DIRBITS | mode) & ~default_options.umask ) < 0 && errno != EPERM ) {
369 LOG(log_error, logtype_afpd, "setdeskmode: chmod %s: %s",fullpathname(modbuf), strerror(errno) );
371 } else if ( chmod( modbuf, mode & ~(default_options.umask | EXEC_MODE) ) < 0 && errno != EPERM ) {
372 LOG(log_error, logtype_afpd, "setdeskmode: chmod %s: %s",fullpathname(modbuf), strerror(errno) );
377 /* XXX: need to preserve special modes */
378 if ( chmod( deskp->d_name, (DIRBITS | mode) & ~default_options.umask ) < 0 && errno != EPERM ) {
379 LOG(log_error, logtype_afpd, "setdeskmode: chmod %s: %s",fullpathname(deskp->d_name), strerror(errno) );
383 if ( chdir( wd ) < 0 ) {
384 LOG(log_error, logtype_afpd, "setdeskmode: chdir %s: %s", wd, strerror(errno) );
387 /* XXX: need to preserve special modes */
388 if ( chmod( ".AppleDesktop", (DIRBITS | mode) & ~default_options.umask ) < 0 && errno != EPERM ) {
389 LOG(log_error, logtype_afpd, "setdeskmode: chmod %s: %s", fullpathname(".AppleDesktop"),strerror(errno) );
394 /* --------------------- */
395 int setfilunixmode (vol, path, mode)
396 const struct vol *vol;
400 if (!path->st_valid) {
404 if (path->st_errno) {
410 if (setfilmode( path->u_name, mode, &path->st) < 0)
412 /* we need to set write perm if read set for resource fork */
413 return vol->vfs->rf_setfilmode(vol, path->u_name, mode, &path->st);
416 /* --------------------- */
417 int setfilmode(name, mode, st)
423 mode_t mask = S_IRWXU | S_IRWXG | S_IRWXO; /* rwx for owner group and other, by default */
426 if (stat(name, &sb) != 0)
431 mode |= st->st_mode & ~mask; /* keep other bits from previous mode */
432 if ( chmod( name, mode & ~default_options.umask ) < 0 && errno != EPERM ) {
438 /* --------------------- */
439 int setdirunixmode( vol, name, mode )
440 const struct vol *vol;
445 int dropbox = (vol->v_flags & AFPVOL_DROPBOX);
448 if (dir_rx_set(mode)) {
449 /* extending right? dir first then .AppleDouble in rf_setdirmode */
450 if ( stickydirmode(name, DIRBITS | mode, dropbox) < 0 )
453 if (vol->vfs->rf_setdirunixmode(vol, name, mode, NULL) < 0 && !vol_noadouble(vol)) {
456 if (!dir_rx_set(mode)) {
457 if ( stickydirmode(name, DIRBITS | mode, dropbox) < 0 )
463 /* --------------------- */
464 int setdirmode( vol, name, mode )
465 const struct vol *vol;
473 int osx = vol->v_adouble == AD_VERSION2_OSX;
474 int dropbox = (vol->v_flags & AFPVOL_DROPBOX);
477 hf_mode = ad_hf_mode(mode);
479 if (dir_rx_set(mode)) {
480 /* extending right? dir first */
481 if ( stickydirmode(name, DIRBITS | mode, dropbox) < 0 )
485 if (( dir = opendir( name )) == NULL ) {
486 LOG(log_error, logtype_afpd, "setdirmode: opendir: %s", fullpathname(name), strerror(errno) );
490 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
492 if ( *dirp->d_name == '.' && (!osx || dirp->d_name[1] != '_')) {
495 if ( stat( dirp->d_name, &st ) < 0 ) {
496 LOG(log_error, logtype_afpd, "setdirmode: stat %s: %s",dirp->d_name, strerror(errno) );
500 if (!S_ISDIR(st.st_mode)) {
501 int setmode = (osx && *dirp->d_name == '.')?hf_mode:mode;
503 if (setfilmode(dirp->d_name, setmode, &st) < 0) {
504 LOG(log_error, logtype_afpd, "setdirmode: chmod %s: %s",dirp->d_name, strerror(errno) );
511 if (vol->vfs->rf_setdirmode(vol, name, mode, NULL) < 0 && !vol_noadouble(vol)) {
515 if (!dir_rx_set(mode)) {
516 if ( stickydirmode(name, DIRBITS | mode, dropbox) < 0 )
522 /* ----------------------------- */
523 int setdeskowner( uid, gid )
527 char wd[ MAXPATHLEN + 1];
528 char modbuf[12 + 1], *m;
529 struct dirent *deskp, *subp;
532 if ( getcwd( wd, MAXPATHLEN ) == NULL ) {
535 if ( chdir( ".AppleDesktop" ) < 0 ) {
538 if (( desk = opendir( "." )) == NULL ) {
539 if ( chdir( wd ) < 0 ) {
540 LOG(log_error, logtype_afpd, "setdeskowner: chdir %s: %s", wd, strerror(errno) );
544 for ( deskp = readdir( desk ); deskp != NULL; deskp = readdir( desk )) {
545 if ( strcmp( deskp->d_name, "." ) == 0 ||
546 strcmp( deskp->d_name, ".." ) == 0 ||
547 strlen( deskp->d_name ) > 2 ) {
550 strcpy( modbuf, deskp->d_name );
551 strcat( modbuf, "/" );
552 m = strchr( modbuf, '\0' );
553 if (( sub = opendir( deskp->d_name )) == NULL ) {
556 for ( subp = readdir( sub ); subp != NULL; subp = readdir( sub )) {
557 if ( strcmp( subp->d_name, "." ) == 0 ||
558 strcmp( subp->d_name, ".." ) == 0 ) {
562 strcat( modbuf, subp->d_name );
563 /* XXX: add special any uid, ignore group bits */
564 if ( chown( modbuf, uid, gid ) < 0 && errno != EPERM ) {
565 LOG(log_error, logtype_afpd, "setdeskown: chown %s: %s", fullpathname(modbuf), strerror(errno) );
569 /* XXX: add special any uid, ignore group bits */
570 if ( chown( deskp->d_name, uid, gid ) < 0 && errno != EPERM ) {
571 LOG(log_error, logtype_afpd, "setdeskowner: chown %s: %s",
572 deskp->d_name, strerror(errno) );
576 if ( chdir( wd ) < 0 ) {
577 LOG(log_error, logtype_afpd, "setdeskowner: chdir %s: %s", wd, strerror(errno) );
580 if ( chown( ".AppleDesktop", uid, gid ) < 0 && errno != EPERM ) {
581 LOG(log_error, logtype_afpd, "setdeskowner: chown %s: %s", fullpathname(".AppleDouble"), strerror(errno) );
586 /* ----------------------------- */
587 int setfilowner(vol, uid, gid, path)
588 const struct vol *vol;
594 if (!path->st_valid) {
598 if (path->st_errno) {
602 if ( chown( path->u_name, uid, gid ) < 0 && errno != EPERM ) {
603 LOG(log_debug, logtype_afpd, "setfilowner: chown %d/%d %s: %s",
604 uid, gid, path->u_name, strerror(errno) );
608 if (vol->vfs->rf_chown(vol, path->u_name, uid, gid ) < 0 && errno != EPERM) {
609 LOG(log_debug, logtype_afpd, "setfilowner: rf_chown %d/%d %s: %s",
610 uid, gid, path->u_name, strerror(errno) );
617 /* ---------------------------------
618 * uid/gid == 0 need to be handled as special cases. they really mean
619 * that user/group should inherit from other, but that doesn't fit
620 * into the unix permission scheme. we can get around this by
621 * co-opting some bits. */
622 int setdirowner(vol, name, uid, gid )
623 const struct vol *vol;
631 int osx = vol->v_adouble == AD_VERSION2_OSX;
633 if (( dir = opendir( name )) == NULL ) {
636 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
637 if ( *dirp->d_name == '.' && (!osx || dirp->d_name[1] != '_')) {
640 if ( stat( dirp->d_name, &st ) < 0 ) {
641 LOG(log_error, logtype_afpd, "setdirowner: stat %s: %s",
642 fullpathname(dirp->d_name), strerror(errno) );
645 if (( st.st_mode & S_IFMT ) == S_IFREG ) {
646 if ( chown( dirp->d_name, uid, gid ) < 0 && errno != EPERM ) {
647 LOG(log_debug, logtype_afpd, "setdirowner: chown %s: %s",
648 fullpathname(dirp->d_name), strerror(errno) );
649 /* return ( -1 ); Sometimes this is okay */
655 if (vol->vfs->rf_setdirowner(vol, name, uid, gid) < 0) {
659 if ( stat( ".", &st ) < 0 ) {
662 if ( gid && gid != st.st_gid && chown( ".", uid, gid ) < 0 && errno != EPERM ) {
663 LOG(log_debug, logtype_afpd, "setdirowner: chown %d/%d %s: %s",
664 uid, gid, fullpathname("."), strerror(errno) );
671 /* recursive chown()ing of a directory */
672 static int recursive_chown(const char *path, uid_t uid, gid_t gid) {
675 struct dirent *entry;
678 char newpath[PATH_MAX+1];
679 newpath[PATH_MAX] = '\0';
681 if (chown(path, uid, gid) < 0) {
682 LOG(log_error, logtype_afpd, "cannot chown() file [%s] (uid = %d): %s", path, uid, strerror(errno));
686 if (stat(path, &sbuf) < 0) {
687 LOG(log_error, logtype_afpd, "cannot chown() file [%s] (uid = %d): %s", path, uid, strerror(errno));
691 if (S_ISDIR(sbuf.st_mode)) {
692 odir = opendir(path);
694 LOG(log_error, logtype_afpd, "cannot opendir() [%s] (uid = %d): %s", path, uid, strerror(errno));
695 goto recursive_chown_end;
697 while (NULL != (entry=readdir(odir)) ) {
698 name = entry->d_name;
699 if (name[0] == '.' && name[1] == '\0')
701 if (name[0] == '.' && name[1] == '.' && name[2] == '\0')
703 sprintf(newpath, "%s/%s", path, name);
704 if (recursive_chown(newpath, uid, gid) < 0)
717 /* This is equivalent of unix rename(). */
718 int unix_rename(const char *oldpath, const char *newpath)
721 char pd_name[PATH_MAX+1];
727 if (rename(oldpath, newpath) < 0)
730 for (i = 0; i <= PATH_MAX && newpath[i] != '\0'; i++)
731 pd_name[i] = newpath[i];
734 while (i > 0 && pd_name[i] != '/') i--;
735 if (pd_name[i] == '/') i++;
737 pd_name[i++] = '.'; pd_name[i++] = '\0';
739 if (stat(pd_name, &pd_stat) < 0) {
740 LOG(log_error, logtype_afpd, "stat() of parent dir failed: pd_name = %s, uid = %d: %s",
741 pd_name, geteuid(), strerror(errno));
745 /* So we have SGID bit set... */
746 if ((S_ISGID & pd_stat.st_mode) != 0) {
749 LOG(log_error, logtype_afpd, "seteuid() failed: %s", strerror(errno));
750 if (recursive_chown(newpath, uid, pd_stat.st_gid) < 0)
751 LOG(log_error, logtype_afpd, "chown() of parent dir failed: newpath=%s, uid=%d: %s",
752 pd_name, geteuid(), strerror(errno));