Cache system rewritten, thanks to profi-concept's hints of including not evaluating it

[mailer.git] / inc / libs / wernis_functions.php

diff --git a/inc/libs/wernis_functions.php b/inc/libs/wernis_functions.php
index 4114845e9cdbc75227cfd28a2c180e353228fd21..ee8a5d9958e5b862c6d23bd7c02efd03fd3bedca 100644 (file)
--- a/inc/libs/wernis_functions.php
+++ b/inc/libs/wernis_functions.php
@@ -32,7 +32,7 @@
  ************************************************************************/
 
 // Some security stuff...
-if (ereg(basename(__FILE__), $_SERVER['PHP_SELF'])) {
+if (!defined('__SECURITY')) {
        $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
        require($INC);
 }
@@ -95,7 +95,7 @@ function WERNIS_SEND_REQUEST ($scriptName, $requestData =  array()) {
 
        // Add more request data
        $requestData['api_id']  = bigintval($_CONFIG['wernis_api_id']);
-       $requestData['api_key'] = $_CONFIG['wernis_api_key'];
+       $requestData['api_key'] = $_CONFIG['wernis_api_md5'];
 
        // Construct the request string
        $requestString = $_CONFIG['wernis_api_url'] . $scriptName;
@@ -170,6 +170,7 @@ function WERNIS_SEND_REQUEST ($scriptName, $requestData =  array()) {
                                break;
 
                        default: // Unknown error (maybe new?)
+                               DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Unknown error %s from WDS66 API received.", $data[1]));
                                $return = array(
                                        'status'  => "request_failed",
                                        'message' => sprintf(WERNIS_API_REQUEST_FAILED, $data[1])
@@ -212,10 +213,23 @@ function WERNIS_TEST_API () {
 // Widthdraw this amount
 function WERNIS_EXECUTE_WITHDRAW ($wdsId, $userMd5, $amount) {
        global $_CONFIG;
+
+       // Is the sponsor extension installed?
+       if ($_CONFIG['wernis_withdraw_active'] == "N") {
+               if (!EXT_IS_ACTIVE("sponsor")) {
+                       // No, abort here
+                       return false;
+               } elseif (!IS_SPONSOR()) {
+                       // No sponsor, not allowed to withdraw!
+                       return false;
+               }
+       } // END - if
+
+       // Default is failed attempt
        $result = false;
 
        // Prepare the purpose
-       $eval = "\$purpose = \"".COMPILE_CODE(WERNIS_API_PURPOSE_WITHDRAW)."\";";
+       $eval = "\$purpose = \"".COMPILE_CODE(sprintf(WERNIS_API_PURPOSE_WITHDRAW, $GLOBALS['userid']))."\";";
        eval($eval);
 
        // Prepare the request data
@@ -251,20 +265,22 @@ function WERNIS_EXECUTE_WITHDRAW ($wdsId, $userMd5, $amount) {
 
 
 // Payout this amount
-function WERNIS_EXECUTE_PAYOUT ($wdsId, $userMd5, $amount) {
+function WERNIS_EXECUTE_PAYOUT ($wdsId, $amount) {
        global $_CONFIG;
+
+       // Default is failed attempt
        $result = false;
 
        // Prepare the purpose
-       $eval = "\$purpose = \"".COMPILE_CODE(WERNIS_API_PURPOSE_PAYOUT)."\";";
+       $eval = "\$purpose = \"".COMPILE_CODE(sprintf(WERNIS_API_PURPOSE_PAYOUT, $GLOBALS['userid']))."\";";
        eval($eval);
 
        // Prepare the request data
        $requestData = array(
                'sub_request'   => "send",
-               't_uid'                 => bigintval($wdsId),
-               't_md5'                 => $userMd5,
-               'r_uid'                 => $_CONFIG['wernis_refid'],
+               't_uid'                 => $_CONFIG['wernis_refid'],
+               't_md5'                 => $_CONFIG['wernis_pass_md5'],
+               'r_uid'                 => bigintval($wdsId),
                'amount'                => bigintval($amount),
                'purpose'               => urlencode(base64_encode($purpose))
        );
@@ -312,11 +328,86 @@ function WERNIS_TRANSFER_STATUS ($status) {
        return $return;
 }
 
-function WERNIS_LOG_TRANSFER ($wdsId, $amount, $type = 'FAILED', $message = null, $status = null) {
+// Log the transfer
+function WERNIS_LOG_TRANSFER ($wdsId, $amount, $type = 'FAILED', $message = "", $status = "") {
        // Register this wernis movement
-       $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')",
+       $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')",
                array($GLOBALS['userid'], bigintval($wdsId), bigintval($amount), $type, $message, $status), __FILE__, __LINE__);
 }
 
+// Take fees and factor
+function WERNIS_TAKE_FEE ($points, $mode) {
+       global $_CONFIG;
+
+       // Payout or withdraw are allowed modes!
+       //* DEBUG: */ echo "mode={$mode},points={$points}<br />\n";
+       if (!in_array($mode, array('payout', 'withdraw'))) {
+               // Log error and abort
+               DEBUG_LOG(__FUNCTION__, __LINE__, "uid={$GLOBALS['userid']},mode={$mode},points={$points}");
+               return false;
+       } // END - if
+
+       // Is there a percentage or fixed fee?
+       if ($_CONFIG['wernis_'.$mode.'_fee_percent'] > 0) {
+               // Percentage fee
+               $points -= $points * $_CONFIG['wernis_'.$mode.'_fee_percent'] / 100;
+       } elseif ($_CONFIG['wernis_'.$mode.'_fee_fix'] > 0) {
+               // Fixed fee
+               $points -= $_CONFIG['wernis_'.$mode.'_fee_fix'];
+       }
+
+       // Divide/multiply the factor
+       if ($mode == "payout") {
+               // Divide for payout
+               $points = $points / $_CONFIG['wernis_payout_factor'];
+       } else {
+               // Multiply for withdraw
+               $points = $points * $_CONFIG['wernis_withdraw_factor'];
+       }
+
+       // Return value
+       //* DEBUG: */ echo "mode={$mode},points={$points}<br />\n";
+       return $points;
+}
+
+// Add withdraw fees and factor
+function WERNIS_ADD_WITHDRAW_FEE ($points) {
+       global $_CONFIG;
+
+       // Is there a percentage or fixed fee?
+       if ($_CONFIG['wernis_withdraw_fee_percent'] > 0) {
+               // Percentage fee
+               $points += $points * $_CONFIG['wernis_withdraw_fee_percent'] / 100;
+       } elseif ($_CONFIG['wernis_withdraw_fee_fix'] > 0) {
+               // Fixed fee
+               $points += $_CONFIG['wernis_withdraw_fee_fix'];
+       }
+
+       // Return value
+       return $points;
+}
+
+// Add all fees to the array
+function WERNIS_ADD_FEES_TO_ARRAY (&$array) {
+       global $_CONFIG;
+
+       // Is the array an array? ;-)
+       if (!is_array($array)) {
+               // Log error and return
+               DEBUG_LOG(__FUNCTION__, __LINE__, " Type ".gettype($array)." != array.");
+               return;
+       } // END - if
+
+       // Add both factors
+       $array['payout_factor']        = TRANSLATE_COMMA($_CONFIG['wernis_payout_factor']);
+       $array['withdraw_factor']      = TRANSLATE_COMMA($_CONFIG['wernis_withdraw_factor']);
+
+       // Add all fees
+       $array['payout_fee_percent']   = TRANSLATE_COMMA($_CONFIG['wernis_payout_fee_percent']);
+       $array['withdraw_fee_percent'] = TRANSLATE_COMMA($_CONFIG['wernis_withdraw_fee_percent']);
+       $array['payout_fee_fix']       = TRANSLATE_COMMA($_CONFIG['wernis_payout_fee_fix']);
+       $array['withdraw_fee_fix']     = TRANSLATE_COMMA($_CONFIG['wernis_withdraw_fee_fix']);
+}
+
 //
 ?>