<?php
/************************************************************************
 * M-XChange v0.2.1                                   Start: 04/23/2005 *
 * ================                             Last change: 05/19/2008 *
 *                                                                      *
 * -------------------------------------------------------------------- *
 * File              : what-unlock_sponsor.php                          *
 * -------------------------------------------------------------------- *
 * Short description : Unlock sponsor accounts                          *
 * -------------------------------------------------------------------- *
 * Kurzbeschreibung  : Sponsorenaccounts freigeben                      *
 * -------------------------------------------------------------------- *
 *                                                                      *
 * -------------------------------------------------------------------- *
 * Copyright (c) 2003 - 2008 by Roland Haeder                           *
 * For more information visit: http://www.mxchange.org                  *
 *                                                                      *
 * This program is free software; you can redistribute it and/or modify *
 * it under the terms of the GNU General Public License as published by *
 * the Free Software Foundation; either version 2 of the License, or    *
 * (at your option) any later version.                                  *
 *                                                                      *
 * This program is distributed in the hope that it will be useful,      *
 * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
 * GNU General Public License for more details.                         *
 *                                                                      *
 * You should have received a copy of the GNU General Public License    *
 * along with this program; if not, write to the Free Software          *
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
 * MA  02110-1301  USA                                                  *
 ************************************************************************/

// Some security stuff...
if ((!defined('__SECURITY')) || (!IS_ADMIN())) {
	$INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4)."/security.php";
	require($INC);
}

// Add description as navigation point
ADD_DESCR("admin", __FILE__);

