JScript: Эмуляция браузера

var CreateObject = function (ProgId) { return WScript.CreateObject(ProgId)};

var oXMLHTTP = CreateObject("Msxml2.ServerXMLHTTP.6.0");
var text;

oXMLHTTP.open ("GET", "http://m.vk.com/login", false);
oXMLHTTP.setRequestHeader ("Content-Type", "application/x-www-form-urlencoded"); 
oXMLHTTP.send();
text = oXMLHTTP.responseText;

var link;

text.replace(/action = "[^"]+/, function (m) {link=m.split('"')[1]});

WScript.Echo("Получили линк на акшн формы. Теперь отправим туда наши мыло и пароль. «"+link+"»");

oXMLHTTP.open ("POST", link, false);
oXMLHTTP.setRequestHeader ("Content-Type", "application/x-www-form-urlencoded"); 
oXMLHTTP.send("email=***@mail.ru&pass=***");
text = oXMLHTTP.responseText;
WScript.Echo(text);

Server: nginx/0.7.59
Date: Sat, 01 Oct 2011 13:27:44 GMT
Content-Type: text/html; charset=windows-1251
Connection: keep-alive
X-Powered-By: PHP/5.2.6-1+lenny3
Pragma: no-cache
Cache-control: no-store
P3P: CP="IDC DSP COR ADM DEVi TAIi PSA PSD IVAi IVDi CONi HIS OUR IND CNT"
Location: http://vkontakte.ru/login?m=1&email=
Vary: Accept-Encoding
Content-Length: 0

var CreateObject = function (ProgId) { return WScript.CreateObject(ProgId)};

function Log(e)
{
	WScript.Echo(e);
}

function Browser()
{
	this.XMLHTTP = CreateObject("Msxml2.ServerXMLHTTP.6.0");
	this.Redirect = true;
	this.Response = null
	this.ResponseHeaders = null;
	this.Location = null;
	this.UserAgent = 'Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.9.0.1) Gecko/2008071615 Fedora/3.0.1-1.fc9 Firefox/3.0.1';
	this.__Document = CreateObject("HTMLFile");
}

