]> arthur.barton.de Git - netatalk.git/blobdiff - etc/afpd/volume.c
New volume options allow_hosts/denied hosts. See #2690844. From Tim Nowaczyk
[netatalk.git] / etc / afpd / volume.c
index 97a60ea2a9aad9d628b9001bcc1225ed58d839a7..243e7498c0edb2eaa734c78d290c9faf71c1db78 100644 (file)
@@ -1,5 +1,5 @@
 /*
- * $Id: volume.c,v 1.36 2002-09-29 23:31:24 sibaz Exp $
+ * $Id: volume.c,v 1.51.2.7.2.33.2.24 2009-03-26 11:53:32 franklahm Exp $
  *
  * Copyright (c) 1990,1993 Regents of The University of Michigan.
  * All Rights Reserved.  See COPYRIGHT.
@@ -9,31 +9,17 @@
 #include "config.h"
 #endif /* HAVE_CONFIG_H */
 
-#include <sys/time.h>
-#include <atalk/logger.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <sys/param.h>
-#include <sys/socket.h>
-#include <netinet/in.h>
-#include <arpa/inet.h>
-#include <netatalk/endian.h>
-#include <atalk/asp.h>
-#include <atalk/dsi.h>
-#include <atalk/adouble.h>
-#include <atalk/afp.h>
-#include <atalk/util.h>
-#ifdef CNID_DB
-#include <atalk/cnid.h>
-#endif /* CNID_DB*/
-#include <dirent.h>
-#ifdef HAVE_FCNTL_H
-#include <fcntl.h>
-#endif /* HAVE_FCNTL_H */
 #include <stdio.h>
 #include <stdlib.h>
 #include <ctype.h>
-
+#include <dirent.h>
+#include <pwd.h>
+#include <grp.h>
+#include <utime.h>
+#include <errno.h>
+#ifdef HAVE_STRINGS_H
+#include <strings.h>
+#endif
 /* STDC check */
 #if STDC_HEADERS
 #include <string.h>
@@ -48,18 +34,28 @@ char *strchr (), *strrchr ();
 #define memmove(d,s,n) bcopy ((s), (d), (n))
 #endif /* ! HAVE_MEMCPY */
 #endif /* STDC_HEADERS */
+#include <sys/param.h>
+#include <sys/socket.h>
+#include <netinet/in.h>
+#include <arpa/inet.h>
+#include <atalk/asp.h>
+#include <atalk/dsi.h>
+#include <atalk/adouble.h>
+#include <atalk/afp.h>
+#include <atalk/util.h>
+#include <atalk/logger.h>
+#ifdef CNID_DB
+#include <atalk/cnid.h>
+#endif /* CNID_DB*/
 
-#include <pwd.h>
-#include <grp.h>
-#include <utime.h>
-#include <errno.h>
-
+#include "globals.h"
 #include "directory.h"
 #include "file.h"
 #include "volume.h"
-#include "globals.h"
 #include "unix.h"
 
+extern int afprun(int root, char *cmd, int *outfd);
+
 #ifndef MIN
 #define MIN(a, b) ((a) < (b) ? (a) : (b))
 #endif /* ! MIN */
@@ -75,24 +71,23 @@ char *strchr (), *strrchr ();
 #endif /* BYTE_ORDER == BIG_ENDIAN */
 #endif /* ! NO_LARGE_VOL_SUPPORT */
 
-static struct vol *volumes = NULL;
-static int             lastvid = 0;
-#ifndef CNID_DB
+static struct vol *Volumes = NULL;
+static u_int16_t       lastvid = 0;
 static char            *Trash = "\02\024Network Trash Folder";
-#endif /* CNID_DB */
-static struct extmap   *extmap = NULL, *defextmap = NULL;
-static int              extmap_cnt;
+
+static struct extmap   *Extmap = NULL, *Defextmap = NULL;
+static int              Extmap_cnt;
+static void             free_extmap(void);
 
 #define VOLOPT_ALLOW      0  /* user allow list */
 #define VOLOPT_DENY       1  /* user deny list */
 #define VOLOPT_RWLIST     2  /* user rw list */
 #define VOLOPT_ROLIST     3  /* user ro list */
-#define VOLOPT_CODEPAGE   4  /* codepage */
-#define VOLOPT_PASSWORD   5  /* volume password */
-#define VOLOPT_CASEFOLD   6  /* character case mangling */
-#define VOLOPT_FLAGS      7  /* various flags */
-#define VOLOPT_DBPATH     8  /* path to database */
-#define VOLOPT_MAPCHARS   9  /* does mtou and utom mappings. syntax:
+#define VOLOPT_PASSWORD   4  /* volume password */
+#define VOLOPT_CASEFOLD   5  /* character case mangling */
+#define VOLOPT_FLAGS      6  /* various flags */
+#define VOLOPT_DBPATH     7  /* path to database */
+#define VOLOPT_MAPCHARS   8  /* does mtou and utom mappings. syntax:
 m and u can be double-byte hex
 strings if necessary.
 m=u -> map both ways
@@ -102,21 +97,34 @@ m=u -> map both ways
   ~u  -> make u illegal only as the first
   part of a double-byte character.
   */
-#define VOLOPT_VETO      10  /* list of veto filespec */
+#define VOLOPT_VETO          10  /* list of veto filespec */
+#define VOLOPT_PREEXEC       11  /* preexec command */
+#define VOLOPT_ROOTPREEXEC   12  /* root preexec command */
 
+#define VOLOPT_POSTEXEC      13  /* postexec command */
+#define VOLOPT_ROOTPOSTEXEC  14  /* root postexec command */
+
+#define VOLOPT_ENCODING      15  /* mac encoding (pre OSX)*/
+#define VOLOPT_MACCHARSET    16
+#define VOLOPT_CNIDSCHEME    17
+#define VOLOPT_ADOUBLE       18  /* adouble version */
 #ifdef FORCE_UIDGID
 #warning UIDGID
 #include "uid.h"
 
-#define VOLOPT_FORCEUID  11  /* force uid for username x */
-#define VOLOPT_FORCEGID  12  /* force gid for group x */
-#define VOLOPT_UMASK     13
-#define VOLOPT_MAX       13
-#else /* normally, there are only 9 possible options */
-#define VOLOPT_UMASK     11
-#define VOLOPT_MAX       11
+#define VOLOPT_FORCEUID  19  /* force uid for username x */
+#define VOLOPT_FORCEGID  20  /* force gid for group x */
 #endif /* FORCE_UIDGID */
 
+#define VOLOPT_UMASK     21
+#define VOLOPT_ALLOWED_HOSTS 22
+#define VOLOPT_DENIED_HOSTS  23
+#define VOLOPT_DPERM     24  /* dperm default directories perms */
+#define VOLOPT_FPERM     25  /* fperm default files perms */
+#define VOLOPT_DFLTPERM  26  /* perm */
+
+#define VOLOPT_MAX       (VOLOPT_DFLTPERM +1)
+
 #define VOLOPT_NUM        (VOLOPT_MAX + 1)
 
 #define VOLPASSLEN  8
@@ -127,7 +135,61 @@ m=u -> map both ways
       int i_value;
   };
 
