mkinstalldirs 1.93 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48
#! /bin/sh
# mkinstalldirs --- make directory hierarchy
# Author: Noah Friedman <friedman@prep.ai.mit.edu>
# Created: 1993-05-16
# Public domain

errstatus=0
dirmode=""

usage="\
Usage: mkinstalldirs [-h] [--help] [-m mode] dir ..."

# process command line arguments
while test $# -gt 0 ; do
   case "${1}" in
     -h | --help | --h* )			# -h for help
	echo "${usage}" 1>&2; exit 0 ;;
     -m )					# -m PERM arg
	shift
	test $# -eq 0 && { echo "${usage}" 1>&2; exit 1; }
	dirmode="${1}"
	shift ;;
     -- ) shift; break ;;			# stop option processing
     -* ) echo "${usage}" 1>&2; exit 1 ;;	# unknown option
     * )  break ;;				# first non-opt arg
   esac
done

for file
do
  if test -d "$file"; then
    shift
  else
    break
  fi
done

case $# in
0) exit 0 ;;
esac

case $dirmode in
'')
  if mkdir -p -- . 2>/dev/null; then
    echo "mkdir -p -- $*"
    exec mkdir -p -- "$@"
  fi ;;
*)
49 50 51
  # We cannot trust mkdir to set the proper permissions on
  # parent directories. So create them manually.
  ;;
52 53 54 55
esac

for file
do
56 57 58 59 60
   case "$file" in
     /* ) pathcomp="/" ;;
     -* ) pathcomp="./" ;;
      * ) pathcomp="" ;;
   esac
61

62 63 64
   saved_IFS="$IFS"
   IFS="/"
   for d in $file
65
   do
66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87
      IFS="$saved_IFS"
      if test -n "$d"; then
         pathcomp="$pathcomp$d"
         if test ! -d "$pathcomp"; then
            echo "mkdir $pathcomp"
            mkdir "$pathcomp" || lasterr=$?

            if test ! -d "$pathcomp"; then
               errstatus=$lasterr
               break
            elif test -n "$dirmode"; then
               echo "chmod $dirmode $pathcomp"
               lasterr=""
               chmod "$dirmode" "$pathcomp" || lasterr=$?
               if test -n "$lasterr"; then
                  errstatus=$lasterr
                  break
               fi
            fi
         fi
         pathcomp="$pathcomp/"
      fi
88 89 90 91 92 93 94 95 96 97
   done
done

exit $errstatus

# Local Variables:
# mode: shell-script
# sh-indentation: 3
# End:
# mkinstalldirs ends here