1 |
cebix |
1.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 2000/08/29 13:36:41 cbauer 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 |