ezx-pac_auto-pac.js

/* This include and eval public part of ezx-pac_tmp.pac */

//
$WshShell   = new ActiveXObject('WScript.Shell');
$cmd        = function(s){return /*controllable*/ $WshShell.Exec(s);}
$run        = function(s,t,r){return $WshShell.Run(s, t?t:10, r?r:false); /*?!url*/}
/*******/
try{WScript.StdOut.WriteLine()}catch(e){ //^_^ CLI. compiled?
    $run('cscript.exe //nologo "'+ WScript.ScriptFullName +'"');
    WScript.Quit();
}
//
$in     = WScript.StdIn;
$out    = WScript.StdOut;
$err    = WScript.StdErr;
$echo$  = function(s, f){if(!f)f=$out; for(var i=0; i<s.length; i++)try{f.Write(s.charAt(i))}catch(e){f.Write('?')}}
$echo   = function(s, f){if(!f)f=$out; try{f.Write(s)}catch(e){$echo$(s, f)}}
$msg    = function(s, f){$echo(s+'\n', f)}
$argv   = WScript.Arguments;
$is_dbg = $argv.Named.Exists('d');
$dsg    = function(s, f){if($is_dbg)$msg(s, f)}
//
$fso = new ActiveXObject('Scripting.FileSystemObject');
//
$textstream = function(p,m,n,t){return $fso.OpenTextFile(p, m?m:1, n?n:false, t?t:0)}
$newstream  = function(p,t){return $textstream(p, 2, true, t?t:0)}
$getstream_r  = function(p,t){return $textstream(p, 1, false, t?t:0)}
//
$readall= function(p, t) {
    // t, 0:ANSI, -1:unicode, -2:system
    var f, r = '';
	try {
		f = $getstream_r(p, t?t:0);
		r = f.ReadAll();
		f.Close();
	}
	catch (e) {}
    return r;
}
//
$bat = function(s) { //not interactive
    var oExec = $cmd(s);
    var r = '';
    oExec.StdIn.Close(); //pause?
    oExec.StdErr.Close(); //avoid stuck: sub-process write but we don't read; sub-process hasn't write but we read.
    while (!oExec.StdOut.AtEndOfStream) { //without this, `help` stucks!?
		r += oExec.StdOut.ReadAll();
    }
    return r;
}
/*******/
function get_html_text(url, dom_opr){
    var wget_plus = "cmd /c wget -c -O -";
    var ret = "";
    try {
		ret = $bat(wget_plus +' -t 3 ' +((url.indexOf('&')>-1 || url.indexOf('%')>-1) && url.indexOf('"')==-1 ? ('"'+ url.replace(/%/g, '"%"') +'"') : url)+ (!dom_opr ? "" : (" |"+ dom_opr)));
    } catch(e) {$msg("Err["+ e.name +"]: "+ e.message)}
    return ret;
}

