ThreadAbon.js

//
// Jane用クソbeが立てたスレを一括スレッドあぼ～んするコマンド
// 【使い方】
//  ThreadAbon.js をどこかに保存(x:\somewhere\ThreadAbon.js)
//  Janeの各派生ごとの『ボードデータを再構築』アクセラレータキーに合わせて241行目～を修正
//  command.dat に以下を追加
//  このbeが立てたスレをあぼ～ん=wscript x:\somewhere\ThreadAbon.js "$LOCALDAT"
//  クソbeが立てたスレを開き右クリック→このbeが立てたスレをあぼ～ん を選択
//

var ForReading = 1;
var ForWriting = 2;
var ForAppending = 8;

var MAXABONECOUNT = 40; //多すぎるとダイアログが画面からはみ出すことがある
var abonmode = 2;
var wsh = WScript.CreateObject("WScript.Shell");
var fso = new ActiveXObject("Scripting.FileSystemObject");

var datfile = WScript.Arguments(0);
if(datfile.match(/.*\\(.+?)\\\d{10}\.dat/))
{
    switch(RegExp.$1)
    {
        case "ニュース速報":
            board = "news";
            break;
        case "ニュー速(嫌儲)":
            board = "poverty";
            break;
        default:
            wsh.Popup("対象外の板です", -1, "", 48);
            WScript.Quit();
    }
}
else
{
    wsh.Popup("datの指定がｵｶｼｲ", -1, "", 48);
    WScript.Quit();
}

//
//既存のNGスレッドを読み込み
//
var abnfile = fso.BuildPath(fso.GetParentFolderName(datfile), "subject.abn");
var st_abn = fso.OpenTextFile(abnfile, ForReading,true);
var NGThreads = new Array();
while (st_abn.AtEndOfLine==false)
{
   strText = st_abn.ReadLine();
   if(strText.match(/(\d{10})=(\d) (.+)/))
   {
       NGThreads[RegExp.$1] = RegExp.$3;
    }
}
st_abn.Close();



//
// Subject.txtからスレ一覧を取得
//
var subjecttxt = fso.BuildPath(fso.GetParentFolderName(datfile), "subject.txt");
var st_subject = fso.OpenTextFile(subjecttxt, ForReading);
var subjectlist = new Array();

while (st_subject.AtEndOfLine==false)
{
   strText = st_subject.ReadLine();
   if(strText.match(/(\d+?)\.dat<>(.+)/))
   {
       subjectlist[RegExp.$1] = RegExp.$2;
   }
}
st_subject.Close();



//
//datの>>1からBE IDを取得
//
var st_dat = fso.OpenTextFile(datfile, ForReading, false);
var ichi =  st_dat.ReadLine();
st_dat.Close();
//WScript.Echo(ichi);
if(!ichi.match(/.*? BE:(\d+?)-.*<>/))
{
    WScript.Echo();
    wsh.Popup("BE IDの取得に失敗しました", -1, "", 48);
    WScript.Quit();
}
var beID = RegExp.$1

