cannam@86: #! /bin/sh
cannam@86: # mkinstalldirs --- make directory hierarchy
cannam@86: # Author: Noah Friedman <friedman@prep.ai.mit.edu>
cannam@86: # Created: 1993-05-16
cannam@86: # Public domain
cannam@86: 
cannam@86: errstatus=0
cannam@86: dirmode=""
cannam@86: 
cannam@86: usage="\
cannam@86: Usage: mkinstalldirs [-h] [--help] [-m mode] dir ..."
cannam@86: 
cannam@86: # process command line arguments
cannam@86: while test $# -gt 0 ; do
cannam@86:   case $1 in
cannam@86:     -h | --help | --h*)         # -h for help
cannam@86:       echo "$usage" 1>&2
cannam@86:       exit 0
cannam@86:       ;;
cannam@86:     -m)                         # -m PERM arg
cannam@86:       shift
cannam@86:       test $# -eq 0 && { echo "$usage" 1>&2; exit 1; }
cannam@86:       dirmode=$1
cannam@86:       shift
cannam@86:       ;;
cannam@86:     --)                         # stop option processing
cannam@86:       shift
cannam@86:       break
cannam@86:       ;;
cannam@86:     -*)                         # unknown option
cannam@86:       echo "$usage" 1>&2
cannam@86:       exit 1
cannam@86:       ;;
cannam@86:     *)                          # first non-opt arg
cannam@86:       break
cannam@86:       ;;
cannam@86:   esac
cannam@86: done
cannam@86: 
cannam@86: for file
cannam@86: do
cannam@86:   if test -d "$file"; then
cannam@86:     shift
cannam@86:   else
cannam@86:     break
cannam@86:   fi
cannam@86: done
cannam@86: 
cannam@86: case $# in
cannam@86:   0) exit 0 ;;
cannam@86: esac
cannam@86: 
cannam@86: case $dirmode in
cannam@86:   '')
cannam@86:     if mkdir -p -- . 2>/dev/null; then
cannam@86:       echo "mkdir -p -- $*"
cannam@86:       exec mkdir -p -- "$@"
cannam@86:     fi
cannam@86:     ;;
cannam@86:   *)
cannam@86:     if mkdir -m "$dirmode" -p -- . 2>/dev/null; then
cannam@86:       echo "mkdir -m $dirmode -p -- $*"
cannam@86:       exec mkdir -m "$dirmode" -p -- "$@"
cannam@86:     fi
cannam@86:     ;;
cannam@86: esac
cannam@86: 
cannam@86: for file
cannam@86: do
cannam@86:   set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
cannam@86:   shift
cannam@86: 
cannam@86:   pathcomp=
cannam@86:   for d
cannam@86:   do
cannam@86:     pathcomp="$pathcomp$d"
cannam@86:     case $pathcomp in
cannam@86:       -*) pathcomp=./$pathcomp ;;
cannam@86:     esac
cannam@86: 
cannam@86:     if test ! -d "$pathcomp"; then
cannam@86:       echo "mkdir $pathcomp"
cannam@86: 
cannam@86:       mkdir "$pathcomp" || lasterr=$?
cannam@86: 
cannam@86:       if test ! -d "$pathcomp"; then
cannam@86:   	errstatus=$lasterr
cannam@86:       else
cannam@86:   	if test ! -z "$dirmode"; then
cannam@86: 	  echo "chmod $dirmode $pathcomp"
cannam@86:     	  lasterr=""
cannam@86:   	  chmod "$dirmode" "$pathcomp" || lasterr=$?
cannam@86: 
cannam@86:   	  if test ! -z "$lasterr"; then
cannam@86:   	    errstatus=$lasterr
cannam@86:   	  fi
cannam@86:   	fi
cannam@86:       fi
cannam@86:     fi
cannam@86: 
cannam@86:     pathcomp="$pathcomp/"
cannam@86:   done
cannam@86: done
cannam@86: 
cannam@86: exit $errstatus
cannam@86: 
cannam@86: # Local Variables:
cannam@86: # mode: shell-script
cannam@86: # sh-indentation: 2
cannam@86: # End:
cannam@86: # mkinstalldirs ends here