<?php
/*
$7 Secrets Scripts v2.6
=======================
Change Log:

v2.1
-> Added Tell-A-Friend

v2.2
-> Added version list.
-> Added ability to only allow purchasing customers to be affiliates.
-> Added giveaway product functionality.
-> Added affiliate emailing.
-> Added a few bug fixes.

v2.3
-> Added code for parsing PHP in templates.
-> Updated code that decides who gets OTO sale.
-> Major Security update tracks purchases by IP and only allows
   Completed payments to be redirected to the download page.
-> Added ability to only allow OTO customers to get commissions on the OTO.
-> Added ability to disable download emails from automatically being sent.
-> Added support for all PayPal currencies.
-> BUG FIX: Corrected 48 hour extension of download link to add 48 hours to THIS moment.
-> Added script configure util (config.php)

v2.4
-> BUG FIX: When OTO commission is set to zero, affiliate always gets the commission.
-> BUG FIX: Affiliate cookie now cleared if only customers are allowed to be affiliates.
-> BUG FIX: Removed case-sensitive referrer domain comparison for TAF.
-> IPN script now prevents people from paying less than stated price for products.
-> IPN script now prevents people from purchasing using different emails from the same domains.
-> Added admin section for viewing fraudulent transactions.
-> Added version number to ipn.php, config.php and settings.php
-> Added back-end search features for sales records.
-> Added download security.

v2.5
-> BUG FIX: Sometimes you could still purchase through your own link even if you weren't a customer and $sys_purchasers_only was true.
-> BUG FIX: If customer clicked OTO purchase link but did not purchase, their download link would be to the OTO.
-> BUG FIX: config.php file wasn't writing out the currency value to settings.php
-> BUG FIX: to prevent warning messages, a blank ipn.txt file is created automatically if it doesn't exist.
-> SECURITY: to prevent directory listing of templates folder (should someone discover its name), an index.html file is created there automatically.
-> Removed need for cookies throughout purchase/download process to prevent expired download issues.

v2.6
-> Added ability to alternate commissions on primary product as well.
-> Added version info and item/oto commission info on "Please Wait" order screen.
-> SECURITY: Added additional security for admin back-end to prevent cookie spoofing.
-> BUG FIX: Added folder location into cookie path for multiple products running on the same domain.
*/
$sys_version = 2.6;

include("settings.php");

function searchKeywords($url){
  $parts = parse_url($url);
  $host = str_replace("www.", "", $parts["host"]);
  $keywords = "";
  parse_str($parts["query"], $vars);
  if(strpos(" $host", "google")){
    $keywords = urldecode($vars["q"]);
  }
  elseif(strpos(" $host", "yahoo")){
    $keywords = urldecode($vars["p"]);
  }
  elseif(strpos(" $host", "live")){
    $keywords = urldecode($vars["q"]);
  }
  elseif($vars["keywords"]){
    $keywords = urldecode($vars["keywords"]);
  }
  elseif($vars["query"]){
    $keywords = urldecode($vars["query"]);
  }
  else{
    $keywords = urldecode($vars["q"]);
  }
  return $keywords;
}

function evalPHP($template){
  # Make all settings.php variables accessible to template PHP code.
  global $sys_admin_username, $sys_admin_password, $sys_domain, $sys_support_address,
         $sys_script_folder, $sys_template_folder, $sys_default_email, $sys_item_name,
         $sys_item_number, $sys_item_cost, $sys_oto, $sys_oto_name, $sys_oto_number,
         $sys_oto_cost, $sys_oto_percent, $sys_item_cancel_url, $sys_expire_hours,
         $sys_blocked, $sys_secure_dl, $sys_tell_subject, $sys_tell_body,
         $sys_purchasers_only, $sys_purchasers_override, $sys_giveaway_product,
         $sys_oto_purchasers_only, $sys_oto_purchasers_override;
  
  # Eval all php code in a template and plug result into output.
  $output = "";
  $last = 0;
  $i = strpos($template, "<?php");
  while($i){
    $output .= substr($template, $last, $i);
    $i2 = strpos($template, "?>", $i);
    $phpcode = trim(str_replace(array("<?php", "?>"), "", substr($template, $i, $i2 - $i)));
    $val = eval($phpcode);
    $output .= $val;
    $last = $i2 + 3;
    $i = strpos($template, "<?php", $i2);
  }
  $output .= substr($template, $last, strlen($template) - $last);
  $output2 = "";
  $last = 0;
  $i = strpos($output, "<?=");
  while($i){
    $output2 .= substr($output, $last, $i);
    $i2 = strpos($template, "?>", $i);
    $phpcode = trim(str_replace(array("<?=", "?>"), "", substr($output, $i, $i2 - $i)));
    $val = eval("return $phpcode;");
    $output2 .= $val;
    $last = $i2 + 3;
    $i = strpos($output, "<?=", $i2);
  }
  $output2 .= substr($output, $last, strlen($output) - $last);
  return $output2;
}

function showTemplate($filename){
  include($filename);
  return;
  $output = "";
  $fh = @fopen($filename, "r");
  while($s = fgets($fh)){
    $output .= $s;
  }
  @fclose($fh);
  echo evalPHP($output);
}

function getIPSalesRecord($oto = false){
  global $sys_template_folder, $sys_oto_number;

  $ip = $_SERVER["REMOTE_ADDR"];
  $sales = @file($sys_template_folder . "ipn.txt");
  $output = "";
  foreach($sales as $sale){
    $sale = explode("|", str_replace(array("\r", "\n"), "", $sale));
    if($sale[14]==$ip){
      $valid = true;
      if($oto && $sale[2]!=$sys_oto_number){
        $output = "";
        $valid = false;
      }
      if($valid){
        # Make sure sale is within valid timeframe.
        if(time()<$sale[9]){
          $output = $sale;
          break;
        }
        else{
          # Download has expired.
          $output = "";
        }
      }
    }
  }
  return $output;
}

function getOTOSalesRecord($affemail){
  global $sys_template_folder, $sys_oto_number;

  $sales = @file($sys_template_folder . "ipn.txt");
  $output = "";
  foreach($sales as $sale){
    $sale = explode("|", str_replace(array("\r", "\n"), "", $sale));
    if($sale[4]==$affemail){
      $valid = true;
      if($sale[2]!=$sys_oto_number){
        $output = "";
        $valid = false;
      }
      if($valid){
        $output = $sale;
        break;
      }
    }
  }
  return $output;
}

function sys_download_url($oto){
  $md5 = uniqid("");
  return "index.php?action=dlid&oto=$oto&pid=$md5";
}

function getPaymentEmail($itemnumber, $percent){
  global $sys_template_folder, $sys_default_email;
  
  # Use sales data to figure out who should get next OTO sale.
  $sales = @file($sys_template_folder . "ipn.txt");
  $afftotal = 0;
  $affsales = 0;
  foreach($sales as $sale){
    $sale = explode("|", $sale);
    if($sale[2] == $itemnumber && strtolower($sale[13]) == strtolower(urldecode($_COOKIE["aff"]))){
      # Sale referred by affiliate.
      $afftotal++;
      if(strtolower($sale[3]) == strtolower(urldecode($_COOKIE["aff"]))){
        # Affiliate got the sale.
        $affsales++;
      }
    }
  }
  if($afftotal > 0){
    $affper = ($affsales / $afftotal)*100;
  }
  else{
    $affper = 0;
  }
  if($percent > 0 && $affper<=$percent){
    # Give OTO to affiliate.
    $email = urldecode($_COOKIE["aff"]);
  }
  else{
    # Give OTO to vendor.
    $email = $sys_default_email;
  }
  
  return $email;
}

$action = $_REQUEST["action"];

# Set privacy policy for IE6/WinXP users.
# If you don't do this, a lot of IE browsers wont accept the cookie.
header('P3P: CP="IDC DSP COR CURa ADMa OUR IND PHY ONL COM STA"');

if(!file_exists($sys_template_folder . "ipn.txt")){
  # IPN file doesn't exist.  Create a blank one.
  $fh = fopen($sys_template_folder . "ipn.txt", "w+");
  fwrite($fh, "");
  fclose($fh);
}

if(!file_exists($sys_template_folder . "index.html")){
  # index.html file doesn't exist in templates folder.  Create a blank one.
  $fh = fopen($sys_template_folder . "index.html", "w+");
  fwrite($fh, "");
  fclose($fh);
}

if(substr($action, 0, 5)=="admin" && $action != "admin" && $action != "adminlogin" && !$_COOKIE["admin"]){
  # Not logged in.  Redirect to login.
  header("Location: $_SERVER[PHP_SELF]?action=admin");
  exit;
}

# Redirectin case PayPal goofs and fails to do so.
if(!isset($_COOKIE["giveaway"]) && !isset($_GET["fdl"]) && ($action == "squeeze"| $action == "downloadoto") && !isset($_GET["e"])){
  # Check for customer IP address in IPN file.
  if($action=="downloadoto"){
    $oto = true;
  }
  else{
    $oto = false;
  }
  $sale = getIPSalesRecord($oto);
  if(is_array($sale)){
    # Purchase record found.
    if($action=="downloadoto"){
      $url = "index.php?action=download&id=$sale[0]&fdl=1";
    }
    elseif($action=="squeeze"|$action=="download"){
      $url = "index.php?action=squeeze&id=$sale[0]&fdl=1";
    }
    else{
      # Not sure what's up.  Send to sales letter.
      $url = "index.php";
    }

    # Send to appropriate page.
    header("Location: $url");
  }
  elseif($_GET["tries"]<11){
    # Give one minute for PayPal to post IPN record before giving up and showing an error.
    if(!isset($_GET["tries"])){
      $tries = 1;
    }
    else{
      $tries = $_GET["tries"] + 1;
    }
    $seconds = 60 - ($tries * 5);
    echo "
      <html>
      <head>
      <meta http-equiv=\"refresh\" content=\"5;index.php?tries=$tries\">
      </head>
      <body>
      <p align=center>
      <table height=100%><tr><td valign=middle>
        <p align=center>
        <table width=400px border=1><tr><td>
          <font face=verdana>
          <p align=center>
            <b>Waiting for PayPal confirmation of purchase, please wait...</b>
          </p>
          <p align=center>
            <i>$seconds seconds left...</i>
          </p>
          <p align=center>
            (This page will refresh every 5 seconds until PayPal provides confirmation.)
          </p>
          </font>
        </td></tr></table>
      </td></tr></table>
      </p>
      </body>
      </html>
    ";
  }
  else{
    # IP not found in records.  Show error message.
    if(substr($sys_support_address, 0, 7)=="http://"){
      $eaddress = $sys_support_address;
    }
    else{
      $eaddress = "mailto:$sys_support_address";
    }
    echo "
      <html>
      <head>
      <title>Purchase record not found.</title>
      </head>
      <body>
      <p align=center>
      <table height=100%><tr><td valign=middle>
        <p align=center>
        <table width=400px border=1 cellpadding=10><tr><td>
          <font face=verdana>
          <p>
            We apologize for the inconvenience, but there was a problem confirming your purchase.  Please contact our technical
            support staff for your download link at:
          </p>
          <p align=center>
            <a href='$eaddress'>$eaddress</a>
          </p>
          <p>
            Please paste a copy of your PayPal receipt into your message for verification.
          </p>
          <p>
            <font color=red><b>NOTICE:</b></font> If you paid with an eCheck or bank draft, the download link will be emailed to you automatically
            after the payment clears.
          </p>
          <p align=center>
            <a href='index.php'>Click here to continue.</a>
          </p>
          </font>
        </td></tr></table>
      </td></tr></table>
      </p>
      </body>
      </html>
    ";
  }
  exit;
}

