> 2009/08/23 (日) 22:45:40 ◆ ▼ ◇ [qwerty]> > それは設定をいじる範囲内なのか
> > それともスクリプト自体をいじる必要があるのか
> > どっちだ(;´Д`)
> 処理ロジックをいじる必要があるよ(;´Д`)こんな感じ(CGIProxy 2.1beta19)
> # Create Referer: header if so configured.
> # Only include Referer: if we successfully remove $script_url+flags from
> # start of referring URL. Note that flags may not always be there.
> # If using @PROXY_GROUP, loop through them until one fits. This could
> # only be ambiguous if one proxy in @PROXY_GROUP is called through
> # another proxy in @PROXY_GROUP, which you really shouldn't do anyway.
> if (!$e_hide_referer) {
> my($referer)= $ENV{'HTTP_REFERER'} ;
> if (@PROXY_GROUP) {
> foreach (@PROXY_GROUP) {
> print(S 'Referer: ', &wrap_proxy_decode($referer), "\015\012"), last
> if $referer=~ s#^$_(/[^/]*/?)?## && ($referer ne '') ;
> last if $referer eq '' ;
> }
> } else {
> #QWERTY i-modeリファラチェック対応
> my $qwerty_sw = 0;
> if( $referer eq ''){
> if( $host eq 'qwerty.on.arena.ne.jp'){
> if( $request_uri =~ /^\/cgi-bin\/bbs.cgi/){
> if ($ENV{'REQUEST_METHOD'} eq 'POST') {
> $referer = 'http://qwerty.on.arena.ne.jp/cgi-bin/bbs.cgi';
> $qwerty_sw = 1;
> }
> }
> }
> }
> if( $qwerty_sw == 0){
> print S 'Referer: ', &wrap_proxy_decode($referer), "\015\012"
> if $referer=~ s#^$THIS_SCRIPT_URL(/[^/]*/?)?## && ($referer ne '') ;
> }
> else{
> print S 'Referer: ', $referer, "\015\012";
> }
> }
> }
CGIProxy 2.1beta19を使えばいいということはよくわかった(;´Д`)残りの暗号部分に関しては解読待ちだ
参考:2009/08/23(日)22時41分21秒