KENT-WEB サポートコーナー 過去ログ [ 0009 ]


記事No: 6690
投稿日: 2009/11/12(Thu) 21:46:27
タイトルjoyful.cgiについて
ID情報: hoitaisa
投稿者: どっかの大佐
URLhttp://cgi38.plala.or.jp/geltukas/joyful/joyful.cgi

joyful.cgiを使用しているのですが、
まぁ、案の定スパム業者に目をつけられIPとホストのブロックを行っても
一日に数回書き込まれている有様でして(汗

それで、業者の書き込むURLを禁止ワードで規制した所「参照URL」にURLを書き込む事で
禁止ワードを回避しているようなのですが、何とかこれを防ぐ手立て
若しくは「参照URL」機能を削除するには一体何処を弄れば良いでしょうか?


記事No: 6691
投稿日: 2009/11/12(Thu) 22:03:29
タイトルRe: joyful.cgiについて
ID情報: pachira
投稿者: pachira
URLhttp://www5e.biglobe.ne.jp/~pachira/

> joyful.cgiを使用しているのですが、
> まぁ、案の定スパム業者に目をつけられIPとホストのブロックを行っても
> 一日に数回書き込まれている有様でして(汗
>
> それで、業者の書き込むURLを禁止ワードで規制した所「参照URL」にURLを書き込む事で
> 禁止ワードを回避しているようなのですが、何とかこれを防ぐ手立て
> 若しくは「参照URL」機能を削除するには一体何処を弄れば良いでしょうか?

未検証ですが、以下で参照URLにも禁止ワードが有効になりませんか?

■regist.cgi
#-------------------------------------------------
# 禁止ワードチェック
#-------------------------------------------------
sub no_wd {
local($flg);
foreach ( split(/,/, $no_wd) ) {
if (index("$in{'name'} $in{'sub'} $in{'comment'}",$_) >= 0) {
$flg = 1; last;
}
}
if ($flg) { &error("禁止ワードが含まれています"); }
}

↓↓↓

#-------------------------------------------------
# 禁止ワードチェック
#-------------------------------------------------
sub no_wd {
local($flg);
foreach ( split(/,/, $no_wd) ) {
if (index("$in{'name'} $in{'sub'} $in{'comment'} $in{'url'}",$_) >= 0) {
$flg = 1; last;
}
}
if ($flg) { &error("禁止ワードが含まれています"); }
}


記事No: 6702
投稿日: 2009/11/13(Fri) 17:00:47
タイトルRe^2: joyful.cgiについて
ID情報: hoitaisa
投稿者: どっかの大佐
URLhttp://cgi38.plala.or.jp/geltukas/joyful/joyful.cgi

>
> 未検証ですが、以下で参照URLにも禁止ワードが有効になりませんか?
>
> ■regist.cgi
> #-------------------------------------------------
> # 禁止ワードチェック
> #-------------------------------------------------
> sub no_wd {
> local($flg);
> foreach ( split(/,/, $no_wd) ) {
> if (index("$in{'name'} $in{'sub'} $in{'comment'}",$_) >= 0) {
> $flg = 1; last;
> }
> }
> if ($flg) { &error("禁止ワードが含まれています"); }
> }
>
> ↓↓↓
>
> #-------------------------------------------------
> # 禁止ワードチェック
> #-------------------------------------------------
> sub no_wd {
> local($flg);
> foreach ( split(/,/, $no_wd) ) {
> if (index("$in{'name'} $in{'sub'} $in{'comment'} $in{'url'}",$_) >= 0) {
> $flg = 1; last;
> }
> }
> if ($flg) { &error("禁止ワードが含まれています"); }
> }
有難う御座います。
早速試してみようと思います


[検索ページ]