Apache's mod

Perrin Harkins | 3 Jan 2011 01:07

Re: BerkeleyDB error

Hi,

> I am able to execute that perl script
> successfully few times (less than 5 times) after every restart of Apache web
> server. After that I am getting following BerkeleyDB error message in log
> file of that script (i.e., run_command).

Are you using Apache::Registry for this?

It sounds as if your requests fail on the second attempt to run the
script in a process.  If you start apache with the -X option, do they
fail on the second request?

- Perrin

headers

Perrin Harkins | 3 Jan 2011 01:18

Re: perlRequestHandler

This is a general apache configuration question, so you should be able
to find some documentation about it.  A common approach would be to
attach your handler to / with a Location or LocationMatch block.

- Perrin

On Mon, Dec 27, 2010 at 2:53 PM, Maikel Punie <maikel.punie <at> gmail.com> wrote:
> hey,
>
> i created a custom requesthandler that handles the request for a certain
> filetype,
>
> but now i want to register it with apache, how can i do this?
>
> at the moment i have it working for a specifick location,
> but i want to get it working for every file (specifick mime type) that is
> serverd with apache.
>
> where do i start?
>
> the current apache config:
> PerlRequire /etc/apache2/sin/rstHandler.pm
> <Location /rst>
>     SetHandler modperl
>     PerlResponseHandler sin::rstHandler
> </Location>
>
>
> any help would be appreciatie,
>

(Continue reading)

headers

Jim Schueler | 3 Jan 2011 01:35

Re: BerkeleyDB error

I wrote the module Apache::ChildExit specifically to resolve the 
incompatibility between BerkeleyDB and Apache::Registry

  http://search.cpan.org/~tqisjim/ChildExit_0-1/

 -Jim

> Subject: Re: BerkeleyDB error
> From: Perrin Harkins <perrin <at> elem.com>
> To: "Peram, Sudhakara" <Sudhakara.Peram <at> pfizer.com>
> Cc: modperl <at> perl.apache.org
> Content-Type: text/plain; charset=ISO-8859-1
> 
> Hi,
> 
> > I am able to execute that perl script
> > successfully few times (less than 5 times) after every restart of Apache web
> > server. After that I am getting following BerkeleyDB error message in log
> > file of that script (i.e., run_command).
> 
> Are you using Apache::Registry for this?
> 
> It sounds as if your requests fail on the second attempt to run the
> script in a process.  If you start apache with the -X option, do they
> fail on the second request?
> 
> - Perrin
>

(Continue reading)

headers

Peram, Sudhakara | 3 Jan 2011 22:44

RE: BerkeleyDB error

Thanks Perrin.

I am using Apache::Registry in httpd.conf file and I am running run_command through system command.

Below is my httpd.conf for mod_perl:

PerlFixupHandler Apache::Resource

</Location>

PerlModule Apache::Filter

# Actual mod_perl setting.

Options ExecCGI

SetHandler perl-script

# PerlHandler Apache::PerlRun

PerlSetVar Filter On

PerlHandler Apache::RegistryFilter Apache::Compress

PerlSendHeader On

PerlInitHandler CDARSLog

</Files>

Options ExecCGI

SetHandler perl-script

PerlHandler Apache::PerlRun

PerlSendHeader On

PerlInitHandler CDARSLog

</Files>

# Actual mod_perl setting.

Options +ExecCGI

SetHandler perl-script

PerlHandler Apache::Registry

PerlSendHeader On

</Files>

Options +ExecCGI

SetHandler perl-script

PerlHandler Refresh

PerlSendHeader On

</Files>

# watch what mod_perl is doing...

SetHandler perl-script

PerlHandler Apache::Status

order deny,allow

deny from all

allow from all

</Location>

# This is the standard authentication stuff

AuthName "CDARS Authentication"

AuthType Basic

PerlAuthenHandler xxxx_Access

require valid-user

</Location>

Where xxxx is our application name.

--Sudhakar

-----Original Message-----
From: pharkins <at> gmail.com [mailto:pharkins <at> gmail.com] On Behalf Of Perrin Harkins
Sent: Sunday, January 02, 2011 7:07 PM
To: Peram, Sudhakara
Cc: modperl <at> perl.apache.org
Subject: Re: BerkeleyDB error

Hi,

> I am able to execute that perl script

> successfully few times (less than 5 times) after every restart of Apache web

> server. After that I am getting following BerkeleyDB error message in log

> file of that script (i.e., run_command).

Are you using Apache::Registry for this?

It sounds as if your requests fail on the second attempt to run the

script in a process. If you start apache with the -X option, do they

fail on the second request?

- Perrin

headers

Peram, Sudhakara | 3 Jan 2011 22:47

RE: BerkeleyDB error

Thanks Jim.

I am bit novice to mod_perl and apache, below is my httpd.conf configuration. Can you please let me know how to use Apache::ChildExit module if you have free time.

PerlFixupHandler Apache::Resource

</Location>

PerlModule Apache::Filter

