7809ce6461476475e3ea7af55146550be27af15c
[mailer.git] / inc / libs / wernis_functions.php
1 <?php
2 /************************************************************************
3  * MXChange v0.2.1                                    Start: 10/19/2003 *
4  * ===============                              Last change: 08/12/2004 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : what-points.php                                  *
8  * -------------------------------------------------------------------- *
9  * Short description : All your collected points...                     *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Alle Ihrer gesammelten Punkte                    *
12  * -------------------------------------------------------------------- *
13  *                                                                      *
14  * -------------------------------------------------------------------- *
15  * Copyright (c) 2003 - 2008 by Roland Haeder                           *
16  * For more information visit: http://www.mxchange.org                  *
17  *                                                                      *
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.                                  *
22  *                                                                      *
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.                         *
27  *                                                                      *
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,               *
31  * MA  02110-1301  USA                                                  *
32  ************************************************************************/
33
34 // Some security stuff...
35 if (!defined('__SECURITY')) {
36         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
37         require($INC);
38 }
39
40 // Sets a status message and code
41 function WERNIS_STATUS_MESSAGE ($msg, $status) {
42         global $WERNIS;
43         $WERNIS['message'] = $msg;
44         $WERNIS['status'] = $status;
45 }
46
47 // Get the status message
48 function GET_WERNIS_ERROR_MESSAGE () {
49         global $WERNIS;
50         if (isset($WERNIS['message'])) {
51                 // Use raw message
52                 return $WERNIS['message'];
53         } elseif (isset($WERNIS['status'])) {
54                 // Fall-back to status
55                 return sprintf(WERNIS_ERROR_STATUS, $WERNIS['status']);
56         } else {
57                 // Something bad happend
58                 return WERNIS_UNKNOWN_ERROR;
59         }
60 }
61
62 // Get the status code
63 function GET_WERNIS_ERROR_CODE () {
64         global $WERNIS;
65         if (isset($WERNIS['status'])) {
66                 // Use raw message
67                 return $WERNIS['status'];
68         } else {
69                 // Something bad happend
70                 return WERNIS_UNKNOWN_ERROR;
71         }
72 }
73
74 // Sends out a request to the API and returns it's result
75 function WERNIS_SEND_REQUEST ($scriptName, $requestData =  array()) {
76         // Is the requestData an array?
77         if (!is_array($requestData)) {
78                 // Then abort here!
79                 return array(
80                         'status'  => "failed_general",
81                         'message' => WERNIS_API_REQUEST_DATA_INVALID
82                 );
83         } // END - if
84
85         // Is the API id and MD5 hash there?
86         if ((getConfig('wernis_api_id') == "") || (getConfig('wernis_api_md5') == "")) {
87                 // Abort here...
88                 return array(
89                         'status'  => "failed_general",
90                         'message' => WERNIS_API_REQUEST_DATA_MISSING
91                 );
92         } // END - if
93
94         // Add more request data
95         $requestData['api_id']  = bigintval(getConfig('wernis_api_id'));
96         $requestData['api_key'] = getConfig('wernis_api_md5');
97
98         // Construct the request string
99         $requestString = getConfig('wernis_api_url') . $scriptName;
100
101         // Get the raw response from the lower function
102         $response = POST_URL($requestString, $requestData);
103
104         // Check the response header if all is fine
105         if (strpos($response[0], "200") === false) {
106                 // Something bad happend... :(
107                 return array(
108                         'status'  => "request_error",
109                         'message' => sprintf(WERNIS_API_REQUEST_ERROR, $response[0])
110                 );
111         } // END - if
112
113         // All (maybe) fine so remove the response header from server
114         $response = $response[(count($response) - 1)];
115
116         // Prepare the returning result for higher functions
117         if (substr($response, 0, 1) == "&") {
118                 // Remove the leading & (which can be used in Flash)
119                 $response = substr($response, 1);
120         } // END - if
121
122         // Bring back the response
123         $data = explode("=", $response);
124
125         // Default return array (should not stay empty)
126         $return = array();
127
128         // We use only the first two entries (which shall be fine)
129         if ($data[0] === "error") {
130                 // The request has failed... :(
131                 switch ($data[1]) {
132                         case "404": // Invalid API ID
133                         case "AUTH": // Authorization has failed
134                                 $return = array(
135                                         'status'  => "auth_failed",
136                                         'message' => WERNIS_API_REQUEST_FAILED_AUTH
137                                 );
138                                 break;
139
140                         case "LOCKED": // User account is locked!
141                         case "PASS": // Bad passphrase entered
142                         case "USER": // Missing account or invalid password
143                                 $return = array(
144                                         'status'  => "user_failed",
145                                         'message' => WERNIS_API_REQUEST_FAILED_USER
146                                 );
147                                 break;
148
149                         case "OWN": // Transfer to own account
150                                 $return = array(
151                                         'status'  => "own_failed",
152                                         'message' => WERNIS_API_REQUEST_FAILED_OWN
153                                 );
154                                 break;
155
156                         case "AMOUNT": // Amount is depleted
157                                 $return = array(
158                                         'status'  => "amount_failed",
159                                         'message' => WERNIS_API_REQUEST_FAILED_AMOUNT
160                                 );
161                                 break;
162
163                         case "AMOUNT-SEND": // API amount is depleted
164                                 $return = array(
165                                         'status'  => "api_amount_failed",
166                                         'message' => WERNIS_API_REQUEST_FAILED_API_AMOUNT
167                                 );
168                                 break;
169
170                         default: // Unknown error (maybe new?)
171                                 DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Unknown error %s from WDS66 API received.", $data[1]));
172                                 $return = array(
173                                         'status'  => "request_failed",
174                                         'message' => sprintf(WERNIS_API_REQUEST_FAILED, $data[1])
175                                 );
176                                 break;
177                 }
178         } else {
179                 // All fine here
180                 $return = array(
181                         'status'   => "OK",
182                         'response' => $response
183                 );
184         }
185
186         // Return the result
187         return $return;
188 }
189
190 // Tests the function by calling balance.php on the API
191 function WERNIS_TEST_API () {
192         // Result is always failed
193         $result = false;
194
195         // Return the result from the lower functions
196         $return = WERNIS_SEND_REQUEST("balance.php");
197
198         if ($return['status'] == "OK") {
199                 // All fine!
200                 $result = true;
201         } else {
202                 // Status failture text
203                 WERNIS_STATUS_MESSAGE($return['message'], $return['status']);
204         }
205
206         // Return result
207         return $result;
208 }
209
210 // Widthdraw this amount
211 function WERNIS_EXECUTE_WITHDRAW ($wdsId, $userMd5, $amount) {
212         // Is the sponsor extension installed?
213         if (getConfig('wernis_withdraw_active') == "N") {
214                 if (!EXT_IS_ACTIVE("sponsor")) {
215                         // No, abort here
216                         return false;
217                 } elseif (!IS_SPONSOR()) {
218                         // No sponsor, not allowed to withdraw!
219                         return false;
220                 }
221         } // END - if
222
223         // Default is failed attempt
224         $result = false;
225
226         // Prepare the purpose
227         $eval = "\$purpose = \"".COMPILE_CODE(sprintf(WERNIS_API_PURPOSE_WITHDRAW, $GLOBALS['userid']))."\";";
228         eval($eval);
229
230         // Prepare the request data
231         $requestData = array(
232                 'sub_request'   => "receive",
233                 't_uid'                 => bigintval($wdsId),
234                 't_md5'                 => $userMd5,
235                 'r_uid'                 => getConfig('wernis_refid'),
236                 'amount'                => bigintval($amount),
237                 'purpose'               => urlencode(base64_encode($purpose))
238         );
239
240         // Return the result from the lower functions
241         $return = WERNIS_SEND_REQUEST("book.php", $requestData);
242
243         if ($return['status'] == "OK") {
244                 // All fine!
245                 $result = true;
246
247                 // Log the transfer
248                 WERNIS_LOG_TRANSFER($wdsId, $amount, 'IN');
249         } else {
250                 // Status failture text
251                 WERNIS_STATUS_MESSAGE($return['message'], $return['status']);
252
253                 // Log the transfer
254                 WERNIS_LOG_TRANSFER($wdsId, $amount, 'FAILED', $return['message'], $return['status']);
255         }
256
257         // Return result
258         return $result;
259 }
260
261
262 // Payout this amount
263 function WERNIS_EXECUTE_PAYOUT ($wdsId, $amount) {
264         global $_CONFIG;
265
266         // Default is failed attempt
267         $result = false;
268
269         // Prepare the purpose
270         $eval = "\$purpose = \"".COMPILE_CODE(sprintf(WERNIS_API_PURPOSE_PAYOUT, $GLOBALS['userid']))."\";";
271         eval($eval);
272
273         // Prepare the request data
274         $requestData = array(
275                 'sub_request'   => "send",
276                 't_uid'                 => getConfig('wernis_refid'),
277                 't_md5'                 => getConfig('wernis_pass_md5'),
278                 'r_uid'                 => bigintval($wdsId),
279                 'amount'                => bigintval($amount),
280                 'purpose'               => urlencode(base64_encode($purpose))
281         );
282
283         // Return the result from the lower functions
284         $return = WERNIS_SEND_REQUEST("book.php", $requestData);
285
286         if ($return['status'] == "OK") {
287                 // All fine!
288                 $result = true;
289
290                 // Log the transfer
291                 WERNIS_LOG_TRANSFER($wdsId, $amount, 'OUT');
292         } else {
293                 // Status failture text
294                 WERNIS_STATUS_MESSAGE($return['message'], $return['status']);
295
296                 // Log the transfer
297                 WERNIS_LOG_TRANSFER($wdsId, $amount, 'FAILED', $return['message'], $return['status']);
298         }
299
300         // Return result
301         return $result;
302 }
303
304 // Translate the status IN/OUT
305 function WERNIS_TRANSFER_STATUS ($status) {
306         // Default status
307         $return = sprintf(WERNIS_STATUS_UNKNWOWN, $status);
308         switch ($status) {
309                 case "IN": // Withdraw
310                         $return = WERNIS_STATUS_WITHDRAW;
311                         break;
312
313                 case "OUT": // Payout
314                         $return = WERNIS_STATUS_PAYOUT;
315                         break;
316
317                 case "FAILED": // Payout
318                         $return = WERNIS_STATUS_FAILED;
319                         break;
320         }
321
322         // Return the status
323         return $return;
324 }
325
326 // Log the transfer
327 function WERNIS_LOG_TRANSFER ($wdsId, $amount, $type = 'FAILED', $message = "", $status = "") {
328         // Register this wernis movement
329         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')",
330                 array($GLOBALS['userid'], bigintval($wdsId), bigintval($amount), $type, $message, $status), __FILE__, __LINE__);
331 }
332
333 // Take fees and factor
334 function WERNIS_TAKE_FEE ($points, $mode) {
335         // Payout or withdraw are allowed modes!
336         //* DEBUG: */ echo "mode={$mode},points={$points}<br />\n";
337         if (!in_array($mode, array('payout', 'withdraw'))) {
338                 // Log error and abort
339                 DEBUG_LOG(__FUNCTION__, __LINE__, "uid={$GLOBALS['userid']},mode={$mode},points={$points}");
340                 return false;
341         } // END - if
342
343         // Is there a percentage or fixed fee?
344         if (getConfig('wernis_'.$mode.'_fee_percent') > 0) {
345                 // Percentage fee
346                 $points -= $points * getConfig('wernis_'.$mode.'_fee_percent') / 100;
347         } elseif (getConfig('wernis_'.$mode.'_fee_fix') > 0) {
348                 // Fixed fee
349                 $points -= getConfig('wernis_'.$mode.'_fee_fix');
350         }
351
352         // Divide/multiply the factor
353         if ($mode == "payout") {
354                 // Divide for payout
355                 $points = $points / getConfig('wernis_payout_factor');
356         } else {
357                 // Multiply for withdraw
358                 $points = $points * getConfig('wernis_withdraw_factor');
359         }
360
361         // Return value
362         //* DEBUG: */ echo "mode={$mode},points={$points}<br />\n";
363         return $points;
364 }
365
366 // Add withdraw fees and factor
367 function WERNIS_ADD_WITHDRAW_FEE ($points) {
368         // Is there a percentage or fixed fee?
369         if (getConfig('wernis_withdraw_fee_percent') > 0) {
370                 // Percentage fee
371                 $points += $points * getConfig('wernis_withdraw_fee_percent') / 100;
372         } elseif (getConfig('wernis_withdraw_fee_fix') > 0) {
373                 // Fixed fee
374                 $points += getConfig('wernis_withdraw_fee_fix');
375         }
376
377         // Return value
378         return $points;
379 }
380
381 // Add all fees to the array
382 function WERNIS_ADD_FEES_TO_ARRAY (&$array) {
383         // Is the array an array? ;-)
384         if (!is_array($array)) {
385                 // Log error and return
386                 DEBUG_LOG(__FUNCTION__, __LINE__, " Type ".gettype($array)." != array.");
387                 return;
388         } // END - if
389
390         // Add both factors
391         $array['payout_factor']        = TRANSLATE_COMMA(getConfig('wernis_payout_factor'));
392         $array['withdraw_factor']      = TRANSLATE_COMMA(getConfig('wernis_withdraw_factor'));
393
394         // Add all fees
395         $array['payout_fee_percent']   = TRANSLATE_COMMA(getConfig('wernis_payout_fee_percent'));
396         $array['withdraw_fee_percent'] = TRANSLATE_COMMA(getConfig('wernis_withdraw_fee_percent'));
397         $array['payout_fee_fix']       = TRANSLATE_COMMA(getConfig('wernis_payout_fee_fix'));
398         $array['withdraw_fee_fix']     = TRANSLATE_COMMA(getConfig('wernis_withdraw_fee_fix'));
399 }
400
401 //
402 ?>