へっぽこSE奮闘記

わざわざNagiosやらを入れるのが面倒だったときに使った、サーバ監視（PING）用アプリです。

対象機器にPINGを行い、エラーがあったらメールを送るという内容です。

Perlで作っており、これをCronにて定期実行させ、サーバ監視してました。

大した内容ではありませんが、メモとして。

------
use Net::Ping;
use strict;
use warnings;
use Encode;
use utf8;


sub my_sendmail($) {
my ($servers) = @_;
my $sendmail = '/usr/sbin/sendmail'; # sendmailコマンドパス
my $from = 'admin@hoge.jp'; # 送信元メールアドレス
my $to = 'hepo@hogehoge.co.jp'; # あて先メールアドレス
my $cc = 'hogecc@hogehoge.co.jp'; # Ccのあて先メールアドレス
my $subject = '[PING ERROR] '. $servers; # メールの件名
my $msg = <<"_TEXT_"; # メールの本文(ヒアドキュメントで変数に代入)
ping failed...
_TEXT_

$msg = $msg . $servers;

# sendmail コマンド起動
open(SDML,"| $sendmail -t -i") || die 'sendmail error';

# メールヘッダ出力
print SDML "From: $from\n";
print SDML "To: $to\n";
print SDML "Cc: $cc\n";
print SDML "Subject: $subject\n";
print SDML "Content-Transfer-Encoding: 7bit\n";
print SDML "Content-Type: text/plain;\n\n";

# メール本文出力
print SDML "$msg";

# sendmail コマンド閉じる
close(SDML);
};

my @hosts=("www.hoge.jp", "db1.hoge.jp", "db2.hoge.jp"); #監視ホストを記載

my $timeout=5;

my $pObj = Net::Ping->new("icmp");
my $err_svs = "";

while(my $host = shift(@hosts)){

if($pObj->ping($host, $timeout)){
#----------------
# PING OK!
#----------------
#print "$host is running.\n";
}else{
#----------------
# PING FAIL!
#----------------
$err_svs = $err_svs . " " .$host;
}
}
if(!($err_svs eq "")){
my_sendmail($err_svs);
}
$pObj->close();
----

現在、コンシューマ向けのWebコンテンツサービスのシステムを担当しているのだが、サービスの運用において最も恐怖の攻撃があります。

それは、Yahoo!JAPANのTOPニュースに、担当しているページへのリンクが載ることです。
（俗称のYahoo砲って奴ですね。）

ニュースに掲載された内容（=皆さんの興味度合い）、時間帯（=昼休み中とか夜とかは人口が多い）によって、随分違うのですが、我々が喰らった最大記録は秒間１２０を超えるページビューでした。
（この時は秒間120アクセスでサーバ性能の限界に達してしまったので、本当はどれくらいのアクセス数があったのかは不明です･･･）

この最大記録以外だと、瞬間的に秒間６０PVくらいが平均な感じです。



Yahoo砲を喰らうと、ApacheのMaxClientへの到達はもちろんですが、表示させるコンテンツが大きいページへのリンクが貼られてしまうと、ネットワークトラフィックが尋常ではない量になり、データセンターからのクレームが来たこともあります･･･

Yahoo!ニュース攻撃は下手なDOS攻撃よりも強烈です＞＜；

コマンドプロンプトの文字コードを変更しても、使用するフォントが日本語対象外のフォントだと、結局文字化けしちゃいます。

そこで、デフォルトのフォントをMSゴシックに変更する手順です。

レジストリに以下の内容を追加します。
場所：HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Console\TrueTypeFont
追加情報：文字列値
値の名前：0. （ゼロ ドット）
値のデータ：MS ゴシック

これで、chcp 65001 で文字コードを変更した後も、使用するフォントがMSゴシックになってくれるので、日本語の文字化けがなくなります

Apacheの設定にて、
Options Indexes
を指定すれば、URLにフォルダが指定されたときに、フォルダ内のファイルを一覧で表示してくれます。
しかし、デフォルトだとこの「ファイル名」の表示の長さが短めなので、一覧で表示していても分かり難かったりします。

そこで、ファイル名の表示の長さを変更する方法です。

IndexOptions NameWidth=[ファイル名の長さ]

といった按配に指定してあげれば、ファイル名の表示長を変更することが出来ます。

＜Directory "/var/www/docdir"＞
Options Indexes
IndexOptions NameWidth=30
＜/Directory＞

↑ はファイル名の長さを30バイト固定とするやり方

ここで
IndexOptions NameWidth=*
と指定すると、必要な長さまでApacheが自動で表示してくれるようになります。

C#とかでWindowsアプリを作っていて、IEコンポーネントを使えば、簡単にブラウザソフトを作ることは可能です。

ですが、普通に作るのみだと、ユーザエージェントがIEのものと全く同じため、サーバ側で判別できなくて、ちょっと不便なことがあります。

そこで、IEコンポーネントを使いつつ、UserAgentを書き換える方法です。

urlmon.dllにある、UrlMkSetSessionOptionというAPIを使えば、UserAgentを簡単に変更可能です。
また、既存のUserAgentの後ろに文字列を付け加える場合は、
urlmon.dllにある、UrlMkGetSessionOption にて既存のUserAgentを取得した後にUrlMkSetSessionOptionを呼び出すだけでOKです。

※ 一度Navigateにてブラウザを起動してしまうと、UserAgentの変更はいったんアプリを終了しないと出来ないようです。



作ったテスト用アプリのソースは以下の感じです。

--------サンプルソースC#（インデントが付けられないみたいです･･･orz）--------

using System.Runtime.InteropServices;

public partial class Form1 : Form
{

[DllImport("urlmon.dll", CharSet = CharSet.Ansi)]
private static extern int UrlMkSetSessionOption( int dwOption, string str, int nLength, int dwReserved);

[DllImport("urlmon.dll", CharSet = CharSet.Ansi)]
private static extern int UrlMkGetSessionOption(int dwOption, StringBuilder pBuffer, int dwBufferLength, ref int pdwBufferLength, int dwReserved);

public Form1()
{
InitializeComponent();
}

private void button1_Click(object sender, EventArgs e)
{

const int URLMON_OPTION_USERAGENT = 0x10000001;
string ua = "";

//完全にUserAgentを書き換えるか、元のUserAgentに文字を付け加えるか
if (this.ckBoxUaAdd.Checked)
{
//元のUserAgentを取得する。
StringBuilder userAgent = new StringBuilder(255);
int returnLength = 0;
int result = UrlMkGetSessionOption(URLMON_OPTION_USERAGENT, userAgent, userAgent.Capacity, ref returnLength, 0);
//取得したUserAgentに文字を付け加える
ua = userAgent.ToString() + this.txtUserAgent.Text;
}
else
{
ua = this.txtUserAgent.Text;
}

UrlMkSetSessionOption(URLMON_OPTION_USERAGENT, ua, ua.Length, 0);
this.webBrowser1.Navigate(this.txtURL.Text);

}

}