2 /************************************************************************
3 * Mailer v0.2.1-FINAL Start: 04/12/2004 *
4 * =================== Last change: 11/16/2004 *
6 * -------------------------------------------------------------------- *
7 * File : what-wernis.php *
8 * -------------------------------------------------------------------- *
9 * Short description : Wernis requests *
10 * -------------------------------------------------------------------- *
11 * Kurzbeschreibung : Auszahlungsanfragen *
12 * -------------------------------------------------------------------- *
15 * $Tag:: 0.2.1-FINAL $ *
17 * Needs to be in all Files and every File needs "svn propset *
18 * svn:keywords Date Revision" (autoprobset!) at least!!!!!! *
19 * -------------------------------------------------------------------- *
20 * Copyright (c) 2003 - 2009 by Roland Haeder *
21 * Copyright (c) 2009, 2010 by Mailer Developer Team *
22 * For more information visit: http://www.mxchange.org *
24 * This program is free software; you can redistribute it and/or modify *
25 * it under the terms of the GNU General Public License as published by *
26 * the Free Software Foundation; either version 2 of the License, or *
27 * (at your option) any later version. *
29 * This program is distributed in the hope that it will be useful, *
30 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
31 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
32 * GNU General Public License for more details. *
34 * You should have received a copy of the GNU General Public License *
35 * along with this program; if not, write to the Free Software *
36 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, *
38 ************************************************************************/
40 // Some security stuff...
41 if (!defined('__SECURITY')) {
43 } elseif (!isMember()) {
44 // User is not logged in
45 redirectToIndexMemberOnlyModule();
48 // Add description as navigation point
49 addMenuDescription('member', __FILE__);
51 if ((!isExtensionActive('wernis')) && (!isAdmin())) {
52 loadTemplate('admin_settings_saved', false, generateExtensionInactiveNotInstalledMessage('wernis'));
56 // Check if the admin has entered the data
57 if ((getConfig('wernis_api_id') == '') || (getConfig('wernis_api_md5') == '')) {
58 // Something important is missing...
59 loadTemplate('admin_settings_saved', false, getMessage('MEMBER_WERNIS_API_DATA_MISSING'));
63 // Init the content array and points
64 $content = array(); $points = false;
66 // Is the mode set (withdraw or payout)
67 if ((!isGetRequestParameterSet('mode')) || (getRequestParameter('mode') == 'choose')) {
68 // Let the user choose what he wants to do
69 $content['refid'] = getConfig(('wernis_refid'));
70 $content['wernis_userid'] = '0';
73 if ((!empty($content['wernis_userid'])) && (!isGetRequestParameterSet('mode'))) {
74 // Then use an other "mode"
75 setGetRequestParameter('mode', 'list');
78 $result = SQL_QUERY_ESC("SELECT `id`,`wernis_account`,`wernis_amount`,`wernis_timestamp`,`wernis_type` FROM `{?_MYSQL_PREFIX?}_user_wernis` WHERE `userid`=%s ORDER BY `wernis_timestamp` DESC",
79 array(getMemberId()), __FILE__, __LINE__);
82 $content['rows'] = ''; $SW = 2;
83 while ($data = SQL_FETCHARRAY($result)) {
84 // Prepare data for output
86 'wernis_timestamp' => generateDateTime($data['wernis_timestamp'], 2),
87 'points' => translateComma($data['wernis_amount']),
88 'wernis_account' => bigintval($data['wernis_account']),
89 'status' => WERNIS_TRANSFER_STATUS($data['wernis_type']),
90 'raw_type' => strtolower($data['wernis_type']),
95 $content['rows'] .= loadTemplate('member_wernis_mode_list_row', true, $rowContent);
100 SQL_FREERESULT($result);
102 // Default links are not active!
103 $content['payout_link'] = '<em>{--MEMBER_WERNIS_PAYOUT_DISABLED--}</em>';
104 $content['withdraw_link'] = '<em>{--MEMBER_WERNIS_WITHDRAW_DISABLED--}</em>';
106 // Is the payout mode active?
107 if (getConfig('wernis_payout_active') == 'Y') {
109 $content['payout_link'] = "<a class=\"menu_blur\" style=\"height: 40px\" href=\"{%url=modules.php?module=login&what=wernis&mode=payout%}\"><div style=\"padding-top: 10px\">{--MEMBER_WERNIS_MODE_PAYOUT--}</div></a>";
112 // Is the withdraw mode active?
113 if (getConfig('wernis_withdraw_active') == 'Y') {
115 $content['withdraw_link'] = "<a class=\"menu_blur\" style=\"height: 40px\" href=\"{%url=modules.php?module=login&what=wernis&mode=withdraw%}\"><div style=\"padding-top: 10px\">{--MEMBER_WERNIS_MODE_WITHDRAW--}</div></a>";
119 setGetRequestParameter('mode', 'choose');
121 } elseif ((getRequestParameter('mode') == 'payout') && (getConfig('wernis_payout_active') == 'Y')) {
122 // Get total points and check if the user can request a payout
123 $points = countSumTotalData(getMemberId(), 'user_points', 'points') - countSumTotalData(getMemberId(), 'user_data', 'used_points');
125 // Remove the registration fee
126 $points = $points - getConfig('points_register');
128 // Is there a percentage or fixed fee?
129 $points = WERNIS_TAKE_FEE($points, 'payout');
131 // Is this enougth for a payout?
132 if ($points < getConfig('wernis_min_payout')) {
133 // No, then abort here
134 loadTemplate('admin_settings_saved', false, sprintf(
135 getMessage('MEMBER_WERNIS_MIN_PAYOUT'),
136 translateComma(getConfig('wernis_min_payout')),
137 translateComma($points)
143 $points = explode('.', $points);
144 $points = bigintval($points[0]);
146 // Add points to content array
147 $content['points'] = translateComma($points);
149 // Get WDS66 username
150 $content['wernis_userid'] = getUserData('wernis_userid');
151 } elseif ((getRequestParameter('mode') == 'withdraw') && (getConfig('wernis_withdraw_active') == 'Y')) {
152 // Get total points for just displaying them
153 $points = countSumTotalData(getMemberId(), 'user_points', 'points') - countSumTotalData(getMemberId(), 'user_data', 'used_points');
155 // Prepare data for the template
156 $content['points'] = translateComma($points);
157 $content['wernis_userid'] = '';
160 WERNIS_ADD_FEES_TO_ARRAY($content);
163 $content['wernis_userid'] = getUserData('wernis_userid');
166 loadTemplate('admin_settings_saved', false, getMaskedMessage('MEMBER_WERNIS_MODE_INVALID', getRequestParameter('mode')));
170 // Is the formular sent?
171 if ((isFormSent()) && (isGetRequestParameterSet('mode'))) {
172 // Is the user id and password set?
173 if (!isPostRequestParameterSet(('wernis_userid'))) {
174 // Nothing entered in WDS66 user id
175 loadTemplate('admin_settings_saved', false, getMessage('MEMBER_WERNIS_EMPTY_USERNAME'));
176 } elseif (!isPostRequestParameterSet(('wds66_password'))) {
177 // Nothing entered in WDS66 password
178 loadTemplate('admin_settings_saved', false, getMessage('MEMBER_WERNIS_EMPTY_PASSWORD'));
179 } elseif (!isPostRequestParameterSet(('amount'))) {
180 // Nothing entered in amount
181 loadTemplate('admin_settings_saved', false, getMessage('MEMBER_WERNIS_EMPTY_AMOUNT'));
182 } elseif (postRequestParameter('wernis_userid') != bigintval(postRequestParameter('wernis_userid'))) {
183 // Only numbers in account id!
184 loadTemplate('admin_settings_saved', false, getMessage('MEMBER_WERNIS_INVALID_USERNAME'));
185 } elseif (postRequestParameter('amount') != bigintval(postRequestParameter('amount'))) {
186 // Only numbers in amount!
187 loadTemplate('admin_settings_saved', false, getMessage('MEMBER_WERNIS_INVALID_AMOUNT'));
189 // Check input data depending on the mode and execute the requested mode
190 switch (getRequestParameter('mode')) {
191 case 'withdraw': // Widthdraws WDS66 -> This exchange
192 if (postRequestParameter('amount') < getConfig('wernis_min_withdraw')) {
193 // Not enougth entered!
194 loadTemplate('admin_settings_saved', false, getMessage('MEMBER_WERNIS_WITHDRAW_AMOUNT_SMALLER_MIN'));
196 // All is fine here so do the withdraw
197 $success = WERNIS_EXECUTE_WITHDRAW(postRequestParameter('wernis_userid'), md5(postRequestParameter('wds66_password')), postRequestParameter('amount'));
198 if ($success === true) {
199 // Add it to this amount
200 addPointsDirectly('wernis_withdraw', getMemberId(), bigintval(postRequestParameter('amount')));
202 // Update the user data as well..
203 SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `wernis_userid`=%s WHERE `userid`=%s LIMIT 1",
204 array(bigintval(postRequestParameter('wernis_userid')), getMemberId()), __FILE__, __LINE__);
207 loadTemplate('admin_settings_saved', false, getMessage('MEMBER_WERNIS_WITHDRAW_DONE'));
209 } elseif ((GET_WERNIS_ERROR_CODE() == 'user_failed') || (GET_WERNIS_ERROR_CODE() == 'own_failed') || (GET_WERNIS_ERROR_CODE() == 'amount_failed')) {
211 loadTemplate('admin_settings_saved', false, GET_WERNIS_ERROR_MESSAGE());
213 // Something went wrong
214 loadTemplate('admin_settings_saved', false, getMaskedMessage('MEMBER_WERNIS_WITHDRAW_FAILED', GET_WERNIS_ERROR_MESSAGE()));
219 case 'payout': // Payout this exchange -> WDS66
220 if (postRequestParameter('amount') < getConfig('wernis_min_payout')) {
221 // Not enougth entered!
222 loadTemplate('admin_settings_saved', false, getMessage('MEMBER_WERNIS_PAYOUT_AMOUNT_SMALLER_MIN'));
223 } elseif (postRequestParameter('amount') > $points) {
224 // Not enougth points left!
225 loadTemplate('admin_settings_saved', false, sprintf(getMessage('MEMBER_WERNIS_PAYOUT_POINTS_DEPLETED'), bigintval(postRequestParameter('amount')), bigintval($points)));
227 // All is fine here so do the withdraw
228 $success = WERNIS_EXECUTE_PAYOUT(postRequestParameter('wernis_userid'), postRequestParameter('amount'));
229 if ($success === true) {
231 subtractPoints('wernis_payout', getMemberId(), postRequestParameter('amount'));
234 SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `wernis_userid`=%s WHERE `userid`=%s LIMIT 1",
235 array(bigintval(postRequestParameter('wernis_userid')), getMemberId()), __FILE__, __LINE__);
238 loadTemplate('admin_settings_saved', false, getMessage('MEMBER_WERNIS_PAYOUT_DONE'));
240 } elseif ((GET_WERNIS_ERROR_CODE() == 'user_failed') || (GET_WERNIS_ERROR_CODE() == 'own_failed') || (GET_WERNIS_ERROR_CODE() == 'amount_failed') || (GET_WERNIS_ERROR_CODE() == 'api_amount_failed')) {
242 loadTemplate('admin_settings_saved', false, GET_WERNIS_ERROR_MESSAGE());
244 // Something went wrong
245 loadTemplate('admin_settings_saved', false, getMaskedMessage('MEMBER_WERNIS_WITHDRAW_FAILED', GET_WERNIS_ERROR_MESSAGE()));
250 default: // Invalid mode!
251 logDebugMessage(__FILE__, __LINE__, sprintf("Invalid mode %s detected.", getRequestParameter('mode')));
252 loadTemplate('admin_settings_saved', false, getMaskedMessage('MEMBER_WERNIS_MODE_INVALID', getRequestParameter('mode')));
258 // Prepare mode for template name
259 $mode = sprintf("member_wernis_mode_%s", getRequestParameter('mode'));
262 loadTemplate($mode, false, $content);