# Actual mod_perl setting.

Options ExecCGI

SetHandler perl-script

# PerlHandler Apache::PerlRun

PerlSetVar Filter On

PerlHandler Apache::RegistryFilter Apache::Compress

PerlSendHeader On

PerlInitHandler CDARSLog

</Files>

Options ExecCGI

SetHandler perl-script

PerlHandler Apache::PerlRun

PerlSendHeader On

PerlInitHandler CDARSLog

</Files>

# Actual mod_perl setting.

Options +ExecCGI

SetHandler perl-script

PerlHandler Apache::Registry

PerlSendHeader On

</Files>

Options +ExecCGI

SetHandler perl-script

PerlHandler Refresh

PerlSendHeader On

</Files>

# watch what mod_perl is doing...

SetHandler perl-script

PerlHandler Apache::Status

order deny,allow

deny from all

allow from all

</Location>

# This is the standard authentication stuff

AuthName "CDARS Authentication"

AuthType Basic

PerlAuthenHandler xxxx_Access

require valid-user

</Location>

Where xxxx is our application name.

Thank you once again for your help!

--Sudhakar

-----Original Message-----
From: Jim Schueler [mailto:jschueler <at> tqis.com]
Sent: Sunday, January 02, 2011 7:35 PM
To: Peram, Sudhakara
Cc: modperl <at> perl.apache.org; Perrin Harkins
Subject: Re: BerkeleyDB error

I wrote the module Apache::ChildExit specifically to resolve the

incompatibility between BerkeleyDB and Apache::Registry

http://search.cpan.org/~tqisjim/ChildExit_0-1/

-Jim

> Subject: Re: BerkeleyDB error

> From: Perrin Harkins <perrin <at> elem.com>

> To: "Peram, Sudhakara" <Sudhakara.Peram <at> pfizer.com>

> Cc: modperl <at> perl.apache.org

> Content-Type: text/plain; charset=ISO-8859-1

> Hi,

> > I am able to execute that perl script

> > successfully few times (less than 5 times) after every restart of Apache web

> > server. After that I am getting following BerkeleyDB error message in log

> > file of that script (i.e., run_command).

> Are you using Apache::Registry for this?

> It sounds as if your requests fail on the second attempt to run the

> script in a process. If you start apache with the -X option, do they

> fail on the second request?

> - Perrin

headers

Peter Albrecht | 4 Jan 2011 14:57

[mp2] php response handler clears authenticated user in mod_perl

Hello everyone,

1. Problem Description:

  Using PHP as response handler seems to clear the authenticated user ("$r->user()") in successive
mod_perl handlers.

  
*** Reproduce:

  1.1. Install attached simple Apache2 server setup (see "4. Source-snippets")

  1.2. PHP response handler

  1.2.1. Ensure the following lines of "/etc/apache2/vhosts/bug.conf" are commented out:

    # SetHandler modperl
    # PerlResponseHandler MyApache2::MyResponseHandler

    => PHP response handler will be in action

  1.2.2. visit http://<yourServer>/index.php with your browser

  1.2.3. error.log tells us:
      [Tue Jan 04 11:29:03 2011] [info] [client 90.148.54.54] Start Authentication
      [Tue Jan 04 11:29:03 2011] [info] [client 90.148.54.54] Session started for user: 'JonDoe'
      [Tue Jan 04 11:29:03 2011] [error] [client 90.148.54.54] OutputFilter: user = ""               <-- failure! Should be 'JonDoe'

  1.3. mod_perl response handler

  1.3.1. Enable the following lines of "/etc/apache2/vhosts/bug.conf":

    SetHandler modperl
    PerlResponseHandler MyApache2::MyResponseHandler

    => mod_perl response handler (MyResponseHandler.pm) will be in action

  1.3.2. visit http://<yourServer>/index.php with your browser

  1.3.3. error.log tells us:
      [Tue Jan 04 11:30:28 2011] [info] [client 90.148.54.54] Start Authentication
      [Tue Jan 04 11:30:28 2011] [info] [client 90.148.54.54] Session started for user: 'JonDoe'
      [Tue Jan 04 11:30:28 2011] [error] [client 90.148.54.54] OutputFilter: user = "JonDoe"            <-- correct behaviour!

*** Actual result:

  Both ResponseHandlers know the authenticated user (see browser output). But in case of the PHP response
handler, "$r->user()" seems to be resetted for futher mod_perl handlers (like MyOutputFilter). Using a
mod_perl response handler, I always get the correct authenticated user via "$r->user()" in succesive handlers.

*** Expected result:

  After PHP response handler "$r->user()" should provide the authenticated user for use in succesive
mod_perl handlers like OutputFilter or LogHandler.

*** Workaround:

  In your AuthenticationHandler make a backup of the user in an user defined Apache note:

    $r->notes->set('myAuthenUser', $r->user()); 

  and use that one in later handlers:

    my $user = $r->notes->get('myAuthenUser');

2. Used Components and their Configuration:

*** mod_perl version 2.000004

