#!/bin/sh

#
#	Handle simple authorization tasks
#
#	Given a username and password on stdin, print the
#	authorization code (a.k.a. hashed password)
#
getval() {
    # <INPUT TYPE=hidden NAME="DV_DATA" VALUE="1050156126739">
    what=$1
    where=$2
    eval $what=`sed -n "s/^.*\"$what\" *VALUE=\"\([^\"]*\)\".*/\1/p" < $where`
}

UA="Mozilla/4.0 (compatible; MSIE 5.5; Windows 98)"
LT=$HOME/.linuxtrade

case "$1" in
moneyam.com)
	read username
	read password
	URL="https://www.moneyam.com/action/user/processLogin"
	curl -A "$UA" -s \
	    -D- \
	    -d action=login \
	    -d username=$username \
	    -d password=$password \
	    -d saveDetails=on \
	    -o/dev/null $URL \
	    | sed -n 's/Set-Cookie: JSESSIONID=\([^;]*\).*/\1/p'
	;;

esignal.com)
	read username
	read password
	URL="http://mc.esignal.com/mcAuth.asp"
	PAGE=$LT/esignal.page
	# Authentication is fruity with this streamer.  It can take up
	# to 3 tries to get a valid key *and* a valid IP address.
	for i in 1 2 3 4; do
	    curl -L -A "$UA" -s \
		"-duser=$username" \
		"-dpassword=$password" \
		"-dsubmit=GO" \
		$URL > $PAGE
	    # cp $PAGE /tmp/$i
	    key=`sed -n 's/^.*&key=\([^&"'"'"']*\).*/\1/p' < $PAGE`
	    host=`sed -n 's/^.*&host=\([^&"'"'"']*\).*/\1/p' < $PAGE`
	    case "$host" in
	    "")
		    if [ "$key" != "" ]; then
			echo "$key";
			echo "mc.esignal.com";
			exit 0;
		    fi
		    ;;
	    *)
		    if [ "$key" != "" ]; then
			echo "$key";
			echo "$host";
			exit 0;
		    fi
		    ;;
	    esac
	    ecode=`sed -n 's/^.*&ecode=\([^&"]*\).*/\1/p' < $PAGE`
	    if [ "$ecode" != "" ]; then
		: #break;
	    fi
	    sleep 1
	done
	echo "invalid-password"
	echo "invalid-host"
	;;

old.money.net)
	read username
	read password
	URL="http://www.money.net/members/login.php"
	URL="$URL?username=$username"
	URL="$URL&password=$password"
	curl -A "$UA" -s -D- -o/dev/null $URL \
		| sed -n 's/Set-Cookie: id=\([^;]*\).*/\1/p'
	echo "invalid password"
	;;

money.net)
	read username
	read password
	URL="http://www.money.net/members/login.php"
	curl -A "$UA" -s \
		-d"username=$username" \
		-d"password=$password" \
		-D- -o/dev/null $URL \
		| sed -n 's/Set-Cookie: id_verified=\([^;]*\).*/\1/p'
	echo "invalid password"
	;;

datek.com)
	read username
	read password
	# URL="https://investment.datek.com/streamer/gostreamer.htm"
	URL="https://investment.datek.com/datek/"
	curl -A "$UA" -s \
		-d ssymbol= -d streamer=streamerLoader -d "__chx=WLOGIN  " \
		-u "$username:$password" \
		"$URL" \
		| sed -n -e 's/.*var paramP = "\(.*\)";.*$/\1/p'
	echo "invalid password"
	;;

ameritrade.com|freetrade.com)
	case "$1" in
	a*)
	    short=amer
	    SHORT=AMER
	    site=wwws.ameritrade.com
	    ;;
	f*)
	    short=free
	    SHORT=FREE
	    site=wwws.freetrade.com
	    ;;
	esac
	read username
	read password
	COOKIES=$LT/$short.cookies
	PAGE=$LT/$short.page
	rm -f $COOKIES

	# Pull up login page
	curl -A "$UA" -s -c $COOKIES \
	    https://$site/apps/LogIn/ > $PAGE.1
	getval DV_DATA $PAGE.1

	# Login and get main page
	curl -A "$UA" -s -b $COOKIES -c $COOKIES \
	    -d "pagehandler=PHLogIn" \
	    -d "USERGROUP=ACCT" \
	    -d "USERID=$username" \
	    -d "DV_DATA=$DV_DATA" \
	    -d "PASSWORD=$password" \
	    -d "logon=Login Now" \
	    -d "COMPANY=$SHORT" \
	    https://$site/cgi-bin/apps/LogInMain \
	    > $PAGE.2

	# Pull up streamer console page
	curl -A "$UA" -s -b $COOKIES -c $COOKIES \
	    https://$site/cgi-bin/apps/LaunchStreamerConsole \
	    > $PAGE.3

	# Extract authentication data from console page
	getval token $PAGE.3
	getval timestamp $PAGE.3
	getval cddomain $PAGE.3
	getval acl $PAGE.3
	echo $token $timestamp $cddomain $acl
	;;

prophet.net)
	read username
	read password
	COOKIES=$LT/pf.cookies
	curl -L -A "$UA" -s \
	    -c $COOKIES \
	    -d "username=$username" \
	    -d "password=$password" \
	    -d "login=Sign+In" \
	    http://www.prophet.net/forms/signin.jsp \
	    > /dev/null
	echo $COOKIES
	;;

