| #! /bin/sh |
| # mkinstalldirs --- make directory hierarchy |
| # Author: Noah Friedman <friedman@prep.ai.mit.edu> |
| # Created: 1993-05-16 |
| # Last modified: 1994-03-25 |
| # Public domain |
| |
| errstatus=0 |
| |
| for file in ${1+"$@"} ; do |
| set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` |
| shift |
| |
| pathcomp= |
| for d in ${1+"$@"} ; do |
| pathcomp="$pathcomp$d" |
| case "$pathcomp" in |
| -* ) pathcomp=./$pathcomp ;; |
| esac |
| |
| if test ! -d "$pathcomp"; then |
| echo "mkdir $pathcomp" 1>&2 |
| mkdir "$pathcomp" > /dev/null 2>&1 || lasterr=$? |
| fi |
| |
| if test ! -d "$pathcomp"; then |
| errstatus=$lasterr |
| fi |
| |
| pathcomp="$pathcomp/" |
| done |
| done |
| |
| exit $errstatus |
| |
| # mkinstalldirs ends here |