FreeCalypso > hg > freecalypso-tools
view ffstools/cal2text/mkdir.c @ 390:c7599298998c
README: updated for the new set of top-level source directories
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sun, 11 Mar 2018 17:39:53 +0000 |
parents | d41edd329670 |
children |
line wrap: on
line source
#include <sys/types.h> #include <sys/stat.h> #include <stdio.h> #include <stdlib.h> #include <unistd.h> mkdir_existok(pathname) char *pathname; { int rc; struct stat st; rc = stat(pathname, &st); if (rc < 0) { rc = mkdir(pathname, 0777); if (rc < 0) { perror(pathname); exit(1); } return(0); } else { if (S_ISDIR(st.st_mode)) return(0); else { fprintf(stderr, "error: %s already exists and is not a directory\n", pathname); exit(1); } } }