| Current File : //usr/bin/X11/lft |
#!/bin/sh
#
# Copyright (c) 2007 Dmitry K. Butskoy
# <buc@citadel.stu.neva.ru>
# License: GPL v2 or any later
#
# See COPYING for the status of this software.
#
#
# Shell wrapper providing lft(8) command line interface.
#
# The original implementation of lft(8) can be obtained
# from http://pwhois.org/lft/
#
prgname=$0
opts=""
length=""
method="-T"
dport=""
sport=""
queries=2
ahead=5
scatter=20
timeout=1000
usage () {
echo "Usage: $prgname [-ACEFINRSTUVbehinpruvz] [-d dport] [-s sport]
[-m retry min] [-M retry max] [-a ahead] [-c scatter ms] [-t timeout ms]
[-l min ttl] [-H max ttl] [-L length] [-q ISN] [-D device] [--help]
[gateway ...] target:dport" >&2
}
warning () {
echo "$prgname: Option '$1' is not implemented in this wrapper" >&2
}
PARSED=`getopt -o 'ACEFINRSTUVbehinpruvzd:s:m:M:a:c:t:l:H:L:q:D:' -l help -- "$@"`
[ $? != 0 ] && exit 2
eval set -- "$PARSED"
while [ $# -gt 0 ]
do
case "$1" in
-d) dport=$2; shift 2 ;;
-s) sport=$2; shift 2 ;;
-z) sport=""; shift ;;
-m) queries=$2; shift 2 ;;
-a) ahead=$2; shift 2 ;;
-c) scatter=$2; shift 2 ;;
-t) timeout=$2; shift 2 ;;
-l) opts="$opts -f $2"; shift 2 ;;
-L) length=$2; shift 2 ;;
-D) case "$2" in
[0-9]*) opts="$opts -s $2" ;;
*) opts="$opts -i $2" ;;
esac
shift 2
;;
-H) opts="$opts -m $2"; shift 2 ;;
-I) opts="$opts -t 0x10"; shift ;;
-n) opts="$opts -n"; shift ;;
-h) shift ;;
-F) opts="$opts -O fin"; shift ;;
-u) method="-U"; shift ;;
-N) opts="$opts -A"; shift ;;
-p) method="-I"; shift ;;
-b) shift ;;
-A) opts="$opts -A"; shift ;;
-[ieErCTUV]) warning $1; shift ;;
-[Mq]) warning $1; shift 2 ;;
-[RS]) shift ;;
--help) usage; exit 0 ;;
-v) echo "\"lft\"-compatible wrapper for new Linux Traceroute" >&2;
exit 0 ;;
--) shift; break ;;
*) echo "$prgname: Internal parsing error" >&2; exit 2 ;;
esac
done
while [ $# -gt 1 ]
do
opts="$opts -g $1"
shift
done
[ $# -eq 0 ] && {
usage
exit 2
}
case "$1" in
*:*:*) host=$1 ;;
*:*) dport=${1##*:}; host=${1%:*} ;;
*) host=$1 ;;
esac
[ -n "$dport" ] && opts="$opts -p $dport"
[ -n "$sport" ] && opts="$opts --sport=$sport"
opts="$opts -q $queries"
opts="$opts -N $(($ahead * $queries))"
opts="$opts -z $scatter"
timeout=`printf "%04d" $timeout`
sec=${timeout%???}
opts="$opts -w $sec.${timeout#$sec}"
opts="$method $opts"
exec /usr/bin/traceroute.db $opts $host $length