If HTTPS do this else do that

[loneguard]

I have searched this forum, but found nothing. I've search the web and found only elaborate scripts that would check the status of HTTPS and execute some javascript. I have two versions of my StatCounter statistics javascript. One executes if the page is HTTPS, the other if the page is HTTP. They're both invisible and they both sit on my home.tpl page.
It's so very simple in Smarty-->PHP:

{if $smarty.server.HTTPS eq "on"}
do this
{else}
do that
{/if}

How would I do that in cgi - something I could put, perhaps, in footer.shtml?

[Sparky]

How would I do that in cgi - something I could put, perhaps, in footer.shtml?

Your statement is somewhat contradictory.  CGI/PERL is on the server.  Anything in the footer is client-side on the browser like Javascript.

There are a few ways to do what you want...


Javascript

In your header file, in one of your Javascripts, you can set a Javascript variable with an SSI call.  You'll only need the single line in blue if you put it inside an existing JS.  SSI will either work on your server or it won't... just try it.

<script language="JavaScript"><!--
portSSL = "<!--#echo var="SERVER_PORT" -->";
//-->
</script>

The port will be either 443 (https) or 80 (http).   That "portSSL" variable will be just the number 80 or 443.

Then in your footer, you can run your if/then logic using Javascript.


ALTERNATELY....

PERL

You can write your own CGI/PERL script or modify one of the TTX modules.

Just reference the server environment variable directly within the PERL program.

$ENV{SERVER_PORT};

Then run your if/then login within the PERL


OR ALTERNATELY AGAIN...

PERL/Javascript combo

You could use some combination of the two by passing variables between the CGI/PERL on the server and the Javascript in the browser.  Using SSI to call the function maybe and macros to pass some variables back into the Javascript.


And depending on what your IF/THEN is supposed to do:

You could just edit the .htaccess file (Unix) on the server to do all sorts of neat re-direct tricks depending on the URL.  Unfortunately it ignores the port number as far as I know BUT if you're on a shared SSL certificate, your entire URL will be different anyway.

[loneguard]

My statement is contradictory because I don't know what I'm talking about. Hence, 'newbie' moniker 
I'm not on a shared SSL, but I like the Javascript solution and I think I'll try that.
Thank you Sparky.

[Sparky]

SSI is easy if you're on a Unix/Linux Apache server.  Generally, it can only be called from a .shtml page but you can change that in your .htaccess file.

I run into problems with SSI when pages are dynamically generated from within another script.  Example:  If hypothetical shopping cart pages are put together on the fly from a database combined with HTML templates, then SSI is not going to work.

[loneguard]

Yes, my html pages are made on the fly, but obviously not the newticket.html page.
I'm getting some 'code corrupt' messages. I think it has to do with the fact that my javascript is a two-piece code:

<!-- Start of StatCounter Code -->
<script type="text/javascript" language="javascript">
var sc_project=xxxxxx;
var sc_invisible=1;
var sc_partition=0;
var sc_security="xxxxxxxx";
var sc_https=1;
</script>
<script type="text/javascript" language="javascript" src="https://secure.statcounter.com/counter/counter.js"></script><noscript><a href="http://www.statcounter.com/" target="_blank"><img  src="https://c1.statcounter.com/counter.php?sc_project=xxxxxxx&amp;java=0&amp;security=xxxxxxx&amp;invisible=1" alt="Aquasana Canada Web Traffic" border="0"></a> </noscript>
<!-- End of StatCounter Code -->

and I'm not sure where to close the brace. 

if (portSSL == "443") {

[loneguard]

I'm being called away - Thanksgiving obligations....

[Sparky]

Yes, my html pages are made on the fly, but obviously not the newticket.html page.

Of course it is...  newticket.html is only a template.

TTX dynamically puts those pages together on the fly...  header.shtml + newticket.html + footer.shtml + all the macros are filled in.

You can easily create a new TTX macro for the port though.

Pick someplace good in TTXTicket.pm...

my $port = $ENV{SERVER_PORT};
$data->{THE_PORT} = $port;

Then inside a Javascript in your newticket.html template...

portSSL = "(%THE_PORT%)";

and I'm not sure where to close the brace. 

if (portSSL == "443") {

You close it after you execute the IF

if (portSSL == "443") {
  // all your javascript that gets executed if the port is secure.
} else {
  // all your javascript that gets executed if the port is not secure.
}

[loneguard]

When I tried putting the javascript in my footer.html page, I got errors, probably because I was treating it as a static page.
Let me try to put it in TTXticket.pm and see what happens.

[Sparky]

When I tried putting the javascript in my footer.html page, I got errors, probably because I was treating it as a static page.
Let me try to put it in TTXticket.pm and see what happens.

someplace in the "ticket" subroutine would be best.

[loneguard]

That's where I put it, and got this:

Fatal Error: Unable to load module TTXTicket

Global symbol "$data" requires explicit package name at /home/aquasana/public_html/cgi-bin/TTXTicket.pm line 582. Compilation failed in require at (eval 12) line 2. BEGIN failed--compilation aborted at (eval 12) line 2.

SD:/home/aquasana/public_html/cgi-bin

[Sparky]

exactly where?


I'd put it here...

sub ticket {
  my ($cfg, $query, $data) = @_;
  checkgroups($cfg);
  TTXCommon::tickedvars($cfg, $data);

  my $port = $ENV{SERVER_PORT};
  $data->{THE_PORT} = $port;

[loneguard]

sub ticket {
 
  my $port = $ENV{SERVER_PORT};
  $data->{THE_PORT} = $port; 

  my ($cfg, $query, $data) = @_;
  checkgroups($cfg);
  TTXCommon::tickedvars($cfg, $data);

[loneguard]

I think it would be prudent to leave this until my web traffic drops, perhaps tonight.
It's a live e-commerce site, after all.
Will you be here around 10-11pm EDT?

[loneguard]

Your place is better. No error.

[Sparky]

sub ticket {
 
  my $port = $ENV{SERVER_PORT};
  $data->{THE_PORT} = $port; 

  my ($cfg, $query, $data) = @_;
  checkgroups($cfg);
  TTXCommon::tickedvars($cfg, $data);

$data variable has to be defined first so make changes as per my previous post.