| 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 | 
 | 
|---|
| 9 | for file
 | 
|---|
| 10 | do
 | 
|---|
| 11 |    set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
 | 
|---|
| 12 |    shift
 | 
|---|
| 13 | 
 | 
|---|
| 14 |    pathcomp=
 | 
|---|
| 15 |    for d
 | 
|---|
| 16 |    do
 | 
|---|
| 17 |      pathcomp="$pathcomp$d"
 | 
|---|
| 18 |      case "$pathcomp" in
 | 
|---|
| 19 |        -* ) pathcomp=./$pathcomp ;;
 | 
|---|
| 20 |      esac
 | 
|---|
| 21 | 
 | 
|---|
| 22 |      if test ! -d "$pathcomp"; then
 | 
|---|
| 23 |         echo "mkdir $pathcomp" 1>&2
 | 
|---|
| 24 | 
 | 
|---|
| 25 |         mkdir "$pathcomp" || lasterr=$?
 | 
|---|
| 26 | 
 | 
|---|
| 27 |         if test ! -d "$pathcomp"; then
 | 
|---|
| 28 |           errstatus=$lasterr
 | 
|---|
| 29 |         fi
 | 
|---|
| 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.