rtoss - Blame information for rev 49

Subversion Repositories:
Rev:
Rev Author Line No. Line
5 roytam 1 <?php
49 roytam 2 require_once './conf.php';
3 require_once './bb2html.php';
5 roytam 4 echo '
5 <html><head><title>' . $tit . '</title>
6 <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
7 ' . $style . '
8 </head>
9 ' . $body;
10  
11 echo "<a href='$PHP_SELF'>戻る</a> <a href=\"./\">【掲示板に戻る】</a><br>";
12  
13 $word = $_GET['word'];
49 roytam 14 if (trim($word) != '') {
15         $words = preg_split('/( | )+/', stripslashes($word));
5 roytam 16  
17         $d = dir($ddir);
18         while ($ent = $d->read()) {
49 roytam 19                 if (preg_match('/^[0-9]+\\'.$ext.'$/', $ent)) {
5 roytam 20                         $lines = file($ddir . $ent);
49 roytam 21                         list($oname, $oemail, $odate, $ocom, $sub) = explode(',', $lines[0]);
22                         $key = substr($ent, 0, strpos($ent, '.'));
5 roytam 23                         $st = true;
24                         foreach($lines as $num => $line) {
25                                 $find = false; //フラグ
26                                 for($i = 0; $i < count($words); $i++) {
49 roytam 27                                         if ($words[$i] == '') continue; //空は都バス
5 roytam 28                                         if (stristr($line, $words[$i])) { // マッチです
29                                                 $find = true; //やった
30                                                 $line = str_replace($words[$i], "<b style='color:green;background-color:#ffff66'>$words[$i]</b>", $line);
49 roytam 31                                         } elseif ($andor == 'and') { // ANDの場合マッチしないなら次のログへ
5 roytam 32                                                 $find = false;
33                                                 break;
34                                         }
35                                 }
36                                 if ($find) {
37                                         if ($st) {
38                                                 echo "<hr><a href='read.php?key=$key'><font size=4>$sub</font></a>  $odate  by $oname</b><br>";
39                                                 $st = false;
40                                         }
41  
42                                         $num = $num + 1;
49 roytam 43                                         list($name, $email, $date, $com) = explode(',', $line);
44                                         if ($email != '') {
5 roytam 45                                                 $name = "<a href=\"mailto:$email\">$name</a>";
46                                         }
47                                         $com = bb2html($com);
48                                         echo "<br><a href='read.php?key=$key&st=$num&to=$num'>$num</a>
49  <font color=\"forestgreen\"><b>$name</b></font> [ $date ]<br>$com<br>";
50                                 }
51                         }
52                         // if(!$find2) echo "<br><br></b>「".htmlspecialchars($word)."」見つかんねぇよ(;´Д`) ダウソ<br><br>";
53                 }
54         }
55         $d->close();
56         exit;
57 }
58  
59 echo "<form action=\"$PHP_SELF\" method=GET></h3><ul>
60 <br><br>キーワード: <input type=text name=word size=10 value=" . htmlspecialchars($word) . ">
61 <input type=submit value=\"  検索する  \"><br><font color=red>$err</font><br>";
62  
63 $d = dir($ddir);
64 while ($ent = $d->read()) {
49 roytam 65         if (preg_match('/^[0-9]+\\'.$ext.'$/', $ent))
66                 $tmp[] = substr($ent, 0, strpos($ent, '.'));
5 roytam 67 }
68 $d->close();
69 rsort($tmp);
70  
49 roytam 71 $suball = file('subback.txt');
5 roytam 72 foreach($suball as $sub) {
49 roytam 73         list($key, $subject) = explode(',', $sub);
74         list($key,) = explode('.', $key);
5 roytam 75         $up[$key] = $subject;
76 }
77 foreach($tmp as $line) {
78         echo " <a href=read.php?key=$line&ls=50>$line</a>";
79         echo "  $up[$line]<br>\n";
80 }
49 roytam 81 echo '</form></body></html>';