板内検索手間はぶき隊ソース

<?php
/*
 板内キーワードスレ探索と表示の簡易スクリプト
 by 江東区
 著作なんとかは気にしないので、適当にいじっちゃってOKです。
 
 sample.phpを呼び出すとHTMLそのまま出力になります。
 既存HTMLに埋め込みたいなーって時は、
 <SCRIPT src="sample.php?mode=js"></SCRIPT>
 を、埋め込みたい位置に書くですよ。sample.phpはちゃんと書き換えるんだお。
*/


/*---------設定ここから---------*/
/*
 探索キーワード
 array("word1","word2",…,"wordn");
 って書けばOK。
*/
$word = array("ぬこ","里親");

/*
 スレ一覧アドレス
 「スレッド一覧はこちら」のアドレス
*/
$url = "http://ex16.2ch.net/news4vip/subback.html ";

/*
 スレッド格納アドレス
 一覧のhtmlをソースで見たときのbaseタグに入っているURL。
 スレッドのスレ番号以前のURLです。
*/
$add = "http://ex16.2ch.net/test/read.cgi/news4vip/ ";

/*
 タイトル
*/
$title = "ちょー簡易スレ検索";
/*---------設定ここまで---------*/


/* 一覧ソースを読み取り */
$lines = file($url);

/* 探索キーワードの連結(or検索になるお) */
$word = implode("|",$word);
$word = "/(<a(.*)($word)(.*)a>)/";

/* 出力用array */
$print = array();

/* 検索 */
foreach ($lines as $line){

 if(preg_match($word,$line,$reg)){
  $print[] = $reg[0];
  }
 next;
 }



/* 以下外部用呼び出しjavascript */
if($_GET["mode"] == "js"){
 print "document.write('";
 /* スレ表示 */
 foreach( $print as $p){
  print "$p<br>";
 }
 print "')";


/* HTML版出力分岐 */
}else{
 /* HTMLヘッダー出力 */
print<<<HTML
<html>
<head>
<title>$title</title>
<base href="$add" target="body">
</head>
<body>
<font size=2>
* 更新連打しないでください。2chに負荷かかります。 *<br>
HTML;

 /* スレ表示 */
 foreach( $print as $p){
  print "$p\n";
  print "<br>";
 }

/* HTMLフッター出力 */
print<<<HTML
</font>
</body>
</html>
HTML;
}
?>

-----------------------------------------------------------------

こぴぺして、拡張子PHPにしてアップロード。

ほいでOK。

( ^ω^)悪用しちゃだめだお。

せっかくjavascriptで表示させるぜ!アッハーっと分岐までさせたのに、

驚くことに、ここジャバスク使えませんでした。('A`)だめぽ。

コメント(4)

■れっつるびぃ
require "open-uri"url = "http://ex16.2ch.net/news4vip/subback.html"prefix = "http://ex16.2ch.net/test/read.cgi/news4vip/"word = "ぬこ|里親"open(url){ |f| f.each_line { |line| puts line.sub('href="','href="'+prefix)+"<br>" if line.match(word) } }
http://www.ruby-lang.org/ja/

■ほほー
rubyはそうやって書くのかぁ。

■foreach
foreachは便利だねっと。>>れっつるびぃrubyはいいっすなぁ・・・
http://ameblo.jp/fujioka-hiroshi

■ぶほっ
foreachは実はあまり好きではなく、あわよくば何ごともforで切り抜けたい。と思ってしまう。
http://ameblo.jp/koutouku

2012年2月

      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
26 27 28 29      

コンテンツ

www.flickr.com
This is a Flickr badge showing public photos and videos from vivaugu. Make your own badge here.


最近のコメント