Wed May 22 00:40:50 1996 David Mosberger-Tang <davidm@azstarnet.com>
[platform/upstream/glibc.git] / mkinstalldirs
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$
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" 1>&2
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