*** using /usr/lib/perl5/vendor_perl/5.10.0/i586-linux-thread-multi/Apache2/BuildConfig.pm

*** Makefile.PL options:
  MP_APR_LIB     => aprext
  MP_APXS        => /usr/sbin/apxs2
  MP_CCOPTS      => -march=i586 -mtune=i686 -fmessage-length=0 -O2 -Wall -D_FORTIFY_SOURCE=2
-fstack-protector -funwind-tables -fasynchronous-unwind-tables -g -fPIC -Wall
-fno-strict-aliasing -DLDAP_DEPRECATED
  MP_COMPAT_1X   => 1
  MP_GENERATE_XS => 1
  MP_LIBNAME     => mod_perl
  MP_USE_DSO     => 1

*** The httpd binary was not found

  .. but "httpd2 -V" tells:

     Server version: Apache/2.2.10 (Linux/SUSE)
     Server built:   Feb 23 2009 21:11:31
     Server's Module Magic Number: 20051115:18
     Server loaded:  APR 1.3.3, APR-Util 1.3.4
     Compiled using: APR 1.3.3, APR-Util 1.3.4
     Architecture:   32-bit
     Server MPM:     Prefork
       threaded:     no
         forked:     yes (variable process count)
     Server compiled with....
      -D APACHE_MPM_DIR="server/mpm/prefork"
      -D APR_HAS_SENDFILE
      -D APR_HAS_MMAP
      -D APR_HAVE_IPV6 (IPv4-mapped addresses enabled)
      -D APR_USE_SYSVSEM_SERIALIZE
      -D APR_USE_PTHREAD_SERIALIZE
      -D SINGLE_LISTEN_UNSERIALIZED_ACCEPT
      -D APR_HAS_OTHER_CHILD
      -D AP_HAVE_RELIABLE_PIPED_LOGS
      -D DYNAMIC_MODULE_LIMIT=128
      -D HTTPD_ROOT="/srv/www"
      -D SUEXEC_BIN="/usr/sbin/suexec2"
      -D DEFAULT_PIDLOG="/var/run/httpd2.pid"
      -D DEFAULT_SCOREBOARD="logs/apache_runtime_status"
      -D DEFAULT_LOCKFILE="/var/run/accept.lock"
      -D DEFAULT_ERRORLOG="/var/log/apache2/error_log"
      -D AP_TYPES_CONFIG_FILE="/etc/apache2/mime.types"
      -D SERVER_CONFIG_FILE="/etc/apache2/httpd.conf"

*** (apr|apu)-config linking info

(apr|apu)-config scripts were not found

*** /usr/bin/perl -V
Summary of my perl5 (revision 5 version 10 subversion 0) configuration:
  Platform:
    osname=linux, osvers=2.6.27, archname=i586-linux-thread-multi
    uname='linux eisler 2.6.27 #1 smp 2009-02-09 15:38:31 +0100 i686 athlon i386 gnulinux '
    config_args='-ds -e -Dprefix=/usr -Dvendorprefix=/usr -Dinstallusrbinperl -Dusethreads -Di_db
-Di_dbm -Di_ndbm -Di_gdbm -Duseshrplib=true -Doptimize=-march=i586 -mtune=i686
-fmessage-length=0 -O2 -Wall -D_FORTIFY_SOURCE=2 -fstack-protector -funwind-tables
-fasynchronous-unwind-tables -g -Wall -pipe -Accflags=-DPERL_USE_SAFE_PUTENV'
    hint=recommended, useposix=true, d_sigaction=define
    useithreads=define, usemultiplicity=define
    useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
    use64bitint=undef, use64bitall=undef, uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DPERL_USE_SAFE_PUTENV -DDEBUGGING
-fno-strict-aliasing -pipe -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-march=i586 -mtune=i686 -fmessage-length=0 -O2 -Wall -D_FORTIFY_SOURCE=2
-fstack-protector -funwind-tables -fasynchronous-unwind-tables -g -Wall -pipe',
    cppflags='-D_REENTRANT -D_GNU_SOURCE -DPERL_USE_SAFE_PUTENV -DDEBUGGING -fno-strict-aliasing -pipe'
    ccversion='', gccversion='4.3.2 [gcc-4_3-branch revision 141291]', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=4, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =''
    libpth=/lib /usr/lib /usr/local/lib
    libs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
    perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
    libc=/lib/libc-2.9.so, so=so, useshrplib=true, libperl=libperl.so
    gnulibc_version='2.9'
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E -Wl,-rpath,/usr/lib/perl5/5.10.0/i586-linux-thread-multi/CORE'
    cccdlflags='-fPIC', lddlflags='-shared -march=i586 -mtune=i686 -fmessage-length=0 -O2 -Wall
-D_FORTIFY_SOURCE=2 -fstack-protector -funwind-tables -fasynchronous-unwind-tables -g -Wall -pipe'

