Return to makedir CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / nntp / rrn

Annotation of 43BSD/contrib/nntp/rrn/makedir, revision 1.1

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

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