0
|
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
|
|
18 exit 0
|
|
19 ;;
|
|
20 -m) # -m PERM arg
|
|
21 shift
|
|
22 test $# -eq 0 && { echo "$usage" 1>&2; exit 1; }
|
|
23 dirmode=$1
|
|
24 shift
|
|
25 ;;
|
|
26 --) # stop option processing
|
|
27 shift
|
|
28 break
|
|
29 ;;
|
|
30 -*) # unknown option
|
|
31 echo "$usage" 1>&2
|
|
32 exit 1
|
|
33 ;;
|
|
34 *) # first non-opt arg
|
|
35 break
|
|
36 ;;
|
|
37 esac
|
|
38 done
|
|
39
|
|
40 for file
|
|
41 do
|
|
42 if test -d "$file"; then
|
|
43 shift
|
|
44 else
|
|
45 break
|
|
46 fi
|
|
47 done
|
|
48
|
|
49 case $# in
|
|
50 0) exit 0 ;;
|
|
51 esac
|
|
52
|
|
53 case $dirmode in
|
|
54 '')
|
|
55 if mkdir -p -- . 2>/dev/null; then
|
|
56 echo "mkdir -p -- $*"
|
|
57 exec mkdir -p -- "$@"
|
|
58 fi
|
|
59 ;;
|
|
60 *)
|
|
61 if mkdir -m "$dirmode" -p -- . 2>/dev/null; then
|
|
62 echo "mkdir -m $dirmode -p -- $*"
|
|
63 exec mkdir -m "$dirmode" -p -- "$@"
|
|
64 fi
|
|
65 ;;
|
|
66 esac
|
|
67
|
|
68 for file
|
|
69 do
|
|
70 set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
|
|
71 shift
|
|
72
|
|
73 pathcomp=
|
|
74 for d
|
|
75 do
|
|
76 pathcomp="$pathcomp$d"
|
|
77 case $pathcomp in
|
|
78 -*) pathcomp=./$pathcomp ;;
|
|
79 esac
|
|
80
|
|
81 if test ! -d "$pathcomp"; then
|
|
82 echo "mkdir $pathcomp"
|
|
83
|
|
84 mkdir "$pathcomp" || lasterr=$?
|
|
85
|
|
86 if test ! -d "$pathcomp"; then
|
|
87 errstatus=$lasterr
|
|
88 else
|
|
89 if test ! -z "$dirmode"; then
|
|
90 echo "chmod $dirmode $pathcomp"
|
|
91 lasterr=""
|
|
92 chmod "$dirmode" "$pathcomp" || lasterr=$?
|
|
93
|
|
94 if test ! -z "$lasterr"; then
|
|
95 errstatus=$lasterr
|
|
96 fi
|
|
97 fi
|
|
98 fi
|
|
99 fi
|
|
100
|
|
101 pathcomp="$pathcomp/"
|
|
102 done
|
|
103 done
|
|
104
|
|
105 exit $errstatus
|
|
106
|
|
107 # Local Variables:
|
|
108 # mode: shell-script
|
|
109 # sh-indentation: 2
|
|
110 # End:
|
|
111 # mkinstalldirs ends here
|