Return to mkinstalldirs CVS log

Up to [Local Repository] / talos

Annotation of talos/mkinstalldirs, revision 1.1.1.1

1.1       nick        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: # $Id: mkinstalldirs,v 1.1 2009-03-28 03:52:29 nick Exp $
                      8: 
                      9: errstatus=0
                     10: 
                     11: for file
                     12: do
                     13:    set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
                     14:    shift
                     15: 
                     16:    pathcomp=
                     17:    for d
                     18:    do
                     19:      pathcomp="$pathcomp$d"
                     20:      case "$pathcomp" in
                     21:        -* ) pathcomp=./$pathcomp ;;
                     22:      esac
                     23: 
                     24:      if test ! -d "$pathcomp"; then
                     25:         echo "mkdir $pathcomp"
                     26: 
                     27:         mkdir "$pathcomp" || lasterr=$?
                     28: 
                     29:         if test ! -d "$pathcomp"; then
                     30:          errstatus=$lasterr
                     31:         fi
                     32:      fi
                     33: 
                     34:      pathcomp="$pathcomp/"
                     35:    done
                     36: done
                     37: 
                     38: exit $errstatus
                     39: 
                     40: # mkinstalldirs ends here