-static __inline__ void volfree(struct vol_option *options,
+typedef struct _special_folder {
+        const char *name;
+        int precreate;
+        mode_t mode;
+        int hide;
+} _special_folder;
+
+static const _special_folder special_folders[] = {
+  {"Network Trash Folder",     1,  0777,  1},
+  {"Temporary Items",          1,  0777,  1},
+  {".AppleDesktop",            1,  0777,  0},
+#if 0
+  {"TheFindByContentFolder",   0,     0,  1},
+  {"TheVolumeSettingsFolder",  0,     0,  1},
+#endif
+  {NULL, 0, 0, 0}};
+
+typedef struct _volopt_name {
+       const u_int32_t option;
+       const char      *name;
+} _vol_opt_name;
+
+static const _vol_opt_name vol_opt_names[] = {
+    {AFPVOL_A2VOL,      "PRODOS"},      /* prodos volume */
+    {AFPVOL_CRLF,       "CRLF"},        /* cr/lf translation */
+    {AFPVOL_NOADOUBLE,  "NOADOUBLE"},   /* don't create .AppleDouble by default */
+    {AFPVOL_RO,         "READONLY"},    /* read-only volume */
+    {AFPVOL_MSWINDOWS,  "MSWINDOWS"},   /* deal with ms-windows yuckiness. this is going away. */
+    {AFPVOL_NOHEX,      "NOHEX"},       /* don't do :hex translation */
+    {AFPVOL_USEDOTS,    "USEDOTS"},     /* use real dots */
+    {AFPVOL_LIMITSIZE,  "LIMITSIZE"},   /* limit size for older macs */
+    {AFPVOL_MAPASCII,   "MAPASCII"},    /* map the ascii range as well */
+    {AFPVOL_DROPBOX,    "DROPBOX"},     /* dropkludge dropbox support */
+    {AFPVOL_NOFILEID,   "NOFILEID"},    /* don't advertise createid resolveid and deleteid calls */
+    {AFPVOL_NOSTAT,     "NOSTAT"},      /* advertise the volume even if we can't stat() it
+                                         * maybe because it will be mounted later in preexec */
+    {AFPVOL_UNIX_PRIV,  "UNIXPRIV"},    /* support unix privileges */
+    {AFPVOL_NODEV,      "NODEV"},       /* always use 0 for device number in cnid calls */
+    {AFPVOL_EILSEQ,     "ILLEGALSEQ"},  /* encode illegal sequence */
+    {AFPVOL_CACHE,      "CACHEID"},     /* Use adouble v2 CNID caching, default don't use it */
+    {0, NULL}
+};
+
+static const _vol_opt_name vol_opt_casefold[] = {
+    {AFPVOL_MTOUUPPER, "MTOULOWER"},
+    {AFPVOL_MTOULOWER,  "MTOULOWER"},
+    {AFPVOL_UTOMUPPER,  "UTOMUPPER"},
+    {AFPVOL_UTOMLOWER,  "UTOMLOWER"},
+    {0, NULL}
+};
+
+static void handle_special_folders (const struct vol *);
+static int savevoloptions (const struct vol *);
+
+static void volfree(struct vol_option *options,
                                const struct vol_option *save)
 {
     int i;
@@ -147,29 +209,46 @@ static __inline__ void volfree(struct vol_option *options,
 
 
 /* handle variable substitutions. here's what we understand:
+ * $b   -> basename of path
  * $c   -> client ip/appletalk address
+ * $d   -> volume pathname on server
  * $f   -> full name (whatever's in the gecos field)
  * $g   -> group
  * $h   -> hostname 
+ * $i   -> client ip/appletalk address without port
  * $s   -> server name (hostname if it doesn't exist)
  * $u   -> username (guest is usually nobody)
- * $v   -> volume name (ADEID_NAME or basename)
+ * $v   -> volume name or basename if null
  * $z   -> zone (may not exist)
  * $$   -> $
+ *
+ *
  */
 #define is_var(a, b) (strncmp((a), (b), 2) == 0)
-static void volxlate(AFPObj *obj, char *dest, int destlen,
-                     char *src, struct passwd *pwd, char *path)
+
+static char *volxlate(AFPObj *obj, char *dest, size_t destlen,
+                     char *src, struct passwd *pwd, char *path, char *volname)
 {
     char *p, *q;
     int len;
-
-    strncpy(dest, src, destlen);
+    char *ret;
+    
+    if (!src) {
+        return NULL;
+    }
+    if (!dest) {
+        dest = calloc(destlen +1, 1);
+    }
+    ret = dest;
+    if (!ret) {
+        return NULL;
+    }
+    strlcpy(dest, src, destlen +1);
     if ((p = strchr(src, '$')) == NULL) /* nothing to do */
-        return;
+        return ret;
 
     /* first part of the path. just forward to the next variable. */
-    len = MIN(p - src, destlen);
+    len = MIN((size_t)(p - src), destlen);
     if (len > 0) {
         destlen -= len;
         dest += len;
@@ -178,7 +257,14 @@ static void volxlate(AFPObj *obj, char *dest, int destlen,
     while (p && destlen > 0) {
         /* now figure out what the variable is */
         q = NULL;
-        if (is_var(p, "$c")) {
+        if (is_var(p, "$b")) {
+            if (path) {
+                if ((q = strrchr(path, '/')) == NULL)
+                    q = path;
+                else if (*(q + 1) != '\0')
+                    q++;
+            }
+        } else if (is_var(p, "$c")) {
             if (obj->proto == AFPPROTO_ASP) {
                 ASP asp = obj->handle;
 
@@ -195,6 +281,8 @@ static void volxlate(AFPObj *obj, char *dest, int destlen,
                 dest += len;
                 destlen -= len;
             }
+        } else if (is_var(p, "$d")) {
+             q = path;
         } else if (is_var(p, "$f")) {
             if ((q = strchr(pwd->pw_gecos, ',')))
                 *q = '\0';
@@ -205,6 +293,19 @@ static void volxlate(AFPObj *obj, char *dest, int destlen,
                 q = grp->gr_name;
         } else if (is_var(p, "$h")) {
             q = obj->options.hostname;
+        } else if (is_var(p, "$i")) {
+            if (obj->proto == AFPPROTO_ASP) {
+                ASP asp = obj->handle;
+                len = sprintf(dest, "%u", ntohs(asp->asp_sat.sat_addr.s_net));
+                dest += len;
+                destlen -= len;
+            } else if (obj->proto == AFPPROTO_DSI) {
+                DSI *dsi = obj->handle;
+                q = inet_ntoa(dsi->client.sin_addr);
+            }
         } else if (is_var(p, "$s")) {
             if (obj->Obj)
                 q = obj->Obj;
@@ -215,26 +316,14 @@ static void volxlate(AFPObj *obj, char *dest, int destlen,
         } else if (is_var(p, "$u")) {
             q = obj->username;
         } else if (is_var(p, "$v")) {
-            if (path) {
-                struct adouble ad;
-
-                memset(&ad, 0, sizeof(ad));
-                if (ad_open(path, ADFLAGS_HF, O_RDONLY, 0, &ad) < 0)
-                    goto no_volname;
-
-                if ((len = MIN(ad_getentrylen(&ad, ADEID_NAME), destlen)) > 0) {
-                    memcpy(dest, ad_entry(&ad, ADEID_NAME), len);
-                    ad_close(&ad, ADFLAGS_HF);
-                    dest += len;
-                    destlen -= len;
-                } else {
-                    ad_close(&ad, ADFLAGS_HF);
-no_volname: /* simple basename */
-                    if ((q = strrchr(path, '/')) == NULL)
-                        q = path;
-                    else if (*(q + 1) != '\0')
-                        q++;
-                }
+            if (volname) {
+                q = volname;
+            }
+            else if (path) {
+                if ((q = strrchr(path, '/')) == NULL)
+                    q = path;
+                else if (*(q + 1) != '\0')
+                    q++;
             }
         } else if (is_var(p, "$z")) {
             q = obj->Zone;
@@ -255,81 +344,78 @@ no_volname: /* simple basename */
         /* stuff up to next $ */
         src = p + 2;
         p = strchr(src, '$');
-        len = p ? MIN(p - src, destlen) : destlen;
+        len = p ? MIN((size_t)(p - src), destlen) : destlen;
         if (len > 0) {
             strncpy(dest, src, len);
             dest += len;
             destlen -= len;
         }
     }
+    return ret;
 }
 
 /* to make sure that val is valid, make sure to select an opt that
    includes val */
-#define optionok(buf,opt,val) (strstr((buf),(opt)) && ((val)[1] != '\0'))
-
-static __inline__ char *get_codepage_path(const char *path, const char *name)
+static int optionok(const char *buf, const char *opt, const char *val) 
 {
-    char *page;
-    int len;
-
-    if (path) {
-        page = (char *) malloc((len = strlen(path)) + strlen(name) + 2);
-        if (page) {
-            strcpy(page, path);
-            if (path[len - 1] != '/') /* add a / */
-                strcat(page, "/");
-            strcat(page, name);
-        }
-    } else {
-        page = strdup(name);
-    }
+    if (!strstr(buf,opt))
+        return 0;
+    if (!val[1])
+        return 0;
+    return 1;    
+}
 
-    /* debug: show which codepage directory we are using */
-    LOG(log_debug, logtype_afpd, "using codepage directory: %s", page);
 
-    return page;
+/* -------------------- */
+static void setoption(struct vol_option *options, struct vol_option *save, int opt, const char *val)
+{
+    if (options[opt].c_value && (!save || options[opt].c_value != save[opt].c_value))
+        free(options[opt].c_value);
+    options[opt].c_value = strdup(val + 1);
 }
 
-/* handle all the options. tmp can't be NULL. */
-static void volset(struct vol_option *options, char *volname, int vlen,
-                   const char *nlspath, const char *tmp)
+/* ------------------------------------------
+   handle all the options. tmp can't be NULL. */
+static void volset(struct vol_option *options, struct vol_option *save, 
+                   char *volname, int vlen,
+                   const char *tmp)
 {
     char *val;
 
     val = strchr(tmp, ':');
+    if (!val) {
+        /* we'll assume it's a volume name. */
+        strncpy(volname, tmp, vlen);
+        volname[vlen] = 0;
+        return;
+    }
+#if 0
     LOG(log_debug, logtype_afpd, "Parsing volset %s", val);
-
+#endif
     if (optionok(tmp, "allow:", val)) {
-        if (options[VOLOPT_ALLOW].c_value)
-            free(options[VOLOPT_ALLOW].c_value);
-        options[VOLOPT_ALLOW].c_value = strdup(val + 1);
+        setoption(options, save, VOLOPT_ALLOW, val);
 
     } else if (optionok(tmp, "deny:", val)) {
-        if (options[VOLOPT_DENY].c_value)
-            free(options[VOLOPT_DENY].c_value);
-        options[VOLOPT_DENY].c_value = strdup(val + 1);
+        setoption(options, save, VOLOPT_DENY, val);
 
     } else if (optionok(tmp, "rwlist:", val)) {
-        if (options[VOLOPT_RWLIST].c_value)
-            free(options[VOLOPT_RWLIST].c_value);
-        options[VOLOPT_RWLIST].c_value = strdup(val + 1);
+        setoption(options, save, VOLOPT_RWLIST, val);
 
     } else if (optionok(tmp, "rolist:", val)) {
-        if (options[VOLOPT_ROLIST].c_value)
-            free(options[VOLOPT_ROLIST].c_value);
-        options[VOLOPT_ROLIST].c_value = strdup(val + 1);
+        setoption(options, save, VOLOPT_ROLIST, val);
 
     } else if (optionok(tmp, "codepage:", val)) {
-        if (options[VOLOPT_CODEPAGE].c_value)
-            free(options[VOLOPT_CODEPAGE].c_value);
-        options[VOLOPT_CODEPAGE].c_value = get_codepage_path(nlspath, val + 1);
-
+       LOG (log_error, logtype_afpd, "The old codepage system has been removed. Please make sure to read the documentation !!!!");
+       /* Make sure we don't screw anything */
+       exit (EXITERR_CONF);
+    } else if (optionok(tmp, "volcharset:", val)) {
+        setoption(options, save, VOLOPT_ENCODING, val);
+    } else if (optionok(tmp, "maccharset:", val)) {
+        setoption(options, save, VOLOPT_MACCHARSET, val);
     } else if (optionok(tmp, "veto:", val)) {
-        if (options[VOLOPT_VETO].c_value)
-            free(options[VOLOPT_VETO].c_value);
-        options[VOLOPT_VETO].c_value = strdup(val + 1);
-
+        setoption(options, save, VOLOPT_VETO, val);
+    } else if (optionok(tmp, "cnidscheme:", val)) {
+        setoption(options, save, VOLOPT_CNIDSCHEME, val);
     } else if (optionok(tmp, "casefold:", val)) {
         if (strcasecmp(val + 1, "tolower") == 0)
             options[VOLOPT_CASEFOLD].i_value = AFPVOL_UMLOWER;
@@ -339,7 +425,15 @@ static void volset(struct vol_option *options, char *volname, int vlen,
             options[VOLOPT_CASEFOLD].i_value = AFPVOL_UUPPERMLOWER;
         else if (strcasecmp(val + 1, "xlateupper") == 0)
             options[VOLOPT_CASEFOLD].i_value = AFPVOL_ULOWERMUPPER;
-
+    } else if (optionok(tmp, "adouble:", val)) {
+        if (strcasecmp(val + 1, "v1") == 0)
+            options[VOLOPT_ADOUBLE].i_value = AD_VERSION1;
+#if AD_VERSION == AD_VERSION2            
+        else if (strcasecmp(val + 1, "v2") == 0)
+            options[VOLOPT_ADOUBLE].i_value = AD_VERSION2;
+        else if (strcasecmp(val + 1, "osx") == 0)
+            options[VOLOPT_ADOUBLE].i_value = AD_VERSION2_OSX;
+#endif
     } else if (optionok(tmp, "options:", val)) {
         char *p;
 
@@ -350,11 +444,7 @@ static void volset(struct vol_option *options, char *volname, int vlen,
             if (strcasecmp(p, "prodos") == 0)
                 options[VOLOPT_FLAGS].i_value |= AFPVOL_A2VOL;
             else if (strcasecmp(p, "mswindows") == 0) {
-                options[VOLOPT_FLAGS].i_value |= AFPVOL_MSWINDOWS;
-                if (!options[VOLOPT_CODEPAGE].c_value)
-                    options[VOLOPT_CODEPAGE].c_value =
-                        get_codepage_path(nlspath, MSWINDOWS_CODEPAGE);
-
+                options[VOLOPT_FLAGS].i_value |= AFPVOL_MSWINDOWS | AFPVOL_USEDOTS;
             } else if (strcasecmp(p, "crlf") == 0)
                 options[VOLOPT_FLAGS].i_value |= AFPVOL_CRLF;
             else if (strcasecmp(p, "noadouble") == 0)
@@ -365,6 +455,8 @@ static void volset(struct vol_option *options, char *volname, int vlen,
                 options[VOLOPT_FLAGS].i_value |= AFPVOL_NOHEX;
             else if (strcasecmp(p, "usedots") == 0)
                 options[VOLOPT_FLAGS].i_value |= AFPVOL_USEDOTS;
+            else if (strcasecmp(p, "invisibledots") == 0)
+                options[VOLOPT_FLAGS].i_value |= AFPVOL_USEDOTS | AFPVOL_INV_DOTS;
             else if (strcasecmp(p, "limitsize") == 0)
                 options[VOLOPT_FLAGS].i_value |= AFPVOL_LIMITSIZE;
             /* support for either "dropbox" or "dropkludge" */
@@ -374,57 +466,134 @@ static void volset(struct vol_option *options, char *volname, int vlen,
                 options[VOLOPT_FLAGS].i_value |= AFPVOL_DROPBOX;
             else if (strcasecmp(p, "nofileid") == 0)
                 options[VOLOPT_FLAGS].i_value |= AFPVOL_NOFILEID;
+            else if (strcasecmp(p, "nostat") == 0)
+                options[VOLOPT_FLAGS].i_value |= AFPVOL_NOSTAT;
+            else if (strcasecmp(p, "preexec_close") == 0)
+               options[VOLOPT_PREEXEC].i_value = 1;
+            else if (strcasecmp(p, "root_preexec_close") == 0)
+               options[VOLOPT_ROOTPREEXEC].i_value = 1;
+            else if (strcasecmp(p, "upriv") == 0)
+                options[VOLOPT_FLAGS].i_value |= AFPVOL_UNIX_PRIV;
+            else if (strcasecmp(p, "nodev") == 0)
+                options[VOLOPT_FLAGS].i_value |= AFPVOL_NODEV;
+            else if (strcasecmp(p, "illegalseq") == 0)
+                options[VOLOPT_FLAGS].i_value |= AFPVOL_EILSEQ;
+            else if (strcasecmp(p, "cachecnid") == 0)
+                options[VOLOPT_FLAGS].i_value |= AFPVOL_CACHE;
 
             p = strtok(NULL, ",");
         }
 
-#ifdef CNID_DB
     } else if (optionok(tmp, "dbpath:", val)) {
-        if (options[VOLOPT_DBPATH].c_value)
-            free(options[VOLOPT_DBPATH].c_value);
+        setoption(options, save, VOLOPT_DBPATH, val);
 
-        options[VOLOPT_DBPATH].c_value = strdup(val + 1);
-#endif /* CNID_DB */
     } else if (optionok(tmp, "umask:", val)) {
-       options[VOLOPT_UMASK].i_value = (int)strtol(val, (char **)NULL, 8);
+       options[VOLOPT_UMASK].i_value = (int)strtol(val +1, NULL, 8);
+    } else if (optionok(tmp, "dperm:", val)) {
+        options[VOLOPT_DPERM].i_value = (int)strtol(val+1, NULL, 8);
+    } else if (optionok(tmp, "fperm:", val)) {
+        options[VOLOPT_FPERM].i_value = (int)strtol(val+1, NULL, 8);
+    } else if (optionok(tmp, "perm:", val)) {
+        options[VOLOPT_DFLTPERM].i_value = (int)strtol(val+1, NULL, 8);
     } else if (optionok(tmp, "mapchars:",val)) {
-        if (options[VOLOPT_MAPCHARS].c_value)
-            free(options[VOLOPT_MAPCHARS].c_value);
-        options[VOLOPT_MAPCHARS].c_value = strdup(val + 1);
+        setoption(options, save, VOLOPT_MAPCHARS, val);
 
     } else if (optionok(tmp, "password:", val)) {
-        if (options[VOLOPT_PASSWORD].c_value)
-            free(options[VOLOPT_PASSWORD].c_value);
-        options[VOLOPT_PASSWORD].c_value = strdup(val + 1);
+        setoption(options, save, VOLOPT_PASSWORD, val);
 
 #ifdef FORCE_UIDGID
 
         /* this code allows forced uid/gid per volume settings */
     } else if (optionok(tmp, "forceuid:", val)) {
-        if (options[VOLOPT_FORCEUID].c_value)
-            free(options[VOLOPT_FORCEUID].c_value);
-        options[VOLOPT_FORCEUID].c_value = strdup(val + 1);
+        setoption(options, save, VOLOPT_FORCEUID, val);
     } else if (optionok(tmp, "forcegid:", val)) {
-        if (options[VOLOPT_FORCEGID].c_value)
-            free(options[VOLOPT_FORCEGID].c_value);
-        options[VOLOPT_FORCEGID].c_value = strdup(val + 1);
+        setoption(options, save, VOLOPT_FORCEGID, val);
 
 #endif /* FORCE_UIDGID */
+    } else if (optionok(tmp, "root_preexec:", val)) {
+        setoption(options, save, VOLOPT_ROOTPREEXEC, val);
+
+    } else if (optionok(tmp, "preexec:", val)) {
+        setoption(options, save, VOLOPT_PREEXEC, val);
+
+    } else if (optionok(tmp, "root_postexec:", val)) {
+        setoption(options, save, VOLOPT_ROOTPOSTEXEC, val);
+
+    } else if (optionok(tmp, "postexec:", val)) {
+        setoption(options, save, VOLOPT_POSTEXEC, val);
+
+    } else if (optionok(tmp, "allowed_hosts:", val)) {
+        setoption(options, save, VOLOPT_ALLOWED_HOSTS, val);
+
+    } else if (optionok(tmp, "denied_hosts:", val)) {
+        setoption(options, save, VOLOPT_DENIED_HOSTS, val);
 
-    } else if (val) {
+    } else {
         /* ignore unknown options */
         LOG(log_debug, logtype_afpd, "ignoring unknown volume option: %s", tmp);
 
-    } else {
-        /* we'll assume it's a volume name. */
-        strncpy(volname, tmp, vlen);
+    } 
+}
+
+/* ----------------- */
+static void showvol(const ucs2_t *name)
+{
+    struct vol *volume;
+    for ( volume = Volumes; volume; volume = volume->v_next ) {
+        if (volume->v_hide && !strcasecmp_w( volume->v_name, name ) ) {
+            volume->v_hide = 0;
+            return;
+        }
     }
 }
 
-static int creatvol(const char *path, char *name, struct vol_option *options)
+/* ----------------- 
+ * FIXME should be define elsewhere
+*/
+static int netatalk_name(const char *name)
+{
+    return strcasecmp(name,".AppleDB") &&
+        strcasecmp(name,".AppleDouble") &&
+        strcasecmp(name,".AppleDesktop");
+}
+
+static int validupath_adouble(const struct vol *vol, const char *name) 
+{
+    return (vol->v_flags & AFPVOL_USEDOTS) ? 
+        netatalk_name(name) && strcasecmp(name,".Parent"): name[0] != '.';
+}                                           
+
+/* ----------------- */
+static int validupath_osx(const struct vol *vol _U_, const char *name) 
+{
+    return strncmp(name,"._", 2) && (
+      (vol->v_flags & AFPVOL_USEDOTS) ? netatalk_name(name): name[0] != '.');
+}             
+
+/* ---------------- */
+static void initvoladouble(struct vol *vol)
+{
+    if (vol->v_adouble == AD_VERSION2_OSX) {
+        vol->validupath  = validupath_osx;
+        vol->ad_path     = ad_path_osx;
+    }
+    else {
+        vol->validupath  = validupath_adouble;
+        vol->ad_path     = ad_path;
+    }
+}
+
+/* ------------------------------- */
+static int creatvol(AFPObj *obj, struct passwd *pwd, 
+                    char *path, char *name, 
+                    struct vol_option *options, 
+                    const int user /* user defined volume */
+                    )
 {
     struct vol *volume;
     int                vlen;
+    int         hide = 0;
+    ucs2_t     tmpname[512];
 
     if ( name == NULL || *name == '\0' ) {
         if ((name = strrchr( path, '/' )) == NULL) {
@@ -436,45 +605,52 @@ static int creatvol(const char *path, char *name, struct vol_option *options)
             return -1;
     }
 
-    for ( volume = volumes; volume; volume = volume->v_next ) {
-        if ( strcasecmp( volume->v_name, name ) == 0 ) {
-            return -1; /* Won't be able to access it, anyway... */
-        }
-    }
-
     vlen = strlen( name );
     if ( vlen > AFPVOL_NAMELEN ) {
         vlen = AFPVOL_NAMELEN;
         name[AFPVOL_NAMELEN] = '\0';
     }
 
-    if (( volume =
-                (struct vol *)calloc(1, sizeof( struct vol ))) == NULL ) {
+    /* convert name to UCS2 first */
+    if ( 0 >= ( vlen = convert_string(obj->options.unixcharset, CH_UCS2, name, vlen, tmpname, 512)) )
+        return -1;
+
+    for ( volume = Volumes; volume; volume = volume->v_next ) {
+        if ( strcasecmp_w( volume->v_name, tmpname ) == 0 ) {
+           if (volume->v_deleted) {
+               hide = 1;
+           }
+           else {
+               return -1;      /* Won't be able to access it, anyway... */
+           }
+        }
+    }
+
+
+    if (!( volume = (struct vol *)calloc(1, sizeof( struct vol ))) ) {
         LOG(log_error, logtype_afpd, "creatvol: malloc: %s", strerror(errno) );
         return -1;
     }
-    if (( volume->v_name =
-                (char *)malloc( vlen + 1 )) == NULL ) {
+    if ( NULL == ( volume->v_name = strdup_w(tmpname))) {
         LOG(log_error, logtype_afpd, "creatvol: malloc: %s", strerror(errno) );
         free(volume);
         return -1;
     }
-    if (( volume->v_path =
-                (char *)malloc( strlen( path ) + 1 )) == NULL ) {
+    if (!( volume->v_path = (char *)malloc( strlen( path ) + 1 )) ) {
         LOG(log_error, logtype_afpd, "creatvol: malloc: %s", strerror(errno) );
         free(volume->v_name);
         free(volume);
         return -1;
     }
-
-    strcpy( volume->v_name, name);
+    volume->v_hide = hide;
     strcpy( volume->v_path, path );
 
 #ifdef __svr4__
     volume->v_qfd = -1;
 #endif /* __svr4__ */
-    volume->v_vid = lastvid++;
-    volume->v_lastdid = 17;
+    /* os X start at 1 and use network order ie. 1 2 3 */
+    volume->v_vid = ++lastvid;
+    volume->v_vid = htons(volume->v_vid);
 
     /* handle options */
     if (options) {
@@ -484,9 +660,15 @@ static int creatvol(const char *path, char *name, struct vol_option *options)
         /* shift in some flags */
         volume->v_flags = options[VOLOPT_FLAGS].i_value;
 
-        /* read in the code pages */
-        if (options[VOLOPT_CODEPAGE].c_value)
-            codepage_read(volume, options[VOLOPT_CODEPAGE].c_value);
+        volume->v_ad_options = 0;
+        if ((volume->v_flags & AFPVOL_NODEV))
+            volume->v_ad_options |= ADVOL_NODEV;
+        if ((volume->v_flags & AFPVOL_CACHE))
+            volume->v_ad_options |= ADVOL_CACHE;
+        if ((volume->v_flags & AFPVOL_UNIX_PRIV))
+            volume->v_ad_options |= ADVOL_UNIXPRIV;
+        if ((volume->v_flags & AFPVOL_INV_DOTS))
+            volume->v_ad_options |= ADVOL_INVDOTS;
 
         if (options[VOLOPT_PASSWORD].c_value)
             volume->v_password = strdup(options[VOLOPT_PASSWORD].c_value);
@@ -494,16 +676,35 @@ static int creatvol(const char *path, char *name, struct vol_option *options)
         if (options[VOLOPT_VETO].c_value)
             volume->v_veto = strdup(options[VOLOPT_VETO].c_value);
 
-#ifdef CNID_DB
+        if (options[VOLOPT_ENCODING].c_value)
+            volume->v_volcodepage = strdup(options[VOLOPT_ENCODING].c_value);
+
+        if (options[VOLOPT_MACCHARSET].c_value)
+            volume->v_maccodepage = strdup(options[VOLOPT_MACCHARSET].c_value);
+
         if (options[VOLOPT_DBPATH].c_value)
-            volume->v_dbpath = strdup(options[VOLOPT_DBPATH].c_value);
-#endif /* CNID_DB */
+            volume->v_dbpath = volxlate(obj, NULL, MAXPATHLEN, options[VOLOPT_DBPATH].c_value, pwd, path, name);
+
+       if (options[VOLOPT_CNIDSCHEME].c_value)
+           volume->v_cnidscheme = strdup(options[VOLOPT_CNIDSCHEME].c_value);
 
        if (options[VOLOPT_UMASK].i_value)
            volume->v_umask = (mode_t)options[VOLOPT_UMASK].i_value;
 
-#ifdef FORCE_UIDGID
+       if (options[VOLOPT_DPERM].i_value)
+           volume->v_dperm = (mode_t)options[VOLOPT_DPERM].i_value;
+
+       if (options[VOLOPT_FPERM].i_value)
+           volume->v_fperm = (mode_t)options[VOLOPT_FPERM].i_value;
 
+       if (options[VOLOPT_DFLTPERM].i_value)
+           volume->v_perm = (mode_t)options[VOLOPT_DFLTPERM].i_value;
+
+       if (options[VOLOPT_ADOUBLE].i_value)
+           volume->v_adouble = options[VOLOPT_ADOUBLE].i_value;
+       else 
+           volume->v_adouble = AD_VERSION;
+#ifdef FORCE_UIDGID
         if (options[VOLOPT_FORCEUID].c_value) {
             volume->v_forceuid = strdup(options[VOLOPT_FORCEUID].c_value);
         } else {
@@ -515,16 +716,33 @@ static int creatvol(const char *path, char *name, struct vol_option *options)
         } else {
             volume->v_forcegid = NULL; /* set as null so as to return 0 later on */
         }
+#endif
+        if (!user) {
+            if (options[VOLOPT_PREEXEC].c_value)
+                volume->v_preexec = volxlate(obj, NULL, MAXPATHLEN, options[VOLOPT_PREEXEC].c_value, pwd, path, name);
+            volume->v_preexec_close = options[VOLOPT_PREEXEC].i_value;
 
-#endif /* FORCE_UIDGID */
+            if (options[VOLOPT_POSTEXEC].c_value)
+                volume->v_postexec = volxlate(obj, NULL, MAXPATHLEN, options[VOLOPT_POSTEXEC].c_value, pwd, path, name);
+
+            if (options[VOLOPT_ROOTPREEXEC].c_value)
+                volume->v_root_preexec = volxlate(obj, NULL, MAXPATHLEN, options[VOLOPT_ROOTPREEXEC].c_value, pwd, path,  name);
+            volume->v_root_preexec_close = options[VOLOPT_ROOTPREEXEC].i_value;
 
+            if (options[VOLOPT_ROOTPOSTEXEC].c_value)
+                volume->v_root_postexec = volxlate(obj, NULL, MAXPATHLEN, options[VOLOPT_ROOTPOSTEXEC].c_value, pwd, path,  name);
+        }
     }
+    volume->v_dperm |= volume->v_perm;
+    volume->v_fperm |= volume->v_perm;
 
-    volume->v_next = volumes;
-    volumes = volume;
+    initvoladouble(volume);
+    volume->v_next = Volumes;
+    Volumes = volume;
     return 0;
 }
 
+/* ---------------- */
 static char *myfgets( buf, size, fp )
 char   *buf;
 int            size;
@@ -534,8 +752,13 @@ FILE       *fp;
     int                c;
 
     p = buf;
-    while ((( c = getc( fp )) != EOF ) && ( size > 0 )) {
+    while ((EOF != ( c = getc( fp )) ) && ( size > 1 )) {
         if ( c == '\n' || c == '\r' ) {
+            if (p != buf && *(p -1) == '\\') {
+                p--;
+                size++;
+                continue;
+            }
             *p++ = '\n';
             break;
         } else {
@@ -563,6 +786,18 @@ FILE       *fp;
  *      0: list exists, but name isn't in it
  *      1: in list
  */
+
+#ifndef NO_REAL_USER_NAME
+/* authentication is case insensitive 
+ * FIXME should we do the same with group name?
+*/
+#define access_strcmp strcasecmp
+
+#else
+#define access_strcmp strcmp
+
+#endif
+
 static int accessvol(args, name)
 const char *args;
 const char *name;
@@ -573,7 +808,7 @@ const char *name;
     if (!args)
         return -1;
 
-    strncpy(buf, args, sizeof(buf));
+    strlcpy(buf, args, sizeof(buf));
     if ((p = strtok(buf, ",")) == NULL) /* nothing, return okay */
         return -1;
 
@@ -581,7 +816,7 @@ const char *name;
         if (*p == '@') { /* it's a group */
             if ((gr = getgrnam(p + 1)) && gmem(gr->gr_gid))
                 return 1;
-        } else if (strcmp(p, name) == 0) /* it's a user name */
+        } else if (access_strcmp(p, name) == 0) /* it's a user name */
             return 1;
         p = strtok(NULL, ",");
     }
@@ -589,6 +824,55 @@ const char *name;
     return 0;
 }
 
+static int hostaccessvol(type, volname, args, obj)
+int type;
+char *volname;
+const char *args;
+const AFPObj *obj;
+{
+    char buf[MAXPATHLEN + 1], *p, *b;
+    DSI *dsi = obj->handle;
+
+    if (!args)
+        return -1;
+
+    strlcpy(buf, args, sizeof(buf));
+    if ((p = strtok_r(buf, ",", &b)) == NULL) /* nothing, return okay */
+        return -1;
+
+    while (p) {
+        if (obj->proto == AFPPROTO_DSI) {
+            struct in_addr mask, net;
+            char *net_char, *mask_char;
+            int mask_int;
+
+            net_char = strtok(p, "/");
+            mask_char = strtok(NULL,"/");
+            if (mask_char == NULL) {
+                mask_int = 32;
+            } else {
+                mask_int = atoi(mask_char);
+            }
+           
+            // convert the integer netmask to a bitmask in network order
+            mask.s_addr = htonl(-1 - ((1 << (32 - mask_int)) - 1));
+            net.s_addr = inet_addr(net_char) & mask.s_addr;
+
+            if ((dsi->client.sin_addr.s_addr & mask.s_addr) == net.s_addr) {
+                   if (type == VOLOPT_DENIED_HOSTS)
+                       LOG(log_info, logtype_afpd, "AFP access denied for client IP '%s' to volume '%s' by denied list",
+                           inet_ntoa(dsi->client.sin_addr), volname);
+                   return 1;
+           }
+        }
+        p = strtok_r(NULL, ",", &b);
+    }
+    if (type == VOLOPT_ALLOWED_HOSTS)
+       LOG(log_info, logtype_afpd, "AFP access denied for client IP '%s' to volume '%s', not in allowed list",
+           inet_ntoa(dsi->client.sin_addr), volname);
+    return 0;
+}
+
 static void setextmap( ext, type, creator, user)
 char           *ext, *type, *creator;
 int                    user;
@@ -596,27 +880,26 @@ int                       user;
     struct extmap      *em;
     int                 cnt;
 
-    if (extmap == NULL) {
-        if (( extmap = calloc(1, sizeof( struct extmap ))) == NULL ) {
+    if (Extmap == NULL) {
+        if (( Extmap = calloc(1, sizeof( struct extmap ))) == NULL ) {
             LOG(log_error, logtype_afpd, "setextmap: calloc: %s", strerror(errno) );
             return;
         }
-
     }
     ext++;
-    for ( em = extmap, cnt = 0; em->em_ext; em++, cnt++) {
+    for ( em = Extmap, cnt = 0; em->em_ext; em++, cnt++) {
         if ( (strdiacasecmp( em->em_ext, ext )) == 0 ) {
             break;
         }
     }
 
     if ( em->em_ext == NULL ) {
-        if (!(extmap  = realloc( extmap, sizeof( struct extmap ) * (cnt +2))) ) {
+        if (!(Extmap  = realloc( Extmap, sizeof( struct extmap ) * (cnt +2))) ) {
             LOG(log_error, logtype_afpd, "setextmap: realloc: %s", strerror(errno) );
             return;
         }
-        (extmap +cnt +1)->em_ext = NULL;
-        em = extmap +cnt;
+        (Extmap +cnt +1)->em_ext = NULL;
+        em = Extmap +cnt;
     } else if ( !user ) {
         return;
     }
@@ -638,10 +921,6 @@ int                        user;
     } else {
         memcpy(em->em_creator, creator, sizeof( em->em_creator ));
     }
-
-    if ( !*ext ) {
-        defextmap = em;
-    }
 }
 
 /* -------------------------- */
@@ -656,25 +935,66 @@ static void sortextmap( void)
 {
     struct extmap      *em;
 
-    if ((em = extmap) == NULL) {
+    Extmap_cnt = 0;
+    if ((em = Extmap) == NULL) {
         return;
     }
-    extmap_cnt = 0;
     while (em->em_ext) {
         em++;
-        extmap_cnt++;
+        Extmap_cnt++;
+    }
+    if (Extmap_cnt) {
+        qsort(Extmap, Extmap_cnt, sizeof(struct extmap), extmap_cmp);
+        if (*Extmap->em_ext == 0) {
+            /* the first line is really "." the default entry, 
+             * we remove the leading '.' in setextmap
+            */
+            Defextmap = Extmap;
+        }
     }
-    if (extmap_cnt) {
-        qsort(extmap, extmap_cnt, sizeof(struct extmap), extmap_cmp);
+}
+
+/* ----------------------
+*/
+static void free_extmap( void)
+{
+    struct extmap      *em;
+
+    if (Extmap) {
+        for ( em = Extmap; em->em_ext; em++) {
+             free (em->em_ext);
+        }
+        free(Extmap);
+        Extmap = NULL;
+        Defextmap = Extmap;
+        Extmap_cnt = 0;
     }
 }
 
+/* ----------------------
+*/
+static int volfile_changed(struct afp_volume_name *p) 
+{
+    struct stat      st;
+    char *name;
+    
+    if (p->full_name) 
+       name = p->full_name;
+    else
+        name = p->name;
+        
+    if (!stat( name, &st) && st.st_mtime > p->mtime) {
+        p->mtime = st.st_mtime;
+        return 1;
+    }
+    return 0;
+}
 
-/*
+/* ----------------------
  * Read a volume configuration file and add the volumes contained within to
  * the global volume list.  If p2 is non-NULL, the file that is opened is
  * p1/p2
- *
+ * 
  * Lines that begin with # and blank lines are ignored.
  * Volume lines are of the form:
  *             <unix path> [<volume name>] [allow:<user>,<@group>,...] \
@@ -683,7 +1003,8 @@ static void sortextmap( void)
  */
 static int readvolfile(obj, p1, p2, user, pwent)
 AFPObj      *obj;
-char   *p1, *p2;
+struct afp_volume_name         *p1;
+char        *p2;
 int            user;
 struct passwd *pwent;
 {
@@ -695,19 +1016,29 @@ struct passwd *pwent;
     struct passwd      *pw;
     struct vol_option   options[VOLOPT_NUM], save_options[VOLOPT_NUM];
     int                 i;
+    struct stat         st;
+    int                 fd;
 
-    if (!p1)
+    if (!p1->name)
         return -1;
-
-    strcpy( path, p1 );
+    p1->mtime = 0;
+    strcpy( path, p1->name );
     if ( p2 != NULL ) {
         strcat( path, "/" );
         strcat( path, p2 );
+        if (p1->full_name) {
+            free(p1->full_name);
+        }
+        p1->full_name = strdup(path);
     }
 
-    if (( fp = fopen( path, "r" )) == NULL ) {
+    if (NULL == ( fp = fopen( path, "r" )) ) {
         return( -1 );
     }
+    fd = fileno(fp);
+    if (fd != -1 && !fstat( fd, &st) ) {
+        p1->mtime = st.st_mtime;
+    }
 
     memset(save_options, 0, sizeof(save_options));
     while ( myfgets( buf, sizeof( buf ), fp ) != NULL ) {
@@ -726,8 +1057,8 @@ struct passwd *pwent;
                     if (parseline( sizeof( path ) - VOLOPT_DEFAULT_LEN - 1,
                                    path + VOLOPT_DEFAULT_LEN) < 0)
                         break;
-                    volset(save_options, tmp, sizeof(tmp) - 1,
-                           obj->options.nlspath, path + VOLOPT_DEFAULT_LEN);
+                    volset(save_options, NULL, tmp, sizeof(tmp) - 1,
+                           path + VOLOPT_DEFAULT_LEN);
                 }
             }
             break;
@@ -761,13 +1092,13 @@ struct passwd *pwent;
                 strcpy(tmp, path);
             if (!pwent)
                 pwent = getpwnam(obj->username);
-            volxlate(obj, path, sizeof(path) - 1, tmp, pwent, NULL);
+            volxlate(obj, path, sizeof(path) - 1, tmp, pwent, NULL, NULL);
 
             /* this is sort of braindead. basically, i want to be
              * able to specify things in any order, but i don't want to 
              * re-write everything. 
              *
-             * currently we have 11 options: 
+             * currently we have options: 
              *   volname
              *   codepage:x
              *   casefold:x
@@ -775,28 +1106,31 @@ struct passwd *pwent;
              *   deny:x,y,@z
              *   rwlist:x,y,@z
              *   rolist:x,y,@z
-             *   options:prodos,crlf,noadouble,ro
+             *   options:prodos,crlf,noadouble,ro...
              *   dbpath:x
              *   password:x
+             *   preexec:x
+             *
              *   namemask:x,y,!z  (not implemented yet)
              */
             memcpy(options, save_options, sizeof(options));
             *volname = '\0';
 
-            /* read in up to 11 possible options */
+            /* read in up to VOLOP_NUM possible options */
             for (i = 0; i < VOLOPT_NUM; i++) {
                 if (parseline( sizeof( tmp ) - 1, tmp ) < 0)
                     break;
 
-                volset(options, volname, sizeof(volname) - 1,
-                       obj->options.nlspath, tmp);
+                volset(options, save_options, volname, sizeof(volname) - 1, tmp);
             }
 
             /* check allow/deny lists:
                allow -> either no list (-1), or in list (1)
                deny -> either no list (-1), or not in list (0) */
             if (accessvol(options[VOLOPT_ALLOW].c_value, obj->username) &&
-                    (accessvol(options[VOLOPT_DENY].c_value, obj->username) < 1)) {
+               (accessvol(options[VOLOPT_DENY].c_value, obj->username) < 1) &&
+               hostaccessvol(VOLOPT_ALLOWED_HOSTS, volname, options[VOLOPT_ALLOWED_HOSTS].c_value, obj) &&
+               (hostaccessvol(VOLOPT_DENIED_HOSTS, volname, options[VOLOPT_DENIED_HOSTS].c_value, obj) < 1)) {
 
                 /* handle read-only behaviour. semantics:
                  * 1) neither the rolist nor the rwlist exist -> rw
@@ -809,9 +1143,9 @@ struct passwd *pwent;
                                     obj->username)))
                     options[VOLOPT_FLAGS].i_value |= AFPVOL_RO;
 
-                /* do variable substitution */
-                volxlate(obj, tmp, sizeof(tmp) - 1, volname, pwent, path);
-                creatvol(path, tmp, options);
+                /* do variable substitution for volname */
+                volxlate(obj, tmp, sizeof(tmp) - 1, volname, pwent, path, NULL);
+                creatvol(obj, pwent, path, tmp, options, p2 != NULL);
             }
             volfree(options, save_options);
             break;
@@ -831,37 +1165,81 @@ struct passwd *pwent;
     if ( fclose( fp ) != 0 ) {
         LOG(log_error, logtype_afpd, "readvolfile: fclose: %s", strerror(errno) );
     }
+    p1->loaded = 1;
     return( 0 );
 }
 
+/* ------------------------------- */
+static void volume_free(struct vol *vol)
+{
+    free(vol->v_name);
+    vol->v_name = NULL;
+    free(vol->v_path);
+    free(vol->v_password);
+    free(vol->v_veto);
+    free(vol->v_volcodepage);
+    free(vol->v_maccodepage);
+    free(vol->v_cnidscheme);
+    free(vol->v_dbpath);
+    free(vol->v_gvs);
+#ifdef FORCE_UIDGID
+    free(vol->v_forceuid);
+    free(vol->v_forcegid);
+#endif /* FORCE_UIDGID */
+}
 
-static void load_volumes(AFPObj *obj)
+/* ------------------------------- */
+static void free_volumes(void )
 {
-    struct passwd      *pwent = getpwnam(obj->username);
+    struct vol *vol;
+    struct vol  *nvol, *ovol;
 
-    if ( (obj->options.flags & OPTION_USERVOLFIRST) == 0 ) {
-        readvolfile(obj, obj->options.systemvol, NULL, 0, pwent);
+    for ( vol = Volumes; vol; vol = vol->v_next ) {
+        if (( vol->v_flags & AFPVOL_OPEN ) ) {
+            vol->v_deleted = 1;
+            continue;
+        }
+        volume_free(vol);
     }
 
-    if ((*obj->username == '\0') || (obj->options.flags & OPTION_NOUSERVOL)) {
-        readvolfile(obj, obj->options.defaultvol, NULL, 1, pwent);
-    } else if (pwent) {
-        /*
-        * Read user's AppleVolumes or .AppleVolumes file
-        * If neither are readable, read the default volumes file. if
-        * that doesn't work, create a user share.
-        */
-        if ( readvolfile(obj, pwent->pw_dir, "AppleVolumes", 1, pwent) < 0 &&
-                readvolfile(obj, pwent->pw_dir, ".AppleVolumes", 1, pwent) < 0 &&
-                readvolfile(obj, pwent->pw_dir, "applevolumes", 1, pwent) < 0 &&
-                readvolfile(obj, pwent->pw_dir, ".applevolumes", 1, pwent) < 0 &&
-                obj->options.defaultvol != NULL ) {
-            if (readvolfile(obj, obj->options.defaultvol, NULL, 1, pwent) < 0)
-                creatvol(pwent->pw_dir, NULL, NULL);
+    for ( vol = Volumes, ovol = NULL; vol; vol = nvol) {
+        nvol = vol->v_next;
+
+        if (vol->v_name == NULL) {
+           if (Volumes == vol) {
+               Volumes = nvol;
+               ovol = Volumes;
+           }
+           else {
+              ovol->v_next = nvol;
+           }
+           free(vol);
+        }
+        else {
+           ovol = vol;
         }
     }
-    if ( obj->options.flags & OPTION_USERVOLFIRST ) {
-        readvolfile(obj, obj->options.systemvol, NULL, 0, pwent );
+}
+
+/* ------------------------------- */
+static void volume_unlink(struct vol *volume)
+{
+struct vol *vol, *ovol, *nvol;
+
+    if (volume == Volumes) {
+        Volumes = Volumes->v_next;
+        return;
+    }
+    for ( vol = Volumes->v_next, ovol = Volumes; vol; vol = nvol) {
+        nvol = vol->v_next;
+
+        if (vol == volume) {
+            ovol->v_next = nvol;
+            break;
+        }
+        else {
+           ovol = vol;
+        }
     }
 }
 
@@ -874,7 +1252,7 @@ VolSpace    *xbfree, *xbtotal;
     u_int32_t   maxsize;
 #ifndef NO_QUOTA_SUPPORT
     VolSpace   qfree, qtotal;
-#endif /* ! NO_QUOTA_SUPPORT */
+#endif
 
     spaceflag = AFPVOL_GVSMASK & vol->v_flags;
     /* report up to 2GB if afp version is < 2.2 (4GB if not) */
@@ -889,7 +1267,7 @@ VolSpace    *xbfree, *xbtotal;
             goto getvolspace_done;
         }
     }
-#endif /* AFS */
+#endif
 
     if (( rc = ustatfs_getvolspace( vol, xbfree, xbtotal,
                                     bsize)) != AFP_OK ) {
@@ -906,7 +1284,7 @@ VolSpace    *xbfree, *xbtotal;
             goto getvolspace_done;
         }
     }
-#endif /* ! NO_QUOTA_SUPPORT */
+#endif
     vol->v_flags = ( ~AFPVOL_GVSMASK & vol->v_flags ) | AFPVOL_USTATFS;
 
 getvolspace_done:
@@ -915,6 +1293,29 @@ getvolspace_done:
     return( AFP_OK );
 }
 
+/* ----------------------- 
+ * set volume creation date
+ * avoid duplicate, well at least it tries
+*/
+static void vol_setdate(u_int16_t id, struct adouble *adp, time_t date)
+{
+    struct vol *volume;
+    struct vol *vol = Volumes;
+
+    for ( volume = Volumes; volume; volume = volume->v_next ) {
+        if (volume->v_vid == id) {
+            vol = volume;
+        }
+        else if (AD_DATE_FROM_UNIX(date) == volume->v_ctime) {
+            date = date+1;
+            volume = Volumes; /* restart */
+        }
+    }
+    vol->v_ctime = AD_DATE_FROM_UNIX(date);
+    ad_setdate(adp, AD_DATE_CREATE | AD_DATE_UNIX, date);
+}
+
+/* ----------------------- */
 static int getvolparams( bitmap, vol, st, buf, buflen )
 u_int16_t      bitmap;
 struct vol     *vol;
@@ -935,24 +1336,33 @@ int              *buflen;
      * For MacOS8.x support we need to create the
      * .Parent file here if it doesn't exist. */
 
-    memset(&ad, 0, sizeof(ad));
+    ad_init(&ad, vol->v_adouble, vol->v_ad_options);
     if ( ad_open( vol->v_path, vol_noadouble(vol) |
                   ADFLAGS_HF|ADFLAGS_DIR, O_RDWR | O_CREAT,
                   0666, &ad) < 0 ) {
         isad = 0;
+        vol->v_ctime = AD_DATE_FROM_UNIX(st->st_mtime);
 
-    } else if (ad_getoflags( &ad, ADFLAGS_HF ) & O_CREAT) {
+    } else if (ad_get_HF_flags( &ad ) & O_CREAT) {
         slash = strrchr( vol->v_path, '/' );
         if(slash)
             slash++;
         else
             slash = vol->v_path;
-
-        ad_setentrylen( &ad, ADEID_NAME, strlen( slash ));
-        memcpy(ad_entry( &ad, ADEID_NAME ), slash,
+        if (ad_getentryoff(&ad, ADEID_NAME)) {
+            ad_setentrylen( &ad, ADEID_NAME, strlen( slash ));
+            memcpy(ad_entry( &ad, ADEID_NAME ), slash,
                ad_getentrylen( &ad, ADEID_NAME ));
+        }
+        vol_setdate(vol->v_vid, &ad, st->st_mtime);
         ad_flush(&ad, ADFLAGS_HF);
     }
+    else {
+        if (ad_getdate(&ad, AD_DATE_CREATE, &aint) < 0)
+            vol->v_ctime = AD_DATE_FROM_UNIX(st->st_mtime);
+        else 
+            vol->v_ctime = aint;
+    }
 
     if (( bitmap & ( (1<<VOLPBIT_BFREE)|(1<<VOLPBIT_BTOTAL) |
                      (1<<VOLPBIT_XBFREE)|(1<<VOLPBIT_XBTOTAL) |
@@ -976,21 +1386,24 @@ int              *buflen;
         switch ( bit ) {
         case VOLPBIT_ATTR :
             ashort = 0;
-#ifdef CNID_DB
-            if (0 == (vol->v_flags & AFPVOL_NOFILEID)) {
+            if (0 == (vol->v_flags & AFPVOL_NOFILEID) && vol->v_cdb != NULL &&
+                           (vol->v_cdb->flags & CNID_FLAG_PERSISTENT)) {
                 ashort = VOLPBIT_ATTR_FILEID;
             }
-#endif /* CNID_DB */
             /* check for read-only.
              * NOTE: we don't actually set the read-only flag unless
              *       it's passed in that way as it's possible to mount
              *       a read-write filesystem under a read-only one. */
             if ((vol->v_flags & AFPVOL_RO) ||
-                    ((utime(vol->v_path, NULL) < 0) && (errno == EROFS)))
+                    ((utime(vol->v_path, NULL) < 0) && (errno == EROFS))) {
                 ashort |= VOLPBIT_ATTR_RO;
-#ifdef WITH_CATSEARCH
-                ashort |= VOLPBIT_ATTR_CATSEARCH;
-#endif
+            }
+            ashort |= VOLPBIT_ATTR_CATSEARCH;
+            if (afp_version >= 30) {
+                ashort |= VOLPBIT_ATTR_UTF8;
+               if (vol->v_flags & AFPVOL_UNIX_PRIV)
+                   ashort |= VOLPBIT_ATTR_UNIXPRIV;
+            }
             ashort = htons(ashort);
             memcpy(data, &ashort, sizeof( ashort ));
             data += sizeof( ashort );
@@ -1003,19 +1416,16 @@ int             *buflen;
             break;
 
         case VOLPBIT_CDATE :
-            if (!isad || (ad_getdate(&ad, AD_DATE_CREATE, &aint) < 0))
-                aint = AD_DATE_FROM_UNIX(st->st_mtime);
+            aint = vol->v_ctime;
             memcpy(data, &aint, sizeof( aint ));
             data += sizeof( aint );
             break;
 
         case VOLPBIT_MDATE :
-            if ( st->st_mtime > vol->v_time ) {
-                vol->v_time = st->st_mtime;
-                aint = AD_DATE_FROM_UNIX(st->st_mtime);
-            } else {
-                aint = AD_DATE_FROM_UNIX(vol->v_time);
+            if ( st->st_mtime > vol->v_mtime ) {
+                vol->v_mtime = st->st_mtime;
             }
+            aint = AD_DATE_FROM_UNIX(vol->v_mtime);
             memcpy(data, &aint, sizeof( aint ));
             data += sizeof( aint );
             break;
@@ -1089,9 +1499,14 @@ int              *buflen;
     if ( nameoff ) {
         ashort = htons( data - buf );
         memcpy(nameoff, &ashort, sizeof( ashort ));
-        aint = strlen( vol->v_name );
+        /* name is always in mac charset, FIXME mangle if length > 27 char */
+       aint = ucs2_to_charset( vol->v_maccharset, vol->v_name, data+1, 255);
+       if ( aint <= 0 ) {
+           *buflen = 0;
+            return AFPERR_MISC;
+        }
+               
         *data++ = aint;
-        memcpy(data, vol->v_name, aint );
         data += aint;
     }
     if ( isad ) {
@@ -1101,33 +1516,129 @@ int            *buflen;
     return( AFP_OK );
 }
 
+/* ------------------------- */
+static int stat_vol(u_int16_t bitmap, struct vol *vol, char *rbuf, int *rbuflen)
+{
+    struct stat        st;
+    int                buflen, ret;
+
+    if ( stat( vol->v_path, &st ) < 0 ) {
+        *rbuflen = 0;
+        return( AFPERR_PARAM );
+    }
+    /* save the volume device number */
+    vol->v_dev = st.st_dev;
+
+    buflen = *rbuflen - sizeof( bitmap );
+    if (( ret = getvolparams( bitmap, vol, &st,
+                              rbuf + sizeof( bitmap ), &buflen )) != AFP_OK ) {
+        *rbuflen = 0;
+        return( ret );
+    }
+    *rbuflen = buflen + sizeof( bitmap );
+    bitmap = htons( bitmap );
+    memcpy(rbuf, &bitmap, sizeof( bitmap ));
+    return( AFP_OK );
+
+}
+
+/* ------------------------------- */
+void load_volumes(AFPObj *obj)
+{
+    struct passwd      *pwent;
+
+    if (Volumes) {
+        int changed = 0;
+        
+        /* check files date */
+        if (obj->options.defaultvol.loaded) {
+            changed = volfile_changed(&obj->options.defaultvol);
+        }
+        if (obj->options.systemvol.loaded) {
+            changed |= volfile_changed(&obj->options.systemvol);
+        }
+        if (obj->options.uservol.loaded) {
+            changed |= volfile_changed(&obj->options.uservol);
+        }
+        if (!changed)
+            return;
+        
+        free_extmap();
+        free_volumes();
+    }
+    
+    pwent = getpwnam(obj->username);
+    if ( (obj->options.flags & OPTION_USERVOLFIRST) == 0 ) {
+        readvolfile(obj, &obj->options.systemvol, NULL, 0, pwent);
+    }
 
+    if ((*obj->username == '\0') || (obj->options.flags & OPTION_NOUSERVOL)) {
+        readvolfile(obj, &obj->options.defaultvol, NULL, 1, pwent);
+    } else if (pwent) {
+        /*
+        * Read user's AppleVolumes or .AppleVolumes file
+        * If neither are readable, read the default volumes file. if
+        * that doesn't work, create a user share.
+        */
+        if (obj->options.uservol.name) {
+            free(obj->options.uservol.name);
+        }
+        obj->options.uservol.name = strdup(pwent->pw_dir);
+        if ( readvolfile(obj, &obj->options.uservol,    "AppleVolumes", 1, pwent) < 0 &&
+                readvolfile(obj, &obj->options.uservol, ".AppleVolumes", 1, pwent) < 0 &&
+                readvolfile(obj, &obj->options.uservol, "applevolumes", 1, pwent) < 0 &&
+                readvolfile(obj, &obj->options.uservol, ".applevolumes", 1, pwent) < 0 &&
+                obj->options.defaultvol.name != NULL ) {
+            if (readvolfile(obj, &obj->options.defaultvol, NULL, 1, pwent) < 0)
+                creatvol(obj, pwent, pwent->pw_dir, NULL, NULL, 1);
+        }
+    }
+    if ( obj->options.flags & OPTION_USERVOLFIRST ) {
+        readvolfile(obj, &obj->options.systemvol, NULL, 0, pwent );
+    }
+}
 
+/* ------------------------------- */
 int afp_getsrvrparms(obj, ibuf, ibuflen, rbuf, rbuflen )
 AFPObj      *obj;
-char   *ibuf, *rbuf;
-int    ibuflen, *rbuflen;
+char   *ibuf _U_, *rbuf;
+int    ibuflen _U_, *rbuflen;
 {
     struct timeval     tv;
     struct stat                st;
     struct vol         *volume;
     char       *data;
-    int                        vcnt, len;
-
+    char               *namebuf;
+    int                        vcnt;
+    size_t             len;
 
-    if (!volumes)
-        load_volumes(obj);
+    load_volumes(obj);
 
     data = rbuf + 5;
-    for ( vcnt = 0, volume = volumes; volume; volume = volume->v_next ) {
-        if ( stat( volume->v_path, &st ) < 0 ) {
-            LOG(log_info, logtype_afpd, "afp_getsrvrparms: stat %s: %s",
-                volume->v_path, strerror(errno) );
-            continue;          /* can't access directory */
+    for ( vcnt = 0, volume = Volumes; volume; volume = volume->v_next ) {
+        if (!(volume->v_flags & AFPVOL_NOSTAT)) {
+            struct maccess ma;
+
+            if ( stat( volume->v_path, &st ) < 0 ) {
+                LOG(log_info, logtype_afpd, "afp_getsrvrparms(%s): stat: %s",
+                        volume->v_path, strerror(errno) );
+                continue;              /* can't access directory */
+            }
+            if (!S_ISDIR(st.st_mode)) {
+                continue;              /* not a dir */
+            }
+            accessmode(volume->v_path, &ma, NULL, &st);
+            if ((ma.ma_user & (AR_UREAD | AR_USEARCH)) != (AR_UREAD | AR_USEARCH)) {
+                continue;   /* no r-x access */
+            }
         }
-        if (!S_ISDIR(st.st_mode)) {
-            continue;          /* not a dir */
+        if (volume->v_hide) {
+            continue;          /* config file changed but the volume was mounted */
         }
+       len = ucs2_to_charset_allocate((utf8_encoding()?CH_UTF8_MAC:obj->options.maccharset),
+                                       &namebuf, volume->v_name);
+       if (len == (size_t)-1)
+               continue;
 
         /* set password bit if there's a volume password */
         *data = (volume->v_password) ? AFPSRVR_PASSWD : 0;
@@ -1138,18 +1649,19 @@ int     ibuflen, *rbuflen;
            completely worked this out, but it's related to booting
            from the server.  Support for that function is a ways
            off.. <shirsch@ibm.net> */
-        *data++ |= (volume->v_flags & AFPVOL_A2VOL) ? AFPSRVR_CONFIGINFO : 0;
-        len = strlen( volume->v_name );
+        *data |= (volume->v_flags & AFPVOL_A2VOL) ? AFPSRVR_CONFIGINFO : 0;
+        *data++ |= 0; /* UNIX PRIVS BIT ..., OSX doesn't seem to use it, so we don't either */
         *data++ = len;
-        memcpy(data, volume->v_name, len );
+        memcpy(data, namebuf, len );
         data += len;
+       free(namebuf);
         vcnt++;
     }
 
     *rbuflen = data - rbuf;
     data = rbuf;
     if ( gettimeofday( &tv, 0 ) < 0 ) {
-        LOG(log_error, logtype_afpd, "afp_getsrvrparms: gettimeofday: %s", strerror(errno) );
+        LOG(log_error, logtype_afpd, "afp_getsrvrparms(%s): gettimeofday: %s", volume->v_path, strerror(errno) );
         *rbuflen = 0;
         return AFPERR_PARAM;
     }
@@ -1160,125 +1672,286 @@ int   ibuflen, *rbuflen;
     return( AFP_OK );
 }
 
+/* ------------------------- 
+ * we are the user here
+*/
 int afp_openvol(obj, ibuf, ibuflen, rbuf, rbuflen )
 AFPObj      *obj;
 char   *ibuf, *rbuf;
-int            ibuflen, *rbuflen;
+int            ibuflen _U_, *rbuflen;
 {
     struct stat        st;
     char       *volname;
-#ifndef CNID_DB
-    char *p;
-#endif /* CNID_DB */
+    char        *p;
     struct vol *volume;
     struct dir *dir;
-    int                len, ret, buflen;
+    int                len, ret;
+    size_t     namelen;
     u_int16_t  bitmap;
+    char        path[ MAXPATHLEN + 1];
+    char        *vol_uname;
+    char        *vol_mname;
 
     ibuf += 2;
     memcpy(&bitmap, ibuf, sizeof( bitmap ));
     bitmap = ntohs( bitmap );
     ibuf += sizeof( bitmap );
     if (( bitmap & (1<<VOLPBIT_VID)) == 0 ) {
-        ret = AFPERR_BITMAP;
-        goto openvol_err;
+        *rbuflen = 0;
+        return AFPERR_BITMAP;
     }
 
     len = (unsigned char)*ibuf++;
     volname = obj->oldtmp;
-    memcpy(volname, ibuf, len );
-    *(volname +  len) = '\0';
+    namelen = convert_string( (utf8_encoding()?CH_UTF8_MAC:obj->options.maccharset), CH_UCS2,
+                              ibuf, len, volname, sizeof(obj->oldtmp));
+    if ( namelen <= 0){
+        *rbuflen = 0;
+        return AFPERR_PARAM;
+    }
+
     ibuf += len;
     if ((len + 1) & 1) /* pad to an even boundary */
         ibuf++;
 
-    if (!volumes)
-        load_volumes(obj);
+    load_volumes(obj);
 
-    for ( volume = volumes; volume; volume = volume->v_next ) {
-        if ( strcasecmp( volname, volume->v_name ) == 0 ) {
+    for ( volume = Volumes; volume; volume = volume->v_next ) {
+        if ( strcasecmp_w( (ucs2_t*) volname, volume->v_name ) == 0 ) {
             break;
         }
     }
 
     if ( volume == NULL ) {
-        ret = AFPERR_PARAM;
-        goto openvol_err;
+        *rbuflen = 0;
+        return AFPERR_PARAM;
     }
 
     /* check for a volume password */
-    if (volume->v_password &&
-            strncmp(ibuf, volume->v_password, VOLPASSLEN)) {
-        ret = AFPERR_ACCESS;
-        goto openvol_err;
+    if (volume->v_password && strncmp(ibuf, volume->v_password, VOLPASSLEN)) {
+        *rbuflen = 0;
+        return AFPERR_ACCESS;
+    }
+
+    if (( volume->v_flags & AFPVOL_OPEN  ) ) {
+        /* the volume is already open */
+#ifdef FORCE_UIDGID
+        set_uidgid ( volume );
+#endif
+        return stat_vol(bitmap, volume, rbuf, rbuflen);
+    }
+
+    /* initialize volume variables
+     * FIXME file size
+    */
+    if (afp_version >= 30) {
+        volume->max_filename = 255;
+    }
+    else {
+        volume->max_filename = MACFILELEN;
     }
 
-    if (( volume->v_flags & AFPVOL_OPEN  ) == 0 ) {
-        if ((dir = dirnew(strlen(volume->v_name) + 1)) == NULL) {
-            LOG(log_error, logtype_afpd, "afp_openvol: malloc: %s", strerror(errno) );
+    volume->v_dir = volume->v_root = NULL;
+
+    volume->v_flags |= AFPVOL_OPEN;
+    volume->v_cdb = NULL;  
+
+    if (volume->v_root_preexec) {
+       if ((ret = afprun(1, volume->v_root_preexec, NULL)) && volume->v_root_preexec_close) {
+            LOG(log_error, logtype_afpd, "afp_openvol(%s): root preexec : %d", volume->v_path, ret );
             ret = AFPERR_MISC;
             goto openvol_err;
-        }
-        dir->d_did = DIRDID_ROOT;
-        dir->d_color = DIRTREE_COLOR_BLACK; /* root node is black */
-        strcpy( dir->d_name, volume->v_name );
-        volume->v_dir = volume->v_root = dir;
-        volume->v_flags |= AFPVOL_OPEN;
+       }
     }
+
 #ifdef FORCE_UIDGID
     set_uidgid ( volume );
-#endif /* FORCE_UIDGID */
+#endif
+
+    if (volume->v_preexec) {
+       if ((ret = afprun(0, volume->v_preexec, NULL)) && volume->v_preexec_close) {
+            LOG(log_error, logtype_afpd, "afp_openvol(%s): preexec : %d", volume->v_path, ret );
+            ret = AFPERR_MISC;
+            goto openvol_err;
+       }
+    }
 
     if ( stat( volume->v_path, &st ) < 0 ) {
         ret = AFPERR_PARAM;
         goto openvol_err;
     }
 
-    buflen = *rbuflen - sizeof( bitmap );
-    if (( ret = getvolparams( bitmap, volume, &st,
-                              rbuf + sizeof(bitmap), &buflen )) != AFP_OK ) {
+    if ( chdir( volume->v_path ) < 0 ) {
+        ret = AFPERR_PARAM;
         goto openvol_err;
     }
-    *rbuflen = buflen + sizeof( bitmap );
-    bitmap = htons( bitmap );
-    memcpy(rbuf, &bitmap, sizeof( bitmap ));
 
-    if ( chdir( volume->v_path ) < 0 ) {
-        ret = AFPERR_PARAM;
+    len = convert_string_allocate( CH_UCS2, (utf8_encoding()?CH_UTF8_MAC:obj->options.maccharset),
+                                      volume->v_name, namelen, &vol_mname);
+    if ( !vol_mname || len <= 0) {
+        ret = AFPERR_MISC;
         goto openvol_err;
     }
-    curdir = volume->v_dir;
+    
+    if ( NULL == getcwd(path, MAXPATHLEN)) {
+        /* shouldn't be fatal but it will fail later */
+        LOG(log_error, logtype_afpd, "afp_openvol(%s): volume pathlen too long", volume->v_path);
+        ret = AFPERR_MISC;
+        goto openvol_err;
+    }        
+    
+    if ((vol_uname = strrchr(path, '/')) == NULL)
+         vol_uname = path;
+    else if (*(vol_uname + 1) != '\0')
+         vol_uname++;
+       
+    if ((dir = dirnew(vol_mname, vol_uname) ) == NULL) {
+       free(vol_mname);
+        LOG(log_error, logtype_afpd, "afp_openvol(%s): malloc: %s", volume->v_path, strerror(errno) );
+        ret = AFPERR_MISC;
+        goto openvol_err;
+    }
+    free(vol_mname);
 
-#ifdef CNID_DB
+    dir->d_did = DIRDID_ROOT;
+    dir->d_color = DIRTREE_COLOR_BLACK; /* root node is black */
+    volume->v_dir = volume->v_root = dir;
+
+    curdir = volume->v_dir;
+    if (volume->v_cnidscheme == NULL) {
+        volume->v_cnidscheme = strdup(DEFAULT_CNID_SCHEME);
+        LOG(log_warning, logtype_afpd, "Warning: No CNID scheme for volume %s. Using default.",
+               volume->v_path);
+    }
     if (volume->v_dbpath)
-        volume->v_db = cnid_open (volume->v_dbpath, volume->v_umask);
-    if (volume->v_db == NULL)
-        volume->v_db = cnid_open (volume->v_path, volume->v_umask);
-#endif /* CNID_DB */
-
-#ifndef CNID_DB
-    /*
-     * If you mount a volume twice, the second time the trash appears on
-     * the desk-top.  That's because the Mac remembers the DID for the
-     * trash (even for volumes in different zones, on different servers).
-     * Just so this works better, we prime the DID cache with the trash,
-     * fixing the trash at DID 17.
-     */
-    p = Trash;
-    cname( volume, volume->v_dir, &p );
-#endif /* CNID_DB */
+        volume->v_cdb = cnid_open (volume->v_dbpath, volume->v_umask, volume->v_cnidscheme, (volume->v_flags & AFPVOL_NODEV));
+    else
+        volume->v_cdb = cnid_open (volume->v_path, volume->v_umask, volume->v_cnidscheme, (volume->v_flags & AFPVOL_NODEV));
+    if (volume->v_cdb == NULL) {
+        LOG(log_error, logtype_afpd, "Fatal error: cannot open CNID or invalid CNID backend for %s: %s", 
+           volume->v_path, volume->v_cnidscheme);
+        ret = AFPERR_MISC;
+        goto openvol_err;
+    }
 
-    return( AFP_OK );
+    /* Codepages */
+
+    if (!volume->v_volcodepage)
+       volume->v_volcodepage = strdup("UTF8");
+
+    if ( (charset_t) -1 == ( volume->v_volcharset = add_charset(volume->v_volcodepage)) ) {
+       LOG (log_error, logtype_afpd, "Setting codepage %s as volume codepage failed", volume->v_volcodepage);
+       ret = AFPERR_MISC;
+       goto openvol_err;
+    }
+
+    if ( NULL == ( volume->v_vol = find_charset_functions(volume->v_volcodepage)) || volume->v_vol->flags & CHARSET_ICONV ) {
+       LOG (log_warning, logtype_afpd, "WARNING: volume encoding %s is *not* supported by netatalk, expect problems !!!!", volume->v_volcodepage);
+    }  
+
+    if (!volume->v_maccodepage)
+       volume->v_maccodepage = strdup(obj->options.maccodepage);
+
+    if ( (charset_t) -1 == ( volume->v_maccharset = add_charset(volume->v_maccodepage)) ) {
+       LOG (log_error, logtype_afpd, "Setting codepage %s as mac codepage failed", volume->v_maccodepage);
+       ret = AFPERR_MISC;
+       goto openvol_err;
+    }
+
+    if ( NULL == ( volume->v_mac = find_charset_functions(volume->v_maccodepage)) || ! (volume->v_mac->flags & CHARSET_CLIENT) ) {
+       LOG (log_error, logtype_afpd, "Fatal error: mac charset %s not supported", volume->v_maccodepage);
+       ret = AFPERR_MISC;
+       goto openvol_err;
+    }  
+
+    ret  = stat_vol(bitmap, volume, rbuf, rbuflen);
+    if (ret == AFP_OK) {
+
+        if (!(volume->v_flags & AFPVOL_RO)) {
+            handle_special_folders( volume );
+            savevoloptions( volume);
+        }
+
+        /*
+         * If you mount a volume twice, the second time the trash appears on
+         * the desk-top.  That's because the Mac remembers the DID for the
+         * trash (even for volumes in different zones, on different servers).
+         * Just so this works better, we prime the DID cache with the trash,
+         * fixing the trash at DID 17.
+         * FIXME (RL): should it be done inside a CNID backend ? (always returning Trash DID when asked) ?
+         */
+        if ((volume->v_cdb->flags & CNID_FLAG_PERSISTENT)) {
+
+            /* FIXME find db time stamp */
+            if (cnid_getstamp(volume->v_cdb, volume->v_stamp, sizeof(volume->v_stamp)) < 0) {
+               LOG (log_error, logtype_afpd, 
+                     "afp_openvol(%s): Fatal error: Unable to get stamp value from CNID backend",
+                     volume->v_path);
+               ret = AFPERR_MISC;
+               goto openvol_err;
+           }
+       }
+       else {
+            p = Trash;
+            cname( volume, volume->v_dir, &p );
+        }
+        return( AFP_OK );
+    }
 
 openvol_err:
+    if (volume->v_dir) {
+        dirfree( volume->v_dir );
+        volume->v_dir = volume->v_root = NULL;
+    }
+
+    volume->v_flags &= ~AFPVOL_OPEN;
+    if (volume->v_cdb != NULL) {
+        cnid_close(volume->v_cdb);
+        volume->v_cdb = NULL;
+    }
     *rbuflen = 0;
     return ret;
 }
 
+/* ------------------------- */
+static void closevol(struct vol        *vol)
+{
+    if (!vol)
+        return;
+
+    dirfree( vol->v_root );
+    vol->v_dir = NULL;
+    if (vol->v_cdb != NULL) {
+        cnid_close(vol->v_cdb);
+        vol->v_cdb = NULL;
+    }
+
+    if (vol->v_postexec) {
+       afprun(0, vol->v_postexec, NULL);
+    }
+    if (vol->v_root_postexec) {
+       afprun(1, vol->v_root_postexec, NULL);
+    }
+}
+
+/* ------------------------- */
+void close_all_vol(void)
+{
+    struct vol *ovol;
+    curdir = NULL;
+    for ( ovol = Volumes; ovol; ovol = ovol->v_next ) {
+        if ( (ovol->v_flags & AFPVOL_OPEN) ) {
+            ovol->v_flags &= ~AFPVOL_OPEN;
+            closevol(ovol);
+        }
+    }
+}
+
+/* ------------------------- */
 int afp_closevol(obj, ibuf, ibuflen, rbuf, rbuflen )
-AFPObj      *obj;
-char   *ibuf, *rbuf;
-int            ibuflen, *rbuflen;
+AFPObj      *obj _U_;
+char   *ibuf, *rbuf _U_;
+int            ibuflen _U_, *rbuflen;
 {
     struct vol *vol, *ovol;
     u_int16_t  vid;
@@ -1286,13 +1959,13 @@ int             ibuflen, *rbuflen;
     *rbuflen = 0;
     ibuf += 2;
     memcpy(&vid, ibuf, sizeof( vid ));
-    if (( vol = getvolbyvid( vid )) == NULL ) {
+    if (NULL == ( vol = getvolbyvid( vid )) ) {
         return( AFPERR_PARAM );
     }
 
     vol->v_flags &= ~AFPVOL_OPEN;
-    for ( ovol = volumes; ovol; ovol = ovol->v_next ) {
-        if ( ovol->v_flags & AFPVOL_OPEN ) {
+    for ( ovol = Volumes; ovol; ovol = ovol->v_next ) {
+        if ( (ovol->v_flags & AFPVOL_OPEN) ) {
             break;
         }
     }
@@ -1303,20 +1976,22 @@ int             ibuflen, *rbuflen;
         }
     }
 
-    dirfree( vol->v_root );
-    vol->v_dir = NULL;
-#ifdef CNID_DB
-    cnid_close(vol->v_db);
-    vol->v_db = NULL;
-#endif /* CNID_DB */
+    closevol(vol);
+    if (vol->v_deleted) {
+       showvol(vol->v_name);
+       volume_free(vol);
+       volume_unlink(vol);
+       free(vol);
+    }
     return( AFP_OK );
 }
 
+/* ------------------------- */
 struct vol *getvolbyvid(const u_int16_t vid )
 {
     struct vol *vol;
 
-    for ( vol = volumes; vol; vol = vol->v_next ) {
+    for ( vol = Volumes; vol; vol = vol->v_next ) {
         if ( vid == vol->v_vid ) {
             break;
         }
@@ -1344,27 +2019,28 @@ struct extmap *getextmap(const char *path)
     char         *p;
     struct extmap *em;
 
-    if (( p = strrchr( path, '.' )) == NULL ) {
-        return( defextmap );
+    if (NULL == ( p = strrchr( path, '.' )) ) {
+        return( Defextmap );
     }
     p++;
-    if (!*p || !extmap_cnt) {
-        return( defextmap );
+    if (!*p || !Extmap_cnt) {
+        return( Defextmap );
     }
-    em = bsearch(p, extmap, extmap_cnt, sizeof(struct extmap), ext_cmp_key);
+    em = bsearch(p, Extmap, Extmap_cnt, sizeof(struct extmap), ext_cmp_key);
     if (em) {
         return( em );
     } else {
-        return( defextmap );
+        return( Defextmap );
     }
 }
 
+/* ------------------------- */
 struct extmap *getdefextmap(void)
 {
-    return( defextmap );
+    return( Defextmap );
 }
 
-/*
+/* --------------------------
    poll if a volume is changed by other processes.
 */
 int  pollvoltime(obj)
@@ -1380,11 +2056,12 @@ AFPObj *obj;
     if ( gettimeofday( &tv, 0 ) < 0 ) 
          return 0;
 
-    for ( vol = volumes; vol; vol = vol->v_next ) {
-        if ( (vol->v_flags & AFPVOL_OPEN)  && vol->v_time + 30 < tv.tv_sec) {
-            if ( !stat( vol->v_path, &st ) && vol->v_time != st.st_mtime ) {
-                vol->v_time = st.st_mtime;
-                obj->attention(obj->handle, AFPATTN_NOTIFY | AFPATTN_VOLCHANGED);
+    for ( vol = Volumes; vol; vol = vol->v_next ) {
+        if ( (vol->v_flags & AFPVOL_OPEN)  && vol->v_mtime + 30 < tv.tv_sec) {
+            if ( !stat( vol->v_path, &st ) && vol->v_mtime != st.st_mtime ) {
+                vol->v_mtime = st.st_mtime;
+                if (!obj->attention(obj->handle, AFPATTN_NOTIFY | AFPATTN_VOLCHANGED))
+                    return -1;
                 return 1;
             }
         }
@@ -1392,20 +2069,21 @@ AFPObj *obj;
     return 0;
 }
 
+/* ------------------------- */
 void setvoltime(obj, vol )
 AFPObj *obj;
 struct vol     *vol;
 {
     struct timeval     tv;
 
-    /* just looking at vol->v_time is broken seriously since updates
+    /* just looking at vol->v_mtime is broken seriously since updates
      * from other users afpd processes never are seen.
      * This is not the most elegant solution (a shared memory between
      * the afpd processes would come closer)
      * [RS] */
 
     if ( gettimeofday( &tv, 0 ) < 0 ) {
-        LOG(log_error, logtype_afpd, "setvoltime: gettimeofday: %s", strerror(errno) );
+        LOG(log_error, logtype_afpd, "setvoltime(%s): gettimeofday: %s", vol->v_path, strerror(errno) );
         return;
     }
     if( utime( vol->v_path, NULL ) < 0 ) {
@@ -1415,22 +2093,22 @@ struct vol      *vol;
     }
 
     /* a little granularity */
-    if (vol->v_time < tv.tv_sec) {
-        vol->v_time = tv.tv_sec;
+    if (vol->v_mtime < tv.tv_sec) {
+        vol->v_mtime = tv.tv_sec;
+        /* or finder doesn't update free space */
         if (afp_version > 21 && obj->options.server_notif) {
             obj->attention(obj->handle, AFPATTN_NOTIFY | AFPATTN_VOLCHANGED);
         }
     }
 }
 
+/* ------------------------- */
 int afp_getvolparams(obj, ibuf, ibuflen, rbuf, rbuflen )
-AFPObj      *obj;
+AFPObj      *obj _U_;
 char   *ibuf, *rbuf;
-int            ibuflen, *rbuflen;
+int            ibuflen _U_, *rbuflen;
 {
-    struct stat        st;
     struct vol *vol;
-    int                buflen, ret;
     u_int16_t  vid, bitmap;
 
     ibuf += 2;
@@ -1439,32 +2117,19 @@ int             ibuflen, *rbuflen;
     memcpy(&bitmap, ibuf, sizeof( bitmap ));
     bitmap = ntohs( bitmap );
 
-    if (( vol = getvolbyvid( vid )) == NULL ) {
-        *rbuflen = 0;
-        return( AFPERR_PARAM );
-    }
-
-    if ( stat( vol->v_path, &st ) < 0 ) {
+    if (NULL == ( vol = getvolbyvid( vid )) ) {
         *rbuflen = 0;
         return( AFPERR_PARAM );
     }
 
-    buflen = *rbuflen - sizeof( bitmap );
-    if (( ret = getvolparams( bitmap, vol, &st,
-                              rbuf + sizeof( bitmap ), &buflen )) != AFP_OK ) {
-        *rbuflen = 0;
-        return( ret );
-    }
-    *rbuflen = buflen + sizeof( bitmap );
-    bitmap = htons( bitmap );
-    memcpy(rbuf, &bitmap, sizeof( bitmap ));
-    return( AFP_OK );
+    return stat_vol(bitmap, vol, rbuf, rbuflen);
 }
 
+/* ------------------------- */
 int afp_setvolparams(obj, ibuf, ibuflen, rbuf, rbuflen )
-AFPObj      *obj;
-char   *ibuf, *rbuf;
-int            ibuflen, *rbuflen;
+AFPObj      *obj _U_;
+char   *ibuf, *rbuf _U_;
+int            ibuflen _U_, *rbuflen;
 {
     struct adouble ad;
     struct vol *vol;
@@ -1484,14 +2149,14 @@ int             ibuflen, *rbuflen;
         return( AFPERR_PARAM );
     }
 
-    if (vol->v_flags & AFPVOL_RO)
+    if ((vol->v_flags & AFPVOL_RO))
         return AFPERR_VLOCK;
 
     /* we can only set the backup date. */
-    if (bitmap != VOLPBIT_BDATE)
+    if (bitmap != (1 << VOLPBIT_BDATE))
         return AFPERR_BITMAP;
 
-    memset(&ad, 0, sizeof(ad));
+    ad_init(&ad, vol->v_adouble, vol->v_ad_options);
     if ( ad_open( vol->v_path, ADFLAGS_HF|ADFLAGS_DIR, O_RDWR,
                   0666, &ad) < 0 ) {
         if (errno == EROFS)
@@ -1507,7 +2172,7 @@ int               ibuflen, *rbuflen;
     return( AFP_OK );
 }
 
-
+/* ------------------------- */
 int wincheck(const struct vol *vol, const char *path)
 {
     int len;
@@ -1532,3 +2197,216 @@ int wincheck(const struct vol *vol, const char *path)
     /* everything else is okay */
     return 1;
 }
+
+
+/*
+ * precreate a folder 
+ * this is only intended for folders in the volume root 
+ * It will *not* work if the folder name contains extended characters 
+ */
+static int create_special_folder (const struct vol *vol, const struct _special_folder *folder)
+{
+       char            *p,*q,*r;
+       struct adouble  ad;
+       u_int16_t       attr;
+       struct stat     st;
+       int             ret;
+
+
+       p = (char *) malloc ( strlen(vol->v_path)+strlen(folder->name)+2);
+       if ( p == NULL) {
+               LOG(log_error, logtype_afpd,"malloc failed");
+               exit (EXITERR_SYS);
+       }
+
+       q=strdup(folder->name);
+       if ( q == NULL) {
+               LOG(log_error, logtype_afpd,"malloc failed");
+               exit (EXITERR_SYS);
+       }
+
+       strcpy(p, vol->v_path);
+       strcat(p, "/");
+
+       r=q;
+       while (*r) {
+               if ((vol->v_casefold & AFPVOL_MTOUUPPER))
+                       *r=toupper(*r);
+               else if ((vol->v_casefold & AFPVOL_MTOULOWER))
+                       *r=tolower(*r);
+               r++;
+       }
+       strcat(p, q);
+
+       if ( (ret = stat( p, &st )) < 0 ) {
+               if (folder->precreate) {
+                   if (ad_mkdir(p, folder->mode)) {
+                       LOG(log_debug, logtype_afpd,"Creating '%s' failed in %s: %s", p, vol->v_path, strerror(errno));
+                       free(p);
+                       free(q);
+                       return -1;
+                    }
+                   ret = 0;
+               }
+       }
+
+       if ( !ret && folder->hide) {
+               /* Hide it */
+               ad_init(&ad, vol->v_adouble, vol->v_ad_options);
+               if (ad_open( p, vol_noadouble(vol) | ADFLAGS_HF|ADFLAGS_DIR,
+                       O_RDWR|O_CREAT, 0666, &ad) < 0) {
+                       free (p);
+                       free(q);
+                       return (-1);
+               }
+               if ((ad_get_HF_flags( &ad ) & O_CREAT) ) {
+                   if (ad_getentryoff(&ad, ADEID_NAME)) {
+                       ad_setentrylen( &ad, ADEID_NAME, strlen(folder->name));
+                       memcpy(ad_entry( &ad, ADEID_NAME ), folder->name,
+                              ad_getentrylen( &ad, ADEID_NAME ));
+                   }
+               }
+               ad_getattr(&ad, &attr);
+               attr |= htons( ntohs( attr ) | ATTRBIT_INVISIBLE );
+               ad_setattr(&ad, attr);
+
+               /* do the same with the finder info */
+               if (ad_entry(&ad, ADEID_FINDERI)) {
+                       memcpy(&attr, ad_entry(&ad, ADEID_FINDERI) + FINDERINFO_FRFLAGOFF, sizeof(attr));
+                       attr   |= htons(FINDERINFO_INVISIBLE);
+                       memcpy(ad_entry(&ad, ADEID_FINDERI) + FINDERINFO_FRFLAGOFF,&attr, sizeof(attr));
+               }
+
+               ad_flush( &ad, ADFLAGS_HF );
+               ad_close( &ad, ADFLAGS_HF );
+       }
+       free(p);
+       free(q);
+       return 0;
+}
+
+static void handle_special_folders (const struct vol * vol)
+{
+       const _special_folder *p = &special_folders[0];
+
+       if ((vol->v_flags & AFPVOL_RO))
+               return;
+
+        for (; p->name != NULL; p++) {
+               create_special_folder (vol, p);
+       }
+}
+
+/*
+ * Save the volume options to a file, used by
+ * shell utilities.
+ * Writing the file everytime a volume is opened is
+ * unnecessary, but it shouldn't hurt much.
+ */
+static int savevoloptions (const struct vol *vol)
+{
+    char buf[16348];
+    char item[MAXPATHLEN];
+    int fd;
+    int ret = 0;
+    struct flock lock;
+    const _vol_opt_name *op = &vol_opt_names[0];
+    const _vol_opt_name *cf = &vol_opt_casefold[0];
+
+    strlcpy (item, vol->v_path, sizeof(item));
+    strlcat (item, "/.AppleDesktop/", sizeof(item));
+    strlcat (item, VOLINFOFILE, sizeof(item));
+
+    if ((fd = open( item, O_RDWR | O_CREAT , 0666)) <0 ) {
+        LOG(log_debug, logtype_afpd,"Error opening %s: %s", item, strerror(errno));
+        return (-1);
+    }
+
+    /* try to get a lock */
+    lock.l_start  = 0;
+    lock.l_whence = SEEK_SET;
+    lock.l_len    = 0;
+    lock.l_type   = F_WRLCK;
+
+    if (fcntl(fd, F_SETLK, &lock) < 0) {
+        if (errno == EACCES || errno == EAGAIN) {
+            /* ignore, other process already writing the file */
+            return 0;
+        } else {
+            LOG(log_error, logtype_cnid, "savevoloptions: cannot get lock: %s", strerror(errno));
+            return (-1);
+        }
+    }
+
+    /* write volume options */
+    snprintf(buf, sizeof(buf), "MAC_CHARSET:%s\n", vol->v_maccodepage);
+    snprintf(item, sizeof(item), "VOL_CHARSET:%s\n", vol->v_volcodepage);
+    strlcat(buf, item, sizeof(buf));
+
+    switch (vol->v_adouble) {
+        case AD_VERSION1:
+            strlcat(buf, "ADOUBLE_VER:v1\n", sizeof(buf));
+            break;
+        case AD_VERSION2:
+            strlcat(buf, "ADOUBLE_VER:v2\n", sizeof(buf));
+            break;
+        case AD_VERSION2_OSX:
+            strlcat(buf, "ADOUBLE_VER:osx\n", sizeof(buf));
+            break;
+    }
+
+    strlcat(buf, "CNIDBACKEND:", sizeof(buf));
+    strlcat(buf, vol->v_cnidscheme, sizeof(buf));
+    strlcat(buf, "\n", sizeof(buf));
+
+    strlcat(buf, "CNIDDBDHOST:", sizeof(buf));
+    strlcat(buf, Cnid_srv, sizeof(buf));
+    strlcat(buf, "\n", sizeof(buf));
+
+    snprintf(item, sizeof(item), "CNIDDBDPORT:%u\n", Cnid_port);
+    strlcat(buf, item, sizeof(buf));
+
+    strcpy(item, "CNID_DBPATH:");
+    if (vol->v_dbpath)
+        strlcat(item, vol->v_dbpath, sizeof(item));
+    else
+        strlcat(item, vol->v_path, sizeof(item));
+    strlcat(item, "\n", sizeof(item));
+    strlcat(buf, item, sizeof(buf));
+
+    /* volume flags */
+    strcpy(item, "VOLUME_OPTS:");
+    for (;op->name; op++) {
+       if ( (vol->v_flags & op->option) ) {
+            strlcat(item, op->name, sizeof(item));
+            strlcat(item, " ", sizeof(item));
+        }
+    }
+    strlcat(item, "\n", sizeof(item));
+    strlcat(buf, item, sizeof(buf));
+
+    /* casefold flags */
+    strcpy(item, "VOLCASEFOLD:");
+    for (;cf->name; cf++) {
+        if ( (vol->v_casefold & cf->option) ) {
+            strlcat(item, cf->name, sizeof(item));
+            strlcat(item, " ", sizeof(item));
+        }
+    }
+    strlcat(item, "\n", sizeof(item));
+    strlcat(buf, item, sizeof(buf));
+
+    if (strlen(buf) >= sizeof(buf)-1)
+        LOG(log_debug, logtype_afpd,"Error writing .volinfo file: buffer too small, %s", buf);
+
+
+   if (write( fd, buf, strlen(buf)) < 0 || ftruncate(fd, strlen(buf)) < 0 ) {
+       LOG(log_debug, logtype_afpd,"Error writing .volinfo file: %s", strerror(errno));
+   }
+
+   lock.l_type = F_UNLCK;
+   fcntl(fd, F_SETLK, &lock);
+   close (fd);
+   return ret;
+}