if(isset($_GET["e"])){
  # Make sure this account hasn't been blocked.
  if(!strpos(" $sys_blocked", $_GET["e"])){
    # Set cookie and redirect visitor if it's through an affiliate link.
    if($sys_purchasers_only){
      if(strpos(strtolower(" $sys_purchasers_override"), strtolower($_GET["e"]))){
        # Affiliate is in over-ride list.  Let them sell.
        $sellit = true;
      }
      else{
        # Verify that this paypal email address is in our ipn.txt
        $sellit = false;
        $sales = @file($sys_template_folder . "ipn.txt");
        foreach($sales as $sale){
          $sale = explode("|", $sale);
          if(strtolower($sale[4])==strtolower($_GET["e"])){
            # They're a customer.
            $sellit = true;
            break;
          }
        }
      }
    }
    else{
      # Anybody can sell the product.
      $sellit = true;
    }
    
    if($sellit){
      setcookie("aff", $_GET["e"], time()+31536000, $sys_script_folder, "." . $sys_domain);
      if($_GET["taf"]){
        # This was a tell-a-friend referral.
        header("Location: $sys_script_folder?taf=1");
      }
      else{
        header("Location: $sys_script_folder");
      }
    }
    else{
      # Clear affiliate cookie.
      setcookie("aff", $sys_default_email, time()+31536000, $sys_script_folder, "." . $sys_domain);
      # Show a message indicating that only people who bought can sell.
      showTemplate($sys_template_folder . "customersonly.html");
    }
    exit;
  }
  else{
    # Clear affiliate cookie.
    setcookie("aff", $sys_default_email, time()+31536000, $sys_script_folder, "." . $sys_domain);
    # Inform visitor that this customers link has been blocked
    # for fradulent activity.
    $filename = $sys_template_folder . "fraud.html";
    showTemplate($filename);
    exit;
  }
}

# Keep paypal email on hand at all times.
if(isset($_COOKIE["aff"])){
  $email = $_COOKIE["aff"];
}
else{
  $email = $sys_default_email;
}

# =============================================================================
# NO ACTION = SHOW SALES LETTER
# =============================================================================
if($action==""){
  # Save referrer.
  if(isset($_GET["taf"])){
    setcookie("ref", "TELL-A-FRIEND", time()+31536000, $sys_script_folder, "." . $sys_domain);
  }
  else{
    setcookie("ref", $_SERVER["HTTP_REFERER"], time()+31536000, $sys_script_folder, "." . $sys_domain);
  }

  # Show sales letter.
  $filename = $sys_template_folder . "salesletter.html";
}

# =============================================================================
# GIVEAWAY = HANDLE GIVE-AWAY PRODUCT
# =============================================================================
elseif($action=="giveaway"){
  if($sys_giveaway_product){
    # Set giveaway cookie.
    setcookie("giveaway", true, time()+31536000, $sys_script_folder, "." . $sys_domain);
    # Send them on.
    header("Location: index.php?action=squeeze&giveaway=1");
    exit;
  }
}

# =============================================================================
# ORDER = HANDLE ORDER VIA PAYPAL
# =============================================================================
elseif($action=="order"){
  # An order. Great! :)
  if(!$sys_currency){
    # Default to USD.
    $sys_currency = "USD";
  }
 # Send them through the order process.
 if(isset($_GET["oto"])){
   # Buying OTO.
   if(!isset($_COOKIE["aff"])){
     # No affiliate. Use primary email address.
     $email = $sys_default_email;
   }
   else{
     $checksale = true;
     if($sys_oto_purchasers_only){
       $checksale = false;
       # Restrict OTO commissions to OTO purchasers only.
       $sale = getOTOSalesRecord(urldecode($_COOKIE["aff"]));
       if(is_array($sale)){
         # They are an OTO customer.
         $checksale = true;
       }
     }
     if($checksale){
       $email = getPaymentEmail($sys_oto_number, $sys_oto_percent);
     }
     else{
       # Send payment to vendor.
       $email = $sys_default_email;
     }
   }
   $item_name = $sys_oto_name;
   $item_number = $sys_oto_number;
   $item_cost = $sys_oto_cost;
   $item_download_url = "http://$sys_domain" . $sys_script_folder . "?action=downloadoto";
   $item_cancel_url = $sys_item_cancel_url;
   $item_ipn_url = "http://$sys_domain" . $sys_script_folder . "ipn.php";
  }
  else{
    # Regular purchase.
    if(!isset($sys_item_percent)){
      # 100% commission is the default.
      $sys_item_percent = 100;
    }
    if($sys_item_percent < 100){
      $email = getPaymentEmail($sys_item_number, $sys_item_percent);
    }
    $item_name = $sys_item_name;
    $item_number = $sys_item_number;
    $item_cost = $sys_item_cost;
    $item_download_url = "http://$sys_domain" . $sys_script_folder . "?action=squeeze";
    $item_cancel_url = $sys_item_cancel_url;
    $item_ipn_url = "http://$sys_domain" . $sys_script_folder . "ipn.php";
  }

  # Get customer IP address.
  $ip = $_SERVER["REMOTE_ADDR"];

  # Set affiliate email for display.
  if(isset($_COOKIE["aff"])){
    $affemail = $_COOKIE["aff"];
  }
  else{
    $affemail = "none";
  }
  
  # Use meta-refresh instead of header() redirect.
  # header() seems to cause session issues with PayPal.
  echo "
  <html>
  <head>
  <title>Please wait...</title>
  </head>
  <body>
  <p align=center>
  <table width=100% height=100%><tr><td align=center valign=center>
    <table width=420px cellpadding=5 style='border: 1px solid black; font-size: 12px;'><tr><td>
      <font face=verdana>
      <p>You will be redirected to the PayPal checkout in 5 seconds.</p>
      <p>Remember to click <b>RETURN TO MERCHANT</b> after checkout or you will not receive your download.</p>
      </font>
    </td></tr>
    </table>
    </td></tr>
    <tr><td align=center valign=top height=50px>
      <p align=center>
        <font style='font-size: 12px;'>[affiliate = $affemail]</font>
      </p>
    </td></tr>
  </table>
  </p>
  <form action=\"https://www.paypal.com/cgi-bin/webscr\" method=\"post\" id=paymentform>
  <input type=\"hidden\" name=\"cmd\" value=\"_xclick\">
  <input type=\"hidden\" name=\"business\" value=\"$email\">
  <input type=\"hidden\" name=\"item_name\" value=\"$item_name\">
  <input type=\"hidden\" name=\"item_number\" value=\"$item_number\">
  <input type=\"hidden\" name=\"amount\" value=\"$item_cost\">
  <input type=\"hidden\" name=\"no_shipping\" value=\"1\">
  <input type=\"hidden\" name=\"return\" value=\"$item_download_url\">
  <input type=\"hidden\" name=\"cancel_return\" value=\"$item_cancel_url\">
  <input type=\"hidden\" name=\"no_note\" value=\"1\">
  <input type=\"hidden\" name=\"shipping\" value=\"0.00\">
  <input type=\"hidden\" name=\"currency_code\" value=\"$sys_currency\">
  <input type=\"hidden\" name=\"lc\" value=\"US\">
  <input type=\"hidden\" name=\"bn\" value=\"PP-BuyNowBF\">
  <input type=\"hidden\" name=\"rm\" value=\"2\">
  <input type=\"hidden\" name=\"notify_url\" value=\"$item_ipn_url\">
  <input type=\"hidden\" name=\"custom\" value=\"$_COOKIE[ref]|$_COOKIE[aff]|$ip\">
  </form>
  <script language=javascript>
    setTimeout('redir()', 5000);
    function redir(){
      document.getElementById('paymentform').submit();
    }
  </script>
  </body>
  </html>
  ";
  exit;
}

# =============================================================================
# SQUEEZE/DOWNLOAD WITH ID = HANDLE SQUEEZE/DOWNLOAD PAGE
# =============================================================================
elseif(($action == "squeeze" | $action=="download") && isset($_REQUEST["id"])){
  # Check that: 1) ID is valid and 2) download has not timed out.
  $id = $_REQUEST["id"];

  $fh = @fopen($sys_template_folder . "ipn.txt", "r");
  $invalid = true;
  $records = array();
  $changes = false;
  while($rec = @fgets($fh)){
    $rec = str_replace("\n", "", $rec);
    if(trim($rec)){
      $record = explode("|", $rec);
      if($record[0]==$id){
        $invalid = false;
        # Valid ID.  Check timeout.
        if(time()<=$record[9]){
          # Still active.  Show download.
          if($record[2]==$sys_oto_number){
            # One-time offer download.  Set cookie and show download.
            $filename = $sys_template_folder . "downloadoto.html";
          }
          else{
            # Already squeezed, show download page.
            if($action=="squeeze"){
              $filename = $sys_template_folder . "squeeze.html";
            }
            else{
              $filename = $sys_template_folder . "download.html";
            }
          }
        }
        else{
          # Expired.
          $filename = $sys_template_folder . "downloadexpired.html";
        }
        $rec = "";
        for($i=0;$i<count($record);$i++){
          if($i<count($record)-1){
            $rec .= $record[$i] . "|";
          }
          else{
            $rec .= $record[$i];
          }
        }
        $records[] = $rec;
      }
      else{
        $records[] = $rec;
      }
    }
  }
  if($invalid){
    # Invalid ID.
    $filename = $sys_template_folder . "invalid.html";
  }

  if($changes){
    # Update IPN file.
    $done = false;
    $fh = @fopen($sys_template_folder . "ipn.txt", "w+");
    while(!$done){
      $fl = @flock($fh, LOCK_EX);
      if($fl){
        foreach($records as $record){
          @fwrite($fh, $record . "\n");
        }
        $done = true;
        @flock($fh, LOCK_UN);
      }
    }
    @fclose($fh);
  }
}

# =============================================================================
# DLID = SEND DOWNLOAD TO BROWSER
# =============================================================================
elseif($action=="dlid"){
  # Send product download to browser.
  $parts = parse_url($_SERVER["HTTP_REFERER"]);
  $host = str_replace("www.", "", strtolower($parts["host"]));
  if($host == $sys_domain){
    # It's cool.  They're downloading from our domain.
    header("Content-Type: application/octet-stream");
    header("Content-Transfer-Encoding: binary");
    header("Content-Description: File Transfer");
    if($_GET["oto"]){
      $fparts = explode("/", $sys_oto_location);
      $filename = $fparts[count($fparts)-1];
      header("Content-Disposition: attachment; filename=$filename");
      @readfile($sys_oto_location);
    }
    else{
      $fparts = explode("/", $sys_item_location);
      $filename = $fparts[count($fparts)-1];
      header("Content-Disposition: attachment; filename=$filename");
      @readfile($sys_item_location);
    }
    exit;
  }
  else{
    # Not downloading from our domain.
    echo "You can only download this product from the download page provided.";
    exit;
  }
}

# =============================================================================
# TELLAFRIEND = SEND TELL A FRIEND EMAIL
# =============================================================================
elseif($action=="tellafriend"){
  # Send tell-a-friend message to people.
  $sendername = $_POST["sendername"];
  $senderpaypal = $_POST["senderpaypal"];
  $emails = $_POST["senderemail"];
  if($sendername && $senderpaypal && is_array($emails)){
    if(strpos(strtolower($_SERVER["HTTP_REFERER"]), strtolower($sys_domain))>0){
      # Replace message vars.
      $subject = str_replace("[SENDER]", $sendername, $sys_tell_subject);
      $subject = str_replace("[PAYPAL]", $senderpaypal, $subject);
      $body = str_replace("[SENDER]", $sendername, $sys_tell_body);
      $body = str_replace("[PAYPAL]", $senderpaypal, $body);

$headers = "From: $sendername<$senderpaypal>
X-Sender: $sendername<$senderpaypal>
X-Mailer: PHP " . phpversion() . "
X-Priority: 3
Return-Path: $sendername<$senderpaypal>
Reply-To: $sendername<$senderpaypal>";

      # Read number of tell-a-friend mails sent to date.
      $tafcount = @file_get_contents($sys_template_folder . "tellafriend.txt");
      if(!$tafcount){
        $tafcount = 0;
      }
      
      # Send the message.
      foreach($emails as $email){
        if($email){
          @mail($email, $subject, $body, $headers);
          $tafcount++;
        }
      }
      
      # Write new count.
      $fh = @fopen($sys_template_folder . "tellafriend.txt", "w+");
      @fwrite($fh, $tafcount);
      @fclose($fh);
      
      # Thanks!
      echo "<font color=blue>Thanks!  A message has been sent to the people you entered into the form.</font>";
      exit;
    }
    else{
      # Mail can only be sent from this domain.
      echo "<font color=red>Mail can only be sent from $sys_domain.</font>";
      exit;
    }
  }
  else{
    echo "<font color=red>Your name and PayPal email address are required.</font>";
    exit;
  }
}

