Mercurial > hg > index.fcgi > gift-gnutella > gift-gnutella-0.0.11-1pba
comparison mkinstalldirs @ 0:d39e1d0d75b6
initial add
author | paulo@hit-nxdomain.opendns.com |
---|---|
date | Sat, 20 Feb 2010 21:18:28 -0800 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:47a13674cdc5 |
---|---|
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 |