4 # print reversed relative path to $1
8 expr "$1" : "\(/[^/]*\)"
13 expr "$1" : "/[^/]*\(.*\)"
18 if expr "$1" : '/' > /dev
/null
2>&1; then
21 from
=`(cd "$1" && pwd) | sed 's://*:/:g'`
22 to
=`pwd | sed 's://*:/:g'`
25 while [ -n "$t" -a "$t" = "$f" ]; do
31 i
=`echo $from | sed -e 's:[^/]\+:..:g'`
32 i
=`echo $i | sed -e 's:/[.][.]:..:'`