mkinstalldirs

   1 #! /bin/sh
   2
   3 # Copyright 1993 Noah Friedman <friedman@prep.ai.mit.edu>
   4 # Copyright 1996,1997,2001,2002 Alain Knaff.
   5 # This file is part of mtools.
   6 #
   7 # Mtools is free software: you can redistribute it and/or modify
   8 # it under the terms of the GNU General Public License as published by
   9 # the Free Software Foundation, either version 3 of the License, or
  10 # (at your option) any later version.
  11 #
  12 # Mtools is distributed in the hope that it will be useful,
  13 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 # GNU General Public License for more details.
  16 #
  17 # You should have received a copy of the GNU General Public License
  18 # along with Mtools.  If not, see <http://www.gnu.org/licenses/>.
  19
  20 # mkinstalldirs --- make directory hierarchy
  21 # Author: Noah Friedman <friedman@prep.ai.mit.edu>
  22 # Created: 1993-05-16
  23 # Last modified: 1994-03-25
  24 # Public domain
  25
  26 errstatus=0
  27
  28 for file in ${1+"$@"} ; do
  29    set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
  30    shift
  31
  32    pathcomp=
  33    for d in ${1+"$@"} ; do
  34      pathcomp="$pathcomp$d"
  35      case "$pathcomp" in
  36        -* ) pathcomp=./$pathcomp ;;
  37      esac
  38
  39      if test ! -d "$pathcomp"; then
  40         echo "mkdir $pathcomp" 1>&2
  41         mkdir "$pathcomp" || errstatus=$?
  42      fi
  43
  44      pathcomp="$pathcomp/"
  45    done
  46 done
  47
  48 exit $errstatus
  49
  50 # mkinstalldirs ends here