masqmail
annotate mkinstalldirs @ 209:10da50168dab
replaced the MD5 implementation with the one of Solar Designer
Until now, the sample code of RFC 1321 was used. It had an ugly license.
Now we use the implementation of Solar Designer, which is in the Public Domain.
http://openwall.info/wiki/people/solar/software/public-domain-source-code/md5
| author | meillo@marmaro.de |
|---|---|
| date | Sun, 18 Jul 2010 21:58:15 +0200 |
| parents | |
| children |
| rev | line source |
|---|---|
| meillo@0 | 1 #! /bin/sh |
| meillo@0 | 2 # mkinstalldirs --- make directory hierarchy |
| meillo@0 | 3 # Author: Noah Friedman <friedman@prep.ai.mit.edu> |
| meillo@0 | 4 # Created: 1993-05-16 |
| meillo@0 | 5 # Public domain |
| meillo@0 | 6 |
| meillo@0 | 7 # $Id: mkinstalldirs,v 1.1.1.1 2001/03/19 15:45:28 okurth Exp $ |
| meillo@0 | 8 |
| meillo@0 | 9 errstatus=0 |
| meillo@0 | 10 |
| meillo@0 | 11 for file |
| meillo@0 | 12 do |
| meillo@0 | 13 set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` |
| meillo@0 | 14 shift |
| meillo@0 | 15 |
| meillo@0 | 16 pathcomp= |
| meillo@0 | 17 for d |
| meillo@0 | 18 do |
| meillo@0 | 19 pathcomp="$pathcomp$d" |
| meillo@0 | 20 case "$pathcomp" in |
| meillo@0 | 21 -* ) pathcomp=./$pathcomp ;; |
| meillo@0 | 22 esac |
| meillo@0 | 23 |
| meillo@0 | 24 if test ! -d "$pathcomp"; then |
| meillo@0 | 25 echo "mkdir $pathcomp" |
| meillo@0 | 26 |
| meillo@0 | 27 mkdir "$pathcomp" || lasterr=$? |
| meillo@0 | 28 |
| meillo@0 | 29 if test ! -d "$pathcomp"; then |
| meillo@0 | 30 errstatus=$lasterr |
| meillo@0 | 31 fi |
| meillo@0 | 32 fi |
| meillo@0 | 33 |
| meillo@0 | 34 pathcomp="$pathcomp/" |
| meillo@0 | 35 done |
| meillo@0 | 36 done |
| meillo@0 | 37 |
| meillo@0 | 38 exit $errstatus |
| meillo@0 | 39 |
| meillo@0 | 40 # mkinstalldirs ends here |