<?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                      *
 * -------------------------------------------------------------------- *
 * $Revision:: 856                                                    $ *
 * $Date:: 2009-03-06 20:24:32 +0100 (Fr, 06. March 2009)             $ *
 * $Tag:: 0.2.1-FINAL                                                 $ *
 * $Author:: stelzi                                                   $ *
 * Needs to be in all Files and every File needs "svn propset           *
 * svn:keywords Date Revision" (autoprobset!) at least!!!!!!            *
 * -------------------------------------------------------------------- *
 * 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 (IS_FORM_SENT()) {
	// Does he have selected at least one sponsor?
	if (SELECTION_COUNT(REQUEST_POST('id')) > 0) {
		// At least one entry selected
		foreach (REQUEST_POST('id') as $id => $selected) {
			// Secure ID number and init $content
			$content = array(
				'id'    => bigintval($id),
				'refid' => 0
			);

			// 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($content['id']), __FILE__, __LINE__);

			if (SQL_NUMROWS($result_main) == 1) {
				// Load data
				$content = 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($content['id']), __FILE__, __LINE__);
				if (SQL_NUMROWS($result) > 0) {
					// Payment does exist
					while ($content2 = SQL_FETCHARRAY($result)) {
						// Merge both arrays
						$content = merge_array($content, $content2);

						// Set default email
						$content['email'] = getMessage('SPONSOR_NO_ADMIN');
						if ($content['aid'] > "0") {
							// Load admin's email address for contact
							$content['email'] = GET_ADMIN_EMAIL($content['aid']);
						} // END - if

						// Transfer data to array
						$data = array(
							'aid'   => $content['email'],
							'order' => ($content['pay_count'] * $content['pay_rate'])." ".$content['pay_currency'],
							'stamp' => MAKE_DATETIME($content['pay_ordered'], "2"),
							'pname' => $content['pay_name'],
						);
	
						// Load email template
						$content['msg'] = LOAD_EMAIL_TEMPLATE("sponsor_unlock_sponsor_pay", $data, $content['id']);
					}
				} else {
					// No payments found
					$content['msg'] = getMessage('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($content['id']), __FILE__, __LINE__);

			// Update, if applyable, referal count and points
			if (($content['refid'] > 0) && ($content['refid'] != $content['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($content['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($content['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'], getMessage('SPONSOR_REF_NOTIFY_SUBJ'), $REF_MSG);
					}

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

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

			// So let's send the email away
			$msg = LOAD_EMAIL_TEMPLATE("sponsor_unlocked", $content);
			SEND_EMAIL($content['email'], getMessage('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 ($content = SQL_FETCHARRAY($result)) {
		// Transfer data to array
		// @TODO Rewritings: remote->remote_addr, created->sponsor_created in template
		$content = array(
			'sw'      => $SW,
			'id'      => $content['id'],
			'gender'   => TRANSLATE_GENDER($content['gender']),
			'surname' => $content['surname'],
			'family'  => $content['family'],
			'email'   => "mailto:".$content['email'],
			'remote'  => $content['remote_addr'],
			'created' => MAKE_DATETIME($content['sponsor_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);

//
?>