{

global $_conf;

$ls = null;

// スレURLの直接指定

if ((isset($_GET['nama_url']) and $url = $_GET['nama_url']) || (isset($_GET['url']) and $url = $_GET['url'])) {

$url = trim($url);

// 2ch or pink - http://choco.2ch.net/test/read.cgi/event/1027770702/

if (preg_match('{http://([^/]+\.(2ch\.net|bbspink\.com))/test/read\.cgi/([^/]+)/([0-9]+)/?([^/]+)?}', $url, $matches)) {

$host = $matches[1];

$bbs = $matches[3];

$key = $matches[4];

$ls = $matches[5];

// c-docomo c-au c-other http://c-au.2ch.net/test/--3!mail=sage/operate/1159594301/519-n

} elseif (preg_match('{http://((c-docomo|c-au|c-other)\.2ch\.net)/test/([^/]+)/([^/]+)/([0-9]+)/?([^/]+)?}', $url, $m)) {

require_once P2_LIB_DIR . '/BbsMap.class.php';

if ($mapped_host = BbsMap::get2chHostByBbs($m[4])) {

$host = $mapped_host;

$bbs = $m[4];

$key = $m[5];

$ls = $m[6];

}

// 2ch or pink 過去ログhtml - http://pc.2ch.net/mac/kako/1015/10153/1015358199.html

} elseif ( preg_match("/(http:\/\/([^\/]+\.(2ch\.net|bbspink\.com))(\/[^\/]+)?\/([^\/]+)\/kako\/\d+(\/\d+)?\/(\d+)).html/", $url, $matches) ){ //2ch pink 過去ログhtml

$host = $matches[2];

$bbs = $matches[5];

$key = $matches[7];

$kakolog_uri = $matches[1];

$_GET['kakolog'] = urlencode($kakolog_uri);

// まち＆したらばJBBS - http://kanto.machibbs.com/bbs/read.pl?BBS=kana&KEY=1034515019

} elseif ( preg_match("/http:\/\/([^\/]+\.machibbs\.com|[^\/]+\.machi\.to)\/bbs\/read\.(pl|cgi)\?BBS=([^&]+)&KEY=([0-9]+)(&START=([0-9]+))?(&END=([0-9]+))?[^\"]*/", $url, $matches) ){

$host = $matches[1];

$bbs = $matches[3];

$key = $matches[4];

$ls = $matches[6] ."-". $matches[8];

} elseif (preg_match("{http://((jbbs\.livedoor\.jp|jbbs\.livedoor.com|jbbs\.shitaraba\.com)(/[^/]+)?)/bbs/read\.(pl|cgi)\?BBS=([^&]+)&KEY=([0-9]+)(&START=([0-9]+))?(&END=([0-9]+))?[^\"]*}", $url, $matches)) {

$host = $matches[1];

$bbs = $matches[5];

$key = $matches[6];

$ls = $matches[8] ."-". $matches[10];

// したらばJBBS http://jbbs.livedoor.com/bbs/read.cgi/computer/2999/1081177036/-100

} elseif ( preg_match("{http://(jbbs\.livedoor\.jp|jbbs\.livedoor.com|jbbs\.shitaraba\.com)/bbs/read\.cgi/(\w+)/(\d+)/(\d+)/((\d+)?-(\d+)?)?[^\"]*}", $url, $matches) ){

$host = $matches[1] . "/" . $matches[2];

$bbs = $matches[3];

$key = $matches[4];

$ls = $matches[5];

}

} else {

!empty($_GET['host']) and $host = $_GET['host']; // "pc.2ch.net"

!empty($_POST['host']) and $host = $_POST['host'];

isset($_GET['bbs']) and $bbs = $_GET['bbs']; // "php"

isset($_POST['bbs']) and $bbs = $_POST['bbs'];

isset($_GET['key']) and $key = $_GET['key']; // "1022999539"

isset($_POST['key']) and $key = $_POST['key'];

!empty($_GET['ls']) and $ls = $_GET['ls']; // "all"

!empty($_POST['ls']) and $ls = $_POST['ls'];

}

if (empty($host) || !isset($bbs) || !isset($key)) {

$htm['url'] = htmlspecialchars($url, ENT_QUOTES);

$msg = "p2 - {$_conf['read_php']}: スレッドの指定が変です。<br>"

. "<a href=\"{$htm['url']}\">" . $htm['url'] . "</a>";

P2Util::printSimpleHtml($msg);

die;

return false;

}

return array($host, $bbs, $key, $ls);

{

global $_conf;

if (false === FileCtl::make_datafile($_conf['rct_file'], $_conf['rct_perm'])) {

return false;

}

$lines = file($_conf['rct_file']);

$neolines = array();

// 最初に重複要素を削除しておく

if (is_array($lines)) {

foreach ($lines as $line) {

$line = rtrim($line);

$lar = explode('<>', $line);

$data_ar = explode('<>', $data);

if ($lar[1] == $data_ar[1]) { continue; } // keyで重複回避

if (!$lar[1]) { continue; } // keyのないものは不正データ

$neolines[] = $line;

}

}

// 新規データ追加

array_unshift($neolines, $data);

while (sizeof($neolines) > $_conf['rct_rec_num']) {

array_pop($neolines);

}

// 書き込む

if ($neolines) {

$cont = '';

foreach ($neolines as $l) {

$cont .= $l . "\n";

}

if (false === FileCtl::filePutRename($_conf['rct_file'], $cont)) {

$errmsg = sprintf('p2 error: %s(), FileCtl::filePutRename() failed.', __FUNCTION__);

trigger_error($errmsg, E_USER_WARNING);

return false;

}

}

return true;