rohrpost

path.c (4206B)

---

 /*
  * Copy me if you can.
  * by 20h
  */
 
 #include <unistd.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <sys/stat.h>
 #include <sys/types.h>
 #include <stdarg.h>
 #include <fcntl.h>
 #include <string.h>
 
 #include "arg.h"
 #include "ind.h"
 #include "path.h"
 
 enum {
 	PATH_MKFILE = 0x00,
 	PATH_MKDIR
 };
 
 char *
 path_chkmk(char *base, char *spath, int mode, int cmode)
 {
 	struct stat sbuf;
 	char *path, *home;
 	int fd;
 
 	if (base != NULL) {
 		home = expandhome(base);
 		path = smprintf("%s/%s", home, spath);
 		free(home);
 	} else {
 		path = memdup(spath, strlen(spath)+1);
 	}
 
 	if (stat(path, &sbuf) < 0) {
 		switch(mode) {
 		case PATH_MKFILE:
 			fd = open(path, O_WRONLY|O_CREAT|O_TRUNC,
 					(cmode >= 0)? \
 					cmode : (S_IRUSR|S_IWUSR));
 			if (fd < 0)
 				edie("open");
 			close(fd);
 			break;
 		case PATH_MKDIR:
 			if (mkdir(path, (cmode >= 0)? \
 					cmode : S_IRWXU) < 0) {
 				edie("mkdir");
 			}
 			break;
 		default:
 			die("path_chkmkdir: Unknown mode.\n");
 		}
 	}
 
 	return path;
 }
 
 char *
 path_chkmkfile(char *base, char *path, int mode)
 {
 	return path_chkmk(base, path, PATH_MKFILE, mode);
 }
 
 char *
 path_chkmkdir(char *base, char *path, int mode)
 {
 	return path_chkmk(base, path, PATH_MKDIR, mode);
 }
 
 char *
 path_mkrppath(char *rppath)
 {
 	return path_chkmkdir("~", (rppath)? rppath : RPPATH, -1);
 }
 
 char *
 path_mkbasepath(char *cfgn)
 {
 	char *path, *rpath, *cwd;
 	struct stat sbuf;
 
 	cwd = getcwd(NULL, 0);
 	if (cwd == NULL)
 		edie("getcwd");
 
 	path = path_mkrppath(NULL);
 	if (chdir(path) < 0)
 		edie("chdir");
 	if (lstat("default", &sbuf) < 0) {
 		if (cfgn == NULL || !strcmp(cfgn, "default")) {
 			die("You are trying to create a 'default'"
 				" configuration while no other configuration"
 				" exists."
 				" Please use _rppath -ic somecfg_ to"
 				" initialize the configuration 'somecfg' and"
 				" make it the default using _rpcfg -e"
 				" somecfg_. Then this error message"
 				" disappears.\n");
 		}
 	} else {
 		if (!S_ISLNK(sbuf.st_mode)) {
 			die("There seems to be some 'default' configuration"
 				" folder. This should be a symlink. Please go"
 				" to '%s' and check this. If no other folder"
 				" exists, it might help to run"
 				" _mv default somecfg_ and _rpcfg -e"
 				" somecfg_. The last command will create the"
 				" symlink to 'default' and this error message"
 				" disappears. If nothing helps, remove the"
 				" 'default' directory and reinitialize your"
 				" configuration using a different name.\n",
 				path);
 		}
 	}
 
 	rpath = path_chkmkdir(path, (cfgn)? cfgn : "default", -1);
 	free(path);
 
 	if (chdir(cwd) < 0)
 		edie("chdir");
 	free(cwd);
 
 	return rpath;
 }
 
 char *
 path_mkcfgfile(char *cfgn)
 {
 	char *path, *rpath;
 
 	path = path_mkbasepath(cfgn);
 	rpath = path_chkmkfile(path, "config", -1);
 	free(path);
 
 	return rpath;
 }
 
 char *
 path_mkmarkfile(char *cfgn, char *markn)
 {
 	char *path, *mpath;
 
 	if (markn == NULL)
 		return NULL;
 
 	path = path_mkbasepath(cfgn);
 	mpath = path_chkmkdir(path, "marks", -1);
 	free(path);
 
 	path = path_chkmkfile(mpath, markn, -1);
 	free(mpath);
 
 	return path;
 }
 
 char *
 path_mkincfile(char *cfgn)
 {
 	char *path, *rpath;
 
 	path = path_mkbasepath(cfgn);
 	rpath = path_chkmkfile(path, "status", -1);
 	free(path);
 
 	return rpath;
 }
 
 void
 pathusage(char *argv0)
 {
 	die("usage: %s [-bhi] [-c cfg]\n", argv0);
 }
 
 int
 pathmain(int argc, char *argv[])
 {
 	int status;
 	char *cfgn, *path, *argv0;
 
 	enum {
 		PRINTBASE = 0x01,
 		INITBASE = 0x02,
 	};
 
 	status = 0;
 	cfgn = NULL;
 
 	ARGBEGIN(argv0) {
 	case 'b':
 		status |= PRINTBASE;
 		break;
 	case 'c':
 		cfgn = EARGF(pathusage(argv0));
 		break;
 	case 'i':
 		status |= INITBASE;
 		break;
 	default:
 		pathusage(argv0);
 	} ARGEND;
 
 	if (status & PRINTBASE) {
 		path = path_mkbasepath(cfgn);
 		printf("%s\n", path);
 		free(path);
 		return 0;
 	}
 
 	if (status & INITBASE) {
 		/* Will initialize all subpathnames. */
 		path = path_mkbasepath(cfgn);
 		free(path_chkmkfile(path, "config", -1));
 		free(path_chkmkfile(path, "status", -1));
 		free(path_chkmkdir(path, "drafts", -1));
 		free(path_chkmkdir(path, "marks", -1));
 		free(path_chkmkdir(path, "tmpl", -1));
 
 		printf("The directory '%s' has been initialized.\n", path);
 		free(path);
 		return 0;
 	}
 
 	pathusage(argv0);
 
 	return 0;
 }