<div class="gmail_quote">On Fri, Apr 24, 2009 at 2:22 PM, Tomas Doran <span dir="ltr"><<a href="mailto:bobtfish@bobtfish.net">bobtfish@bobtfish.net</a>></span> wrote:<br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<div><div></div><div class="h5"><br>
On 24 Apr 2009, at 22:10, <a href="mailto:seasprocket@gmail.com" target="_blank">seasprocket@gmail.com</a> wrote:<br>
<br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
The expected behavior (for me) is that secure() returns true if the connection is secured via SSL.<br>
<br>
Looking at Engine::CGI, it appears that it only returns true if $ENV{HTTPS} eq 'ON' or if you're on Port 443.<br>
<br>
Furthermore, if secure fails because you're on a non-standard port and HTTPS is not set, then base returns the wrong base (http instead of https).<br>
<br>
I am just really confused or is this desired behavior?<br>
</blockquote>
<br></div></div>
Neither of the above.<br>
<br>
It's a bit too simple.<br>
<br>
Please illustrate your use case and how the current behavior doesn't work for you, so we can work out what to do to instead / as well.<br>
<br>
</blockquote></div><br>I am running mod_perl/Apache 2.0 and serving SSL on a non-standard port via a VirtualHost. I thought my apache setup was vanilla, but perhaps not -- I am no apache expert. It seems surprising to have to set an ENV variable in order for $c->request->base to work correctly...<br>
<br>cheers,.<br><br>Phil<br><br>If it's useful, here's my setup:<br><br><VirtualHost xx.xx.xx.xxx:444><br> SSLEngine on<br> ServerName <a href="http://dev.myserver.org">dev.myserver.org</a><br> DocumentRoot /web/myroot<br>
Redirect /pub <a href="http://dev.myserver.org:8080/pub">http://dev.myserver.org:8080/pub</a><br><br> # enable SSL:<br> SSLEngine on<br> SSLCipherSuite ALL:!ADH:!EXPORT56:RC4+RSA:+HIGH:+MEDIUM:+LOW:+SSLv2:+EXP:+eNULL<br>
SSLCertificateFile "my.crt"<br> SSLCertificateKeyFile "my.key"<br><br> <Location /><br> SetHandler modperl<br> PerlResponseHandler BCDB<br> </Location><br> <LocationMatch "(/static|favicon.ico)"><br>
SetHandler default-handler<br> </LocationMatch><br></VirtualHost><br><br><br><br><br><br><br clear="all"><br>-- <br>==========================<br>2People citizen's network for climate action: <a href="http://www.2people.org">http://www.2people.org</a><br>
<br>Greater Seattle Climate Dialogues: <a href="http://www.climatedialogues.org">http://www.climatedialogues.org</a><br>The Great Warming coalition<br>==========================<br>