#!/bin/sh
# rename all directories in current directory to lowercase
# tridge@valinux.com, April 2001

lowerdirs=`/bin/ls | egrep -v '[A-Z]'`
mixeddirs=`/bin/ls | egrep '[A-Z]'`
spacedirs=`/bin/ls | egrep ' '`

if [ "x$spacedirs" != x ]; then
   echo "You have directories with spaces in them - giving up"
   exit 1
fi

#echo $lowerdirs
#echo $mixeddirs

if [ "x$mixeddirs" = x ]; then
   echo no mixed directories
   exit 1
fi

for m in $mixeddirs; do
    echo checking $m
    lower=`echo $m | tr [A-Z] [a-z]`
    found=0
    for l in $lowerdirs; do
	if [ $l = $lower ]; then
	   found=1
	   echo "  collision bwtween $m $l ..."
	   if /bin/rmdir $lower 2> /dev/null; then
	      echo "  rmdir OK"
	      if /bin/mv $m $lower; then
		echo "  rename OK"
	      fi	   
	   else
	      echo "  FAILED TO REMOVE $m - skipping"
	   fi
	fi
    done
    if [ $found = 0 ]; then
      echo "  no lowercase dir for $m ..."
      if /bin/mv $m $lower; then
	echo "  rename OK"
      fi	   
    fi
done