/********************************************************************/
/*  gethtmldat.js :   ver.0.73   2017/10/04                         */
/********************************************************************/
//
//  Jane2ch.exeでhtmlから過去ログを取得しdat形式に変換してLogsフォルダに格納する
//  htmltodat-convert2.wsf＋htmltodat.exeと同じような機能を果たす
//  htmltodat-convert2.wsfとGetLog.wsfからコードを盗用してます（許して）
//
//==============================================================
//  ※ 重要 ※
//  なお、このスクリプトはpastbinのサイトから download するのではなく、
//  RAW( http://pastebin.com/raw.php?i=3EZzrsxY )で表示したものか 又は
//  下の方にある RAW Paste Data から、コピー&ペースト(CTRL+A,CTRL+C 及び CTRL+V)で、
//  テキストエディタに貼り付け、gethtmldat.js という名前でShift-JISコード(メモ帳ではANSI)
//  で保存し、Jane2ch.exe のあるフォルダに格納してください
//  ※注意※ DOWNLOADすると、文字コードがUTF-8となり実行できません
//           また、行番号付きでコピー&ペーストしても実行できません
//==============================================================
//
//  Jane Styleでのコマンド登録方法は、メニュー - ツール - 設定 - 機能 - コマンド で
//    コマンド名   - 過去ログ取得(gethtmldat)  ※ここには任意の名称をつけられます
//    コマンド内容 - wscript "$BASEPATHgethtmldat.js" $LINK$URL
//  を入力して、追加、OKします
//       ※ なお、Jane直下フォルダでは無い場合はパスをフルパスで指定してください
//          jane styleの下のscriptフォルダに入れた場合は、
//                   wscript "$BASEPATHscript\gethtmldat.js" $LINK$URL
//
//
//  起動オプション： 順不同 []内は省略可
//    [+]http://～   url指定
//                   (先頭に+を付けるとdatにURL末尾の指定範囲のレス部分だけ上書きする /aは無効)
//    [/n:]999       レス番指定(そのレス番に飛ぶ)
//    /f             urlを強制的に問い合わせる
//    /w[:999]       スレを指定時間待って閉じ、開き直す(数値省略時 1200ms)
//                   当該スレが開く前にキー送信がなされると現在開いている別スレが閉じてしまいます
//    /a[ppend]      差分のみ取得
//                  （管理人削除などで既存のログとサーバー上のデータに違いがあっても関知しない）
//    /b[ak][1]      バックアップを取る(Logs\bak\の下に既存のdatファイルをコピーする)
//                   /b1 にするとバックアップファイルが存在しているとコピーしない
//    /redraw[:999]  再描画 スレを開いた後、指定時間待ってからキーコード('ALT','T','G','0')を送る
//                   (数値省略時 1200ms)
//    /z             Jane2ch.exeを終了し、情報(db,idx)設定後、再起動する(この場合 /w は不要)
//                   ※ 高速Merge有効時には、SQLite3 ODBC Driver 又は sqlite3.exe のどちらかが必要
//                       SQLite3 ODBC Driver : http://www.ch-werner.de/sqliteodbc/sqliteodbc.exe
//                                             をインストール(exeを実行し、デフォルトなりで進める)
//                       sqlite3.exe         : http://www.sqlite.org/download.html から、
//                                             sqlite-shell-win32-x86-3080900.zip をダウンロード・
//                                             解凍し、本スクリプトと同じフォルダに格納する
//    "/log[:path]"  トレースログを指定のファイルに追加書き込みします
//                   （ファイルパス名省略時は %temp%\スクリプト名.log)
//    /keep_kako     渡された過去ログURLをそのまま処理する(したらば、next2ch、machi以外で有効)
//    /proxy:server:port PROXYサーバー経由でアクセスする場合に指定する
//    /cfg[:path]    カスタマイズ用定義ファイルの読み込み(path省略はスクリプトフォルダ\スクリプト名.cfg)
//                   内容は、JScriptの文法で記述する
//
//  使い方：
//    以下のa)～c)のいずれかで右クリックして上記登録したコマンドを選択する
//      a) Jane Styleで、過去ログを開いたレス表示欄
//         (2chでサーバーの移転があった場合は板一覧にある最新の移転先URLが受け渡されるので注意）
//      b) 別スレに書かれているリンク
//      c) 書き込みウィンドウ、メモ欄にURLを書き込みプレビューで現れるリンク
//
//  TIPS ：
//    ●★「過去ログ」と表示されている場合は、メニュー（スレッド）から「強制過去ログ化」のチェック
//      （又はスレッドツールバーのゴミ箱アイコンをクリックして「強制過去ログ化」）
//      を外すか又は、一旦ログを削除後にリンクから再取得してください
//    ●レスが表示されない場合は、スレッドツールバーの「表示レス数／スレの再描画」アイコンを
//      右クリックしてください
//    ●レス内容が「スレの再描画」でも変わらない場合は、
//        （「お気に入り」を「更新チェック」後に、その中のスレを本スクリプトで取得した場合などが相当）
//      スレ一覧画面の「お気に入りグループ名」タブを閉じてから「スレの再描画」をしてみてください
//      また「検索結果」「ログ一覧」「最近読込」「最近書込」「OpenThreads」の場合も同様です
//    ●未読状態が既読状態にならない場合やレス番リンクのポップアップが表示されなかったり
//      ID抽出回数が0回になる場合は
//      1)ステータスが過去ログ以外の時、所属する板を開いてスレ一覧更新をして、
//        又は、スレを開きなおして、最新レス末尾までスクロールさせる
//      2)過去ログの場合、上記「強制過去ログ化」のチェックを外した後、
//        又は、>>999 などの未読状態のレスを指すリンクをクリックする
//        又は、名前欄1001をクリックする
//        又はアドレスバーに「スレURL/999」のようなレス番付きで入力する
//        「最後までスクロールしたスレを既読にする」「再描画する」の場合は、末尾までスクロールさせる
//      ★なお、新着チェックができる(ボタンが押せる)のなら新着チェックでよい
//    ●2ch.netでftp://問題により520エラー又はデータが途切れてしまう場合の部分的な救済方法
//        webブラウザで問題となるレス番をtrial and errorで目星をつけて、それを避けるように
//        範囲指定してデータを取得する
//        例えば、レス番50が引っ掛かっている場合は、-49 と 51- の2回に分けて取得する
//        コマンド登録時には、+$LINK$URLとし、URL末尾に範囲指定付きのリンクから使うか
//        /f も追加して、実行時にURL末尾にレス番範囲を追加で入力する
//
//  修正履歴：
//    http://pastebin.com/my14uCkr を参照
//==============================================================

/*@cc_on
	@set @DEBUG = false;
// 以下をtrueにすると2chで最初にJSONでの取得を試みる(お遊び機能：仕様等一切不明）
	@set @EnabledTest2chJSON = false;
//漢字コード変換にbasp21.dllを使う
// http://www.hi-ho.ne.jp/babaq/basp21.htmlのBASP21-2003-0211.exeのインストールが必要
	@set @EnabledBASP21 = false;
@*/

var HTTP_HEADERS = { 
  "User-Agent" : "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/61.0.3163.100 Safari/537.36"
};
var HTTP_TIMEOUT = 120 * 1000;
var IDX_STATE = { "2ch":3 , "jbbs":3 }; //=0:現役 =3:dat落ち =10:過去ログ
var ABN_MSG = "透明あぼ～ん<>透明あぼ～ん<>透明あぼ～ん ID:DELETED<>透明あぼ～ん<>透明あぼ～ん";
var ABN_MSG_PINK = "うふ～ん<>うふ～ん<>うふ～ん ID:DELETED<>うふ～ん<>うふ～ん";
var NOT_GET_MSG = "未取得<>未取得<>未取得 ID:NONE<>未取得<>";

var fso   = new ActiveXObject("Scripting.FileSystemObject");
var shell = new ActiveXObject("WScript.Shell");
var sha   = new ActiveXObject("Shell.Application");
var strm  = new ActiveXObject("ADODB.Stream");
var http;
var USED_WINHTTP = true;
try { http = new ActiveXObject("WinHttp.WinHttpRequest.5.1"); } catch(e){}
if (!http) try { http = new ActiveXObject("Msxml2.ServerXMLHTTP.6.0"); } catch(e){}
if (!http) try { http = new ActiveXObject("Msxml2.ServerXMLHTTP.3.0"); } catch(e){}
if (!http) var USED_WINHTTP = false;
if (!http) try { http = new ActiveXObject("Msxml2.XMLHTTP.6.0"); } catch(e){}
if (!http) { http  = new ActiveXObject("Msxml2.XMLHTTP.3.0"); }
var basp; /*@if (@EnabledBASP21) try { basp = new ActiveXObject("basp21"); } catch(e){} @end @*/

var JANE_PATH = shell.CurrentDirectory.replace(/[^\\]$/,"$&\\");
var SCRIPT_PATH = fso.GetParentFolderName( WScript.ScriptFullName ).replace(/[^\\]$/,"$&\\");
//shell.CurrentDirectory = JANE_PATH;
var JANE_EXE  = "Jane2ch.exe";
var JANE_INI  = "Jane2ch.ini";
var JANE_BRD  = "Jane2ch.brd";
var JANE_LOGS = "Logs\\2ch\\";
var JANE_BAK  = "Logs\\bak\\";
var JANE_BRDCUSTOMIZE_INI = "brdcustomize.ini";
var MY_NAME   = WScript.ScriptName.split(/\.(?=[^.]+$)/)[0];
var TRACE_LOG = replaceEnv("%temp%\\"+MY_NAME+".log").replace(/\\\\/g,"\\");

//カスタマイズ用定義ファイル指定(この指定より引数/cfg:での指定の方が優先される)
var CFG_FILE = SCRIPT_PATH + MY_NAME + ".cfg";

//欠落しているレス番をあぼーんメッセージで補う(2ch互換BBSのみ)
//   +URL指定時は無効で元のレスのままかあるいは未取得メッセージで穴埋めされる
var FILL_ABONE = 0; //0:問い合わせる 1:常に穴埋めする 2:常に詰める
//既存のdatファイルよりレス数が大きくない場合にdatファイルを上書きするかどうか(差分/aの場合は無効)
var REWRITE_DAT = 0; //0:問い合わせる 1:上書きする 2:一致の場合は中止する 3:常に中止する

//BEアイコン以外の<img>タグ(現状はお絵かきのみ)を変換するときのスキームを指定する ("http" or "sssp")
var IMG_TO = "sssp:";

//bakusai用
var OPT_BBS = {
	"//bakusai.com": [thread_bakusai, "【仮想板:爆サイ】", /\/\/(bakusai\.com[^\/]*)/ ]
};
var MAX_READ_PAGES_OF_THREAD_LIST_CREATE = 3; //subject.txt作成時
var MAX_READ_PAGES_OF_THREAD_LIST_UPDATE = 1; //subject.txt更新時
var BROWSER_PATH = "";

//==============================================================

function o(s) { /*@if (@DEBUG) WScript.Echo(s); @end @*/ }
function q() {WScript.Quit();}
String.prototype.expand = function(v) { return this.replace(/\$(\d)/g, function(m, n) { return v[n]; }); }
String.prototype.convDontUseStr = function() {
	var tbl0 = { "CON":"$CON", "AUX":"$AUX", "NUL":"$NUL" /*, "PRN":"$PRN", "COM([0-2])":"$COM$1", "LPT([0-2])":"$LPT$1" */ }
	var tbl1 = { "\\":"$Backslash", "/":"$Slash", ":":"$Colon", "*":"$Asterisk", "?":"$Question" }
	var s = this.replace(/[. ]+$/,"");
	for(var i in tbl0) { s=s.replace( new RegExp("^"+i+"$","i") , tbl0[i]); }
	return s.replace(/[\\/:*?]/g, function (w){return tbl1[w];});
}
var trace = function(){};
function Err(s,t) {s=ErrMsg(s,t); trace("---- "+s+" ----",2); throw new Error(s);}
function ErrMsg(s,t) { return (ERROR_MSG[s]?ERROR_MSG[s]:"Unknown error") + (t?t:"");}