//
// thretaiplus.js用スレッド情報配信鯖からこのBEが立てたスレのリストを取得
//
//var url = "http://kiki.mods.jp/be/stalker/"+ RegExp.$1 +"/"+board+"/";
var url = "http://ame.hacca.jp/sasss/log-be2.cgi?i="+ beID; // +"&mode=text"
//wsh.Run(url);
var html = "";
var req = new ActiveXObject("Microsoft.XMLHTTP");
req.open('GET', url, false);
req.onreadystatechange = function (aEvt)
{
    if (req.readyState == 4)
    {
        if(req.status == 200)
        {
            html = req.responseText;
            //WScript.Echo(req.responseText);
        }
        else
        {
            WScript.Echo("Error loading page\n");
            WScript.Quit();
        }
    }
};
req.send(null);
var abonstr = "";
var newNGThreads = new Array();
//WScript.Echo(html);
var sstr= "";
var abonecount = 0;
//while(html.match(/.+?\t.+?\t.+?\t(.+?)\thttp:\/\/[^\/\.]+?.[25]ch.net\/test\/read.cgi\/[^\/]+?\/(\d{10})\//))
while(html.match(/<br><strong>(.+?)<\/strong><br><a href=\"http:\/\/[^\/\.]+?.[25]ch.net\/test\/read.cgi\/[^\/]+?\/(\d{10})\/\"/))
{
    if (abonecount > MAXABONECOUNT) break; //1画面に収まらなくなる前に終了
    //WScript.Echo(RegExp.$2 + ": " + RegExp.$1 +"\n"+NGThreads[RegExp.$2]+"\n"+subjectlist[RegExp.$2]);
    sstr = RegExp.$2 + ": " + NGThreads[RegExp.$2]+" "+subjectlist[RegExp.$2] +"\n"
    if(!NGThreads[RegExp.$2]&& !newNGThreads[RegExp.$2] && subjectlist[RegExp.$2])
    {
        abonecount++;
                                            // "～"文字がおかしいので置換しておく
        newNGThreads[RegExp.$2] = RegExp.$1.split(String.fromCharCode(0x301c)).join("～");
        abonstr += RegExp.$2 + ": " + RegExp.$1 + "\n";
        //
        //WScript.Echo("Found " + RegExp.$2 +" "+ newNGThreads[RegExp.$2]);
    }
    html = RegExp.rightContext;
}
//WScript.Echo(sstr);

//
// 必死チェッカーもどきから新鮮なログを取得
//
var dt, ID;
if(board == "news" && ichi.match(/.*?<>.*?<>(\d{4})\/(\d\d)\/(\d\d).*? ID:(.+?)●?(\s.*)?<>.*?<>/))
{
    dt = RegExp.$1+RegExp.$2+RegExp.$3;
    ID = RegExp.$4
    var encID = base64encode(ID);
    if(encID.slice(-2) == '==')
        encID = encID.substring(0, encID.length -2);
    if(encID.slice(-1) == '=')
        encID = encID.substring(0, encID.length -1);
    //WScript.Echo(encID);
    var hissiURL = "http://hissi.org/read.php/" + board + '/' + dt + '/' + encID +".html"
    //WScript.Echo(hissiURL);


    var ado = new ActiveXObject("ADODB.Stream");
    var adTypeBinary = 1, adTypeText = 2, adReadAll = -1;
    ado.Type = adTypeBinary;
    //ado.charset = "Shift_JIS";
    ado.Open();
    //WScript.Echo(hissiURL);
    req.open('GET', hissiURL, false);
    req.onreadystatechange = function (aEvt)
    {
        if (req.readyState == 4)
        {
            if(req.status == 200)
            {
                ado.Write(req.responseBody);
                ado.Position = 0;
                ado.Type = adTypeText;
                ado.Charset = "Shift_JIS";
                html = ado.ReadText()
                //WScript.Echo(html);
            }
            else
            {
                WScript.Echo("Error loading page\n");
                WScript.Quit();
            }
        }
    };
    req.send(null);

    while(html.match(/<td><dl><dt><a href=http:\/\/[^\/\.]+?.[25]ch.net\/test\/read.cgi\/[^\/]+?\/(\d{10})\/1 target=\"_blank\">(.+?)\s*<\/a><br>/))
    {
        if (abonecount > MAXABONECOUNT) break; //1画面に収まらなくなる前に終了
        //WScript.Echo(RegExp.$1 + ": " + RegExp.$2 +"\n"+NGThreads[RegExp.$1]+"\n"+subjectlist[RegExp.$1]);
        sstr = RegExp.$1 + ": " + NGThreads[RegExp.$1]+" "+subjectlist[RegExp.$1] +"\n"
        if(!NGThreads[RegExp.$1]&& !newNGThreads[RegExp.$1] && subjectlist[RegExp.$1])
        {
            abonecount++;
            newNGThreads[RegExp.$1] = RegExp.$2;
            abonstr += RegExp.$1 + ": " + RegExp.$2 + "\n";
            //
            //WScript.Echo("Found " + RegExp.$2 +" "+ newNGThreads[RegExp.$2]);
        }
        html = RegExp.rightContext;
    }
}




if (abonstr == "")
{
    wsh.Popup("新着スレッドはありません", -1, "", 64);
    WScript.Quit();
}
if(wsh.Popup(abonstr.replace(/&copy;/g, '\u00A9').replace(/&#169;/g, '\u00A9'), -1, "BeID:"+ beID +"が立てた以下のスレッドをあぼ～んしますか？(「N」キーでキャンセル)", 4 | 32 | 256) != 6)
    WScript.Quit();

st_abn = fso.OpenTextFile(abnfile, ForAppending, true);
for(key in newNGThreads)
{
    //WScript.Echo("Found " + newNGThreads[RegExp.$1]);
    try
    {
        st_abn.WriteLine(key+"="+abonmode+" "+ newNGThreads[key]);
    }
    catch (e)
    {
        wsh.Popup(key+"="+abonmode+" "+ newNGThreads[key] + "を追加する際にエラーが起きました", -1, "", 48);
        var str = "";
        for(i=0; i< newNGThreads[key].length; i++)
        {
            str +=" "+ newNGThreads[key].charCodeAt(i);
        }
        WScript.Echo(str);
    }
}
st_abn.Close();


//
// ｽﾚ欄(L)→ボードデータを再構成(R)アクセラレータキーを送信
//
wsh.SendKeys("%TD");
WScript.Sleep(500);

//JaneXeno
//wsh.SendKeys("%LR");
//Jane Style
wsh.SendKeys("%LI");

//WScript.Echo("（･∀･）ｶﾝﾘｮｳ!! ");
wsh.Popup("（･∀･）ｶﾝﾘｮｳ!! ", 1, "完了",0);






/* Copyright (C) 1999 Masanao Izumo <iz@onicos.co.jp>
 * Version: 1.0
 * LastModified: Dec 25 1999
 * This library is free.  You can redistribute it and/or modify it.
 */

/*
 * Interfaces:
 * b64 = base64encode(data);
 * data = base64decode(b64);
 */



function base64encode(str) {
    var base64EncodeChars = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
    var out, i, len;
    var c1, c2, c3;

    len = str.length;
    i = 0;
    out = "";
    while(i < len) {
    c1 = str.charCodeAt(i++) & 0xff;
    if(i == len)
    {
        out += base64EncodeChars.charAt(c1 >> 2);
        out += base64EncodeChars.charAt((c1 & 0x3) << 4);
        out += "==";
        break;
    }
    c2 = str.charCodeAt(i++);
    if(i == len)
    {
        out += base64EncodeChars.charAt(c1 >> 2);
        out += base64EncodeChars.charAt(((c1 & 0x3)<< 4) | ((c2 & 0xF0) >> 4));
        out += base64EncodeChars.charAt((c2 & 0xF) << 2);
        out += "=";
        break;
    }
    c3 = str.charCodeAt(i++);
    out += base64EncodeChars.charAt(c1 >> 2);
    out += base64EncodeChars.charAt(((c1 & 0x3)<< 4) | ((c2 & 0xF0) >> 4));
    out += base64EncodeChars.charAt(((c2 & 0xF) << 2) | ((c3 & 0xC0) >>6));
    out += base64EncodeChars.charAt(c3 & 0x3F);
    }
    return out;
}

function base64decode(str) {
var base64DecodeChars = new Array(
    -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
    -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
    -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 62, -1, -1, -1, 63,
    52, 53, 54, 55, 56, 57, 58, 59, 60, 61, -1, -1, -1, -1, -1, -1,
    -1,  0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14,
    15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, -1, -1, -1, -1, -1,
    -1, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
    41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, -1, -1, -1, -1, -1);

    var c1, c2, c3, c4;
    var i, len, out;

    len = str.length;
    i = 0;
    out = "";
    while(i < len) {
    /* c1 */
    do {
        c1 = base64DecodeChars[str.charCodeAt(i++) & 0xff];
    } while(i < len && c1 == -1);
    if(c1 == -1)
        break;

    /* c2 */
    do {
        c2 = base64DecodeChars[str.charCodeAt(i++) & 0xff];
    } while(i < len && c2 == -1);
    if(c2 == -1)
        break;

    out += String.fromCharCode((c1 << 2) | ((c2 & 0x30) >> 4));

    /* c3 */
    do {
        c3 = str.charCodeAt(i++) & 0xff;
        if(c3 == 61)
        return out;
        c3 = base64DecodeChars[c3];
    } while(i < len && c3 == -1);
    if(c3 == -1)
        break;

    out += String.fromCharCode(((c2 & 0XF) << 4) | ((c3 & 0x3C) >> 2));

    /* c4 */
    do {
        c4 = str.charCodeAt(i++) & 0xff;
        if(c4 == 61)
        return out;
        c4 = base64DecodeChars[c4];
    } while(i < len && c4 == -1);
    if(c4 == -1)
        break;
    out += String.fromCharCode(((c3 & 0x03) << 6) | c4);
    }
    return out;
}