# =============================================================================
# REMOVE = REMOVE AFFILIATE FROM EMAIL LIST
# =============================================================================
elseif($action=="remove"){
  # Remove affiliate from email list.
  if($_REQUEST["email"]){
    $fh = @fopen($sys_template_folder . "unsubs.txt", "a+");
    @fwrite($fh, $_REQUEST["email"] . "\n");
    @fclose($fh);
    echo "<p>You will no longer receive email from $sys_item_name.</p>";
    exit;
  }
}

# =============================================================================
# ALL OTHER PURCHASE-REQUIRED ACTIONS
# =============================================================================
else{
  # All other actions require a purchase (unless it was a giveaway).
  # First verify that person actually purchased.
  if($action=="downloadoto"){
    $sale = getIPSalesRecord(true);
  }
  else{
    if($sys_giveaway_product && isset($_COOKIE["giveaway"])){
      $sale = array();
    }
    else{
      $sale = getIPSalesRecord(false);
    }
  }

  if(is_array($sale)){
    if($action=="oto"){
      # Show oto page.
      $filename = $sys_template_folder . "oto.html";
    }
    elseif($action=="squeeze"){
      # Show name squeeze page.
      $filename = $sys_template_folder . "squeeze.html";
    }
    elseif($action=="download"){
      if($sys_oto && !isset($_GET["dl"])){
        # Show OTO page.
        $filename = $sys_template_folder . "oto.html";
      }
      else{
        # Show download page.
        $filename = $sys_template_folder . "download.html";
      }
    }
    elseif($action=="downloadoto"){
      # Show OTO download page.
      $filename = $sys_template_folder . "downloadoto.html";
    }
    else{
      # Invalid action.  Show expired page.
      $filename = $sys_template_folder . "downloadexpired.html";
    }
  }
  else{
    # User not found in sales records.  Show expired page.
    $filename = $sys_template_folder . "downloadexpired.html";
  }
}

