#!/bin/sh

[ $# -ne 2 ] && exit 1

case $1 in
ftp|http)	ltype=$1
		;;
*)		exit 2
		;;
esac

url=$2
prefix=~/www.download
proxy=off
urlfile=$prefix/`basename $url`
logfile=$urlfile.$$.log
wgetfile=$urlfile.$$.sh

[ -d $prefix ] || mkdir $prefix

newurl=`dialog --clear --title "URL for downloading" --inputbox "" 8 60 $url 2>&1 >/dev/tty`

if [ $? -eq 0 -a "X${newurl}" != "X" ]; then
	case $newurl in
	ftp://?*)
		newltype=ftp
		;;
	http://?*)
		newltype=http
		;;
	*)	dialog --clear --title "Error" --msgbox "Bad URL. Use http:// or ftp:// only." 5 -1
		exit 3
		;;
	esac

	case $newltype in
	ftp)	[ "X${ftp_proxy}" != "X" ] && proxy=on
		;;
	http)	[ "X${http_proxy}" != "X" ] && proxy=on
		;;
	esac

	[ $proxy = on ] && {
		dialog --clear --yesno "Use proxy" 5 -1 || proxy=off
	}

	printf "#!/bin/sh\n\n" >$wgetfile
	[ $proxy = on ] && {
		[ "X${ftp_proxy}" != "X" ] && \
			echo "ftp_proxy=$ftp_proxy; export ftp_proxy" >>$wgetfile
		[ "X${http_proxy}" != "X" ] && \
			echo "http_proxy=$http_proxy; export http_proxy" >>$wgetfile
	}
	echo "
nohup wget -o $urlfile.log -t 10 -c -T 900 \\
	-Y $proxy -x -P $prefix -nr -- \\
	$newurl >/dev/null 2>&1 &" >>$wgetfile

	nohup wget -o $logfile -t 10 -c -T 900 -Y $proxy -x -P $prefix -nr -- \
		$newurl >/dev/null 2>&1 &
fi

exit 0