/*******/
$base64 = {
	_keyStr: "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=",
	_utf16_encode_c: function (u) {
	    u -= 0x10000;
	    return String.fromCharCode((u >> 10) | 0xd800) + String.fromCharCode(u  & 0x3ff | 0xdc00) // LE
	},
	_utf16_decode_cc: function (c1, c2) {
	    return ((c1 & 0x3ff) << 10 | (c2 & 0x3ff)) + 0x10000
	},
	_utf16_decode_c: function (cc) {
	    return this._utf16_decode_cc(cc.charCodeAt(0), cc.charCodeAt(1))
	},
	_utf8_encode: function (string) {
		string = string.replace(/\r\n/g,"\n");
		var utftext = "";
		for (var n = 0; n < string.length; n++) {
			var c = string.charCodeAt(n);
			if (c < 0x80) {
				utftext += String.fromCharCode(c);
			}
			else if (c > 0x7f && c < 0x800) {
				utftext += String.fromCharCode((c >> 6) | 0xc0);
				utftext += String.fromCharCode((c & 0x3f) | 0x80);
			}
			else if (c > 0xd7ff && c < 0xdc00) {
			    var c1 = string.charCodeAt(n + 1);
			    if (c1 > 0xdbff && c1 < 0xe000) {
			        var u = this._utf16_decode_cc(c, c1);
                    utftext += String.fromCharCode((u >> 18) | 0xf0);
                    utftext += String.fromCharCode(((u >> 12) & 0x3f) | 0x80);
                    utftext += String.fromCharCode(((u >> 6) & 0x3f) | 0x80);
                    utftext += String.fromCharCode((u & 0x3f) | 0x80);
			        n++;
			    }
			    else {
			        utftext += "?";
			    }
			}
			else {
				utftext += String.fromCharCode((c >> 12) | 0xe0);
				utftext += String.fromCharCode(((c >> 6) & 0x3f) | 0x80);
				utftext += String.fromCharCode((c & 0x3f) | 0x80);
			}
		}
		return utftext;
	},
	_utf8_decode: function (utftext) {
		var string = "";
		var i = 0;
		var c1, c2, c3, c4;
		while ( i < utftext.length ) {
			c1 = utftext.charCodeAt(i);
			if (c1 < 0x80) {
				string += String.fromCharCode(c1);
				i++;
			}
			else if(c1 > 0xbf && c1 < 0xe0) {
				c2 = utftext.charCodeAt(i + 1);
				string += String.fromCharCode(((c1 & 0x1f) << 6) | (c2 & 0x3f));
				i += 2;
			}
			else if(c1 > 0xef && c1 < 0xf8) {
				c2 = utftext.charCodeAt(i + 1);
				c3 = utftext.charCodeAt(i + 2);
				c4 = utftext.charCodeAt(i + 3);
				string += this._utf16_encode_c(((c1 & 0x7) << 18) | ((c2 & 0x3f) << 12) | ((c3 & 0x3f) << 6) | (c4 & 0x3f));
			    i += 4;
			}
			else if(c1 > 0xf7) {
				string += '?';
			    i += 1;
			}
			else {
				c2 = utftext.charCodeAt(i + 1);
				c3 = utftext.charCodeAt(i + 2);
				string += String.fromCharCode(((c1 & 0xf) << 12) | ((c2 & 0x3f) << 6) | (c3 & 0x3f));
				i += 3;
			}
		}
		return string;
	},
	encode: function (input) {
		var output = "";
		var chr1, chr2, chr3, enc1, enc2, enc3, enc4;
		var i = 0;
		input = this._utf8_encode(input);
		while (i < input.length) {
			chr1 = input.charCodeAt(i++);
			chr2 = input.charCodeAt(i++);
			chr3 = input.charCodeAt(i++);
			enc1 = chr1 >> 2;
			enc2 = (chr1 & 3) << 4 | chr2 >> 4;
			enc3 = (chr2 & 0xf) << 2 | chr3 >> 6;
			enc4 = chr3 & 0x3f;
			if (isNaN(chr2)) {
				enc3 = enc4 = 64;
			} else if (isNaN(chr3)) {
				enc4 = 64;
			}
			output += this._keyStr.charAt(enc1) + this._keyStr.charAt(enc2) + this._keyStr.charAt(enc3) + this._keyStr.charAt(enc4);
		}
		return output;
	},
	decode: function (input) {
		var output = "";
		var chr1, chr2, chr3;
		var enc1, enc2, enc3, enc4;
		var i = 0;
		input = input.replace(/[^A-Za-z0-9\+\/\=]/g, "");
		while (i < input.length) {
			enc1 = this._keyStr.indexOf(input.charAt(i++));
			enc2 = this._keyStr.indexOf(input.charAt(i++));
			enc3 = this._keyStr.indexOf(input.charAt(i++));
			enc4 = this._keyStr.indexOf(input.charAt(i++));
			chr1 = enc1 << 2 | enc2 >> 4;
			chr2 = (enc2 & 0xf) << 4 | enc3 >> 2;
			chr3 = (enc3 & 3) << 6 | enc4;
			output = output + String.fromCharCode(chr1);
			if (enc3 != 64) {
				output = output + String.fromCharCode(chr2);
			}
			if (enc4 != 64) {
				output = output + String.fromCharCode(chr3);
			}
		}
		output = this._utf8_decode(output);
		return output;
	}
};

/*******/
function textline2array(text) {
    text = text.replace(/\r\n/mg, "\n");
    text = text.replace(/\r/mg, "\n");
    return text.split("\n");
}

function removeemptyline(text) {
    return text.replace(/[\r\n]+/gm, "\n").replace(/^\n|\n$/gm, "");
}

