<?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.       *
 ************************************************************************/

// Some security stuff...
if ((ereg(basename(__FILE__), $_SERVER['PHP_SELF'])) || (!is_admin())) {
	$INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4)."/security.php";
	require($INC);
}

// Add description as navigation point
ADD_DESCR("admin", basename(__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))
					{
						if ($aid == "0") {
							// No admin assigned!
							$aid = SPONSOR_NO_ADMIN;
						} else {
							// Load admin's email address for contact
							$result_aid = SQL_QUERY_ESC("SELECT email FROM "._MYSQL_PREFIX."_admins WHERE id='%s' LIMIT 1",
							 array(bigintval($aid)), __FILE__, __LINE__);
							list($aid) = SQL_FETCHROW($result_aid);
							SQL_FREERESULT($result_aid);

							// Check if admin login is still in db
							if (empty($aid)) $aid = ADMIN_NOT_FOUND;
						}

						// Transfer data to array
						$content = array(
							'aid'   => $aid,
							'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
			$result = 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, referral count and points
			if (($refid > 0) && ($refid != $id)) {
				// Update referral account
				$result = 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($CONFIG['sponsor_ref_points'], bigintval($refid)), __FILE__, __LINE__);

				// Whas that update fine?
				if (SQL_AFFECTEDROWS() == 1) {
					// Load referral'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($CONFIG['sponsor_ref_points']);
						$REFERRAL['gender']      = TRANSLATE_GENDER($REFERRAL['gender']);

						// Send notification to referral
						$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, 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, ADMIN_SPONSOR_NONE_PENDING);
}

// Free memory
SQL_FREERESULT($result);

//
?>