Return to makedir.SH CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / rn

Annotation of 43BSD/contrib/rn/makedir.SH, revision 1.1.1.1

1.1       root        1: case $CONFIG in
                      2:     '') . config.sh ;;
                      3: esac
                      4: echo "Extracting makedir (with variable substitutions)"
                      5: $spitshell >makedir <<!GROK!THIS!
                      6: $startsh
                      7: # $Header: makedir.SH,v 4.3 85/05/01 11:42:31 lwall Exp $
                      8: # 
                      9: # $Log:        makedir.SH,v $
                     10: # Revision 4.3  85/05/01  11:42:31  lwall
                     11: # Baseline for release with 4.3bsd.
                     12: # 
                     13: 
                     14: export PATH || (echo "OOPS, this isn't sh.  Desperation time.  I will feed myself to sh."; sh \$0; kill \$\$)
                     15: 
                     16: case \$# in
                     17:   0)
                     18:     $echo "makedir pathname filenameflag"
                     19:     exit 1
                     20:     ;;
                     21: esac
                     22: 
                     23: : guarantee one slash before 1st component
                     24: case \$1 in
                     25:   /*) ;;
                     26:   *)  set ./\$1 \$2 ;;
                     27: esac
                     28: 
                     29: : strip last component if it is to be a filename
                     30: case X\$2 in
                     31:   X1) set \`$echo \$1 | $sed 's:\(.*\)/[^/]*\$:\1:'\` ;;
                     32:   *)  set \$1 ;;
                     33: esac
                     34: 
                     35: : return reasonable status if nothing to be created
                     36: if $test -d "\$1" ; then
                     37:     exit 0
                     38: fi
                     39: 
                     40: list=''
                     41: while true ; do
                     42:     case \$1 in
                     43:     */*)
                     44:        list="\$1 \$list"
                     45:        set \`echo \$1 | $sed 's:\(.*\)/:\1 :'\`
                     46:        ;;
                     47:     *)
                     48:        break
                     49:        ;;
                     50:     esac
                     51: done
                     52: 
                     53: set \$list
                     54: 
                     55: for dir do
                     56:     $mkdir \$dir >/dev/null 2>&1
                     57: done
                     58: !GROK!THIS!
                     59: $eunicefix makedir
                     60: chmod 755 makedir

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.