masqmail
view mkinstalldirs @ 88:39014fc31dbe
added a document that describes UUCP relevant stuff
I'm not familiar with UUCP, so I hope the information
is correct
author | meillo@marmaro.de |
---|---|
date | Sat, 19 Jun 2010 18:53:45 +0200 |
parents | |
children |
line source
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
7 # $Id: mkinstalldirs,v 1.1.1.1 2001/03/19 15:45:28 okurth Exp $
9 errstatus=0
11 for file
12 do
13 set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
14 shift
16 pathcomp=
17 for d
18 do
19 pathcomp="$pathcomp$d"
20 case "$pathcomp" in
21 -* ) pathcomp=./$pathcomp ;;
22 esac
24 if test ! -d "$pathcomp"; then
25 echo "mkdir $pathcomp"
27 mkdir "$pathcomp" || lasterr=$?
29 if test ! -d "$pathcomp"; then
30 errstatus=$lasterr
31 fi
32 fi
34 pathcomp="$pathcomp/"
35 done
36 done
38 exit $errstatus
40 # mkinstalldirs ends here