|
|
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.