Characteristics of this binary (from libperl):
  Compile-time options: DEBUGGING MULTIPLICITY PERL_DONT_CREATE_GVSV
                        PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP
                        PERL_TRACK_MEMPOOL PERL_USE_SAFE_PUTENV USE_ITHREADS
                        USE_LARGE_FILES USE_PERLIO USE_REENTRANT_API
  Built under linux
  Compiled at Feb 21 2009 07:14:55
  %ENV:
    PERL_LWP_USE_HTTP_10="1"
   <at> INC:
    /usr/lib/perl5/5.10.0/i586-linux-thread-multi
    /usr/lib/perl5/5.10.0
    /usr/lib/perl5/site_perl/5.10.0/i586-linux-thread-multi
    /usr/lib/perl5/site_perl/5.10.0
    /usr/lib/perl5/vendor_perl/5.10.0/i586-linux-thread-multi
    /usr/lib/perl5/vendor_perl/5.10.0
    /usr/lib/perl5/vendor_perl
    .

*** Packages of interest status:

Apache2            : -
Apache2::Request   : -
CGI                : 3.29
ExtUtils::MakeMaker: 6.42
LWP                : 5.816
mod_perl           : -
mod_perl2          : 2.000004

3. This is the core dump trace: (if you get a core dump):

  got no core dump

This report was generated by /usr/bin/mp2bug on Wed Dec 22 06:49:14 2010 GMT.

*** Other environment information (manual addition)

  Linux: SuSE Linux Enterprise Server 11, PL0

  rpm -qa | grep php:
     apache2-mod_php5-5.2.6-50.17
     php5-5.2.6-50.17
     php5-zlib-5.2.6-50.17
     php5-iconv-5.2.6-50.17
     php5-xmlreader-5.2.6-50.17
     php5-pear-log-1.9.11-24.28
     php5-mcrypt-5.2.6-50.17
     php5-tokenizer-5.2.6-50.17
     php5-mbstring-5.2.6-50.17
     php5-gd-5.2.6-50.17
     php5-odbc-5.2.6-50.17
     php5-ncurses-5.2.6-50.17
     php5-sqlite-5.2.6-50.17
     php5-curl-5.2.6-50.17
     php5-pdo-5.2.6-50.17
     php5-json-5.2.6-50.17
     php5-dom-5.2.6-50.17
     php5-mysql-5.2.6-50.17
     php5-pear-5.2.12-5.1
     php5-devel-5.2.6-50.17
     php5-openssl-5.2.6-50.17
     php5-ctype-5.2.6-50.17
     php5-ldap-5.2.6-50.17
     php5-xmlwriter-5.2.6-50.17
     php5-hash-5.2.6-50.17
     php5-APC-3.1.3-1.1

  rpm -qa | grep apache2:
     apache2-utils-2.2.10-2.18
     apache2-2.2.10-2.18
     apache2-example-pages-2.2.10-2.18
     apache2-mod_php5-5.2.6-50.17
     apache2-mod_auth_kerb-5.4-7.1
     apache2-prefork-2.2.10-2.18
     apache2-worker-2.2.10-2.18
     apache2-doc-2.2.10-2.18
     apache2-mod_python-3.3.1-147.19
     apache2-mod_jk-1.2.26-1.29
     apache2-mod_perl-2.0.4-40.19

4. Source-snippets:

*** ./htdocs/index.php
<?php
print("Hello world! From php (REMOTE_USER: \"" . $_SERVER['REMOTE_USER'] . "\")");
?>

*** ./mp2/MyApache2/MyAuthenHandler.pm
  [...]
sub handler {
        my $r = shift;
        my $logger = $r->log;

        $logger->info('Start Authentication');

        $r->ap_auth_type('Session');
        $r->user('JonDoe');

        $logger->info("Session started for user: '" . $r->user() . "'");
        return Apache2::Const::OK;
}
  [...]

*** ./mp2/MyApache2/MyResponseHandler.pm
  [...]
sub handler {
        my $r = shift;

        $r->print("Hello world! From mod_perl (Request-User: \"" . $r->user() . "\")");

        return Apache2::Const::OK;
}
  [...]

*** ./mp2/MyApache2/MyOutputFilter.pm
  [...]
use base qw(Apache2::Filter);

sub handler : FilterRequestHandler {
        my $f = shift;

        my $r = $f->r;
        my $logger = $r->log;

        $logger->error("OutputFilter: user = \"" . $r->user() . "\"");

        return Apache2::Const::DECLINED;
}
  [...]

*** /etc/apache2/vhosts/bug.conf
<VirtualHost *:80>
  [...]
  php_value include_path ".:/usr/share/php5:/usr/share/php5/PEAR"
  <Perl>
    use lib qw#/srv/www/bug/mp2#;
  </Perl>

  <Directory /srv/www/bug/htdocs>
    AddType text/html .php
    PerlAuthenHandler MyApache2::MyAuthenHandler
    PerlOutputFilterHandler MyApache2::MyOutputFilter

    Allow from all
    AuthType MyAuthType
    AuthName "Secret Area"
    require valid-user