p*|prophetfinance.com)
	read username
	read password
	USERNAME=`echo "$username" | tr '[a-z]' '[A-Z]' `
	COOKIES=$LT/pf.cookies
	curl -A "$UA" -s \
		-d "path=/Default.asp" \
		-d "pagequery=1|eq|1" \
		-d "UserName=$username" \
		-d "PassWord=$password" \
		-d "Login=Login" \
		-D $COOKIES \
		https://www.prophetfinance.com/forms/login.asp \
		> /dev/null

	curl -s -b $COOKIES \
		"http://www.prophetfinance.com/servlet/ConfigServer?cmd=config.get&product=JC&hostname=www.prophetfinance.com&userrights=In,Mu,St&username=$USERNAME&stockWizard=1&cachekey=391859796926765888" |
		sed -n '/authkey/s/.*|\(.*\)/\1/p'

	;;

quote.com|livecharts.com|lycos.com)
	#
	#	Get the encoded form of the password, for use in grabbing
	#	charts.  Output the encrypted password as well as the
	#	filename of the applet page.
	#
	read username
	read password
	LOCATION=$LT/lc.location
	COOKIES=$LT/lc.cookies
	PAGE=$LT/lc.page
	> $COOKIES
	#
	# Authorize, following Location: redirects until we have collected
	# all of the cookies.  I think there are 3 redirects in total.
	#
	curl -A "$UA" -s -o$PAGE \
                -d "m_PR=4" \
                -d "m_CBURL=http://finance.lycos.com/Default.asp?symbols=" \
                -d "m_CBERRURL=http://finance.lycos.com/Default.asp?symbols=" \
                -d "m_HOSTURL=" \
                -d "m_TRURL=" \
                -d "Z=`date +%s`" \
                -d "m_LANG=1" \
                -d "m_BDATA=" \
                -d "m_DL_FREE=1" \
                -d "m_U=$username" \
                -d "m_P=$password" \
                -d "m_AS=1" \
                -d "m_WS=on" \
                -D $LOCATION \
		-c $COOKIES -L \
                http://ldbauth.lycos.com/cgi-bin/mayaLogin

	#
	# Now fetch the page with the applet, and snarf the password
	#
	curl -L -A "$UA" -s -o$PAGE -b$COOKIES -c$COOKIES \
		"http://finance.lycos.com/home/livecharts/body.asp"
	sed -n '/<param name="Pswd" value="/s/.*="\(.*\)".*/\1/p' <$PAGE
	echo $PAGE
	;;

yahoo.com)
	COOKIES=$LT/yahoo.cookies
	LOGINHTML=$LT/yahoologin.html

	#get the initial login page
	URL="http://login.yahoo.com/config/login"
	URL="$URL?.src=quote&.intl=us"
	URL="$URL&.done=http://finance.yahoo.com/?u"
	curl -A "$UA" -c $COOKIES -s -L "$URL" > $LOGINHTML

	#pull out the form values needed to login
	UVAL=`grep -i "\"\.u\"" $LOGINHTML |
		sed -e 's/^.*value="//' -e 's/".*//'`
	CHALLENGE=`grep -i "name=\"\.challenge\"" $LOGINHTML |
		sed -e 's/^.*value="//' -e 's/".*//'`

	read username
	read password

	URL="http://login.yahoo.com/config/login"
	URL="$URL?.tries=&.src=ym&.last=&promo=&.intl=us"
	URL="$URL&.bypass=&.partner="
	URL="$URL&.u=${UVAL}&.v=0&.challenge=${CHALLENGE}"
	URL="$URL&.emailCode=&hasMsgr=1&.chkP=Y&.done="
	URL="$URL&login=${username}&passwd=${password}"
	URL="$URL&.persistent=&.save=1&.hash=0&.js=0&.md5=0"
	curl -A "$UA" -b "$COOKIES" -c $COOKIES -s -L "$URL" > /dev/null
	# Netscape HTTP Cookie File
	# http://www.netscape.com/newsref/std/cookie_spec.html
	# This file was generated by libcurl! Edit at your own risk.

	#.yahoo.com	TRUE	/	FALSE	1271361600	B	espjofoubfq9p&b=2
	#.yahoo.com	TRUE	/	FALSE	0	Y	v=1&n=1d18rptjs34te&l=b8dknjh034/o&p=m1p1m2vc01000300&r=9d&lg=us&intl=us&np=1
	#.yahoo.com	TRUE	/	FALSE	0	T	z=8k.t8A8qTu8AU0yLN4ezM5M&a=QAE&sk=DAAxT4Xsgbj6e7&d=YQFRQUUBdGYBQkFBAXp6AThrLnQ4QWdXQQ--&af=QStBQmdBJnRzPTEwMTg2ODU3NTYmcHM9dEw1N19wZzZKcXQ1RzBsX2FxRzdpUS0t
	#.yahoo.com	TRUE	/	FALSE	1271361600	C	mg=1
	cookies=
	while read site flag1 path flag2 time name val
	do
		case "$site" in
		"#"*)	continue;;
		"")	continue;;
		esac
		cookies="$cookies $name=$val;"
	done < $COOKIES
	echo "$cookies"
	
	;;

*)
	echo "unknown streamer"
	;;
esac