ラウンジでIPアドレスを表示するには?

[上に] [前に] [次に]
ななえ 1998/11/26(木) 19:25:17
HPでラウンジを設置しているのですが、
ごくまれに悪質ないたずらが入ってきて困っています。

ほとんどはみんなの情報交換で仲良く使っているのですが、
ある特定の人だと思いますが誹謗中傷発言が入ってきます。

そこで、IPが出れば少しはなくなるかな?と思いまして。
閉鎖だけはしたくないので何かいい案があったら教えてください。
お願いします。
ちなみに環境はcgiはOKです。telnetは使えません。
というか技術がそれほどないのでどうせ使えないだろうと思って
契約していません。
パーミッションの変更程度はFTPでできます。

mura 1998/11/26(木) 20:10:12
ラウンジはわからないですしPerlもいまひとつ詳しくないですが、
これでできると思います。

ホスト名
print "$ENV{'REMOTE_HOST'}";
IPアドレス
print "$ENV{'REMOTE_ADDR'}";

ホスト名の場合、自分のホスト名が出るのを好まない
一般の人もいるので一長一短ですが、
防止効果のメリットの方が勝ると私は思います。
これでいたずらが減ってきたらIPアドレス表示に変えてもいいですし。

ななえ 1998/11/26(木) 21:17:24
muraさん。ありがとうごさいます。
でも、どこに書けばいいのでしょうか?分かる方いらっしゃいませんか?
お願いします。助けてください。

B-Cus 1998/11/27(金) 01:16:56
まずは
 http://www.tohoho-web.com/cgi-bin/wwwlng.txt

 ../199811/98110112.htm
をよーく見て、どこにどういう形で記録すればいいのか
ご自分で考えてみてはいかがでしょうか。

例えば

ななえ 1998/11/26(木) 19:25:17
IP: hoge.fuga.com

とするのも一つの手です。

記録するときは、sub createSubjectとsub writeMessageの中の
適当なところに、
 print OUT "IP: $ENV{$REMOTE_HOST}\n";
を入れとけばいいでしょう。

表示は、sub printSubjectの while (<IN>)ループの中で、
 } elsif ($head && $_ =~ /^IP: /) {
  ごにょごにょ
 }
と書けばいいと思います。

B-Cus 1998/11/27(金) 01:19:43
> print OUT "IP: $ENV{$REMOTE_HOST}\n";

print OUT "IP: $ENV{REMOTE_HOST}\n"; の間違いですね。失礼。

そういえば、======とかFrom:とか書いちゃまずかったんでしたっけ?
でも一見大丈夫みたいですが。

スラきち [HomePage] 1998/11/27(金) 02:13:39
ラウンジでIPアドレスを表示させるのは逆に危険な場合もあります。

詳細は :
http://family.millto.net/~alice/guess/kiken.htm

なんでも、IPアドレスが分かればそのユーザーのコンピュータをダウンさせたりすることが出来るとか。したがって管理者用のログに残すのがベストだとこのページは言っています。

B-Cus 1998/11/27(金) 02:40:16
昔のSEGA BBSでは、「192.168.1.*」とか「*.hogehoge.ne.jp」とか
表記して、完全には特定できないようにしてましたね。

個人的には、
 「IPアドレスはできる限り公表する。それが発言者の最低限の責任。
  DOSアタック(ping floodとかping of deathとかWinNukeとか)に対しては
  パッチが出てるんだから素直にそれを当てるべき。」
という考えなんですが、もちろんそうでない考え方も
あることは理解しております。

[上に] [前に] [次に]