0) {
// Check for code
$code = generateRandomCode(getConfig('transfer_code'), REQUEST_POST('code_chk'), getUserId(), constant('__TRANSFER_MAX_VALUE'));
$valid_code = ($code == REQUEST_POST('code'));
} else {
// Zero length (= disabled) is always valid!
$valid_code = true;
}
// Test password
$valid_pass = ($pass == generateHash(REQUEST_POST('password'), $pass));
// Test transfer amount
$valid_amount = ((REQUEST_ISSET_POST('points')) && (REQUEST_POST('points') <= constant('__TRANSFER_MAX_VALUE')));
// Test reason for transfer
$valid_reason = (REQUEST_ISSET_POST('reason'));
// Test if a recipient is selected
$valid_recipient = (REQUEST_POST('to_uid') > 0);
// Check for nickname extension and set additional data
$nick = false; $add = ', `userid`';
if (EXT_IS_ACTIVE('nickname')) {
$add = ', `nickname`';
$nick = true;
}
// Re-check receivers and own personal data
$result = SQL_QUERY_ESC("SELECT `userid`, `gender`, `surname`, `family`, `email`".$add." FROM `{!_MYSQL_PREFIX!}_user_data` WHERE `userid` IN ('%s','%s') AND `status`='CONFIRMED' ORDER BY `userid` ASC LIMIT 2",
array(getUserId(), bigintval(REQUEST_POST('to_uid'))), __FILE__, __LINE__);
$valid_data = (SQL_NUMROWS($result) == 2);
if ($valid_code && $valid_pass && $valid_amount && $valid_reason && $valid_recipient) {
// Let's start the transfer and load user data
list($uid1, $gender1, $sname1, $fname1, $email1, $nick1) = SQL_FETCHROW($result);
list($uid2, $gender2, $sname2, $fname2, $email2, $nick2) = SQL_FETCHROW($result);
SQL_FREERESULT($result);
// @TODO Rewrite all these constants to array elements
if ($uid1 == getUserId()) {
// Data row 1 is sender's data
define('__SENDER_GENDER' , translateGender($gender1));
define('__SENDER_NICK' , $nick1);
define('__SENDER_SNAME' , $sname1);
define('__SENDER_FNAME' , $fname1);
define('__SENDER_EMAIL' , $email1);
// Data row 2 is recpient's data
define('__RECIPIENT_GENDER', translateGender($gender2));
define('__RECIPIENT_NICK' , $nick2);
define('__RECIPIENT_SNAME' , $sname2);
define('__RECIPIENT_FNAME' , $fname2);
define('__RECIPIENT_EMAIL' , $email2);
// Prepare variables for testing
$TEST_NICK_SENDER = $nick1;
$TEST_NICK_REC = $nick2;
} else {
// Data row 2 is sender's data
define('__SENDER_GENDER' , translateGender($gender2));
define('__SENDER_NICK' , $nick2);
define('__SENDER_SNAME' , $sname2);
define('__SENDER_FNAME' , $fname2);
define('__SENDER_EMAIL' , $email2);
// Data row 1 is recpient's data
define('__RECIPIENT_GENDER', translateGender($gender1));
define('__RECIPIENT_NICK' , $nick1);
define('__RECIPIENT_SNAME' , $sname1);
define('__RECIPIENT_FNAME' , $fname1);
define('__RECIPIENT_EMAIL' , $email1);
// Prepare variables for testing
$TEST_NICK_SENDER = $nick2;
$TEST_NICK_REC = $nick1;
}
// Sender's UID is always currently stored in cookie userid...
define('__SENDER_UID' , getUserId());
define('__RECIPIENT_UID' , REQUEST_POST('to_uid'));
$SENDER = constant('__SENDER_UID');
$RECIPIENT = constant('__RECIPIENT_UID');
if ($nick) {
if (($TEST_NICK_SENDER != constant('__SENDER_UID')) && (!empty($TEST_NICK_SENDER))) {
$SENDER = constant('__SENDER_NICK');
}
if (($TEST_NICK_REC != constant('__RECIPIENT_UID')) && (!empty($TEST_NICK_REC))) {
$RECIPIENT = constant('__RECIPIENT_NICK');
}
}
// Remember transfer reason and fancy date/time in constants
define('__TRANSFER_REASON', REQUEST_POST('reason'));
define('__TRANSFER_EXPIRES', createFancyTime(getConfig('transfer_age')));
// Generate tranafer id
define('__TRANS_ID', bigintval(generateRandomCode("10", mt_rand(0, 99999), getUserId(), REQUEST_POST('reason'))));
// Add entries to both tables
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_transfers_in` (`userid`, `from_uid`, `points`, `reason`, `time_trans`, `trans_id`) VALUES ('%s','%s','%s','%s', UNIX_TIMESTAMP(),'%s')",
array(bigintval(REQUEST_POST('to_uid')), getUserId(), bigintval(REQUEST_POST('points')), REQUEST_POST('reason'), __TRANS_ID),
__FILE__, __LINE__);
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_transfers_out` (`userid`, `to_uid`, `points`, `reason`, `time_trans`, `trans_id`) VALUES ('%s','%s','%s','%s', UNIX_TIMESTAMP(),'%s')",
array(getUserId(), bigintval(REQUEST_POST('to_uid')), bigintval(REQUEST_POST('points')), REQUEST_POST('reason'), __TRANS_ID),
__FILE__, __LINE__);
// Add points to account *directly* ...
ADD_POINTS_REFSYSTEM_DIRECT('member_transfer', bigintval(REQUEST_POST('to_uid')), bigintval(REQUEST_POST('points')));
// ... and add it to current user's used points
SUB_POINTS('transfer', getUserId(), REQUEST_POST('points'));
// First send email to recipient
$message = LOAD_EMAIL_TEMPLATE('member_transfer_recipient', '', constant('__RECIPIENT_UID'));
sendEmail(constant('__RECIPIENT_EMAIL'), getMessage('TRANSFER_MEMBER_RECIPIENT_SUBJ') . ': ' . $SENDER, $message);
// Second send email to sender
$message = LOAD_EMAIL_TEMPLATE('member_transfer_sender', '', constant('__SENDER_UID'));
sendEmail(constant('__SENDER_EMAIL'), getMessage('TRANSFER_MEMBER_SENDER_SUBJ') . ': ' . $RECIPIENT, $message);
// At last send admin mail(s)
$ADMIN_SUBJ = sprintf("%s (%s->%s)", getMessage('TRANSFER_ADMIN_SUBJECT'), $SENDER, $RECIPIENT);
sendAdminNotification($ADMIN_SUBJ, 'admin_transfer_points');
// Transfer is completed
LOAD_TEMPLATE('admin_settings_saved', false, getMessage('TRANSFER_COMPLETED')."{--TRANSFER_CONTINUE_OVERVIEW--} ");
} elseif (!$valid_code) {
// Invalid Touring code!
LOAD_TEMPLATE('admin_settings_saved', false, "
{--TRANSFER_INVALID_CODE--}
");
REQUEST_UNSET_POST('ok');
} elseif (!$valid_pass) {
// Wrong password entered
LOAD_TEMPLATE('admin_settings_saved', false, "{--TRANSFER_INVALID_PASSWORD--}
");
REQUEST_UNSET_POST('ok');
} elseif (!$valid_amount) {
// Too much points entered
LOAD_TEMPLATE('admin_settings_saved', false, "{--TRANSFER_INVALID_POINTS--}
");
REQUEST_UNSET_POST('ok');
} elseif (!$valid_reason) {
// No transfer reason entered
LOAD_TEMPLATE('admin_settings_saved', false, "{--TRANSFER_INVALID_REASON--}
");
REQUEST_UNSET_POST('ok');
} elseif (!$valid_recipient) {
// No recipient selected
LOAD_TEMPLATE('admin_settings_saved', false, "{--TRANSFER_INVALID_RECIPIENT--}
");
REQUEST_UNSET_POST('ok');
} elseif (!$valid_data) {
// No recipient selected
LOAD_TEMPLATE('admin_settings_saved', false, "{--TRANSFER_INVALID_DATA--}
");
REQUEST_UNSET_POST('ok');
}
}
if (!isFormSent()) {
// Load member list
if (EXT_IS_ACTIVE('nickname')) {
// Load userid and nickname
$result = SQL_QUERY_ESC("SELECT `userid`, `nickname` FROM `{!_MYSQL_PREFIX!}_user_data` WHERE `status`='CONFIRMED' AND `opt_in`='Y' AND `userid` != '%s' ORDER BY `userid` ASC",
array(getUserId()), __FILE__, __LINE__);
} else {
// Load only userid
$result = SQL_QUERY_ESC("SELECT `userid`, `userid` FROM `{!_MYSQL_PREFIX!}_user_data` WHERE `status`='CONFIRMED' AND `opt_in`='Y' AND `userid` != '%s' ORDER BY `userid` ASC",
array(getUserId()), __FILE__, __LINE__);
}
if (SQL_NUMROWS($result) > 0) {
// Load list
$OUT = "
{--SELECT_NONE--} \n";
// @TODO Try to rewrite his to $content = SQL_FETCHARRAY(), see some lines above for two different queries
while (list($uid, $nick) = SQL_FETCHROW($result)) {
$OUT .= " 0) {
$rand = mt_rand(0, 99999);
$code = generateRandomCode(getConfig('transfer_code'), $rand, getUserId(), constant('__TRANSFER_MAX_VALUE'));
$img = GENERATE_IMAGE($code, false);
define('__TRANSFER_IMAGE_INPUT', " ".$img);
} else {
$code = '00000';
define('__TRANSFER_IMAGE_INPUT', getMessage('TRANSFER_NO_CODE'));
}
// Transfer maybe already entered valued'
if (REQUEST_ISSET_GET('ok')) {
// Get values from form
define('__TRANSFER_POINTS_VALUE', bigintval(REQUEST_POST('points')));
define('__TRANSFER_REASON_VALUE', strip_tags(REQUEST_POST('reason')));
} else {
// Set empty values
define('__TRANSFER_POINTS_VALUE', '');
define('__TRANSFER_REASON_VALUE', '');
}
// Output form
LOAD_TEMPLATE('member_transfer_new');
}
break;
case 'list_in': // List only incoming transactions
case 'list_out': // List only outgoing transactions
// As you can see I put list_in and list_out together. I now do a switch() again on it for the right SQL command
switch ($mode)
{
case 'list_in':
$sql = "SELECT `trans_id`, `from_uid`, `points`, `reason`, `time_trans` FROM `{!_MYSQL_PREFIX!}_user_transfers_in` WHERE `userid`=%s ORDER BY `time_trans` DESC LIMIT ".getConfig('transfer_max');
// @TODO Rewrite these constants
$NOTHING = getMessage('TRANSFER_NO_INCOMING_TRANSFERS');
define('__TRANSFER_SUM', getMessage('TRANSFER_TOTAL_INCOMING'));
define('__TRANSFER_TITLE', getMessage('TRANSFER_LIST_INCOMING'));
break;
case 'list_out':
$sql = "SELECT `trans_id`, `to_uid`, `points`, `reason`, `time_trans` FROM `{!_MYSQL_PREFIX!}_user_transfers_out` WHERE `userid`=%s ORDER BY `time_trans` DESC LIMIT ".getConfig('transfer_max');
// @TODO Rewrite these constants
$NOTHING = getMessage('TRANSFER_NO_OUTGOING_TRANSFERS');
define('__TRANSFER_SUM', getMessage('TRANSFER_TOTAL_OUTGOING'));
define('__TRANSFER_TITLE', getMessage('TRANSFER_LIST_OUTGOING'));
break;
}
// Run the SQL command
$total = 0;
$result = SQL_QUERY_ESC($sql, array(getUserId()), __FILE__, __LINE__);
if (SQL_NUMROWS($result) > 0) {
$OUT = ''; $SW = 2;
// @TODO This should be somehow rewritten to $content = SQL_FETCHARRAY(), see switch() block above for SQL queries
while (list($tid, $uid, $points, $reason, $stamp) = SQL_FETCHROW($result)) {
// Rewrite points
if ($type == 'OUT') $points = $points.'-';
// Prepare content for template
$content = array(
'sw' => $SW,
'tid' => $id,
'stamp' => generateDateTime($stamp, '3'),
'uid' => $uid,
'reason' => $reason,
'points' => translateComma($points)
);
// Load row template
$OUT .= LOAD_TEMPLATE('member_transfer_row2', true, $content);
// Add points and switch color
$total += $points;
$SW = 3 - $SW;
} // END - while
// Free memory
SQL_FREERESULT($result);
} else {
// Nothing for in or out
$OUT = "
".LOAD_TEMPLATE('admin_settings_saved', true, $NOTHING)."
";
}
// ... and add them to a constant for the template
// @TODO Rewrite these constants
define('__TRANSFER_ROWS', $OUT);
// Remeber total amount
define('__TRANSFER_TOTAL_VALUE', $total);
// Load final template
LOAD_TEMPLATE('member_transfer_list');
break;
case 'list_all': // List all transactions
// We fill a temporary table with data from both tables. This is much easier
// to code and unstand by you as sub-SELECT queries. I know this is not the
// fastest way but it shall be fine for now.
//
// First of all create the temporary table
$result = SQL_QUERY("CREATE TEMPORARY TABLE `{!_MYSQL_PREFIX!}_transfers_tmp` (
`trans_id` VARCHAR(12) NOT NULL DEFAULT '',
`party_uid` BIGINT(20) UNSIGNED NOT NULL DEFAULT '0',
`points` BIGINT(20) UNSIGNED NOT NULL DEFAULT '0',
`reason` VARCHAR(255) NOT NULL DEFAULT '',
`time_trans` VARCHAR(10) NOT NULL DEFAULT '0',
`trans_type` ENUM('IN','OUT') NOT NULL DEFAULT 'IN',
KEY(`party_uid`)
) TYPE=HEAP", __FILE__, __LINE__);
// Let's begin with the incoming list
$result = SQL_QUERY_ESC("SELECT `trans_id`, `from_uid`, `points`, `reason`, `time_trans` FROM `{!_MYSQL_PREFIX!}_user_transfers_in` WHERE `userid`=%s ORDER BY `id` ASC LIMIT %s",
array(getUserId(), getConfig('transfer_max')), __FILE__, __LINE__);
while ($DATA = SQL_FETCHROW($result)) {
$DATA[] = 'IN';
$DATA = implode("','", $DATA);
$res_temp = SQL_QUERY("INSERT INTO `{!_MYSQL_PREFIX!}_transfers_tmp` (`trans_id`, `party_uid`, `points`, `reason`, `time_trans`, `trans_type`) VALUES ('".$DATA."')", __FILE__, __LINE__);
} // END - while
// Free memory
SQL_FREERESULT($result);
// As the last table transfer data from outgoing table to temporary
$result = SQL_QUERY_ESC("SELECT `trans_id`, `to_uid`, `points`, `reason`, `time_trans` FROM `{!_MYSQL_PREFIX!}_user_transfers_out` WHERE `userid`=%s ORDER BY `id` LIMIT %s",
array(getUserId(), getConfig('transfer_max')), __FILE__, __LINE__);
while ($DATA = SQL_FETCHROW($result)) {
$DATA[] = 'OUT';
$DATA = implode("','", $DATA);
$res_temp = SQL_QUERY("INSERT INTO `{!_MYSQL_PREFIX!}_transfers_tmp` (`trans_id`, `party_uid`, `points`, `reason`, `time_trans`, `trans_type`) VALUES ('".$DATA."')", __FILE__, __LINE__);
} // END - while
// Free memory
SQL_FREERESULT($result);
$total = 0;
if (SQL_NUMROWS($result) > 0) {
// Search for entries
$result = SQL_QUERY("SELECT `party_uid`, `trans_id`, `points`, `reason`, `time_trans`, `trans_type` FROM `{!_MYSQL_PREFIX!}_transfers_tmp` ORDER BY `time_trans` DESC",
__FILE__, __LINE__);
// Output rows
$OUT = ''; $SW = 2;
while ($content = SQL_FETCHARRAY($result)) {
// Rewrite points
if ($content['trans_type'] == 'OUT') $content['points'] = '-'.$content['points']."";
// Prepare content for template
$content['sw'] = $SW;
$content['time'] = generateDateTime($content['time_trans'], '3');
$content['points'] = translateComma($content['points']);
// Load row template
$OUT .= LOAD_TEMPLATE('member_transfer_row', true, $content);
// Add points and switch color
$total += $content['points'];
$SW = 3 - $SW;
} // END - while
// Free memory
SQL_FREERESULT($result);
} else {
// Nothing for in and out
$OUT = "
".LOAD_TEMPLATE('admin_settings_saved', true, getMessage('TRANSFER_NO_INOUT_TRANSFERS'))."
";
}
// ... and add them to a constant for the template
// @TODO Rewrite all these constants
define('__TRANSFER_ROWS', $OUT);
// Remeber total amount
define('__TRANSFER_TOTAL_VALUE', $total);
// Set title
define('__TRANSFER_TITLE', getMessage('TRANSFER_LIST_ALL'));
// Set "balance" word
define('__TRANSFER_SUM', getMessage('TRANSFER_TOTAL_BALANCE'));
// Load final template
LOAD_TEMPLATE('member_transfer_list');
// At the end we don't need a temporary table in memory
$result = SQL_QUERY("DROP TABLE IF EXISTS `{!_MYSQL_PREFIX!}_transfers_tmp`", __FILE__, __LINE__);
// Free some memory...
SQL_FREERESULT($result);
break;
case '': // Overview page
// Check incoming transfers
$total = GET_TOTAL_DATA(getUserId(), 'user_transfers_in', 'id', 'userid', true);
if ($total > 0) {
define('__TRANSFER_IN_LINK', "".$dmy." ");
} else {
define('__TRANSFER_IN_LINK', $dmy);
}
// Check outgoing transfers
$dmy = GET_TOTAL_DATA(getUserId(), 'user_transfers_out', 'id', 'userid', true);
// Add to total amount
$total += $dmy;
if ($dmy > 0) {
define('__TRANSFER_OUT_LINK', "".$dmy." ");
} else {
define('__TRANSFER_OUT_LINK', $dmy);
}
// Total transactions
if ($total > 0) {
define('__TRANSFER_ALL_LINK', "".$total." ");
} else {
define('__TRANSFER_ALL_LINK', $total);
}
if (isFormSent()) {
// Save settings
SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_user_data` SET `opt_in`='%s' WHERE `userid`=%s LIMIT 1",
array(REQUEST_POST('opt_in'), getUserId()), __FILE__, __LINE__);
// Rember for next switch() command
$opt_in = REQUEST_POST('opt_in');
// "Settings saved..."
LOAD_TEMPLATE('admin_settings_saved', false, "{--SETTINGS_SAVED--}
");
} // END - if
switch ($opt_in) {
case 'Y':
define('__TRANSFER_ALLOW_Y', ' checked="checked"');
define('__TRANSFER_ALLOW_N', '');
define('__TRANSFER_NEW_LINK', "{--TRANSFER_NOW_LINK--} ");
break;
case 'N':
define('__TRANSFER_ALLOW_Y', '');
define('__TRANSFER_ALLOW_N', ' checked="checked"');
define('__TRANSFER_NEW_LINK', getMessage('TRANSFER_PLEASE_ALLOW_OPT_IN'));
break;
} // END - switch
// Check for latest out-transfers
$result = SQL_QUERY_ESC("SELECT
`time_trans`
FROM
`{!_MYSQL_PREFIX!}_user_transfers_out`
WHERE
`time_trans` > (UNIX_TIMESTAMP() - %s) AND `userid`=%s
ORDER BY
`time_trans` DESC
LIMIT 1",
array(getConfig('transfer_timeout'), getUserId()), __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 0) {
// Load template
define('__TRANSFER_SETTINGS_CONTENT', LOAD_TEMPLATE('member_transfer_settings', true));
} else {
// Load newest transaction
list($newest) = SQL_FETCHROW($result);
define('__TRANSFER_SETTINGS_CONTENT', sprintf(getMessage('TRANSFER_LATEST_IS'), generateDateTime($newest, '3')));
}
// Free result
SQL_FREERESULT($result);
// Load template
LOAD_TEMPLATE('member_transfer_overview');
break;
} // END - switch
//
?>