lib/mkdir.c

   1 /* On some systems, mkdir ("foo/", 0700) fails because of the trailing
   2    slash.  On those systems, this wrapper removes the trailing slash.
   3    Copyright (C) 2001 Free Software Foundation, Inc.
   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; either version 2, or (at your option)
   8    any later version.
   9
  10    This program 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
  13    GNU General Public License for more details.
  14
  15    You should have received a copy of the GNU General Public License
  16    along with this program; if not, write to the Free Software Foundation,
  17    Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  18
  19 /* written by Jim Meyering */
  20
  21 #include <config.h>
  22
  23 /* Disable the definition of mkdir to rpl_mkdir (from config.h) in this
  24    file.  Otherwise, we'd get conflicting prototypes for rpl_mkdir on
  25    most systems.  */
  26 #undef mkdir
  27
  28 #include <sys/types.h>
  29 #include <sys/stat.h>
  30 #include <stdio.h>
  31 #if HAVE_STDLIB_H
  32 # include <stdlib.h>
  33 #endif
  34
  35 #if HAVE_STRING_H
  36 # include <string.h>
  37 #else
  38 # include <strings.h>
  39 #endif
  40
  41 #include "dirname.h"
  42 #include "xalloc.h"
  43
  44 #ifndef HAVE_DECL_FREE
  45 "this configure-time declaration test was not run"
  46 #endif
  47 #if !HAVE_DECL_FREE
  48 void free ();
  49 #endif
  50
  51 /* This function is required at least for NetBSD 1.5.2.  */
  52
  53 int
  54 rpl_mkdir (char const *dir, mode_t mode)
  55 {
  56   int ret_val;
  57   char *tmp_dir;
  58   size_t len = strlen (dir);
  59
  60   if (len && dir[len - 1] == '/')
  61     {
  62       tmp_dir = xstrdup (dir);
  63       strip_trailing_slashes (tmp_dir);
  64     }
  65   else
  66     {
  67       tmp_dir = (char *) dir;
  68     }
  69
  70   ret_val = mkdir (tmp_dir, mode);
  71
  72   if (tmp_dir != dir)
  73     free (tmp_dir);
  74
  75   return ret_val;
  76 }