Last change
on this file since 6252 was 4307, checked in by merck, 20 years ago |
new project
|
-
Property svn:executable
set to
*
|
File size:
1.9 KB
|
Line | |
---|
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
|
---|
Note:
See
TracBrowser
for help on using the repository browser.