Re: Calling mod_proxy from a perl script

[Ian Holsman]

I think the reason why mine works & yours doesn't (it's exactly the same code)
is the execution order.
currently my hook is set up as:
 static const char * const aszPost[] = { "mod_proxy.c", NULL };
 ap_hook_translate_name(hook_name ,NULL,aszPost,APR_HOOK_FIRST);
so it runs just >before< mod-proxy.
also it returns 'OK'  (meaning the proxy's translate_name hook doesn't get 
called)
I can't share the source unfortunatly..
--ian
Deliens Christophe wrote:
Cool!
Can you send me your httpd.conf? or maybe just the configuration part of
mod_proxy & your module... 
That would be nice!

Thx!
Chris
-----Original Message-----
From: Ian Holsman [mailto:[EMAIL PROTECTED] 
Sent: Friday, March 21, 2003 7:18 PM
To: [EMAIL PROTECTED]
Subject: Re: Calling mod_proxy from a perl script

Deliens Christophe wrote:
Hi,
I have a perl script which needs to "use" mod_proxy under Apache 2.
What I have right now is :
  $r->proxyreq(1);
  $r->uri($url);
  $r->filename("proxy:$url");
  $r->handler('proxy-server');
  return Apache::OK;
But it doesn't seem to call the mod_proxy after that...
Any idea why it doesn't?
Thx!
Chris

this is the C code I use to make a request into a reverse-proxied one.
(slightly edited)
    if (isDynamic == 1)  {
             const char *szApp= "http://foobar";;
             r->filename = apr_pstrcat(r->pool,"proxy:",  szApp, r->uri,
NULL);
             r->handler = "proxy-server";
             r->proxyreq = PROXYREQ_REVERSE;
             r->filename=pNewURL;
     }
and it works ok for me.