source/texk/kpathsea/win32/dirutil.c

   1 /* dirutil.c
   2
   3    Copyright 2000, 2015 Akira Kakuto.
   4
   5    This library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    This library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public License
  16    along with this library; if not, see <http://www.gnu.org/licenses/>.
  17 */
  18
  19 #include <kpathsea/kpathsea.h>
  20 #include "mktex.h"
  21
  22 /* check a directory */
  23 int
  24 is_dir (char *buff)
  25 {
  26   struct stat stats;
  27
  28   return stat (buff, &stats) == 0 && S_ISDIR (stats.st_mode);
  29 }
  30
  31 /* make a directory */
  32 int
  33 make_dir (char *buff)
  34 {
  35   if (_mkdir (buff)) {
  36     fprintf(stderr, "mkdir %s error.\n", buff);
  37     return (1);
  38   }
  39   if (_chmod (buff, _S_IREAD | _S_IWRITE)) {
  40     fprintf(stderr, "chmod %s failed.\n", buff);
  41     return (1);
  42   }
  43   return (0);
  44 }
  45
  46 int
  47 make_dir_p(char *buff)
  48 {
  49   int  ret = 0;
  50   int  i = 0;
  51   char *p = buff;
  52
  53   while (1) {
  54     if(*p == '\0') {
  55       ret = 0;
  56       if(!is_dir(buff)) {
  57         if(make_dir(buff)) {
  58           ret = 1;
  59         }
  60       }
  61       break;
  62     }
  63     if(*p == '/' && (i > 0 && *(p-1) != ':')) {
  64       *p = '\0';
  65       if(!is_dir(buff)) {
  66         if(make_dir(buff)) {
  67           ret = 1;
  68           *p = '/';
  69           break;
  70         }
  71       }
  72       *p = '/';
  73     }
  74     p++;
  75     i++;
  76   }
  77   return ret;
  78 }