source: trunk/third/nmh/sbr/makedir.c @ 12455

/*
 * makedir.c -- make a directory
 *
 * $Id: makedir.c,v 1.1.1.1 1999-02-07 18:14:09 danw Exp $
 */

/*
 * Modified to try recursive create.
 */

#include <h/mh.h>
#include <errno.h>
#include <sys/param.h>
#include <sys/file.h>

extern int errno;
        
int
makedir (char *dir)
{
    pid_t pid;
    register char *cp;
    register char *c;
    char path[PATH_MAX];

    context_save();     /* save the context file */
    fflush(stdout);

    if (getuid () == geteuid ()) {
            c = strncpy(path, dir, sizeof(path));     

            while ((c = strchr((c + 1), '/')) != NULL) {        
                    *c = (char)0;
                    if (access(path, X_OK)) {
                            if (errno != ENOENT){
                                    advise (dir, "unable to create directory");
                                    return 0;
                            }                       
                            if (mkdir(path, 0775)) {
                                    advise (dir, "unable to create directory");
                                    return 0;
                            }
                    }
                    *c = '/';
            }
 
            if (mkdir (dir, 0755) == -1) {
                    advise (dir, "unable to create directory");
                    return 0;
            }
    } else {
        switch (pid = vfork()) {
        case -1: 
            advise ("fork", "unable to");
            return 0;

        case 0: 
            setgid (getgid ());
            setuid (getuid ());

            execl ("/bin/mkdir", "mkdir", dir, NULL);
            execl ("/usr/bin/mkdir", "mkdir", dir, NULL);
            fprintf (stderr, "unable to exec ");
            perror ("mkdir");
            _exit (-1);

        default: 
            if (pidXwait(pid, "mkdir"))
                return 0;
            break;
        }
    }

    if (!(cp = context_find ("folder-protect")))
        cp = foldprot;
    chmod (dir, atooi (cp));
    return 1;
}