2 * Copyright (c) 1990,1993 Regents of The University of Michigan.
3 * All Rights Reserved. See COPYRIGHT.
8 #endif /* HAVE_CONFIG_H */
16 #else /* STDC_HEADERS */
21 #endif /* HAVE_STRCHR */
22 char *strchr (), *strrchr ();
25 #define memcpy(d,s,n) bcopy ((s), (d), (n))
26 #define memmove(d,s,n) bcopy ((s), (d), (n))
27 #endif /* ! HAVE_MEMCPY */
28 #endif /* STDC_HEADERS */
32 #include <sys/param.h>
33 #include <atalk/logger.h>
34 #include <atalk/adouble.h>
35 #include <atalk/vfs.h>
36 #include <atalk/afp.h>
37 #include <atalk/util.h>
38 #include <atalk/unix.h>
39 #include <atalk/acl.h>
42 #include "directory.h"
51 * Get the free space on a partition.
53 int ustatfs_getvolspace(const struct vol *vol, VolSpace *bfree, VolSpace *btotal, u_int32_t *bsize)
55 VolSpace maxVolSpace = (~(VolSpace)0);
64 if ( statfs( vol->v_path, &sfs ) < 0 ) {
65 LOG(log_error, logtype_afpd, "ustatfs_getvolspace unable to stat %s", vol->v_path);
66 return( AFPERR_PARAM );
70 *bfree = (VolSpace) sfs.fd_req.bfreen;
73 *bfree = (VolSpace) sfs.f_bavail;
74 *bsize = sfs.f_frsize;
77 if ( *bfree > maxVolSpace / *bsize ) {
85 ( sfs.fd_req.btot - ( sfs.fd_req.bfree - sfs.fd_req.bfreen ));
88 ( sfs.f_blocks - ( sfs.f_bfree - sfs.f_bavail ));
91 /* see similar block above comments */
92 if ( *btotal > maxVolSpace / *bsize ) {
93 *btotal = maxVolSpace;
101 static int utombits(mode_t bits)
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;
115 /* --------------------------------
118 void utommode(struct stat *stat, struct maccess *ma)
122 mode = stat->st_mode;
123 ma->ma_world = utombits( mode );
126 ma->ma_group = utombits( mode );
129 ma->ma_owner = utombits( mode );
131 /* ma_user is a union of all permissions but we must follow
134 if ( (uuid == stat->st_uid) || (uuid == 0)) {
135 ma->ma_user = ma->ma_owner | AR_UOWN;
137 else if ( gmem( stat->st_gid )) {
138 ma->ma_user = ma->ma_group;
141 ma->ma_user = ma->ma_world;
145 * There are certain things the mac won't try if you don't have
146 * the "owner" bit set, even tho you can do these things on unix wiht
147 * only write permission. What were the things?
150 * ditto seems to care if st_uid is 0 ?
151 * was ma->ma_user & AR_UWRITE
152 * but 0 as owner is a can of worms.
154 if ( !stat->st_uid ) {
155 ma->ma_user |= AR_UOWN;
163 * Calculate the mode for a directory using a stat() call to
164 * estimate permission.
166 * Note: the previous method, using access(), does not work correctly
169 * dir parameter is used by AFS
171 void accessmode(char *path, struct maccess *ma, struct dir *dir _U_, struct stat *st)
175 ma->ma_user = ma->ma_owner = ma->ma_world = ma->ma_group = 0;
177 if (lstat(path, &sb) != 0)
183 acltoownermode(path, st, ma);
187 int gmem(const gid_t gid)
191 for ( i = 0; i < ngroups; i++ ) {
192 if ( groups[ i ] == gid ) {
199 static mode_t mtoubits(u_char bits)
205 mode |= ( bits & AR_UREAD ) ? ( (S_IREAD | S_IEXEC) >> 6 ) : 0;
206 mode |= ( bits & AR_UWRITE ) ? ( (S_IWRITE | S_IEXEC) >> 6 ) : 0;
207 /* I don't think there's a way to set the SEARCH bit by itself on a Mac
208 mode |= ( bits & AR_USEARCH ) ? ( S_IEXEC >> 6 ) : 0; */
213 /* ----------------------------------
214 from the finder's share windows (menu--> File--> sharing...)
215 and from AFP 3.0 spec page 63
216 the mac mode should be save somewhere
218 mode_t mtoumode(struct maccess *ma)
223 mode |= mtoubits( ma->ma_owner |ma->ma_world);
226 mode |= mtoubits( ma->ma_group |ma->ma_world);
229 mode |= mtoubits( ma->ma_world );
234 #define EXEC_MODE (S_IXGRP | S_IXUSR | S_IXOTH)
236 int setdeskmode(const mode_t mode)
238 char wd[ MAXPATHLEN + 1];
240 char modbuf[ 12 + 1], *m;
241 struct dirent *deskp, *subp;
244 if (!dir_rx_set(mode)) {
245 /* want to remove read and search access to owner it will screw the volume */
248 if ( getcwd( wd , MAXPATHLEN) == NULL ) {
251 if ( chdir( ".AppleDesktop" ) < 0 ) {
254 if (( desk = opendir( "." )) == NULL ) {
255 if ( chdir( wd ) < 0 ) {
256 LOG(log_error, logtype_afpd, "setdeskmode: chdir %s: %s", wd, strerror(errno) );
260 for ( deskp = readdir( desk ); deskp != NULL; deskp = readdir( desk )) {
261 if ( strcmp( deskp->d_name, "." ) == 0 ||
262 strcmp( deskp->d_name, ".." ) == 0 || strlen( deskp->d_name ) > 2 ) {
265 strcpy( modbuf, deskp->d_name );
266 strcat( modbuf, "/" );
267 m = strchr( modbuf, '\0' );
268 if (( sub = opendir( deskp->d_name )) == NULL ) {
271 for ( subp = readdir( sub ); subp != NULL; subp = readdir( sub )) {
272 if ( strcmp( subp->d_name, "." ) == 0 ||
273 strcmp( subp->d_name, ".." ) == 0 ) {
277 strcat( modbuf, subp->d_name );
278 /* XXX: need to preserve special modes */
279 if (lstat(modbuf, &st) < 0) {
280 LOG(log_error, logtype_afpd, "setdeskmode: stat %s: %s",fullpathname(modbuf), strerror(errno) );
284 if (S_ISDIR(st.st_mode)) {
285 if ( chmod( modbuf, (DIRBITS | mode) & ~default_options.umask ) < 0 && errno != EPERM ) {
286 LOG(log_error, logtype_afpd, "setdeskmode: chmod %s: %s",fullpathname(modbuf), strerror(errno) );
288 } else if ( chmod( modbuf, mode & ~(default_options.umask | EXEC_MODE) ) < 0 && errno != EPERM ) {
289 LOG(log_error, logtype_afpd, "setdeskmode: chmod %s: %s",fullpathname(modbuf), strerror(errno) );
294 /* XXX: need to preserve special modes */
295 if ( chmod( deskp->d_name, (DIRBITS | mode) & ~default_options.umask ) < 0 && errno != EPERM ) {
296 LOG(log_error, logtype_afpd, "setdeskmode: chmod %s: %s",fullpathname(deskp->d_name), strerror(errno) );
300 if ( chdir( wd ) < 0 ) {
301 LOG(log_error, logtype_afpd, "setdeskmode: chdir %s: %s", wd, strerror(errno) );
304 /* XXX: need to preserve special modes */
305 if ( chmod( ".AppleDesktop", (DIRBITS | mode) & ~default_options.umask ) < 0 && errno != EPERM ) {
306 LOG(log_error, logtype_afpd, "setdeskmode: chmod %s: %s", fullpathname(".AppleDesktop"),strerror(errno) );
311 /* --------------------- */
312 int setfilunixmode (const struct vol *vol, struct path* path, mode_t mode)
314 if (!path->st_valid) {
318 if (path->st_errno) {
322 mode |= vol->v_fperm;
324 if (setfilmode( path->u_name, mode, &path->st, vol->v_umask) < 0)
326 /* we need to set write perm if read set for resource fork */
327 return vol->vfs->vfs_setfilmode(vol, path->u_name, mode, &path->st);
331 /* --------------------- */
332 int setdirunixmode(const struct vol *vol, const char *name, mode_t mode)
335 int dropbox = (vol->v_flags & AFPVOL_DROPBOX);
337 LOG(log_debug, logtype_afpd, "setdirunixmode('%s', mode:%04o) {v_dperm:%04o}",
338 fullpathname(name), mode, vol->v_dperm);
340 mode |= vol->v_dperm;
342 if (dir_rx_set(mode)) {
343 /* extending right? dir first then .AppleDouble in rf_setdirmode */
344 if ( stickydirmode(name, DIRBITS | mode, dropbox, vol->v_umask) < 0 )
347 if (vol->vfs->vfs_setdirunixmode(vol, name, mode, NULL) < 0 && !vol_noadouble(vol)) {
350 if (!dir_rx_set(mode)) {
351 if ( stickydirmode(name, DIRBITS | mode, dropbox, vol->v_umask) < 0 )
357 /* --------------------- */
358 int setdirmode(const struct vol *vol, const char *name, mode_t mode)
364 int dropbox = (vol->v_flags & AFPVOL_DROPBOX);
366 mode |= vol->v_dperm;
367 hf_mode = ad_hf_mode(mode);
369 if (dir_rx_set(mode)) {
370 /* extending right? dir first */
371 if ( stickydirmode(name, DIRBITS | mode, dropbox, vol->v_umask) < 0 )
375 if (( dir = opendir( name )) == NULL ) {
376 LOG(log_error, logtype_afpd, "setdirmode: opendir: %s", fullpathname(name), strerror(errno) );
380 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
382 if (*dirp->d_name == '.') {
385 if ( lstat( dirp->d_name, &st ) < 0 ) {
386 LOG(log_error, logtype_afpd, "setdirmode: stat %s: %s",dirp->d_name, strerror(errno) );
390 if (!S_ISDIR(st.st_mode)) {
391 if (setfilmode(dirp->d_name, mode, &st, vol->v_umask) < 0) {
392 LOG(log_error, logtype_afpd, "setdirmode: chmod %s: %s",dirp->d_name, strerror(errno) );
399 if (vol->vfs->vfs_setdirmode(vol, name, mode, NULL) < 0 && !vol_noadouble(vol)) {
403 if (!dir_rx_set(mode)) {
404 if ( stickydirmode(name, DIRBITS | mode, dropbox, vol->v_umask) < 0 )
410 /* ----------------------------- */
411 int setdeskowner(const uid_t uid, const gid_t gid)
413 char wd[ MAXPATHLEN + 1];
414 char modbuf[12 + 1], *m;
415 struct dirent *deskp, *subp;
418 if ( getcwd( wd, MAXPATHLEN ) == NULL ) {
421 if ( chdir( ".AppleDesktop" ) < 0 ) {
424 if (( desk = opendir( "." )) == NULL ) {
425 if ( chdir( wd ) < 0 ) {
426 LOG(log_error, logtype_afpd, "setdeskowner: chdir %s: %s", wd, strerror(errno) );
430 for ( deskp = readdir( desk ); deskp != NULL; deskp = readdir( desk )) {
431 if ( strcmp( deskp->d_name, "." ) == 0 ||
432 strcmp( deskp->d_name, ".." ) == 0 ||
433 strlen( deskp->d_name ) > 2 ) {
436 strcpy( modbuf, deskp->d_name );
437 strcat( modbuf, "/" );
438 m = strchr( modbuf, '\0' );
439 if (( sub = opendir( deskp->d_name )) == NULL ) {
442 for ( subp = readdir( sub ); subp != NULL; subp = readdir( sub )) {
443 if ( strcmp( subp->d_name, "." ) == 0 ||
444 strcmp( subp->d_name, ".." ) == 0 ) {
448 strcat( modbuf, subp->d_name );
449 /* XXX: add special any uid, ignore group bits */
450 if ( chown( modbuf, uid, gid ) < 0 && errno != EPERM ) {
451 LOG(log_error, logtype_afpd, "setdeskown: chown %s: %s", fullpathname(modbuf), strerror(errno) );
455 /* XXX: add special any uid, ignore group bits */
456 if ( chown( deskp->d_name, uid, gid ) < 0 && errno != EPERM ) {
457 LOG(log_error, logtype_afpd, "setdeskowner: chown %s: %s",
458 deskp->d_name, strerror(errno) );
462 if ( chdir( wd ) < 0 ) {
463 LOG(log_error, logtype_afpd, "setdeskowner: chdir %s: %s", wd, strerror(errno) );
466 if ( chown( ".AppleDesktop", uid, gid ) < 0 && errno != EPERM ) {
467 LOG(log_error, logtype_afpd, "setdeskowner: chown %s: %s", fullpathname(".AppleDouble"), strerror(errno) );
472 /* ----------------------------- */
473 int setfilowner(const struct vol *vol, const uid_t uid, const gid_t gid, struct path* path)
476 if (!path->st_valid) {
480 if (path->st_errno) {
484 if ( lchown( path->u_name, uid, gid ) < 0 && errno != EPERM ) {
485 LOG(log_debug, logtype_afpd, "setfilowner: chown %d/%d %s: %s",
486 uid, gid, path->u_name, strerror(errno) );
490 if (vol->vfs->vfs_chown(vol, path->u_name, uid, gid ) < 0 && errno != EPERM) {
491 LOG(log_debug, logtype_afpd, "setfilowner: rf_chown %d/%d %s: %s",
492 uid, gid, path->u_name, strerror(errno) );
499 /* ---------------------------------
500 * uid/gid == 0 need to be handled as special cases. they really mean
501 * that user/group should inherit from other, but that doesn't fit
502 * into the unix permission scheme. we can get around this by
503 * co-opting some bits. */
504 int setdirowner(const struct vol *vol, const char *name, const uid_t uid, const gid_t gid)
510 if (( dir = opendir( name )) == NULL ) {
513 for ( dirp = readdir( dir ); dirp != NULL; dirp = readdir( dir )) {
514 if ( *dirp->d_name == '.') {
517 if ( lstat( dirp->d_name, &st ) < 0 ) {
518 LOG(log_error, logtype_afpd, "setdirowner: stat %s: %s",
519 fullpathname(dirp->d_name), strerror(errno) );
522 if (( st.st_mode & S_IFMT ) == S_IFREG ) {
523 if ( lchown( dirp->d_name, uid, gid ) < 0 && errno != EPERM ) {
524 LOG(log_debug, logtype_afpd, "setdirowner: chown %s: %s",
525 fullpathname(dirp->d_name), strerror(errno) );
526 /* return ( -1 ); Sometimes this is okay */
532 if (vol->vfs->vfs_setdirowner(vol, name, uid, gid) < 0) {
536 if ( lstat( ".", &st ) < 0 ) {
539 if ( gid && gid != st.st_gid && lchown( ".", uid, gid ) < 0 && errno != EPERM ) {
540 LOG(log_debug, logtype_afpd, "setdirowner: chown %d/%d %s: %s",
541 uid, gid, fullpathname("."), strerror(errno) );
548 /* recursive chown()ing of a directory */
549 static int recursive_chown(const char *path, uid_t uid, gid_t gid) {
552 struct dirent *entry;
555 char newpath[PATH_MAX+1];
556 newpath[PATH_MAX] = '\0';
558 if (chown(path, uid, gid) < 0) {
559 LOG(log_error, logtype_afpd, "cannot chown() file [%s] (uid = %d): %s", path, uid, strerror(errno));
563 if (lstat(path, &sbuf) < 0) {
564 LOG(log_error, logtype_afpd, "cannot chown() file [%s] (uid = %d): %s", path, uid, strerror(errno));
568 if (S_ISDIR(sbuf.st_mode)) {
569 odir = opendir(path);
571 LOG(log_error, logtype_afpd, "cannot opendir() [%s] (uid = %d): %s", path, uid, strerror(errno));
572 goto recursive_chown_end;
574 while (NULL != (entry=readdir(odir)) ) {
575 name = entry->d_name;
576 if (name[0] == '.' && name[1] == '\0')
578 if (name[0] == '.' && name[1] == '.' && name[2] == '\0')
580 sprintf(newpath, "%s/%s", path, name);
581 if (recursive_chown(newpath, uid, gid) < 0)