dwalk 454 B

123456789101112131415161718192021222324252627282930
  1. : ${CDIR=.}
  2. if [ $# = 1 ]
  3. then
  4. ${DD-:} $CDIR $1
  5. else
  6. ${DD-:} $CDIR
  7. fi
  8. ${DF-:} $CDIR .distr
  9. if test ! -r $DESTDIR/$CDIR/.distr
  10. then
  11. echo ++ no .distr in $CDIR 1>&2
  12. exit 0
  13. fi
  14. for i in `cat $DESTDIR/$CDIR/.distr`
  15. do
  16. if test -d $i
  17. then
  18. ( if cd $i
  19. then
  20. CDIR=$CDIR/$i
  21. export CDIR
  22. exec $DDIR/dwalk $*
  23. else
  24. echo ++ Could not access $CDIR/$i 1>&2
  25. fi
  26. )
  27. else
  28. ${DF-:} $CDIR $i
  29. fi
  30. done