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