inc/libs/wernis_functions.php

   1 <?php
   2 /************************************************************************
   3  * Mailer v0.2.1-FINAL                                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  * $Revision::                                                        $ *
  14  * $Date::                                                            $ *
  15  * $Tag:: 0.2.1-FINAL                                                 $ *
  16  * $Author::                                                          $ *
  17  * -------------------------------------------------------------------- *
  18  * Copyright (c) 2003 - 2009 by Roland Haeder                           *
  19  * Copyright (c) 2009 - 2013 by Mailer Developer Team                   *
  20  * For more information visit: http://mxchange.org                      *
  21  *                                                                      *
  22  * This program is free software; you can redistribute it and/or modify *
  23  * it under the terms of the GNU General Public License as published by *
  24  * the Free Software Foundation; either version 2 of the License, or    *
  25  * (at your option) any later version.                                  *
  26  *                                                                      *
  27  * This program is distributed in the hope that it will be useful,      *
  28  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
  29  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
  30  * GNU General Public License for more details.                         *
  31  *                                                                      *
  32  * You should have received a copy of the GNU General Public License    *
  33  * along with this program; if not, write to the Free Software          *
  34  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
  35  * MA  02110-1301  USA                                                  *
  36  ************************************************************************/
  37
  38 // Some security stuff...
  39 if (!defined('__SECURITY')) {
  40         die();
  41 } // END - if
  42
  43 // Sets a status message and code
  44 function setWernisStatusMessage ($message, $status) {
  45         $GLOBALS['wernis_data']['message'] = $message;
  46         $GLOBALS['wernis_data']['status']  = $status;
  47 }
  48
  49 // Get the status message
  50 function getWernisErrorMessage () {
  51         if (isset($GLOBALS['wernis_data']['message'])) {
  52                 // Use raw message
  53                 return $GLOBALS['wernis_data']['message'];
  54         } elseif (isset($GLOBALS['wernis_data']['status'])) {
  55                 // Fall-back to status
  56                 return '{%message,WERNIS_ERROR_STATUS=' . $GLOBALS['wernis_data']['status'] . '%}';
  57         } else {
  58                 // Something bad happend
  59                 return '{--WERNIS_UNKNOWN_ERROR--}';
  60         }
  61 }
  62
  63 // Get the status code
  64 function getWernisErrorCode () {
  65         if (isset($GLOBALS['wernis_data']['status'])) {
  66                 // Use raw message
  67                 return $GLOBALS['wernis_data']['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 sendWernisApiRequest ($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 ((getWernisApiId() == '') || (getWernisApiMd5() == '')) {
  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']  = getWernisApiId();
  96         $requestData['api_key'] = getWernisApiMd5();
  97
  98         // Is a purpose there?
  99         if (!empty($requestData['purpose'])) {
 100                 // Eval the purpose
 101                 eval('$purpose = "' . doFinalCompilation($requestData['purpose'], FALSE) . '";');
 102
 103                 // Prepare the purpose, it needs encoding
 104                 $requestData['purpose'] = encodeString($purpose);
 105         } // END - if
 106
 107         // Construct the request string
 108         $requestString = getWernisApiUrl() . $scriptName;
 109
 110         // Get the raw response from the lower function
 111         $response = sendHttpPostRequest($requestString, $requestData);
 112
 113         // Check the response header if all is fine
 114         if (!isHttpStatusOkay($response[0])) {
 115                 // Something bad happend... :(
 116                 return array(
 117                         'status'  => 'request_error',
 118                         'message' => '{%message,WERNIS_API_REQUEST_ERROR=' . $response[0] . '%}'
 119                 );
 120         } // END - if
 121
 122         // All (maybe) fine so remove the response header from server
 123         $responseLine = '*INVALID*';
 124         for ($idx = (count($response) - 1); $idx > 1; $idx--) {
 125                 $line = trim($response[$idx]);
 126                 if (!empty($line)) {
 127                         $responseLine = $line;
 128                         break;
 129                 } // END - if
 130         } // END - for
 131
 132         // Is the response leaded by a & symbol?
 133         if (substr($responseLine, 0, 1) != '&') {
 134                 // Something badly happened on server-side
 135                 return array(
 136                         'status'  => 'request_problem',
 137                         'message' => sprintf(getMessage('WERNIS_API_REQUEST_PROBLEM'), $response[0], secureString($responseLine))
 138                 );
 139         } // END - if
 140
 141         // Remove the leading & (which can be used in Flash)
 142         $responseLine = substr($responseLine, 1);
 143
 144         // Bring back the response
 145         $data = explode('=', $responseLine);
 146
 147         // Default return array (should not stay empty)
 148         $return = array();
 149
 150         // We use only the first two entries (which shall be fine)
 151         if ($data[0] === 'error') {
 152                 // The request has failed... :(
 153                 switch ($data[1]) {
 154                         case '404': // Invalid API id
 155                         case 'AUTH': // Authorization has failed
 156                                 $return = array(
 157                                         'status'  => 'auth_failed',
 158                                         'message' => '{--WERNIS_API_REQUEST_FAILED_AUTH--}'
 159                                 );
 160                                 break;
 161
 162                         case 'LOCKED': // User account is locked!
 163                         case 'PASS': // Bad passphrase entered
 164                         case 'USER': // Missing account or invalid password
 165                                 $return = array(
 166                                         'status'  => 'user_failed',
 167                                         'message' => '{--WERNIS_API_REQUEST_FAILED_USER--}'
 168                                 );
 169                                 break;
 170
 171                         case 'OWN': // Transfer to own account
 172                                 $return = array(
 173                                         'status'  => 'own_failed',
 174                                         'message' => '{--WERNIS_API_REQUEST_FAILED_OWN--}'
 175                                 );
 176                                 break;
 177
 178                         case 'AMOUNT': // Amount is depleted
 179                                 $return = array(
 180                                         'status'  => 'amount_failed',
 181                                         'message' => '{--WERNIS_API_REQUEST_FAILED_AMOUNT--}'
 182                                 );
 183                                 break;
 184
 185                         case 'AMOUNT-SEND': // API amount is depleted
 186                                 $return = array(
 187                                         'status'  => 'api_amount_failed',
 188                                         'message' => '{--WERNIS_API_REQUEST_FAILED_API_AMOUNT--}'
 189                                 );
 190                                 break;
 191
 192                         default: // Unknown error (maybe new?)
 193                                 logDebugMessage(__FUNCTION__, __LINE__, sprintf('Unknown error %s from WDS66 API received.', $data[1]));
 194                                 $return = array(
 195                                         'status'  => 'request_failed',
 196                                         'message' => '{%message,WERNIS_API_REQUEST_FAILED=' . $data[1] . '%}'
 197                                 );
 198                                 break;
 199                 }
 200         } else {
 201                 // All fine here
 202                 $return = array(
 203                         'status'   => 'OK',
 204                         'response' => $responseLine
 205                 );
 206         }
 207
 208         // Return the result
 209         return $return;
 210 }
 211
 212 // Tests the function by calling balance.php on the API
 213 function doAdminTestWernisApi () {
 214         // Only as admin
 215         assert(isAdmin());
 216
 217         // Result is always failed
 218         $result = FALSE;
 219
 220         // Prepare the request data
 221         $requestData = array(
 222                 't_uid'       => getWernisRefid(),
 223                 't_md5'       => getWernisPassMd5()
 224         );
 225
 226         // Return the result from the lower functions
 227         $return = sendWernisApiRequest('balance.php', $requestData);
 228
 229         // Did it went smoothly?
 230         if (isHttpResponseStatusOkay($return)) {
 231                 // All fine!
 232                 $result = TRUE;
 233         } else {
 234                 // Status failure text
 235                 setWernisStatusMessage($return['message'], $return['status']);
 236         }
 237
 238         // Return result
 239         return $result;
 240 }
 241
 242 // Widthdraw this amount
 243 function executeWernisApiWithdraw ($wdsId, $userMd5, $amount) {
 244         // Is the sponsor extension installed?
 245         if (!isWernisWithdrawActive()) {
 246                 if (!isExtensionActive('sponsor')) {
 247                         // No, abort here
 248                         return FALSE;
 249                 } elseif (!isSponsor()) {
 250                         // No sponsor, not allowed to withdraw!
 251                         return FALSE;
 252                 }
 253         } // END - if
 254
 255         // Default is failed attempt
 256         $result = FALSE;
 257
 258         // Prepare the request data
 259         $requestData = array(
 260                 'sub_request' => 'receive',
 261                 't_uid'       => bigintval($wdsId),
 262                 't_md5'       => $userMd5,
 263                 'r_uid'       => getWernisRefid(),
 264                 'amount'      => bigintval($amount),
 265                 'purpose'     => getMaskedMessage('WERNIS_API_PURPOSE_WITHDRAW', getMemberId())
 266         );
 267
 268         // Return the result from the lower functions
 269         $return = sendWernisApiRequest('book.php', $requestData);
 270
 271         if (isHttpResponseStatusOkay($return)) {
 272                 // All fine!
 273                 $result = TRUE;
 274
 275                 // Log the transfer
 276                 logWernisTransfer($wdsId, $amount, 'WITHDRAW');
 277         } else {
 278                 // Status failure text
 279                 setWernisStatusMessage($return['message'], $return['status']);
 280
 281                 // Log the transfer
 282                 logWernisTransfer($wdsId, $amount, 'FAILED', $return['message'], $return['status']);
 283         }
 284
 285         // Return result
 286         return $result;
 287 }
 288
 289 // Payout this amount
 290 function executeWernisApiPayout ($wdsId, $amount) {
 291         // Default is failed attempt
 292         $result = FALSE;
 293
 294         // Prepare the request data
 295         $requestData = array(
 296                 'sub_request' => 'send',
 297                 't_uid'       => getWernisRefid(),
 298                 't_md5'       => getWernisPassMd5(),
 299                 'r_uid'       => bigintval($wdsId),
 300                 'amount'      => bigintval($amount),
 301                 'purpose'     => getMaskedMessage('WERNIS_API_PURPOSE_PAYOUT', getMemberId())
 302         );
 303
 304         // Return the result from the lower functions
 305         $return = sendWernisApiRequest('book.php', $requestData);
 306
 307         if (isHttpResponseStatusOkay($return)) {
 308                 // All fine!
 309                 $result = TRUE;
 310
 311                 // Log the transfer
 312                 logWernisTransfer($wdsId, $amount, 'PAYOUT');
 313         } else {
 314                 // Status failure text
 315                 setWernisStatusMessage($return['message'], $return['status']);
 316
 317                 // Log the transfer
 318                 logWernisTransfer($wdsId, $amount, 'FAILED', $return['message'], $return['status']);
 319         }
 320
 321         // Return result
 322         return $result;
 323 }
 324
 325 // Execute auth.php request
 326 function executeWernisApiAuth ($wernisId, $wernisPassword) {
 327         // Prepare request data
 328         $requestData = array(
 329                 't_uid'       => bigintval($wernisId),
 330                 't_md5'       => hashSha256($wernisPassword),
 331         );
 332
 333         // Call auth.php
 334         $return = sendWernisApiRequest('auth.php', $requestData);
 335
 336         // Return full array
 337         return $return;
 338 }
 339
 340 // Execute get.php reguest with given auth data (not all are used)
 341 function executeWernisApiGet ($authData, $subRequest, $fields) {
 342         // It must be an array
 343         assert(is_array($authData));
 344
 345         // Check required array elements
 346         assert(isset($authData['wernis_userid']));
 347         assert(isset($authData['api_auth_key']));
 348         assert(isset($authData['api_redirect_challenge']));
 349
 350         // Then create request array
 351         $requestData = array(
 352                 'sub_request' => $subRequest,
 353                 'fields'      => $fields,
 354                 't_uid'       => bigintval($authData['wernis_userid']),
 355                 'auth_key'    => $authData['api_auth_key'],
 356                 'challenge'   => $authData['api_redirect_challenge']
 357         );
 358
 359         // Call get.php
 360         $return = sendWernisApiRequest('get.php', $requestData);
 361
 362         // Return full array
 363         return $return;
 364 }
 365
 366 // Translate the status IN/OUT
 367 function translateWernisTransferStatus ($status) {
 368         // Default status is unknown
 369         $return = '{%message,WERNIS_STATUS_UNKNWOWN=' . $status . '%}';
 370
 371         // Construct message id
 372         $messageId = 'WERNIS_STATUS_' . $status;
 373
 374         // Is it there?
 375         if (isMessageIdValid($messageId)) {
 376                 // Then use it as message string
 377                 $return = '{--' . $messageId . '--}';
 378         } // END - if
 379
 380         // Return the status
 381         return $return;
 382 }
 383
 384 // Log the transfer
 385 function logWernisTransfer ($wdsId, $amount, $type = 'FAILED', $message = '', $status = '') {
 386         // Register this wernis movement
 387         sqlQueryEscaped("INSERT INTO `{?_MYSQL_PREFIX?}_user_wernis` (`userid`, `wernis_account`, `wernis_amount`, `wernis_timestamp`, `wernis_type`, `wernis_api_message`, `wernis_api_status`) VALUES (%s, %s, %s, UNIX_TIMESTAMP(), '%s', '%s', '%s')",
 388                 array(
 389                         getMemberId(),
 390                         bigintval($wdsId),
 391                         bigintval($amount),
 392                         $type,
 393                         $message,
 394                         $status
 395                 ), __FUNCTION__, __LINE__);
 396 }
 397
 398 // Calulcate fees and factor
 399 function calculateWernisFee ($points, $mode) {
 400         // Payout or withdraw are allowed modes!
 401         //* DEBUG: */ debugOutput('mode=' . $mode . ',points=' . $points);
 402         if (!in_array($mode, array('payout', 'withdraw'))) {
 403                 // Log error and abort
 404                 logDebugMessage(__FUNCTION__, __LINE__, 'userid=' . getMemberId() . ',mode=' . $mode . ',points=' . $points . ' - unknown mode detected.');
 405                 return FALSE;
 406         } // END - if
 407
 408         // Is there a percentage or fixed fee?
 409         if (getConfig('wernis_' . $mode . '_fee_percent') > 0) {
 410                 // Percentage fee
 411                 $points -= $points * getConfig('wernis_'.$mode.'_fee_percent') / 100;
 412         } elseif (getConfig('wernis_' . $mode . '_fee_fix') > 0) {
 413                 // Fixed fee
 414                 $points -= getConfig('wernis_' . $mode . '_fee_fix');
 415         }
 416
 417         // Divide/multiply the factor
 418         if ($mode == 'payout') {
 419                 // Divide for payout
 420                 $points = $points / getWernisPayoutFactor();
 421         } else {
 422                 // Multiply for withdraw
 423                 $points = $points * getWernisWithdrawFactor();
 424         }
 425
 426         // Return value
 427         //* DEBUG: */ debugOutput('mode=' . $mode . ',points=' . $points);
 428         return $points;
 429 }
 430
 431 // Add withdraw fees and factor
 432 // @TODO Unused?
 433 function calulcateWernisWithdrawFee ($points) {
 434         // Is there a percentage or fixed fee?
 435         if (getWernisWithdrawFeePercent() > 0) {
 436                 // Percentage fee
 437                 $points += $points * getWernisWithdrawFeePercent() / 100;
 438         } elseif (getWernisWithdrawFeeFix() > 0) {
 439                 // Fixed fee
 440                 $points += getWernisWithdrawFeeFix();
 441         }
 442
 443         // Return value
 444         return $points;
 445 }
 446
 447 // Displays registration form for WDS66 registration
 448 function doDisplayWernisUserRegistrationForm () {
 449         // Is the form sent?
 450         if (isFormSent('register')) {
 451                 // Is wernis_id set?
 452                 if (!isPostRequestElementSet('wernis_id')) {
 453                         // Id not set
 454                         displayMessage('{--GUEST_WERNIS_REGISTRATION_ID_NOT_SET--}');
 455                 } elseif (!isPostRequestElementSet('wernis_password')) {
 456                         // Password not set
 457                         displayMessage('{--GUEST_WERNIS_REGISTRATION_PASSWORD_NOT_SET--}');
 458                 } else {
 459                         // So far, all fine, then let's do the call-back on auth.php ...
 460                         $response = executeWernisApiAuth(postRequestElement('wernis_id'), postRequestElement('wernis_password'));
 461
 462                         // Was the status okay?
 463                         if (isHttpResponseStatusOkay($response)) {
 464                                 // All fine, then analyze API response
 465                                 $args = convertApiResponseToArray($response['response'], '&', '=');
 466
 467                                 // Is status set?
 468                                 assert(isset($args['auth_status']));
 469
 470                                 // Add WDS66 userid
 471                                 $args['wernis_userid'] = postRequestElement('wernis_id');
 472
 473                                 // "Detect" auth status
 474                                 $callbackFunction = 'doWernisAuth' . capitalizeUnderscoreString($args['auth_status']);
 475
 476                                 // Is the call-back there?
 477                                 if (!is_callable($callbackFunction, FALSE, $callableName)) {
 478                                         // Not there, could be bad. :(
 479                                         reportBug(__FUNCTION__, __LINE__, 'Unsupported auth_status=' . $args['auth_status'] . ',args()=' . count($args) . ',callbackFunction=' . $callbackFunction . ' detected.');
 480                                 } // END - if
 481
 482                                 // Then call it
 483                                 $status = call_user_func($callbackFunction, $args);
 484
 485                                 // @TODO Something more to do here?
 486                                 die(__FUNCTION__ . ':' . __LINE__ . ': status[' . gettype($status) . ']=' . $status . ' - Unfinished.');
 487                         } else {
 488                                 // Something bad happened
 489                                 displayMessage($response['message']);
 490                         }
 491                 }
 492         } // END - if
 493
 494         // Is there a challenge + response?
 495         if ((isGetRequestElementSet('status')) && (isGetRequestElementSet('challenge')) && (isGetRequestElementSet('__challenge_response'))) {
 496                 // Redirect from modules.php?module=auth, so validate challenge response ...
 497                 // 1) Get first 24 characters = salt
 498                 $salt = substr(getRequestElement('__challenge_response'), 0, 24);
 499
 500                 // 2) Generate hash for challenge response
 501                 $challengeResponse = $salt . hashSha256($salt . getWernisApiMd5() . getRequestElement('challenge'));
 502
 503                 // Is the response valid?
 504                 if ($challengeResponse != getRequestElement('__challenge_response')) {
 505                         // Not valid
 506                         displayMessage('{--GUEST_WERNIS_REGISTRATION_INVALID_CHALLENGE_RESPONSE--}');
 507                         return;
 508                 } // END - if
 509
 510                 /*
 511                  * Now, that the challenge-response is the same, the challenge itself
 512                  * is also the same. Next get the data from wernis_regs table by
 513                  * challenge. There is currently no other way to get the data as there
 514                  * is no Wernis user id provided. Later on the stored challenge response
 515                  * can be compared with provided.
 516                  */
 517                 $return = doWernisFinishUserRegistration(getRequestElement('challenge'), getRequestElement('__challenge_response'), getRequestElement('status'));
 518
 519                 // Is the registration finished?
 520                 if ($return === FALSE) {
 521                         // No, then abort here silently as the function should have already displayed a message
 522                         return;
 523                 } // END - if
 524         } elseif (!isFormSent('register')) {
 525                 // Form not send, so load form template
 526                 loadTemplate('guest_wernis_registration_form');
 527         }
 528 }
 529
 530 // Finish user registration with WDS66 API
 531 function doWernisFinishUserRegistration ($challenge, $challengeResponse, $status) {
 532         // Get stored registration data
 533         $rows = getWernisRegistrationDataByKey('api_redirect_challenge', $challenge);
 534
 535         // Zero result found?
 536         if (count($rows) == 0) {
 537                 // Nothing found
 538                 displayMessage('{--GUEST_WERNIS_REGISTRATION_ZERO_ROWS_FOUND--}');
 539
 540                 // Display form
 541                 loadTemplate('guest_wernis_registration_form');
 542                 return FALSE;
 543         } // END - if
 544
 545         // Check status from GET parameters and stored value
 546         if ($status == '1') {
 547                 // Has the auth status changed?
 548                 if ($rows[0]['api_auth_status'] != 'ACCEPTED') {
 549                         /*
 550                          * The authorization of this application has been accepted, so
 551                          * update it and ignore result from function because the update
 552                          * will always run.
 553                          */
 554                         updateWernisRegistrationStatusByKey('api_redirect_challenge', $challenge, 'ACCEPTED');
 555                 } // END - if
 556
 557                 // Now call "get.php"
 558                 // @TODO Hard-coded value (anrede, etc.)
 559                 $response = executeWernisApiGet($rows[0], 'data', 'anrede|vorname|name|strasse|plz|ort|birth_day|birth_month|birth_year|email');
 560
 561                 // Was the status okay?
 562                 if (isHttpResponseStatusOkay($response)) {
 563                         // API returned non-errous response, 'data=' must be found
 564                         assert(substr($response['response'], 0, 5) == 'data=');
 565
 566                         // And remove it, this is now BASE64-encoded
 567                         $encodedData = urldecode(substr($response['response'], 5));
 568
 569                         // And decode it (all steps separated to later "easily" debug them)
 570                         $decodedData = base64_decode($encodedData);
 571
 572                         /*
 573                          * Do some checks on the decoded string, it should be a
 574                          * serialized array with 10 entries (see above
 575                          * executeWernisApiGet() call).
 576                          */
 577                         assert(substr($decodedData, 0, 6) == 'a:10:{');
 578                         assert(substr($decodedData, -1, 1) == '}');
 579
 580                         // The array seems to be fine, unserialize it
 581                         $userData = unserialize($decodedData);
 582                         die(__FUNCTION__.'<pre>'.print_r($userData, TRUE).'</pre>');
 583                 } else {
 584                         // Something bad happened
 585                         displayMessage($response['message']);
 586                         return FALSE;
 587                 }
 588         } else {
 589                 // Status does not need to be changed
 590         }
 591 }
 592
 593 // Updates auth status by given key/value pair
 594 function updateWernisRegistrationStatusByKey ($key, $value, $newStatus) {
 595         // Run the update
 596         sqlQueryEscaped("UPDATE
 597         `{?_MYSQL_PREFIX?}_wernis_regs`
 598 SET
 599         `api_auth_status`='%s'
 600 WHERE
 601         `%s`='%s' AND
 602         `api_auth_status` != '%s'
 603 LIMIT 1",
 604                 array(
 605                         $newStatus,
 606                         $key,
 607                         $value,
 608                         $newStatus
 609                 ), __FUNCTION__, __LINE__
 610         );
 611
 612         // Check if rows as been affected
 613         return ifSqlHasZeroAffectedRows();
 614 }
 615
 616 // "Getter" for Wernis registration data by given key and value
 617 function getWernisRegistrationDataByKey ($key, $value, $limit = 1) {
 618         // Init array
 619         $rows = array();
 620
 621         // Now search for it
 622         $result = sqlQueryEscaped("SELECT
 623         `local_userid`,
 624         `wernis_userid`,
 625         `api_auth_status`,
 626         `api_auth_key`,
 627         `api_redirect_challenge`,
 628         UNIX_TIMESTAMP(`record_inserted`) AS `record_inserted`
 629 FROM
 630         `{?_MYSQL_PREFIX?}_wernis_regs`
 631 WHERE
 632         `%s`='%s'
 633 ORDER BY
 634         `id`
 635 LIMIT %d",
 636                 array(
 637                         $key,
 638                         $value,
 639                         $limit
 640                 ), __FUNCTION__, __LINE__
 641         );
 642
 643         // Is there an entry?
 644         if (sqlNumRows($result) > 0) {
 645                 // At least one entry has been found, so loop through all
 646                 while ($row = sqlFetchArray($result)) {
 647                         // Add it
 648                         array_push($rows, $row);
 649                 } // END - while
 650         } // END - if
 651
 652         // Free result
 653         sqlFreeResult($result);
 654
 655         // Return found entries
 656         return $rows;
 657 }
 658
 659 //-----------------------------------------------------------------------------
 660 //                      Auth status callback functions
 661 //-----------------------------------------------------------------------------
 662
 663 // Handler for auth_status=PENDING
 664 function doWernisAuthPending ($args) {
 665         // $args must always be an array
 666         assert(is_array($args));
 667
 668         // auth_key and wernis_userid must be set
 669         assert(isset($args['auth_key']));
 670         assert(isset($args['wernis_userid']));
 671
 672         // Generate a challenge that will be added to the URL
 673         $challenge = hashSha256(generatePassword(128));
 674
 675         // Search entry in database by auth_key
 676         if (countSumTotalData($args['auth_key'], 'wernis_regs', 'id', 'api_auth_key', TRUE) == 0) {
 677                 // "Register" this call
 678                 sqlQueryEscaped("INSERT INTO `{?_MYSQL_PREFIX?}_wernis_regs` (
 679         `wernis_userid`,
 680         `api_auth_status`,
 681         `api_auth_key`,
 682         `api_redirect_challenge`
 683 ) VALUES (
 684         %s,
 685         'PENDING',
 686         '%s',
 687         '%s'
 688 )",
 689                         array(
 690                                 bigintval($args['wernis_userid']),
 691                                 $args['auth_key'],
 692                                 $challenge
 693                         ), __FUNCTION__, __LINE__
 694                 );
 695
 696                 // Should be inserted
 697                 assert(sqlAffectedRows() == 1);
 698         } else {
 699                 // Update challenge
 700                 sqlQueryEscaped("UPDATE
 701         `{?_MYSQL_PREFIX?}_wernis_regs`
 702 SET
 703         `api_redirect_challenge`='%s'
 704 WHERE
 705         `api_auth_key`='%s' AND
 706         `wernis_userid`=%s
 707         `api_auth_status`='PENDING'
 708 LIMIT 1",
 709                         array(
 710                                 $challenge,
 711                                 $args['auth_key'],
 712                                 bigintval($args['wernis_userid'])
 713                         ), __FUNCTION__, __LINE__
 714                 );
 715
 716                 // Should always be updated
 717                 assert(sqlAffectedRows() == 1);
 718         }
 719
 720         // Redirect to WDS66 module=auth ...
 721         redirectToUrl(getWernisBaseUrl() . '/modules.php?module=auth&amp;auth_key=' . $args['auth_key'] . '&amp;params=' . urlencode(base64_encode('&module=' . getModule() . '&what=' . getWhat())) . '&amp;challenge=' . $challenge);
 722 }
 723
 724 // Handler for auth_status=ACCEPTED
 725 function doWernisAuthAccepted ($args) {
 726         // $args must always be an array
 727         assert(is_array($args));
 728
 729         // auth_key and wernis_userid must be set
 730         assert(isset($args['auth_key']));
 731         assert(isset($args['wernis_userid']));
 732
 733         die(__FUNCTION__ . '<pre>'.print_r($args, TRUE).'</pre>');
 734 }
 735
 736 //-----------------------------------------------------------------------------
 737 //                             Wrapper functions
 738 //-----------------------------------------------------------------------------
 739
 740 // Wrapper function for 'wernis_refid'
 741 function getWernisRefid () {
 742         // Is there cache?
 743         if (!isset($GLOBALS[__FUNCTION__])) {
 744                 // Get config entry
 745                 $GLOBALS[__FUNCTION__] = getConfig('wernis_refid');
 746         } // END - if
 747
 748         // Return cache
 749         return $GLOBALS[__FUNCTION__];
 750 }
 751
 752 // Wrapper function for 'wernis_pass_md5'
 753 function getWernisPassMd5 () {
 754         // Is there cache?
 755         if (!isset($GLOBALS[__FUNCTION__])) {
 756                 // Get config entry
 757                 $GLOBALS[__FUNCTION__] = getConfig('wernis_pass_md5');
 758         } // END - if
 759
 760         // Return cache
 761         return $GLOBALS[__FUNCTION__];
 762 }
 763
 764 // Wrapper function for 'wernis_api_id'
 765 function getWernisApiId () {
 766         // Is there cache?
 767         if (!isset($GLOBALS[__FUNCTION__])) {
 768                 // Get config entry
 769                 $GLOBALS[__FUNCTION__] = getConfig('wernis_api_id');
 770         } // END - if
 771
 772         // Return cache
 773         return $GLOBALS[__FUNCTION__];
 774 }
 775
 776 // Wrapper function for 'wernis_api_md5'
 777 function getWernisApiMd5 () {
 778         // Is there cache?
 779         if (!isset($GLOBALS[__FUNCTION__])) {
 780                 // Get config entry
 781                 $GLOBALS[__FUNCTION__] = getConfig('wernis_api_md5');
 782         } // END - if
 783
 784         // Return cache
 785         return $GLOBALS[__FUNCTION__];
 786 }
 787
 788 // Wrapper function for 'wernis_api_url'
 789 function getWernisApiUrl () {
 790         // Is there cache?
 791         if (!isset($GLOBALS[__FUNCTION__])) {
 792                 // Get config entry
 793                 $GLOBALS[__FUNCTION__] = getConfig('wernis_api_url');
 794         } // END - if
 795
 796         // Return cache
 797         return $GLOBALS[__FUNCTION__];
 798 }
 799
 800 // Wrapper function for 'wernis_withdraw_active'
 801 function getWernisWithdrawActive () {
 802         // Is there cache?
 803         if (!isset($GLOBALS[__FUNCTION__])) {
 804                 // Get config entry
 805                 $GLOBALS[__FUNCTION__] = getConfig('wernis_withdraw_active');
 806         } // END - if
 807
 808         // Return cache
 809         return $GLOBALS[__FUNCTION__];
 810 }
 811
 812 // Wrapper function for 'wernis_payout_active'
 813 function getWernisPayoutActive () {
 814         // Is there cache?
 815         if (!isset($GLOBALS[__FUNCTION__])) {
 816                 // Get config entry
 817                 $GLOBALS[__FUNCTION__] = getConfig('wernis_payout_active');
 818         } // END - if
 819
 820         // Return cache
 821         return $GLOBALS[__FUNCTION__];
 822 }
 823
 824 // Wrapper function for 'wernis_withdraw_active'
 825 function isWernisWithdrawActive () {
 826         // Is there cache?
 827         if (!isset($GLOBALS[__FUNCTION__])) {
 828                 // Get config entry
 829                 $GLOBALS[__FUNCTION__] = (getConfig('wernis_withdraw_active') == 'Y');
 830         } // END - if
 831
 832         // Return cache
 833         return $GLOBALS[__FUNCTION__];
 834 }
 835
 836 // Wrapper function for 'wernis_payout_active'
 837 function isWernisPayoutActive () {
 838         // Is there cache?
 839         if (!isset($GLOBALS[__FUNCTION__])) {
 840                 // Get config entry
 841                 $GLOBALS[__FUNCTION__] = (getConfig('wernis_payout_active') == 'Y');
 842         } // END - if
 843
 844         // Return cache
 845         return $GLOBALS[__FUNCTION__];
 846 }
 847
 848 // Wrapper function for 'wernis_withdraw_factor'
 849 function getWernisWithdrawFactor () {
 850         // Is there cache?
 851         if (!isset($GLOBALS[__FUNCTION__])) {
 852                 // Get config entry
 853                 $GLOBALS[__FUNCTION__] = getConfig('wernis_withdraw_factor');
 854         } // END - if
 855
 856         // Return cache
 857         return $GLOBALS[__FUNCTION__];
 858 }
 859
 860 // Wrapper function for 'wernis_payout_factor'
 861 function getWernisPayoutFactor () {
 862         // Is there cache?
 863         if (!isset($GLOBALS[__FUNCTION__])) {
 864                 // Get config entry
 865                 $GLOBALS[__FUNCTION__] = getConfig('wernis_payout_factor');
 866         } // END - if
 867
 868         // Return cache
 869         return $GLOBALS[__FUNCTION__];
 870 }
 871
 872 // Wrapper function for 'wernis_withdraw_fee_percent'
 873 function getWernisWithdrawFeePercent () {
 874         // Is there cache?
 875         if (!isset($GLOBALS[__FUNCTION__])) {
 876                 // Get config entry
 877                 $GLOBALS[__FUNCTION__] = getConfig('wernis_withdraw_fee_percent');
 878         } // END - if
 879
 880         // Return cache
 881         return $GLOBALS[__FUNCTION__];
 882 }
 883
 884 // Wrapper function for 'wernis_withdraw_fee_fix'
 885 function getWernisWithdrawFeeFix () {
 886         // Is there cache?
 887         if (!isset($GLOBALS[__FUNCTION__])) {
 888                 // Get config entry
 889                 $GLOBALS[__FUNCTION__] = getConfig('wernis_withdraw_fee_fix');
 890         } // END - if
 891
 892         // Return cache
 893         return $GLOBALS[__FUNCTION__];
 894 }
 895
 896 // Wrapper function for 'wernis_payout_fee_percent'
 897 function getWernisPayoutFeePercent () {
 898         // Is there cache?
 899         if (!isset($GLOBALS[__FUNCTION__])) {
 900                 // Get config entry
 901                 $GLOBALS[__FUNCTION__] = getConfig('wernis_payout_fee_percent');
 902         } // END - if
 903
 904         // Return cache
 905         return $GLOBALS[__FUNCTION__];
 906 }
 907
 908 // Wrapper function for 'wernis_payout_fee_fix'
 909 function getWernisPayoutFeeFix () {
 910         // Is there cache?
 911         if (!isset($GLOBALS[__FUNCTION__])) {
 912                 // Get config entry
 913                 $GLOBALS[__FUNCTION__] = getConfig('wernis_payout_fee_fix');
 914         } // END - if
 915
 916         // Return cache
 917         return $GLOBALS[__FUNCTION__];
 918 }
 919
 920 // Wrapper function for 'wernis_min_payout'
 921 function getWernisMinPayout () {
 922         // Is there cache?
 923         if (!isset($GLOBALS[__FUNCTION__])) {
 924                 // Get config entry
 925                 $GLOBALS[__FUNCTION__] = getConfig('wernis_min_payout');
 926         } // END - if
 927
 928         // Return cache
 929         return $GLOBALS[__FUNCTION__];
 930 }
 931
 932 // Wrapper function for 'wernis_min_withdraw'
 933 function getWernisMinWithdraw () {
 934         // Is there cache?
 935         if (!isset($GLOBALS[__FUNCTION__])) {
 936                 // Get config entry
 937                 $GLOBALS[__FUNCTION__] = getConfig('wernis_min_withdraw');
 938         } // END - if
 939
 940         // Return cache
 941         return $GLOBALS[__FUNCTION__];
 942 }
 943
 944 // Wrapper function for 'wernis_base_url'
 945 function getWernisBaseUrl () {
 946         // Is there cache?
 947         if (!isset($GLOBALS[__FUNCTION__])) {
 948                 // Get config entry
 949                 $GLOBALS[__FUNCTION__] = getConfig('wernis_base_url');
 950         } // END - if
 951
 952         // Return cache
 953         return $GLOBALS[__FUNCTION__];
 954 }
 955
 956 // [EOF]
 957 ?>