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;
} else {
return $sys_default_email;
}
}
function checkFile($filename) {
global $sys_template_folder;
if (!file_exists($sys_template_folder . $filename)) {
$fh = fopen($sys_template_folder . $filename, "w+");
fwrite($fh, "");
fclose($fh);
}
return;
}
function mailer($filename,$to) {
global $action, $item_name, $item_number, $payment_amount, $txn_id, $receiver_email, $payer_email, $payer_firstname, $payer_lastname, $payer_business, $sys_version, $sys_domain, $sys_script_folder, $sys_template_folder, $sys_support_address, $sys_item_name, $sys_expire_hours, $sendername, $senderpaypal;
if ($action == "tellafriend") {
$eaddress = $senderpaypal;
} else {
if (substr($sys_support_address, 0, 7) == "http://") {
$eaddress = "noreply@$sys_domain";
} else {
$eaddress = $sys_support_address;
}
$sendername = $sys_item_name;
}
$headers = "From: \"$sendername\"<$eaddress>\r\n";
$headers .= "X-Sender: \"$sendername\"<$eaddress>\r\n";
$headers .= "X-Mailer: 7DS v$sys_version\r\n";
$headers .= "X-Priority: 3\r\n";
$headers .= "Return-Path: \"$sendername\"<$eaddress>\r\n";
$headers .= "Reply-To: \"$sendername\"<$eaddress>";
$body = file($sys_template_folder . $filename);
$subject = array_shift($body);
$body = implode($body);
if ($action == "tellafriend") {
$subject = str_replace("[item name]",$sys_item_name,$subject);
$body = str_replace("[item name]",$sys_item_name,$body);
} else {
$subject = str_replace("[item name]",$item_name,$subject);
$body = str_replace("[item name]",$item_name,$body);
}
$subject = str_replace("[item number]",$item_number,$subject);
$body = str_replace("[item number]",$item_number,$body);
$body = str_replace("[payment]",$payment_amount,$body);
$body = str_replace("[download link]","http://$sys_domain" . $sys_script_folder . "index.php?action=download&id=$txn_id",$body);
$body = str_replace("[seller email]",$receiver_email,$body);
$body = str_replace("[buyer email]",$payer_email,$body);
$subject = str_replace("[first name]",$payer_firstname,$subject);
$body = str_replace("[first name]",$payer_firstname,$body);
$body = str_replace("[last name]",$payer_lastname,$body);
$body = str_replace("[business]",$payer_business,$body);
$body = str_replace("[expire hours]",$sys_expire_hours,$body);
$body = str_replace("[support address]",$sys_support_address,$body);
$subject = str_replace("[taf name]",$sendername,$subject);
$body = str_replace("[taf name]",$sendername,$body);
$body = str_replace("[taf email]",$senderpaypal,$body);
$subject = str_replace("[site]",$sys_domain,$subject);
$body = str_replace("[site]",$sys_domain,$body);
@mail($to, $subject, $body, $headers);
return;
}
checkFile("index.html");
checkFile("ipn.txt");
checkFile("fraud.txt");
checkFile("tellafriend.txt");
checkFile("unsubs.txt");
$action = $_REQUEST["action"];
# Set privacy policy for IE6/WinXP users.
# If you don't do this, a lot of IE browsers won't accept cookies.
header('P3P: CP="IDC DSP COR CURa ADMa OUR IND PHY ONL COM STA"');
# Redirect in 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");
exit;
} elseif ($_GET["tries"] < 12) {
# 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 = 65 - ($tries * 5);
$timeleft = str_replace("%n",$seconds,$lang['from_paypal_time']);
echo "
".$lang['from_paypal_title']."
|
|
".$lang['from_paypal_explain']."
".$timeleft."
".$lang['from_paypal_explain2']."
|
|
";
} 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";
}
showTemplate("purchase_notfound.html");
}
return;
}
if (isset($_GET["e"])) {
if ($_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 override 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: index.php?taf=1");
} else {
header("Location: index.php");
}
} 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("customersonly.html");
}
return;
} 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.
showTemplate("fraud.html");
return;
}
} else {
# Clear affiliate cookie.
setcookie("aff", "", time()-31536000, $sys_script_folder, "." . $sys_domain);
}
}
# 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);
}
# Get salesletters array.
if (!is_array($sys_salesletters)) {
$salesletters = array("salesletter.html");
} else {
$salesletters = $sys_salesletters;
}
if (isset($_COOKIE["sln"])) {
# This visitor has already been shown a particular sales letter.
# Keep the same one in front of them and don't log another visit.
if (count($salesletters) >= $_COOKIE["sln"]) {
$salesletter = $salesletters[$_COOKIE["sln"]];
} else {
$salesletter = $salesletters[0];
setcookie("sln", 0, time()+31536000, $sys_script_folder, "." . $sys_domain);
}
} else {
# Randomly select sales letter to display.
srand();
$r = rand(0, count($salesletters)-1);
$salesletter = $salesletters[$r];
# Update visitor data for this sales letter.
if (file_exists($sys_template_folder . $salesletter . ".dat")) {
$fh = @fopen($sys_template_folder . $salesletter . ".dat", "r");
$count = str_replace("\n", "", fgets($fh));
fclose($fh);
} else {
$count = 0;
}
$count++;
$done = false;
$fh = @fopen($sys_template_folder . $salesletter . ".dat", "w+");
while (!$done) {
$fl = @flock($fh, LOCK_EX);
if ($fl) {
@fwrite($fh, $count . "\n");
$done = true;
@flock($fh, LOCK_UN);
}
}
@fclose($fh);
setcookie("sln", $r, time()+31536000, $sys_script_folder, "." . $sys_domain);
}
# Show sales letter.
showTemplate($salesletter);
// THIS CODE ALLOW USER TO DOWNLOAD BOOK AFTER COMPLATION OF PAYMO PROCESS ==============//
if(isset($_SESSION['download_book'])){
if($_SESSION['download_book'] == "allowdownload"){
//exit;
?>
0) {
# See if we're sold out.
$orders = @file($sys_template_folder . "ipn.txt");
$oc = 0;
foreach ($orders as $order) {
$order = explode("|", str_replace("\n", "", $order));
if ($order[2]==$sys_item_number) {
$oc++;
}
}
if ($oc >= $sys_max_sales) {
# Sold out
showTemplate("soldout.html");
return;
}
}
if (!$sys_currency) {
$sys_currency = "USD";
}
if (!$sys_locale) {
$sys_locale = "US";
}
# Get conversion sales letter
if (!is_array($sys_salesletters) | !isset($_COOKIE["sln"])) {
$salesletter = "salesletter.html";
} else {
$salesletter = $sys_salesletters[$_COOKIE["sln"]];
}
# Send them through the order process
if (isset($_GET["oto"])) {
# Buying OTO product
if (!isset($_COOKIE["aff"])) {
# No affiliate. Use default 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 = "http://$sys_domain" . $sys_script_folder . "?action=download";
$item_ipn_url = "http://$sys_domain" . $sys_script_folder . "ipn.php";
} else {
# Buying front-end product
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 "
".$lang['goto_paypal_title']."
".$lang['goto_paypal_explain']."
".$lang['goto_paypal_explain2']." |
|
[".$lang['goto_paypal_affiliate']." = $affemail] |
";
exit;
}
# =============================================================================
# ORDER = HANDLE ORDER VIA PAYMO
# =============================================================================
elseif ($action == "paymo") {
include('../paymo/variable.php');
$aryparms = array();
$aryparms["action"] = $action;
$aryparms["key"] = $key;
$aryparms["merchant-id"] = $merchant;
$aryparms["password"] = $password;
$aryparms["service-id"] = $serviceid;
$aryparms["test"] = "0";
$aryparms["timestamp"] = time();
$aryparms["currency"] = $currency;
$aryparms["style"] = "standard";
$aryparms["Fwdurl"] = $paymo_return_url;
$aryparms['param'] = $reference;
ksort($aryparms);
$parms = "";
foreach ($aryparms as $key => $val) {
if ($parms != "") $parms .= "&" . $key . "=" . urlencode($val);
else $parms .= $key . "=" . urlencode($val);
}
$ch=curl_init();
curl_setopt($ch,CURLOPT_SSL_VERIFYPEER,0);
curl_setopt($ch,CURLOPT_SSL_VERIFYHOST,0);
curl_setopt($ch,CURLOPT_URL,$paymo_request_url);
curl_setopt($ch,CURLOPT_POST,1);
curl_setopt($ch,CURLOPT_POSTFIELDS,$parms);
curl_setopt($ch,CURLOPT_RETURNTRANSFER,1);
$res = curl_exec($ch);
$result = curl_multi_getcontent($ch);
$start = strpos($result, "");
$end = strpos($result, "");
$length = $end - $start;
$str = substr($result, $start, $length);
$str = html_entity_decode($str);
echo $str;
}
# =============================================================================
# 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;
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 = "downloadoto.html";
} else {
# Show appropriate page.
if ($action == "squeeze") {
$filename = "squeeze.html";
} else {
$filename = "download.html";
}
}
} else {
# Expired.
$filename = "downloadexpired.html";
}
}
}
}
if ($invalid) {
# Invalid ID.
$filename = "invalid.html";
}
showTemplate($filename);
return;
}
# =============================================================================
# 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 == strtolower($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 "
".$lang['error_title']."
".$lang['download_error']."
";
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 (!empty($sendername) && !empty($senderpaypal) && is_array($emails)) {
if (strpos(strtolower($_SERVER["HTTP_REFERER"]), strtolower($sys_domain)) > 0) {
# 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) {
mailer("email_taf.txt", $email);
$tafcount++;
}
}
# Write new count.
$fh = @fopen($sys_template_folder . "tellafriend.txt", "w+");
@fwrite($fh, $tafcount);
@fclose($fh);
# Thanks!
echo "
".$lang['taf_title']."
".$lang['taf_thankyou']."
";
exit;
} else {
# Mail can only be sent from this domain.
echo "
".$lang['error_title']."
".$lang['taf_mail_error']."
";
exit;
}
} else {
echo "
".$lang['error_title']."
".$lang['taf_required']."
";
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 "
".$lang['unsub_title']."
".$lang['unsub_explain']."
";
exit;
}
}
# =============================================================================
# ALL OTHER PURCHASE-REQUIRED ACTIONS
# =============================================================================
elseif (substr($action, 0, 5) != "admin") {
# 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 = "oto.html";
} elseif ($action=="squeeze") {
# Show name squeeze page.
$filename = "squeeze.html";
} elseif ($action=="download") {
if ($sys_oto && !isset($_GET["dl"])) {
# Show OTO page.
$filename = "oto.html";
} else {
# Show download page.
$filename = "download.html";
}
} elseif ($action=="downloadoto") {
# Show OTO download page.
$filename = "downloadoto.html";
} else {
# Invalid action, show salesletter
header("Location: index.php");
exit;
}
} else {
# No valid, unexpired sale found. Show expired page.
$filename = "downloadexpired.html";
}
showTemplate($filename);
return;
}
# =============================================================================
# ADMIN BACK-END FUNCTIONS
# =============================================================================
if (substr($action, 0, 5) == "admin" && $action != "admin" && $action != "adminlogin" && !$_COOKIE["7ds_admin"]) {
# Not logged in. Redirect to login.
header("Location: index.php?action=admin");
exit;
}
if ($action == "admin") {
# Get username/password for admin area.
echo "
$7 Secrets - Admin Login
Admin Login
";
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("7ds_admin", true);
setcookie("7ds_uniq", $uniq);
$fh = fopen($sys_template_folder . "uniq.txt", "w+");
fwrite($fh, $uniq);
fclose($fh);
header("Location: index.php?action=adminmenu");
exit;
} else {
echo "
Error
Invalid username or password.
";
exit;
}
}
if ($_COOKIE["7ds_admin"]) {
$uniq = file_get_contents($sys_template_folder . "uniq.txt");
if ($_COOKIE["7ds_uniq"] != $uniq) {
# Somebody's trying to hack.
setcookie("7ds_admin", "", time() - 3600);
header("Location: index.php?action=admin");
exit;
}
$adminheader = "
Admin Panel
![\"$7](\"adminlogo.png\")
$7 Secrets Scripts v$sys_version
";
$adminfooter = "
";
# 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
Admin Panel
- Show All Sales
- Show Last 50 Sales
- Show Last 100 Sales
- Show My Sales
- Search Sales
- Conversion Report
- Referrer Report
- Referrer Domains Report
- My Sales Referrer Report
- My Sales Referrer Domains Report
- Fraud Report
- Affiliates Report
- Email Affiliates
- Export Purchases to CSV
- Export Paymo to CSV
- Logout
$taf people have been emailed using the tell-a-friend feature.
$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
Back to Menu
Clicking the EXPIRES link will add another $sys_expire_hours hours to the customer's download link expiration.
$rcount total records. Showing $showing. Your sales are highlighted.
| PayPal Receipt ID |
Item Number |
Affiliate Email |
Customer Email |
First Name |
Last Name |
Payment |
Bought |
Expires |
";
$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 "
| $record[0] |
$record[2] |
$record[3] |
$record[4] |
$record[5] |
$record[6] |
$record[8] |
$date |
$expires |
";
}
if ($bgcolor == "#ffffff") {
$bgcolor = "#eeeeee";
} else {
$bgcolor = "#ffffff";
}
}
}
}
echo "
$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","Referrer","Affiliate","IP","","","","Salesletter"' . "\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\",\"$record[12]\",\"$record[13]\",\"$record[14]\",\"$record[15]\",\"$record[16]\",\"$record[17]\",\"$record[18]\"\r\n";
}
}
}
exit;
} elseif ($action == "adminpaymoexport") {
# Export Paymo records to CSV.
$first = true;
header("Content-Type: application/octet-stream");
header("Content-Disposition: attachment; filename=paymo.csv");
header("Content-Transfer-Encoding: binary");
$records = @file($sys_template_folder . "paymo.txt");
if ($records) {
foreach ($records as $rec) {
$rec = str_replace("\n", "", $rec);
if (trim($rec)) {
if ($first) {
# Output headers.
echo '"Paymo Transaction ID","Name","Phone","Email","Status","Date"' . "\r\n";
$first = false;
}
$record = explode("|", $rec);
echo "\"$record[0]\",\"$record[1]\",\"$record[2]\",\"$record[3]\",\"$record[4]\",\"$record[5]\"\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
Back to Menu
$rcount total records. Showing $showing. Your sales are highlighted.
| Referrer |
Domain |
Keywords |
Sales |
";
$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, 97) . "...";
} else {
$sref = $ref;
}
echo "
| $sref |
$host |
$keywords |
$sales |
";
if ($bgcolor=="#ffffff") {
$bgcolor = "#eeeeee";
} else {
$bgcolor = "#ffffff";
}
}
echo "
$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
Back to Menu
$rcount total records. Showing $showing. Your sales are highlighted.
| Domain |
Sales |
";
$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 "
| $ref |
$sales |
";
if ($bgcolor=="#ffffff") {
$bgcolor = "#eeeeee";
} else {
$bgcolor = "#ffffff";
}
}
echo "
$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
Back to Menu
$rcount total records. Showing $showing. Your sales are highlighted.
| Affiliate |
Sales |
";
$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 "
| $ref |
$sales |
";
if ($bgcolor=="#ffffff") {
$bgcolor = "#eeeeee";
} else {
$bgcolor = "#ffffff";
}
}
echo "
$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;$iBack to Menu
Link expiration has been extended by $sys_expire_hours hours.
Give customer this link to download:
http://$sys_domain" . $sys_script_folder . "?action=download&id=$id
$adminfooter
";
} else {
echo "
Back to Menu
No matching purchase record found.
";
}
exit;
} elseif ($action == "adminemailaffiliates") {
# Show affiliate mailer form.
echo "$adminheader
Back to Menu
$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>\r\n";
$headers .= "X-Sender: \"$sys_item_name\"<$eaddress>\r\n";
$headers .= "X-Mailer: 7DS v$sys_version\r\n";
$headers .= "X-Priority: 3\r\n";
$headers .= "Return-Path: \"$sys_item_name\"<$eaddress>\r\n";
$headers .= "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
Sending " . count($affs) . " emails...
";
foreach ($affs as $aff) {
# Send the mailer.
$sendbody = str_replace("[EMAIL]", $aff, $ebody);
@mail($aff, $esubject, $sendbody, $headers);
echo "- $aff
";
flush();
}
echo "
Back to Menu
$adminfooter
";
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
Back to Menu
$rcount total fraudulent transactions. Fraudulent buyers do not receive the download.
It is recommended that you report fraudulent buyers to PayPal at 888-215-5506.
| PayPal Receipt ID |
Item Number |
Affiliate Email |
Customer Email |
First Name |
Last Name |
Payment |
Date |
|
";
$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 "
| $record[0] |
$record[2] |
$record[3] |
$record[4] |
$record[5] |
$record[6] |
$record[8] |
$date |
not fraud |
";
}
if ($bgcolor=="#ffffff") {
$bgcolor = "#eeeeee";
} else {
$bgcolor = "#ffffff";
}
}
}
}
echo "
$adminfooter
";
exit;
} elseif ($action == "adminapprove") {
$fraud_file = "";
# 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"]) {
$rec[9] = time() + (3600 * $sys_expire_hours);
$record = implode("|", $rec) ."\n";
$done = false;
while (!$done) {
$fh = fopen($sys_template_folder . "ipn.txt", "a+");
$fl = @flock($fh, LOCK_EX);
if ($fl) {
fwrite($fh, $record);
$done = true;
@flock($fh, LOCK_UN);
}
@fclose($fh);
$txn_id = $rec[0];
$item_name = $rec[1];
$item_number = $rec[2];;
$receiver_email = $rec[3];
$payer_email = $rec[4];
$payer_firstname = $rec[5];
$payer_lastname = $rec[6];
$payer_business = $rec[7];
$payment_amount = $rec[8];
}
} else {
$fraud_file = $fraud_file . $record;
}
}
# Delete the fraud record
$done = false;
$fh = @fopen($sys_template_folder . "fraud.txt", "w+");
while (!$done) {
$fl = @flock($fh, LOCK_EX);
if ($fl) {
@fwrite($fh, $fraud_file);
}
$done = true;
@flock($fh, LOCK_UN);
}
@fclose($fh);
echo "$adminheader
Back to Menu
The sale has been recorded in your purchase file.
";
# Only send email if it's configured to do so in settings.php
if ($sys_ipn_email) {
mailer("email_download_link.txt", $payer_email);
echo "The customer has been emailed their download link.
";
}
exit;
} elseif ($action == "adminsearch") {
# Show sales search form.
echo "$adminheader
Back to Menu
$adminfooter
";
exit;
} elseif ($action=="adminsearch2") {
echo "$adminheader
Back to Menu
Matching Records:
Clicking the EXPIRES link will add another $sys_expire_hours hours to the customer's download link expiration.
| PayPal Receipt ID |
Item Number |
Affiliate Email |
Customer Email |
First Name |
Last Name |
Payment |
Bought |
Expires |
";
$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 "
| $rec[0] |
$rec[2] |
$rec[3] |
$rec[4] |
$rec[5] |
$rec[6] |
$rec[8] |
$date |
$expires |
";
}
}
echo "
$matches matching record(s) found.
";
exit;
} elseif ($action=="adminconversion") {
# Show conversion report.
echo "$adminheader
Back to Menu
Conversion Report
| sales letter | visits | sales | conversion rate |
";
if (is_array($sys_salesletters)) {
$salesletters = $sys_salesletters;
} else {
$salesletters = array("salesletter.html");
}
$sales = array();
$records = @file($sys_template_folder . "ipn.txt");
foreach ($records as $rec) {
$record = explode("|", str_replace("\n", "", $rec));
if (isset($record[18]) && $record[18] != "") {
if (isset($sales[$record[18]])) {
$sales[$record[18]]++;
} else {
$sales[$record[18]]=1;
}
}
}
$bgcolor = "white";
foreach ($sales as $salesletter => $sales) {
$fh = @fopen($sys_template_folder . $salesletter . ".dat", "r");
$visits = str_replace("\n", "", @fgets($fh));
@fclose($fh);
if ($visits>0) {
$crate = round(($sales/$visits)*100, 2);
} else {
$crate = "-";
}
echo "
| $salesletter | $visits | $sales | $crate% |
";
if ($bgcolor=="white") {
$bgcolor = "#ffffcc";
} else {
$bgcolor = "white";
}
}
if (count($sales) == 0) {
echo "| No conversion data is currently available. |
";
}
echo "
";
exit;
} elseif ($action == "adminlogout") {
# Logout.
setcookie("7ds_admin", "", time() - 3600);
header("Location: index.php");
exit;
}
}
// =====================================================================================//
?>