潰れた記念Blog

<?php echo $_SERVER['REMOTE_ADDR']; ?>

• phpが動くhttpサーバの稼働が必要
• レンタルサーバが落ちてると使えない
• レンタルサーバまでの経路が途絶えていても使えない
• そもそも自由に使えるサーバを借りてないと使えない
  

• 回線が落ちてる
• 計画停電中
• サーバが落ちている

#!/bin/sh
# WR8700Nの情報
CONNECTION=1
WR8700N=192.168.3.1
USER=root
PASS=foobar

wget -q -O - --http-user=$USER --http-passwd=$PASS http://$WR8700N/index.cgi/info_main | \
grep -A1 WAN | grep -A1 IP | grep small_item_td2 | \
head -n $CONNECTION | tail -n 1 | \
awk --re-interval 'BEGIN{FS="[< ]+"}{ipstr=$5}{if(match(ipstr,"^([0-9]{1,3})\\.([0-9]{1,3})\\.([0-9]{1,3})\\.([0-9]{1,3})")){print ipstr}else{print "0.0.0.0"}}'

#!/usr/bin/php -q
<?php
// WR8700Nの情報
$connection = 1;
$wr8700n = "192.168.3.1";
$user = "root";
$pass = "foobar";
$ip_addr = '0.0.0.0';
$url = "http://$wr8700n/index.cgi/info_main";

    $opt = stream_context_create(
        array(
            'http' => array(
                'method' => 'GET',
                'header' => 'Authorization: Basic '. base64_encode("$user:$pass")
            )
        )
    );
    // 現在の状態ページの取得
    $res = @file_get_contents($url, false, $opt);
    // WR8700NはEUC-JP, 処理系はUTF-8
    $text = explode("\n", mb_convert_encoding($res, 'UTF-8', 'EUC-JP'));

// IPv4アドレス文字列のチェック
function check_ipstr($ipstr) {
    $octet = explode('.', $ipstr);
    if (count($octet) != 4) {
        return false;   // バラして4個じゃなければダメ
    }
    foreach($octet as $n) {
        if (!is_numeric($n) || intval($n) < 0 || 255 < intval($n)) {
            return false;   // 0～255じゃなければダメ
        }
    }
    return true;
}

    $c = count($text);
    for ($n = 1; $n < $c; $n++) {
        if (mb_strstr($text[$n], 'WAN側IPアドレス') !== false) {
            if (--$connection == 0) {
                $n++;   // 次の行へ
                $ip_str = mb_split("\s+", str_replace('<', ' ', $text[$n]));
                if (check_ipstr($ip_str[4])) {
                    $ip_addr = $ip_str[4];
                }
                break;
            }
        }
    }
    echo $ip_addr;
?>

29 tweet(s)

• 00:48:27 外が静かになってる。KEKへの往復で雨じゃないといいなあ。小河内ダムの放流も見に行きたいけど
  
  
• 01:11:53 いたずら黒うさぎでの発言が面白すぎて寝れない
  
  
• 05:54:10 直下
  
  
• 05:57:23 地震直前に意識回復。まだちょっと早いなあ
  
  
• 06:24:31 そろそろ出発準備しとこう
  
  
• 06:31:37 携帯のアラームセットしてあったの忘れてビックリしたｗ
  
  
• 06:37:56 そろそろ出掛けよう、KEKには9時着の予定
  
  
• 07:53:09 ちょっと遅れて金町なう
  
  
• 09:21:51 KEKなう
  
  
• 09:27:37 研究本館なう http://t.co/kZ8rZCS
  
  
• 09:47:56 出だしに本を買ってしまた、重い…
  
  
• 10:51:32 はやぶさ＠フォトンファクトリー http://t.co/w2nrJ5H
  
  
• 11:04:35 ツアー待ち http://t.co/TV7psGU
  
  
• 11:15:08 KEK施設内にいるけどGPS使える
  
  
• 12:17:03 KEKやっぱり広いな…今年は全施設回りきれない
  
  
• 13:10:15 KEKBなう http://t.co/aqBMSx2
  
  
• 13:34:38 KEKB地下施設 http://t.co/Ievg8f3
  
  
• 14:07:24 Belle前でバス待ち
  
  
• 14:46:11 KEKひょうたん2011版 http://t.co/4OVUCtG
  
  
• 15:08:16 カラーリングが変わって、渋くなってる！ http://t.co/AEd5Eqi
  
  
• 15:44:30 KEKから離脱、しようかな…
  
  
• 16:26:48 スパコン見たから帰る、っても更新中で空っぽだった。代わりにストレージ室見れた
  
  
• 16:36:38 KEKから離脱〜
  
  
• 19:47:41 家についった。帰りはいつものトコで給油したり、南大泉図書館周辺で無灯火でカーナビ凝視でノロノロ走って何か探ってる横浜ナンバーの車に10分くらい密着してみたりで、ちょっと時間かかった
  
  
• 19:49:26 あの南大泉での無灯火カーナビはなんなんだろうな、横浜ナンバーともう1台、練馬ナンバーもいた。
  
  
• 19:55:24 あの辺、アレだから、アレの関係なんかな。
  
  
• 19:55:35 高校生だった頃、カツアゲ事件の話が出ると、2回に１回は南大泉図書館周辺が現場だったなー
  
  
• 20:02:24 奥多摩の方は今日ほとんど雨だったのかな…いまも青梅の辺はすげー降ってるようで
  
  
• 20:12:24 KEKは広すぎて施設見学してると講演が見れない罠ｗ
  
  

