Sat Jun 15 18:13:43 1996 Roland McGrath <roland@delasyd.gnu.ai.mit.edu>
[kopensolaris-gnu/glibc.git] / mkinstalldirs
index a87fe22..d0fd194 100755 (executable)
@@ -1,32 +1,40 @@
-#!/bin/sh
-# Make directory hierarchy. 
-# Written by Noah Friedman <friedman@prep.ai.mit.edu>
-# Public domain.
+#! /bin/sh
+# mkinstalldirs --- make directory hierarchy
+# Author: Noah Friedman <friedman@prep.ai.mit.edu>
+# Created: 1993-05-16
+# Public domain
 
-defaultIFS='   
-'
-IFS="${IFS-${defaultIFS}}"
+# $Id$
 
-for file in ${1+"$@"} ; do 
-   oIFS="${IFS}"; IFS='/'; set - ${file}; IFS="${oIFS}"
-   test ".${1}" = "." && shift
+errstatus=0
 
-   case "${file}" in 
-    /* ) pathcomp='/' ;;
-    * )  pathcomp=''  ;;
-   esac
+for file
+do
+   set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
+   shift
 
-   while test $# -ne 0 ; do
-     pathcomp="${pathcomp}${1}"
-     shift
+   pathcomp=
+   for d
+   do
+     pathcomp="$pathcomp$d"
+     case "$pathcomp" in
+       -* ) pathcomp=./$pathcomp ;;
+     esac
 
-     if test ! -d "${pathcomp}"; then
+     if test ! -d "$pathcomp"; then
         echo "mkdir $pathcomp" 1>&2
-        mkdir "${pathcomp}"
+
+        mkdir "$pathcomp" || lasterr=$?
+
+        if test ! -d "$pathcomp"; then
+         errstatus=$lasterr
+        fi
      fi
 
-     pathcomp="${pathcomp}/"
+     pathcomp="$pathcomp/"
    done
 done
 
-# eof
+exit $errstatus
+
+# mkinstalldirs ends here