asp写的openid登录方法

以前好像看到sipo说asp写openid有些不能解决的问题，我也没查openid的规范。
这个对付简单的登录还是没问题的，不过代码还没测试。

先放上来，有兴趣的可以看看

 <script language="JScript" runat="server">
/*
ASP Openid
by fisker
2008-9-3
*/
var alert=PRint=write=function(str){Response.Write(str);}
var openid = new fiskerOpenid();
var input=getInput();
if(input["openid.mode"]=="id_res"){
  var nickname = input["openid.sreg.nickname"];
  var email = input["openid.sreg.email"];
  var returnUrl=input["return"];
  returnUrl += returnUrl.indexOf("?")!=-1?"&":"?";
  returnUrl += "nickname="+nickname;
  returnUrl += "&email="+email;

  Response.Redirect(returnUrl);
}else{
  if(input["openid"]==""||input["return"]==""){
　  Response.write("<sc"+"ript>");
　  Response.write("alert(\"error\");");
　  Response.write("window.history.forward(1);");
　  Response.write("</sc"+"ript>");
　  Response.end();
  }
 
  openid.url = input["openid"];
  openid.get();
}

function getInput(){
　  var input=new Array();
　  var e=new Enumerator(Request.QueryString);
　  for (;!e.atEnd();e.moveNext()){
　　  x=e.item();
　　  input[String(x).toLowerCase()]=String(Request.QueryString(x));
　  }
　  e=new Enumerator(Request.Form);
　  for (;!e.atEnd();e.moveNext()){
　　  x=e.item();
　　  input[String(x).toLowerCase()]=String(Request.Form(x));
　  }
　  return input;
}

function fiskerOpenid(){
  this.url="";
  this.server="";
  this.delegate="";
  this.user = null;
  this.trust_root="";
  this.return_to="";
  this.sreg_required="nickname,email";

  this.get = function(info){
　  if(!this.init()){Response.write("error");return;}
　  if(info!=undefined)this.sreg_required=info;
　  var html=this.request(this.server,"openid.mode=associate&openid.assoc_type=HMAC-SHA1");
　  if (html==""){Response.write("error");return;}
　  var assoc_handle = "";
　  var assoc_type = "";
　  var expires_in = "";
　  var mac_key = "";
　  try{
　　  var re=new RegExp("assoc_handle:(.+)","ig");
　　  assoc_handle = re.exec(html)[1];
　　  var re=new RegExp("assoc_type:(.+)","ig");
　　  aassoc_type = re.exec(html)[1];
　　  var re=new RegExp("expires_in:(.+)","ig");
　　  expires_in = re.exec(html)[1];
　　  var re=new RegExp("mac_key:(.+)","ig");
　　  mac_key = re.exec(html)[1];
　　  delete re;
　  }catch(e){}

　  var url = this.server;
　  url += url.indexOf("?")!=-1?"&":"?";
　  url += "openid.mode="+Server.URLEncode("checkid_setup");
　  url += "&openid.identity="+Server.URLEncode(this.delegate);
　  url += "&openid.trust_root="+Server.URLEncode(this.trust_root);
　  url += "&openid.return_to="+Server.URLEncode(this.return_to);
　  url += "&openid.assoc_handle="+Server.URLEncode(assoc_handle);
　  url += "&openid.sreg.required="+Server.URLEncode(this.sreg_required);

　  Response.Redirect(url);
  }

  this.init = function(){
　  if(!this.check()) return false;

　  if(this.trust_root==""||this.return_to==""){
　　  var thisServer="";
　　  var thisUrl="";
　　  thisServer+=String(Request.serverVariables("https")).toLowerCase()=="off"?"http://":"https://";
　　  thisServer+=String(Request.serverVariables("server_name"));
　　  thisServer+=String(Request.serverVariables("server_port"))=="80"?"":":"+String(Request.ServerVariables("server_port"));
　　  thisUrl+=thisServer;
　　  thisUrl+=String(Request.serverVariables("URL"));
　　  thisUrl+=String(Request.QueryString)==""?"":"?"+String(Request.QueryString);
　　  this.trust_root=(this.trust_root==""?thisServer:this.trust_root);
　　  this.return_to=(this.return_to==""?thisUrl:this.return_to);
　  }

　  var html = this.request(this.url);
　  if (html=="") return false;
　  html=html.replace(/\'/ig,"\"");
　  var re=new RegExp("<link(.*?)rel=\"(.*?)\"(.*?)href=\"(.*?)\"(.*?)>","ig");
　  var arr=[];
　  while ((arrMatch = re.exec(html)) != null){
　　  var index=arrMatch[2].toLowerCase();
　　  var value=arrMatch[4];
　　  if(index.indexOf(" ")){
　　　  for(var j=0;j<index.split(" ").length;j++)arr[index.split(" ")[j]]=value;
　　  }else{
　　　  arr[index]=value;
　　  }
　  }
　  delete re;
　  if(arr["openid.server"]!=""){
　　  this.server=arr["openid.server"];
　  }else{
　　  return false;
　  }
　  this.delegate = arr["openid.delegate"]==undefined?this.url:arr["openid.delegate"];
　  return true;
  }

  this.check = function(){
　  if (this.url=="") return false;
　  if(this.url.indexOf("://")==-1) this.url="http://"+this.url;
　  return true;
  }

  this.request = function(url,data){
　  if (data == undefined)var data = null;
　  var method = data ? 'POST' : 'GET';
　  var html="";
　  try{
　　  var xmlhttp=Server.CreateObject("MSXML2.Serverxmlhttp.3.0");
　　  xmlhttp.open(method,url,false);
　　  xmlhttp.send(data);
　　　  html = this.bytesToStr(xmlhttp.responseBody);
　　  delete xmlhttp;
　  }catch(e){}
　　  return html;
　  }

  this.bytesToStr = function(CodeBody){
　  var objStream= Server.CreateObject("ado"+"db.stream") ;
　  objStream.Type = 1 ;
　  objStream.Mode =3 ;
　  objStream.Open() ;
　  objStream.Write(CodeBody);
　  objStream.Position = 0 ;
　  objStream.Type = 2 ;
　  objStream.charset = "utf-8" ;
　  var returnstr = objStream.ReadText;
　  objStream.Close();
　  delete objStream;
　  return returnstr;
  }

}
</script>

作者：fisker