2 /************************************************************************
3 * MXChange v0.2.1 Start: 10/19/2003 *
4 * =============== Last change: 08/12/2004 *
6 * -------------------------------------------------------------------- *
7 * File : what-points.php *
8 * -------------------------------------------------------------------- *
9 * Short description : All your collected points... *
10 * -------------------------------------------------------------------- *
11 * Kurzbeschreibung : Alle Ihrer gesammelten Punkte *
12 * -------------------------------------------------------------------- *
14 * -------------------------------------------------------------------- *
15 * Copyright (c) 2003 - 2008 by Roland Haeder *
16 * For more information visit: http://www.mxchange.org *
18 * This program is free software; you can redistribute it and/or modify *
19 * it under the terms of the GNU General Public License as published by *
20 * the Free Software Foundation; either version 2 of the License, or *
21 * (at your option) any later version. *
23 * This program is distributed in the hope that it will be useful, *
24 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
25 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
26 * GNU General Public License for more details. *
28 * You should have received a copy of the GNU General Public License *
29 * along with this program; if not, write to the Free Software *
30 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, *
32 ************************************************************************/
34 // Some security stuff...
35 if (!defined('__SECURITY')) {
36 $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
40 // Sets a status message and code
41 function WERNIS_STATUS_MESSAGE ($msg, $status) {
43 $WERNIS['message'] = $msg;
44 $WERNIS['status'] = $status;
47 // Get the status message
48 function GET_WERNIS_ERROR_MESSAGE () {
50 if (isset($WERNIS['message'])) {
52 return $WERNIS['message'];
53 } elseif (isset($WERNIS['status'])) {
54 // Fall-back to status
55 return sprintf(WERNIS_ERROR_STATUS, $WERNIS['status']);
57 // Something bad happend
58 return WERNIS_UNKNOWN_ERROR;
62 // Get the status code
63 function GET_WERNIS_ERROR_CODE () {
65 if (isset($WERNIS['status'])) {
67 return $WERNIS['status'];
69 // Something bad happend
70 return WERNIS_UNKNOWN_ERROR;
74 // Sends out a request to the API and returns it's result
75 function WERNIS_SEND_REQUEST ($scriptName, $requestData = array()) {
78 // Is the requestData an array?
79 if (!is_array($requestData)) {
82 'status' => "failed_general",
83 'message' => WERNIS_API_REQUEST_DATA_INVALID
87 // Is the API id and MD5 hash there?
88 if ((empty($_CONFIG['wernis_api_id'])) || (empty($_CONFIG['wernis_api_md5']))) {
91 'status' => "failed_general",
92 'message' => WERNIS_API_REQUEST_DATA_MISSING
96 // Add more request data
97 $requestData['api_id'] = bigintval($_CONFIG['wernis_api_id']);
98 $requestData['api_key'] = $_CONFIG['wernis_api_md5'];
100 // Construct the request string
101 $requestString = $_CONFIG['wernis_api_url'] . $scriptName;
103 // Get the raw response from the lower function
104 $response = POST_URL($requestString, $requestData);
106 // Check the response header if all is fine
107 if (strpos($response[0], "200") === false) {
108 // Something bad happend... :(
110 'status' => "request_error",
111 'message' => sprintf(WERNIS_API_REQUEST_ERROR, $response[0])
115 // All (maybe) fine so remove the response header from server
116 $response = $response[(count($response) - 1)];
118 // Prepare the returning result for higher functions
119 if (substr($response, 0, 1) == "&") {
120 // Remove the leading & (which can be used in Flash)
121 $response = substr($response, 1);
124 // Bring back the response
125 $data = explode("=", $response);
127 // Default return array (should not stay empty)
130 // We use only the first two entries (which shall be fine)
131 if ($data[0] === "error") {
132 // The request has failed... :(
134 case "404": // Invalid API ID
135 case "AUTH": // Authorization has failed
137 'status' => "auth_failed",
138 'message' => WERNIS_API_REQUEST_FAILED_AUTH
142 case "LOCKED": // User account is locked!
143 case "PASS": // Bad passphrase entered
144 case "USER": // Missing account or invalid password
146 'status' => "user_failed",
147 'message' => WERNIS_API_REQUEST_FAILED_USER
151 case "OWN": // Transfer to own account
153 'status' => "own_failed",
154 'message' => WERNIS_API_REQUEST_FAILED_OWN
158 case "AMOUNT": // Amount is depleted
160 'status' => "amount_failed",
161 'message' => WERNIS_API_REQUEST_FAILED_AMOUNT
165 case "AMOUNT-SEND": // API amount is depleted
167 'status' => "api_amount_failed",
168 'message' => WERNIS_API_REQUEST_FAILED_API_AMOUNT
172 default: // Unknown error (maybe new?)
173 DEBUG_LOG(__FILE__, __LINE__, sprintf("Unknown error %s from WDS66 API received.", $data[1]));
175 'status' => "request_failed",
176 'message' => sprintf(WERNIS_API_REQUEST_FAILED, $data[1])
184 'response' => $response
192 // Tests the function by calling balance.php on the API
193 function WERNIS_TEST_API () {
198 // Return the result from the lower functions
199 $return = WERNIS_SEND_REQUEST("balance.php");
201 if ($return['status'] == "OK") {
205 // Status failture text
206 WERNIS_STATUS_MESSAGE($return['message'], $return['status']);
213 // Widthdraw this amount
214 function WERNIS_EXECUTE_WITHDRAW ($wdsId, $userMd5, $amount) {
217 // Is the sponsor extension installed?
218 if (!EXT_IS_ACTIVE("sponsor")) {
221 } elseif (!IS_SPONSOR()) {
222 // No sponsor, not allowed to withdraw!
226 // Default is failed attempt
229 // Prepare the purpose
230 $eval = "\$purpose = \"".COMPILE_CODE(sprintf(WERNIS_API_PURPOSE_WITHDRAW, $GLOBALS['userid']))."\";";
233 // Prepare the request data
234 $requestData = array(
235 'sub_request' => "receive",
236 't_uid' => bigintval($wdsId),
238 'r_uid' => $_CONFIG['wernis_refid'],
239 'amount' => bigintval($amount),
240 'purpose' => urlencode(base64_encode($purpose))
243 // Return the result from the lower functions
244 $return = WERNIS_SEND_REQUEST("book.php", $requestData);
246 if ($return['status'] == "OK") {
251 WERNIS_LOG_TRANSFER($wdsId, $amount, 'IN');
253 // Status failture text
254 WERNIS_STATUS_MESSAGE($return['message'], $return['status']);
257 WERNIS_LOG_TRANSFER($wdsId, $amount, 'FAILED', $return['message'], $return['status']);
265 // Payout this amount
266 function WERNIS_EXECUTE_PAYOUT ($wdsId, $amount) {
269 // Default is failed attempt
272 // Prepare the purpose
273 $eval = "\$purpose = \"".COMPILE_CODE(sprintf(WERNIS_API_PURPOSE_PAYOUT, $GLOBALS['userid']))."\";";
276 // Prepare the request data
277 $requestData = array(
278 'sub_request' => "send",
279 't_uid' => $_CONFIG['wernis_refid'],
280 't_md5' => $_CONFIG['wernis_pass_md5'],
281 'r_uid' => bigintval($wdsId),
282 'amount' => bigintval($amount),
283 'purpose' => urlencode(base64_encode($purpose))
286 // Return the result from the lower functions
287 $return = WERNIS_SEND_REQUEST("book.php", $requestData);
289 if ($return['status'] == "OK") {
294 WERNIS_LOG_TRANSFER($wdsId, $amount, 'OUT');
296 // Status failture text
297 WERNIS_STATUS_MESSAGE($return['message'], $return['status']);
300 WERNIS_LOG_TRANSFER($wdsId, $amount, 'FAILED', $return['message'], $return['status']);
307 // Translate the status IN/OUT
308 function WERNIS_TRANSFER_STATUS ($status) {
310 $return = sprintf(WERNIS_STATUS_UNKNWOWN, $status);
312 case "IN": // Withdraw
313 $return = WERNIS_STATUS_WITHDRAW;
316 case "OUT": // Payout
317 $return = WERNIS_STATUS_PAYOUT;
320 case "FAILED": // Payout
321 $return = WERNIS_STATUS_FAILED;
330 function WERNIS_LOG_TRANSFER ($wdsId, $amount, $type = 'FAILED', $message = "", $status = "") {
331 // Register this wernis movement
332 $result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_user_wernis (`userid`, `wernis_account`, `wernis_amount`, `wernis_timestamp`, `wernis_type`, `wernis_api_message`, `wernis_api_status`) VALUES (%d, %d, %d, UNIX_TIMESTAMP(), '%s', '%s', '%s')",
333 array($GLOBALS['userid'], bigintval($wdsId), bigintval($amount), $type, $message, $status), __FILE__, __LINE__);
336 // Take fees and factor
337 function WERNIS_TAKE_FEE ($points, $mode) {
340 // Payout or withdraw are allowed modes!
341 //* DEBUG: */ echo "mode={$mode},points={$points}<br />\n";
342 if (!in_array($mode, array('payout', 'withdraw'))) {
343 // Log error and abort
344 DEBUG_LOG(__FUNCTION__, __LINE__, "uid={$GLOBALS['userid']},mode={$mode},points={$points}");
348 // Is there a percentage or fixed fee?
349 if ($_CONFIG['wernis_'.$mode.'_fee_percent'] > 0) {
351 $points -= $points * $_CONFIG['wernis_'.$mode.'_fee_percent'] / 100;
352 } elseif ($_CONFIG['wernis_'.$mode.'_fee_fix'] > 0) {
354 $points -= $_CONFIG['wernis_'.$mode.'_fee_fix'];
357 // Divide/multiply the factor
358 if ($mode == "payout") {
360 $points = $points / $_CONFIG['wernis_payout_factor'];
362 // Multiply for withdraw
363 $points = $points * $_CONFIG['wernis_withdraw_factor'];
367 //* DEBUG: */ echo "mode={$mode},points={$points}<br />\n";
371 // Add withdraw fees and factor
372 function WERNIS_ADD_WITHDRAW_FEE ($points) {
375 // Is there a percentage or fixed fee?
376 if ($_CONFIG['wernis_withdraw_fee_percent'] > 0) {
378 $points += $points * $_CONFIG['wernis_withdraw_fee_percent'] / 100;
379 } elseif ($_CONFIG['wernis_withdraw_fee_fix'] > 0) {
381 $points += $_CONFIG['wernis_withdraw_fee_fix'];
388 // Add all fees to the array
389 function WERNIS_ADD_FEES_TO_ARRAY (&$array) {
392 // Is the array an array? ;-)
393 if (!is_array($array)) {
394 // Log error and return
395 DEBUG_LOG(__FUNCTION__, __LINE__, " Type ".gettype($array)." != array.");
400 $array['payout_factor'] = TRANSLATE_COMMA($_CONFIG['wernis_payout_factor']);
401 $array['withdraw_factor'] = TRANSLATE_COMMA($_CONFIG['wernis_withdraw_factor']);
404 $array['payout_fee_percent'] = TRANSLATE_COMMA($_CONFIG['wernis_payout_fee_percent']);
405 $array['withdraw_fee_percent'] = TRANSLATE_COMMA($_CONFIG['wernis_withdraw_fee_percent']);
406 $array['payout_fee_fix'] = TRANSLATE_COMMA($_CONFIG['wernis_payout_fee_fix']);
407 $array['withdraw_fee_fix'] = TRANSLATE_COMMA($_CONFIG['wernis_withdraw_fee_fix']);