$value) if ($value['eid'] == $eid) return $value; return null; } function RecommendedEntry_updateIndexFile ($eid_updated, $eid, $direction) { $filename = sprintf ('C:/www_machineworks/whg/recomended_data/%d.txt', $eid_updated); file_exists ($filename) || touch ($filename); $fp = @fopen ($filename, 'r+'); if ($fp) { if (flock ($fp, LOCK_EX | LOCK_NB)) { $ret = ''; $not_found = 1; while (! feof ($fp) && ($buf = fgets ($fp))) { list ($_eid, $_n0, $_n1) = split ("[\t\r\n]", $buf); if ($eid == $_eid) { $not_found = 0; $direction ? $_n1++ : $_n0++; } $ret .= sprintf ("%d\t%d\t%d\n", $_eid, $_n0, $_n1); } $not_found && $ret .= sprintf ("%d\t%d\t%d\n", $eid, 1 - $direction, $direction); rewind ($fp); fwrite ($fp, $ret, strlen ($ret)); } fclose ($fp); } } function RecommendedEntry_incoming () { $eid_prev = $_COOKIE['mtrcmnd_eid']; if (isset ($eid_prev)) { if ($eid_prev != 7792 && RecommendedEntry_getEntryData ($eid_prev)) { RecommendedEntry_updateIndexFile (7792, $eid_prev, 0 /*incoming_from*/); RecommendedEntry_updateIndexFile ($eid_prev, 7792, 1 /*outgoing_to*/); } } else { RecommendedEntry_updateIndexFile (7792, 7792, 0 /*incoming_from*/); } } RecommendedEntry_incoming (); function RecommendedEntry_outgoing () { setcookie ('mtrcmnd_eid', 7792, time () + 2, '/'); } RecommendedEntry_outgoing (); function RecommendedEntry_initialize ($mode = 0) { global $RecommendedEntry_table; $RecommendedEntry_table = array (); $fp = @fopen ('C:/www_machineworks/whg/recomended_data/7792.txt', 'r'); if ($fp) { if (flock ($fp, LOCK_SH | LOCK_NB)) { while (! feof ($fp) && ($buf = fgets ($fp))) { list ($_eid, $_n0, $_n1) = split ("[\t\r\n]", $buf); if (7792 == $_eid) continue; if ($mode == 1) $RecommendedEntry_table{$_eid} = $_n0; else if ($mode == 2) $RecommendedEntry_table{$_eid} = $_n1; else $RecommendedEntry_table{$_eid} = $_n0 + $_n1; } arsort ($RecommendedEntry_table, SORT_NUMERIC); } fclose ($fp); } } function RecommendedEntry_GetEntry ($_index) { global $RecommendedEntry_table; foreach ($RecommendedEntry_table as $eid => $count) { if (--$_index) continue; $entry = RecommendedEntry_getEntryData ($eid); if ($entry) $entry['count'] = $count; return $entry; } } ?> こんこんの持ってるPCはMac Bookの白

« 雑誌とか新聞とかのコーナーとかを集めるスレとか@難民 | メイン | みうなのネーミングセンスがぶっ飛んでる件 »

▼こんこんの持ってるPCはMac Bookの白 delicious.gifこのエントリをlivedoorクリップに登録

1 名前:名無し募集中。。。 [] :2007/06/02(土) 03:41:33
18 :名無し草 :2007/06/02(土) 02:48:41
406 名前: デスラー(関東地方) [sage] 投稿日: 2007/06/01(金) 23:54:13 ID:MTozKcfD0
konkonの持ってるPCはMac Bookの白konkonの持ってるPCはMac Bookの白

Apple MacBook (Core2Duo 2.0GHz 13.3インチワイド液晶 1GB 80GB SuperDriveDL)[MA700J/A]
アップルコンピュータ (2006/11/09)
売り上げランキング: 2565

« 雑誌とか新聞とかのコーナーとかを集めるスレとか@難民 | メイン | みうなのネーミングセンスがぶっ飛んでる件 »

このエントリーのトラックバックURL:




 
RSS feed meter for http://www.machineworks.co.uk/whg/


_