|
daiba.cx メール受信ポリシー
以下のようなホスト名からのメールはすべて拒否するかもしれませんので、予めご了承下さい。
ただのメール配信ASPなのですが、メールアドレスの出元をチェックせず、そのまま流しているようです。
このようなホスト名からメールを送信されると、こちらから自動的にポートスキャンを行います。 ちゃんと、正規にプロバイダーのメールサーバーから送信するか、OCN IP8 サービスに入って、自分で逆引きいじれるようになってからでないと受信しませんよ。
ななみちゃんに女の人からの誘いのメールを送られても困っちゃうの。あたし、ネカマだから。
とりあえず、お返事をさしあげます。Return-Path: <erml_2_14@yahoo.co.jp> Received: from pppax2596.tokyo-ip.dti.ne.jp (HELO localhost) (210.170.234.96) by miyu.yutan.daiba.cx with SMTP; 15 Jun 2006 20:15:40 +0900 Received: (qmail 30292 invoked from network); 15 Jun 2006 10:09:31 -0000 Received: from unknown (HELO 192.168.0.1) (192.168.0.66) by localhost with SMTP; 15 Jun 2006 10:09:31 -0000 Subject: Re: From: 麻衣 <asican_garden@yahoo.co.jp> MIME-Version: 1.0 Content-Type: text/plain; charset=ISO-2022-JP Content-Transfer-Encoding: 7bit X-Mailer: Becky! ver. 2.22.02 麻衣です・・・。 ひょっとしてあなたのパソコン、ウィルスに感染してませんか? このアドレスから私宛にタイトルの無い英語のメールが届いたんですけど・・・。 もし良かったら確認してみてください。 それとも私のパソコンの方がおかしいのかな・・・? この前エッチなサイト見てたから、そのせいだったりして・・・。 ☆--------☆--------☆--------☆--------☆ ∧∧ ≡・・≡ 杉浦麻衣☆ミ ( )∫ ☆--------☆--------☆--------☆--------☆ あたし、ウィルス感染してないわよ。そもそも、Return-Pathがおかしいわ
>Subject:あたし(●^o^●)です >From: お礼は5万
Subjectからしてキモイんですけど、どうみても、横長の顔のイメージがします。
>Subject:あたし(●^o^●)です >From: 田中みき 同上
>Subject: 添付ファイルの事でメールした***です。 >私の方でもパャRンに詳しい知り合いに聞いてみたりして調べたんですが、多分いたずらか ウィルスじゃないかと言う結論になりました。そもそも、添付ファイルって、そのこと聞いてませんけど。汗
>32歳で、先週離婚したばかりです。子供は居ません。すみません、うちより年上ですよ。汗
>写真、撮ったの送ってみたりしたいのですがウィルスとかやっぱり私自身添付ファイルには 怯えているので機会があったら見せたいと思います。そもそも、差出人のドメインと送信元ホスト、そして、MUAが変なんですけどね。
>先程、指名しました**様より、再度あなた様への指名が入りましたので >メールにてご連絡致しました。 >【指名者】** >【プロフィール】 >33歳・年収1000万・未婚 >【メッセージ】 >写真がダメだったんでしょうか?それとも援助金が少ないですか?はい。少ないです。せめて、援助金10億前払いで振り込んでくれたらいいですよ
最後に、迷惑メール自動拒否スクリプトqmail+tcpserver用です。
#!/usr/bin/perl
($ip1,$ip2,$ip3,$ip4)=split(/\./,$ENV{TCPREMOTEIP});
$ok=1;
$ok=0 if($ENV{TCPREMOTEHOST} eq '');
$ok=0 if($ENV{TCPREMOTEHOST}=~/[0-9][0-9][0-9][0-9]/);
$ok=1 if($ENV{TCPREMOTEHOST}=~/yahoo/);
$ok=1 if($ENV{TCPREMOTEHOST}=~/hotmail/);
$ok=1 if($ENV{TCPREMOTEHOST}=~/docomo/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/dhcp/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/ppp/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/dsl/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/ftth/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/nttpc/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/cable/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/catv/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/yournet/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/combzmail/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/rairaiken/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/\.qsv/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/$ip1.?$ip2.?$ip3.?$ip4/);
$ok=0 if($ENV{TCPREMOTEHOST}=~/$ip4.?$ip3.?$ip2.?$ip1/);
$ok=1 if($ENV{TCPREMOTEIP} eq '211.10.155.53'); #bugzilla-jp
$ok=1 if($ENV{TCPREMOTEHOST}=~/ftth.ucom.ne.jp/);
if($ok eq 0) {
foreach (keys %ENV) {
$envs.="$_=$ENV{$_}\n";
}
$|=1;
print "220 example.com - ESMTP\r\n";
while($rd=<STDIN>) {
$rd=~s/\r//g;
$rd=~s/\n//g;
$log.="$rd\n";
if($rd=~/^[HhEe][EeHh][RrLl][Oo]/) {
print "250 example.com\r\n";
next;
}
if($rd=~/^[Rr][Cc][Pp][Tt]/) {
print "550 Unknown User\r\n";
next;
}
if($rd=~/^[Dd][Aa][Tt][Aa]/) {
print "221 Bye...\r\n";
last;
}
if($rd=~/^[Qq][Uu][Ii][Tt]/) {
print "221 Bye...\r\n";
last;
}
print "250 Ok\r\n";
}
open(W,">>/var/service/smtpd/tcp-deny-auto");
print W "$ENV{TCPREMOTEIP}:deny\n";
close(W);
$ps="";
open(PIPE,"/usr/local/bin/portscanner -vv -b 1 -e 1000 $ENV{TCPREMOTEIP}|");
foreach(<PIPE>) {
$ps.=$_;
}
close(PIPE);
$whois="/usr/bin/whois "
. ($ENV{IPCOUNTRY} eq 'JP' ? '-h whois.nic.ad.jp' : '')
. " $ENV{TCPREMOTEIP} | /usr/local/bin/nkf -j |";
open(PIPE, $whois);
foreach(<PIPE>) {
$whois.=$_;
}
close(PIPE);
open(PIPE,"|/var/qmail/bin/sendmail admin\@example.com");
print PIPE << "EOM";
From: <admin\@example.com>
To: <admin\@example.com>
Subject: $ENV{TCPREMOTEIP}-$ENV{TCPREMOTEHOST} deny
$log
---
$envs
---
$ps
---
$whois
EOM
close(PIPE);
exit;
}
foreach(@ARGV) {
$argv.="$_ ";
}
system($argv);
|
![[PyukiWiki] [PyukiWiki]](./image/pyukiwiki.png)