#!/bin/sh

# (from wbt_stdcgiheader)

# decode hex_des
decodehexdes()
{
        str1="$1"
        (
        cat /u/catcom/wb/ex4/comdat/common/nav/des1.js
        cat <<JSCMD0
        var unhexdesdecode1 = des("t2", unHex("$str1"), 0, 0)
        //print("unhexdesdecode1 = [" + unhexdesdecode1 + "]")
        //print("  length = " + unhexdesdecode1.length)
        print(unhexdesdecode1)
JSCMD0
        ) | js -W
}

# encode hex_des
encodehexdes()
{
        str1="$1"
        (
        cat /u/catcom/wb/ex4/comdat/common/nav/des1.js
        cat <<JSCMD1
        function jsdes(passwd)
        {
                var passwdstr = "";
                if ( !passwd.match(/^[ \t]*$/) )
                        passwdstr = printHex( des("t2", passwd, 1, 0) );
                return passwdstr;
        }
        var hexdesencode1 = jsdes("$str1");
        print(hexdesencode1);
JSCMD1
        ) | js -W
}

#---------------------------------------------------------------------

direction="$1"
echo "direction=[$direction]"

if [ "$direction" = "in" ]; then
	str="$2"
	echo "str=[$str]"
	hexdes=`encodehexdes "$str"`
	echo "hexdes=[$hexdes]"
else
	hexdes="$2"
	str2=`decodehexdes "$hexdes"`
	echo "str2=[$str2]"
fi