gnu/dist/bc/mkinstalldirs

   1 #! /bin/sh
   2 # mkinstalldirs --- make directory hierarchy
   3 # Author: Noah Friedman <friedman@prep.ai.mit.edu>
   4 # Created: 1993-05-16
   5 # Last modified: 1994-03-25
   6 # Public domain
   7
   8 errstatus=0
   9
  10 for file in ${1+"$@"} ; do
  11    set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
  12    shift
  13
  14    pathcomp=
  15    for d in ${1+"$@"} ; do
  16      pathcomp="$pathcomp$d"
  17      case "$pathcomp" in
  18        -* ) pathcomp=./$pathcomp ;;
  19      esac
  20
  21      if test ! -d "$pathcomp"; then
  22         echo "mkdir $pathcomp" 1>&2
  23         mkdir "$pathcomp" > /dev/null 2>&1 || lasterr=$?
  24      fi
  25
  26      if test ! -d "$pathcomp"; then
  27         errstatus=$lasterr
  28      fi
  29
  30      pathcomp="$pathcomp/"
  31    done
  32 done
  33
  34 exit $errstatus
  35
  36 # mkinstalldirs ends here