ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/SheepShaver/src/Unix/mkinstalldirs
Revision: 1.1
Committed: 2002-02-04T16:58:13Z (22 years, 9 months ago) by cebix
Branch point for: MAIN, cebix
Log Message:
Initial revision

File Contents

# User Rev Content
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.2 2001/09/18 17:20:47 cebix 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