<?php
if ($argc < 2) die();

// 取得する twitter ID
$screen_name = $argv[1];

// 取得するユーザのステータス
$usr_url = "https://api.twitter.com/1/statuses/user_timeline/$screen_name.json";

// 一度に取得する件数
$count = 20;

// 取得したい過去
$pastday = strtotime('-1 day');

// 指定の過去の年月日を取得
$pday = date('Ymd', $pastday);

$data = array();
$page = 1;
while (true) {      // 無限やばいｗ
// 取得処理
    $exec_url = "$usr_url?page=$page&count=$count";
    $ch = curl_init();
    curl_setopt($ch, CURLOPT_URL, $exec_url);
    curl_setopt($ch, CURLOPT_HEADER, FALSE);
    curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
    curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, FALSE);    // Linuxだとこれ無くても動くんだけど…
    $res = curl_exec($ch);
    $stat = curl_getinfo($ch, CURLINFO_HTTP_CODE);
    curl_close($ch);
    if ($res === false || $stat != 200) {
        // twitterからの取得エラーは即死
        die();
    }
    ++$page;
    $status = json_decode($res);
    // 取得データから抜き出し
    foreach ($status as $i) {
        $xday = date('Ymd', strtotime($i->created_at));
        // 日付の比較
        if ($pday == $xday) {
            // 指定の日付と一致する場合
            $data[] = array(
                'id'=>$i->id_str,                   // ステータスID
                'at'=>$i->created_at,               // ツイート日時
                'text' => $i->text,                 // ツイート内容
            );
        } else if ($pday > $xday) {
            // ツイート日が指定日より前になったら終了
            break 2;        // ... foreach ... while
        }
    }
}
// 集めたものを逆順(古い物を先)にする
$data = array_reverse($data);

// 本文の生成
$html = "";
$html .= "<p>".count($data)." tweet(s)</p>";
$html .= "<ul>\r";
$pat_sub = preg_quote('-._~%:/?#[]@!$&\'()*+,;=', '/');     // 正規表現向けのエスケープ処理
$pat  = '/((http|https):\/\/[0-9a-z' . $pat_sub . ']+)/i';  // 正規表現パターン
$rep  = '<a target="_blank" href="\\1">\\1</a>';            // \\1が正規表現にマッチした文字列に置き換わります
foreach ($data as $i) {
    $id = $i['id'];
    $at = date('H:i:s',strtotime($i['at']));
    // URL文字列をリンクに
    $text = preg_replace($pat, $rep, $i['text']);           // 実処理
    // スクリーンネームをリンクに
    $text = preg_replace("/(?<![0-9a-zA-Z'\"#@=:;])@([0-9a-zA-Z_]*)/u", "<a target=\"_blank\" href=\"https://twitter.com/\\1\">@\\1</a>", $text);
    // ハッシュタグを検索リンクに
    $text = preg_replace("/(?<![0-9a-zA-Z'\"#@=:;])#(\S*)/u", "<a target=\"_blank\" href=\"https://twitter.com/search/%23\\1\">#\\1</a>", $text);
    $html .= " <li><a target=\"_blank\" href=\"https://twitter.com/$screen_name/status/$id\">$at</a>&nbsp;$text<br><br>\r";
}
$html .= "</ul>";

$html = mb_convert_encoding($html, 'HTML-ENTITIES');

if ($argc == 3) {
    file_put_contents($argv[2], $html);
} else {
    echo $html;
}
?>

• ココログ （件名だけの記事が出来た）
• FC2ブログ （なんかよくわからない）

1. ステータスを取得するtwitterユーザ名
2. ブログ投稿の送信先メールアドレス

<?php
// twitterの一日を一つにまとめてメールにする

require_once('Mail/mime.php');  // PEAR Mail_Mime
require_once('Mail.php');       // PEAR Mail

// 取得する twitter ユーザ名
$screen_name = 'ユーザ名';

// 取得するユーザのステータス
$usr_url = "https://api.twitter.com/1/statuses/user_timeline/$screen_name.json";