// Check if admin has submitted form
if (isset($_POST['ok'])) {
	// Does he have selected at least one sponsor?
	if (SELECTION_COUNT($_POST['id']) > 0) {
		// At least one entry selected
		foreach ($_POST['id'] as $id => $sel) {
			// Secure ID number
			$id = bigintval($id);

			// Load his personal data
			$result_main = SQL_QUERY_ESC("SELECT gender, surname, family, email, remote_addr, sponsor_created, points_amount, refid
FROM `{!_MYSQL_PREFIX!}_sponsor_data`
WHERE status='PENDING' AND id='%s' LIMIT 1",
 array($id), __FILE__, __LINE__);
			$refid = 0;
			if (SQL_NUMROWS($result_main) == 1) {
				// Load data and free memory
				list($gender, $sname, $fname, $email, $ip, $created, $points, $refid) = SQL_FETCHROW($result_main);

				// Check for open payments and close them
				$result = SQL_QUERY_ESC("SELECT DISTINCT so.aid, so.pay_count, so.pay_ordered, so.pay_status,
sp.pay_name, sp.pay_rate, sp.pay_currency
FROM `{!_MYSQL_PREFIX!}_sponsor_orders` AS so
LEFT JOIN `{!_MYSQL_PREFIX!}_sponsor_paytypes` AS sp
ON sp.id=so.payid
WHERE so.sponsorid='%s'
ORDER BY sp.pay_name",
 array($id), __FILE__, __LINE__);
				if (SQL_NUMROWS($result) > 0) {
					// Payment does exist
					while (list($aid, $count, $ordered, $status, $pname, $prate, $pcurr) = SQL_FETCHROW($result))
					{
						// Set default email
						$email = SPONSOR_NO_ADMIN;
						if ($aid > "0") {
							// Load admin's email address for contact
							$email = GET_ADMIN_EMAIL($aid);
						}

						// Transfer data to array
						$content = array(
							'aid'   => $email,
							'order' => ($count * $prate)." ".$pcurr,
							'stamp' => MAKE_DATETIME($ordered, "2"),
							'pname' => $pname,
						);
	
						// Load email template
						$content['msg'] = LOAD_EMAIL_TEMPLATE("sponsor_unlock_sponsor_pay", $content, $id);
					}
				} else {
					// No payments found
					$content['msg'] = SPONSOR_NO_PAYMENTS_FOUND;
				}

				// Free memory
				SQL_FREERESULT($result);
			}

			// Free memory
			SQL_FREERESULT($result_main);

			// Unlock sponsor account
			SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_sponsor_data` SET status='CONFIRMED'
WHERE id='%s' AND status='PENDING' LIMIT 1",
 array($id), __FILE__, __LINE__);

			// Update, if applyable, referal count and points
			if (($refid > 0) && ($refid != $id)) {
				// Update referal account
				SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_sponsor_data`
SET points_amount=points_amount+%s, ref_count=ref_count+1
WHERE id='%s' LIMIT 1",
 array(getConfig('sponsor_ref_points'), bigintval($refid)), __FILE__, __LINE__);

				// Whas that update fine?
				if (SQL_AFFECTEDROWS() == 1) {
					// Load referal's data
					$result = SQL_QUERY_ESC("SELECT id, gender, surname, family, email,
(points_amount - points_used) AS points, receive_warnings, ref_count AS refs
FROM `{!_MYSQL_PREFIX!}_sponsor_data`
WHERE id='%s' LIMIT 1",
 array(bigintval($refid)), __FILE__, __LINE__);
					$REFERRAL = SQL_FETCHARRAY($result);

					// Send warnings out?
					if ($REFERRAL['receive_warnings'] == "Y") {
						// Translate some data
						$REFERRAL['points']     = TRANSLATE_COMMA($REFERRAL['points']);
						$REFERRAL['ref_points'] = TRANSLATE_COMMA(getConfig('sponsor_ref_points'));
						$REFERRAL['gender']      = TRANSLATE_GENDER($REFERRAL['gender']);

						// Send notification to referal
						$REF_MSG = LOAD_EMAIL_TEMPLATE("sponsor_ref_notify", $REFERRAL);
						SEND_EMAIL($REFERRAL['email'], SPONSOR_REF_NOTIFY_SUBJ, $REF_MSG);
					}

					// Free memory
					SQL_FREERESULT($result);
				}
			}

			// Transfer data to array
			$content['gender']   = TRANSLATE_GENDER($gender);
			$content['surname'] = $sname;
			$content['family']  = $fname;
			$content['sponsor'] = $id;
			$content['points']  = TRANSLATE_COMMA($points);

			// So let's send the email away
			$msg = LOAD_EMAIL_TEMPLATE("sponsor_unlocked", $content);
			SEND_EMAIL($email, SPONSOR_UNLOCKED_SUBJ, $msg);
		}
	} else {
		// Nothing selected
		LOAD_TEMPLATE("admin_settings_saved", false, getMessage('ADMIN_SPONSOR_NONE_SELECTED_UNLOCK'));
	}

	// Add seperator
	OUTPUT_HTML("<br />");
}

// Begin listing of all pending sponsor accounts
$result = SQL_QUERY("SELECT id, gender, surname, family, email, remote_addr, sponsor_created
FROM `{!_MYSQL_PREFIX!}_sponsor_data`
WHERE status='PENDING' ORDER BY `id`", __FILE__, __LINE__);

if (SQL_NUMROWS($result) > 0) {
	// Entries found so let's list them!
	$OUT = ""; $SW = 2;
	while (list($id, $gender, $sname, $fname, $email, $ip, $created) = SQL_FETCHROW($result)) {
		// Transfer data to array
		$content = array(
			'sw'      => $SW,
			'id'      => $id,
			'gender'   => TRANSLATE_GENDER($gender),
			'surname' => $sname,
			'family'  => $fname,
			'email'   => "mailto:".$email,
			'remote'  => $ip,
			'created' => MAKE_DATETIME($created, "2"),
		);

		// Load row template and switch colors
		$OUT .= LOAD_TEMPLATE("admin_unlock_sponsor_row", true, $content);
		$SW = 3 - $SW;
	}
	define('__SPONSOR_ROWS', $OUT);

	// Load template
	LOAD_TEMPLATE("admin_unlock_sponsor");
} else {
	// No pending accounts found
	LOAD_TEMPLATE("admin_settings_saved", false, getMessage('ADMIN_SPONSOR_NONE_PENDING'));
}

// Free memory
SQL_FREERESULT($result);

//
?>