(現在 過去ログ8 を表示中)

HOME HELP 新着記事 トピック表示 検索 過去ログ

No8962 の記事


■8962 / )  Re[9]: IpAcDeny.cgiにて
□投稿者/ sin -(2004/04/05(Mon) 17:17:53)
    No8956に返信(りゅういちさんの記事)
    > http://www.cj-c.com/sp/cbbs.cgi?mode=al2&namber=7286&no=1&KLOG=3
    > のほうで取得していましたね。これまでの記事を総合すると
    > if(@ips){
    > my($match)=0;
    > my($ip)=$ENV{'REMOTE_ADDR'};
    > my($host)=gethostbyaddr(pack("C4", split(/\./, $ip)), 2);
    > foreach (@ips) {
    > $_=~ s/\n//;
    > if($ip=~ /^$_/){$match=1; last;}elsif($host=~ /$_$/){$match=1; last;}
    > }
    > if($match){&er_("閲覧権限がありません!");}
    > }
    > にすればよいのではないでしょうか。

    やっとできました!
    本当にいろいろとご迷惑をおかけして申し訳ございませんでした。

    >
    > そうですね。ただ、禁止文字列に追加して制限するには
    > if(@NW){
    > foreach(0..$#NW){
    > $NW[$_]=~ s/\n//;
    > if(index($new_,$NW[$_]) >= 0){&er_("書き込みエラー");}
    > }
    > }
    > を1171行目の
    > $new_.="$Ip:$file:$E:$TL:...:$R:<>$time_k<>$send<>\n";
    > の下に挿入してください(...は省略)。

    それはIDで拒否をする場合ですよね?
    以前も設定したと思うのですが知らぬうちにできなくなっていたのでもう一度やってみます。。

    現在のibbs.cgiは
    http://www.talers.net/ibbs/ibbs.txt のような感じなんですが
    いろいろと検索したのですが
    $new_.="$Ip:$file:$E:$TL:...:$R:<>$time_k<>$send<>\n";
    の部分が見つかりません。。
    ...は省略部分であるということはもちろん承知ですので<>$send<>\n";だけなどでも検索したのですがやはり見つからないです。。

    何度も申し訳ございませんがご教授いただけると幸いです。。
返信 [メール受信/OFF] 削除キー/


Pass/

HOME HELP 新着記事 トピック表示 検索 過去ログ

- Child Tree -