TKTech -- コンピュータTips

PHPでページの応答時間（処理時間）をミリ秒単位で計算する

PHPで、ページがリクエストされ、PHPスクリプトが動作してから、応答を返すまでの処理時間を計算する。（ミリ秒単位で計算。）サーバまでの到達時間やクライアントまでの到達時間は除く。
全てのページに共通して埋め込んでおけば、どのページが遅いか簡単にわかるので、大変役に立つ。

概略：
　開始時に microtime(TRUE)で float値 (sec.msec)を保持。
　終了時も同様に取得し、差を計算。これだけ。
　【注意】PHPマニュアル見ればわかるけど、「microtime関数は、gettimeofday() システムコールをサポートするオペレーティングシステムでのみ使用できる」です。

//----------
<?php
//開始
$time_start = microtime(TRUE);

//
//何かの処理
//

//終了
$time_end = microtime(TRUE);
//終了-開始
$time = $time_end - $time_start;

//表示してみる
printf("%040.25f</br>", $time_start);
printf("%040.25f</br>", $time_end);
printf("%040.25f</br>", $time);
?>
//----------

メールを受信してPHPスクリプトを動作させる .forwardの設定方法 (smrshは要チェック)

やりたいことは以下。
・メール受信→メール内容をPHPで処理

(1) .forward の登録
メールを転送するのに使うものだが、パイプによりプログラムとかに内容を渡せる。
(例)
"|/usr/bin/php /www/html/hoge.php"

これでメール受信したとき、phpコマンドにより、hoge.phpが実行される。

(2) hoge.php の先頭に #!/usr/bin/php -q と書く
(例)
#!/usr/bin/php -q
<?php
...
?>

これでPHPコマンドラインインターフェースで実行される。"-q" でHTTPヘッダを抑制。

(3) PHPで受信メール内容を読み取る方法
標準入力で渡されるので、標準入力の読取と同じ。
(例)
if(($stdin=fopen("php://stdin",'r') )!==FALSE ) {
    while( !feof($stdin) ) {
      $line = fgets($stdin, 4096);
    }
    fclose($stdin);
}

※メールを送りつけて動作を確認するも、動く形跡なし。。
調べたところ、.forwardのパイプ渡しで実行できるコマンドが "smrsh"という
やつで制限されているようだ。
環境によって設定場所はことなるようだが、うちは、以下でできた
/etc/smrsh のディレクトリにphpのコマンドを置く（シンボリックリンクで良い）
(例)
#cd /etc/smrsh
#ln -s /usr/bin/php

scpコマンド　ファイルをSSHで暗号化した上で転送してくれるコマンド

【オプション】
-r ディレクトリを再帰的にコピー
-p ファイルの属性(パーミッションやタイムスタンプ)を保つ

【使用例】
# ./hoge をリモートホスト hoge.com の /home/username/ に転送
scp -pr ./hoge username@hoge.com:/home/username

# リモートホスト hoge.comの /home/username/hoge を .に転送
scp -pr username@hoge.com:/home/username/hoge .

Subversion のインストールと設定

【Subversion のインストール】

Subversion のインストールと設定をメモしておく。

条件：
・Linux (Red Hat) …Subversion サーバ
・ソースからインストール
・Berkeley DB は使用しない
・Apacheと連携しない
・サーバ機能はinetd経由とする

■インストール

