| 記事No | ： 7562 |
| 投稿日 | ： 2010/06/19(Sat) 08:00:43 |
| タイトル | ： アクセス制限 |
| ID情報 | ： jackin |
| 投稿者 | ： ジャックのパパ |
| URL | ： http://www.jackin.mydns.jp/ |
ジャックのパパです。
POST-MAIL v4.3 (2008/02/13)を使わせていただいています。
最近、迷惑メールが増えたのでアクセス制限をかけました。
しかし、ホスト名で設定しましたが投稿できてしまいました。
# アクセス制限（複数あれば半角スペースで区切る、アスタリスク可）
# → 拒否ホスト名又はIPアドレスの記述例
# （前方一致は先頭に ^ をつける）【例】^210.12.345.*
# （後方一致は末尾に $ をつける）【例】*.anonymizer.com$
下記がソースですがチェックは$host ではなく、$addr で
行われています。$hostに直したら、正常に動作しました。
if ($host eq "") { $host = $addr; }
# チェック
if ($denyhost) {
my $flg;
foreach ( split(/\s+/, $denyhost) ) {
s/\./\\\./g;
s/\*/\.\*/g;
if ($addr =~ /$_/i) { $flg = 1; last; }
}
以上。
| 記事No | ： 7587 |
| 投稿日 | ： 2010/06/24(Thu) 22:22:23 |
| タイトル | ： 了解＞ジャックのパパさん |
| ID情報 | ： kent |
| 投稿者 | ： KENT |
> ジャックのパパです。
>
> POST-MAIL v4.3 (2008/02/13)を使わせていただいています。
>
> 最近、迷惑メールが増えたのでアクセス制限をかけました。
> しかし、ホスト名で設定しましたが投稿できてしまいました。
>
>
> # アクセス制限（複数あれば半角スペースで区切る、アスタリスク可）
> # → 拒否ホスト名又はIPアドレスの記述例
> # （前方一致は先頭に ^ をつける）【例】^210.12.345.*
> # （後方一致は末尾に $ をつける）【例】*.anonymizer.com$
>
>
> 下記がソースですがチェックは$host ではなく、$addr で
> 行われています。$hostに直したら、正常に動作しました。
>
> if ($host eq "") { $host = $addr; }
>
> # チェック
> if ($denyhost) {
> my $flg;
> foreach ( split(/\s+/, $denyhost) ) {
> s/\./\\\./g;
> s/\*/\.\*/g;
>
> if ($addr =~ /$_/i) { $flg = 1; last; }
> }
>
> 以上。
ご指摘をありがとうございました。
早めに修正しておくようにします。