perl - HTTP::Proxy: how to replace a whole html page -


i'm trying use http::proxy server 403 error specific domain. managed modify headers, proxy continue serve original page.

here code i'm using:

package filters::filter403;  use strict; use warnings; use http::proxy::headerfilter::simple; use http::proxy::bodyfilter::simple;  our $header = http::proxy::headerfilter::simple->new (     sub {         $_[2]->code( 403 );         $_[2]->message ( 'forbidden' );     } );  our $body = http::proxy::bodyfilter::simple->new (     sub {                $_[1] = \<<'html'; <!doctype html> <html><head><title>403 forbidden</title><style type="text/css"> body { padding: 40pt; } body, h1, h2, p { color: #333; font-family: arial, sans-serif; margin: 0; } div { width: 200px; background: #eee; padding: 2em; } </style></head><body><div><h1>403</h1><h2>forbidden</h2></div></body></html> html     } );  1;

here code main script i'm calling 2 filters, can have better look:

use http::proxy qw(:log); use getopt::long;  use findbin qw($bin); use lib $bin;  use filters; use http::proxy::bodyfilter::complete;  $port = 3128; $fail_at; $outputfile = '/var/log/cvmfs-test/webproxy.output'; $errorfile = '/var/log/cvmfs-test/webproxy.error';  $ret = getoptions ( "port=i" => \$port,                        "fail=s" => \$fail_at );  @fail_at = split(/,/, $fail_at);  # opening file log open (log, '>>', $outputfile);  $proxy = http::proxy->new; $proxy->port( $port ); $proxy->logfh( *log ); $proxy->logmask( );  if ($fail_at[0] ne 'all') {     foreach $url (@fail_at) {         $proxy->push_filter(             host => $url,             response => http::proxy::bodyfilter::complete->new,             response => $filters::filter403::header,             response => $filters::filter403::body         );     } } else {     $proxy->push_filter (         response => http::proxy::bodyfilter::complete->new(),         response => $filters::filter403::header,         response => $filters::filter403::body     ); }  $pid = fork();  # command forked process if ( defined($pid) , $pid == 0 ) {     open (my $errfh, '>', $errorfile);     stdout->fdopen( \*$errfh, 'w' ) || die "couldn't set stderr $errorfile: $!\n";     $proxy->start; }  # command main script unless ($pid == 0) {     print "proxy http started on port $port pid $pid.\n";     print "you can read output in $outputfile.\n"; }  exit 0;

can please me? tried daxim solution , tried use $ { $_[1] } documentation seems suggest, didn't works.

thank much.

i have found solution. problem every filter after http::proxy::bodyfilter::complete->new executed empty data. found loading heavy page, code added multiple times.

here working filter:

our $body = http::proxy::bodyfilter::simple->new (     sub {         ( $self, $dataref, $message, $protocol, $buffer ) = @_;         unless (defined ($buffer)){             $html =                      '<!doctype html>'.                     '<html><head><title>403 forbidden</title><style type="text/css">'.                     'body { padding: 40pt; }'.                     'body, h1, h2, p { color: #333; font-family: arial, sans-serif; margin: 0; }'.                     'div { width: 200px; background: #eee; padding: 2em; }'.                     '</style></head><body><div><h1>403</h1><h2>forbidden</h2></div></body></html>';              $$dataref = $html;         }     } );

this way, filter doesn't unless $buffer undef, i.e. when whole response received.


Comments

Post a Comment

Popular posts from this blog

java - Play! framework 2.0: How to display multiple image? -

i need display gallery of photos. here template: @(photos: list[photo]) @title = { <bold>gallery</bold> } @main(title,"photo"){ <ul class="thumbnails"> @for(photo <- photos) { <li class="span3"> <a href="#" class="thumbnail"> <img src="@photo.path" alt=""> </a> </li> } </ul> } and here controller method: public static result getphotos() { return ok(views.html.photo.gallery.render(photo.get())); } and here photo bean : @entity public class photo extends model { @id public long id; @required public string label; public string path; public photo(string path, string label) { this.path = path; this.label = label; } private static finder<long, photo> find = new finder<long, photo>( long.class, photo.class); public static list<phot...
Read more

gmail - Is there any documentation for read-only access to the Google Contacts API? -

i want read-only access user's google contacts. there stackoverflow member wanted this, , received following answer : yes, there is, use https://www.googleapis.com/auth/contacts.readonly scope , "view contacts". this exchange reference read-only access google contacts can find using google. simply using access token obtained attempt read usual google contacts api (i.e. https://www.google.com/m8/feeds ) fails insufficient permissions. similarly, using google contacts api on new target fails 404 errors (for example https://www.googleapis.com/auth/contacts.readonly/default/full ). is there documentation anywhere on how use api, or permissible way access google contacts api full read-write access?
Read more

php - Controller/JToolBar not working in Joomla 2.5 -

relevant code: jtoolbarhelper::custom('savecategories', 'save', '', 'save', false, false); ... <input type="hidden" name="controller" value="easyblogcontroller"> according can dig docs , own previous questions, should call savecategories() function in easyblogcontroller . i've tried setting value easyblog , easyblog.php (file name) current easyblogcontroller (class name). clicking on save button refreshes page. not redirect, echo or var_dump test code put in savecategories() function. var_dump ing jrequest::getvar('controller') , 'task' return correct values. creating controller object , using $controller->execute('task'); works. the values going depend on location of controller trying call, , have couple options here. typically there controller in base folder of component (likely components/com_easyblog) in file called controller.php , class name inside ...
Read more