source: trunk/athena/etc/busyd/mkinstalldirs @ 11896

Revision 11896, 730 bytes checked in by ghudson, 26 years ago (diff)
busyd, a daemon for answering larvnet status requests
  • Property svn:executable set to *
Line 
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 1998-08-25 03:31:26 ghudson Exp $
8
9errstatus=0
10
11for file
12do
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
36done
37
38exit $errstatus
39
40# mkinstalldirs ends here
Note: See TracBrowser for help on using the repository browser.