#    SetHandler modperl
#    PerlResponseHandler MyApache2::MyResponseHandler
  </Directory>
</VirtualHost>

--

-- 
Empfehlen Sie GMX DSL Ihren Freunden und Bekannten und wir
belohnen Sie mit bis zu 50,- Euro! https://freundschaftswerbung.gmx.de

headers

Adam Prime | 4 Jan 2011 15:03

Re: [mp2] php response handler clears authenticated user in mod_perl

This is a bug in mod_php not mod_perl isn't it?

Adam

headers

fakessh @ | 4 Jan 2011 16:42

Re: [mp2] php response handler clears authenticated user in mod_perl

the perl core is early buggy
some misunderstand in the regex
some valuable { is again ....
my personnal experience with the mod perl user is crach with the webmail
if Jaos  <at> 
Le mardi 04 janvier 2011 à 14:57 +0100, Peter Albrecht a écrit :
> Hello everyone,
> 
> 1. Problem Description:
> 
>   Using PHP as response handler seems to clear the authenticated user ("$r->user()") in successive
mod_perl handlers.
> 
>   
> *** Reproduce:
> 
>   1.1. Install attached simple Apache2 server setup (see "4. Source-snippets")
>   
>   1.2. PHP response handler
> 
>   1.2.1. Ensure the following lines of "/etc/apache2/vhosts/bug.conf" are commented out:
> 
>     # SetHandler modperl
>     # PerlResponseHandler MyApache2::MyResponseHandler
> 
>     => PHP response handler will be in action
> 
>   1.2.2. visit http://<yourServer>/index.php with your browser
>   
>   1.2.3. error.log tells us:
>       [Tue Jan 04 11:29:03 2011] [info] [client 90.148.54.54] Start Authentication
>       [Tue Jan 04 11:29:03 2011] [info] [client 90.148.54.54] Session started for user: 'JonDoe'
>       [Tue Jan 04 11:29:03 2011] [error] [client 90.148.54.54] OutputFilter: user = ""               <-- failure! Should be 'JonDoe'
> 
>   1.3. mod_perl response handler
>   
>   1.3.1. Enable the following lines of "/etc/apache2/vhosts/bug.conf":
> 
>     SetHandler modperl
>     PerlResponseHandler MyApache2::MyResponseHandler
> 
>     => mod_perl response handler (MyResponseHandler.pm) will be in action
> 
>   1.3.2. visit http://<yourServer>/index.php with your browser
>   
>   1.3.3. error.log tells us:
>       [Tue Jan 04 11:30:28 2011] [info] [client 90.148.54.54] Start Authentication
>       [Tue Jan 04 11:30:28 2011] [info] [client 90.148.54.54] Session started for user: 'JonDoe'
>       [Tue Jan 04 11:30:28 2011] [error] [client 90.148.54.54] OutputFilter: user = "JonDoe"            <-- correct behaviour!
> 
> 
> 
> *** Actual result:
> 
>   Both ResponseHandlers know the authenticated user (see browser output). But in case of the PHP response
handler, "$r->user()" seems to be resetted for futher mod_perl handlers (like MyOutputFilter). Using a
mod_perl response handler, I always get the correct authenticated user via "$r->user()" in succesive handlers.
> 
> 
> *** Expected result:
> 
>   After PHP response handler "$r->user()" should provide the authenticated user for use in succesive
mod_perl handlers like OutputFilter or LogHandler.
> 
> 
> *** Workaround:
> 
>   In your AuthenticationHandler make a backup of the user in an user defined Apache note:
>   
>     $r->notes->set('myAuthenUser', $r->user()); 
> 
>   and use that one in later handlers:
>   
>     my $user = $r->notes->get('myAuthenUser');
>   
> 
> 2. Used Components and their Configuration:
> 
> *** mod_perl version 2.000004
> 
> *** using /usr/lib/perl5/vendor_perl/5.10.0/i586-linux-thread-multi/Apache2/BuildConfig.pm
> 
> *** Makefile.PL options:
>   MP_APR_LIB     => aprext
>   MP_APXS        => /usr/sbin/apxs2
>   MP_CCOPTS      => -march=i586 -mtune=i686 -fmessage-length=0 -O2 -Wall -D_FORTIFY_SOURCE=2
-fstack-protector -funwind-tables -fasynchronous-unwind-tables -g -fPIC -Wall
-fno-strict-aliasing -DLDAP_DEPRECATED
>   MP_COMPAT_1X   => 1
>   MP_GENERATE_XS => 1
>   MP_LIBNAME     => mod_perl
>   MP_USE_DSO     => 1
> 
> 
> *** The httpd binary was not found
> 
>   .. but "httpd2 -V" tells:
>   
>      Server version: Apache/2.2.10 (Linux/SUSE)
>      Server built:   Feb 23 2009 21:11:31
>      Server's Module Magic Number: 20051115:18
>      Server loaded:  APR 1.3.3, APR-Util 1.3.4
>      Compiled using: APR 1.3.3, APR-Util 1.3.4
>      Architecture:   32-bit
>      Server MPM:     Prefork
>        threaded:     no
>          forked:     yes (variable process count)
>      Server compiled with....
>       -D APACHE_MPM_DIR="server/mpm/prefork"
>       -D APR_HAS_SENDFILE
>       -D APR_HAS_MMAP
>       -D APR_HAVE_IPV6 (IPv4-mapped addresses enabled)
>       -D APR_USE_SYSVSEM_SERIALIZE
>       -D APR_USE_PTHREAD_SERIALIZE
>       -D SINGLE_LISTEN_UNSERIALIZED_ACCEPT
>       -D APR_HAS_OTHER_CHILD
>       -D AP_HAVE_RELIABLE_PIPED_LOGS
>       -D DYNAMIC_MODULE_LIMIT=128
>       -D HTTPD_ROOT="/srv/www"
>       -D SUEXEC_BIN="/usr/sbin/suexec2"
>       -D DEFAULT_PIDLOG="/var/run/httpd2.pid"
>       -D DEFAULT_SCOREBOARD="logs/apache_runtime_status"
>       -D DEFAULT_LOCKFILE="/var/run/accept.lock"
>       -D DEFAULT_ERRORLOG="/var/log/apache2/error_log"
>       -D AP_TYPES_CONFIG_FILE="/etc/apache2/mime.types"
>       -D SERVER_CONFIG_FILE="/etc/apache2/httpd.conf"
> 
> 
> *** (apr|apu)-config linking info
> 
> (apr|apu)-config scripts were not found
> 
> 
> 
> *** /usr/bin/perl -V
> Summary of my perl5 (revision 5 version 10 subversion 0) configuration:
>   Platform:
>     osname=linux, osvers=2.6.27, archname=i586-linux-thread-multi
>     uname='linux eisler 2.6.27 #1 smp 2009-02-09 15:38:31 +0100 i686 athlon i386 gnulinux '
>     config_args='-ds -e -Dprefix=/usr -Dvendorprefix=/usr -Dinstallusrbinperl -Dusethreads -Di_db
-Di_dbm -Di_ndbm -Di_gdbm -Duseshrplib=true -Doptimize=-march=i586 -mtune=i686
-fmessage-length=0 -O2 -Wall -D_FORTIFY_SOURCE=2 -fstack-protector -funwind-tables
-fasynchronous-unwind-tables -g -Wall -pipe -Accflags=-DPERL_USE_SAFE_PUTENV'
>     hint=recommended, useposix=true, d_sigaction=define
>     useithreads=define, usemultiplicity=define
>     useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
>     use64bitint=undef, use64bitall=undef, uselongdouble=undef
>     usemymalloc=n, bincompat5005=undef
>   Compiler:
>     cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DPERL_USE_SAFE_PUTENV -DDEBUGGING
-fno-strict-aliasing -pipe -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
>     optimize='-march=i586 -mtune=i686 -fmessage-length=0 -O2 -Wall -D_FORTIFY_SOURCE=2
-fstack-protector -funwind-tables -fasynchronous-unwind-tables -g -Wall -pipe',
>     cppflags='-D_REENTRANT -D_GNU_SOURCE -DPERL_USE_SAFE_PUTENV -DDEBUGGING -fno-strict-aliasing -pipe'
>     ccversion='', gccversion='4.3.2 [gcc-4_3-branch revision 141291]', gccosandvers=''
>     intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
>     d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
>     ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
>     alignbytes=4, prototype=define
>   Linker and Libraries:
>     ld='cc', ldflags =''
>     libpth=/lib /usr/lib /usr/local/lib
>     libs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
>     perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
>     libc=/lib/libc-2.9.so, so=so, useshrplib=true, libperl=libperl.so
>     gnulibc_version='2.9'
>   Dynamic Linking:
>     dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E -Wl,-rpath,/usr/lib/perl5/5.10.0/i586-linux-thread-multi/CORE'
>     cccdlflags='-fPIC', lddlflags='-shared -march=i586 -mtune=i686 -fmessage-length=0 -O2 -Wall
-D_FORTIFY_SOURCE=2 -fstack-protector -funwind-tables -fasynchronous-unwind-tables -g -Wall -pipe'
> 
> 
> Characteristics of this binary (from libperl):
>   Compile-time options: DEBUGGING MULTIPLICITY PERL_DONT_CREATE_GVSV
>                         PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP
>                         PERL_TRACK_MEMPOOL PERL_USE_SAFE_PUTENV USE_ITHREADS
>                         USE_LARGE_FILES USE_PERLIO USE_REENTRANT_API
>   Built under linux
>   Compiled at Feb 21 2009 07:14:55
>   %ENV:
>     PERL_LWP_USE_HTTP_10="1"
>    <at> INC:
>     /usr/lib/perl5/5.10.0/i586-linux-thread-multi
>     /usr/lib/perl5/5.10.0
>     /usr/lib/perl5/site_perl/5.10.0/i586-linux-thread-multi
>     /usr/lib/perl5/site_perl/5.10.0
>     /usr/lib/perl5/vendor_perl/5.10.0/i586-linux-thread-multi
>     /usr/lib/perl5/vendor_perl/5.10.0
>     /usr/lib/perl5/vendor_perl
>     .
> 
> *** Packages of interest status:
> 
> Apache2            : -
> Apache2::Request   : -
> CGI                : 3.29
> ExtUtils::MakeMaker: 6.42
> LWP                : 5.816
> mod_perl           : -
> mod_perl2          : 2.000004
> 
> 
> 3. This is the core dump trace: (if you get a core dump):
> 
>   got no core dump
> 
> This report was generated by /usr/bin/mp2bug on Wed Dec 22 06:49:14 2010 GMT.
> 
> *** Other environment information (manual addition)
> 
>   Linux: SuSE Linux Enterprise Server 11, PL0
> 
>   rpm -qa | grep php:
>      apache2-mod_php5-5.2.6-50.17
>      php5-5.2.6-50.17
>      php5-zlib-5.2.6-50.17
>      php5-iconv-5.2.6-50.17
>      php5-xmlreader-5.2.6-50.17
>      php5-pear-log-1.9.11-24.28
>      php5-mcrypt-5.2.6-50.17
>      php5-tokenizer-5.2.6-50.17
>      php5-mbstring-5.2.6-50.17
>      php5-gd-5.2.6-50.17
>      php5-odbc-5.2.6-50.17
>      php5-ncurses-5.2.6-50.17
>      php5-sqlite-5.2.6-50.17
>      php5-curl-5.2.6-50.17
>      php5-pdo-5.2.6-50.17
>      php5-json-5.2.6-50.17
>      php5-dom-5.2.6-50.17
>      php5-mysql-5.2.6-50.17
>      php5-pear-5.2.12-5.1
>      php5-devel-5.2.6-50.17
>      php5-openssl-5.2.6-50.17
>      php5-ctype-5.2.6-50.17
>      php5-ldap-5.2.6-50.17
>      php5-xmlwriter-5.2.6-50.17
>      php5-hash-5.2.6-50.17
>      php5-APC-3.1.3-1.1
> 
>   rpm -qa | grep apache2:
>      apache2-utils-2.2.10-2.18
>      apache2-2.2.10-2.18
>      apache2-example-pages-2.2.10-2.18
>      apache2-mod_php5-5.2.6-50.17
>      apache2-mod_auth_kerb-5.4-7.1
>      apache2-prefork-2.2.10-2.18
>      apache2-worker-2.2.10-2.18
>      apache2-doc-2.2.10-2.18
>      apache2-mod_python-3.3.1-147.19
>      apache2-mod_jk-1.2.26-1.29
>      apache2-mod_perl-2.0.4-40.19
> 
> 
> 4. Source-snippets:
> 
> *** ./htdocs/index.php
> <?php
> print("Hello world! From php (REMOTE_USER: \"" . $_SERVER['REMOTE_USER'] . "\")");
> ?>
> 
> 
> *** ./mp2/MyApache2/MyAuthenHandler.pm
>   [...]
> sub handler {
>         my $r = shift;
>         my $logger = $r->log;
> 
>         $logger->info('Start Authentication');
> 
>         $r->ap_auth_type('Session');
>         $r->user('JonDoe');
> 
>         $logger->info("Session started for user: '" . $r->user() . "'");
>         return Apache2::Const::OK;
> }
>   [...]
> 
> 
> *** ./mp2/MyApache2/MyResponseHandler.pm
>   [...]
> sub handler {
>         my $r = shift;
> 
>         $r->print("Hello world! From mod_perl (Request-User: \"" . $r->user() . "\")");
> 
>         return Apache2::Const::OK;
> }
>   [...]
> 
> 
> *** ./mp2/MyApache2/MyOutputFilter.pm
>   [...]
> use base qw(Apache2::Filter);
> 
> sub handler : FilterRequestHandler {
>         my $f = shift;
> 
>         my $r = $f->r;
>         my $logger = $r->log;
> 
>         $logger->error("OutputFilter: user = \"" . $r->user() . "\"");
> 
>         return Apache2::Const::DECLINED;
> }
>   [...]
> 
> 
> *** /etc/apache2/vhosts/bug.conf
> <VirtualHost *:80>
>   [...]
>   php_value include_path ".:/usr/share/php5:/usr/share/php5/PEAR"
>   <Perl>
>     use lib qw#/srv/www/bug/mp2#;
>   </Perl>
> 
>   <Directory /srv/www/bug/htdocs>
>     AddType text/html .php
>     PerlAuthenHandler MyApache2::MyAuthenHandler
>     PerlOutputFilterHandler MyApache2::MyOutputFilter
> 
>     Allow from all
>     AuthType MyAuthType
>     AuthName "Secret Area"
>     require valid-user
> 
> #    SetHandler modperl
> #    PerlResponseHandler MyApache2::MyResponseHandler
>   </Directory>
> </VirtualHost>
> 
--

-- 
gpg --keyserver pgp.mit.edu --recv-key 092164A7
http://pgp.mit.edu:11371/pks/lookup?op=get&search=0x092164A7

headers

CrAsH-DMX | 5 Jan 2011 01:09

Problem with PerlTransHandler

Hi all

First of all, I want to clarify that I am pretty newie in mod_perl and I'm using mod_perl 1.

I need to write a module that allows me to capture all the requests that are made to my server,
get a string with all the parameters stored in $r->content or $ r-> args for each request, apply
some process and store again in $r->content or $ r->args to follow their way.

To achieve this, I'm trying to write a PerlTransHandler:

package Test::test_filter;
use strict;
use Apache::Constants qw(:common);

sub handler {
    my $r = shift;
    my $params = $r->method eq "POST" ? $r->content:$r->args;
    print STDERR "PARAMS:$params\n";
    #DO SOMETHING WITH $params
    #$r->content($params);
    return DECLINED;
}
1;

The problem is, after showing the message with the parameters in the log file the page with the POST form
does not change; this mean, don't show me the next page where i should see the values of the modified parameters.

If comment my $params = $r->method eq "POST" ? $r->content:$r->args; all works fine.

I need to do something else?, I'm using the right type of handler?

In advance thank you very much for your answers.

headers

Peter Albrecht | 5 Jan 2011 08:36

Re: [mp2] [SOLVED] php response handler clears authenticated user in mod_perl

Hi Adam,

it seems to be a bug in mod_php: http://bugs.php.net/46005

I'm sorry having posted to the wrong list!
I promise, I have used the search engine of my choice, _before_ posting here...

But maybe that post will at least help some else.

Peter

-------- Original-Nachricht --------
> Datum: Tue, 04 Jan 2011 09:03:58 -0500
> Von: Adam Prime <adam.prime <at> utoronto.ca>
> An: modperl <at> perl.apache.org
> Betreff: Re: [mp2] php response handler clears authenticated user in mod_perl

> This is a bug in mod_php not mod_perl isn't it?
> 
> Adam
> 

--

-- 
Neu: GMX De-Mail - Einfach wie E-Mail, sicher wie ein Brief!  
Jetzt De-Mail-Adresse reservieren: http://portal.gmx.net/de/go/demail

29	June 2013
69	May 2013
59	April 2013
35	March 2013
57	February 2013
17	January 2013
38	December 2012
73	November 2012
50	October 2012
38	September 2012
35	August 2012
46	July 2012
48	June 2012
38	May 2012
74	April 2012
69	March 2012
78	February 2012
97	January 2012
55	December 2011
58	November 2011
44	October 2011
25	September 2011
34	August 2011
157	July 2011
113	June 2011
113	May 2011
31	April 2011
75	March 2011
113	February 2011
77	January 2011
79	December 2010
50	November 2010
58	October 2010
79	September 2010
39	August 2010
31	July 2010
40	June 2010
83	May 2010
123	April 2010
94	March 2010
99	February 2010
144	January 2010
70	December 2009
110	November 2009
141	October 2009
235	September 2009
132	August 2009
85	July 2009
97	June 2009
72	May 2009
129	April 2009
218	March 2009
129	February 2009
215	January 2009
152	December 2008
161	November 2008
190	October 2008
134	September 2008
139	August 2008
127	July 2008
187	June 2008
196	May 2008
236	April 2008
175	March 2008
218	February 2008
192	January 2008
213	December 2007
278	November 2007
295	October 2007
262	September 2007
185	August 2007
206	July 2007
340	June 2007
344	May 2007
282	April 2007
340	March 2007
168	February 2007
345	January 2007
246	December 2006
312	November 2006
245	October 2006
305	September 2006
488	August 2006
197	July 2006
263	June 2006
290	May 2006
214	April 2006
347	March 2006
537	February 2006
342	January 2006
405	December 2005
340	November 2005
376	October 2005
493	September 2005
629	August 2005
411	July 2005
396	June 2005
610	May 2005
601	April 2005
430	March 2005
559	February 2005
508	January 2005
674	December 2004
563	November 2004
345	October 2004
407	September 2004
550	August 2004
479	July 2004
446	June 2004
481	May 2004
457	April 2004
643	March 2004
534	February 2004
496	January 2004
615	December 2003
729	November 2003
526	October 2003
438	September 2003
570	August 2003
804	July 2003
673	June 2003
668	May 2003
666	April 2003
549	March 2003
562	February 2003
640	January 2003
438	December 2002
648	November 2002
687	October 2002
409	September 2002
698	August 2002
322	July 2002
1	April 2002
1	October 2001
1	August 2001

Mon	Tue	Wed	Thu	Fri	Sat	Sun

					1	2
3	4	5	6	7	8	9
10	11	12	13	14	15	16
17	18	19	20	21	22	23
24	25	26	27	28	29	30
31