<?php
/************************************************************************
 * MXChange v0.2.1                                    Start: 11/10/2004 *
 * ===============                              Last change: 03/18/2005 *
 *                                                                      *
 * -------------------------------------------------------------------- *
 * File              : bonus_functions.php                              *
 * -------------------------------------------------------------------- *
 * Short description : Special functions for bonus extension            *
 * -------------------------------------------------------------------- *
 * Kurzbeschreibung  : Spezielle Funktion fuer bonus-Erweiterung        *
 * -------------------------------------------------------------------- *
 * $Revision::                                                        $ *
 * $Date::                                                            $ *
 * $Tag:: 0.2.1-FINAL                                                 $ *
 * $Author::                                                          $ *
 * Needs to be in all Files and every File needs "svn propset           *
 * svn:keywords Date Revision" (autoprobset!) at least!!!!!!            *
 * -------------------------------------------------------------------- *
 * Copyright (c) 2003 - 2009 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')) {
	die();
} // END - if

// This function must be run *BEFORE* a link is removed from table 'mxchange_user_links' !
function addTurboBonus ($mid, $userid, $type) {
	// Shall we add bonus points?
	if (getConfig('bonus_active') != 'Y') return false;

	// Init variables
	$sql = ''; $bonys = 0; $mail = 0; $column = '';

	// Select SQL command
	switch ($type)
	{
		case 'bonusid':
			$column = 'bonus_id';
			$bonus = $mid;
			break;

		case 'mailid' :
			$column = 'mail_id';
			$mail = $mid;
			break;

		default:
			logDebugMessage(__FUNCTION__, __LINE__, sprintf("Invalid type %s detected.", $type));
			break;
	}

	// Is a column name set?
	if (empty($column)) {
		// No, then abort here
		return false;
	} // END - if

	// Check for entry
	$rank = countSumTotalData($userid, 'bonus_turbo', 'id', 'userid', true, sprintf(" AND `%s`=%s", $column, $mid)) + 1;

	// Which rank?
	if ($rank == 1) {
		// First rank!
		$points = getConfig('turbo_bonus');
	} else {
		// Anything else so let's explode all entered rank points
		$test = explode(';', getConfig('turbo_rates'));
		if (!empty($test[$rank - 2])) {
			// Level found
			$points = $test[$rank - 2];
		} else {
			// Level not found!
			$points = '0.00000';
		}
	}

	// Add points to his account directly
	SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `turbo_bonus`=`turbo_bonus`+%s WHERE `userid`=%s LIMIT 1",
		array(bigintval($userid), $points), __FUNCTION__, __LINE__);

	// Rember this whole data for displaying ranking list
	SQL_QUERY_ESC("INSERT INTO `{?_MYSQL_PREFIX?}_bonus_turbo` (`userid`, `mail_id`, `bonus_id`, `level`, `points`, `timemark`) VALUES (%s, %s, %s, %s, %s, UNIX_TIMESTAMP())",
		array(
			bigintval($userid),
			bigintval($mail),
			bigintval($bonus),
			$rank,
			$points
		), __FUNCTION__, __LINE__);

	if ((getExtensionVersion('bonus') >= '0.3.5') && (getConfig('bonus_mode') != "ADD") && ($points > 0)) handleBonusPoints($points);
}

//
function addBonusRanks ($data, $type, $userid) {
	// Init variables
	$self = false; $OUT = ''; $content = array();

	// Clear rankings by default
	setConfigEntry('__rankings', '');

	// How many ranks do we have?
	$ranks = count(explode(';', getConfig('turbo_rates'))) + 1;

	// Load current user's data
	$result = SQL_QUERY_ESC("SELECT `level`, `points`, `timemark` FROM `{?_MYSQL_PREFIX?}_bonus_turbo` WHERE `%s`=%s AND `userid`=%s LIMIT 1",
		array($type, $data, $userid), __FUNCTION__, __LINE__);
	if (SQL_NUMROWS($result) == 1) {
		// Load data
		$content = merge_array($content, SQL_FETCHARRAY($result));

		// Remember all values for later use
		$self  = true;

		// Transfer data to template
		$content['yr_level']  = $content['level'];
		$content['yr_points'] = translateComma($content['points']);
		$content['yr_tmark']  = generateDateTime($content['timemark'], '1');

		// Load template
		setConfigEntry('__rankings', loadTemplate('show_bonus_yr', true, $content));
	} // END - if

	// Load rankings
	$result = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_bonus_turbo` WHERE %s=%s ORDER BY `level` ASC LIMIT %s",
		array($type, $data, getConfig('bonus_lines')), __FUNCTION__, __LINE__);
	if (SQL_NUMROWS($result) > 0) {
		// Start generating the ranking list
		$max = SQL_NUMROWS($result);

		// Init variables
		$SW = 2; $content = array();

		// Output all ranks (levels)
		for ($rank = 1; $rank <= $max; $rank++) {
			// Load data
			$result_users = SQL_QUERY_ESC("SELECT `userid`, `points`, `timemark` FROM `{?_MYSQL_PREFIX?}_bonus_turbo` WHERE `%s`=%s AND level=%s LIMIT 1",
				array($type, $data, $rank), __FUNCTION__, __LINE__);

			// Nothing found by default
			$content['userid'] = '---'; $content['points'] = '---';

			// Are you one of them?
			if (SQL_NUMROWS($result_users) == 1) {
				// Load data
				$content = merge_array($content, SQL_FETCHARRAY($result_users));

				// Translate comma
				$content['points'] = translateComma($content['points']);
			} // END - if

			// Add more
			$content['rank'] = $rank;
			$content['sw']   = $SW;

			// Output row
			$OUT .= "<tr>
  <td class=\"bonus_rank_".$content['level']." bottom2 switch_sw".$content['sw']."\">&nbsp;".$content['level'].".</td>
  <td class=\"bonus_rank_".$content['level']." bottom2 switch_sw".$content['sw']."\" align=\"center\">".$content['userid']."</td>
  <td class=\"bonus_rank_".$content['level']." bottom2 switch_sw".$content['sw']."\" align=\"center\">".$content['points']."</td>
</tr>\n";

			// Switch color
			$SW = 3 - $SW;
		} // END - for

		if ($self === false) {
			// If current user was not found set constant
			// @TODO Try to find a way for rewriting this constant
			setConfigEntry('__rankings', getMessage('BONUS_RANK_YOU_ARE_404'));
		} // END - if
	} else {
		// No entries found!
		$OUT = "<tr>
  <td colspan=\"3\" align=\"center\" height=\"30\" class=\"bottom2\">
    <div class=\"guest_failed\">".sprintf(getMessage('BONUS_NO_RANKS'), $data)."</div>
  </td>
</tr>\n";
	}

	// Retutn content
	return $OUT;
}

//
function handleBonusPoints ($mode) {
	// Shall we add bonus points?
	if (getConfig('bonus_active') != 'Y') return;

	// Switch to jackpot-mode when no UID is supplied but userid-mode is selected
	if ((getConfig('bonus_mode') == 'UID') && (getConfig('bonus_userid') == '0') && (isExtensionActive('jackpot'))) {
		// Update database & config
		updateConfiguration('bonus_mode', 'JACKPOT');
	} // END - if

	if ($mode == 'login_bonus') {
		// Login bonus detected
		$points = getConfig('login_bonus');
	} else {
		// Direct points supplied
		$points = $mode;
	}

	// Subtract points from...
	switch (getConfig('bonus_mode')) {
		case 'JACKPOT': // ... jackpot
			if ((isExtensionActive('jackpot')) && (subtractPointsFromJackpot($points) == -1) && (getConfig('bonus_userid') > 0)) {
				// Check points amount first...
				$total = countSumTotalData(getConfig('bonus_userid'), 'user_points', 'points') - countSumTotalData(getConfig('bonus_userid'), 'user_data', 'used_points');
				if ($total >= $points) {
					// Subtract points from userid's account
					subtractPoints('bonus_payout_jackpot', getConfig('bonus_userid'), $points);
				} // END - if
			} // END - if
			break;

		case 'UID': // ... userid's account
			// Check his amount first
			$total = countSumTotalData(getConfig('bonus_userid'), 'user_points', 'points') - countSumTotalData(getConfig('bonus_userid'), 'user_data', 'used_points');
			if ($total >= $points) {
				// Subtract points from userid's account
				subtractPoints('bonus_payout_userid', getConfig('bonus_userid'), $points);
			} elseif (isExtensionActive('jackpot')) {
				// Try to subtract from jackpot
				$dummy = subtractPointsFromJackpot($points);
			}
			break;
	}
}

// Purges expired fast-click bonus entries
function purgeExpiredTurboBonus() {
	// Remove entries
	$result = SQL_QUERY("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_bonus_turbo` WHERE `timemark` < (UNIX_TIMESTAMP() - {?bonus_timeout?})", __FUNCTION__, __LINE__);

	if (SQL_AFFECTEDROWS() > 0) {
		// Send out email to admin
		sendAdminNotification(getMessage('AUTOPURGE_ADMIN_TURBO_SUBJECT'), 'admin_autopurge_turbo', SQL_AFFECTEDROWS(), '');
	} // END - if
}

//
?>