Re: is anybody using mp2 in production?

[Benjamin Reed]

-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
Chris Faust wrote:

Our mod_perl success story.
Here's mine...

The company I work at makes network management appliances (with a web 
interface).  We were trying to figure out a good way to demo them 
without having to ship embedded PCs to everyone...

I went looking all over for good open-source filtering proxies that are 
easily configurable, and happened upon very little.  Then I remembered 
reading about apache2 and how you can now hook into every part of the 
request process now.

I grabbed mp2 and in the span of 4 hours (and having no previous 
experience with buckets and such) had prototyped a filtering proxy 
that is perfect for our needs.  I was able to set it up so that a 
virtual host can be mapped to an appliance behind the proxy and it 
automatically proxies all incoming connections to that appliance, *and* 
filters the returning data back out to the client.

It also lets us have live filters on anything coming back from the 
appliances, so we're able to make the appliances work just like they 
would out in the field, but still filter data to disallow doing things 
that could do damage to our internal test network for the appliances 
(like performing level 3 vulnerability scans and such).

Thanks, mod_perl!  grin

- -- 
Benjamin Reed a.k.a. Ranger Rick -- http://ranger.befunk.com/
Standards are the industry's way of codifying obsolescence.
-BEGIN PGP SIGNATURE-
Version: GnuPG v1.2.2 (Darwin)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

iD8DBQE+46MAUu+jZtP2Zf4RAmbzAKCHyOog0l+0AFGFA1KzUn1ZsjcUhQCfa7qB
QI31bJNthwssxFC5eA34oXA=
=uPqa
-END PGP SIGNATURE-

PerlSendHeader

[Benjamin Reed]

I've turned off PerlSendHeader, but no matter what I do, it seems that I'm
already getting headers before I ever print anything.

I have the following in my httpd.conf:

---(snip!)---
Alias /perl/ /home/httpd/perl/
Location /perl
 SetHandler perl-script
 PerlHandler Apache::Registry
 PerlSendHeader Off
 Options Indexes ExecCGI
/Location
---(snip!)---

If I have a script called /home/httpd/perl/index.pl with only the following:

---(snip!)---
$|++;
print END;
Content-type: text/html

Hi.
END
---(snip!)---

I end up with "Content-type: text/html Hi." in the browser.

Is there something else I need to do to keep apache from sending headers?
Could it be that some other module is making the headers for me?  (All the
docs I've found on the perl.apache.org site haven't said much more than
"turn PerlSendHeader Off", so if there's a FM that I need to R, I'll happily
get out of your hair ;)

I'm using Apache 1.3.9 with mod_perl 1.23 and perl 5.005_03 on Red Hat
Linux.

Thanks in advance for any assistance...

---
Ben Reed a.k.a. Ranger Rick
[EMAIL PROTECTED]
http://defiance.dyndns.org/

Segfaults with RH6.1, mod_perl, perl 5.6.0, and apache 1.3.12

[Benjamin Reed]

I'm getting segfaults with a RedHat 6.1 system.  I've tried mod_perl 1.22,
as well as a CVS snapshot from today, and I pretty much get the same thing
either way.  I would appreciate it if anyone could help me out on this, it's
driving me nuts.

Here's my system:

RedHat 6.1 (with all updates)
Apache 1.3.12 (compiled myself after having this happen with the rh-default
apache)
mod_perl 1.22 (and 1.22-dev, same thing either way)
perl 5.6.0 (perl -V says:)

-(snip!)-
Summary of my perl5 (revision 5.0 version 6 subversion 0) configuration:
  Platform:
osname=linux, osvers=2.2.14, archname=i686-linux
uname='linux router 2.2.14 #2 sat mar 4 10:01:12 cst 2000 i686 unknown '
config_args=''
hint=recommended, useposix=true, d_sigaction=define
usethreads=undef use5005threads=undef useithreads=undef
usemultiplicity=undef
useperlio=undef d_sfio=undef uselargefiles=define
use64bitint=undef use64bitall=undef uselongdouble=undef usesocks=undef
  Compiler:
cc='gcc', optimize='-O2', gccversion=egcs-2.91.66 19990314/Linux
(egcs-1.1.2 release)
cppflags='-fno-strict-aliasing -I/usr/local/include'
ccflags
='-fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFS
ET_BITS=64'
stdchar='char', d_stdstdio=define, usevfork=false
intsize=4, longsize=4, ptrsize=4, doublesize=8
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, usemymalloc=n, prototype=define
  Linker and Libraries:
ld='gcc', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib
libs=-lnsl -lndbm -lgdbm -ldb -ldl -lm -lc -lposix -lcrypt
libc=/lib/libc-2.1.2.so, so=so, useshrplib=false, libperl=libperl.a
  Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'


Characteristics of this binary (from libperl):
  Compile-time options: USE_LARGE_FILES
  Built under linux
  Compiled at Mar 26 2000 00:39:27
  @INC:
/usr/lib/perl5/5.6.0/i686-linux
/usr/lib/perl5/5.6.0
/usr/lib/perl5/site_perl/5.6.0/i686-linux
/usr/lib/perl5/site_perl/5.6.0
/usr/lib/perl5/site_perl/5.005
/usr/lib/perl5/site_perl
.
-(snip!)-


When I run httpd under gdb, here's what I get:

-(snip!)-
Program received signal SIGSEGV, Segmentation fault.
0x40321094 in ?? () from /usr/local/libexec/libperl.so
(gdb) bt
#0  0x40321094 in ?? () from /usr/local/libexec/libperl.so
#1  0x8062bda in run_method ()
#2  0x8062cc4 in ap_header_parse ()
#3  0x8070c1d in process_request_internal ()
#4  0x8070ec8 in ap_process_request ()
#5  0x806af38 in child_main ()
#6  0x806b077 in make_child ()
#7  0x806b178 in startup_children ()
#8  0x806b628 in standalone_main ()
#9  0x806bc21 in main ()
#10 0x400b71eb in __libc_start_main (main=0x806b9b0 main, argc=2,
argv=0xbcd4, init=0x804eb0c _init, fini=0x8099b6c _fini,
rtld_fini=0x4000a610 _dl_fini,
stack_end=0xbccc) at ../sysdeps/generic/libc-start.c:90
-(snip!)-

Any ideas what's going on here?  Thanks for any insight you can give.

---
Ben Reed a.k.a. Ranger Rick
[EMAIL PROTECTED]
http://defiance.dyndns.org/