|
|
| version 1.1, 2002/01/31 10:20:14 | version 1.2, 2003/01/09 16:49:43 |
|---|---|
| Line 4 | Line 4 |
| # Created: 1993-05-16 | # Created: 1993-05-16 |
| # Public domain | # Public domain |
| # $Id$ | |
| errstatus=0 | 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 | |
| ;; | |
| --) # stop option processing | |
| shift | |
| break | |
| ;; | |
| -*) # unknown option | |
| echo "$usage" 1>&2 | |
| exit 1 | |
| ;; | |
| *) # first non-opt arg | |
| break | |
| ;; | |
| 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 | for file |
| do | do |
| set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` | set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` |
| shift | shift |
| pathcomp= | pathcomp= |
| for d | for d |
| do | do |
| pathcomp="$pathcomp$d" | pathcomp="$pathcomp$d" |
| case "$pathcomp" in | case $pathcomp in |
| -* ) pathcomp=./$pathcomp ;; | -*) pathcomp=./$pathcomp ;; |
| esac | esac |
| if test ! -d "$pathcomp"; then | if test ! -d "$pathcomp"; then |
| echo "mkdir $pathcomp" | echo "mkdir $pathcomp" |
| mkdir "$pathcomp" || lasterr=$? | mkdir "$pathcomp" || lasterr=$? |
| if test ! -d "$pathcomp"; then | if test ! -d "$pathcomp"; then |
| errstatus=$lasterr | errstatus=$lasterr |
| fi | else |
| fi | 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/" | pathcomp="$pathcomp/" |
| done | done |
| done | done |
| exit $errstatus | exit $errstatus |
| # Local Variables: | |
| # mode: shell-script | |
| # sh-indentation: 2 | |
| # End: | |
| # mkinstalldirs ends here | # mkinstalldirs ends here |