Generate a Disqus SSO payload with Coldfusion

gistfile1.cfm

<cfcomponent displayname="Comment" hint="Disqus Interface">

<cfset VARIABLES.stcMemberInfo = StructNew() />
<cfset VARIABLES.intUnixTimestamp = DateDiff("s", CreateDate(1970,1,1), Now()) />
<cfset VARIABLES.stgPublicKey = "">
<cfset VARIABLES.stgPrivateKey = "">
<cfset VARIABLES.stgForumShortName = "">

<cfset getMemberInfo() >

<cffunction name="DISQUS_HMAC_SHA1" returntype="string" access="public" output="false">
<cfargument name="signKey" type="string" required="true" />
<cfargument name="signMessage" type="string" required="true" />
<cfset var strKey=createObject("java", "java.lang.String") />
<cfset var strData=createObject("java", "java.lang.String") />
<cfset var key=createObject("java", "javax.crypto.spec.SecretKeySpec") />
<cfset var mac=createObject("java", "javax.crypto.Mac") />
<cfset var messageDigest=createObject("java", "java.security.MessageDigest") />
<cfset var sha1=messageDigest.getInstance("SHA1") />
<cfset var strMessage=createObject("java", "java.lang.String") />
<cfset var strTimestamp=createObject("java", "java.lang.String") />
<cfset strKey=strKey.init(ARGUMENTS.signKey) />
<cfset strData=strData.init(ARGUMENTS.signMessage) />

<cfset key=key.init(strKey.getBytes(), "HMACSHA1") />
<cfset mac=mac.getInstance(key.getAlgorithm()) />
<cfset mac.init(key) />
<cfset output = BinaryEncode(mac.doFinal(ARGUMENTS.signMessage.getBytes()), "hex") />
<cfreturn output />
</cffunction>

<cffunction name = "createLoginToken" access = "public" output = "false">
<cfscript>
var intTimestamp = VARIABLES.intUnixTimestamp + 8 * 60 * 60; //add an 8 hour offset to the Unix Timestamp
var stgData = "";
var stgMessage = "";
var stgSignature = "";
</cfscript>
<cfif ! StructKeyExists(VARIABLES.stcMemberInfo, "id")>
<cfreturn "" />
</cfif>
<cfscript>
stgData = SerializeJSON(VARIABLES.stcMemberInfo);
stgMessage = ToBase64(stgData) & " " & intTimestamp;
stgSignature = DISQUS_HMAC_SHA1( VARIABLES.stgPrivateKey, stgMessage);
return ToBase64(stgData) & " " & stgSignature & " " & intTimestamp;
</cfscript>

</cffunction>

<cffunction name = "embed" access = "public" output = "true">
<cfargument name="stgUniqueThreadIdentifier" type="string" required="yes">
<cfargument name="stgUrl" type="string" required="no" default = "">

<cfset var stgReturn = '
<div id="disqus_thread"></div>
<script type="text/javascript">
/* * * CONFIGURATION VARIABLES: EDIT BEFORE PASTING INTO YOUR WEBPAGE * * */
var disqus_shortname = "#VARIABLES.stgForumShortName#"; // required: replace example with your forum shortname
var disqus_developer = 1;
var disqus_identifier = "#ARGUMENTS.stgUniqueThreadIdentifier#";
alert("#VARIABLES.stcMemberInfo.avatar#");

/* * * DON''T EDIT BELOW THIS LINE * * */
(function() {
var dsq = document.createElement("script"); dsq.type = "text/javascript"; dsq.async = true;
dsq.src = "//" + disqus_shortname + ".disqus.com/embed.js";
(document.getElementsByTagName("head")[0] || document.getElementsByTagName("body")[0]).appendChild(dsq);
})();

var disqus_config = function() {
this.page.remote_auth_s3 = "#createLoginToken()#";
this.page.api_key = "#VARIABLES.stgPublicKey#";
}
</script>
<noscript>Please enable JavaScript to view the <a href="http://disqus.com/?ref_noscript">comments powered by Disqus.</a></noscript>
<!--
<a href="http://disqus.com" class="dsq-brlink">blog comments powered by <span class="logo-disqus">Disqus</span></a>
-->' >
<cfreturn stgReturn>
</cffunction>

</cfcomponent>

Problems using it:

1. Id is float. : fix: javaCast("int",id));
2. stcMemberInfo in upper-case. Fix:
   memberinfo = {};
   memberinfo["id"] = 0;
   memberinfo["name"] = "";
   memberinfo["email"] = "";
   memberinfo["avatar"] = "";
   memberinfo["url"] = "";

problem is even though I tested it in disqus.com console, and results look ok, but on site no user is created. Not sure where problem comes from.