Rev | Line | |
---|
[2621] | 1 | #! /bin/sh
|
---|
| 2 | # mkinstalldirs --- make directory hierarchy
|
---|
| 3 | # Author: Noah Friedman <friedman@prep.ai.mit.edu>
|
---|
| 4 | # Created: 1993-05-16
|
---|
| 5 | # Last modified: 1994-03-25
|
---|
| 6 | # Public domain
|
---|
| 7 | #
|
---|
| 8 |
|
---|
| 9 | errstatus=0
|
---|
| 10 | umask 022
|
---|
| 11 |
|
---|
| 12 | for file in ${1+"$@"} ; do
|
---|
| 13 | set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
|
---|
| 14 | shift
|
---|
| 15 |
|
---|
| 16 | pathcomp=
|
---|
| 17 | for d in ${1+"$@"} ; do
|
---|
| 18 | pathcomp="$pathcomp$d"
|
---|
| 19 | case "$pathcomp" in
|
---|
| 20 | -* ) pathcomp=./$pathcomp ;;
|
---|
| 21 | esac
|
---|
| 22 |
|
---|
| 23 | if test ! -d "$pathcomp"; then
|
---|
| 24 | echo "mkdir $pathcomp" 1>&2
|
---|
| 25 | case "$pathcomp" in
|
---|
| 26 | [abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ]: )
|
---|
| 27 | ;; # DOSISH systems
|
---|
| 28 | * ) mkdir "$pathcomp" || errstatus=$? ;;
|
---|
| 29 | esac
|
---|
| 30 | fi
|
---|
| 31 |
|
---|
| 32 | pathcomp="$pathcomp/"
|
---|
| 33 | done
|
---|
| 34 | done
|
---|
| 35 |
|
---|
| 36 | exit $errstatus
|
---|
| 37 |
|
---|
| 38 | # mkinstalldirs ends here
|
---|
Note:
See
TracBrowser
for help on using the repository browser.