#!/bin/sh

PREFIX=
. "$PREFIX/lib/libalpine.sh"


usage() {
	cat <<__EOF__
usage: setup-proxy [-hq] [PROXYURL]

Setup http proxy

options:
 -h  Show this help
 -q  Quiet mode

If PROXYURL is not specified user will be prompted.
__EOF__
        exit 1
}



while getopts "hq" opt; do
	case "$opt" in
	q) quiet=1;;
	h) usage;;
	esac
done

shift $(( $OPTIND - 1))

proxyurl="$1"

PROFILE="$ROOT/etc/profile.d/proxy.sh"

if [ -f "$PROFILE" ] ; then
	. $PROFILE
fi

suggest=${http_proxy:-none}
while true; do
	case "$proxyurl" in
		http://*) break;;
		none) proxyurl= ; break;;
	esac
	echon "HTTP/FTP proxy URL? (e.g. 'http://proxy:8080', or 'none') [$suggest] "
	default_read proxyurl $suggest
done

if [ -z "$proxyurl" ]; then
	rm -f "$PROFILE"
else
	cat >"$PROFILE" <<__EOF__
# this file was generated with and might get overwritten by setup-proxy

export http_proxy=$proxyurl
export https_proxy=$proxyurl
export ftp_proxy=$proxyurl
__EOF__
fi

[ -e "$PROFILE" ] || exit 1

if [ -z "$quiet" ]; then
	echo -e "\nTo make changes active please do login again or source $PROFILE\nwith \". $PROFILE\""
fi