"failed_general",
'message' => WERNIS_API_REQUEST_DATA_INVALID
);
} // END - if
// Is the API id and MD5 hash there?
if ((empty($_CONFIG['wernis_api_id'])) || (empty($_CONFIG['wernis_api_md5']))) {
// Abort here...
return array(
'status' => "failed_general",
'message' => WERNIS_API_REQUEST_DATA_MISSING
);
} // END - if
// Add more request data
$requestData['api_id'] = bigintval($_CONFIG['wernis_api_id']);
$requestData['api_key'] = $_CONFIG['wernis_api_md5'];
// Construct the request string
$requestString = $_CONFIG['wernis_api_url'] . $scriptName;
// Get the raw response from the lower function
$response = POST_URL($requestString, $requestData);
// Check the response header if all is fine
if (strpos($response[0], "200") === false) {
// Something bad happend... :(
return array(
'status' => "request_error",
'message' => sprintf(WERNIS_API_REQUEST_ERROR, $response[0])
);
} // END - if
// All (maybe) fine so remove the response header from server
$response = $response[(count($response) - 1)];
// Prepare the returning result for higher functions
if (substr($response, 0, 1) == "&") {
// Remove the leading & (which can be used in Flash)
$response = substr($response, 1);
} // END - if
// Bring back the response
$data = explode("=", $response);
// Default return array (should not stay empty)
$return = array();
// We use only the first two entries (which shall be fine)
if ($data[0] === "error") {
// The request has failed... :(
switch ($data[1]) {
case "404": // Invalid API ID
case "AUTH": // Authorization has failed
$return = array(
'status' => "auth_failed",
'message' => WERNIS_API_REQUEST_FAILED_AUTH
);
break;
case "LOCKED": // User account is locked!
case "PASS": // Bad passphrase entered
case "USER": // Missing account or invalid password
$return = array(
'status' => "user_failed",
'message' => WERNIS_API_REQUEST_FAILED_USER
);
break;
case "OWN": // Transfer to own account
$return = array(
'status' => "own_failed",
'message' => WERNIS_API_REQUEST_FAILED_OWN
);
break;
case "AMOUNT": // Amount is depleted
$return = array(
'status' => "amount_failed",
'message' => WERNIS_API_REQUEST_FAILED_AMOUNT
);
break;
case "AMOUNT-SEND": // API amount is depleted
$return = array(
'status' => "api_amount_failed",
'message' => WERNIS_API_REQUEST_FAILED_API_AMOUNT
);
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])
);
break;
}
} else {
// All fine here
$return = array(
'status' => "OK",
'response' => $response
);
}
// Return the result
return $return;
}
// Tests the function by calling balance.php on the API
function WERNIS_TEST_API () {
// Get config first
global $_CONFIG;
$result = false;
// Return the result from the lower functions
$return = WERNIS_SEND_REQUEST("balance.php");
if ($return['status'] == "OK") {
// All fine!
$result = true;
} else {
// Status failture text
WERNIS_STATUS_MESSAGE($return['message'], $return['status']);
}
// Return result
return $result;
}
// 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(sprintf(WERNIS_API_PURPOSE_WITHDRAW, $GLOBALS['userid']))."\";";
eval($eval);
// Prepare the request data
$requestData = array(
'sub_request' => "receive",
't_uid' => bigintval($wdsId),
't_md5' => $userMd5,
'r_uid' => $_CONFIG['wernis_refid'],
'amount' => bigintval($amount),
'purpose' => urlencode(base64_encode($purpose))
);
// Return the result from the lower functions
$return = WERNIS_SEND_REQUEST("book.php", $requestData);
if ($return['status'] == "OK") {
// All fine!
$result = true;
// Log the transfer
WERNIS_LOG_TRANSFER($wdsId, $amount, 'IN');
} else {
// Status failture text
WERNIS_STATUS_MESSAGE($return['message'], $return['status']);
// Log the transfer
WERNIS_LOG_TRANSFER($wdsId, $amount, 'FAILED', $return['message'], $return['status']);
}
// Return result
return $result;
}
// Payout this amount
function WERNIS_EXECUTE_PAYOUT ($wdsId, $amount) {
global $_CONFIG;
// Default is failed attempt
$result = false;
// Prepare the purpose
$eval = "\$purpose = \"".COMPILE_CODE(sprintf(WERNIS_API_PURPOSE_PAYOUT, $GLOBALS['userid']))."\";";
eval($eval);
// Prepare the request data
$requestData = array(
'sub_request' => "send",
't_uid' => $_CONFIG['wernis_refid'],
't_md5' => $_CONFIG['wernis_pass_md5'],
'r_uid' => bigintval($wdsId),
'amount' => bigintval($amount),
'purpose' => urlencode(base64_encode($purpose))
);
// Return the result from the lower functions
$return = WERNIS_SEND_REQUEST("book.php", $requestData);
if ($return['status'] == "OK") {
// All fine!
$result = true;
// Log the transfer
WERNIS_LOG_TRANSFER($wdsId, $amount, 'OUT');
} else {
// Status failture text
WERNIS_STATUS_MESSAGE($return['message'], $return['status']);
// Log the transfer
WERNIS_LOG_TRANSFER($wdsId, $amount, 'FAILED', $return['message'], $return['status']);
}
// Return result
return $result;
}
// Translate the status IN/OUT
function WERNIS_TRANSFER_STATUS ($status) {
// Default status
$return = sprintf(WERNIS_STATUS_UNKNWOWN, $status);
switch ($status) {
case "IN": // Withdraw
$return = WERNIS_STATUS_WITHDRAW;
break;
case "OUT": // Payout
$return = WERNIS_STATUS_PAYOUT;
break;
case "FAILED": // Payout
$return = WERNIS_STATUS_FAILED;
break;
}
// Return the status
return $return;
}
// 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')",
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}
\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}
\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']);
}
//
?>