dip.jp のサイト [Site info. and blog ]

「家サーバープロジェクト」に登録しているここと同じ dip.jp ドメインのサイトはどれだけあって、そのうちアクティブなものはどれだけあるのだろうか。アクティブなものに限れば、Google などで検索してもある程度判るが、ここはひとつ直接調べてみよう。

まず、登録ドメインを調べるには nslookup で DNS を検索する。適当に伏字にしてあるから、このままでは期待する結果は得られない。

$nslookup
Default Server: xx.xx.xx                  デフォルト DNS
Address: xx.xx.xx.xx

> server xx.xx.xx                         家サーバ dip.jp の DNS に切り替える
Default Server: xx.xx.xx                  
Address: xx.xx.xx.xx

> ls xx.xx                                xx.xx ドメインの一覧を表示する
[xx.xx.xx]
$ORIGIN dip.jp.
@                         1M IN A                xx.xx.xx.xx
bird                      1M IN A                xx.xx.xx.xx
..
..
..

この第１フィールドがサブドメイン名、第５フィールドが現在登録されている IP アドレスであるから、それらに片っ端から HTTP 接続をしてみればよい。

use LWP::Simple;
my $domain = '.dip.jp';
while (<>) {
  chomp;
  my $hostname = $_ . $domain;
  my $uri = "http://" . $hostname . "/";
  my ($content_type, $document_length, $modified_time, $expires, $server)
       = head $uri;
  if (defined $server) {
    print $hostname, ": ", $server, "\n" ;
  } else {
    print $hostname, ": can't get server info.\n";
  }
}

たとえば、こんな Perl プログラムにサブドメイン名のリストを食わせてみると

bird: Apache/1.3.26 (Unix) mod_perl/1.27

というようなサーバ情報の一覧が得られる(隠蔽されていることもある)。それにしてもアクティブなサイトの比率は以外と小さい。