mkdir.c (2075B)
1 // $Id$ --*- c -*-- 2 3 // Copyright (C) 2005 Enrico Scholz <enrico.scholz@informatik.tu-chemnitz.de> 4 // 5 // This program is free software; you can redistribute it and/or modify 6 // it under the terms of the GNU General Public License as published by 7 // the Free Software Foundation; version 2 of the License. 8 // 9 // This program is distributed in the hope that it will be useful, 10 // but WITHOUT ANY WARRANTY; without even the implied warranty of 11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 12 // GNU General Public License for more details. 13 // 14 // You should have received a copy of the GNU General Public License 15 // along with this program; if not, write to the Free Software 16 // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. 17 18 #ifdef HAVE_CONFIG_H 19 # include <config.h> 20 #endif 21 22 #include <stdbool.h> 23 #include <sys/stat.h> 24 #include <sys/types.h> 25 #include <string.h> 26 #include <assert.h> 27 #include <errno.h> 28 29 static enum { mkdirFAIL, mkdirSUCCESS, mkdirSKIP } 30 mkdirSingle(char const *path, char *end_ptr, int good_err) 31 { 32 *end_ptr = '\0'; 33 if (mkdir(path, 0700)!=-1 || errno==EEXIST) { 34 *end_ptr = '/'; 35 return mkdirSUCCESS; 36 } 37 else if (errno==good_err) { 38 *end_ptr = '/'; 39 return mkdirSKIP; 40 } 41 else 42 return mkdirFAIL; 43 } 44 45 static char * 46 rstrchr(char *str, char c) 47 { 48 while (*str!=c) --str; 49 return str; 50 } 51 52 bool 53 mkdirRecursive(char const *path) 54 { 55 char buf[strlen(path)+1]; 56 char * ptr = buf + sizeof(buf) - 2; 57 58 if (path[0]!='/') return false; // only absolute paths 59 60 strcpy(buf, path); 61 62 while (ptr>buf && (ptr = rstrchr(ptr, '/'))!=0) { 63 switch (mkdirSingle(buf, ptr, ENOENT)) { 64 case mkdirSUCCESS : break; 65 case mkdirSKIP : --ptr; continue; 66 case mkdirFAIL : return false; 67 } 68 69 break; // implied by mkdirSUCCESS 70 } 71 72 assert(ptr!=0); 73 ++ptr; 74 75 while ((ptr=strchr(ptr, '/'))!=0) { 76 switch (mkdirSingle(buf, ptr, 0)) { 77 case mkdirSKIP : 78 case mkdirFAIL : return false; 79 case mkdirSUCCESS : ++ptr; continue; 80 } 81 } 82 83 return true; 84 }