Browser.prototype = 
{
	Navigate : function (GetOrPost, URL, Param, Callback)
	{
		if (URL.indexOf("://")!=-1) this.Location=URL; else
		{
			if (!this.Location) return;
			this.Location = this.Location.match(/(^\w+:\/\/[\w\.]+)\//)[1]+URL;
		}
		
		URL = this.Location;
		
		if (/:\/\//.test(URL)) 
	
		Log("Navigate\t"+URL);
	
		Callback = Callback || function (){}; 
		!Param? Param = null : "";
		GetOrPost = GetOrPost.toUpperCase();
		
		this.XMLHTTP.open(GetOrPost, URL, false);
		this.XMLHTTP.setRequestHeader ('User-agent', this.UserAgent);
		this.XMLHTTP.setRequestHeader ("Content-Type", "application/x-www-form-urlencoded"); 
		this.XMLHTTP.setRequestHeader ("Accept", "text/html"); 
		if (GetOrPost=="POST") this.XMLHTTP.setRequestHeader ('Content-length', Param.length);
//		this.XMLHTTP.setRequestHeader ('Connection', 'close');
		this.XMLHTTP.send(GetOrPost=="POST"? Param : null);
		
		this.ResponseHeaders = this.XMLHTTP.getAllResponseHeaders();
		this.Response = this.XMLHTTP.responseText;
		
		Log([this.ResponseHeaders, this.Response].join("\n"));
//		Log("————————————————————————————————");
		Callback(this.ResponseHeaders, this.Response);
				
		if (this.Redirect)
		{
			var s="";
			if (this.ResponseHeaders && /Location: */.test(this.ResponseHeaders))
			{
				s=this.ResponseHeaders.match(/Location: *([^\n\r]+)/i)[1].toString();
				Log("Redirect to\t"+s);
				this.Navigate("GET", s, null, Callback);
			}
		}
	}, 
	
	ParseDocument : function ()
	{
		this.__Document.open();
		this.__Document.write(this.Response || "");
		this.__Document.close();
		return this.__Document;
	}, 
	
	SubmitForm : function (FormNameOrIndex, Values, Callback) // Values {param1:value1, param2:value2}
	{
		var DOM = this.ParseDocument();
		if (DOM.forms.length>0) 
		{
			var Form = DOM.forms[FormNameOrIndex];
			var InputElements = Form.getElementsByTagName('input');
			var Result=[];
			for (var i=0, l=InputElements.length; i<l; i++)
			if (InputElements[i].name && InputElements[i].name!="")
			Result.push(''+InputElements[i].name+'='+ InputElements[i].value);
			
			Result=Result.join("&");
			for (i in Values)
			{
				var re = new RegExp('(^|&)'+i+"=[^&]+","i")
				Result= Result.replace(re, '$1'+i+"="+Values[i]);
			}
			
			WB.Navigate(Form.method, Form.action, Result, Callback);
		}		
	}
}

function c(a,b)
{
	Log([a]);
}

var WB = new Browser();
	WB.Navigate("GET", "http://m.vk.com/");
	WB.SubmitForm(0, {email:"***@mail.ru", pass:"***"});
	WScript.Echo(WB.ParseDocument().body.innerText);

    WB.Navigate("GET", "http://odnoklassniki.ru/", null, c);
    WB.SubmitForm(0, {"st.email":"***@mail.ru", "st.email":"***"}, c);
    
    WB.Navigate("GET", "http://m.mail.ru/cgi-bin/login?noclear=1&page=folders");
    WB.SubmitForm(0, {"Login":"***","Domain":"mail.ru", "Password":"***"});

var VB = new ActiveXObject("htmlfile").parentWindow;	
VB.document.write("<script language='VBScript'>Function GetData(Obj, data, num, bytTotal)\nObj.GetData data, num, bytTotal\nGetData = data\nEnd Function</script>");
var 
	Port = 9999,
	MainSocket = WScript.CreateObject("MSWinsock.Winsock.1","MainSocket_"),
	Sockets = {};
	MainSocket.LocalPort = Port;
	MainSocket.Listen();

var Host = this;

function MainSocket_ConnectionRequest(requestID)
{
	var NewSocket = WScript.CreateObject("MSWinsock.Winsock","Socket_");
	NewSocket.Accept(requestID);
	Sockets[NewSocket.SocketHandle]=NewSocket;
}

function Socket_SendComplete()
{
	delete Sockets[this.SocketHandle];
	this.Close();
	WScript.DisconnectObject(this);
}

function Socket_DataArrival(bytTotal)
{
  var Data = VB.GetData (this, Data, 8, bytTotal);
  this.SendData("HTTP/1.1 200 OK\n\n"+Data);
  return;
  }

while(1)WScript.Sleep(10);

var CreateObject = function (ProgId) { return WScript.CreateObject(ProgId)};

function Log(e)
{
	WScript.Echo(e);
}

function Browser()
{
	this.XMLHTTP = CreateObject("Msxml2.ServerXMLHTTP.6.0");
	this.Redirect = true;
	this.Response = null;
	this.Referer = true;
	this.RefererString = null;
	this.ResponseHeaders = null;
	this.Location = null;
	this.UserAgent = 'Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.9.0.1) Gecko/2008071615 Fedora/3.0.1-1.fc9 Firefox/3.0.1';
	this.__Document = CreateObject("HTMLFile");
}

Browser.prototype = 
{
	Navigate : function (GetOrPost, URL, Param, Callback, RefererStr)
	{
		this.RefererString = RefererStr || this.Location;
	
		if (URL.indexOf("://")!=-1) this.Location=URL; else
		{
			if (!this.Location) return;
			this.Location = this.Location.match(/(^\w+:\/\/[\w\.]+)\//)[1]+URL;
		}
		
		URL = this.Location;
		
		if (/:\/\//.test(URL)) 
	
		Log("Navigate\t"+URL);
	
		Callback = Callback || function (){}; 
		!Param? Param = null : "";
		GetOrPost = GetOrPost.toUpperCase();
		
		this.XMLHTTP.open(GetOrPost, URL, false);
		this.XMLHTTP.setRequestHeader ('User-agent', this.UserAgent);
		this.XMLHTTP.setRequestHeader ("Content-Type", "application/x-www-form-urlencoded"); 
		this.XMLHTTP.setRequestHeader ("Accept", "text/html"); 
		if (this.Referer && this.RefererString)
			this.XMLHTTP.setRequestHeader ("Referer", this.RefererString); 
		
		if (GetOrPost=="POST") 
		{
			this.XMLHTTP.setRequestHeader ('Content-length', Param.length);
			this.XMLHTTP.setRequestHeader ('Connection', 'close');
		}
		this.XMLHTTP.send(GetOrPost=="POST"? Param : null);
		
		this.ResponseHeaders = this.XMLHTTP.getAllResponseHeaders();
		this.Response = this.XMLHTTP.responseText;
		
		Log([this.ResponseHeaders, this.Response].join("\n"));
		Callback(this.ResponseHeaders, this.Response);
				
		if (this.Redirect)
		{
			var s="";
			if (this.ResponseHeaders && /Location: */.test(this.ResponseHeaders))
			{
				s=this.ResponseHeaders.match(/Location: *([^\n\r]+)/i)[1].toString();
				Log("Redirect to\t"+s);
				this.Navigate("GET", s, null, Callback);
			}
		}
	}, 
	
	ParseDocument : function ()
	{
		this.__Document.open();
		this.__Document.write(this.Response || "");
		this.__Document.close();
		return this.__Document;
	}, 
	
	SubmitForm : function (FormNameOrIndex, Values, Callback) // Values {param1:value1, param2:value2}
	{
		var DOM = this.ParseDocument();
		if (DOM.forms.length>0) 
		{
			var Form = DOM.forms[FormNameOrIndex];
			var InputElements = Form.getElementsByTagName('input');
			var Result=[];
			for (var i=0, l=InputElements.length; i<l; i++)
			if (InputElements[i].name && InputElements[i].name!="")
			Result.push(''+InputElements[i].name+'='+ InputElements[i].value);
			
			Result=Result.join("&");
			for (i in Values)
			{
				var re = new RegExp('(^|&)'+i+"=[^&]+","i")
				Result= Result.replace(re, '$1'+encodeURIComponent(i)+"="+encodeURIComponent(Values[i]));
			}
			
			WB.Navigate(Form.method, Form.action, Result, Callback);
		}		
	}
}

function c(a,b)
{
	Log([a, b]);
}

var WB = new Browser();
	WB.Navigate("GET", "http://m.vk.com/", null, c);
	WB.SubmitForm(0, {email:"***@mail.ru", pass:"***"}, c);

	WScript.Echo(WB.ParseDocument().body.innerText);

//	WB.Navigate("GET", "http://odnoklassniki.ru/", null, c);
//	WB.SubmitForm(0, {"st.email":"***@mail.ru", "st.email":"***"}, c);
	
//	WB.Navigate("GET", "http://m.mail.ru/cgi-bin/login?noclear=1&page=folders");
//	WB.SubmitForm(0, {"Login":"***","Domain":"mail.ru", "Password":"***"});

	WB.Navigate("GET", "http://localhost:9999");
	WB.Navigate("POST", "http://localhost:9999", encodeURI("Login=jsman@m.ru&Password=йцукен"));


//	WB.Navigate("GET", "http://internet.yandex.ru/");
	
	WScript.Echo(WB.ParseDocument().body.innerText);

var h = WScript.CreateObject("HTMLFile");
h.open();
h.close();

h.body.innerHTML = "<span>123</span><script language=\"javascript\">alert(2)</script>";
WScript.Echo(h.body.innerHTML);

var WB = new Browser();
WB.Navigate('GET', 'http://ya.ru/');

var resp = WB.ParseDocument().body.innerHTML;
WScript.Echo(resp);

var url = 'http://ya.ru/';

var xmlhttp = new ActiveXObject('Msxml2.XMLHTTP');
xmlhttp.open('GET', url, false);

xmlhttp.send();

var resp = xmlhttp.responseText;
WScript.Echo(resp);

function Log(e)
{
//    LogFile.WriteLine(e);  
    //WScript.Echo(e);
return e;
}


function Browser()
{
    this.XMLHTTP = CreateObject("Msxml2.ServerXMLHTTP.6.0");
    this.Redirect = true;
    this.Response = null;
    this.Referer = true;
    this.RefererString = null;
    this.ResponseHeaders = null;
    this.Location = null;
    this.__CookieStorage = " ";
    this.UserAgent = 'Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.9.0.1) Gecko/2008071615 Fedora/3.0.1-1.fc9 Firefox/3.0.1';
    this.__Document = CreateObject("HTMLFile");
    this.Cookie = true;
    this.Status = 0;
}

Browser.prototype = 
{
    __ParseCookie : function (m, cookie)
    {
        if (!this.__CookieStorage) this.__CookieStorage =" ";
        this.__CookieStorage+=" "+cookie+";";
//        Log("Cookie Storage:\t"+this.__CookieStorage);
    },
    
    ClearCookies : function ()
    {
        this.__CookieStorage=" ";
    },

    Navigate : function (GetOrPost, URL, Param, Callback, RefererStr)
    {
        WScript.Sleep(300);
        this.RefererString = RefererStr || this.Location;
    
        if (URL.indexOf("://")!=-1) this.Location=URL; else
        {
            if (!this.Location) return;
            this.Location = this.Location.match(/(^\w+:\/\/[\w\.]+)\//)[1]+URL;
        }
        
        URL = this.Location;
        
        if (/:\/\//.test(URL)) 
        Log("Navigate\t"+URL);
    
        Callback = Callback || function (){}; 
        !Param? Param = null : "";
        GetOrPost = GetOrPost.toUpperCase();
        
        this.XMLHTTP.open(GetOrPost, URL, false);
        this.XMLHTTP.setRequestHeader ('User-agent', this.UserAgent);
        this.XMLHTTP.setRequestHeader ("Content-Type", "application/x-www-form-urlencoded"); 
        this.XMLHTTP.setRequestHeader ("Accept", "text/html"); 
        if (this.Referer && this.RefererString)
            this.XMLHTTP.setRequestHeader ("HTTP_REFERER", this.RefererString); //this.RefererString
        
        if (GetOrPost=="POST") 
        {
            this.XMLHTTP.setRequestHeader ('Content-length', (!Param?"":Param).length);
            this.XMLHTTP.setRequestHeader ('Connection', 'close');
        }
        
        this.XMLHTTP.setRequestHeader ("Cookie", "test");
        
        if (this.Cookie && this.__CookieStorage!=" ")
        {
            this.XMLHTTP.setRequestHeader ("Cookie", this.__CookieStorage);
        }

    var e;
        try {
            this.XMLHTTP.send(GetOrPost=="POST"? Param : null);
            this.Status = this.XMLHTTP.status;
        } catch (e) {this.Status = 302;}
        
        this.ResponseHeaders = this.XMLHTTP.getAllResponseHeaders();

        try {this.Response = this.XMLHTTP.responseText;} catch (e) {this.Response="";};

        if (this.Cookie)
        {
            this.ResponseHeaders.replace(/^Set-Cookie *: *([^;]+)/igm, function( obj ){ return function (m, cookie){ obj.__ParseCookie(m, cookie) } }(this));
        }

        Log(["Response status:\t"+this.Status, "\n\nResponseHeaders:\n\n"+this.ResponseHeaders, "\n\nResponse:\n\n"+this.Response]);
        Callback(this.Status, this.ResponseHeaders, this.Response);
        
        if (this.Redirect)
        {
            var s="";
            if (this.ResponseHeaders && /^Location: */im.test(this.ResponseHeaders))
            {
                s=this.ResponseHeaders.match(/^Location: *([^\n\r]+)/im)[1].toString();
                Log("Redirect to\t"+s);
                this.Navigate("GET", s, null, Callback);
            }
        }
    }, 
    
    ParseDocument : function ()
    {
        var Code = (this.Response || "").replace(/<script([^>]*)/, "<script type=\"text/plain\"");
        this.__Document.open();
        this.__Document.write(Code);
        this.__Document.close();
        return this.__Document;
    }, 
    
    SubmitForm : function (FormNameOrIndex, Values, Callback) // Values {param1:value1, param2:value2}
    {
        var DOM = this.ParseDocument();
        if (DOM.forms.length>0) 
        {
            var Form = DOM.forms[FormNameOrIndex];
            var InputElements = Form.getElementsByTagName('input');
            var Result=[];
            for (var i=0, l=InputElements.length; i<l; i++)
            if (InputElements[i].name && InputElements[i].name!="")
            Result.push(''+InputElements[i].name+'='+ InputElements[i].value);
            
            Result=Result.join("&");
            for (i in Values)
            {
                var re = new RegExp('(^|&)'+i+"=[^&]*","i")
                Result= Result.replace(re, '$1'+encodeURIComponent(i)+"="+encodeURIComponent(Values[i]));
                
                if (!re.test(Result)) Result+="&"+encodeURIComponent(i)+"="+encodeURIComponent(Values[i]);
            }
            
//            Log("Serialized Form Data:\t"+Result);
            this.Navigate(Form.method, Form.action, Result, Callback);
        }        
    }
}

Dim WithEvents WinHttpRequest As WinHttp.WinHttpRequest

Private Sub WinHttpRequest_OnError(ByVal ErrorNumber As Long, ByVal ErrorDescription As String)

End Sub

Private Sub WinHttpRequest_OnResponseDataAvailable(Data() As Byte)

End Sub

Private Sub WinHttpRequest_OnResponseFinished()

End Sub

Private Sub WinHttpRequest_OnResponseStart(ByVal Status As Long, ByVal ContentType As String)

End Sub