//#INFO	ココログル
//#VER	2
//#AUTH	UK-taniyama
//#MAIL	QVE00513@nifty.com
//#COPY	(C) 2005, UK-taniyama
//#HLP	blog_cocolog.ns2が必要です。
//#CATE	ココログ
//#BRD	cocolog	search	ココログル
//#BRD	cocolog	group	ココログループ
//#BRD	!rss	!cocolog!	ココログ(ココログル)
//////////////////////////////////////////////////////////////////////////////
cgi2 = "web.or.tv/cgi/ksearch.cgi";
cgi = "202.222.30.11/coco/scgi/ksearch.cgi";
group = "web.or.tv/ghtml/";
cgiurl = "http://%cgi%";
groupurl = "http://%group%";
function issupport(host,bbs)
{
	return host=="cocolog" && (bbs=="search" || bbs=="group");
}
function cancruise(){       return 0;}
function iseuc(){	return 1;}
function isnews(){	return 1;}
function board_url(host,bbs)
{
	if( bbs=="search"){
		k = my_get( "k");
		if( k){
			return "%cgi%?k=%k%";
		}
	}
	if( bbs=="group"){
		k = my_get( "url");
		if( k){
			return "web.or.tv/gr/grlist.cgi?mode=1&url="+k;
		}
	}
	return "#";
}
function thread_url(host,bbs,key)
{
	if( bbs=="search")	return "%cgi%?k=%key%";
	if( bbs=="group")	return group+key;
}
function board_read()
{
	ini_set("!rss_!cocolog!","plugin",1);
	if(bbs()=="search"){
		thread_add( "検索文字列:"+my_get("k"), "?$k");
		cocologle_read();
	}
	else{
		thread_add( "検索URL:"+my_get("url"), "?$url");
	}
}
function thread_read()
{
	cocologle_read();
}
function cocologle_read()
{
	if( !html_go( HTML_START_TAG, "table"))	return;
	if( !html_go( HTML_START_TAG, "table"))	return;
	if( !html_go( HTML_START_TAG, "font"))	return;
	name = html_pull( HTML_END_TAG, "font");
	html_go( HTML_START_TAG, "br");
	message = "";
	while( 1){
		event = html_next();
		if( html_isend())	break;
		if( event==HTML_START_TAG){
			tag = html_tag();
			if( tag=="a"){
				href = html_attr( "href");
				if( instr( href, cgiurl)==0){
					"\?k=(.+)%key%&a?m?p?;?p=([0-9]+)%p%" = href;
					href = "p://cocolog/#@#/search/%key%";
					if( p!="1"){
						href+= "&p=%p%";
					}
				}
				else if( instr( href, groupurl)==0){
					href = "p://cocolog/#@#/group/"+mid(href,23);
				}
				else if( instr( href, "-nifty.com/")!=-1){
					href = "p://!rss/#@#/!cocolog!/"+regreplace("/", "%%2F", mid( href, 7));
				}
				text = html_pull( HTML_END_TAG, "a");
				message+= "<a href=%href%>%text%</a>\r\n";
			}
			else if( tag=="br"){
				message+= "<br>\r\n";
			}
		}
		else if( event==HTML_TEXT){
			message+= html_plain();
		}
	}
	key = key();
	if( key){
		message_add(name,mail,date,message,name)
	}
	else{
		thread_add(name,my_get("k"),name,mail,date,message);
	}
}