Что может привести к перезаписи переменных PHP сервером - PullRequest
Новая
       27

Что может привести к перезаписи переменных PHP сервером

10 голосов
/ 16 февраля 2012

В моей компании мне дали ВМ для установки веб-программного обеспечения. Но я столкнулся с довольно странной проблемой, когда переменные PHP будут перезаписываться (перезаписываться) сервером, если они соответствуют определенному шаблону. Что может переписать переменные PHP, как это?

Ниже приведен полный сценарий. 

<?php
$foo = 'b.domain.com';
echo $foo; // 'dev01.sandbox.b.domain.com'

$bar = 'dev01.sandbox.domain.com';
echo $bar; // 'dev01.sandbox.sandbox.domain.com'

$var = 'b.domainfoo.com';
echo $var; // 'b.domainfoo.com' (not overwritten because it didn't match whatever RegEx has been set)
?>

По существу, любая переменная, которая содержит поддомен и соответствует имени домена, будет переписана. Это не то, что mod_rewrite сможет коснуться, поэтому это должно быть что-то на уровне сервера, которое разбирает PHP и переписывает строку, если она соответствует RegEx.

1 Ответ

5 голосов
/ 17 февраля 2012

Перезапись вывода возможна в Apache с помощью mod_perl: PerlOutputFilterHandler.

В apache.conf можно добавить следующее для установки выходного фильтра: 

<FilesMatch "\.(html?|php|xml|css)$">
    PerlSetVar Filter On
    PerlHandler MyApache2::FilterDomain
    PerlOutputFilterHandler MyApache2::FilterDomain
</FilesMatch>

Пример кода обработчика фильтра: 

#file:MyApache2/FilterDomain.pm
#--------------------------------
package MyApache2::FilterDomain;

use strict;
use warnings;

use Apache2::Filter();
use Apache2::RequestRec();
use APR::Table();

use Apache2::Const -compile => qw(OK);

use constant BUFF_LEN => 1024;

sub handler {
    my $f = shift;
    my @hostname = split(/\./, $f->r->hostname);
    my $new_hostname = $hostname[0].".".$hostname[1];

    unless ($f->ctx) {
        $f->r->headers_out->unset('Content-Length');
        $f->ctx(1);
    }

    while ($f->read(my $buffer, BUFF_LEN)) {
        $buffer =~ s/([a-z0-9]+)+\.domain\./$new_hostname\.$1.domain\./g;   
        $f->print($buffer);
    }

    return Apache2::Const::OK;
}
1;

Подробнее о фильтрах Apache mod_perl можно найти здесь: mod_perl: фильтры ввода и вывода

...