Blame mkinstalldirs

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