#!/bin/sh

# --------------------------------------------------------------------------- #

head_url="http://www"
tail_url="engelschall.com/u/sb"

base_dir="/u/sb/.www"

# --------------------------------------------------------------------------- #

initialize ()
{
    path="`echo \"$1\" | sed -e 's|//*|/|g; s|/\.\(/\.\)*/|/|g; s|^\./||; s|/\.$||; s|^/||; s|/$||; s|^\.$||' | sed -e \"s|^${base_dir}/||\"`"
    if [ "x$path" = "x" ]
    then
        url="$head_url.$2.$tail_url/"
    else
        url="$head_url.$2.$tail_url/$path/"
    fi
    dir="$base_dir/$path" 
    if [ ! -d "$dir" ]
    then
        mkdir "$dir"
    fi
}

# --------------------------------------------------------------------------- #

cgi ()
{
    initialize "$1" "$2"
    name="redirect.cgi"
    (
        cd "$dir"
        rm -f "$name"
        cat >"$name" <<VERBATIM
#!/bin/sh
echo "Location: $url"
echo ""
VERBATIM
        chmod 555 "$name"
    )
}

# --------------------------------------------------------------------------- #

serv="$1"

cd "$base_dir"

find . -type f -name redirect.cgi -exec rm -f {} \;

for item in `find . -type d -print | \
    grep -v '/bnp' | \
    grep -v '/img$' | \
    grep -v '/old$' | \
    grep -v '/pkg$' | \
    grep -v '/txt$' | \
    grep -v '/layout' | \
    grep -v '/streik' | \
    grep -v '/scripts' | \
    grep -v '/sources' | \
    grep -v '/curriculum$' | \
    sort`
do
#   echo "$item"
    cgi "$item" "$serv"
done