diplodocus.org Git - nmh/blob - sbr/makedir.c

   1 /* makedir.c -- make a directory
   2  *
   3  * This code is Copyright (c) 2002, by the authors of nmh.  See the
   4  * COPYRIGHT file in the root directory of the nmh distribution for
   5  * complete copyright information.
   6  */
   7
   8 /*
   9  * Modified to try recursive create.
  10  */
  11
  12 #include <h/mh.h>
  13 #include "makedir.h"
  14 #include <sys/file.h>
  15
  16 int
  17 makedir (const char *dir)
  18 {
  19     char            path[PATH_MAX];
  20     char*           folder_perms_ASCII;
  21     int             had_an_error = 0;
  22     mode_t          folder_perms, saved_umask;
  23     char*  c;
  24
  25     context_save();     /* save the context file */
  26     fflush(stdout);
  27
  28     if (!(folder_perms_ASCII = context_find ("folder-protect")))
  29         folder_perms_ASCII = foldprot;  /* defaults to "700" */
  30
  31     /* Because mh-profile.man documents "Folder-Protect:" as an octal constant,
  32        and we don't want to force the user to remember to include a leading
  33        zero, we call atooi(folder_perms_ASCII) here rather than
  34        strtoul(folder_perms_ASCII, NULL, 0).  Therefore, if anyone ever tries to
  35        specify a mode in say, hex, they'll get garbage.  (I guess nmh uses its
  36        atooi() function rather than calling strtoul() with a radix of 8 because
  37        some ancient platforms are missing that functionality. */
  38     folder_perms = atooi(folder_perms_ASCII);
  39
  40     /* Folders have definite desired permissions that are set -- we don't want
  41        to interact with the umask.  Clear it temporarily. */
  42     saved_umask = umask(0);
  43
  44     c = strncpy(path, dir, sizeof(path));
  45
  46     while (!had_an_error && (c = strchr((c + 1), '/')) != NULL) {
  47         *c = '\0';
  48         if (access(path, X_OK)) {
  49             if (errno != ENOENT){
  50                 advise (dir, "unable to create directory");
  51                 had_an_error = 1;
  52             }
  53             /* Create an outer directory. */
  54             if (mkdir(path, folder_perms)) {
  55                 advise (dir, "unable to create directory");
  56                 had_an_error = 1;
  57             }
  58         }
  59         *c = '/';
  60     }
  61
  62     if (!had_an_error) {
  63         /* Create the innermost nested subdirectory of the path we're being
  64            asked to create. */
  65         if (mkdir (dir, folder_perms) == -1) {
  66             advise (dir, "unable to create directory");
  67             had_an_error = 1;
  68         }
  69     }
  70
  71     umask(saved_umask);  /* put the user's umask back */
  72
  73     if (had_an_error)
  74         return 0;  /* opposite of UNIX error return convention */
  75     return 1;
  76 }