function linesstr2arraystr(text) {
    text = text.replace(/'/gm, "\\'");
    text = textline2array(text);
    text = text.join("',\n'");
    text = "'"+ text +"'";
    return text;
}

function cleangfwliststr(text) {
    text = text.replace(/^[!\[].*$/gm, "");
    return removeemptyline(text);
}

function items2arraystr(items) {
    var items;
    items = items.join("\n");
    items = items.replace(/'/gm, "\\'");
    items = items.split("\n");
    return "[\n'"+ items.join("',\n'") +"'\n]";
}

/*******/
function get_text_from_urls(urls)
{
    var url, L;
    var tmp, text = "";
    //
    L = urls.length;
    for (var i = 0; i < L; i++) {
        url = urls[i];
        if (!url) continue;
        $msg(url);
        tmp = get_html_text(url, "");
        if (!tmp) {
            $msg("<err?");
            return "";
        }
        $msg("<got!");
        //
        text += "\n"+ tmp;
    }
    return text;
}

/*******/
function get_gfw_result_str() {
    var text;
    var urls = [
        "https://gitlab.com/gfwlist/gfwlist/raw/master/gfwlist.txt", /* 6h */
    ];
    //
    text = get_text_from_urls(urls);
    text = $base64.decode(text);
    $msg(text ? "<got!" : "<err?");
    //
    return text;
}

function get_locx_result_str() {
    var text;
    var urls = [
        "http://127.0.0.1/ezx-pac_locxlist.txt", /* user define */
    ];
    //
    text = get_text_from_urls(urls);
    //
    return text;
}

function mod_gfw_result_str(text) {
    var DelList = $readall(WScript.ScriptFullName.replace("_auto-pac.js", "_gfwlist_del.txt"));
    DelList =cleangfwliststr(DelList);
    DelList = DelList.split("\n");
    for (var i = 0; i < DelList.length; i++) {
        if (DelList[i] == "") continue;
        text = text.replace(DelList[i], "");
    }
    return text;
}

function get_gfw_result_items() {
    var text = get_gfw_result_str();
    if (!text) return [];
    text = mod_gfw_result_str(text);
    text += '\n'+ get_locx_result_str();
    text = cleangfwliststr(text);
    return textline2array(text);
}

/*******/
function get_domains_from_dnsmasq_cfg(text){
    text = removeemptyline(text);
    text = text.replace(new RegExp('server=/([^/]+)/.*', "mg"), "$1");
    return text;
}

function get_dnsmasq_cn_result(){
    var text;
    var urls = [
        "https://github.com/felixonmars/dnsmasq-china-list/raw/master/accelerated-domains.china.conf",
        "https://github.com/felixonmars/dnsmasq-china-list/raw/master/google.china.conf",
        "https://github.com/felixonmars/dnsmasq-china-list/raw/master/apple.china.conf"
    ];
    //
    text = get_text_from_urls(urls);
    //
    text = get_domains_from_dnsmasq_cfg(text);
    text = textline2array(text);
    //
    return text;
}

/*******/
// https://easylist.to
// https://easylist-downloads.adblockplus.org/exceptionrules.txt
function access_host_items(items){
    if (!items) return [];
    var items_r = [];
    var items_w = [];
    var L = items.length;
    for (var i = 0; i < L; i++) {
        var filter = Filter.fromText(items[i]);
        if (filter.contentType == 268435391
        && !(filter.thirdParty || filter.domainSource || filter.matchCase || items[i].indexOf("[Adblock") == 0)
        ) {
            $dsg(items[i] +" [got]");
            if (filter instanceof BlockingFilter) {
                items_r.push(items[i]);
            }
            else if (filter instanceof WhitelistFilter) {
                items_w.push(items[i]);
            }
        }
    }
    // MUST be removed for releasing
    Filter.knownFilters = Object.create(null);
    //
    if (items_w.length) {
        items_r = ( items_r.join('\n') +'\n'+ items_w.join('\n') ).split('\n');
    }
    return items_r;
}

/* too many will make firefox "PAC Execution Error: uncaught exception: out of memory []"
8k (easylist) * 7k (gfwlist)
easylist_general_block.txt (>7.5k) is to many!?
use ff ad block addon.
*/
function get_easylist_result(){
    var text, tmp, result;
    var urls = [
        "http://127.0.0.1/ezx-pac_blocklist.txt", /* service provider injection */
        "https://easylist-downloads.adblockplus.org/easylistchina.txt",
        "https://github.com/easylist/easylist/raw/master/easylist/easylist_general_block.txt",
        "https://github.com/easylist/easylist/raw/master/easylist/easylist_general_block_dimensions.txt",
        "https://github.com/easylist/easylist/raw/master/easylist/easylist_adservers.txt",
        "https://github.com/easylist/easylist/raw/master/easylist/easylist_thirdparty.txt"
    ];
    text = get_text_from_urls(urls);
    //
    text = removeemptyline(text);
    text = textline2array(text);
    text = access_host_items(text);
    //
    return text;
}

function matcher_add_filters(MatcherX, items) {
    var L = items.length;
    for (var i = 0; i < L; i++) {
        if (items[i]) { // in case of ''
            MatcherX.add(Filter.fromText(items[i]));
        }
    }
    // MUST be removed for releasing
    Filter.knownFilters = Object.create(null);
    //
    return MatcherX;
}

function geturlhost(url) {
    var ret = '';
    if (url) {
        var r = /^[@|]*(\w*:\/\/|\/*)([\w\d\*\.-]*[\w\d\*]+\.[\w\d\*]+).*$/.exec(url);
        if (r) ret = r[2];
    }
    return ret;
}

function update_result(){
    pac_script = pac_script.replace("__TestLisIsProxyList__", TestLisIsProxyList);
    //
    var block_list = get_easylist_result();
    if (block_list.length == 0) {
        $msg("No block list rules!");
    }
    //
    var test_list = TestLisIsProxyList ? get_gfw_result_items() : get_dnsmasq_cn_result();
    if (test_list.length == 0) {
        $msg("No test list rules!");
        return;
    }
    //
    pac_script = pac_script.replace("__TEST_RULES__", items2arraystr(test_list));
    //
    //
    pac_script_x = pac_script.replace("__BLOCKLIST_RULES__", '[]');
    file = $newstream(file_out_x);
    file.Write(pac_script_x);
    file.Close();
    //
    var pac_script_ezx = pac_script.replace("__BLOCKLIST_RULES__", items2arraystr(block_list));
    var file = $newstream(file_out_ezx);
    file.Write(pac_script_ezx);
    file.Close();
    return 1;
}

/* *** */
$msg(new Date() +" [Start]");
var file_in = WScript.ScriptFullName.replace("_auto-pac.js", "_tmp.pac");
var file_out_ezx = WScript.ScriptFullName.replace("_auto-pac.js", "_ezx.pac");
var file_out_x = WScript.ScriptFullName.replace("_auto-pac.js", "_x.pac");
var filename_out_ezx = WScript.ScriptName.replace("_auto-pac.js", "_ezx.pac");
var filename_out_x = WScript.ScriptName.replace("_auto-pac.js", "_x.pac");
//
/* include and eval public part of ezx-pac_tmp.pac */
var pac_script = $readall(file_in);
eval( pac_script.slice(0, pac_script.indexOf("/* New instance */")) );
//
var TestLisIsProxyList = false;
//
$run("httpd.exe", "0");
$msg("TestLisIs : "+ (TestLisIsProxyList ? "ProxyList" : "DirectList"));
$msg("x-only    : http://127.0.0.1/"+ filename_out_x);
$msg("x+easylist: http://127.0.0.1/"+ filename_out_ezx);
if ($run("ping -n 1 114.114.114.114", "0", true) != 0) { // hibernation
    $msg("Waiting 1 minute for connecting to network ...");
    WScript.Sleep(60000);
}

update_result();

pac_script = null;

function deep_clean(Obj) {
    var e;
    for (var k in Obj) {
        try {deep_clean(Obj[k])} catch(e){}
        try {delete Obj[k]} catch(e){}
        try {Obj[k] = null} catch(e){}
    }
    try {delete Obj} catch(e){}
    try {Obj = null} catch(e){}
}

var helper_funs = ['extend', 'filterToRegExp', 'Filter', 'InvalidFilter', 'CommentFilter', 'ActiveFilter', 'RegExpFilter', 'BlockingFilter', 'WhitelistFilter', 'Matcher', 'CombinedMatcher'];
for (var i = 0; i < helper_funs.length; i++) {
    deep_clean(this[ helper_funs[i] ]);
}

var sleep_h = 7;
$msg(new Date());
//$cmd("cmd /c RefreshConnection");
$cmd("cmd /c title auto-pac %time%");
$msg("Set use pac yourself! Win10 only accepts online pac!");
$msg(new Date() +" [Finished]");
$msg("Sleeping hours: "+ sleep_h);
WScript.Sleep(3600000 * sleep_h);
//in case of updates
$run('cscript.exe //nologo "'+ WScript.ScriptFullName +'"', 6);