// 一度に取得する件数
$count = 20;

// 取得したい過去
$pastday = strtotime('-1 day');

// blogへのメール投稿時のメールアドレス
$to_addr = 'mail@example.com';

// メール送信時の送信者
$from_addr = $to_addr;

// メールに付ける件名の設定
$subject = date('Y年n月j日のツイートまとめ', $pastday);

// 指定の過去の年月日を取得
$pday = date('Ymd', $pastday);

$data = array();
$page = 1;
while (true) {      // 無限やばいｗ
// 取得処理
    $exec_url = "$usr_url?page=$page&count=$count";
    $ch = curl_init();
    curl_setopt($ch, CURLOPT_URL, $exec_url);
    curl_setopt($ch, CURLOPT_HEADER, FALSE);
    curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
    $res = curl_exec($ch);
    $stat = curl_getinfo($ch, CURLINFO_HTTP_CODE);
    curl_close($ch);
    if ($res === false || $sta != 200) {
        // twitterからの取得エラーは即死
        die();
    }
    ++$page;
    $status = json_decode($res);
    // 取得データから抜き出し
    foreach ($status as $i) {
        $xday = date('Ymd', strtotime($i->created_at));
        // 日付の比較
        if ($pday == $xday) {
            // 指定の日付と一致する場合
            $data[] = array(
                'id'=>$i->id_str,                   // ステータスID
                'at'=>$i->created_at,               // ツイート日時
                'text' => $i->text,                 // ツイート内容
                'source'=> strip_tags($i->source),  // クライアント名
            );
        } else if ($pday > $xday) {
            // ツイート日が指定日より前になったら終了
            break 2;        // ... foreach ... while
        }
    }
}
// ツイート無しの日をスルーしたい場合は、以下を有効にする
//if (empty($data)) {
//  // 得られたものが何も無ければここで終了
//  die();
//}
// 集めたものを逆順(古い物を先)にする
$data = array_reverse($data);

// メール本文の生成
$html = <<<HTML
<html>
<head>
  <meta http-equiv="content-type" content="text/html; charset=UTF-8">
  <title>$subject</title>
</head>
<body>
HTML;
//$html .= "<p>".count($data)."ツイート</p>";
$html .= "<ul>";
$pat_sub = preg_quote('-._~%:/?#[]@!$&\'()*+,;=', '/');     // 正規表現向けのエスケープ処理
$pat  = '/((http|https):\/\/[0-9a-z' . $pat_sub . ']+)/i';  // 正規表現パターン
$rep  = '<a target="_blank" href="\\1">\\1</a>';            // \\1が正規表現にマッチした文字列に置き換わります
foreach ($data as $i) {
    $id = $i['id'];
    $at = date('H:i',strtotime($i['at']));
    // URL文字列をリンクに
    $text = preg_replace($pat, $rep, $i['text']);           // 実処理
    // スクリーンネームをリンクに
    $text = preg_replace("/(?<![0-9a-zA-Z'\"#@=:;])@([0-9a-zA-Z_]*)/u", "<a target=\"_blank\" href=\"https://twitter.com/\\1\">@\\1</a>", $text);
    // ハッシュタグを検索リンクに
    $text = preg_replace("/(?<![0-9a-zA-Z'\"#@=:;])#(\S*)/u", "<a target=\"_blank\" href=\"https://twitter.com/search/%23\\1\">#\\1</a>", $text);
    $html .= "<li><a target=\"_blank\" href=\"https://twitter.com/$screen_name/status/$id\">$at</a>&nbsp;$text<br><br>";
}
$html .= "</ul>";
$html .= <<<HTML
</body>
</html>
HTML;

$html = mb_convert_encoding($html, 'HTML-ENTITIES');
// メール送信処理
mb_language('uni');
$mime = new Mail_mime("\n");
$mime->setHTMLBody($html);

$mail_encode = array(
    'head_charset' => 'UTF-8',
    'html_charset' => 'UTF-8',
);
$body = $mime->get($mail_encode);

$headers = array(
    'From'    => $from_addr,
    'Subject' => mb_encode_mimeheader($subject),
);
$header = $mime->headers($headers);

$mail = Mail::factory('mail');
$res = $mail->send($to_addr, $header, $body);
?>

• URLをリンクにするにはこの記事を参考にしています。
• メールの件名や内容はお好みのカスタマイズを。
• まず自分宛てに送信して動作を確認しましょう。
  
• '-1 day' を変更することで任意の過去日を取得可能ですが・・・
• 自分のツイートで試しただけなので、内容によってはバグる可能性が十分に考えられます。
• メール送信者アドレスに正確なものを要求するブログの場合は、$from_addr に正しいアドレスを設定してください。
• php 4.x でも simplexml_load_string を使えるようにして、ユーザステータスを xml で取得すればいいはず。