Contents of /yoda/mkinstalldirs

#! /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 ;;
*)
  if mkdir -m "$dirmode" -p -- . 2>/dev/null; then
    echo "mkdir -m $dirmode -p -- $*"
    exec mkdir -m "$dirmode" -p -- "$@"
  fi ;;
esac

for file
do
   set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
   shift

   pathcomp=
   for d
   do
     pathcomp="$pathcomp$d"
     case "$pathcomp" in
       -* ) pathcomp=./$pathcomp ;;
     esac

     if test ! -d "$pathcomp"; then
        echo "mkdir $pathcomp"

        mkdir "$pathcomp" || lasterr=$?

        if test ! -d "$pathcomp"; then
          errstatus=$lasterr
        else
          if test ! -z "$dirmode"; then
             echo "chmod $dirmode $pathcomp"

             lasterr=""
             chmod "$dirmode" "$pathcomp" || lasterr=$?

             if test ! -z "$lasterr"; then
               errstatus=$lasterr
             fi
          fi
        fi
     fi

     pathcomp="$pathcomp/"
   done
done

exit $errstatus

# Local Variables:
# mode: shell-script
# sh-indentation: 3
# End:
# mkinstalldirs ends here
1	#! /bin/sh
2	# mkinstalldirs --- make directory hierarchy
3	# Author: Noah Friedman <friedman@prep.ai.mit.edu>
4	# Created: 1993-05-16
5	# Public domain
6
7	errstatus=0
8	dirmode=""
9
10	usage="\
11	Usage: mkinstalldirs [-h] [--help] [-m mode] dir ..."
12
13	# process command line arguments
14	while test $# -gt 0 ; do
15	case "${1}" in
16	-h \| --help \| --h* ) # -h for help
17	echo "${usage}" 1>&2; exit 0 ;;
18	-m ) # -m PERM arg
19	shift
20	test $# -eq 0 && { echo "${usage}" 1>&2; exit 1; }
21	dirmode="${1}"
22	shift ;;
23	-- ) shift; break ;; # stop option processing
24	-* ) echo "${usage}" 1>&2; exit 1 ;; # unknown option
25	* ) break ;; # first non-opt arg
26	esac
27	done
28
29	for file
30	do
31	if test -d "$file"; then
32	shift
33	else
34	break
35	fi
36	done
37
38	case $# in
39	0) exit 0 ;;
40	esac
41
42	case $dirmode in
43	'')
44	if mkdir -p -- . 2>/dev/null; then
45	echo "mkdir -p -- $*"
46	exec mkdir -p -- "$@"
47	fi ;;
48	*)
49	if mkdir -m "$dirmode" -p -- . 2>/dev/null; then
50	echo "mkdir -m $dirmode -p -- $*"
51	exec mkdir -m "$dirmode" -p -- "$@"
52	fi ;;
53	esac
54
55	for file
56	do
57	set fnord `echo ":$file" \| sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
58	shift
59
60	pathcomp=
61	for d
62	do
63	pathcomp="$pathcomp$d"
64	case "$pathcomp" in
65	-* ) pathcomp=./$pathcomp ;;
66	esac
67
68	if test ! -d "$pathcomp"; then
69	echo "mkdir $pathcomp"
70
71	mkdir "$pathcomp" \|\| lasterr=$?
72
73	if test ! -d "$pathcomp"; then
74	errstatus=$lasterr
75	else
76	if test ! -z "$dirmode"; then
77	echo "chmod $dirmode $pathcomp"
78
79	lasterr=""
80	chmod "$dirmode" "$pathcomp" \|\| lasterr=$?
81
82	if test ! -z "$lasterr"; then
83	errstatus=$lasterr
84	fi
85	fi
86	fi
87	fi
88
89	pathcomp="$pathcomp/"
90	done
91	done
92
93	exit $errstatus
94
95	# Local Variables:
96	# mode: shell-script
97	# sh-indentation: 3
98	# End:
99	# mkinstalldirs ends here