NAME=${0##*/}
version="0.3"

isdigit() { [[ ${*//[0-9]/} ]] && return 1 || return 0 ; }

help() {
echo -e "$NAME - $version\n\E[1mNOMBRE\E[0m\n\t$NAME - Muestra un árbol de directorios \
\n\n\E[1mSINOPSIS\E[0m\n\t\E[1m$NAME\
\E[0m [\E[1m[directorio] [profundidad]\E[0m]\n\t\E[1m\n\E[1mDESCRIPCION\E[0m\n\t$NAME es una \
pequeña utilidad para mostrar un árbol de directorios.\n\tSi no recibe parámetros, mostrará el árbol \
completo del directorio\n\tactual. La profundiada debe ser un número entero de 1 en adelante\n\t\
(con una profundidad 0 no mostrará ningún árbol) y puede ser\n\tindicada antes o después del \
directorio. Junto a cada directorio\n\tse muestra el tamaño que este ocupa (en un formato \
legible por las personas).\n" ; exit 0
}

search () {
if [ "$1" != "$levels" ]; then
  while read dir; do
    if [ -d "$dir" ] ; then
    zz=0
    while [ "$zz" != "$1" ]; do
        echo -en "| "
let zz++
    done
    if [ -L "$dir" ] ; then
      echo -en "+--- \033[1;36m${dir}\033[0m" $(ls -l $dir | sed 's/^.*'$dir' //')
      echo -e " ($(du -shc $dir | cut -f1 | head -1))"
    else
      echo -en "+--- \033[1;34m${dir}\033[0m"
      echo -e " ($(du -shc "$dir" | cut -f1 | head -1))"
      numdirs=$(expr $numdirs + 1)
      if cd "$dir" ; then
search $(expr "$1" + 1)
        cd ..
      fi
    fi
    fi
  done <<< "$(ls -1)"
fi
}

levels=-1
numdirs=0

while (($#)); do
if isdigit "$1"; then
levels="$1"; shift
elif [[ "$1" == "--help" ]]; then
help
elif ! [ -d $1 ]; then
echo -e "$NAME: \E[1mError:\E[0m el directorio $1 no existe"
exit 1
else cd "$1"; shift
fi
done

echo "Directorio Inicial = $(pwd)"
search 0
echo "Directorios Totales = $numdirs"