1 #! /bin/sh 2 # mkinstalldirs --- make directory hierarchy 3 # Author: Noah Friedman <friedman (at] prep.ai.mit.edu> 4 # Created: 1993-05-16 5 # Public domain 6 7 # $Id: mkinstalldirs,v 1.13 1999/01/05 03:18:55 bje 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 41
