[svn-inject] Installing original source of cdck
[debian/cdck.git] / mkinstalldirs
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