var ERROR_MSG_STOP = "処理を中止しました";
var ERROR_MSG = {
	 "E_already_there" : "このスレは既に取得しています"
	,"E_illegal_url" : "このURLでは処理できません"
	,"E_remained_garbage" : "レスデータのみの抽出に失敗しました"
	,"E_block_not_found" : "htmlからスレブロックが見つかりません"
	,"E_title_not_found" : "スレタイトルが見つかりません"
	,"E_require_sqlite" : "sqlite3.exe 又は SQLite3 ODBC Driver が必要です"
	,"E_require_sqlODBC" : "SQLite3 ODBC Driver が必要です"
	,"E_stop" : ERROR_MSG_STOP
	,"E_no_data" : "取得データはありません"
	,"E_http_timeout" : "受信タイムアウト"
	,"E_http_recieve" : "http受信エラー"
	,"E_bbs_not_found" : "掲示板番号が不正です"
	,"E_key_not_found" :"スレッド番号が不正です"
	,"E_thread_not_found" : "スレッドがありません"
	,"E_brditem_not_found" : "dat格納場所が見つかりません"
	,"E_loadfile" : "ファイル読み込みエラー"
	,"E_savefile" : "ファイル書き込みエラー"
	,"E_not_suported_proxy" : "PROXY指定はできません（IEの設定が使われます）"
	,"E_data_error" : "レスデータの抽出で異常を検出しました"
	,"E_data_not_found" : "データがみつかりません"
	,"E_no_support" : "この機能はサポートしません"
}

