joachim99@2: #! /bin/sh
joachim99@2: # mkinstalldirs --- make directory hierarchy
joachim99@2: # Author: Noah Friedman <friedman@prep.ai.mit.edu>
joachim99@2: # Created: 1993-05-16
joachim99@2: # Public domain
joachim99@2: 
joachim99@2: # $Id$
joachim99@2: 
joachim99@2: errstatus=0
joachim99@2: 
joachim99@2: for file
joachim99@2: do
joachim99@2:    set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
joachim99@2:    shift
joachim99@2: 
joachim99@2:    pathcomp=
joachim99@2:    for d
joachim99@2:    do
joachim99@2:      pathcomp="$pathcomp$d"
joachim99@2:      case "$pathcomp" in
joachim99@2:        -* ) pathcomp=./$pathcomp ;;
joachim99@2:      esac
joachim99@2: 
joachim99@2:      if test ! -d "$pathcomp"; then
joachim99@2:         echo "mkdir $pathcomp"
joachim99@2: 
joachim99@2:         mkdir "$pathcomp" || lasterr=$?
joachim99@2: 
joachim99@2:         if test ! -d "$pathcomp"; then
joachim99@2:   	  errstatus=$lasterr
joachim99@2:         fi
joachim99@2:      fi
joachim99@2: 
joachim99@2:      pathcomp="$pathcomp/"
joachim99@2:    done
joachim99@2: done
joachim99@2: 
joachim99@2: exit $errstatus
joachim99@2: 
joachim99@2: # mkinstalldirs ends here