]> arthur.barton.de Git - netatalk.git/blobdiff - libatalk/vfs/sys_ea.c
Fix ressource leak, from Riccardo Magliocchetti
[netatalk.git] / libatalk / vfs / sys_ea.c
index 1af3d5ea2cbb685006e2b622cbc485395fcfed22..3db20b239cc69f4b2a39695d85ced1653dbf6daf 100644 (file)
@@ -25,7 +25,7 @@
    Copyright (C) 2001 Andreas Gruenbacher.
       
    Samba 3.0.28, modified for netatalk.
-   $Id: sys_ea.c,v 1.2 2009-11-18 11:14:59 didg Exp $
+   $Id: sys_ea.c,v 1.6 2009-12-04 10:26:10 franklahm Exp $
    
 */
 
 #include <atalk/logger.h>
 #include <atalk/ea.h>
 
+#ifndef ENOATTR
+#define ENOATTR ENODATA
+#endif
+
 /******** Solaris EA helper function prototypes ********/
 #ifdef HAVE_ATTROPEN
 #define SOLARIS_ATTRMODE S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP
@@ -103,22 +107,21 @@ ssize_t sys_getxattr (const char *path, const char *uname, void *value, size_t s
 #elif defined(HAVE_GETEA)
        return getea(path, name, value, size);
 #elif defined(HAVE_EXTATTR_GET_FILE)
-       char *s;
        ssize_t retval;
-       int attrnamespace = (strncmp(name, "system", 6) == 0) ? 
-               EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
-       const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
        /*
         * The BSD implementation has a nasty habit of silently truncating
         * the returned value to the size of the buffer, so we have to check
         * that the buffer is large enough to fit the returned value.
         */
-       if((retval=extattr_get_file(path, attrnamespace, attrname, NULL, 0)) >= 0) {
-               if(retval > size) {
+       if((retval = extattr_get_file(path, EXTATTR_NAMESPACE_USER, uname, NULL, 0)) >= 0) {
+        if (size == 0)
+            /* size == 0 means only return size */
+            return retval;
+               if (retval > size) {
                        errno = ERANGE;
                        return -1;
                }
-               if((retval=extattr_get_file(path, attrnamespace, attrname, value, size)) >= 0)
+               if ((retval = extattr_get_file(path, EXTATTR_NAMESPACE_USER, uname, value, size)) >= 0)
                        return retval;
        }
 
@@ -160,18 +163,13 @@ ssize_t sys_lgetxattr (const char *path, const char *uname, void *value, size_t
 #elif defined(HAVE_LGETEA)
        return lgetea(path, name, value, size);
 #elif defined(HAVE_EXTATTR_GET_LINK)
-       char *s;
        ssize_t retval;
-       int attrnamespace = (strncmp(name, "system", 6) == 0) ? 
-               EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
-       const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
-
-       if((retval=extattr_get_link(path, attrnamespace, attrname, NULL, 0)) >= 0) {
+       if((retval=extattr_get_link(path, EXTATTR_NAMESPACE_USER, uname, NULL, 0)) >= 0) {
                if(retval > size) {
                        errno = ERANGE;
                        return -1;
                }
-               if((retval=extattr_get_link(path, attrnamespace, attrname, value, size)) >= 0)
+               if((retval=extattr_get_link(path, EXTATTR_NAMESPACE_USER, uname, value, size)) >= 0)
                        return retval;
        }
        
@@ -211,8 +209,8 @@ static struct {
        size_t len;
 } 
 extattr[] = {
-       { EXTATTR_NAMESPACE_SYSTEM, EXTATTR_PREFIX("system.") },
-        { EXTATTR_NAMESPACE_USER, EXTATTR_PREFIX("user.") },
+       { EXTATTR_NAMESPACE_SYSTEM, EXTATTR_PREFIX("") },
+        { EXTATTR_NAMESPACE_USER, EXTATTR_PREFIX("") },
 };
 
 typedef union {
@@ -222,74 +220,65 @@ typedef union {
 
 static ssize_t bsd_attr_list (int type, extattr_arg arg, char *list, size_t size)
 {
-       ssize_t list_size, total_size = 0;
-       int i, t, len;
-       char *buf;
-       /* Iterate through extattr(2) namespaces */
-       for(t = 0; t < (sizeof(extattr)/sizeof(extattr[0])); t++) {
-               switch(type) {
+       ssize_t list_size;
+       int i, len;
+
+    switch(type) {
 #if defined(HAVE_EXTATTR_LIST_FILE)
-                       case 0:
-                               list_size = extattr_list_file(arg.path, extattr[t].space, list, size);
-                               break;
+    case 0:
+        list_size = extattr_list_file(arg.path, EXTATTR_NAMESPACE_USER, list, size);
+        break;
 #endif
 #if defined(HAVE_EXTATTR_LIST_LINK)
-                       case 1:
-                               list_size = extattr_list_link(arg.path, extattr[t].space, list, size);
-                               break;
+    case 1:
+        list_size = extattr_list_link(arg.path, EXTATTR_NAMESPACE_USER, list, size);
+        break;
 #endif
 #if defined(HAVE_EXTATTR_LIST_FD)
-                       case 2:
-                               list_size = extattr_list_fd(arg.filedes, extattr[t].space, list, size);
-                               break;
+    case 2:
+        list_size = extattr_list_fd(arg.filedes, EXTATTR_NAMESPACE_USER, list, size);
+        break;
 #endif
-                       default:
-                               errno = ENOSYS;
-                               return -1;
-               }
-               /* Some error happend. Errno should be set by the previous call */
-               if(list_size < 0)
-                       return -1;
-               /* No attributes */
-               if(list_size == 0)
-                       continue;
-               /* XXX: Call with an empty buffer may be used to calculate
-                  necessary buffer size. Unfortunately, we can't say, how
-                  many attributes were returned, so here is the potential
-                  problem with the emulation.
-               */
-               if(list == NULL) {
-                       /* Take the worse case of one char attribute names - 
-                          two bytes per name plus one more for sanity.
-                       */
-                       total_size += list_size + (list_size/2 + 1)*extattr[t].len;
-                       continue;
-               }
-               /* Count necessary offset to fit namespace prefixes */
-               len = 0;
-               for(i = 0; i < list_size; i += list[i] + 1)
-                       len += extattr[t].len;
-
-               total_size += list_size + len;
-               /* Buffer is too small to fit the results */
-               if(total_size > size) {
-                       errno = ERANGE;
-                       return -1;
-               }
-               /* Shift results back, so we can prepend prefixes */
-               buf = memmove(list + len, list, list_size);
-
-               for(i = 0; i < list_size; i += len + 1) {
-                       len = buf[i];
-                       strncpy(list, extattr[t].name, extattr[t].len + 1);
-                       list += extattr[t].len;
-                       strncpy(list, buf + i + 1, len);
-                       list[len] = '\0';
-                       list += len + 1;
-               }
-               size -= total_size;
-       }
-       return total_size;
+    default:
+        errno = ENOSYS;
+        return -1;
+    }
+
+    /* Some error happend. Errno should be set by the previous call */
+    if(list_size < 0)
+        return -1;
+
+    /* No attributes */
+    if(list_size == 0)
+        return 0;
+
+    /* XXX: Call with an empty buffer may be used to calculate
+       necessary buffer size. Unfortunately, we can't say, how
+       many attributes were returned, so here is the potential
+       problem with the emulation.
+    */
+    if(list == NULL)
+        return list_size;
+
+    /* Buffer is too small to fit the results */
+    if(list_size > size) {
+        errno = ERANGE;
+        return -1;
+    }
+
+    /* Convert from pascal strings to C strings */
+    len = list[0];
+    memmove(list, list + 1, list_size);
+
+    for(i = len; i < list_size; ) {
+        LOG(log_maxdebug, logtype_afpd, "len: %d, i: %d", len, i);
+
+        len = list[i];
+        list[i] = '\0';
+        i += len + 1;
+    }
+
+       return list_size;
 }
 
 #endif
@@ -473,12 +462,7 @@ int sys_removexattr (const char *path, const char *uname)
 #elif defined(HAVE_REMOVEEA)
        return removeea(path, name);
 #elif defined(HAVE_EXTATTR_DELETE_FILE)
-       char *s;
-       int attrnamespace = (strncmp(name, "system", 6) == 0) ? 
-               EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
-       const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
-
-       return extattr_delete_file(path, attrnamespace, attrname);
+       return extattr_delete_file(path, EXTATTR_NAMESPACE_USER, uname);
 #elif defined(HAVE_ATTR_REMOVE)
        int flags = 0;
        char *attrname = strchr(name,'.') + 1;
@@ -511,12 +495,7 @@ int sys_lremovexattr (const char *path, const char *uname)
 #elif defined(HAVE_LREMOVEEA)
        return lremoveea(path, name);
 #elif defined(HAVE_EXTATTR_DELETE_LINK)
-       char *s;
-       int attrnamespace = (strncmp(name, "system", 6) == 0) ? 
-               EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
-       const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
-
-       return extattr_delete_link(path, attrnamespace, attrname);
+       return extattr_delete_link(path, EXTATTR_NAMESPACE_USER, uname);
 #elif defined(HAVE_ATTR_REMOVE)
        int flags = ATTR_DONTFOLLOW;
        char *attrname = strchr(name,'.') + 1;
@@ -551,14 +530,10 @@ int sys_setxattr (const char *path, const char *uname, const void *value, size_t
 #elif defined(HAVE_SETEA)
        return setea(path, name, value, size, flags);
 #elif defined(HAVE_EXTATTR_SET_FILE)
-       char *s;
        int retval = 0;
-       int attrnamespace = (strncmp(name, "system", 6) == 0) ? 
-               EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
-       const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
        if (flags) {
                /* Check attribute existence */
-               retval = extattr_get_file(path, attrnamespace, attrname, NULL, 0);
+               retval = extattr_get_file(path, EXTATTR_NAMESPACE_USER, uname, NULL, 0);
                if (retval < 0) {
                        /* REPLACE attribute, that doesn't exist */
                        if (flags & XATTR_REPLACE && errno == ENOATTR) {
@@ -575,7 +550,7 @@ int sys_setxattr (const char *path, const char *uname, const void *value, size_t
                        }
                }
        }
-       retval = extattr_set_file(path, attrnamespace, attrname, value, size);
+       retval = extattr_set_file(path, EXTATTR_NAMESPACE_USER, uname, value, size);
        return (retval < 0) ? -1 : 0;
 #elif defined(HAVE_ATTR_SET)
        int myflags = 0;
@@ -615,14 +590,10 @@ int sys_lsetxattr (const char *path, const char *uname, const void *value, size_
 #elif defined(LSETEA)
        return lsetea(path, name, value, size, flags);
 #elif defined(HAVE_EXTATTR_SET_LINK)
-       char *s;
        int retval = 0;
-       int attrnamespace = (strncmp(name, "system", 6) == 0) ? 
-               EXTATTR_NAMESPACE_SYSTEM : EXTATTR_NAMESPACE_USER;
-       const char *attrname = ((s=strchr_m(name, '.')) == NULL) ? name : s + 1;
        if (flags) {
                /* Check attribute existence */
-               retval = extattr_get_link(path, attrnamespace, attrname, NULL, 0);
+               retval = extattr_get_link(path, EXTATTR_NAMESPACE_USER, uname, NULL, 0);
                if (retval < 0) {
                        /* REPLACE attribute, that doesn't exist */
                        if (flags & XATTR_REPLACE && errno == ENOATTR) {
@@ -640,7 +611,7 @@ int sys_lsetxattr (const char *path, const char *uname, const void *value, size_
                }
        }
 
-       retval = extattr_set_link(path, attrnamespace, attrname, value, size);
+       retval = extattr_set_link(path, EXTATTR_NAMESPACE_USER, uname, value, size);
        return (retval < 0) ? -1 : 0;
 #elif defined(HAVE_ATTR_SET)
        int myflags = ATTR_DONTFOLLOW;
@@ -669,93 +640,6 @@ int sys_lsetxattr (const char *path, const char *uname, const void *value, size_
 #endif
 }
 
-/* copy EA, from LGPL2.1 libattr attr_copy_file.c
-   should use fgetxattr? We don't have them but they are in Samba.
-   Or add a sys_copyfxattr? Currently it's only call by afp_copyfile so we can open
-   the both files for reading and get a fd.
-
-   Or don't use sys_xxx and copy all attributes.
-
-*/
-int sys_copyxattr(const char *src_path, const char *dst_path)
-{
-#if defined(HAVE_LISTXATTR) && defined(HAVE_GETXATTR) && defined(HAVE_SETXATTR)
-       int ret = 0;
-       ssize_t size;
-       char *names = NULL, *end_names, *name, *value = NULL;
-       unsigned int setxattr_ENOTSUP = 0;
-
-       size = sys_listxattr(src_path, NULL, 0);
-       if (size < 0) {
-               if (errno != ENOSYS && errno != ENOTSUP) {
-                       ret = -1;
-               }
-               goto getout;
-       }
-       names = malloc(size+1);
-       if (names == NULL) {
-               ret = -1;
-               goto getout;
-       }
-       size = sys_listxattr(src_path, names, size);
-       if (size < 0) {
-               ret = -1;
-               goto getout;
-       } else {
-               names[size] = '\0';
-               end_names = names + size;
-       }
-
-       for (name = names; name != end_names; name = strchr(name, '\0') + 1) {
-               void *old_value;
-
-               /* check if this attribute shall be preserved */
-               if (!*name)
-                       continue;
-
-               size = sys_getxattr (src_path, name, NULL, 0);
-               if (size < 0) {
-                       ret = -1;
-                       continue;
-               }
-               value = realloc(old_value = value, size);
-               if (size != 0 && value == NULL) {
-                       free(old_value);
-                       ret = -1;
-               }
-               size = sys_getxattr(src_path, name, value, size);
-               if (size < 0) {
-                       ret = -1;
-                       continue;
-               }
-               if (sys_setxattr(dst_path, name, value, size, 0) != 0) {
-                       if (errno == ENOTSUP)
-                               setxattr_ENOTSUP++;
-                       else {
-                               if (errno == ENOSYS) {
-                                       ret = -1;
-                                       /* no hope of getting any further */
-                                       break;
-                               } else {
-                                       ret = -1;
-                               }
-                       }
-               }
-       }
-       if (setxattr_ENOTSUP) {
-               errno = ENOTSUP;
-               ret = -1;
-       }
-getout:
-       free(value);
-       free(names);
-       return ret;
-#else
-       /* FIXME same for solaris */
-       return 0;
-#endif
-}
-
 /**************************************************************************
  helper functions for Solaris' EA support
 ****************************************************************************/
@@ -784,7 +668,6 @@ static ssize_t solaris_read_xattr(int attrfd, void *value, size_t size)
 static ssize_t solaris_list_xattr(int attrdirfd, char *list, size_t size)
 {
        ssize_t len = 0;
-       int stop = 0;
        DIR *dirp;
        struct dirent *de;
        int newfd = dup(attrdirfd);
@@ -824,7 +707,7 @@ static ssize_t solaris_list_xattr(int attrdirfd, char *list, size_t size)
        }
 
        if (closedir(dirp) == -1) {
-               LOG(log_debug, logtype_default, "closedir dirp failed: %s\n",strerror(errno));
+               LOG(log_error, logtype_default, "closedir dirp: %s",strerror(errno));
                return -1;
        }
        return len;
@@ -842,7 +725,10 @@ static int solaris_attropen(const char *path, const char *attrpath, int oflag, m
 {
        int filedes = attropen(path, attrpath, oflag, mode);
        if (filedes == -1) {
-               LOG(log_maxdebug, logtype_default, "attropen FAILED: path: %s, name: %s, errno: %s\n",path,attrpath,strerror(errno));
+        if (errno != ENOENT)
+            LOG(log_error, logtype_default, "attropen(\"%s\", ea:'%s'): %s",
+                path, attrpath, strerror(errno));
+        errno = ENOATTR;
        }
        return filedes;
 }
@@ -851,7 +737,8 @@ static int solaris_openat(int fildes, const char *path, int oflag, mode_t mode)
 {
        int filedes = openat(fildes, path, oflag, mode);
        if (filedes == -1) {
-               LOG(log_maxdebug, logtype_default, "openat FAILED: fd: %s, path: %s, errno: %s\n",filedes,path,strerror(errno));
+               LOG(log_error, logtype_default, "openat(\"%s\"): %s",
+            path, strerror(errno));
        }
        return filedes;
 }
@@ -861,9 +748,11 @@ static int solaris_write_xattr(int attrfd, const char *value, size_t size)
        if ((ftruncate(attrfd, 0) == 0) && (write(attrfd, value, size) == size)) {
                return 0;
        } else {
-               LOG(log_maxdebug, logtype_default, "solaris_write_xattr FAILED!\n");
+               LOG(log_error, logtype_default, "solaris_write_xattr: %s",
+            strerror(errno));
                return -1;
        }
 }
+
 #endif /*HAVE_ATTROPEN*/