(1)Subversion のソースを取得する
公式サイト(http://subversion.tigris.org/)
ソース置き場
http://subversion.tigris.org/servlets/ProjectDocumentList?folderID=260&expandFolder=74

現時点の最新 1.5.3　以下２つをダウンロード
・subversion-1.5.3.tar.gz
・subversion-deps-1.5.3.tar.gz

(2)ダウンロードしたソースを配置する
/usr/local/src/subversion-1.5.3.tar.gz
/usr/local/src/subversion-deps-1.5.3.tar.gz

(以降、root権限で処理 # root権限、$ 普通の人）

(3)解凍する
# cd /usr/local/src/
# tar xzvf subversion-1.x.x.tar.gz
# xzvf subversion-deps-1.x.x.tar.gz
# cd subversion-1.x.x

(4)インストールする
# ./configure
# make
# make install

■svnserveの稼働（xinetd）

(1)svnserve用のユーザ svn を作成する
# useradd svn

(2)レポジトリのルート(/svn)を作成する
# mkdir /svn
# chown svn:svn /svn

(3) xinetd（inetd経由）の設定をする
・設定ファイルを作る（環境に応じて適宜変更）
# vi /etc/xinetd.d/svn
----ここから
{
        disable         = no
        socket_type     = stream
        wait            = no
        user            = svn
        server          = /usr/local/bin/svnserve
        server_args     = -i -r /svn
        log_on_failure += USERID
        only_from       = 192.168.0.0/24 127.0.0.1
}
----ここまで
・接続許可設定 /etc/hosts.allowに追加(内部ネットワークと自分を許可）
svn: 192.168.0. 127.0.0.1
・サービス名と使用ポート番号の設定 /etc/services　に追加
svn    3690/tcp   # Subversion
svn    3690/udp   # Subversion
・ファイヤーウォールの設定は次項
・設定の確認と再起動
# chkconfig --list svn
svn             on

# service xinetd restart
xinetd を停止中:      [ OK ]
xinetd を起動中:      [ OK ]

・telnet を使って接続確認
#telnet localhost 3690
Trying 127.0.0.1...
Connected to localhost.localdomain (127.0.0.1).
Escape character is '^]'.
( success ...

(4)ファイヤーウォールの設定
デフォルトの3690ポートtcp/udpを許可する。
・設定
#iptables -A RH-Firewall-1-INPUT -s 192.168.0.0/24 -m state --state NEW -m tcp -p tcp --dport 3690 -j ACCEPT
#iptables -A RH-Firewall-1-INPUT -s 192.168.0.0/24 -m state --state NEW -m udp -p udp --dport 3690 -j ACCEPT
・確認
#iptables -L
ACCEPT tcp -- 192.168.0.0/24 anywhere state NEW tcp dpt:svn
ACCEPT udp -- 192.168.0.0/24 anywhere state NEW udp dpt:svn
・initスクリプトに保存
#/etc/init.d/iptables save
・リスタート
#service iptables restart

■リポジトリの設定

(1)リポジトリの作成
# su svn
$ svnadmin create /svn/projectA

(2)リポジトリのアクセス権の設定
$ cd /svn/projectA/conf
$ vi svnserve.conf

[general]
anon-access = read
auth-access = write

password-db = passwd

(認証ユーザは読み書き、匿名ユーザは読み込み)

(3)ユーザとパスワード passwdファイルの編集
$ vi passwd
[users]
hogea=hogeaaa
hogeb=hogebbb

■クライアントからの接続確認

(1)サーバ(192.168.0.1とする)と同じマシンで確認
・新しいディレクトリを作る
$svn mkdir -m "comment" svn://192.168.0.1/projectA/trunk
$svn mkdir -m "comment" svn://192.168.0.1/projectA/branches
$svn mkdir -m "comment" svn://192.168.0.1/projectA/tags
・ディレクトリエントリを一覧表示する
$svn list svn://192.168.0.1/projectA
branches/
tags/
trunk/

(2)Windowsマシンから TortoiseSVN を使用
・TortoiseSVN　をインストールする
公式サイト（http://tortoisesvn.tigris.org/）
Language packsで日本語表示になる。
現時点
　・TortoiseSVN-1.5.4.14259-win32-svn-1.5.3.msi
　・LanguagePack_1.5.4.14259-win32-ja.msi
・インストーラの指示に従えば簡単にインストールできる

・接続確認
　・エクスプローラの任意のフォルダで
　右クリック「TortoiseSVN」「リポジトリブラウザ」
　・URLに svn://192.168.0.1/projectA として「OK」
　・表示されればOK

★外部から接続する場合は、svnサーバの3690ポート（デフォルト）をあける必要がある。
pingは通るが、クライアントからホスト(svnサーバ)に到達できない場合は
ファイヤーウォールではじかれている可能性がある。
一時的にファイヤーウォールを無効にして、接続可能か試してみよう。
（当然無効にしている間は危険なので可能な環境であれば試してみよう）
#service iptables stop
これで通れば、ファイヤーウォールの設定が正しくないということ。

Unicodeエスケープされた文字列を文字に戻す方法

「\u30ea\u30af\u30a8\u30b9\u30c8」
このようなにUnicodeエスケープされた文字列を
読める文字に戻します。この場合、「リクエスト」となる。

java の　native2ascii -reverse　と同じようにできないかと、
ごりっとロジック組んでみました。
こんなんでも動くから、まぁいいでしょう！

Function convFromUnicodeEscape(ByVal strTarget As String) As String

    Dim str As String
    Dim strRet As String
    Dim lngPos As Long
    Dim lngStart As Long
    Dim strTmp As String


    str = strTarget

    lngPos = 0
    Do
        lngStart = lngPos
        lngPos = InStr(1, str, "\u")


        If lngPos > 0 Then
            strRet = strRet & Mid(str, 1, lngPos - 1)
            strTmp = Mid(str, lngPos, 6)

            strTmp = Replace(strTmp, "\u", "&H")
            strRet = strRet & ChrW(strTmp)

            str = Mid(str, lngPos + 6)

        Else
            strRet = strRet & str

            Exit Do
        End If

    Loop