function object(o) {
	var f = object.f, i, len, n, prop;
	f.prototype = o;
	n = new f;
	for (i=1, len=arguments.length; i<len; ++i) for (prop in arguments[i]) n[prop] = arguments[i][prop];
	return n;
}
object.f = function(){};
//--- http://with-love-from-siberia.blogspot.jp/2009/12/msgbox-inputbox-in-jscript.html -----------
var vb = {};
vb.Function = function(func) { return function() { return vb.Function.eval.call(this, func, arguments); }; };
vb.Function.eval = function(func) {
	var args = Array.prototype.slice.call(arguments[1]);
	for (var i = 0; i < args.length; i++) {
		if ( typeof args[i] != 'string' ) { continue; }
		args[i] = '"' + args[i].replace(/"/g, '" + Chr(34) + "') + '"';
	}
	var vbe;
	vbe = new ActiveXObject('ScriptControl');
	vbe.Language = 'VBScript';
	return vbe.eval(func + '(' + args.join(', ') + ')');
};
var InputBox = vb.Function('InputBox');
var MsgBox = vb.Function('MsgBox');

//==============================================================

var args = parmParse(WScript.Arguments);

var URL_2ch = {
  RE_HOST : new RegExp("^http://\\w+\\.(?:[25]ch\\.net|bbspink\\.com)/")	//この定義はdat取得できないサイトの判別に使う
 ,RE_URL  : new RegExp("^http://((\\w+(?=\\.\\w+\\.))?(\\.?(\\w+)[^\\/]+?))/(?:(?:test|bbs)/.+?/)?(\\w+)/(?:kako/.+?/)?(((\\d+)\\d)\\d{5})(/|\\.html|\\.dat(?:\\.gz)?)?")
 ,range   : ""
 ,set_prm : function(url) { this._set_prm(url, 1, null, 5, 6); this.kako = /\/kako\//.test(url) && delete args.append; }
 ,otherURLType : 0
 ,otherURL : ""
 ,_set_prm: function(url,p1,p2,p3,p4) {
 				var r;
				this.prm  = url.match(this.RE_URL) || Err("E_illegal_url");
				if(/\d$/.test(this.prm[0])) this.prm[0] += "/";
				this.url  = this.prm[0];
				this.url2 = this.prm[0];
				switch(this.otherURLType) {
					case 1: this.url = this.otherURL+this.url; break;
					case 2: this.url = this.otherURL; break;
					default: break;
				}
				this._setRange(url);
				this.site     = this.prm[p1];
				this.category = (p2) ? this.prm[p2] : "";
				this.brdID    = this.prm[p3];
				this.thrID    = this.prm[p4];
			}
 ,_setRange :	function(url) {
					var range;
					if(this.prm[0].slice(-1)=="/") {
						range = url.match(/\/n?((\d*)n?(-?)[^\/]*)$/)||[];
						this.url2 += (args.opt_n||range[2]||"");
						if(range[3]) this.range = ((range[2]?"":"1")+range[1]||"").replace(/n/ig,"");
						else if(range[2]) this.range = range[2] + "-" + range[2];
					}
 				}
 ,appendRange : function(top) {
					if (args.overwrite) this.url += this.range;
					else                this.url += ((args.append && top) ? top+"-n" : "");
				}
 ,getUrl2 : function() { return this.url2; }
 ,entryCheck : function(url) {
 				var r,i;
 				
 				var ptn=[
 				  [ /^https?((?::\/\/www\.google\.co\.jp\/url\?q=https?)?:\/\/webcache\.googleusercontent\.com\/search(?:\?q=|%3Fq%3D)cache:.+?:.*https?:\/\/([^+&%]+).*=(?:(?!http).)+)/ , 1]
 				  ,[ /^https?(:\/\/webcache\.googleusercontent\.com\/search\?q=cache:.+?:([^+&%]+).*=(?:(?!http).)+)/ ,2 ]
 				  ,[ /^https?(:\/\/cache\.yahoofs\.jp\/search\/cache\?.*&u=([^&]+)(?:&.*=(?:(?!http).)+)?)/ ,2 ]
 				  ,[ /http:(\/\/(bakusai\.com(?:\.[^\/]+)?\/thr_(?:res|tl)\/acode=\d+\/ctgid=\d+(?:\/test\/read\.cgi)?(?:\/(?:\w+=)?[\d-]+)+\/))/ , 3 ]
 				];
 				
				for(i=0;i<ptn.length;i++) {
 					r = url.match(ptn[i][0]);
 					if(r) {
 						this.otherURLType=ptn[i][1];
						switch(this.otherURLType) {
							case 1: this.otherURL = r[1]; return "http"+r[2];
							case 2: this.otherURL = "http"+r[1]; return "http://"+r[2].replace(/%2F/ig,"/");
							case 3: this.otherURL = r[0]; return "http://"+r[2];
						}
 					}
 				}
 				return url.replace(/^https?(:.+?)(?:http.+)?$/,"http$1");
 			}
 ,isOPT_BBS : function(url) {
 				var i,r;
 				for(i in OPT_BBS) { if(url.indexOf(i)>0) r=i; }
				this.optItem = r;
 				return r;
 			}
}
var URL_jbbs = object(URL_2ch,{
  RE_HOST : new RegExp("^http://jbbs\\.(?:shitaraba|livedoor)\\.(?:net|jp|com)/")
 ,RE_URL  : new RegExp("^http://(jbbs\\.shitaraba\\.net)/bbs/\\w+\\.cgi/(\\w+)/(\\d+)/(\\d+)/?")
 ,set_prm : function(url) { this._set_prm(url,1,2,3,4); }
});
var URL_machi = object(URL_2ch,{
  RE_HOST : new RegExp("^http://(?:\\w+\\.)?machi\\.to/")
 ,RE_URL  : new RegExp("^http://((?:\\w+\\.)?machi\\.to)/bbs/\\w+\\.cgi/2/(\\w+)/(\\d+)/?")
 ,set_prm : function(url) { this._set_prm(url,1,null,2,3); }
 ,getUrl2 : function() { return this.url2.replace(/\/offlaw\.cgi\/2\//,"/read.cgi/"); }
});
var URL = URL_2ch;

var Jane_2ch = {
 ini          : loadFile2(JANE_INI)
 ,brd         : ""
 ,LogBasePath : ""
 ,init        : function() { this._setLogBasePath(); this._loadBRD(); }
 ,getINI      : function(p) { var m=this._search(this.ini, this._re_ini, p); return m && RegExp.$1 || p[3]; }
 ,getBRD      : function(p) {
					var m = this._search(this.brd
					                     , (/\.[25]ch\.net/.test(p[3]))?this._re_brd2:this._re_brd
					                     , p);
					var b1=RegExp.$1, b2=RegExp.$4;
					var host2=RegExp.$3, host1=RegExp.$2;
					return (m) ? [b1.convDontUseStr()+"\\"+b2.convDontUseStr()+"\\",host1,host2] : null;
				}
 ,_re_ini     : "^\\[$1\\]\\r\\n(?:.*\\r\\n)*?(?:$2=(.*)|\\[.*\\])\\r\\n"
 ,_re_brd     : "^([ \\S]+).*\\r\\n(?:\\t.*\\r\\n)*\\t(\\w*)($3)\\t$5\\t([^\\t\\r\\n]+?) *\\r\\n"
 ,_re_brd2    : "^([ \\S]+).*\\r\\n(?:\\t.*\\r\\n)*\\t(\\w+)\\.([25]ch\\.net)\\t$5\\t([^\\t\\r\\n]+?) *\\r\\n"
 ,_search     : function(f,s,p) { return f.match(new RegExp(this._expand(s,p),"img")); }
 ,_expand     : function(s,p) { return s.replace(/\$(\d)/g, function(m, n) { return (""+p[n]).replace(/\./g,"\\."); }); }
 ,_setLogBasePath : function() { this.LogBasePath = this.getINI([,"PATH","LogBasePath",""]).replace(/[^\\]$/,"$&\\");}
 ,_loadBRD     : function() { this.brd = loadFile2(this.LogBasePath + JANE_BRD); }
}
var Jane_jbbs = object(Jane_2ch,{
  _re_brd : "^([ \\S]+).*\\r\\n(?:\\t.*\\r\\n)*?\\t(($1/$2))\\t$3\\t([^\\t\\r\\n]+?) *\\r\\n"
});
var Jane_machi = object(Jane_2ch,{
  _re_brd : "^([ \\S]+).*\\r\\n(?:\\t.*\\r\\n)*?\\t(($1))\\t$2\\t([^\\t\\r\\n]+?) *\\r\\n"
});

var Jane = Jane_2ch;
Jane.init();

if (args.trace !== void 0) { trace = new Trace(); }
trace("--- start ---   "+args.url,1);trace("",1)

//----------------------

var DatInfo = {
  cnt      : 0
 ,offset   : 0
 ,title    : ""
 ,msg      : (args.overwrite) ? [] : ""
 ,setInfo  : function(dat,bak,brd) {
				this.dat = dat;
				this.bak = bak;
				this.brd = brd;
				if (fso.FileExists(dat)) {
					trace();
					var msg = loadFile(dat);
					this.cnt  = msg.split("\n").length-1;
					this.title = (msg.match(/^(?:(?:(?:(?!<>).)*)<>|(?:[^,]*),){4}(.*)$/m)||[])[1];
					if (args.overwrite) { this.msg = msg.slice(0,-1).split("\n"); }
					else this.msg="";
					trace("load file "+dat.replace(/^.*\\(\d+\.dat)/,"$1")+" : "+this.title+" lines="+this.cnt);
				}
			 }
 ,copyDat  : function() {
				if (fso.FileExists(this.dat)) {
					path(this.bak);
					if (args.bak<0 || !fso.FileExists(this.bak) )
						try{ trace(); fso.CopyFile(this.dat, this.bak, true); trace("copy file:"+this.bak);} catch(e) {}
				}
			 }
 ,setNewDatInfo : function(title, lines) {
					this.title = title;
					this.lines = parseInt(lines,10);
				  }
 ,update :	function(msgs) {
				this.msg = msgs;
				this.cnt = this.msg.length;
			}
}

//================================================================================


var Thread = {
  re_sel      : -1
 ,REG_PATTERN : [ {} ]
 ,msg         : ""
 ,bin         : null
 ,resNo       : []
 ,resNo_offset : 0
 ,requireFillAbn  : false
 ,prepare     : function() {}
 ,urlReplace  : function(u) { return u; }
 ,preReplace  : function() {}
 ,mainReplace : function() { this.msg = this.msg.replace(this.REG_PATTERN[this.re_sel].msg, this.REG_PATTERN[this.re_sel].rep); }
 ,postReplace : function() {}
 ,createBrdFolder : function() { return null;}
 ,testTBlock : function() {
				 var i,rc,ss;
				 for(i=0; i<this.REG_PATTERN.length; i++) {
					if(ss=this.msg.match(this.REG_PATTERN[i].thr)) {this.re_sel =i; break;}
				 }
				 rc = ss ? true : false;
				 return rc;
 			   }
 ,setTBlock : function() {
				var s;
				if(this.re_sel>=0) {
					s=this.msg.match(this.REG_PATTERN[this.re_sel].thr);
					if(s) { this.msg=s[1]||""; s=s[2]; }
				}
				return s;
			  }
 ,getTitle    : function(s) { this.title = (s.match(/<title>(.*?)\n*<\/title>/i)||[])[1]; }
 ,readHTTP    : function(url) {
	trace("try URL="+url,9);
	this.msg = readHTTP(url)[0];
	this.testTBlock(); //re_selの設定
	this.preReplace();
	this.getTitle(this.msg);
	if (this.re_sel<0) Err("E_block_not_found","\n\nTITLE="+this.title+"\n文字数="+this.msg.length);
	this.setTBlock();
	return true;
  }
 ,getFirst    : function() { return (args.overwrite) ? parseInt(URL.range,10) : (args.append) ? DatInfo.cnt + 1 : 1; }
 ,getLast     : function() { return parseInt((this.msg.match(/(?:^|\n)(\d+).+\n$/i)||[])[1],10)-this.resNo_offset; }
 ,delContents : function(s) { return s.replace(/^(?:(?:(?!<>).)*<>|(?:[^,]*,)){4}.*$/mg, ""); }
 ,checkData   : function(s) {
					var ln = this.checkData0(s);
					if(FILL_ABONE==2) return;
					var resTbl=this.msg.match(/^(\d+)/mg)||[];
					for(var i=1; i<resTbl.length; i++) {
						if(args.overwrite && i==1
							&& parseInt(resTbl[1],10)==this.first && parseInt(resTbl[0],10)==1) continue;
						if(parseInt(resTbl[i],10)!=parseInt(resTbl[i-1],10)+1) {
							this.requireFillAbn = true;
							break;
						}
					}
					if (FILL_ABONE==0 && this.requireFillAbn) {
						switch(shell.Popup("抽出したレス数が合いません。"
											+"(先頭="+this.first+" 末尾="+this.last+" レス数="+ln.length+")"
											+"\n抜けているレス番を穴埋めしますか？ [はい] [いいえ]"
											+"\n又は、ここで処理を中断するなら [キャンセル]"
											+"\nを選択してください。", 0, MY_NAME, 3+48)) {
							case 6: this.requireFillAbn = true; break;
							case 7: this.requireFillAbn = false; break;
							default: Err("E_stop"); //case 2
						}
					}
				}
 ,checkData0  : function(s) {
					var ln = this.delContents(s);
					if (ln.replace(/\n/g,"").length > 0) Err("E_remained_garbage");
					return ln;
				}
 ,addTitle    : function() { this.msg = this.msg.replace(/^.*?$/m, "$&"+this.title); }
 ,delDupData  : function() { //わざと重複して要求した先頭レス番データ削除
					if ((this.msg.match(/^(\d+)/i)||[])[1] == DatInfo.cnt) { this.msg = this.msg.replace(/^.*\n/m, ""); }
				}
 ,fillAbn     : function() {
					// 透明あぼーんレスを挿入する
					var d = [], n = this.first, m;
					var s = this.msg.split("\n");
					for (var i=0; i<s.length; i++) {
						m = parseInt(s[i].replace(/^(\d+).+$/, "$1"),10);
						if(n>m) continue; //レス番重複または逆転時はスキップ
						for (var j=n; j<m; j++) {
							d.push(j+"<>"+(/\.bbspink\.com$/.test(URL.site)?ABN_MSG_PINK:ABN_MSG));
							n++;
						}
						d.push(s[i]); n++;
					}
					this.msg = d.join("\n");
				}
 ,delResNo    : function() { this.msg = this.msg.replace(/^\d+<>/mg, ""); }
 ,overwriteMsg : function() {
 					var data = this.msg.split("\n");
 					var msg = DatInfo.msg;
 					var i;
 					for (i=0; i<data.length; i++) msg[parseInt(data[i],10)-1] = data[i].replace(/^\d+<>/,"");
 					for (i=0; i<msg.length; i++) if(!msg[i]) msg[i] = NOT_GET_MSG;
 					this.msg = msg.join("\n");
 					if(this.msg.slice(-1)!="\n") this.msg += "\n";
 				 }
 ,rebuildSubject : function() { Err("E_no_support"); }
 ,proc        : function() {
					this.prepare();
					URL.set_prm(this.urlReplace(args.url));
					var brd, m = Jane.getBRD(URL.prm);
					if(/^(\w+)\.[25]ch\.net/.test(URL.site)) {
						// URLをbrdの登録されているHOST名に置換する(2ch/5ch対策)
						if(RegExp.$1=="itest") { URL.set_prm(URL.url.replace(/\w+\.[25]ch\.net/,m[1]+"."+m[2])); }
						else                   { URL.set_prm(URL.url.replace(/[25]ch\.net/,m[2])); }
					}
					if (m) brd = m[0];
					if (!brd) brd = this.createBrdFolder();
					if (!brd) Err("E_brditem_not_found");
					var dat = Jane.LogBasePath + JANE_LOGS + brd + URL.thrID + ".dat";
					var bak = Jane.LogBasePath + JANE_BAK + brd + URL.thrID + ".dat";
					DatInfo.setInfo(dat, bak, brd);
					if (args.subject) { this.rebuildSubject(); return; }
					if (args.browser) { invokeBrowser(URL.url); return; }
					URL.appendRange(DatInfo.cnt);
					if (trace()|this.readHTTP(URL.url)|trace("HTTP total read time")) {
						if(!this.msg) Err("E_block_not_found","\n\nTITLE="+this.title);
						if (!this.noChkTitle && !this.title) Err("E_title_not_found");
						trace(); this.mainReplace(); trace("html->dat main Replace");
						if (args.append) {
							trace(); this.delDupData(); trace("del dupdata time");
							if(this.msg=="") Err("E_already_there");
						}
						this.first = this.getFirst();
						this.last  = this.getLast();
						this.checkData(this.msg);
						if (this.first==1) { this.addTitle(); }
						if(this.requireFillAbn) { trace(); this.fillAbn(); trace("透明abnレス挿入"); }
						trace(); this.postReplace(); trace("post Replace");
						if(args.overwrite) this.overwriteMsg();
						else               this.delResNo();
					}
					trace("スレタイトル:"+this.title+"\tレス数:"+this.last,9);
					saveDat(dat, this.msg, this.bin);
					DatInfo.setNewDatInfo(this.title, this.last);
					saveIdx("http://"+URL.site+((URL.category)?"/"+URL.category:"")+"/"+URL.brdID);
					invokeJaneStyle(URL.getUrl2());
					trace("---- end ----",1);
				}
}

var Thread_2ch = object(Thread,{
  read_cgi_ver : ""
 ,REG_PATTERN : [
   // ver 07.0.0 / ver.07.0.1
   { "thr" : /<div class="thread">(<div class="post"[^>]*><div class="meta">[\s\S]+<\/span><\/div><\/div>)((?:<br>)?<\/div>|[\s\S]*?$)/i
     ,"msg" : /[\s\S]*?<div class="post"[^>]*>(?:<[^>]*?>)*<span class="number">(\d+).+?<span class="name"><b>(?:<a href="mailto:(.+?)">)?(.*?)(?:<\/a>)?<\/b><\/span><span class="date">(.*?)<\/span>(<span class="be[^>]*><a[^>]*>[^<]*<\/a><\/span>)?<\/div><div class="message"><span class="escaped">(.*?)<\/span><\/div><\/div>/ig
     ,"rep" : "$1<>$3<>$2<>$4$5<>$6<>\n"
     ,"preReplace" : [ [/(?:<div class="post"[^>]* id="0"|<div (?:class|id)=[^>]*banner)[\s\S]*?(?=<div class="post"|(?:<br>)?<\/div><div class="push">|$)/ig,""]
                      ,[/<a href="(?:https?:)?\/\/(?!be\.[25]ch\.net\/).*?>([^<]*)<\/a>/ig, "$1"] ]
     ,"postReplace" : [ [/<span class="be[^>]*><a href="[^"]+\/(\d+)"[^>]*>\?(.*?)<\/a><\/span>/ig," BE:$1-$2"]
                       ,[/^(\d+<>.*?<>.*?<>.*? BE:\d+-[^ <]+) BE:\d+-[^ <]+/mg,"$1"]
                       ,[/<\/span><span class="uid"[^>]*>/ig, " "]
                       ,[/<img src="(?:https?:)?(\/\/img\.[25]ch\.net\/.+?)">/ig, "sssp:$1"]
                       ,[/<img src="(?:https?:)?(.*?)">/ig, IMG_TO+"$1"] ]
    }

   // ver 06.0.0
   ,{ "thr" : /<div class="thread"[^>]*>((?:<div class="post".+?<\/div><\/div>)+)(<\/div>)?/i
     ,"msg" : /.*?<div class="number">(\d+).+?<\/div><div class="name"><b>(?:<a href="mailto:(.+?)">)?(.*?)(?:<\/a>)?<\/b><\/div><div class="date">(.*?)<\/div><div class="message">(.*?)<\/div><\/div>(?=<div class="post"|$)/ig
     ,"rep" : "$1<>$3<>$2<>$4<>$5<>\n"
     ,"preReplace" : [ [/(?:<div class="post"[^>]* id="0"|<div (?:class|id)=[^>]*banner)[\s\S]*?(?=<div class="post"|<\/div><div class="cLength"|$)/ig,""]
                      ,[/<a href="(?:https?:)?\/\/(?!be\.[25]ch\.net\/).*?>([^<]*)<\/a>/ig, "$1"] ]
     ,"postReplace" : [ [/<\/div><div class="be[^>]*><a href="[^"]+\/(\d+)"[^>]*>\?(.*?)<\/a>/ig," BE:$1-$2"]
                       ,[/<img src="(?:https?:)?(\/\/img\.[25]ch\.net\/.+?)">/ig, "sssp:$1"]
                       ,[/<img src="(?:https?:)?(.*?)">/ig, IMG_TO+"$1"] ]
    }

   // ver 06.0.0 ppspink
   ,{ "thr" : /(<section class="thread"[\s\S]+<\/dd><\/dl>)(<\/section>)/i
     ,"msg" : /[\s\S]*?<dl class="post"[^>]*>(?:<[^>]*?>)*<span class="number">(\d+).+?<span class="name"><b>.*?(?:<a href="mailto:(.+?)">)?(.*?)(?:<\/a>)?<\/b><\/span><span class="date">(.*?)<\/span>(<div class="be[^>]*><a[^>]*>[^<]*<\/a><\/div>)?<\/dt><dd class="thread_in">(.*?)(?:<\/dd><\/dl>|$)/ig
     ,"rep" : "$1<>$3<>$2<>$4$5<>$6<>\n"
     ,"preReplace" : [ [/(?:<dl class="post"[^>]* id="0"|<div (?:class|id)=[^>]*banner)[\s\S]*?(?=<section|<dl class="post"|$)/ig,""]
                      ,[/<a href="(?:https?:)?\/\/(?!be\.[25]ch\.net\/).*?>([^<]*)<\/a>/ig, "$1"] ]
     ,"postReplace" : [ [/<div class="be[^>]*><a href="[^"]+\/(\d+)"[^>]*>\?(.*?)<\/a><\/div>/ig," BE:$1-$2"]
                       ,[/^(\d+<>)<font color="green">(.*?)<\/font>(?=<>)/img, "$1$2"]
                       ,[/<img src="(?:https?:)?(\/\/img\.[25]ch\.net\/.+?)">/ig, "sssp:$1"]
                       ,[/<img src="(?:https?:)?(.*?)">/ig, IMG_TO+"$1"] ]
    }

   // ver 05.02.02
   ,{ "thr" : /^[\s\S]*?<dl[^>]*>\s*(?:<font[^>]*>.*<\/font>.*\s*)?((?:\s*<dt[^>]*>.+?<dd>.+\r?\n?)+)(\s*<)?/i
     ,"msg" : /[ \t]*<dt.*?>([0-9]+).+?(?:"mailto:(.+?)">)?<b[^>]*>(.*?)<\/b>(?:<\/font>|<\/a>)?(?: ?投稿日)? ?：(.*?)<dd>(.*?)(?:<br>)*(?=<dt.*?>|$)/img
     ,"rep" : "$1<>$3<>$2<>$4<>$5<>"
     ,"preReplace" : [ [/(?:<div (?:class|id)=[^>]*banner)[\s\S]*?(?=<dt|<\/dl>|$)/ig,""]
                      ,[/<a href="(?:https?:)?\/\/.*?>([^<]*)<\/a>/ig, "$1"]
                      ,[/(<a href=)"\/cdn-cgi\/l\/(email-protection\#.*?">)/ig,'$1"mailto:$2'] ]
     ,"postReplace" : [ [/<a href="javascript:be\(([^\)]+?)\)[^>]*>\?(.*?)<\/a>/ig, "BE:$1-$2"]
                       ,[/<img src="(?:https?:)?(\/\/img\.[25]ch\.net\/.+?)">/ig, "sssp:$1"]
                       ,[/<img src="(?:https?:)?(.*?)">/ig, IMG_TO+"$1"] ]
     ,"ln_terminate" : true
    }
  ]
,urlReplace  :
	function(url) {
	    url = url.replace(/^http:\/\/(?:mattari\.plusvip\.jp|jane\.s28\.xrea\.com)\/test\/\w+\.cgi\/(?:jane2ch|bbs)\//, "http://jane2ch.net/test/read.cgi/community/")
		         .replace(/^(http:\/\/next2ch\.net\/)(\w+\/)(?:kako\/\d{3,4}\/(?:\d{5}\/)?)?(\d+)(?:\/|\.html)?$/,"$1test/read.cgi/$2$3/")
				 .replace(/\/read\.cgi\?(?=.*?bbs=(\w+))(?=.*?key=(\d+))(?=.*?st=(\d+))?(?=.*?to=(\d+))?.*$/i, "/read.cgi/$1/$2/$3-$4").replace(/\/-$/,"/")
				 .replace(/^(.*?)itest(\.[25]ch\.net)\/(\w+)(?=\/test\/read\.cgi\/)/,"$1$3$2");
		if(!args.keep_kako)
			url=url.replace(/^(.*?\/)(\w+\/)kako\/\d{3,4}\/(?:\d{5}\/)?(\d+)\.html$/,"$1test/read.cgi/$2$3/");
		return url;
	}
 ,preReplace  :
 	function() {
		var i,list;
		if(this.re_sel==-1) this.testTBlock(); //re_selの設定
		if(this.re_sel>=0) {
			trace("");
			list = this.REG_PATTERN[this.re_sel].preReplace;
			for(i=0;i<list.length; i++) {
				this.msg = this.msg.replace(list[i][0],list[i][1]);
			}
			trace("pre Replace");
		}
	}
 ,postReplace :
 	function() {
		var i,list;
		list = this.REG_PATTERN[this.re_sel].postReplace;
		for(i=0;i<list.length; i++) {
			this.msg = this.msg.replace(list[i][0],list[i][1]);
		}
	}
 ,_getKakoUrl :
	function() {
		var p = URL.prm;
		if(URL.thrID<1000000000)
			{ url="http://$1/$2/kako/$3/$4.dat.gz".expand([,p[1],p[5],p[6].substr(0,3),p[6]]);}
		else
			{url="http://$1/$2/kako/$3/$4/$5.dat.gz".expand([,p[1],p[5],p[6].substr(0,4),p[6].substr(0,5),p[6]]);}
		return url;
	}
 ,readHTTP  :
	function(url) {
		var s,ss,u,msgLength;
		if(!URL.otherURLType) {
			if(!URL.kako && !URL.RE_HOST.test(url)) {
				if(!this.readHTTP0(url)) return false; //dat取得
			}
			/*@if (@EnabledTest2chJSON)
				o("1st try json");
				this.msg = get2chJSON();
				if(this.msg=="") Err("E_already_there");
				if(this.msg) return false;
				o("2nd try html");
			@end @*/
			this.kakoUrl = this._getKakoUrl();
			// keep_kakoオプションによるkako形式のURIが受け渡される場合には最初に .dat.gz/.dat のアクセスを試行する
			if(URL.kako) if(!this.readHTTP2(this.kakoUrl)) return false;
		}
		trace("try URL="+url,9);
		this.msg = readHTTP(url)[0];
		this.read_cgi_ver = (this.msg.match(/>read\.cgi ver ([\d.]+)/)||[])[1];
		this.preReplace();
		this.getTitle(this.msg);
		msgLength = this.msg.length;
		ss = this.setTBlock();
		if (ss==null && !URL.otherURLType) {
			u = this.kakoUrl.replace(/\.dat\.gz$/,".html");
			switch(this.readHTTP3(u)) {
				case 0: return false;
				case 1: url=u;  ss=this.setTBlock(); break;
				default: break // case -1
			}
		}
		if(ss==null) {
			ss = "<URL>="+url+"\n<TITLE>="+this.title+"\n<文字数>="+msgLength+"\n\n";
			ss += ((this.msg.match(/^((?=.*LoadAverage|人大杉).*$)/im)||[])[1])
					|| ((this.msg.match(/<h1[^>]*>([\s\S]*?)<\/h1>/m)||[])[1])
					|| ((this.msg.match(/<p[^>]*>\n*(.*\s+.*\s*)$/m)||[])[1])
					|| this.msg.substr(0,(msgLength>100)?100:msgLength-1).replace(/<br.*?>/g,"\n");
			Err("E_block_not_found", "\nもしかしたら以下のはメッセージかも\n\n"+ss+"\n");
		}
		if (!ss) {
			if (shell.Popup("途中でデータが途切れているようですが続行しますか？",0,MY_NAME,4+48)!=6) Err("E_stop");
		}
		if(this.REG_PATTERN[this.re_sel].ln_terminate && this.msg && this.msg.slice(-1)!='\n') this.msg += '\n';
		return true;
	}
 ,readHTTP2 :
	function(url) {
		var re1 = /^(?:(?!<>).)*<>(?:(?!<>).)*<>(?:(?!<>).)*<>(?:(?!<>).)*<>((?:(?!<>).)*).*\s*$/m;
		var re2 = /^(?:[^,]*),(?:[^,]*),(?:[^,]*),(?:[^,]*),(.*)$/m;
		trace("try URL="+url,9);
		var s="",r="";
		try { s=readHTTP(url); r=s[0].match(re1); if(!r) r=s[0].match(re2); }catch(e){} //9999999999.dat.gz
		if(!r) {
			url=url.replace(/\.gz$/,"");
			trace("try URL="+url,9);
			try{ s=readHTTP(url); r=s[0].match(re1); if(!r) r=s[0].match(re2); }catch(e){} //9999999999.dat
		}
		if(r) {
			this.msg = s[0];
			this.bin = s[2];
			this.last = this.checkData0(s[0]).replace(/^.*$/m,"").length;
			this.title = r[1];
			URL.kako = true;
			delete args.append;
			return false;
		}
		return true;
	}
 ,readHTTP3 :
	function(url) {
		var title=((this.msg.match(/<title>(.*)<\/title>/im)||[])[1]||"");
		trace("HTTP title="+title,9);
		if (/error|隊長|過去ログ倉庫/i.test(title)) {
			if(!URL.kako && !this.readHTTP2(this.kakoUrl)) return 0;　//最初に/kako/.../9999999999.dat.gzを試す
			trace("try URL="+url,9);
			var s = ""; try{ s=readHTTP(url)[0]; }catch(e){}  //9999999999.html
			if(/<dl.*>/.test(s)) { // hit
				this.title = (s.match(/<title>(.*)<\/title>/im)||[])[1]||"";
				this.msg = s;
				this.preReplace();
				URL.kako = true;
				delete args.append;
				return 1;
			}
			trace("HTTP title="+((s.match(/<title>(.*)<\/title>/im)||[])[1]||""),9);
		}
		return -1;
	}
 ,readHTTP0 :
	function(url) {
		var re = /^(?:(?!<>).)*<>(?:(?!<>).)*<>(?:(?!<>).)*<>(?:(?!<>).)*<>((?:(?!<>).)*).*\s*$/m;
		var s;
		url = "http://"+URL.site+"/"+URL.brdID+"/dat/"+URL.thrID+".dat";
		trace("try URL="+url,9);
		try { s=readHTTP(url); } catch(e) {}
		if(s) {
			this.msg = s[0];
			this.title = (s[0].match(re)||[])[1];
			if(this.title===void 0||/[２５]ちゃんねる専用ブラウザをご利用の皆さまへ/.test(this.title)) return true;
			this.bin = s[2];
			this.last = this.checkData0(s[0]).replace(/^.*$/m,"").length;
			delete args.append;
			return false;
		}
		return true;
	}
});

var Thread_jbbs = object(Thread,{
  prepare     : function() { Jane=Jane_jbbs; URL=URL_jbbs; }
 ,REG_PATTERN : [
    { "thr" : /^[\s\S]*?<dl\s+(?:class|id)="thread[^>]*?>\s*(<dt>(?:(?!<\/dl>)[\s\S])*?\s*)<\/dl>[\s\S]*$/i
     ,"msg" : /<DT><A.*?>([0-9]+).+?(?:<A HREF="mailto:(.+?)">)?<B> ?(?:<font color.*?>)?(.*?)(?:<\/font>)? ?<\/B>(.*?)(?:<\/A>|<\/FONT>)(?: 投稿日)?： ?(.*?)(?:<BR>)?<DD>(.*) ?<BR><BR>/img
     ,"rep" : "$1<>$3$4<>$2<>$5<>$6<>"
    }
   ,{ "thr" : /^[\s\S]*?<dl[^>]*?>(?:(?!<dt>)[\s\S])*(<dt>(?:(?!<\/dl>)[\s\S])*)<\/dl>[\s\S]*$/i
     ,"msg" : /<DT><A.*?>([0-9]+).+?(?:<A HREF="mailto:(.+?)">)?<B> ?(?:<font color.*?>)?(.*?)(?:<\/font>)? ?<\/B>(.*?)(?:<\/A>|<\/FONT>)(?: 投稿日)?： ?(.*?)(?:<BR>)?<DD>(.*) ?<BR><BR>/img
     ,"rep" : "$1<>$3$4<>$2<>$5<>$6<>"
    }
  ]
 ,urlReplace  : function(u) {
					//したらばの事前URL変換：旧site名、/storage/ URLを現在のURLに置換
					return  u.replace(URL.RE_HOST,"http://jbbs.shitaraba.net/")
							 .replace(/\/bbs\/lite\//,"/bbs/")
							 .replace(/\/\w+\.cgi\//, "/read.cgi/")
							 .replace(/^(http:\/\/[^\/]+\/)([^\/]+\/)([^\/]+\/)storage\/(\d+).*$/,"$1bbs/read.cgi/$2$3$4/")
							 .replace(/\/([^\/]+)\/bbs\/read\.cgi\?(?=.*?bbs=(\d+))(?=.*?key=(\d+))(?=.*?start=(\d+))?(?=.*?end=(\d+))?.*$/i, "/bbs/read.cgi/$1/$2/$3/$4-$5").replace(/\/-$/,"/");
				}
 ,preReplace : 	function() {
					if(URL.otherURLType==1) { // archive.org
						this.msg = this.msg.replace(/<a href="\/web\/\d+\//g,'<a href="');
					}
					if(URL.otherURLType && /<dl.*?>\s+<dt>\s+<a/.test(this.msg)) {
						//1と100レス毎に入る公告を除去
						this.msg = this.msg.replace(/^\s*(.*?)\s*\n/mg,"$1")
						                   .replace(/<!--.*?-->/g,"")
						                   .replace(/<br>(?:<\/dd>)?<div[^>]*>.*?<\/div>(?=<dt>|<\/dl>)/ig,"")
						                   .replace(/<table.*?>(?:(?!<dt>).)*?<\/table>(?=<dt>|<\/dl>)/ig,"")
						                   .replace(/<br>\s*<br>(?:<\/dd>)?(?=<dt>|<\/dl>)/ig,"<br><br>\n")
						                   ;
					}
			 	}
 ,mainReplace :
	function() {
		this.msg = this.msg.replace(/^(\d+<>.*?<>.*?<>.*?)(<>.*<>)((?:(?!<>).)*)$/mg, function($0,$1,$2,$3) {return ($3)?$1+" ID:"+$3+$2:$0;});
	}
 ,createBrdFolder :
	function() {
		var s = readHTTP( URL.url.replace( /\/\w+\.cgi(\/\w+\/\w+\/).*$/, "/api/setting.cgi$1") )[0];
		var bbs_title = (s.match(/^BBS_TITLE=(.*)$/m)||[])[1];
		var category = (s.match(/^CATEGORY=(.*)$/m)||[])[1];
		bbs_title || category || Err("E_brditem_not_found");
		brd = [ "【したらば】" + category.convDontUseStr() , bbs_title.convDontUseStr() , ""].join("\\");
		path(Jane.LogBasePath + JANE_LOGS + brd + URL.thrID + ".dat");
		return brd;
	}
 ,checkData   :
	function(s) {
		if (this.last-this.first+1 != s.replace(/^.*$/mg,"").length) {
			this.requireFillAbn = true;
		}
		// 末尾のIDを削除
		this.msg = s.replace(/^(.*?)<>((?!<>).)*$/mg, "$1");
	}
 ,getTitle    : function(s) {
					this.title = (s.match(/<>((?:(?!<>).)*)<>(?:(?!<>).)*$/m)||[])[1];
					if(!this.title) this.title=DatInfo.title;
				}
 ,addTitle    : function() {}
 ,readHTTP  :
	function(url) {
		// web.archive/google cacheからの取得
		if(URL.otherURLType) {
			this.getTitle = this.getTitle2;
			this.delDupData = this.delDupData2
			this.checkData = this.checkData2;
			Thread.readHTTP.call(this, url);
			delete this.mainReplace;
			delete this.addTitle;
			return true;
		}
		//-- 1st try : rawmode read ----
		var raw_url = url.replace(/\/\w+\.cgi\//, "/rawmode.cgi/");
		trace("try URL="+raw_url,9);
		var s = readHTTP(raw_url);
		switch( errmsg = (s[1].match(/^ERROR: *(?! )(.*?)$/m)||[])[1]||"" ) {
			case "BBS NOT FOUND": Err("E_bbs_not_found");
			case "KEY NOT FOUND": Err("E_key_not_found");
			case "THREAD NOT FOUND": Err("E_thread_not_found");
			case "STORAGE IN":
				this.getTitle = this.getTitle2;
				this.delDupData = this.delDupData2
				this.checkData = this.checkData2;
				Thread.readHTTP.call(this, URL.prm[0]);
				delete this.mainReplace;
				delete this.addTitle;
				break;
			case "": //正常取得
				s = s[0];
				this.getTitle(s);
				IDX_STATE["jbbs"] = 0;
				this.msg = s;
				break;
			default: Err("E_http_recieve", "(rawmode) : " + errmsg);
		}
		return true;
	}
 ,getTitle2   :
	function(s) { this.title = (s.match(/<h1 class="thread-title">(.*?)<\/h1>/i)||[])[1]
				  || (s.match(/<title>(.*?)<\/title>/i)||[])[1] || "";
				}
 ,delDupData2 : //append時、既存のレス数分データを読み飛ばす
	function() { while( (this.msg.match(/^(\d+)/i)||[])[1] < DatInfo.cnt+1)
					{ this.msg = this.msg.replace(/^.*\n/m,""); }
			   }
 ,checkData2   :
	function(s) { var ln = this.checkData0(s);
				  if (this.last-this.first+1 != ln.length) { this.requireFillAbn = true; }
				}
});

var Thread_machi = object(Thread,{
  prepare     : function() { Jane=Jane_machi; URL=URL_machi; }
 ,noChkTitle  : true
 ,REG_PATTERN : [
    { "thr" : /^(?:(?!<>).)*<>(?:(?!<>).)*<>(?:(?!<>).)*<>(?:(?!<>).)*<>(?:(?!<>).)*<>((?:(?!<>).)*)<>((?:(?!<>).)*).*\s*$/m
     ,"msg" : /^((?:(?!<>).)*<>(?:(?!<>).)*<>(?:(?!<>).)*<>(?:(?!<>).)*)(<>(?:(?!<>).)*<>(?:(?!<>).)*)<>((?:(?!<>).)*)(?:<>)?(.*\s*)$/mg
     ,"rep" : "$1 [ $3 ]$2$4"
    }
  ]
 ,urlReplace  : function(u) {
 					if(URL.otherURLType) Err("E_illegal_url");
 					u=u.replace(/\/test\/(?=read)/,"/bbs/")
 					   .replace(/\/read\.cgi\//,"/offlaw.cgi/2/");
 					trace("replace url="+u,9);
 					return u;
 				}
 ,getTitle    : function(s) { this.title = (s.match(this.REG_PATTERN[this.re_sel].thr)||[])[1] || DatInfo.title; }
 ,checkData   : function(s) {
 					if(!/^\d+<>.*?<>.+?<>.*?<>.*$/m.test(s)) Err("E_remained_garbage");
					if (this.last-this.first+1 != s.replace(/^.*$/mg,"").length) { this.requireFillAbn = true; }
				}
 ,delDupData  : function() {}
 ,addTitle    : function() {}
 ,setTBlock   : function() {}
});

//==============================================================
function loadFile(f) {
	var s="";
	try {
		strm.Type = 2;
		strm.Charset = 'shift_jis';
		strm.Open();
		strm.loadFromFile(f);
		s = strm.ReadText(-1);
		strm.Close();
	} catch(e) { strm.Close(); Err("E_loadfile", "\n"+e.message+"\ncurrent="+shell.CurrentDirectory+"\nfile="+f); }
	return s;
}
function loadFile2(f) {
	var s="";
	try {
		var file = fso.OpenTextFile( f, 1, false, 0);
		s = file.ReadAll();
		file.close();
	} catch(e) {
		if(file) file.close();
		s = loadFile(f);
	}
	return s;
}

function saveFile(f,s,add) {
	strm.Type = 2;
	strm.Charset = 'shift_jis';
	strm.Open();
	if (add) { try {strm.loadFromFile(f); strm.Position = strm.Size;} catch(e){} }
	strm.WriteText(s);
	try { strm.Savetofile(f, 2); }
	catch(e) { strm.Close(); Err("E_savefile", "\n"+e.message+"\ncurrent="+shell.CurrentDirectory+"\nfile="+f); }
	strm.Close();
}
function saveFile2(f,s,add) {
	try{
		var file = fso.OpenTextFile( f, (add)?8:2 , true, 0);
		file.Write(s);
		file.Close();
	} catch(e) {
		if(file) file.Close();
		saveFile(f,s,add);
	}
}

function saveBinaryFile(f,b) {
	strm.Type = 1;
	strm.Open();
	strm.Write(b);
	try { strm.Savetofile(f, 2); }
	catch(e) { strm.Close(); Err("E_savefile", "\n"+e.message+"\ncurrent="+shell.CurrentDirectory+"\nfile="+f+" (binary)"); }
	strm.Close();
}

function readHTTP(u) {
	var s="", r="", b;
	if(args.proxy) {
		if(USED_WINHTTP) { http.setProxy(2, args.proxy, ""); }
		else Err("E_not_suported_proxy");
	}
	
	http.open("GET", u, true);
	for(var i in HTTP_HEADERS) { http.setRequestHeader(i, HTTP_HEADERS[i]); }
	http.send();
	var t0=new Date();
	while( (USED_WINHTTP) ? !http.waitForResponse(0) : http.readyState<4 ) {
		if (new Date() - t0 > HTTP_TIMEOUT) { http.abort(); Err("E_http_timeout"); }
		WScript.Sleep(50);
	}
//	if (http.status != 200 && !http.status==0) Err("E_http_recieve", " status="+http.status);
	var header = http.getResponseHeader("Content-Type");
	b = http.responseBody;
	r = http.getAllResponseHeaders();
	try {s = http.responseText;} catch(e) {}
	if (!/charset=/i.test(header)) {
		if(b !== void 0) {
			var cs = (s.match(/<meta[^>]*charset=([^>;"'\s]+)/i)||[])[1] || '_autodetect';
			if(cs=="x-sjis") cs="shift-jis";
			if(basp) {
				trace("文字コード変換開始 with basp21",9);
				s = basp.Kconv(b,4,cs=="shift-jis"?1:0);
			} else {
				trace("文字コード変換開始",9);
				strm.Type = 1;
				strm.Open();
				strm.Write(b);
				strm.Position = 0;
				strm.Type = 2;
				strm.Charset = cs;
				s = strm.ReadText(-1);
				strm.Close();
			}
		}
	}
	http.abort();
	if(!s) s="";
	return [s,r,b];
}

function saveDat(dat,s,b,add,latest) {
	var cnt;
	if (args.append) {
		if(s=="") Err("E_already_there");
	} else {
		if(s.match(/\n/g)==null) Err("E_no_data");
		cnt = s.match(/\n/g).length+DatInfo.offset;
		if(!args.overwrite) {
			if(DatInfo.cnt>=cnt && (latest==null || latest==true)) {
				if(REWRITE_DAT==3 || (REWRITE_DAT==2 && DatInfo.cnt==cnt)) Err("E_stop");
				if (REWRITE_DAT==0
						&& shell.Popup("新規のレスが無いようですが置換を続行しますか？ ("
					 					+DatInfo.cnt+" -->"+cnt+")",0,MY_NAME,4+32+256) != 6){
					Err("E_stop");
				}
			}
		}
	}
	if(args.bak) DatInfo.copyDat();
//	if((!args.append&&add==0)||args.overwrite) {
//		saveFile(path(dat),""); trace("create file:"+dat,9); //既存のdatを削除
//	}
	if(b===null) { trace(); saveFile2(path(dat), s, args.append||(!args.overwrite&&add) ); trace("save file:"+dat); }
	else         { trace(); saveBinaryFile(path(dat), b); trace("save binary file:"+dat); }
}

function invokeJaneStyle(url) {
	shell.Exec(JANE_EXE + " " + url);
	if(args.sendkey && args.sendkey > 0) {
		WScript.Sleep(args.sendkey);
		shell.SendKeys('^(w)');
		WScript.Sleep(200);
		shell.Exec(JANE_EXE + " " + url);
	}
	if(args.redraw) {
		WScript.Sleep(args.redraw);
		shell.SendKeys('%');
		WScript.Sleep(20);
		shell.SendKeys('T');
		WScript.Sleep(10);
		shell.SendKeys('G');
		WScript.Sleep(10);
		shell.SendKeys('0');
	}
}

function terminateJaneExe() {
	var wmi; try { wmi = new WMI(); } catch(e) { wmi=null; }
	shell.Exec(JANE_EXE);
	WScript.Sleep(200);
	shell.SendKeys("%({F4})");
	if(!wmi) { WScript.Sleep(4000);}
	else {
		do {
			var cnt=40;
			while(cnt && wmi.isAliveProcess(JANE_EXE, JANE_PATH+JANE_EXE)) { WScript.Sleep(100); cnt--;}
			if(!cnt) { WScript.Echo(JANE_EXE+"を終了させてください"); }
		} while(!cnt);
	}
}

function saveIdx(boardUrl,force) {
	var i,s,r,lines=Math.max(DatInfo.cnt,DatInfo.lines);
	var use_db = parseInt(Jane.getINI([,"OPTIONS","QuickMerge",""]),10);
	if(chkJaneProg().indexOf('Xeno')>=0) { use_db = parseInt(Jane.getINI([,"OJVIEW","QuickMerge",""]),10); }
	var basedir = shell.CurrentDirectory;
	var dir = fso.GetParentFolderName(fso.GetFile(DatInfo.dat).Path);
	var datName = DatInfo.dat.replace(/^.*\\([^\\]+)\.dat$/,"$1");
	
	var maxRes = getBrdCustomizeIni(boardUrl) || 1000;
	var state = (lines>=maxRes) ? 0 : IDX_STATE[ (URL===URL_jbbs) ? "jbbs" : "2ch" ];
	if (URL.kako) state = 10;
	
	var last_got = Number(new Date(fso.GetFile(DatInfo.dat).DateLastModified)/1000+9*60*60);
	var idx = [ datName,DatInfo.title,'',lines,'0','',boardUrl,state,lines,'','','0',last_got,'0','0' ];
	var idxText = [];
	for(i=0; i<idx.length; i++) { idxText[i] = "'" + idx[i] + "'"; }
	var SQL_CMD_1 = "CREATE TABLE IF NOT EXISTS tableversion (tablename PRIMARY KEY, version);"
					+ 'INSERT OR IGNORE INTO "tableversion" VALUES(' + "'board_db','00000001');"
					+ 'INSERT OR IGNORE INTO "tableversion" VALUES(' + "'idxlist','00000002');"
					+ "CREATE TABLE IF NOT EXISTS idxlist ("
					+ "datname TEXT PRIMARY KEY, title TEXT, last_modified TEXT, lines TEXT, view_pos TEXT, idx_mark TEXT,"
					+ " uri TEXT, state TEXT,new_lines TEXT, write_name TEXT, write_mail TEXT,"
					+ " last_wrote TEXT, last_got TEXT, read_pos TEXT, record_be TEXT,"
					+ " etc1 TEXT, etc2 TEXT);";
	var SQL_CMD_2 = 'INSERT OR IGNORE INTO idxlist VALUES(' + idxText.join(",") + ",NULL,NULL);";
	var SQL_CMD_3 = "update idxlist set new_lines=new_lines+$2-lines where datname='$1';".expand([,datName,lines]);
	var SQL_CMD_4 = "update idxlist set lines=" + idxText[3] + ",uri=" + idxText[6] + ",title=" + idxText[1]
					 + ",state=" + idxText[7] + ",last_got=" + idxText[12] + " where datname=" + idxText[0] + ";";

	if (use_db && args.restart) {
		var sql = new Sql();
		if(chkJaneProg().substr(0,4)=='Xeno' && !sql.isSqlite_ODBC) Err("E_require_sqlODBC");
		sql.isSqlite_ODBC || sql.isSqlite_exe || Err("E_require_sqlite");
	}
	if(args.restart) terminateJaneExe();
	
	if (use_db && args.restart) {
	switch(chkJaneProg()) {
		case 'Style' :
		case 'Style?':
			shell.CurrentDirectory = dir;
			r=sql.exec("BoardDB.db",SQL_CMD_1+SQL_CMD_2+SQL_CMD_3+SQL_CMD_4);
			break;
		case 'Xeno':
		case 'Xeno?':
			var qmerge3 = Jane.LogBasePath+JANE_LOGS+"qmerge3.db";
			if(!fso.FileExists(qmerge3)) break;
			idx.splice(14,1,last_got);
			idxText = [];
			for(i=0; i<idx.length; i++) { idxText[i] = "'" + idx[i] + "'"; }
			var brd=DatInfo.brd.slice(0,-1);
			var SQL_CMD_XENO1 = "select board_id,max(board_id) from board where board_name='"+brd+"';";
			var SQL_CMD_XENO2 = 'insert into board VALUES((select max(board_id)+1 from board),'+"'"+brd+"'"+');';
			var SQL_CMD_XENO3 = "select board_id from thread where board_id=$1 and datname='"+datName+"';";
			var SQL_CMD_XENO4 = "insert into thread values($1,"+idxText.join(",")+");";
			var SQL_CMD_XENO5 = "update thread set new_lines=new_lines+$2-lines where datname='$1';".expand([,datName,lines]);
			var SQL_CMD_XENO6 = "update thread set lines=" + idxText[3] + ",uri=" + idxText[6] + ",title=" + idxText[1]
								+ ",state=" + idxText[7] + ",last_got=" + idxText[12] + " where datname=" + idxText[0] + ";";
			var board_id = sql.select(qmerge3,SQL_CMD_XENO1);
			board_id = (board_id[0].match(/^(\d+)/)||[])[1];
			if (!board_id) { sql.exec(qmerge3, SQL_CMD_XENO2); board_id=((sql.select(qmerge3,SQL_CMD_XENO1))[0].match(/^(\d+)/)||[])[1]; }
			if(!((sql.select(qmerge3,SQL_CMD_XENO3.expand([,board_id])))[0].match(/^\d+/))) {
				sql.exec(qmerge3, SQL_CMD_XENO4.expand([,board_id]));
			} else {
				sql.exec(qmerge3, SQL_CMD_XENO5);
				sql.exec(qmerge3, SQL_CMD_XENO6);
			}
			default: break;
		}
		sql.finalize();
	}
	
	shell.CurrentDirectory = dir;
	// idxファイルの更新
	var isExistIdx = false;
	if(fso.FileExists(datName+".idx")) {
		s = loadFile(datName+".idx").replace(/\r/g,"").split("\n");
		if(s.length>=12) {
			isExistIdx = true;
			s[7]  = "" + (parseInt(s[7],10) + lines - parseInt(s[2],10));
			s[2]  = "" + idx[3];
			s[5]  = idx[6];
			s[6]  = "" + idx[7];
			s[11] = "" + last_got;
			s[0]  = idx[1];
		}
	}
	if(!isExistIdx) {
		s = idx;
		s.splice(0,1);
		s.push("");
	}
	s = s.join("\r\n");
	try { saveFile(datName+".idx", s); } catch(e) {}
	
	// subject.txtの更新
	var re = new RegExp("^"+datName+"\\..*\\((\\d+)\\)(\\s*)$", "m");
	s="";
	r=0;
	if(fso.FileExists("subject.txt")) try{s=loadFile("subject.txt"); r=1;} catch(e){r=-1;}
	if(force) {
		s = s.replace(re,"");
		s = datName+".dat<>"+DatInfo.title+"("+lines+")\r\n" + s;
		try {saveSubjectTxt("subject.txt", s, force);}
		catch(e) {trace("save error (subject.txt): "+e.massage,9);}
	} else {
		r = s.match(re);
		if(r) {
			s = s.replace(re, r[0].replace(/\((\d+)\)(\s*)$/,"("+lines+")$2"));
			try { saveFile("subject.txt",s); } catch(e) {}
		}
	}
	shell.CurrentDirectory = basedir;
}

function saveSubjectTxt(f,s,force) {
	if(force) try { if(fso.FileExists(f)) fso.GetFile(f).Attributes &= ~1 } catch(e){};
	saveFile(path(f),s);
	if(force) try { fso.GetFile(f).Attributes |= 1; } catch(e){} //read only属性
}

function Sql(){
	var DRIVER = "DRIVER=SQLite3 ODBC Driver;";
	var db = new ActiveXObject("ADODB.Connection");
	this.isSqlite_exe  = fso.FileExists(SCRIPT_PATH + "sqlite3.exe");
	this.isSqlite_ODBC = (function(){var s=true; try {db.Open(DRIVER);db.Close();} catch(e){s=false;}; return s;})();
	this.finalize = function() { db = null; }
	var funcTables  = [ "exec", "select" ];
	var types = (this.isSqlite_ODBC) ? "ODBC" : "exe";
	for(var i=0; i<funcTables.length; i++) { eval( "this."+ funcTables[i] + "=" + funcTables[i] + "_" + types + ";"); }
	function exec_ODBC(dbFile,sql) {
		try {
			var s="";
			db.Open(DRIVER+"Database="+dbFile);
			db.Execute(sql);
		} catch(e) { s = e.message; }
		try { db.Close(); } catch(e) { s += " | Connection Close:"+e.message; }
		return [,s];
	}
	function select_ODBC(dbFile,sql) {
		var r="",s="";
		var rs = new ActiveXObject("ADODB.Recordset");
		try {
			db.Open(DRIVER+"Database="+dbFile);
			rs.Open(sql,db);
			while(!rs.Eof) {
				var rr=[];
				for(var i=0; i<rs.Fields.count; i++) { rr.push(rs(i).Value); }
				r += rr.join("|")+"\n";
				rs.MoveNext();
			}
		} catch(e) { s = e.message; }
		try { rs.Close(); } catch(e) { s += " | Recordset Close:"+e.message; }
		try { db.Close(); } catch(e) { s += " | Connection Close:"+e.message; }
		rs = null;
		return [r, s];
	}
	function exec_exe(dbFile,sql) { return select_exe(dbFile, sql); }
	function select_exe(dbFile, sql) {
		var sqlite = shell.Exec(SCRIPT_PATH + "sqlite3.exe");
		sqlite.StdIn.WriteLine(".open '"+ dbFile+ "'");
		sqlite.StdIn.WriteLine(sql);
		sqlite.StdIn.WriteLine(".quit");
		return [ sqlite.StdOut.ReadAll(), sqlite.StdErr.ReadAll() ];
	}
}

function getBrdCustomizeIni(brdurl) {
	if(!fso.FileExists(JANE_BRDCUSTOMIZE_INI)) return null;
	var s=loadFile(JANE_BRDCUSTOMIZE_INI),r,u;
	brdurl=brdurl.replace(/^http:\/\//,"").replace(/\./g,"\\.");
	do {
		if (r = s.match(new RegExp("^\\[$1/?\\]\\s+MaxResNum=(\\d+)".expand([,"http://"+brdurl]),"im"))) break;
		u = brdurl.split(/\/(?=[^\/]+$)/);
		brdurl =u[0];
	} while(u[1])
	return r&&r[1];
}

function chkJaneProg() {
	var i,n1=0,n2=0, description,productname;
	var folder=sha.Namespace(JANE_PATH);
	var items=folder.Items();
	for(i=0; i<items.Count-1;i++) {
		if(folder.GetDetailsOf(items, i) == '説明') { n1=i; }
		if(folder.GetDetailsOf(items, i) == '製品名') { n2=i; }
	}
	if(n1>0) description = folder.GetDetailsOf(folder.ParseName("Jane2ch.exe"),n1);
	if(n2>0) productname = folder.GetDetailsOf(folder.ParseName("Jane2ch.exe"),n2);
	if (description=="JaneXeno") return "Xeno";
	if (description=="JaneView") return "View";
	if (productname=="Jane Style") return "Style";
	var fileversion = parseFloat(fso.GetFileVersion(JANE_PATH+JANE_EXE));
	if (fileversion>3.0) return "Style?";
	if (fileversion<1.0) return "Xeno?";
	return "Unknown";
}

function invokeBrowser(url) {
 	var browser = replaceEnv(args.browser||BROWSER_PATH);
	shell.Run((browser ? '"'+browser+'" ':"")+url);
 }

//==============================================================
function path(p) {
	var d = p.match(/[^\\]+\\/g)||[], e = "";
	for (var i = 0; d[i]; i++) fso.FolderExists(e += d[i].replace(/[. ]+\\/,"\\")) || fso.CreateFolder(e);
	return p;
}

function parmParse(args) {
	var ptn = [ "^(?:/n:)?(\\d+)$", "^/f$", "^\\+?https?://", "^/w:?(-?\\d+)?$", "^/-w$", "^/a(?:ppend)?$"
				, "^/b(?:ak)?(1)?$", "^/z$", "^/redraw:?(\\d+)?$", "^/log:?(.*)$", "^/keep_kako$"
				, "^/proxy:(.*)$", "^/cfg:?(.*)$", "^/subject$", "^/browser:?(.*)$", "^/pos:(\\d+)$"
			  ];
	var i,j,n,p = {};
	var require_input_url = false;
	for (i=0; i<args.length; i++) {
		for (j=0,n=-1; j<ptn.length;j++) {if ((new RegExp(ptn[j],"i")).test(args(i))) { n=j; break;} }
		switch (n) {
			case 0: p["opt_n"] = ((args(i).match(new RegExp(ptn[n],"i"))||[])[1]||"");
					break;
			case 1: require_input_url = true;
					break;
			case 2: p["url"] = args(i);
					break;
			case 3: p["sendkey"] = ((args(i).match(new RegExp(ptn[n],"i"))||[])[1]||1200);
					break;
			case 4: p["sendkey"] = -1;
					break;
			case 5: p["append"] = true;
					break;
			case 6: p["bak"] = -1;
					if ((args(i).match(new RegExp(ptn[n],"i"))||[])[1]) { p["bak"] = 1; }
					break;
			case 7: p["restart"] = true;
					break;
			case 8: p["redraw"] = ((args(i).match(new RegExp(ptn[n],"i"))||[])[1]||1200);
					break;
			case 9: p["trace"] = ((args(i).match(new RegExp(ptn[n],"i"))||[])[1]||"");
					break;
			case 10: p["keep_kako"] = true;
					break;
			case 11: p["proxy"] = ((args(i).match(new RegExp(ptn[n],"i"))||[])[1]||"");
					break;
			case 12: p["cfg"] = ((args(i).match(new RegExp(ptn[n],"i"))||[])[1]||"");
					break;
			case 13: p["subject"] = true;
					break;
			case 14: p["browser"] = ((args(i).match(new RegExp(ptn[n],"i"))||[])[1]||"");
					break;
			case 15: p["pos"] = ((args(i).match(new RegExp(ptn[n],"i"))||[])[1]||"");
					break;
			default: break;
		}
	}
	
	if (require_input_url || !p.url) p.url = (InputBox("URLを指定してください",MY_NAME, p.url)||"");
	if(p.url.charAt(0)=='+') { p.url = p.url.substr(1); p["overwrite"] =true; }
	if(p.overwrite) p.append = false;
	return p;
}

//==============================================================

function WMI() {
	var locator = new ActiveXObject("WbemScripting.SWbemLocator");
	var services = locator.ConnectServer(null, "root\\CIMV2");
	return {
		isAliveProcess :
			function (pName, pPath) {
				var query = "SELECT * FROM Win32_Process WHERE name='"+pName+"'";
				var props = this.wmiProps(query);
				for (var i=0, status=false; i<props.length; i++) { if(props[i].ExecutablePath == pPath) {status = true;} }
				return status;
			}
		,wmiProps :
			function (query) {
				var result = [];
				try {
					var set = services.ExecQuery(query);
					var e = new Enumerator(set);
					while (!e.atEnd()) { result.push(e.item()); e.moveNext(); }
				} catch (e) { throw e; }
				return result;
			}
		 ,getProcessID :
			function (pName, pPath) {
				var query = "SELECT * FROM Win32_Process WHERE name='"+pName+"'";
				do {
					var props = this.wmiProps(query);
					for (var i=0,c=0,pid; i<props.length; i++) {
						if (props[i].ExecutablePath == pPath) { c++; pid=props[i].ProcessID; }
					}
				} while (c>1);
				return pid;
			}
	}
}
function Trace() {
	var logfile = TRACE_LOG;
	var flag    = true;
	var first   = true;
	var t       = [];
	if(args.trace) logfile = replaceEnv(args.trace);
	if(!fso.FileExists(logfile)) {
		var env = new ENV();
		try{
			var f = fso.CreateTextFile(logfile);
			f.WriteLine("["+MY_NAME+"]");
			f.WriteLine("Jane Type = "+chkJaneProg()+"\t"+fso.GetFileVersion(JANE_PATH+JANE_EXE));
			f.WriteLine("current path = "+JANE_PATH);
			f.WriteLine("Logs path = "+Jane.LogBasePath+JANE_LOGS);
			f.WriteLine("script path = "+SCRIPT_PATH);
			f.WriteLine("UAC = "+env.UAC);
			f.WriteLine("64bit? = "+env.PROCESSOR_ARCHITECTURE+"\t"+env.PROCESSOR_ARCHITEW6432);
			f.WriteLine("----------------------------------------------------------------------");
			f.Close();
		} catch(e) {flag=false; if(f) f.Close();}
		env = null;
	}
	return function(s,n) {
		if(flag) try{
			if(!n) n=0;
			var f = fso.OpenTextFile(logfile,8,true,0);
			if(first) {first=false; f.WriteLine("");}
			var tt=new Date();
			if(!s) { t[n] = new Date();}
			else   { f.WriteLine(formatDate(tt,3)+"\t"+((n in t)?formatNum(tt-t[n],7)+"ms":"         ")+"\t"+s); }
			f.Close();
		} catch(e) {if(f) f.Close();}
	}
}
function getEnv(s) { var wse = shell.Environment("Process"); return wse(s); }
function replaceEnv(s) { return s.replace(/\%([^%]+)\%/ig, function(w0,w1) {return getEnv(w1);}); }
function formatDate(d,n) {
	return [d.getFullYear()
			, "/"  , ("0"+(d.getMonth()+1)).slice(-2)
			, "/"  , ("0"+d.getDate()).slice(-2)
			, "("  , "日月火水木金土".substr(d.getDay(),1)
			, ") " , ("0"+d.getHours()).slice(-2)
			, ":"  , ("0"+d.getMinutes()).slice(-2)
			, ":"  , ("0"+d.getSeconds()).slice(-2)
			, "."  , ("00"+parseInt(d.getMilliseconds(),10)+" ").slice(-4,n-4)
		  ].join("");
}
function formatNum(d,n) {
	return ("        "+d).slice(-n);
}
function ENV() {
	 this.UAC = sha.IsRestricted("system", "EnableLUA");
	 this.PROCESSOR_ARCHITECTURE = getEnv("PROCESSOR_ARCHITECTURE");
	 this.PROCESSOR_ARCHITEW6432 = getEnv("PROCESSOR_ARCHITEW6432")
	 return this;
}
//==============================================================

function main() {
	var u,thr;
	args.url = URL.entryCheck(args.url);
	if(u=URL.isOPT_BBS(args.url)) (new OPT_BBS[u][0](u)).proc();
	else if (URL_jbbs.RE_HOST.test(args.url)) Thread_jbbs.proc();
	else if (URL_machi.RE_HOST.test(args.url)) Thread_machi.proc();
	else Thread_2ch.proc();
}


//----- オプションファイルの組み込み (gethtmldat.cfg) -----
cfg = args.cfg || CFG_FILE;
if(fso.FileExists(replaceEnv(cfg))) {
	var code = loadFile(cfg);
	eval(code);
}
//---------------------------------------------------------

function thread_bakusai(itemName) {
	var URL = object(URL_2ch,{
	  RE_HOST : OPT_BBS[itemName][2]
	 ,RE_URL  : new RegExp("^http:"+OPT_BBS[itemName][2].source+"/thr_\\w+(?=.*/(acode=\\d))(?=.*/(ctgid=\\d+))(?=.*/(bid=\\d+))(?=.*/(?:tid=)?(\\d+))?")
	 ,itemName  : itemName
	 ,set_prm : function(url) {
 					var r;
					url=url.replace(/\/test\/read\.cgi/,"")
					       .replace(this.RE_HOST, this.itemName);
					this.prm  = url.match(this.RE_URL) || Err("E_illegal_url");
					r = "^\\t($1\\/thr_\\w+\\/$2\\/$3)\\t".expand([,this.RE_HOST.source.substr(4),this.prm[2],this.prm[3]]);
					r = Jane.brd.match(new RegExp(r,"img"));
					this.brdItem = this.prm[0] = RegExp.$1;
					if(this.prm[5]) {
						this.url  = "http://$1/thr_res/$2/$3/$4/tid=$5/".expand(this.prm);
						this.url2 = "http://$0/test/read.cgi/$4/$5/".expand(this.prm);
						this._setRange(url);
					} else {
						this.url  = "http://$1/thr_tl/$2/$3/$4/".expand(this.prm);
						this.requireThrList = true;
					}
					this.site     = this.prm[1];
					this.category = this.prm[3];
					this.brdID    = this.prm[4];
					this.thrID    = this.prm[5]||"";
				}
	 ,_setRange : function(url) {
					var range;
					range = url.match(/\/(rrid=(\d+)(?:-(\d+)|\/|$))/)||[];
					this.range = range[1];
					this.top   = parseInt(range[2],10)||1;
					this.end   = parseInt(range[3],10)||this.top;
					this.url2 += (args.opt_n||range[2]||"")
				}
	 ,appendRange : function(top) {
						this.top2=(args.append&&top)?top:(args.overwrite)?this.top:"1";
						if(args.overwrite) this.end2=Math.min(this.end,this.top2+49);
						else               this.end2=this.top2+49;
						if(args.append||args.overwrite) this.url += "rrid="+this.top2+"-"+this.end2+"/";
						else this.url += "tp=1/rw=1/";
					}
	 ,nextRange   : function() {
 						var r;
 						if(args.append||args.overwrite) {
 							this.top2 = this.end2+1;
							if(args.overwrite)  this.end2=Math.min(this.end,this.top2+49);
							else                this.end2=this.top2+49;
 							this.url=this.url.replace(/rrid=[\d-]+/,"rrid="+this.top2+"-"+this.end2);
 						} else {
 							r=this.url.match(/\/p=(\d+)/);
 							if(r) this.url=this.url.replace(/\/p=\d+/,"/p="+(parseInt(r[1],10)+1));
 							else  this.url=this.url.replace(/(\/tid=\d+)/,"$1/p=2");
 						}
					}
	});
	
	var Jane = object(Jane_2ch,{
	  _re_brd : "^([ \\S]+).*\\r\\n(?:\\t.*\\r\\n)*?\\t$1[^/]*/thr_\\w+/$2/$3\\t$4\\t([^\\t\\r\\n]+?) *\\r\\n"
	});
	
	this.msg = "";
	this.msgs = [];
	this.loop = 0;
	this.latest = false;
	
	this.getHeadline = function() {
		var RE=/(?:<div id="threadImg">(?:<[^>]+>)*?<img [^?]*? data-original="([^"]+).*?)?<div id="threadBody" itemprop="articlebody">([\s\S]*?)<\/div><\/dd><dd class="name"[^>]*>((?:(?!<\/dd>).)*)\s*<\/dd>/
		var r = this.msg.match(RE);
		if(r) {
			this.headline = "<span>"+r[1]+"<br>"+r[2]+"<br>"+r[3]+"</span>";
			this.headline = this.headline.replace(/\r?\n/g,"");
			if(this.headline) this.headline = "<hr><font color=blue><b>"+this.headline+"</b></font><hr><br>";
		}
	}
	this.chkLastPage = function() {
		var RE=/<span class="paging_next">/
		if(RE.test(this.msg)) this.latest=true;
	}
	
	this.readHTTP = function(url) {
		this.msg = readHTTP(url)[0];
	}
	this.mainReplaceToArray = function() {
		var r,s,n=URL.top2;
var RE = /<div class="article"[^>]*>(?:<[^>]*>)*?<a href=[^>]*>#(\d+)<\/a>.*?(?:<span itemprop="commentTime">([^<]*)(?:(?!<span).)*(<span class="latestCmnt">)?(?:(?!<\/div).)*?<dd class="body">(?:<a href="([^"]+)"[^>]*>)?(?:<img[^>]*? data-original="([^"]+)[^>]*>)?(?:<\/a>)?<div class="resbody[^>]*>((?:(?!<\/div>)[\s\S])*?)<\/div>(?:<[^>]*>)*<dd class="name">\[?((?:(?!<\/dd>).)*?)\]?|.*?<span class="resbody semired">([^<]*)(?:(?!<\/dd>).)*)<\/dd><\/div>/img
		do {
			r = RE.exec(this.msg);
			if(r) {
				if(r[8]) { s = (n)+"<>DELETE<>DELETE<>DELETE ID:DELETE<><font color=#ff3333>"+r[8]+"</font><>"; }
				else {
					s = r[1]+"<>"+r[7]+"<><>"+r[2]+"<>"+(r[5]?r[4]?r[5]+"<br>【 "+r[4]+" 】<br>":r[5]+"【この画像は削除されました】<br>":"")+r[6].replace(/\r?\n/g,"")+"<>";
				}
				this.msgs.push(s);
				if(r[3]) {this.latest=true;}
			}
			n++;
		} while(r)
	}
	
	this.preReplace = function() {
		this.msg = this.msg.replace(/<span data-tipso='[^']+?' class="resOverlay"><a href=[^>]*>((?:(?!<\/a>).)*)<\/a><\/span>/img,"$1");
	}
	this.postReplace = function() {
		this.msg = this.msg.replace(/(<img src="http:\/\/img2\.bakusai\.com[^"]*\.gif")[^>]*>/ig,"$1>&nbsp;")
		                   .replace(/^<span class="lightred"[^>]*>(.+?)<\/span>/img,"<font color=#ff6666>$1</font>");
	}
	
	this.checkMsg = function() {
		return (this.msgs.length==this.last-this.first+1);
	}
	this.overwriteMsg = function() {
		var msgs = DatInfo.msg;
		var i;
		for (i=0; i<this.msgs.length; i++) {
			msgs[parseInt(this.msgs[i],10)-1] = this.msgs[i].replace(/^\d+<>/,"");
		}
		for (i=0; i<msgs.length; i++) if(!msgs[i]) msgs[i] = NOT_GET_MSG;
		DatInfo.update(msgs);
		msgs.push("");
		this.msg = msgs.join("\n");
	}
	
	this.rebuildSubject = function() {
		var i,list=[];
		var path = fso.GetParentFolderName( DatInfo.dat ).replace(/[^\\]$/,"$&\\");
		var files = fso.GetFolder(path).Files;
		var e = new Enumerator(files);
		for ( e.moveFirst(); !e.atEnd(); e.moveNext()) {
			var file = e.item();
			if(/^.*\.dat$/.test(file.Name)) {
				var s=""; try{s=loadFile(file.Path);} catch(e){}
				if(s) {
					s = s.split("\n");
					title=s[0].split("<>");
					title=title[4]||"タイトル不明";
					list.push([file.Name,file.DateLastModified-0,title,s.length-1]);
				}
			}
		}
		for(i=0;i<list.length;i++) list[i]=list[i][0]+"<>"+list[i][2]+"("+list[i][3]+")";
		if(list.length) list.push("");
		saveSubjectTxt(path+"subject.txt", list.join("\r\n"), true);
	}
	this.makeSubject = function() {
		var i,s,r,n=-1,list={},tid,tmsg,tnums,x=0;
		var file=DatInfo.dat.replace(/[^\\]*$/,"")+"subject.txt";
		var max_read_pages = fso.FileExists(file) ? MAX_READ_PAGES_OF_THREAD_LIST_UPDATE
		                                          : MAX_READ_PAGES_OF_THREAD_LIST_CREATE;
		var re1s=[
		           /<div class="movelist">(?:(?!<\/div>)[\s\S])*?\[\d+\]&nbsp;<a href="(?=[^"]*tid=(\d+))[^>]*>(.+)<\/a><br \/>レス\((\d+)\)/img
		          ,/^\s*(?:<span class="thrNumber">)?\[\d+\](?:<\/span>)?[^<]*<a href="(?=[^"]*tid=(\d+))[^>]*>(.+)<\/a>[^(\n]*\((\d+)\)/img
		          ,/<div class="img_thlist">\s*<table>\s*<tr>\s*<th>\s*<div class="thr_title"[^>]*>\s*<a href="(?=[^"]*tid=(\d+))[^>]*>\s*<strong>(.+)<\/strong>(?:(?!<\/table>)[\s\S])*?<td>\d\d\/\d\d \d\d:\d\d\((\d+)件\)/img
		         ];
		var re2=/<span class="paging_nextlink[^>]*>[^<]*<a href="[^"]*\/(p=\d+\/)/
		while(max_read_pages--) {
			trace("readHTTP URL="+URL.url);
			r=readHTTP(URL.url);
			this.msg = r[0];
			if(n<0) for(i=0;i<re1s.length; i++) { if(re1s[i].test(this.msg)) {n=i; re1s[i].lastIndex=0; break;} }
			
			if(n<0) Err("E_data_not_found");
			do{
				if(s = re1s[i].exec(this.msg)) {
					tid=RegExp.$1; tmsg=RegExp.$2; tnums=RegExp.$3;
					tmsg = tmsg.replace(/<[^>]*>/g,"?");
					list[tid+".dat"] = tmsg + "("+ tnums + ")";
					x++;
				}
			} while(s);
			s=this.msg.match(re2);
			if(!s) break;
			URL.url = URL.url.replace(/\/p=\d+\//,"/")+s[1];
		}
		if(fso.FileExists(file)) {
			s="";
			try {s=loadFile(file);} catch(e){}
			if(s.length) s=s.substring(0,s.length-2).split("\r\n");
			else s=[];
			for(i=0;i<s.length;i++) {
				s[i].split("<>");
				if(s[i].length==2 && !(s[i][0] in list)) list[s[i][0]]=s[i][1];
			}
		}
		s="", n=0;
		for(i in list) { n++; s+=i+"<>"+list[i]+"\r\n"; }
		trace("save :"+file, 9);
		saveSubjectTxt(file, s, true);
		trace("スレ一覧取得 end : 取得スレ数="+x, 9);
	}
	
	this.proc = function() {
		URL.set_prm(args.url);
		var brd = Jane.getBRD(URL.prm);
		if (!brd) Err("E_brditem_not_found");
		brd = brd[0];
		var dat = Jane.LogBasePath + JANE_LOGS + brd + URL.thrID + ".dat";
		var bak = Jane.LogBasePath + JANE_BAK + brd + URL.thrID + ".dat";
		DatInfo.setInfo(dat, bak, brd);
		if(args.append && DatInfo.cnt==0) delete args.append;
		if ("browser" in args) {
			invokeBrowser((args.pos&&!URL.requireThrList)
			               ? URL.url+"rrid="+args.pos+"/p=1/tp=1/#pos_box"
			               : URL.url);
			return;
		}
		if (args.subject) { this.rebuildSubject(); return; }
		if (URL.requireThrList) { this.makeSubject(); return; }
		URL.appendRange(DatInfo.cnt+1);
		while(!this.latest) {
			this.msg = "";
			this.msgs = [];
			
			trace("readHTTP="+URL.url,9);
			trace() | this.readHTTP(URL.url) | trace("HTTP total read time");
			this.preReplace();
			this.title = (this.msg.match(/<div id="title_thr"><strong[^>]+>([^<]*?)<\/strong/)||[])[1]||"";
			this.getHeadline();
			this.chkLastPage();
			trace(); this.mainReplaceToArray(); trace("html->dat main Replace");
			if(this.msgs.length) { //キャプチャしたレスあり
				this.first = parseInt((this.msgs[0].match(/^(\d+)<>/)||[])[1],10);
				this.last  = parseInt((this.msgs[this.msgs.length-1].match(/^(\d+)<>/)||[])[1],10);
				if(this.first==1) this.msgs[0]=this.msgs[0].replace(/<>((?:(?!<>).)*<>)$/,"<>"+this.headline+"$1"+this.title);
			} else {
				this.latest = true;
				break;
			}
			if(!this.checkMsg()) Err("E_data_error");
			if(args.overwrite) this.overwriteMsg();
			else {
				this.msgs.push("");
				this.msg = this.msgs.join("\n").replace(/^(\d+)<>/mg,"");
			}
			this.postReplace();
			DatInfo.offset = (this.loop)? this.first-1 : 0;
			trace("スレタイトル:"+this.title+"\tレス数:"+Math.max(DatInfo.cnt,this.last),9);
			saveDat(dat, this.msg, null, this.loop,this.latest);
			DatInfo.setNewDatInfo(this.title, this.last);
			saveIdx("http://"+URL.brdItem+"/"+URL.brdID+"/", true);
			URL.nextRange();
			this.loop++;
			if(args.overwrite && this.last>=URL.end) this.latest=true;
		}
		invokeJaneStyle(URL.getUrl2());
		trace("---- end ----",1);
	}
}

//---------------------------------------------------------

var Thread_ex;
/*@if (@DEBUG)
	main();
	@else @*/
	try {main();} catch (e) {if(e.message!=ERROR_MSG_STOP) WScript.Echo(e.message);}
/*@end @*/

//==============================================================
/*@if (@EnabledTest2chJSON)
//  日付の秒以下は常に".00"とする
//  名前のコテ等の修飾タグは無い(<span></b><font>等
//  本文末尾のRock54:,BBx-MD5:等も修飾タグは付かない
//
function get2chJSON() {
	var urlJSON = "http://itest.5ch.net/public/newapi/client.php?subdomain=$2&board=$5&dat=$6".expand(URL.prm);
	trace("try URL=" + urlJSON,9);
	var s = readHTTP(urlJSON)[0];
	if(!s) return null;
	var total_count = (s.match(/"total_count":(\d+)/)||[])[1];
	s=s.replace(/\\u301c/g,"～");
	var thread      = s.match(/"thread":\[(\d+),(\d+),("[^"]*"),("[^"]*"),("[^"]*"),("[^"]*")/);
	var comments    = (s.match(/"comments":\[((?:\[(\d+),("[^"]*"),("[^"]*"),"(\d+)",("[^"]*"),("[^"]*"),("[^"]*")(?:[,\d]*)\],?)+)\]/)||[])[1];
	if (!thread || !comments) return null;
	eval("var title ="+thread[6]+";");
	comments = comments.replace(/(\[(?:\d+),(?:"[^"]*"),(?:"[^"]*"),(?:"\d+"),(?:"[^"]*"),(?:"[^"]*"),(?:"[^"]*")(?:[,\d]*)\]),/g,"$1\n").split("\n");
	Thread_2ch.title = title;
	Thread_2ch.last = comments.length;
	if(args.append && DatInfo.cnt>0) { comments.splice(0,DatInfo.cnt); }
	for(var i=0; i<comments.length; i++) {
		var res,d,id="",be="";
		var res = comments[i].substring(1,comments[i].length-1);
		res = res.match(/^(\d+),("[^"]*"),("[^"]*"),"(\d+)",("[^"]*"),("[^"]*"),("[^"]*")/);
		var name = eval(res[2]).replace(/(◆.+)$/,"</b>$1<b>")
						.replace(/(\([^ )]+ [^ )]{4}-[^ )]{4}\))/,"</b>$1<b>")
						.replace(/(転載ダメ&(?:copy|#169);[25]ch\.net)/,"<small>$1</small>");
		d = new Date( (parseInt(res[4],10)<365*24*60*60*1000) ? parseInt(res[4],10)*1000 : parseInt(res[4],10) );
		d = (d>0) ? formatDate(d,2) : name;
		if (res[5]!='""')  id = " ID:" + eval(res[5]);
		if (res[6]!='""')  be = " BE:" + eval(res[6]);
		comments[i] = [ name, eval(res[3]), d + id + be, eval(res[7]), ].join("<>");
	}
	s = "";
	if(comments.length>0) {
		if(!args.append || !DatInfo.cnt) { comments[0] += title; }
		s = comments.join("\n") + "\n";
	}
	return s;
}
@end @*/