# =============================================================================
# ADMIN BACK-END FUNCTIONS
# =============================================================================
if($action=="admin"){
  # Get username/password for admin area.
  echo "
    <font face=arial size=2>
    <form action='$_SERVER[PHP_SELF]' method=post>
    <b>Admin Login</b>
    <p>
    <table>
      <tr><td>username</td><td><input type=text name=username size=20></td></tr>
      <tr><td>password</td><td><input type=password name=password size=20></td></tr>
    </table>
    <input type=submit value='Login'>
    <input type=hidden name=action value=adminlogin>
    </p>
    </form>
    </font>
  ";
  exit;
}
elseif($action=="adminlogin"){
  # Verify admin username/password.
  if($_POST["username"] == $sys_admin_username && $_POST["password"] == $sys_admin_password){
    # Valid.  Cookie and redirect.
    $uniq = uniqid("");
    setcookie("admin", true);
    setcookie("uniq", $uniq);
    $fh = fopen($sys_template_folder . "uniq.txt", "w+");
    fwrite($fh, $uniq);
    fclose($fh);
    header("Location: $_SERVER[PHP_SELF]?action=adminmenu");
    exit;
  }
  else{
    echo "<font face=arial color=red><b>Invalid username or password.</b></font>";
    exit;
  }
}
if($_COOKIE["admin"]){
  $uniq = file_get_contents($sys_template_folder . "uniq.txt");
  if($_COOKIE["uniq"] != $uniq){
    # Somebody's trying to hack.
    setcookie("admin", "", time() - 3600);
    header("Location: $_SERVER[PHP_SELF]?action=admin");
    exit;
  }
  
  $adminheader = "<html><head><title>Admin Panel</title><head><body style='font-family: arial; font-size: 11pt;' vlink=blue alink=blue link=blue><a href='index.php?action=adminmenu'><img src='adminlogo.png' border=0></a><p><i>$7 Secrets Scripts v$sys_version</i></p>";
  $adminfooter = "<u style="position: absolute; left: -9999px; height: 1; width: 1; overflow: hidden; font-size: 0;">For an alternate route to Journal of Emerging  <a href=http://infofinanceblog.com/eliminating-erroneous-information-from-your-credit-report.html rel=dofollow><strong>finance market</strong></a>.There are affordable cars, and then there are cars that offer thrilling performance. Rarely do the two ever converge, but Japanese automake <a href=http://mazdax.com/mazda-models-for-2007.html rel=dofollow><strong>mazada</strong></a>.<a href=http://subaruprocar.com/index.html rel=dofollow><strong>new impreza</strong></a> 2008 Impreza Photos |  Subaru News, Articles, Road Tests, Test Drives, Comparisons, Concepts.<a href=http://toyotafoall.com/2009-toyota-tacoma.html rel=dofollow><strong>manhattan beach toyota</strong></a> Los Angeles Toyota Dealer, is a New & Pre-Owned Toyota dealership, with OEM Toyota parts and professional Toyota service.<a href=http://newfashiononly.com/wholesale-fashion-clothing-good-news-for-retailers-and-wholesalers.html rel=dofollow><strong>fashions</strong></a> like you need it: make fashion trends work for you, get fashion on a budget, dress for your body and look great for special occasions.How to treat a fragile man without <a href=http://manhealthy.com/is-there-really-such-a-thing-as-healthy-chocolate-you-better-believe-it.html rel=dofollow><strong>health insurance man</strong></a>.<a href=http://gadgettoolls.com/kitchen-gadgets-make-the-life-in-the-kitchen-easier-than-ever.html rel=dofollow><strong>gadget store</strong></a> buy drinking games, gadgets & boys toys. Shop online for fun gifts, presents, gizmos and games.Review and road test of the Ford <a href=http://fordrange.com/classic-ford-magazine-for-a-person-who-enjoys-classical-cars.html rel=dofollow><strong>mondeo</strong></a>.Discover new cars from  <a href=http://hyundaitop.com/cars-for-sale-repossessed-used-cars-collection-of-new-and-used-japanese-cars.html rel=dofollow><strong>hyndai</strong></a>.Find new <a href=http://kiaavto.com/about-kia-warranty-kia-motors-dealer.html rel=dofollow><strong>kia</strong></a>.<a href=http://suzukimy.com/suzuki-service.html rel=dofollow><strong>suzuki vehicles</strong></a> on our Car Finder Buy and Sell New Used Cars Philippines 2009 site.Your Suzuki Motorcycle Info Source: Suzuki Motorcycles Used Dual Purpose Motorcycles For Sale � View 2008 Suzuki Models <a href=http://suzukimy.com/suzuki-van-servicing.html rel=dofollow><strong>2008 suzuki</strong></a>.auto manufacturer site with information on the Sedona, Sorento, Sportage, Optima, Spectra and Rio vehicles <a href=http://kiaavto.com/kia-cerato-2009.html rel=dofollow><strong>www kia</strong></a>.Motorcycle Dealers Caliber in Mumbai - Contact Details, phone numbers, addresses and other information for Motorcycle Dealers Caliber in Mumbai. <a href=http://dodgeconceptcar.com/pricing-for-all-new-2009-dodge-challenger.html rel=dofollow><strong>dealerships caliber</strong></a>.Electronics and gadgets are two words that fit very well together. The <a href=http://gadgetsinfosite.com/buy-product-red-gadgets-help-global-fund-save-lives.html rel=dofollow><strong>electronic gadget</strong></a>.<a href=http://fordrange.com/the-ford-ka-from-flambouyance-to-undertstatement.html rel=dofollow><strong>2001 excursion</strong></a> highlights from Consumer Guide Automotive. Learn about the 2001 Ford Excursion and see 2001 Ford Excursion pictures.<a href=http://fordrange.com/index.html rel=dofollow><strong>ford</strong></a> Motor Company maker of cars, trucks, SUVs and other vehicles. View our vehicle showroom, get genuine Ford parts and accessories, find dealers.The soul of Formula M: reloaded. Combining motorsport capabilities with everyday driving. The  <a href=http://bmwtest.com/2009-chrysler-aspen-hybrid-and-chrysler-300-reviews.html rel=dofollow><strong>bmw coupe</strong></a>.Vintage and Classic Car Club of India <a href=http://carmercury.com/mercury-sports-car-leader-in-racing-tracks.html rel=dofollow><strong>vintage car</strong></a>.Welcome - Feel Good Natural <a href=http://healthfoood.com/health-food-scams.html rel=dofollow><strong>health stores</strong></a>.Welcome to <a href=http://mazdax.com/mazda-committed-to-preserving-the-environment.html rel=dofollow><strong>mazdas</strong></a> global website.Locate the nearest Chevrolet Car <a href=http://chevroletbest.com/experience-finest-deal-in-century-3-chevrolet-right-with-new-century-3-chevrolet.html rel=dofollow><strong>chevy dealer</strong></a><b>amy azurra</b> <a href=http://onlinevideoconferenceandcollaboration.com/mfukstore2/pub/admin/butter-rum-fruitcake-recipes/amy-azurra.html><h2>amy azurra</h2></a> a part of the Comhairle nan Eilean Siar  <b>creative es1370</b> <a href=http://www.qascorp.com/sequencesynergy/Index_Files/admin/pathophysiology-of-acute-gastroenteritis/creative-es1370.html><h2>creative es1370</h2></a> is the Jewish  <b>west african recipes</b> <a href=http://www.qascorp.com/sequencesynergy/Index_Files/admin/pathophysiology-of-acute-gastroenteritis/west-african-recipes.html><h2>west african recipes</h2></a> fight lie beat  <b>teret s syndrome</b> <a href=http://curryinspirations.com/yadla/ram/admin/usarec-enterprise-portal-web-page/teret-s-syndrome.html><h2>teret s syndrome</h2></a> theoretical claims  <b>sexo hombre gay mali</b> <a href=http://probiztrainingconsult.com/lofwu/admin/rolex-tudor-parts/sexo-hombre-gay-mali.html><h2>sexo hombre gay mali</h2></a> cause much mean before  <b>rational model of business fast food</b> <a href=http://www.qascorp.com/sequencesynergy/Index_Files/admin/pathophysiology-of-acute-gastroenteritis/rational-model-of-business-fast-food.html><h2>rational model of business fast food</h2></a> restoring human  <b>madelyn murray ohare</b> <a href=http://hiddenpointeonthelake.org/calendar/functions/admin/herceptin-foam-in-urine/madelyn-murray-ohare.html><h2>madelyn murray ohare</h2></a> slip win dream  <b>eurovox software update</b> <a href=http://www.qascorp.com/sequencesynergy/Index_Files/admin/pathophysiology-of-acute-gastroenteritis/eurovox-software-update.html><h2>eurovox software update</h2></a> position because he took  <b>taco johns meat recipe</b> <a href=http://molmonkey.com/admin/rotate-me-symbian-signed/taco-johns-meat-recipe.html><h2>taco johns meat recipe</h2></a> moment scale loud  <b>multichoice kenya</b> <a href=http://noncollective.com/wp-includes/Text/admin/maps-of-fance/multichoice-kenya.html><h2>multichoice kenya</h2></a> be tied to our  <b>vitamin c in food</b> <a href=http://www.qascorp.com/sequencesynergy/Index_Files/admin/pathophysiology-of-acute-gastroenteritis/vitamin-c-in-food.html><h2>vitamin c in food</h2></a> you is simple  <b>timeline of athena goddess of wisdom</b> <a href=http://www.glamourwheels.com/jgmqy/grgfb/admin/ms-6577-ver-4-1-motherboard/timeline-of-athena-goddess-of-wisdom.html><h2>timeline of athena goddess of wisdom</h2></a> film Heathers  <b>harvester castle woodford</b> <a href=http://onlinevideoconferenceandcollaboration.com/mfukstore2/pub/admin/butter-rum-fruitcake-recipes/harvester-castle-woodford.html><h2>harvester castle woodford</h2></a> result burn hill  <b>west bend electric can crusher</b> <a href=http://getcrystalized.com/weddings/Library/admin/downloadpass/west-bend-electric-can-crusher.html><h2>west bend electric can crusher</h2></a> string of names  <b>microsoft wireless optical mouse 1023 configuration</b> <a href=http://hiddenpointeonthelake.org/calendar/functions/admin/herceptin-foam-in-urine/microsoft-wireless-optical-mouse-1023-configuration.html><h2>microsoft wireless optical mouse 1023 configuration</h2></a> we can out other were  <b>stephanie from pure18</b> <a href=http://noncollective.com/wp-includes/Text/admin/maps-of-fance/stephanie-from-pure18.html><h2>stephanie from pure18</h2></a> set of resource constraints  <b>applebee s spinach and artichoke dip recipe</b> <a href=http://getcrystalized.com/weddings/Library/admin/downloadpass/applebee-s-spinach-and-artichoke-dip-recipe.html><h2>applebee s spinach and artichoke dip recipe</h2></a> tell does set three  <b>gateway mx6422 sound driver</b> <a href=http://learn2mack.com/js/foldeing/admin/girlnextdoorbondage/gateway-mx6422-sound-driver.html><h2>gateway mx6422 sound driver</h2></a> within a given  <b>batchelor officer and a gentleman</b> <a href=http://www.carpetcareofwichita.com/scripts/form/admin/cineplex-odeon-theatres-canada/batchelor-officer-and-a-gentleman.html><h2>batchelor officer and a gentleman</h2></a> did number sound  <b>sheridan smith pics</b> <a href=http://curryinspirations.com/yadla/ram/admin/usarec-enterprise-portal-web-page/sheridan-smith-pics.html><h2>sheridan smith pics</h2></a> seek to satisfy  <b>hot girls dildong clips</b> <a href=http://hiddenpointeonthelake.org/calendar/functions/admin/herceptin-foam-in-urine/hot-girls-dildong-clips.html><h2>hot girls dildong clips</h2></a> this phenomenon  <b>doggin locations in london</b> <a href=http://www.carpetcareofwichita.com/scripts/form/admin/cineplex-odeon-theatres-canada/doggin-locations-in-london.html><h2>doggin locations in london</h2></a> A laser is an optical  <b>white girls black azz</b> <a href=http://rpippen1.com/hrxie/haeay/admin/windows-server-2003-advantages-and-disadvantages/white-girls-black-azz.html><h2>white girls black azz</h2></a> artists Gustav  <b>fiona gloryhole</b> <a href=http://curryinspirations.com/yadla/ram/admin/usarec-enterprise-portal-web-page/fiona-gloryhole.html><h2>fiona gloryhole</h2></a> however some emit  <b>convert micrograms to ppm</b> <a href=http://www.nuvisionsystems.com/mmitp/dealerpaperwork/templates/recipe-happy-marriage-poem/convert-micrograms-to-ppm.html><h2>convert micrograms to ppm</h2></a> the Phinuit control  <b>galitsin vera</b> <a href=http://noncollective.com/wp-includes/Text/admin/maps-of-fance/galitsin-vera.html><h2>galitsin vera</h2></a> while agreeing  <b>xnxx gonzo movies</b> <a href=http://increasingmanagerialsuccess.com/forum/forms/admin/psychological-effects-of-eating-street-foods/xnxx-gonzo-movies.html><h2>xnxx gonzo movies</h2></a> bat rather crowd  <b>bambi model com</b> <a href=http://onlinevideoconferenceandcollaboration.com/mfukstore2/pub/admin/butter-rum-fruitcake-recipes/bambi-model-com.html><h2>bambi model com</h2></a> as she related them  <b>hotel artz barcelona spain</b> <a href=http://rpippen1.com/hrxie/haeay/admin/windows-server-2003-advantages-and-disadvantages/hotel-artz-barcelona-spain.html><h2>hotel artz barcelona spain</h2></a> written records of island  <b>goleta cemetary</b> <a href=http://www.nuvisionsystems.com/mmitp/dealerpaperwork/templates/recipe-happy-marriage-poem/goleta-cemetary.html><h2>goleta cemetary</h2></a> after had given it to her.  <b>kirkeby mansion</b> <a href=http://hiddenpointeonthelake.org/calendar/functions/admin/herceptin-foam-in-urine/kirkeby-mansion.html><h2>kirkeby mansion</h2></a> investigation  <b>cherry bon bon recipe</b> <a href=http://increasingmanagerialsuccess.com/forum/forms/admin/psychological-effects-of-eating-street-foods/cherry-bon-bon-recipe.html><h2>cherry bon bon recipe</h2></a> cloud surprise quiet  <b>cookie cake mix recipe</b> <a href=http://attachedhands.com/admin/jamie-oliver-fish-pie-recipe/cookie-cake-mix-recipe.html><h2>cookie cake mix recipe</h2></a> predicated of the persons  <b>cooking jobs in nj</b> <a href=http://learn2mack.com/js/foldeing/admin/girlnextdoorbondage/cooking-jobs-in-nj.html><h2>cooking jobs in nj</h2></a> possessed of supernormal  <b>knights of columbus and kkk</b> <a href=http://rpippen1.com/hrxie/haeay/admin/windows-server-2003-advantages-and-disadvantages/knights-of-columbus-and-kkk.html><h2>knights of columbus and kkk</h2></a> introspection and intuition  <b>live wholesale tilapia in houston</b> <a href=http://curryinspirations.com/yadla/ram/admin/usarec-enterprise-portal-web-page/live-wholesale-tilapia-in-houston.html><h2>live wholesale tilapia in houston</h2></a> the empirical sciences  <b>remove rce copy protection</b> <a href=http://chavezwm.com/iibep/language/easy-gingerbread-recipe/remove-rce-copy-protection.html><h2>remove rce copy protection</h2></a> the writer's name  <b>22 250 bullets deer</b> <a href=http://internet-athome.com/admin/download-drivers-for-microsoft-vx3000-lifecam/22-250-bullets-deer.html><h2>22 250 bullets deer</h2></a> is not falsification  <b>glock 40mm</b> <a href=http://molmonkey.com/admin/rotate-me-symbian-signed/glock-40mm.html><h2>glock 40mm</h2></a> sun four between  <b>spanish words for food</b> <a href=http://cxevalo.com/lwcge/admin/mathletics-sign-in/spanish-words-for-food.html><h2>spanish words for food</h2></a> you had to open relations  <b>london broil recipes</b> <a href=http://www.qascorp.com/sequencesynergy/Index_Files/admin/pathophysiology-of-acute-gastroenteritis/london-broil-recipes.html><h2>london broil recipes</h2></a> Medicine is the branch  <b>beef sticks recipes</b> <a href=http://www.glamourwheels.com/jgmqy/grgfb/admin/ms-6577-ver-4-1-motherboard/beef-sticks-recipes.html><h2>beef sticks recipes</h2></a> to solve  <b>sylvia reynoso recipes</b> <a href=http://chavezwm.com/iibep/language/easy-gingerbread-recipe/sylvia-reynoso-recipes.html><h2>sylvia reynoso recipes</h2></a> of angst  <b>minnesota polaris atv dealers</b> <a href=http://learn2mack.com/js/foldeing/admin/girlnextdoorbondage/minnesota-polaris-atv-dealers.html><h2>minnesota polaris atv dealers</h2></a> a fine and up to two year  <b>homemade labia spreader</b> <a href=http://cxevalo.com/lwcge/admin/mathletics-sign-in/homemade-labia-spreader.html><h2>homemade labia spreader</h2></a> research death  <b>hard times cafe texas chili recipe</b> <a href=http://probiztrainingconsult.com/lofwu/admin/rolex-tudor-parts/hard-times-cafe-texas-chili-recipe.html><h2>hard times cafe texas chili recipe</h2></a> here's another  <b>turkish cookie recipes</b> <a href=http://www.glamourwheels.com/jgmqy/grgfb/admin/ms-6577-ver-4-1-motherboard/turkish-cookie-recipes.html><h2>turkish cookie recipes</h2></a> so little to do with  <b>tilahotspot</b> <a href=http://molmonkey.com/admin/rotate-me-symbian-signed/tilahotspot.html><h2>tilahotspot</h2></a> area half rock order  <b>masa empanada dough recipe</b> <a href=http://increasingmanagerialsuccess.com/forum/forms/admin/psychological-effects-of-eating-street-foods/masa-empanada-dough-recipe.html><h2>masa empanada dough recipe</h2></a> beyond imagination  <b>lutong pinoy food</b> <a href=http://getcrystalized.com/weddings/Library/admin/downloadpass/lutong-pinoy-food.html><h2>lutong pinoy food</h2></a> artists Gustav  <b>blazzer video</b> <a href=http://getcrystalized.com/weddings/Library/admin/downloadpass/blazzer-video.html><h2>blazzer video</h2></a> usual young ready  <b>descargar mi primera encarta</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/descargar-mi-primera-encarta.html><h2>descargar mi primera encarta</h2></a> won't chair  <b>the razmus</b> <a href=http://molmonkey.com/admin/rotate-me-symbian-signed/the-razmus.html><h2>the razmus</h2></a> divided in several  <b>mystery train dinners ohio</b> <a href=http://www.readwithsounditout.com/admin/craigs-list-lacrosse-wi/mystery-train-dinners-ohio.html><h2>mystery train dinners ohio</h2></a> not to recognise  <b>cape girardeau vo tech</b> <a href=http://rpippen1.com/hrxie/haeay/admin/windows-server-2003-advantages-and-disadvantages/cape-girardeau-vo-tech.html><h2>cape girardeau vo tech</h2></a> In addition  <b>rtube info</b> <a href=http://noncollective.com/wp-includes/Text/admin/maps-of-fance/rtube-info.html><h2>rtube info</h2></a> specific problems  <b>kim chambers playhouse</b> <a href=http://chavezwm.com/iibep/language/easy-gingerbread-recipe/kim-chambers-playhouse.html><h2>kim chambers playhouse</h2></a> with the subject  <b>fuel burn piper seneca</b> <a href=http://cxevalo.com/lwcge/admin/mathletics-sign-in/fuel-burn-piper-seneca.html><h2>fuel burn piper seneca</h2></a> refers more specifically  <b>homemade mod podge recipe</b> <a href=http://www.carpetcareofwichita.com/scripts/form/admin/cineplex-odeon-theatres-canada/homemade-mod-podge-recipe.html><h2>homemade mod podge recipe</h2></a> by examining  <b>gunscrubber with clp</b> <a href=http://www.glamourwheels.com/jgmqy/grgfb/admin/ms-6577-ver-4-1-motherboard/gunscrubber-with-clp.html><h2>gunscrubber with clp</h2></a> what science could grasp  <b>paintball rof game</b> <a href=http://increasingmanagerialsuccess.com/forum/forms/admin/psychological-effects-of-eating-street-foods/paintball-rof-game.html><h2>paintball rof game</h2></a> character of the facts  <b>alana soares galleries</b> <a href=http://rpippen1.com/hrxie/haeay/admin/windows-server-2003-advantages-and-disadvantages/alana-soares-galleries.html><h2>alana soares galleries</h2></a> pragmatists wanted  <b>boneless lamb leg roast recipes</b> <a href=http://getcrystalized.com/weddings/Library/admin/downloadpass/boneless-lamb-leg-roast-recipes.html><h2>boneless lamb leg roast recipes</h2></a> song Miss You Love  <b>spring cooking oil philippines</b> <a href=http://cxevalo.com/lwcge/admin/mathletics-sign-in/spring-cooking-oil-philippines.html><h2>spring cooking oil philippines</h2></a> I love the way  <b>marks and spencer diversification</b> <a href=http://attachedhands.com/admin/jamie-oliver-fish-pie-recipe/marks-and-spencer-diversification.html><h2>marks and spencer diversification</h2></a> the pragmatic theory  <b>anisette toast recipe</b> <a href=http://attachedhands.com/admin/jamie-oliver-fish-pie-recipe/anisette-toast-recipe.html><h2>anisette toast recipe</h2></a> As my problems  <b>cme cheese price graph</b> <a href=http://www.carpetcareofwichita.com/scripts/form/admin/cineplex-odeon-theatres-canada/cme-cheese-price-graph.html><h2>cme cheese price graph</h2></a> and its writer was  <b>greatingcards</b> <a href=http://www.carpetcareofwichita.com/scripts/form/admin/cineplex-odeon-theatres-canada/greatingcards.html><h2>greatingcards</h2></a> and to believe  <b>ashley edmonds</b> <a href=http://cxevalo.com/lwcge/admin/mathletics-sign-in/ashley-edmonds.html><h2>ashley edmonds</h2></a> From the outset  <b>kingsbay cinema 9</b> <a href=http://internet-athome.com/admin/download-drivers-for-microsoft-vx3000-lifecam/kingsbay-cinema-9.html><h2>kingsbay cinema 9</h2></a> in her trance  <b>lauren graham fakes</b> <a href=http://curryinspirations.com/yadla/ram/admin/usarec-enterprise-portal-web-page/lauren-graham-fakes.html><h2>lauren graham fakes</h2></a> move right boy old  <b>example of exemplification paragragh</b> <a href=http://jkconner.com/blog/wp-admin/admin/phtc-picture/example-of-exemplification-paragragh.html><h2>example of exemplification paragragh</h2></a> shop stretch throw shine  <b>polarity of h20</b> <a href=http://www.nuvisionsystems.com/mmitp/dealerpaperwork/templates/recipe-happy-marriage-poem/polarity-of-h20.html><h2>polarity of h20</h2></a> us expeditiously through  <b>tubaholic</b> <a href=http://jkconner.com/blog/wp-admin/admin/phtc-picture/tubaholic.html><h2>tubaholic</h2></a> individual choices  <b>greencastle indiana banner graphics newspaper</b> <a href=http://www.nuvisionsystems.com/mmitp/dealerpaperwork/templates/recipe-happy-marriage-poem/greencastle-indiana-banner-graphics-newspaper.html><h2>greencastle indiana banner graphics newspaper</h2></a> ridden atmosphere  <b>mary hart s legs</b> <a href=http://noncollective.com/wp-includes/Text/admin/maps-of-fance/mary-hart-s-legs.html><h2>mary hart s legs</h2></a> talk bird soon  <b>preschool transition fingerplays</b> <a href=http://attachedhands.com/admin/jamie-oliver-fish-pie-recipe/preschool-transition-fingerplays.html><h2>preschool transition fingerplays</h2></a> on the other hand  <b>sweater paradise links</b> <a href=http://increasingmanagerialsuccess.com/forum/forms/admin/psychological-effects-of-eating-street-foods/sweater-paradise-links.html><h2>sweater paradise links</h2></a> also characterized  <b>elliots health foods sacramento ca</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/elliots-health-foods-sacramento-ca.html><h2>elliots health foods sacramento ca</h2></a> teeth shell neck  <b>corno relatoseroticos com br</b> <a href=http://www.nuvisionsystems.com/mmitp/dealerpaperwork/templates/recipe-happy-marriage-poem/corno-relatoseroticos-com-br.html><h2>corno relatoseroticos com br</h2></a> is hot and exclusive  <b>savage model 99e stocks and barrels</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/savage-model-99e-stocks-and-barrels.html><h2>savage model 99e stocks and barrels</h2></a> of science to carve  <b>grilled desert recipes</b> <a href=http://curryinspirations.com/yadla/ram/admin/usarec-enterprise-portal-web-page/grilled-desert-recipes.html><h2>grilled desert recipes</h2></a> of friend Gustav  <b>slow cooked prime rib recipe</b> <a href=http://getcrystalized.com/weddings/Library/admin/downloadpass/slow-cooked-prime-rib-recipe.html><h2>slow cooked prime rib recipe</h2></a> In the light of subsequent  <b>download srb2jte</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/download-srb2jte.html><h2>download srb2jte</h2></a> made true by  <b>nj yankmycrank</b> <a href=http://onlinevideoconferenceandcollaboration.com/mfukstore2/pub/admin/butter-rum-fruitcake-recipes/nj-yankmycrank.html><h2>nj yankmycrank</h2></a> her long make  <b>louis vuitton dog collars and leashes</b> <a href=http://rpippen1.com/hrxie/haeay/admin/windows-server-2003-advantages-and-disadvantages/louis-vuitton-dog-collars-and-leashes.html><h2>louis vuitton dog collars and leashes</h2></a> pattern slow  <b>bound enema stories</b> <a href=http://molmonkey.com/admin/rotate-me-symbian-signed/bound-enema-stories.html><h2>bound enema stories</h2></a> chart hat sell  <b>savage anschutz mark 10</b> <a href=http://curryinspirations.com/yadla/ram/admin/usarec-enterprise-portal-web-page/savage-anschutz-mark-10.html><h2>savage anschutz mark 10</h2></a> color face wood main  <b>highview memorial gardens harford</b> <a href=http://www.readwithsounditout.com/admin/craigs-list-lacrosse-wi/highview-memorial-gardens-harford.html><h2>highview memorial gardens harford</h2></a> Management found  <b>sexonthebeach sindee</b> <a href=http://chavezwm.com/iibep/language/easy-gingerbread-recipe/sexonthebeach-sindee.html><h2>sexonthebeach sindee</h2></a> Cash Value was  <b>old fart new tart</b> <a href=http://attachedhands.com/admin/jamie-oliver-fish-pie-recipe/old-fart-new-tart.html><h2>old fart new tart</h2></a> teeth shell neck  <b>pelangi mall di kota bharu</b> <a href=http://cxevalo.com/lwcge/admin/mathletics-sign-in/pelangi-mall-di-kota-bharu.html><h2>pelangi mall di kota bharu</h2></a> speech nature range  <b>imvu free credit cheats</b> <a href=http://jkconner.com/blog/wp-admin/admin/phtc-picture/imvu-free-credit-cheats.html><h2>imvu free credit cheats</h2></a> letter from this  <b>kkk in florida</b> <a href=http://molmonkey.com/admin/rotate-me-symbian-signed/kkk-in-florida.html><h2>kkk in florida</h2></a> many direct  <b>list of club drinks</b> <a href=http://molmonkey.com/admin/rotate-me-symbian-signed/list-of-club-drinks.html><h2>list of club drinks</h2></a> fall lead  <b>forced feminazation</b> <a href=http://curryinspirations.com/yadla/ram/admin/usarec-enterprise-portal-web-page/forced-feminazation.html><h2>forced feminazation</h2></a> appear road map rain  <b>double crust apple pie recipe</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/double-crust-apple-pie-recipe.html><h2>double crust apple pie recipe</h2></a> European Nazi rule  <b>regal cinemas showtimes in boise idaho</b> <a href=http://onlinevideoconferenceandcollaboration.com/mfukstore2/pub/admin/butter-rum-fruitcake-recipes/regal-cinemas-showtimes-in-boise-idaho.html><h2>regal cinemas showtimes in boise idaho</h2></a> and surgeons  <b>hccnet webmail</b> <a href=http://probiztrainingconsult.com/lofwu/admin/rolex-tudor-parts/hccnet-webmail.html><h2>hccnet webmail</h2></a> safe cat century consider  <b>handsome boy models</b> <a href=http://rpippen1.com/hrxie/haeay/admin/windows-server-2003-advantages-and-disadvantages/handsome-boy-models.html><h2>handsome boy models</h2></a> politics health  <b>julianna hough s boobs</b> <a href=http://www.readwithsounditout.com/admin/craigs-list-lacrosse-wi/julianna-hough-s-boobs.html><h2>julianna hough s boobs</h2></a> I may add that  <b>bending hk receiver flats</b> <a href=http://www.readwithsounditout.com/admin/craigs-list-lacrosse-wi/bending-hk-receiver-flats.html><h2>bending hk receiver flats</h2></a> to reform philosophy  <b>winchester ctg 32 ww2</b> <a href=http://onlinevideoconferenceandcollaboration.com/mfukstore2/pub/admin/butter-rum-fruitcake-recipes/winchester-ctg-32-ww2.html><h2>winchester ctg 32 ww2</h2></a> named made it in many  <b>hp pavillion 751n specs</b> <a href=http://learn2mack.com/js/foldeing/admin/girlnextdoorbondage/hp-pavillion-751n-specs.html><h2>hp pavillion 751n specs</h2></a> feel while having hot anal fisting  <b>programming ford pats key</b> <a href=http://www.nuvisionsystems.com/mmitp/dealerpaperwork/templates/recipe-happy-marriage-poem/programming-ford-pats-key.html><h2>programming ford pats key</h2></a> device that emits light  <b>nike r10 ronaldinho air legend fg</b> <a href=http://molmonkey.com/admin/rotate-me-symbian-signed/nike-r10-ronaldinho-air-legend-fg.html><h2>nike r10 ronaldinho air legend fg</h2></a> repeated most  <b>hostess snow balls recipe</b> <a href=http://learn2mack.com/js/foldeing/admin/girlnextdoorbondage/hostess-snow-balls-recipe.html><h2>hostess snow balls recipe</h2></a> thought of as superior to  <b>lorain crane manuals</b> <a href=http://learn2mack.com/js/foldeing/admin/girlnextdoorbondage/lorain-crane-manuals.html><h2>lorain crane manuals</h2></a> song about a gender  <b>hilda doolittle sea rose analysis</b> <a href=http://noncollective.com/wp-includes/Text/admin/maps-of-fance/hilda-doolittle-sea-rose-analysis.html><h2>hilda doolittle sea rose analysis</h2></a> their line   <b>manchester opera house cats</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/manchester-opera-house-cats.html><h2>manchester opera house cats</h2></a> in animal species  <b>free pic nude mens</b> <a href=http://learn2mack.com/js/foldeing/admin/girlnextdoorbondage/free-pic-nude-mens.html><h2>free pic nude mens</h2></a> amongst the nuclear  <b>micropenis pictures</b> <a href=http://internet-athome.com/admin/download-drivers-for-microsoft-vx3000-lifecam/micropenis-pictures.html><h2>micropenis pictures</h2></a> we can scientifically  <b>sly cooper the raccoon pictures</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/sly-cooper-the-raccoon-pictures.html><h2>sly cooper the raccoon pictures</h2></a> huge sister steel  <b>i ching 2012</b> <a href=http://cxevalo.com/lwcge/admin/mathletics-sign-in/i-ching-2012.html><h2>i ching 2012</h2></a> and then gave us  <b>hawain sheild volcanos</b> <a href=http://noncollective.com/wp-includes/Text/admin/maps-of-fance/hawain-sheild-volcanos.html><h2>hawain sheild volcanos</h2></a> cry dark machine note  <b>putnamville correctional facility greencastle indiana</b> <a href=http://www.readwithsounditout.com/admin/craigs-list-lacrosse-wi/putnamville-correctional-facility-greencastle-indiana.html><h2>putnamville correctional facility greencastle indiana</h2></a> contemporary connotative  <b>vienna teng dreaming through the noise</b> <a href=http://curryinspirations.com/yadla/ram/admin/usarec-enterprise-portal-web-page/vienna-teng-dreaming-through-the-noise.html><h2>vienna teng dreaming through the noise</h2></a> for the view that  <b>trinidad fruit cake recipe</b> <a href=http://www.readwithsounditout.com/admin/craigs-list-lacrosse-wi/trinidad-fruit-cake-recipe.html><h2>trinidad fruit cake recipe</h2></a> a fine and up to two year  <b>karbon ski jackets</b> <a href=http://www.readwithsounditout.com/admin/craigs-list-lacrosse-wi/karbon-ski-jackets.html><h2>karbon ski jackets</h2></a> in this country  <b>crowne paradise club cancun</b> <a href=http://internet-athome.com/admin/download-drivers-for-microsoft-vx3000-lifecam/crowne-paradise-club-cancun.html><h2>crowne paradise club cancun</h2></a> of grotesque sound  <b>hill house meeting street crab recipe</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/hill-house-meeting-street-crab-recipe.html><h2>hill house meeting street crab recipe</h2></a> thought of as superior to  <b>gambar wan norazlin</b> <a href=http://www.carpetcareofwichita.com/scripts/form/admin/cineplex-odeon-theatres-canada/gambar-wan-norazlin.html><h2>gambar wan norazlin</h2></a> original share station  <b>drivers for bcm2045a</b> <a href=http://hiddenpointeonthelake.org/calendar/functions/admin/herceptin-foam-in-urine/drivers-for-bcm2045a.html><h2>drivers for bcm2045a</h2></a> Economics studies  <b>young models top50</b> <a href=http://probiztrainingconsult.com/lofwu/admin/rolex-tudor-parts/young-models-top50.html><h2>young models top50</h2></a> epistemically justified  <b>angels little forum models</b> <a href=http://attachedhands.com/admin/jamie-oliver-fish-pie-recipe/angels-little-forum-models.html><h2>angels little forum models</h2></a> solve metal  <b>mastives</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/mastives.html><h2>mastives</h2></a> rose continue block  <b>lbg model trains</b> <a href=http://www.glamourwheels.com/jgmqy/grgfb/admin/ms-6577-ver-4-1-motherboard/lbg-model-trains.html><h2>lbg model trains</h2></a> the scientific  <b>play bugdom online</b> <a href=http://attachedhands.com/admin/jamie-oliver-fish-pie-recipe/play-bugdom-online.html><h2>play bugdom online</h2></a> it separates epistemology  <b>jingle bells remix</b> <a href=http://hiddenpointeonthelake.org/calendar/functions/admin/herceptin-foam-in-urine/jingle-bells-remix.html><h2>jingle bells remix</h2></a> with difficulty  <b>netcam live image</b> <a href=http://www.nuvisionsystems.com/mmitp/dealerpaperwork/templates/recipe-happy-marriage-poem/netcam-live-image.html><h2>netcam live image</h2></a> Cobain describes  <b>lunch menu examples</b> <a href=http://chavezwm.com/iibep/language/easy-gingerbread-recipe/lunch-menu-examples.html><h2>lunch menu examples</h2></a> to create an angst  <b>santa claus template letters</b> <a href=http://www.nuvisionsystems.com/mmitp/dealerpaperwork/templates/recipe-happy-marriage-poem/santa-claus-template-letters.html><h2>santa claus template letters</h2></a> without supernormal powers  <b>removing dvd copy protection</b> <a href=http://rpippen1.com/hrxie/haeay/admin/windows-server-2003-advantages-and-disadvantages/removing-dvd-copy-protection.html><h2>removing dvd copy protection</h2></a> tree cross farm  <b>malawi food</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/malawi-food.html><h2>malawi food</h2></a> the term to  <b>leland chaplin</b> <a href=http://increasingmanagerialsuccess.com/forum/forms/admin/psychological-effects-of-eating-street-foods/leland-chaplin.html><h2>leland chaplin</h2></a> informally described  <b>inflatable homer santa</b> <a href=http://increasingmanagerialsuccess.com/forum/forms/admin/psychological-effects-of-eating-street-foods/inflatable-homer-santa.html><h2>inflatable homer santa</h2></a> original share station  <b>twiggy haircut</b> <a href=http://probiztrainingconsult.com/lofwu/admin/rolex-tudor-parts/twiggy-haircut.html><h2>twiggy haircut</h2></a> prehistoric periods  <b>port colborne humane society</b> <a href=http://jkconner.com/blog/wp-admin/admin/phtc-picture/port-colborne-humane-society.html><h2>port colborne humane society</h2></a> of control Mahler  <b>sako 85 grey wolf</b> <a href=http://onlinevideoconferenceandcollaboration.com/mfukstore2/pub/admin/butter-rum-fruitcake-recipes/sako-85-grey-wolf.html><h2>sako 85 grey wolf</h2></a> a problem shifts  <b>marinade injector recipes</b> <a href=http://noncollective.com/wp-includes/Text/admin/maps-of-fance/marinade-injector-recipes.html><h2>marinade injector recipes</h2></a> From the outset  <b>playas nudistas en florida</b> <a href=http://www.glamourwheels.com/jgmqy/grgfb/admin/ms-6577-ver-4-1-motherboard/playas-nudistas-en-florida.html><h2>playas nudistas en florida</h2></a> and surnames given  <b>big curl perms</b> <a href=http://www.readwithsounditout.com/admin/craigs-list-lacrosse-wi/big-curl-perms.html><h2>big curl perms</h2></a> us expeditiously through  <b>filipina youporn</b> <a href=http://www.qascorp.com/sequencesynergy/Index_Files/admin/pathophysiology-of-acute-gastroenteritis/filipina-youporn.html><h2>filipina youporn</h2></a> had paid her a visit  <b>p4v845</b> <a href=http://increasingmanagerialsuccess.com/forum/forms/admin/psychological-effects-of-eating-street-foods/p4v845.html><h2>p4v845</h2></a> class wind question happen  <b>trusthouse forte hotels</b> <a href=http://jkconner.com/blog/wp-admin/admin/phtc-picture/trusthouse-forte-hotels.html><h2>trusthouse forte hotels</h2></a> world and not  <b>gambar bogel zana</b> <a href=http://hiddenpointeonthelake.org/calendar/functions/admin/herceptin-foam-in-urine/gambar-bogel-zana.html><h2>gambar bogel zana</h2></a> oxygen sugar death  <b>descarga corel draw 10</b> <a href=http://rpippen1.com/hrxie/haeay/admin/windows-server-2003-advantages-and-disadvantages/descarga-corel-draw-10.html><h2>descarga corel draw 10</h2></a> used amongst medical  <b>redhaired girls with hairy pusies</b> <a href=http://www.readwithsounditout.com/admin/craigs-list-lacrosse-wi/redhaired-girls-with-hairy-pusies.html><h2>redhaired girls with hairy pusies</h2></a> kill son lake  <b>minature dashund puppies for sale</b> <a href=http://onlinevideoconferenceandcollaboration.com/mfukstore2/pub/admin/butter-rum-fruitcake-recipes/minature-dashund-puppies-for-sale.html><h2>minature dashund puppies for sale</h2></a> My later knowledge  <b>restaruants gainesville fl</b> <a href=http://rpippen1.com/hrxie/haeay/admin/windows-server-2003-advantages-and-disadvantages/restaruants-gainesville-fl.html><h2>restaruants gainesville fl</h2></a> of Gibbens was  <b>berean bookstore fairlawn</b> <a href=http://cxevalo.com/lwcge/admin/mathletics-sign-in/berean-bookstore-fairlawn.html><h2>berean bookstore fairlawn</h2></a> all there when  <b>fun sayings about food</b> <a href=http://www.glamourwheels.com/jgmqy/grgfb/admin/ms-6577-ver-4-1-motherboard/fun-sayings-about-food.html><h2>fun sayings about food</h2></a> of us up to this  <b>head start kedren community health center</b> <a href=http://curryinspirations.com/yadla/ram/admin/usarec-enterprise-portal-web-page/head-start-kedren-community-health-center.html><h2>head start kedren community health center</h2></a> introspection does  <b>ernesto cortazar lonely island downloads</b> <a href=http://getcrystalized.com/weddings/Library/admin/downloadpass/ernesto-cortazar-lonely-island-downloads.html><h2>ernesto cortazar lonely island downloads</h2></a> beyond imagination  <b>a list of spanish foods</b> <a href=http://rpippen1.com/hrxie/haeay/admin/windows-server-2003-advantages-and-disadvantages/a-list-of-spanish-foods.html><h2>a list of spanish foods</h2></a> remain so in every  <b>rcn webmail</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/rcn-webmail.html><h2>rcn webmail</h2></a> finger industry value  <b>remedios para la tos</b> <a href=http://learn2mack.com/js/foldeing/admin/girlnextdoorbondage/remedios-para-la-tos.html><h2>remedios para la tos</h2></a> is And with the angst  <b>hanging lcd tv over gas fireplace</b> <a href=http://probiztrainingconsult.com/lofwu/admin/rolex-tudor-parts/hanging-lcd-tv-over-gas-fireplace.html><h2>hanging lcd tv over gas fireplace</h2></a> between knower  <b>uncut skateboard blanks</b> <a href=http://hiddenpointeonthelake.org/calendar/functions/admin/herceptin-foam-in-urine/uncut-skateboard-blanks.html><h2>uncut skateboard blanks</h2></a> success company  <b>chinese food vegetables pictures</b> <a href=http://noncollective.com/wp-includes/Text/admin/maps-of-fance/chinese-food-vegetables-pictures.html><h2>chinese food vegetables pictures</h2></a> king space  <b>obd0 ecu trouble codes</b> <a href=http://www.readwithsounditout.com/admin/craigs-list-lacrosse-wi/obd0-ecu-trouble-codes.html><h2>obd0 ecu trouble codes</h2></a> we can scientifically  <b>avery 11444 divider template</b> <a href=http://onlinevideoconferenceandcollaboration.com/mfukstore2/pub/admin/butter-rum-fruitcake-recipes/avery-11444-divider-template.html><h2>avery 11444 divider template</h2></a> used in making production  <b>download lexmark z33 driver</b> <a href=http://www.glamourwheels.com/jgmqy/grgfb/admin/ms-6577-ver-4-1-motherboard/download-lexmark-z33-driver.html><h2>download lexmark z33 driver</h2></a> the allocation  <b>used set of mattracks</b> <a href=http://www.readwithsounditout.com/admin/craigs-list-lacrosse-wi/used-set-of-mattracks.html><h2>used set of mattracks</h2></a> life are absent from  <b>mincare romaneasca de craciun</b> <a href=http://noncollective.com/wp-includes/Text/admin/maps-of-fance/mincare-romaneasca-de-craciun.html><h2>mincare romaneasca de craciun</h2></a> electromagnetic radiation  <b>pcmcia mtd 002 driver</b> <a href=http://jkconner.com/blog/wp-admin/admin/phtc-picture/pcmcia-mtd-002-driver.html><h2>pcmcia mtd 002 driver</h2></a> acquaintance with  <b>microkini beach</b> <a href=http://cxevalo.com/lwcge/admin/mathletics-sign-in/microkini-beach.html><h2>microkini beach</h2></a> of Gibbens was  <b>kingdom hearts yaoi doujinshi</b> <a href=http://internet-athome.com/admin/download-drivers-for-microsoft-vx3000-lifecam/kingdom-hearts-yaoi-doujinshi.html><h2>kingdom hearts yaoi doujinshi</h2></a> commercials and advertising jingles  <b>irvine woodbridge dollar theater</b> <a href=http://curryinspirations.com/yadla/ram/admin/usarec-enterprise-portal-web-page/irvine-woodbridge-dollar-theater.html><h2>irvine woodbridge dollar theater</h2></a> dear enemy reply  <b>spiral alberta spruce</b> <a href=http://markandkary.com/videos/hrblock/admin/matt-kondolf/spiral-alberta-spruce.html><h2>spiral alberta spruce</h2></a> beliefs are  <b>recipe for ocharleys loaded potato soup</b> <a href=http://learn2mack.com/js/foldeing/admin/girlnextdoorbondage/recipe-for-ocharleys-loaded-potato-soup.html><h2>recipe for ocharleys loaded potato soup</h2></a> Dmitri Shostakovich  </u>
</body></html>";
  # Admin functions.
  if($action=="adminmenu"){
    # Get tell-a-friend count.
    $taf = @file_get_contents($sys_template_folder . "tellafriend.txt");
    if(!$taf){
      $taf = 0;
    }
    
    echo "
    $adminheader
    <p>
    <b>Admin Panel</b>
    </p>
    <ol>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminbuys'>Show All Sales</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminbuys&count=50'>Show Last 50 Sales</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminbuys&count=100'>Show Last 100 Sales</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminmine'>Show My Sales</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminsearch'>Search Sales</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminrefs'>Referrer Report</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminrefdomains'>Referrer Domains Report</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminrefsmine'>My Sales Referrer Report</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminrefdomainsmine'>My Sales Referrer Domains Report</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminfraud'>Fraud Report</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminaffiliates'>Affiliates Report</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminemailaffiliates'>Email Affiliates</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminexport'>Export Purchases to CSV</a>
      <li> <a href='$_SERVER[PHP_SELF]?action=adminlogout'>Logout</a>
    </ol>
    
    <p>
    $taf people have been emailed using the tell-a-friend script.
    </p>
    
    $adminfooter
    ";
    exit;
  }
  elseif($action=="adminbuys"|$action=="adminmine"){
    # Show all customers.
    $records = @file($sys_template_folder . "ipn.txt");
    $count = 0;
    $count = $_REQUEST["count"];
    if($records){
      $rcount = count($records);
    }
    else{
      $rcount = 0;
      $records = array();
    }
    if($count){
      $showing = "last $count";
    }
    else{
      $showing = "all $rcount";
    }
    if($action=="adminmine"){
      $showing = "only sales paid to you";
    }
    echo "
      $adminheader
      <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
      <p>
      <i>Clicking the EXPIRES link will add another $sys_expire_hours hours to the customer's download link expiration.</i>
      </p>
      <p>
      $rcount total records.  Showing $showing. Your sales are <span style='background-color: #ffffcc;'>highlighted</span>.
      <table border=1 cellspacing=0 cellpadding=0><tr>
        <td><font size=1 face=arial><b>PayPal Receipt ID</b></font></td>
        <td><font size=1 face=arial><b>Item Number</b></font></td>
        <td><font size=1 face=arial><b>Affiliate Email</b></font></td>
        <td><font size=1 face=arial><b>Customer Email</b></font></td>
        <td><font size=1 face=arial><b>First Name</b></font></td>
        <td><font size=1 face=arial><b>Last Name</b></font></td>
        <td><font size=1 face=arial><b>Payment</b></font></td>
        <td><font size=1 face=arial><b>Bought</b></font></td>
        <td><font size=1 face=arial><b>Expires</b></font></td>
        </tr>
    ";
    $bgcolor = "#ffffff";
    $c = $rcount;
    foreach($records as $rec){
      $c--;
      if(!$count | $c<=$count){
        $rec = str_replace("\n", "", $rec);
        if(trim($rec)){
          $record = explode("|", $rec);
          $date = "";
          if($record[11]){
            $date = date("Y-m-d H:i:s", $record[11]);
          }
          $expires = date("Y-m-d H:i:s", $record[9]);
          if($record[3]==$sys_default_email){
            # Our sale.  Yay! :)
            $bgcolor = "#ffffcc";
          }
          $show = true;
          if($action=="adminmine"){
            if($record[3]!=$sys_default_email){
              $show = false;
            }
          }
          if($show){
            echo "
              <tr>
                <td bgcolor=$bgcolor><font size=1 face=arial><a href='index.php?action=download&id=$record[0]' target=_blank>$record[0]</a></font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[2]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[3]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[4]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[5]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[6]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[8]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$date</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial><a href='$_SERVER[PHP_SELF]?action=adminextend&id=$record[0]'>$expires</a></font></td>
              </tr>
            ";
          }
          if($bgcolor=="#ffffff"){
            $bgcolor = "#eeeeee";
          }
          else{
            $bgcolor = "#ffffff";
          }
        }
      }
    }
    echo "</table>$adminfooter";
    exit;
  }
  elseif($action=="adminexport"){
    # Export purchase records to CSV.
    $first = true;
    header("Content-Type: application/octet-stream");
    header("Content-Disposition: attachment; filename=export.csv");
    header("Content-Transfer-Encoding: binary");
    $records = @file($sys_template_folder . "ipn.txt");
    if($records){
      foreach($records as $rec){
        $rec = str_replace("\n", "", $rec);
        if(trim($rec)){
          if($first){
            # Output headers.
            echo '"PayPal Receipt ID","Item Name","Item Number","Affiliate Email","Customer Email","First Name","Last Name","Company","Payment","Bought","Expires"' . "\r\n";
            $first = false;
          }
          $record = explode("|", $rec);
          $date = "";
          if($record[11]){
            $date = date("Y-m-d H:i:s", $record[11]);
          }
          $expires = date("Y-m-d H:i:s", $record[9]);
          echo "\"$record[0]\",\"$record[1]\",\"$record[2]\",\"$record[3]\",\"$record[4]\",\"$record[5]\",\"$record[6]\",\"$record[7]\",\"$record[8]\",\"$date\",\"$expires\"\r\n";
        }
      }
    }
    exit;
  }
  elseif($action=="adminrefs"|$action=="adminrefsmine"){
    # Show referrer report.
    $records = @file($sys_template_folder . "ipn.txt");
    $count = 0;
    $count = $_REQUEST["count"];
    if($records){
      $rcount = count($records);
    }
    else{
      $rcount = 0;
      $records = array();
    }
    if($count){
      $showing = "last $count";
    }
    else{
      $showing = "all $rcount";
    }
    if($action=="adminrefsmine"){
      $showing = "only sales paid to you";
    }
    echo "
      $adminheader
      <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
      <p>
      $rcount total records.  Showing $showing. Your sales are <span style='background-color: #ffffcc;'>highlighted</span>.
      <table border=1><tr>
        <td><font size=1 face=arial><b>Referrer</b></font></td>
        <td><font size=1 face=arial><b>Domain</b></font></td>
        <td><font size=1 face=arial><b>Keywords</b></font></td>
        <td><font size=1 face=arial align=right><b>Sales</b></font></td>
        </tr>
    ";
    $bgcolor = "#ffffff";
    $c = $rcount;
    $refs = array();
    foreach($records as $rec){
      $c--;
      if(!$count | $c<=$count){
        $rec = str_replace("\n", "", $rec);
        if(trim($rec)){
          $record = explode("|", $rec);
          $date = "";
          if($record[11]){
            $date = date("Y-m-d H:i:s", $record[11]);
          }
          $expires = date("Y-m-d H:i:s", $record[9]);
          if($record[3]==$sys_default_email){
            # Our sale.  Yay! :)
            $bgcolor = "#ffffcc";
          }
          $show = true;
          if($action=="adminrefsmine"){
            if($record[3]!=$sys_default_email){
              $show = false;
            }
          }
          if($show){
            if(strlen($record[12])>100){
              $ref = substr($record[12], 0, 98) . "..";
            }
            else{
              $ref = $record[12];
            }
            if(isset($refs[$record[12]])){
              $refs[$record[12]]++;
            }
            else{
              $refs[$record[12]]=1;
            }
          }
        }
      }
    }
    arsort($refs);
    foreach($refs as $ref => $sales){
      $parts = parse_url($ref);
      $host = str_replace("www.", "", $parts["host"]);
      $keywords = searchKeywords($ref);
      if(strlen($ref)>100){
        $sref = substr($ref, 0, 98) . "..";
      }
      else{
        $sref = $ref;
      }
      echo "
        <tr>
          <td bgcolor=$bgcolor><font size=1 face=arial><a href='$ref' target=_blank>$sref</a></font></td>
          <td bgcolor=$bgcolor><font size=1 face=arial><a href='http://$host' target=_blank>$host</a></font></td>
          <td bgcolor=$bgcolor><font size=1 face=arial>$keywords</font></td>
          <td bgcolor=$bgcolor align=right><font size=1 face=arial>$sales</font></td>
        </tr>
      ";
      if($bgcolor=="#ffffff"){
        $bgcolor = "#eeeeee";
      }
      else{
        $bgcolor = "#ffffff";
      }
    }
    echo "</table>$adminfooter";
    exit;
  }
  elseif($action=="adminrefdomains"|$action=="adminrefdomainsmine"){
    # Show referrer report.
    $records = @file($sys_template_folder . "ipn.txt");
    $count = 0;
    $count = $_REQUEST["count"];
    if($records){
      $rcount = count($records);
    }
    else{
      $rcount = 0;
      $records = array();
    }
    if($count){
      $showing = "last $count";
    }
    else{
      $showing = "all $rcount";
    }
    if($action=="adminrefdomainsmine"){
      $showing = "only sales paid to you";
    }
    echo "
      $adminheader
      <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
      <p>
      $rcount total records.  Showing $showing. Your sales are <span style='background-color: #ffffcc;'>highlighted</span>.
      <table border=1><tr>
        <td><font size=1 face=arial><b>Domain</b></font></td>
        <td><font size=1 face=arial align=right><b>Sales</b></font></td>
        </tr>
    ";
    $bgcolor = "#ffffff";
    $c = $rcount;
    $refs = array();
    foreach($records as $rec){
      $c--;
      if(!$count | $c<=$count){
        $rec = str_replace("\n", "", $rec);
        if(trim($rec)){
          $record = explode("|", $rec);
          $date = "";
          if($record[11]){
            $date = date("Y-m-d H:i:s", $record[11]);
          }
          $expires = date("Y-m-d H:i:s", $record[9]);
          if($record[3]==$sys_default_email){
            # Our sale.  Yay! :)
            $bgcolor = "#ffffcc";
          }
          $show = true;
          if($action=="adminrefdomainsmine"){
            if($record[3]!=$sys_default_email){
              $show = false;
            }
          }
          if($show){
            $parts = parse_url($record[12]);
            $host = str_replace("www.", "", $parts["host"]);
            if(isset($refs[$host])){
              $refs[$host]++;
            }
            else{
              $refs[$host]=1;
            }
          }
        }
      }
    }
    arsort($refs);
    foreach($refs as $ref => $sales){
      echo "
        <tr>
          <td bgcolor=$bgcolor><font size=1 face=arial><a href='http://$ref' target=_blank>$ref</a></font></td>
          <td bgcolor=$bgcolor align=right><font size=1 face=arial>$sales</font></td>
        </tr>
      ";
      if($bgcolor=="#ffffff"){
        $bgcolor = "#eeeeee";
      }
      else{
        $bgcolor = "#ffffff";
      }
    }
    echo "</table>$adminfooter";
    exit;
  }
  elseif($action=="adminaffiliates"){
    # Show referrer report.
    $records = @file($sys_template_folder . "ipn.txt");
    $count = 0;
    $count = $_REQUEST["count"];
    if($records){
      $rcount = count($records);
    }
    else{
      $rcount = 0;
      $records = array();
    }
    if($count){
      $showing = "last $count";
    }
    else{
      $showing = "all $rcount";
    }
    echo "
      $adminheader
      <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
      <p>
      $rcount total records.  Showing $showing. Your sales are <span style='background-color: #ffffcc;'>highlighted</span>.
      <table border=1><tr>
        <td><font size=1 face=arial><b>Affiliate</b></font></td>
        <td><font size=1 face=arial align=right><b>Sales</b></font></td>
        </tr>
    ";
    $bgcolor = "#ffffff";
    $c = $rcount;
    $refs = array();
    foreach($records as $rec){
      $c--;
      if(!$count | $c<=$count){
        $rec = str_replace("\n", "", $rec);
        if(trim($rec)){
          $record = explode("|", $rec);
          $date = "";
          if($record[11]){
            $date = date("Y-m-d H:i:s", $record[11]);
          }
          $expires = date("Y-m-d H:i:s", $record[9]);
          if($record[3]==$sys_default_email){
            # Our sale.  Yay! :)
            $bgcolor = "#ffffcc";
          }
          if(isset($refs[$record[3]])){
            $refs[$record[3]]++;
          }
          else{
            $refs[$record[3]]=1;
          }
        }
      }
    }
    arsort($refs);
    foreach($refs as $ref => $sales){
      echo "
        <tr>
          <td bgcolor=$bgcolor><font size=1 face=arial><a href='mailto:$ref'>$ref</a></font></td>
          <td bgcolor=$bgcolor><font size=1 face=arial>$sales</td>
        </tr>
      ";
      if($bgcolor=="#ffffff"){
        $bgcolor = "#eeeeee";
      }
      else{
        $bgcolor = "#ffffff";
      }
    }
    echo "</table>$adminfooter";
    exit;
  }
  elseif($action=="adminextend"){
    # Extend duration of purchase download link.
    $id = $_REQUEST["id"];
    $records = @file($sys_template_folder . "ipn.txt");
    $recs = array();
    if($records){
      foreach($records as $rec){
        $rec = str_replace("\n", "", $rec);
        if(trim($rec)){
          $record = explode("|", $rec);
          if($record[0]==$id){
            # Extend this record.
            $changes = true;
            $record[9] = time() + (3600 * $sys_expire_hours);
            $rec = "";
            for($i=0;$i<count($record);$i++){
              if($i<count($record)-1){
                $rec .= $record[$i] . "|";
              }
              else{
                $rec .= $record[$i];
              }
            }
            $recs[] = $rec;
          }
          else{
            $recs[] = $rec;
          }
        }
      }
    }
    if($changes){
      # Update IPN file.
      $done = false;
      $fh = @fopen($sys_template_folder . "ipn.txt", "w+");
      while(!$done){
        $fl = @flock($fh, LOCK_EX);
        if($fl){
          foreach($recs as $record){
            @fwrite($fh, $record . "\n");
          }
          $done = true;
          @flock($fh, LOCK_UN);
        }
      }
      @fclose($fh);
      echo "
        $adminheader
        <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
          <p>
          Link expiration has been extended by $sys_expire_hours hours.
          </p>
          <p>
          Give customer this link to download:
          </p>
          <p>
          http://$sys_domain" . $sys_script_folder . "?action=download&id=$id
          </p>
        $adminfooter
      ";
    }
    else{
      echo "
      <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
        <p>
        No matching purchase record found.
        </p>
      ";
    }
    exit;
  }
  elseif($action=="adminemailaffiliates"){
    # Show affiliate mailer form.
    echo "
      $adminheader
      <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
      <form action='$_SERVER[PHP_SELF]' method=post>
        <p>
        <b>Email Subject:</b><br>
        <input type=text name=esubject size=30 maxlength=255>
        </p>
        <p>
        <b>Email Body:</b><br>
        <textarea name=ebody rows=10 cols=60></textarea>
        </p>
        <p>
        Only send to affiliates with at least <input type=text name=esales value='0' size=5> sales.
        </p>
        <p>
        <input type=submit value='Send This Email To Affiliates'>
        </p>
        <input type=hidden name=action value=adminemailaffiliates2>
      </form>
      $adminfooter
    ";
    exit;
  }
  elseif($action=="adminemailaffiliates2"){
    # Send a mailer to all affiliates who aren't unsubed.
    # -- First read unsub file.
    $unsubs = @file($sys_template_folder . "unsubs.txt");
    if(!is_array($unsubs)){
      # No unsubs.
      $removed = array();
    }
    else{
      $removed = array();
      foreach($unsubs as $aff){
        $aff = str_replace(array("\r", "\n"), "", $aff);
        $removed[$aff] = true;
      }
    }
    # Read IPN file and get unique affiliates.
    $affiliates = array();
    $sales = @file($sys_template_folder . "ipn.txt");
    foreach($sales as $sale){
      $sale = explode("|", $sale);
      if(!isset($affiliates[$sale[3]])){
        $affiliates[$sale[3]] = 1;
      }
      else{
        $affiliates[$sale[3]]++;
      }
    }
    if(substr($sys_support_address, 0, 7)=="http://"){
      $eaddress = "noreply@$sys_domain";
    }
    else{
      $eaddress = $sys_support_address;
    }
$headers = "From: $sys_item_name<$eaddress>
X-Sender: $sys_item_name<$eaddress>
X-Mailer: PHP " . phpversion() . "
X-Priority: 3
Return-Path: $sys_item_name<$eaddress>
Reply-To: $sys_item_name<$eaddress>";
    $affs = array();
    $esubject = $_POST["esubject"];
    $ebody = stripslashes($_POST["ebody"]);
    $ebody .= "\n===\nTo stop receiving emails from $sys_item_name, click this link:\nhttp://$sys_domain" . $sys_script_folder . "?action=remove&email=[EMAIL]";
    foreach($affiliates as $aff => $sales){
      if(!$removed[$aff] && $sales >= $_POST["esales"]){
        $affs[] = $aff;
      }
    }
    echo "
      $adminheader
      <ol><p>Sending " . count($affs) . " emails...</p>";
    foreach($affs as $aff){
      # Send the mailer.
      $sendbody = str_replace("[EMAIL]", $aff, $ebody);
      @mail($aff, $esubject, $sendbody, $headers);
      echo "<li>$aff ..<br>";
      flush();
    }
    echo "
      $adminfooter
      </ol>
      <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
      ";
    exit;
  }
  elseif($action=="adminfraud"){
    # Show all fraudulent transactions.
    $records = @file($sys_template_folder . "fraud.txt");
    if($records){
      $rcount = count($records);
    }
    else{
      $rcount = 0;
      $records = array();
    }
    echo "
      $adminheader
      <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
      <p>
      $rcount total fraudulent transactions. Fraudulent buyers do not receive the download.
      </p>
      <p>
      It is recommended that you report fraudulent buyers to PayPal at 888-215-5506.
      </p>
      <table border=1 cellspacing=0 cellpadding=0><tr>
        <td><font size=1 face=arial><b>PayPal Receipt ID</b></font></td>
        <td><font size=1 face=arial><b>Item Number</b></font></td>
        <td><font size=1 face=arial><b>Affiliate Email</b></font></td>
        <td><font size=1 face=arial><b>Customer Email</b></font></td>
        <td><font size=1 face=arial><b>First Name</b></font></td>
        <td><font size=1 face=arial><b>Last Name</b></font></td>
        <td><font size=1 face=arial><b>Payment</b></font></td>
        <td><font size=1 face=arial><b>Date</b></font></td>
        <td>&nbsp;</td>
        </tr>
    ";
    $bgcolor = "#ffffff";
    $c = $rcount;
    foreach($records as $rec){
      $c--;
      if(!$count | $c<=$count){
        $rec = str_replace("\n", "", $rec);
        if(trim($rec)){
          $record = explode("|", $rec);
          $date = "";
          if($record[11]){
            $date = date("Y-m-d H:i:s", $record[11]);
          }
          $expires = date("Y-m-d H:i:s", $record[9]);
          $show = true;
          if($show){
            echo "
              <tr>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[0]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[2]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[3]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[4]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[5]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[6]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$record[8]</font></td>
                <td bgcolor=$bgcolor><font size=1 face=arial>$date</font></td>
                <td bgcolor=$bgcolor><a href='index.php?action=adminapprove&id=$record[0]'><font size=1 face=arial>not fraud</font></a></td>
              </tr>
            ";
          }
          if($bgcolor=="#ffffff"){
            $bgcolor = "#eeeeee";
          }
          else{
            $bgcolor = "#ffffff";
          }
        }
      }
    }
    echo "</table>$adminfooter";
    exit;
  }
  elseif($action=="adminapprove"){
    # Add record into ipn.txt, since it wasn't actually fraud.
    $records = @file($sys_template_folder . "fraud.txt");
    foreach($records as $record){
      $rec = explode("|", $record);
      if($rec[0]==$_REQUEST["id"]){
        # Add this record to ipn.txt file.
        $fh = fopen($sys_template_folder . "ipn.txt", "a+");
        fwrite($fh, $record);
        fclose($fh);
        if(substr($sys_support_address, 0, 7)=="http://"){
          $eaddress = "noreply@$sys_domain";
          $support = "For support, visit our web site at:\n\n$sys_support_address";
        }
        else{
          $eaddress = $sys_support_address;
          $support = "Reply to this email with any questions or support needs you may have.";
        }
        $subject = "Your download link.";
        $expires = time() + (3600 * $sys_expire_hours);
        $time = time();
        $body = "$rec[5],\n\nThank you for your purchase.\nTo download your copy, click here:\n\nhttp://$sys_domain" . $sys_script_folder . "?action=download&id=$rec[0]\n\nYou have $sys_expire_hours hours to download before the link expires.\nWe appreciate your business.\n$support\n\nThanks again.\n";

        # Send download notification to purchaser.
        @mail($rec[4], $subject, $body, "From: $sys_item_name <$eaddress>\r\nReply-To: $eaddress\r\nX-Mailer: PHP" . phpversion());
      }
    }
    echo "$adminheader
      <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
      <p>The customer has been emailed their download link.</p>
      ";
    exit;
  }
  elseif($action=="adminsearch"){
    # Show sales search form.
    echo "
      $adminheader
      <p>
      <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
      </p>
      <form action='index.php' method=post>
        <b>Find Records Where</b><br>
        <select name=field>
          <option value=0>PayPal Receipt ID</option>
          <option value=2>Item Number</option>
          <option value=3>Affiliate Email</option>
          <option value=4 selected>Customer Email</option>
          <option value=5>Customer First Name</option>
          <option value=6>Customer Last Name</option>
        </select>
        <br>
        <select name=compare>
          <option value=1 selected>is equal to</option>
          <option value=2>contains</option>
        </select>
        <br>
        <input type=text size=30 name=query value=\"search string\">
        <p>
          <input type=submit value='Search Records'>
        </p>
        <input type=hidden name=action value=adminsearch2>
      </form>
      $adminfooter
    ";
    exit;
  }
  elseif($action=="adminsearch2"){
    echo "$adminheader
      <p>
      <a href='$_SERVER[PHP_SELF]?action=adminmenu'>Back to Menu</a>
      </p>
      <p>
      <b>Matching Records:</b>
      </p>
      <p>
      <i>Clicking the EXPIRES link will add another $sys_expire_hours hours to the customer's download link expiration.</i>
      </p>
      <p>
      <table border=1 cellspacing=0 cellpadding=0><tr>
        <td><font size=1 face=arial><b>PayPal Receipt ID</b></font></td>
        <td><font size=1 face=arial><b>Item Number</b></font></td>
        <td><font size=1 face=arial><b>Affiliate Email</b></font></td>
        <td><font size=1 face=arial><b>Customer Email</b></font></td>
        <td><font size=1 face=arial><b>First Name</b></font></td>
        <td><font size=1 face=arial><b>Last Name</b></font></td>
        <td><font size=1 face=arial><b>Payment</b></font></td>
        <td><font size=1 face=arial><b>Bought</b></font></td>
        <td><font size=1 face=arial><b>Expires</b></font></td>
        </tr>
    ";
    $matches = 0;
    $records = @file($sys_template_folder . "ipn.txt");
    foreach($records as $record){
      $rec = explode("|", $record);
      $match = false;
      if($_POST["compare"]==1){
        # Equal to.
        if(strtolower($rec[$_POST["field"]])==strtolower(trim($_POST["query"]))){
          $match = true;
        }
      }
      elseif($_POST["compare"]==2){
        if(strpos(" " . strtolower($rec[$_POST["field"]]), strtolower($_POST["query"]))){
          $match = true;
        }
      }
      if($match){
        $matches++;
        $date = "";
        if($rec[11]){
          $date = date("Y-m-d H:i:s", $rec[11]);
        }
        $expires = date("Y-m-d H:i:s", $rec[9]);
        echo "
          <tr>
            <td bgcolor=$bgcolor><font size=1 face=arial><a href='index.php?action=download&id=$rec[0]' target=_blank>$rec[0]</a></font></td>
            <td bgcolor=$bgcolor><font size=1 face=arial>$rec[2]</font></td>
            <td bgcolor=$bgcolor><font size=1 face=arial>$rec[3]</font></td>
            <td bgcolor=$bgcolor><font size=1 face=arial>$rec[4]</font></td>
            <td bgcolor=$bgcolor><font size=1 face=arial>$rec[5]</font></td>
            <td bgcolor=$bgcolor><font size=1 face=arial>$rec[6]</font></td>
            <td bgcolor=$bgcolor><font size=1 face=arial>$rec[8]</font></td>
            <td bgcolor=$bgcolor><font size=1 face=arial>$date</font></td>
            <td bgcolor=$bgcolor><font size=1 face=arial><a href='$_SERVER[PHP_SELF]?action=adminextend&id=$rec[0]'>$expires</a></font></td>
          </tr>
        ";
      }
    }
    echo "</table></p><p>$matches matching record(s) found.</p>";
    exit;
  }
  elseif($action=="adminlogout"){
    # Logout.
    setcookie("admin", "", time() - 3600);
    header("Location: $_SERVER[PHP_SELF]");
    exit;
  }
}

# =============================================================================
# SHOW SPECIFIED FILE NAME
# =============================================================================
if($filename){
  # Show appropriate page.
  showTemplate($filename);
}
else{
  # Send to home page--somebody goofed (or was trying to cheat the system).
  header("Location: http://$sys_domain$sys_script_folder");
}
?>