/*
- * $Id: filedir.c,v 1.10 2001-06-20 18:33:04 rufustfirefly Exp $
+ * $Id: filedir.c,v 1.73 2010/03/12 15:16:49 franklahm Exp $
*
* Copyright (c) 1990,1993 Regents of The University of Michigan.
* All Rights Reserved. See COPYRIGHT.
#include "config.h"
#endif /* HAVE_CONFIG_H */
+#include <stdio.h>
+#include <stdlib.h>
+/* STDC check */
+#if STDC_HEADERS
+#include <string.h>
+#else /* STDC_HEADERS */
+#ifndef HAVE_STRCHR
+#define strchr index
+#define strrchr index
+#endif /* HAVE_STRCHR */
+char *strchr (), *strrchr ();
+#ifndef HAVE_MEMCPY
+#define memcpy(d,s,n) bcopy ((s), (d), (n))
+#define memmove(d,s,n) bcopy ((s), (d), (n))
+#endif /* ! HAVE_MEMCPY */
+#endif /* STDC_HEADERS */
+
+#ifdef HAVE_STRINGS_H
+#include <strings.h>
+#endif
#include <errno.h>
-#include <sys/syslog.h>
-#include <sys/types.h>
-#include <sys/stat.h>
#include <sys/param.h>
-#include <netatalk/endian.h>
+
#include <atalk/adouble.h>
+#include <atalk/vfs.h>
#include <atalk/afp.h>
#include <atalk/util.h>
#include <atalk/cnid.h>
-#include <stdio.h>
-#include <stdlib.h>
-#ifdef HAVE_FCNTL_H
-#include <fcntl.h>
-#endif /* HAVE_FCNTL_H */
-#include <dirent.h>
-#include <string.h>
-#ifdef HAVE_UNISTD_H
-#include <unistd.h>
-#endif /* HAVE_UNISTD_H */
+#include <atalk/logger.h>
+#include <atalk/unix.h>
+#include <atalk/bstrlib.h>
+#include <atalk/bstradd.h>
#include "directory.h"
#include "desktop.h"
#include "file.h"
#include "globals.h"
#include "filedir.h"
+#include "unix.h"
-int matchfile2dirperms(upath, vol, did)
- /* Since it's kinda' big; I decided against an
- inline function */
- char *upath;
- struct vol *vol;
- int did;
- /* The below code changes the way file ownership is determined in the name of
- fixing dropboxes. It has known security problem. See the netatalk FAQ for
- more information */
+#ifdef DROPKLUDGE
+int matchfile2dirperms(
+/* Since it's kinda' big; I decided against an
+ inline function */
+ char *upath,
+ struct vol *vol,
+ int did)
+/* The below code changes the way file ownership is determined in the name of
+ fixing dropboxes. It has known security problem. See the netatalk FAQ for
+ more information */
{
- struct stat st, sb;
- struct dir *dir;
- char adpath[50];
- int uid;
-
+ struct stat st, sb;
+ struct dir *dir;
+ char *adpath;
+ uid_t uid;
+ int ret = AFP_OK;
#ifdef DEBUG
- syslog (LOG_INFO, "begin matchfile2dirperms:");
-#endif /* DEBUG */
+ LOG(log_debug9, logtype_afpd, "begin matchfile2dirperms:");
+#endif
- if (stat(upath, &st ) < 0)
- syslog(LOG_ERR, "Could not stat %s: %m", upath);
- strcpy (adpath, "./.AppleDouble/");
- strcat (adpath, upath);
- if (( dir = dirsearch( vol, did )) == NULL ) {
- syslog (LOG_ERR, "matchfile2dirperms: Unable to get directory info.");
- return( AFPERR_NOOBJ );
+ if (stat(upath, &st ) < 0) {
+ LOG(log_error, logtype_afpd, "Could not stat %s: %s", upath, strerror(errno));
+ return AFPERR_NOOBJ ;
+ }
+
+ adpath = vol->vfs->ad_path( upath, ADFLAGS_HF );
+ /* FIXME dirsearch doesn't move cwd to did ! */
+ if (( dir = dirlookup( vol, did )) == NULL ) {
+ LOG(log_error, logtype_afpd, "matchfile2dirperms: Unable to get directory info.");
+ ret = AFPERR_NOOBJ;
}
else if (stat(".", &sb) < 0) {
- syslog (LOG_ERR,
- "matchfile2dirperms: Error checking directory \"%s\": %m",
- dir->d_name);
- return(AFPERR_NOOBJ );
- }
+ LOG(log_error, logtype_afpd,
+ "matchfile2dirperms: Error checking directory \"%s\": %s",
+ dir->d_m_name, strerror(errno));
+ ret = AFPERR_NOOBJ;
+ }
else {
- uid=geteuid();
- if ( uid != sb.st_uid )
+ uid=geteuid();
+ if ( uid != sb.st_uid )
{
- seteuid(0);
- if (lchown(upath, sb.st_uid, sb.st_gid) < 0)
- {
- syslog (LOG_ERR,
- "matchfile2dirperms: Error changing owner/gid of %s: %m", upath);
- return (AFPERR_ACCESS);
- }
- if (chmod(upath,(st.st_mode&0x0FFFF)| S_IRGRP| S_IROTH) < 0)
- {
- syslog (LOG_ERR,
- "matchfile2dirperms: Error adding file read permissions: %m");
- return (AFPERR_ACCESS);
- }
-#ifdef DEBUG
- else
- syslog (LOG_INFO,
- "matchfile2dirperms: Added S_IRGRP and S_IROTH: %m");
-#endif /* DEBUG */
- if (lchown(adpath, sb.st_uid, sb.st_gid) < 0)
- {
- syslog (LOG_ERR,
- "matchfile2dirperms: Error changing AppleDouble owner/gid %s: %m",
- adpath);
- return (AFPERR_ACCESS);
- }
- if (chmod(adpath, (st.st_mode&0x0FFFF)| S_IRGRP| S_IROTH) < 0)
- {
- syslog (LOG_ERR,
- "matchfile2dirperms: Error adding AD file read permissions: %m");
- return (AFPERR_ACCESS);
- }
-#ifdef DEBUG
- else
- syslog (LOG_INFO,
- "matchfile2dirperms: Added S_IRGRP and S_IROTH to AD: %m");
-#endif /* DEBUG */
- }
-#ifdef DEBUG
- else
- syslog (LOG_INFO,
- "matchfile2dirperms: No ownership change necessary.");
-#endif /* DEBUG */
+ seteuid(0);
+ if (lchown(upath, sb.st_uid, sb.st_gid) < 0)
+ {
+ LOG(log_error, logtype_afpd,
+ "matchfile2dirperms(%s): Error changing owner/gid: %s",
+ upath, strerror(errno));
+ ret = AFPERR_ACCESS;
+ }
+ else if ((!S_ISLNK(st->st_mode)) && (chmod(upath,(st.st_mode&~default_options.umask)| S_IRGRP| S_IROTH) < 0))
+ {
+ LOG(log_error, logtype_afpd,
+ "matchfile2dirperms(%s): Error adding file read permissions: %s",
+ upath, strerror(errno));
+ ret = AFPERR_ACCESS;
+ }
+ else if (lchown(adpath, sb.st_uid, sb.st_gid) < 0)
+ {
+ LOG(log_error, logtype_afpd,
+ "matchfile2dirperms(%s): Error changing AppleDouble owner/gid: %s",
+ adpath, strerror(errno));
+ ret = AFPERR_ACCESS;
+ }
+ else if (chmod(adpath, (st.st_mode&~default_options.umask)| S_IRGRP| S_IROTH) < 0)
+ {
+ LOG(log_error, logtype_afpd,
+ "matchfile2dirperms(%s): Error adding AD file read permissions: %s",
+ adpath, strerror(errno));
+ ret = AFPERR_ACCESS;
+ }
+ seteuid(uid);
+ }
} /* end else if stat success */
- seteuid(uid); /* Restore process ownership to normal */
-#ifdef DEBUG
- syslog (LOG_INFO, "end matchfile2dirperms:");
-#endif /* DEBUG */
-
- return (AFP_OK);
+#ifdef DEBUG
+ LOG(log_debug9, logtype_afpd, "end matchfile2dirperms:");
+#endif
+ return ret;
}
-
+#endif
-int afp_getfildirparams(obj, ibuf, ibuflen, rbuf, rbuflen )
- AFPObj *obj;
- char *ibuf, *rbuf;
- int ibuflen, *rbuflen;
+int afp_getfildirparams(AFPObj *obj _U_, char *ibuf, size_t ibuflen _U_, char *rbuf, size_t *rbuflen)
{
- struct stat st;
- struct vol *vol;
- struct dir *dir;
+ struct stat *st;
+ struct vol *vol;
+ struct dir *dir;
u_int32_t did;
- int buflen, ret;
- char *path;
- u_int16_t fbitmap, dbitmap, vid;
-
-#ifdef DEBUG
- syslog(LOG_INFO, "begin afp_getfildirparams:");
-#endif /* DEBUG */
+ int ret;
+ size_t buflen;
+ u_int16_t fbitmap, dbitmap, vid;
+ struct path *s_path;
*rbuflen = 0;
ibuf += 2;
memcpy( &vid, ibuf, sizeof( vid ));
ibuf += sizeof( vid );
- if (( vol = getvolbyvid( vid )) == NULL ) {
- return( AFPERR_PARAM );
+ if (NULL == ( vol = getvolbyvid( vid )) ) {
+ /* was AFPERR_PARAM but it helps OS 10.3 when a volume has been removed
+ * from the list.
+ */
+ return( AFPERR_ACCESS );
}
memcpy( &did, ibuf, sizeof( did ));
ibuf += sizeof( did );
- if (( dir = dirsearch( vol, did )) == NULL ) {
- return( AFPERR_NOOBJ );
+ if (NULL == ( dir = dirlookup( vol, did )) ) {
+ return afp_errno;
}
memcpy( &fbitmap, ibuf, sizeof( fbitmap ));
dbitmap = ntohs( dbitmap );
ibuf += sizeof( dbitmap );
- if (( path = cname( vol, dir, &ibuf )) == NULL) {
- return( AFPERR_NOOBJ );
+ if (NULL == ( s_path = cname( vol, dir, &ibuf )) ) {
+ return get_afp_errno(AFPERR_NOOBJ);
}
- if ( stat( mtoupath(vol, path ), &st ) < 0 ) {
- return( AFPERR_NOOBJ );
+ LOG(log_debug, logtype_afpd, "getfildirparams(vid:%u, did:%u, f/d:%04x/%04x) {cwdid:%u, cwd: %s, name:'%s'}",
+ ntohs(vid), ntohl(dir->d_did), fbitmap, dbitmap,
+ ntohl(curdir->d_did), cfrombstring(curdir->d_fullpath), s_path->u_name);
+
+ st = &s_path->st;
+ if (!s_path->st_valid) {
+ /* it's a dir and it should be there
+ * because we chdir in it in cname or
+ * it's curdir (maybe deleted, but then we can't know).
+ * So we need to try harder.
+ */
+ of_statdir(vol, s_path);
+ }
+ if ( s_path->st_errno != 0 ) {
+ if (afp_errno != AFPERR_ACCESS) {
+ return( AFPERR_NOOBJ );
+ }
}
+
buflen = 0;
- if (S_ISDIR(st.st_mode)) {
- if (dbitmap && ( ret = getdirparams(vol, dbitmap, ".", curdir,
- &st, rbuf + 3 * sizeof( u_int16_t ), &buflen )) != AFP_OK ) {
- return( ret );
- }
+ if (S_ISDIR(st->st_mode)) {
+ if (dbitmap) {
+ dir = s_path->d_dir;
+ if (!dir)
+ return AFPERR_NOOBJ;
+
+ ret = getdirparams(vol, dbitmap, s_path, dir,
+ rbuf + 3 * sizeof( u_int16_t ), &buflen );
+ if (ret != AFP_OK )
+ return( ret );
+ }
/* this is a directory */
- *(rbuf + 2 * sizeof( u_int16_t )) = FILDIRBIT_ISDIR;
+ *(rbuf + 2 * sizeof( u_int16_t )) = (char) FILDIRBIT_ISDIR;
} else {
- if (fbitmap && ( ret = getfilparams(vol, fbitmap, path, curdir, &st,
- rbuf + 3 * sizeof( u_int16_t ), &buflen )) != AFP_OK ) {
- return( ret );
- }
+ if (fbitmap && AFP_OK != (ret = getfilparams(vol, fbitmap, s_path, curdir,
+ rbuf + 3 * sizeof( u_int16_t ), &buflen )) ) {
+ return( ret );
+ }
/* this is a file */
- *(rbuf + 2 * sizeof( u_int16_t )) = FILDIRBIT_ISFILE;
+ *(rbuf + 2 * sizeof( u_int16_t )) = FILDIRBIT_ISFILE;
}
*rbuflen = buflen + 3 * sizeof( u_int16_t );
fbitmap = htons( fbitmap );
rbuf += sizeof( dbitmap ) + sizeof( u_char );
*rbuf = 0;
-#ifdef DEBUG
- syslog(LOG_INFO, "end afp_getfildirparams:");
-#endif /* DEBUG */
-
return( AFP_OK );
}
-int afp_setfildirparams(obj, ibuf, ibuflen, rbuf, rbuflen )
- AFPObj *obj;
- char *ibuf, *rbuf;
- int ibuflen, *rbuflen;
+int afp_setfildirparams(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf _U_, size_t *rbuflen)
{
- struct stat st;
- struct vol *vol;
- struct dir *dir;
- char *path;
- u_int16_t vid, bitmap;
- int did, rc;
-
-#ifdef DEBUG
- syslog(LOG_INFO, "begin afp_setfildirparams:");
-#endif /* DEBUG */
+ struct stat *st;
+ struct vol *vol;
+ struct dir *dir;
+ struct path *path;
+ u_int16_t vid, bitmap;
+ int did, rc;
*rbuflen = 0;
ibuf += 2;
memcpy( &vid, ibuf, sizeof(vid));
ibuf += sizeof( vid );
- if (( vol = getvolbyvid( vid )) == NULL ) {
- return( AFPERR_PARAM );
+ if (NULL == ( vol = getvolbyvid( vid )) ) {
+ return( AFPERR_PARAM );
}
if (vol->v_flags & AFPVOL_RO)
memcpy( &did, ibuf, sizeof( did));
ibuf += sizeof( did);
- if (( dir = dirsearch( vol, did )) == NULL ) {
- return( AFPERR_NOOBJ );
+ if (NULL == ( dir = dirlookup( vol, did )) ) {
+ return afp_errno;
}
memcpy( &bitmap, ibuf, sizeof( bitmap ));
bitmap = ntohs( bitmap );
ibuf += sizeof( bitmap );
- if (( path = cname( vol, dir, &ibuf )) == NULL ) {
- return( AFPERR_NOOBJ );
+ if (NULL == ( path = cname( vol, dir, &ibuf ))) {
+ return get_afp_errno(AFPERR_NOOBJ);
}
- if ( stat( mtoupath(vol, path ), &st ) < 0 ) {
- return( AFPERR_NOOBJ );
+ st = &path->st;
+ if (!path->st_valid) {
+ /* it's a dir and it should be there
+ * because we chdir in it in cname
+ */
+ of_statdir(vol, path);
}
+ if ( path->st_errno != 0 ) {
+ if (afp_errno != AFPERR_ACCESS)
+ return( AFPERR_NOOBJ );
+ }
/*
* If ibuf is odd, make it even.
*/
if ((u_long)ibuf & 1 ) {
- ibuf++;
+ ibuf++;
}
- if (S_ISDIR(st.st_mode)) {
- rc = setdirparams(vol, path, bitmap, ibuf );
+ if (S_ISDIR(st->st_mode)) {
+ rc = setdirparams(vol, path, bitmap, ibuf );
} else {
- rc = setfilparams(vol, path, bitmap, ibuf );
+ rc = setfilparams(vol, path, bitmap, ibuf );
}
if ( rc == AFP_OK ) {
- setvoltime(obj, vol );
+ setvoltime(obj, vol );
}
-#ifdef DEBUG
- syslog(LOG_INFO, "end afp_setfildirparams:");
-#endif /* DEBUG */
-
return( rc );
}
-int afp_rename(obj, ibuf, ibuflen, rbuf, rbuflen )
- AFPObj *obj;
- char *ibuf, *rbuf;
- int ibuflen, *rbuflen;
+/* --------------------------------------------
+ Factorise some checks on a pathname
+*/
+int check_name(const struct vol *vol, char *name)
+{
+ /* check for illegal characters in the unix filename */
+ if (!wincheck(vol, name))
+ return AFPERR_PARAM;
+
+ if ((vol->v_flags & AFPVOL_NOHEX) && strchr(name, '/'))
+ return AFPERR_PARAM;
+
+ if (!vol->vfs->vfs_validupath(vol, name)) {
+ LOG(log_error, logtype_afpd, "check_name: illegal name: '%s'", name);
+ return AFPERR_EXIST;
+ }
+
+ /* check for vetoed filenames */
+ if (veto_file(vol->v_veto, name))
+ return AFPERR_EXIST;
+ return 0;
+}
+
+/* -------------------------
+ move and rename sdir:oldname to curdir:newname in volume vol
+ special care is needed for lock
+*/
+static int moveandrename(const struct vol *vol,
+ struct dir *sdir,
+ int sdir_fd,
+ char *oldname,
+ char *newname,
+ int isdir)
{
+ char *p;
+ char *upath;
+ int rc;
+ struct stat *st, nst;
+ int adflags;
struct adouble ad;
- struct stat st;
- struct vol *vol;
- struct dir *dir, *odir = NULL;
- char *path, *buf, *upath, *newpath;
- char *newadpath;
- u_int32_t did;
- int plen;
- u_int16_t vid;
-#if AD_VERSION > AD_VERSION1
- cnid_t id;
-#endif /* AD_VERSION > AD_VERSION1 */
+ struct adouble *adp;
+ struct ofork *opened = NULL;
+ struct path path;
+ cnid_t id;
+ int cwd_fd;
+
+ ad_init(&ad, vol->v_adouble, vol->v_ad_options);
+ adp = &ad;
+ adflags = 0;
+
+ if (!isdir) {
+ if ((p = mtoupath(vol, oldname, sdir->d_did, utf8_encoding())) == NULL)
+ return AFPERR_PARAM; /* can't convert */
+
+#ifndef HAVE_RENAMEAT
+ /* Need full path */
+ id = cnid_get(vol->v_cdb, sdir->d_did, p, strlen(p));
+ p = ctoupath( vol, sdir, oldname );
+ if (!p)
+ return AFPERR_PARAM; /* pathname too long */
+#endif /* HAVE_RENAMEAT */
+
+ path.st_valid = 0;
+ path.u_name = p;
+#ifdef HAVE_RENAMEAT
+ opened = of_findnameat(sdir_fd, &path);
+#else
+ opened = of_findname(&path);
+#endif /* HAVE_RENAMEAT */
+ if (opened) {
+ /* reuse struct adouble so it won't break locks */
+ adp = opened->of_ad;
+ }
+ } else {
+ id = sdir->d_did; /* we already have the CNID */
+ p = ctoupath( vol, dirlookup(vol, sdir->d_pdid), oldname );
+ if (!p) {
+ return AFPERR_PARAM;
+ }
+ adflags = ADFLAGS_DIR;
+ }
-#ifdef DEBUG
- syslog(LOG_INFO, "begin afp_rename:");
-#endif /* DEBUG */
+ /*
+ * p now points to either
+ * a) full pathname of the source fs object (if renameat is not available)
+ * b) the oldname (renameat is available)
+ * we are in the dest folder so we need to use
+ * a) p for ad_open
+ * b) fchdir sdir_fd before eg ad_open or use *at functions where appropiate
+ */
+
+ if (sdir_fd != -1) {
+ if ((cwd_fd = open(".", O_RDONLY)) == -1)
+ return AFPERR_MISC;
+ if (fchdir(sdir_fd) != 0)
+ return AFPERR_MISC;
+ }
+ if (!ad_metadata(p, adflags, adp)) {
+ u_int16_t bshort;
+
+ ad_getattr(adp, &bshort);
+ ad_close_metadata( adp);
+ if ((bshort & htons(ATTRBIT_NORENAME)))
+ return(AFPERR_OLOCK);
+ }
+ if (sdir_fd != -1) {
+ if (fchdir(cwd_fd) != 0) {
+ LOG(log_error, logtype_afpd, "moveandrename: %s", strerror(errno) );
+ return AFPERR_MISC;
+ }
+ }
+
+ if (NULL == (upath = mtoupath(vol, newname, curdir->d_did, utf8_encoding()))){
+ return AFPERR_PARAM;
+ }
+ path.u_name = upath;
+ st = &path.st;
+ if (0 != (rc = check_name(vol, upath))) {
+ return rc;
+ }
+
+ /* source == destination. we just silently accept this. */
+ if ((!isdir && curdir == sdir) || (isdir && curdir->d_did == sdir->d_pdid)) {
+ if (strcmp(oldname, newname) == 0)
+ return AFP_OK;
+
+ if (stat(upath, st) == 0 || caseenumerate(vol, &path, curdir) == 0) {
+ if (!stat(p, &nst) && !(nst.st_dev == st->st_dev && nst.st_ino == st->st_ino) ) {
+ /* not the same file */
+ return AFPERR_EXIST;
+ }
+ errno = 0;
+ }
+ } else if (stat(upath, st ) == 0 || caseenumerate(vol, &path, curdir) == 0)
+ return AFPERR_EXIST;
+
+ if ( !isdir ) {
+ path.st_valid = 1;
+ path.st_errno = errno;
+ if (of_findname(&path)) {
+ rc = AFPERR_EXIST; /* was AFPERR_BUSY; */
+ } else {
+ rc = renamefile(vol, sdir_fd, p, upath, newname, adp );
+ if (rc == AFP_OK)
+ of_rename(vol, opened, sdir, oldname, curdir, newname);
+ }
+ } else {
+ rc = renamedir(vol, sdir_fd, p, upath, sdir, curdir, newname);
+ }
+ if ( rc == AFP_OK && id ) {
+ /* renaming may have moved the file/dir across a filesystem */
+ if (stat(upath, st) < 0)
+ return AFPERR_MISC;
+
+ /* fix up the catalog entry */
+ cnid_update(vol->v_cdb, id, st, curdir->d_did, upath, strlen(upath));
+ }
+
+ return rc;
+}
+
+/* -------------------------------------------- */
+int afp_rename(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf _U_, size_t *rbuflen)
+{
+ struct vol *vol;
+ struct dir *sdir;
+ char *oldname, *newname;
+ struct path *path;
+ u_int32_t did;
+ int plen;
+ u_int16_t vid;
+ int isdir = 0;
+ int rc;
*rbuflen = 0;
ibuf += 2;
memcpy( &vid, ibuf, sizeof( vid ));
ibuf += sizeof( vid );
- if (( vol = getvolbyvid( vid )) == NULL ) {
- return( AFPERR_PARAM );
+ if (NULL == ( vol = getvolbyvid( vid )) ) {
+ return( AFPERR_PARAM );
}
if (vol->v_flags & AFPVOL_RO)
memcpy( &did, ibuf, sizeof( did ));
ibuf += sizeof( did );
- if (( dir = dirsearch( vol, did )) == NULL ) {
- return( AFPERR_NOOBJ );
+ if (NULL == ( sdir = dirlookup( vol, did )) ) {
+ return afp_errno;
}
- if (( path = cname( vol, dir, &ibuf )) == NULL ) {
- return( AFPERR_NOOBJ );
+ /* source pathname */
+ if (NULL == ( path = cname( vol, sdir, &ibuf )) ) {
+ return get_afp_errno(AFPERR_NOOBJ);
}
- /* another place where we know about the path type */
- if ( *ibuf++ != 2 ) {
- return( AFPERR_PARAM );
+ sdir = curdir;
+ newname = obj->newtmp;
+ oldname = obj->oldtmp;
+ isdir = path_isadir(path);
+ if ( *path->m_name != '\0' ) {
+ strcpy(oldname, path->m_name); /* an extra copy for of_rename */
+ if (isdir) {
+ /* curdir parent dir, need to move sdir back */
+ sdir = path->d_dir;
+ }
}
- plen = (unsigned char) *ibuf++;
- *( ibuf + plen ) = '\0';
-
- if ( *path == '\0' ) {
- if ( curdir->d_parent == NULL ) { /* root directory */
- return( AFPERR_NORENAME );
- }
- odir = curdir;
- path = curdir->d_name;
- if ( movecwd( vol, curdir->d_parent ) < 0 ) {
- return( AFPERR_NOOBJ );
- }
+ else {
+ if ( sdir->d_did == DIRDID_ROOT ) { /* root directory */
+ return( AFPERR_NORENAME );
+ }
+ /* move to destination dir */
+ if ( movecwd( vol, dirlookup(vol, sdir->d_pdid) ) < 0 ) {
+ return afp_errno;
+ }
+ memcpy(oldname, cfrombstring(sdir->d_m_name), blength(sdir->d_m_name) +1);
}
-#ifdef notdef
- if ( strcasecmp( path, ibuf ) == 0 ) {
- return( AFP_OK );
+ /* another place where we know about the path type */
+ if ((plen = copy_path_name(vol, newname, ibuf)) < 0) {
+ return( AFPERR_PARAM );
}
-#endif /* notdef */
-
- /* if a curdir/newname ofork exists, return busy */
- if (of_findname(vol, curdir, ibuf))
- return AFPERR_BUSY;
-
- /* source == destination. just say okay. */
- if (strcmp(path, ibuf) == 0)
- return AFP_OK;
-
- /* check for illegal characters */
- if ((vol->v_flags & AFPVOL_MSWINDOWS) &&
- strpbrk(ibuf, MSWINDOWS_BADCHARS))
- return AFPERR_PARAM;
- newpath = obj->oldtmp;
- strcpy( newpath, mtoupath(vol, ibuf ));
-
- if ((vol->v_flags & AFPVOL_NOHEX) && strchr(newpath, '/'))
- return AFPERR_PARAM;
-
- if (!validupath(vol, newpath))
- return AFPERR_EXIST;
-
- /* the strdiacasecmp deals with case-insensitive, case preserving
- filesystems */
- if (stat( newpath, &st ) == 0 && strdiacasecmp(path, ibuf))
- return( AFPERR_EXIST );
-
- upath = mtoupath(vol, path);
-
-#if AD_VERSION > AD_VERSION1
- id = cnid_get(vol->v_db, curdir->d_did, upath, strlen(upath));
-#endif /* AD_VERSION > AD_VERSION1 */
-
- if ( rename( upath, newpath ) < 0 ) {
- switch ( errno ) {
- case ENOENT :
- return( AFPERR_NOOBJ );
- case EACCES :
- return( AFPERR_ACCESS );
- default :
- return( AFPERR_PARAM );
- }
- }
-
-#if AD_VERSION > AD_VERSION1
- if (stat(newpath, &st) < 0) /* this shouldn't fail */
- return AFPERR_MISC;
- cnid_update(vol->v_db, id, &st, curdir->d_did, newpath, strlen(newpath));
-#endif /* AD_VERSION > AD_VERSION1 */
-
- if ( !odir ) {
- newadpath = obj->newtmp;
- strcpy( newadpath, ad_path( newpath, 0 ));
- if ( rename( ad_path( upath, 0 ), newadpath ) < 0 ) {
- if ( errno == ENOENT ) { /* no adouble header file */
- if (( unlink( newadpath ) < 0 ) && ( errno != ENOENT )) {
- return( AFPERR_PARAM );
- }
- goto out;
- }
- return( AFPERR_PARAM );
- }
-
- memset(&ad, 0, sizeof(ad));
- if ( ad_open( newpath, ADFLAGS_HF, O_RDWR|O_CREAT, 0666,
- &ad) < 0 ) {
- return( AFPERR_PARAM );
- }
- } else {
- int isad = 1;
-
- memset(&ad, 0, sizeof(ad));
- if ( ad_open( newpath, vol_noadouble(vol)|ADFLAGS_HF|ADFLAGS_DIR,
- O_RDWR|O_CREAT, 0666, &ad) < 0 ) {
- if (!((errno == ENOENT) && vol_noadouble(vol)))
- return( AFPERR_PARAM );
- isad = 0;
- }
- if ((buf = realloc( odir->d_name, plen + 1 )) == NULL ) {
- syslog( LOG_ERR, "afp_rename: realloc: %m" );
- if (isad) {
- ad_flush(&ad, ADFLAGS_HF); /* in case of create */
- ad_close(&ad, ADFLAGS_HF);
- }
- return AFPERR_MISC;
- }
- odir->d_name = buf;
- strcpy( odir->d_name, ibuf );
- if (!isad)
- goto out;
- }
-
- ad_setentrylen( &ad, ADEID_NAME, plen );
- memcpy( ad_entry( &ad, ADEID_NAME ), ibuf, plen );
- ad_flush( &ad, ADFLAGS_HF );
- ad_close( &ad, ADFLAGS_HF );
-
-out:
- setvoltime(obj, vol );
-
- /* if it's still open, rename the ofork as well. */
- if (of_rename(vol, curdir, path, curdir, ibuf) < 0)
- return AFPERR_MISC;
-
-#ifdef DEBUG
- syslog(LOG_INFO, "end afp_rename:");
-#endif /* DEBUG */
+ if (!plen) {
+ return AFP_OK; /* newname == oldname same dir */
+ }
+
+ rc = moveandrename(vol, sdir, -1, oldname, newname, isdir);
+ if ( rc == AFP_OK ) {
+ setvoltime(obj, vol );
+ }
- return( AFP_OK );
+ return( rc );
}
-
-int afp_delete(obj, ibuf, ibuflen, rbuf, rbuflen )
- AFPObj *obj;
- char *ibuf, *rbuf;
- int ibuflen, *rbuflen;
+/* ------------------------------- */
+int afp_delete(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf _U_, size_t *rbuflen)
{
- struct vol *vol;
- struct dir *dir;
- char *path, *upath;
- int did, rc;
- u_int16_t vid;
-
-#ifdef DEBUG
- syslog(LOG_INFO, "begin afp_delete:");
-#endif /* DEBUG */
+ struct vol *vol;
+ struct dir *dir;
+ struct path *s_path;
+ char *upath;
+ int did, rc;
+ u_int16_t vid;
*rbuflen = 0;
ibuf += 2;
memcpy( &vid, ibuf, sizeof( vid ));
ibuf += sizeof( vid );
- if (( vol = getvolbyvid( vid )) == NULL ) {
- return( AFPERR_PARAM );
+ if (NULL == ( vol = getvolbyvid( vid )) ) {
+ return( AFPERR_PARAM );
}
if (vol->v_flags & AFPVOL_RO)
memcpy( &did, ibuf, sizeof( did ));
ibuf += sizeof( int );
- if (( dir = dirsearch( vol, did )) == NULL ) {
- return( AFPERR_NOOBJ );
+
+ if (NULL == ( dir = dirlookup( vol, did )) ) {
+ return afp_errno;
}
- if (( path = cname( vol, dir, &ibuf )) == NULL ) {
- return( AFPERR_NOOBJ );
+ if (NULL == ( s_path = cname( vol, dir, &ibuf )) ) {
+ return get_afp_errno(AFPERR_NOOBJ);
}
- if ( *path == '\0' ) {
- rc = deletecurdir( vol, obj->oldtmp, AFPOBJ_TMPSIZ);
- } else if (of_findname(vol, curdir, path)) {
+ upath = s_path->u_name;
+ if ( path_isadir( s_path) ) {
+ if (*s_path->m_name != '\0' || curdir->d_did == DIRDID_ROOT)
+ rc = AFPERR_ACCESS;
+ else
+ rc = deletecurdir( vol);
+ } else if (of_findname(s_path)) {
rc = AFPERR_BUSY;
- } else if ((rc = deletefile( upath = mtoupath(vol, path ))) == AFP_OK) {
-#if AD_VERSION > AD_VERSION1 /* get rid of entry */
- cnid_t id = cnid_get(vol->v_db, curdir->d_did, upath, strlen(upath));
- cnid_delete(vol->v_db, id);
-#endif /* AD_VERSION > AD_VERSION1 */
+ } else {
+ /* it's a file st_valid should always be true
+ * only test for ENOENT because EACCES needs
+ * to read meta data in deletefile
+ */
+ if (s_path->st_valid && s_path->st_errno == ENOENT) {
+ rc = AFPERR_NOOBJ;
+ }
+ else {
+ rc = deletefile(vol, -1, upath, 1);
+ }
}
if ( rc == AFP_OK ) {
- setvoltime(obj, vol );
+ curdir->offcnt--;
+ setvoltime(obj, vol );
}
-#ifdef DEBUG
- syslog(LOG_INFO, "end afp_delete:");
-#endif /* DEBUG */
-
return( rc );
}
-
-char *ctoupath( vol, dir, name )
- const struct vol *vol;
- struct dir *dir;
- char *name;
+/* ------------------------ */
+char *absupath(const struct vol *vol, struct dir *dir, char *u)
{
- struct dir *d;
- static char path[ MAXPATHLEN + 1];
- char *p, *u;
- int len;
-
- p = path + sizeof( path ) - 1;
- *p = '\0';
- u = mtoupath(vol, name );
- len = strlen( u );
- p -= len;
- strncpy( p, u, len );
- for ( d = dir; d->d_parent; d = d->d_parent ) {
- *--p = '/';
- u = mtoupath(vol, d->d_name );
- len = strlen( u );
- p -= len;
- strncpy( p, u, len );
- }
- *--p = '/';
- len = strlen( vol->v_path );
- p -= len;
- strncpy( p, vol->v_path, len );
-
- return( p );
+ static char pathbuf[MAXPATHLEN + 1];
+ bstring path;
+
+ if (u == NULL || dir == NULL || vol == NULL)
+ return NULL;
+
+ if ((path = bstrcpy(dir->d_fullpath)) == NULL)
+ return NULL;
+ if (bcatcstr(path, "/") != BSTR_OK)
+ return NULL;
+ if (bcatcstr(path, u) != BSTR_OK)
+ return NULL;
+ if (path->slen > MAXPATHLEN)
+ return NULL;
+
+ LOG(log_debug, logtype_afpd, "absupath: %s", cfrombstring(path));
+
+ strncpy(pathbuf, cfrombstring(path), blength(path) + 1);
+ bdestroy(path);
+
+ return(pathbuf);
}
+char *ctoupath(const struct vol *vol, struct dir *dir, char *name)
+{
+ if (vol == NULL || dir == NULL || name == NULL)
+ return NULL;
+ return absupath(vol, dir, mtoupath(vol, name, dir->d_did, utf8_encoding()));
+}
-int afp_moveandrename(obj, ibuf, ibuflen, rbuf, rbuflen )
- AFPObj *obj;
- char *ibuf, *rbuf;
- int ibuflen, *rbuflen;
+/* ------------------------- */
+int afp_moveandrename(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf _U_, size_t *rbuflen)
{
- struct vol *vol;
- struct dir *sdir, *ddir, *odir = NULL;
- struct stat st;
- char *oldname, *newname;
- char *path, *p, *upath;
- int did, rc;
- int plen;
- u_int16_t vid;
-#if AD_VERSION > AD_VERSION1
- cnid_t id;
-#endif /* AD_VERSION > AD_VERSION1 */
+ struct vol *vol;
+ struct dir *sdir, *ddir;
+ int isdir;
+ char *oldname, *newname;
+ struct path *path;
+ int did;
+ int pdid;
+ int plen;
+ u_int16_t vid;
+ int rc;
#ifdef DROPKLUDGE
- int retvalue;
+ int retvalue;
#endif /* DROPKLUDGE */
+ int sdir_fd = -1;
-#ifdef DEBUG
- syslog(LOG_INFO, "begin afp_moveandrename:");
-#endif /* DEBUG */
*rbuflen = 0;
ibuf += 2;
memcpy( &vid, ibuf, sizeof( vid ));
ibuf += sizeof( vid );
- if (( vol = getvolbyvid( vid )) == NULL ) {
- return( AFPERR_PARAM );
+ if (NULL == ( vol = getvolbyvid( vid )) ) {
+ return( AFPERR_PARAM );
}
if (vol->v_flags & AFPVOL_RO)
/* source did followed by dest did */
memcpy( &did, ibuf, sizeof( did ));
ibuf += sizeof( int );
- if (( sdir = dirsearch( vol, did )) == NULL ) {
- return( AFPERR_PARAM );
+ if (NULL == ( sdir = dirlookup( vol, did )) ) {
+ return afp_errno; /* was AFPERR_PARAM */
}
memcpy( &did, ibuf, sizeof( did ));
ibuf += sizeof( int );
/* source pathname */
- if (( path = cname( vol, sdir, &ibuf )) == NULL ) {
- return( AFPERR_NOOBJ );
+ if (NULL == ( path = cname( vol, sdir, &ibuf )) ) {
+ return get_afp_errno(AFPERR_NOOBJ);
}
sdir = curdir;
newname = obj->newtmp;
oldname = obj->oldtmp;
- if ( *path != '\0' ) {
- /* not a directory */
- strcpy(newname, path);
- strcpy(oldname, path); /* an extra copy for of_rename */
-#if AD_VERSION > AD_VERSION1
- p = mtoupath(vol, path);
- id = cnid_get(vol->v_db, sdir->d_did, p, strlen(p));
-#endif /* AD_VERSION > AD_VERSION1 */
- p = ctoupath( vol, sdir, newname );
+
+ isdir = path_isadir(path);
+ if ( *path->m_name != '\0' ) {
+ if (isdir) {
+ sdir = path->d_dir;
+ }
+ strcpy(oldname, path->m_name); /* an extra copy for of_rename */
} else {
- odir = curdir;
- strcpy( newname, odir->d_name );
- strcpy(oldname, odir->d_name);
- p = ctoupath( vol, odir->d_parent, newname );
-#if AD_VERSION > AD_VERSION1
- id = curdir->d_did; /* we already have the CNID */
-#endif /* AD_VERSION > AD_VERSION1 */
+ memcpy(oldname, cfrombstring(sdir->d_m_name), blength(sdir->d_m_name) + 1);
}
- /*
- * p now points to the full pathname of the source fs object.
- */
+
+#ifdef HAVE_RENAMEAT
+ if ((sdir_fd = open(".", O_RDONLY)) == -1)
+ return AFPERR_MISC;
+#endif
/* get the destination directory */
- if (( ddir = dirsearch( vol, did )) == NULL ) {
- return( AFPERR_PARAM );
+ if (NULL == ( ddir = dirlookup( vol, did )) ) {
+ rc = afp_errno; /* was AFPERR_PARAM */
+ goto exit;
}
- if (( path = cname( vol, ddir, &ibuf )) == NULL ) {
- return( AFPERR_NOOBJ );
+ if (NULL == ( path = cname( vol, ddir, &ibuf ))) {
+ rc = AFPERR_NOOBJ;
+ goto exit;
}
- if ( *path != '\0' ) {
- return( AFPERR_BADTYPE );
+ pdid = curdir->d_did;
+ if ( *path->m_name != '\0' ) {
+ rc = path_error(path, AFPERR_NOOBJ);
+ goto exit;
}
/* one more place where we know about path type */
- if ( *ibuf++ != 2 ) {
- return( AFPERR_PARAM );
+ if ((plen = copy_path_name(vol, newname, ibuf)) < 0) {
+ rc = AFPERR_PARAM;
+ goto exit;
}
- if (( plen = (unsigned char)*ibuf++ ) != 0 ) {
- strncpy( newname, ibuf, plen );
- newname[ plen ] = '\0';
+ if (!plen) {
+ strcpy(newname, oldname);
}
- /* check for illegal characters */
- if ((vol->v_flags & AFPVOL_MSWINDOWS) &&
- strpbrk(newname, MSWINDOWS_BADCHARS))
- return AFPERR_PARAM;
-
- upath = mtoupath(vol, newname);
+ /* This does the work */
+ LOG(log_debug, logtype_afpd, "afp_move(oldname:'%s', newname:'%s', isdir:%u)",
+ oldname, newname, isdir);
+ rc = moveandrename(vol, sdir, sdir_fd, oldname, newname, isdir);
- if ((vol->v_flags & AFPVOL_NOHEX) && strchr(upath, '/'))
- return AFPERR_PARAM;
-
- if (!validupath(vol, upath))
- return AFPERR_EXIST;
-
- /* source == destination. we just silently accept this. */
- if (curdir == sdir) {
- if (strcmp(oldname, newname) == 0)
- return AFP_OK;
-
- /* deal with case insensitive, case-preserving filesystems. */
- if ((stat(upath, &st) == 0) && strdiacasecmp(oldname, newname))
- return AFPERR_EXIST;
-
- } else if (stat(upath, &st ) == 0)
- return( AFPERR_EXIST );
-
- if ( !odir ) {
- if (of_findname(vol, curdir, newname)) {
- rc = AFPERR_BUSY;
- } else if ((rc = renamefile( p, upath, newname,
- vol_noadouble(vol) )) == AFP_OK) {
- /* if it's still open, rename the ofork as well. */
- rc = of_rename(vol, sdir, oldname, curdir, newname);
- }
- } else {
- rc = renamedir(p, upath, odir, curdir, newname, vol_noadouble(vol));
- }
+ if ( rc == AFP_OK ) {
+ char *upath = mtoupath(vol, newname, pdid, utf8_encoding());
+ if (NULL == upath) {
+ rc = AFPERR_PARAM;
+ goto exit;
+ }
+ curdir->offcnt++;
+ sdir->offcnt--;
#ifdef DROPKLUDGE
- if (vol->v_flags & AFPVOL_DROPBOX) {
- if (retvalue=matchfile2dirperms (newname, vol, did) != AFP_OK) {
- return retvalue;
+ if (vol->v_flags & AFPVOL_DROPBOX) {
+ /* FIXME did is not always the source id */
+ if ((retvalue=matchfile2dirperms (upath, vol, did)) != AFP_OK) {
+ rc = retvalue;
+ goto exit;
+ }
}
- }
+ else
#endif /* DROPKLUDGE */
+ /* if unix priv don't try to match perm with dest folder */
+ if (!isdir && !vol_unix_priv(vol)) {
+ int admode = ad_mode("", 0777) | vol->v_fperm;
- if ( rc == AFP_OK ) {
-#if AD_VERSION > AD_VERSION1
- /* renaming may have moved the file/dir across a filesystem */
- if (stat(upath, &st) < 0)
- return AFPERR_MISC;
-
- /* fix up the catalog entry */
- cnid_update(vol->v_db, id, &st, curdir->d_did, upath, strlen(upath));
-#endif /* AD_VERSION > AD_VERSION1 */
- setvoltime(obj, vol );
+ setfilmode(upath, admode, NULL, vol->v_umask);
+ vol->vfs->vfs_setfilmode(vol, upath, admode, NULL);
+ }
+ setvoltime(obj, vol );
}
-#ifdef DEBUG
- syslog(LOG_INFO, "end afp_moveandrename:");
-#endif /* DEBUG */
+exit:
+#ifdef HAVE_RENAMEAT
+ if (sdir_fd != -1)
+ close(sdir_fd);
+#endif
return( rc );
}
+int veto_file(const char*veto_str, const char*path)
+/* given a veto_str like "abc/zxc/" and path "abc", return 1
+ * veto_str should be '/' delimited
+ * if path matches any one of the veto_str elements exactly, then 1 is returned
+ * otherwise, 0 is returned.
+ */
+{
+ int i; /* index to veto_str */
+ int j; /* index to path */
+
+ if ((veto_str == NULL) || (path == NULL))
+ return 0;
+
+ for(i=0, j=0; veto_str[i] != '\0'; i++) {
+ if (veto_str[i] == '/') {
+ if ((j>0) && (path[j] == '\0')) {
+ LOG(log_debug, logtype_afpd, "vetoed file:'%s'", path);
+ return 1;
+ }
+ j = 0;
+ } else {
+ if (veto_str[i] != path[j]) {
+ while ((veto_str[i] != '/')
+ && (veto_str[i] != '\0'))
+ i++;
+ j = 0;
+ continue;
+ }
+ j++;
+ }
+ }
+ return 0;
+}
+