#!/bin/ksh

# Return absolute path
# Peter Guntert, 15-01-1999

if [ $# -ne 1 ]; then echo "Usage: abspath path"; exit 1; fi
echo `pwd`,`eval echo $1` | \
sed -e 's@^/tmp_mnt@@' -e 's@,/tmp_mnt@@' \
    -e 's@/,@,@' -e 's@//@/@g' -e 's@//@/@g' -e 's@/[.]/@/@g' \
    -e 's@.*,/@/@' \
    -e 's@,\([^/.]\)@/\1@' \
    -e 's@,[.]/@/@' -e 's@,[.]$@@' \
    -e 's@/[^/][^/]*,[.][.]@@' \
    -e 's@/[^/][^/]*/[.][.]@@' \
    -e 's@/[^/][^/]*/[.][.]@@' \
    -e 's@/[^/][^/]*/[.][.]@@' \
    -e 's@/[^/][^/]*/[.][.]@@' \
    -e 's@/[^/][^/]*/[.][.]@@' \
    -e 's@/[^/][^/]*/[.][.]@@' \
    -e 's@^$@/@' -e 's@^/[.][.]@/@' -e 's,//,/,g'
