source: trunk/third/moira/mkinstalldirs @ 26024

Revision 26024, 727 bytes checked in by jdreed, 11 years ago (diff)
In moira: * Snapshot moira at r4113 to pick up new firewall-related changes
  • Property svn:executable set to *
RevLine 
[23095]1#! /bin/sh
2# mkinstalldirs --- make directory hierarchy
[26024]3# Author: Noah Friedman <friedman@prep.ai.mit.edu>
[23095]4# Created: 1993-05-16
[26024]5# Public domain
[23095]6
[26024]7# $Id: mkinstalldirs 3956 2010-01-05 20:56:56Z zacheiss $
8
[23095]9errstatus=0
10
11for file
12do
[26024]13   set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
14   shift
[23095]15
[26024]16   pathcomp=
17   for d
18   do
19     pathcomp="$pathcomp$d"
20     case "$pathcomp" in
21       -* ) pathcomp=./$pathcomp ;;
22     esac
[23095]23
[26024]24     if test ! -d "$pathcomp"; then
25        echo "mkdir $pathcomp" 1>&2
[23095]26
[26024]27        mkdir "$pathcomp" || lasterr=$?
[23095]28
[26024]29        if test ! -d "$pathcomp"; then
30          errstatus=$lasterr
31        fi
32     fi
[23095]33
[26024]34     pathcomp="$pathcomp/"
35   done
[23095]36done
37
38exit $errstatus
39
[26024]40# mkinstalldirs ends here
Note: See TracBrowser for help on using the repository browser.