function Crypt_Decode($String, $Key = HOST_ID)
{
/****************************************************************************/
$__args_types = array('string', 'string');
#-----------------------------------------------------------------------------
$__args__ = Func_Get_Args();
eval(FUNCTION_INIT);
/****************************************************************************/
$String = Base64_Decode($String);
#-----------------------------------------------------------------------------
if (empty($String)) {
return $String;
}
#-----------------------------------------------------------------------------
if (Extension_Loaded('mcrypt')) {
#---------------------------------------------------------------------------
$Module =& Link_Get('Crypt');
#---------------------------------------------------------------------------
if (!Is_Resource($Module)) {
#-------------------------------------------------------------------------
$Module = @MCrypt_Module_Open(MCRYPT_DES, '', MCRYPT_MODE_ECB, '');
if (!Is_Resource($Module)) {
return ERROR | @Trigger_Error('[Crypt_Decode]: не удалось открыть дескриптор');
}
#-------------------------------------------------------------------------
$Iv = @MCrypt_Create_Iv(MCrypt_Enc_Get_Iv_Size($Module), MCRYPT_RAND);
if (!$Iv) {
return ERROR | @Trigger_Error('[Crypt_Decode]: не удалось создать IV');
}
#-------------------------------------------------------------------------
$Key = SubStr($Key, 0, MCrypt_Enc_Get_Key_Size($Module));
#Debug(SPrintF("[system/libs/auto/Crypt]: Decode Key = %s",$Key));
#-------------------------------------------------------------------------
$IsInit = @MCrypt_Generic_Init($Module, $Key, $Iv);
if (!Is_Integer($IsInit)) {
return ERROR | @Trigger_Error('[Crypt_Decode]: не удалось инициализовать модуль дешифрования');
}
}
#---------------------------------------------------------------------------
$String = @MDecrypt_Generic($Module, $String);
if (!Is_String($String)) {
return ERROR | @Trigger_Error('[Crypt_Decode]: не удалось дешифровать данные');
}
#---------------------------------------------------------------------------
$String = Trim($String);
#---------------------------------------------------------------------------
}
#-----------------------------------------------------------------------------
return $String;
}
public static function PrepareVariables(&$arData)
{
unset($arData["NEW_COMPONENT_TEMPLATE"]);
if ($arData["SEF_MODE"] == "Y") {
unset($arData["VARIABLE_ALIASES"]);
unset($arData["SEF_URL_TEMPLATES"]);
foreach ($arData as $dataKey => $dataValue) {
if (SubStr($dataKey, 0, strlen("SEF_URL_TEMPLATES_")) == "SEF_URL_TEMPLATES_") {
$arData["SEF_URL_TEMPLATES"][SubStr($dataKey, strlen("SEF_URL_TEMPLATES_"))] = $dataValue;
unset($arData[$dataKey]);
if (preg_match_all("'(\\?|&)(.+?)=#([^#]+?)#'is", $dataValue, $arMatches, PREG_SET_ORDER)) {
foreach ($arMatches as $arMatch) {
$arData["VARIABLE_ALIASES"][SubStr($dataKey, strlen("SEF_URL_TEMPLATES_"))][$arMatch[3]] = $arMatch[2];
}
}
} elseif (SubStr($dataKey, 0, strlen("VARIABLE_ALIASES_")) == "VARIABLE_ALIASES_") {
unset($arData[$dataKey]);
}
}
} else {
unset($arData["VARIABLE_ALIASES"]);
unset($arData["SEF_URL_TEMPLATES"]);
foreach ($arData as $dataKey => $dataValue) {
if (SubStr($dataKey, 0, strlen("SEF_URL_TEMPLATES_")) == "SEF_URL_TEMPLATES_") {
unset($arData[$dataKey]);
} elseif (SubStr($dataKey, 0, strlen("VARIABLE_ALIASES_")) == "VARIABLE_ALIASES_") {
$arData["VARIABLE_ALIASES"][SubStr($dataKey, strlen("VARIABLE_ALIASES_"))] = $dataValue;
unset($arData[$dataKey]);
}
}
}
}
public function store(Request $request)
{
$this->validate($request, ['NMbl' => 'required', 'NHbl' => 'required']);
$registrosmars = DB::table('mbls')->where('Nmbl', '=', $request->NMbl)->get();
foreach ($registrosmars as $key) {
}
$pod = $key->POD;
$data = $key->ETA;
$ano = SubStr($data, 0, 4);
$referencia = $key->registro;
$id = $key->id;
$os = 'OS' . $pod . $id . '/' . $ano;
$cnee = $key->cnee;
$mbl = $key->NMbl;
$agenteId = DB::table('agentes')->where('nome', '=', $key->cnee)->get();
foreach ($agenteId as $item) {
}
$valor = $item->valordesconsolmaritimo;
Hbl::create(['ETA' => $data, 'NMbl' => $mbl, 'NHbl' => $request->NHbl, 'referencia' => $os, 'mbl_id' => $id, 'shipper' => $request->shipper, 'cnee' => $request->cnee, 'agente' => $cnee, 'vlrDesconsol' => $valor]);
$hbl = DB::table('hbls')->where('NHbl', '=', $request->NHbl)->get();
foreach ($hbl as $item) {
}
$hblid = $item->id;
Faturamento::create(['documento' => $request->NHbl, 'data' => $data, 'hbl_id' => $hblid, 'referencia' => $referencia, 'OS' => $os]);
return redirect('mbl');
}
/**
* @param int $Length
* @throws AuthenticationException
*/
public function Read($Length = 1400)
{
// GoldSource RCON has same structure as Query
$this->Socket->Read();
if ($this->Buffer->GetByte() !== SourceQuery::S2A_RCON) {
return false;
}
$Buffer = $this->Buffer->Get();
$Trimmed = Trim($Buffer);
if ($Trimmed === 'Bad rcon_password.') {
throw new AuthenticationException($Trimmed, AuthenticationException::BAD_PASSWORD);
} else {
if ($Trimmed === 'You have been banned from this server.') {
throw new AuthenticationException($Trimmed, AuthenticationException::BANNED);
}
}
$ReadMore = false;
// There is no indentifier of the end, so we just need to continue reading
// TODO: Needs to be looked again, it causes timeouts
do {
$this->Socket->Read();
$ReadMore = $this->Buffer->Remaining() > 0 && $this->Buffer->GetByte() === SourceQuery::S2A_RCON;
if ($ReadMore) {
$Packet = $this->Buffer->Get();
$Buffer .= SubStr($Packet, 0, -2);
// Let's assume if this packet is not long enough, there are no more after this one
$ReadMore = StrLen($Packet) > 1000;
// use 1300?
}
} while ($ReadMore);
$this->Buffer->Set(Trim($Buffer));
}
function QueryMinecraft($IP, $Port = 25565, $Timeout = 2)
{
$Socket = Socket_Create(AF_INET, SOCK_STREAM, SOL_TCP);
Socket_Set_Option($Socket, SOL_SOCKET, SO_SNDTIMEO, array('sec' => (int) $Timeout, 'usec' => 0));
Socket_Set_Option($Socket, SOL_SOCKET, SO_RCVTIMEO, array('sec' => (int) $Timeout, 'usec' => 0));
if ($Socket === FALSE || @Socket_Connect($Socket, $IP, (int) $Port) === FALSE) {
return FALSE;
}
Socket_Send($Socket, "þ", 2, 0);
$Len = Socket_Recv($Socket, $Data, 512, 0);
Socket_Close($Socket);
if ($Len < 4 || $Data[0] !== "ÿ") {
return FALSE;
}
$Data = SubStr($Data, 3);
// Strip packet header (kick message packet and short length)
$Data = iconv('UTF-16BE', 'UTF-8', $Data);
// Are we dealing with Minecraft 1.4+ server?
if ($Data[1] === "§" && $Data[2] === "1") {
$Data = Explode("", $Data);
return array('HostName' => $Data[3], 'Players' => IntVal($Data[4]), 'MaxPlayers' => IntVal($Data[5]), 'Protocol' => IntVal($Data[1]), 'Version' => $Data[2]);
}
$Data = Explode("§", $Data);
return array('HostName' => SubStr($Data[0], 0, -1), 'Players' => isset($Data[1]) ? IntVal($Data[1]) : 0, 'MaxPlayers' => isset($Data[2]) ? IntVal($Data[2]) : 0, 'Protocol' => 0, 'Version' => '1.3');
}
static function loadBaseURL()
{
$absolute_plugin_folder = RealPath(self::$plugin_folder);
if (StrPos($absolute_plugin_folder, ABSPATH) === 0) {
self::$base_url = Get_Bloginfo('wpurl') . '/' . SubStr($absolute_plugin_folder, Strlen(ABSPATH));
} else {
self::$base_url = Plugins_Url(BaseName(self::$plugin_folder));
}
self::$base_url = Str_Replace("\\", '/', self::$base_url);
# Windows Workaround
}
function FLAP_Explode($String)
{
/****************************************************************************/
$__args_types = array('string');
#-----------------------------------------------------------------------------
$__args__ = Func_Get_Args();
eval(FUNCTION_INIT);
/****************************************************************************/
if (StrLen($String) < 6) {
return FALSE;
}
#-----------------------------------------------------------------------------
return array('Chanel' => Bytes_Get($String, 01), 'Number' => Bytes_Get($String, 02, 02), 'Data' => SubStr($String, 06));
}
function SNAC_Explode($String)
{
/****************************************************************************/
$__args_types = array('string');
#-----------------------------------------------------------------------------
$__args__ = Func_Get_Args();
eval(FUNCTION_INIT);
/****************************************************************************/
$Result = array('FamilyID' => Bytes_Get($String, 00, WORD), 'SubTypeID' => Bytes_Get($String, 02, WORD), 'Flag0' => Bytes_Get($String, 05, BUTE), 'Flag1' => Bytes_Get($String, 06, BUTE), 'RequestID' => Bytes_Get($String, 04, BUTE));
#-----------------------------------------------------------------------------
$Result['Data'] = SubStr($String, 11);
# Сам пакет
#-----------------------------------------------------------------------------
return $Result;
}
/**
* Gets data from buffer
*
* @param int $Length Bytes to read
*
* @return string
*/
public function Get($Length = -1)
{
if ($Length === 0) {
return '';
}
$Remaining = $this->Remaining();
if ($Length === -1) {
$Length = $Remaining;
} else {
if ($Length > $Remaining) {
return '';
}
}
$Data = SubStr($this->Buffer, $this->Position, $Length);
$this->Position += $Length;
return $Data;
}
function __construct()
{
// Read base
$this->base_url = get_bloginfo('wpurl') . '/' . Str_Replace("\\", '/', SubStr(RealPath(DirName(__FILE__)), Strlen(ABSPATH)));
// Get ready to translate
$this->Load_TextDomain();
// Set Hooks
if (Is_Admin()) {
Add_Action('admin_menu', array($this, 'add_options_page'));
Add_Action('admin_head', array($this, 'print_admin_header'));
} else {
Add_Action('wp_head', array($this, 'print_header'));
Add_ShortCode('gallery', array($this, 'gallery_shortcode'));
}
// Add jQuery
wp_enqueue_script('jquery');
}
function QueryMinecraft($IP, $Port = 25565, $Timeout = 2)
{
$Socket = Socket_Create(AF_INET, SOCK_STREAM, SOL_TCP);
Socket_Set_Option($Socket, SOL_SOCKET, SO_SNDTIMEO, array('sec' => (int) $Timeout, 'usec' => 0));
if ($Socket === FALSE || @Socket_Connect($Socket, $IP, (int) $Port) === FALSE) {
return FALSE;
}
Socket_Send($Socket, "þ", 1, 0);
$Len = Socket_Recv($Socket, $Data, 256, 0);
Socket_Close($Socket);
if ($Len < 4 || $Data[0] != "ÿ") {
return FALSE;
}
$Data = SubStr($Data, 3);
$Data = iconv('UTF-16BE', 'UTF-8', $Data);
$Data = Explode("§", $Data);
return array('HostName' => SubStr($Data[0], 0, -1), 'Players' => isset($Data[1]) ? IntVal($Data[1]) : 0, 'MaxPlayers' => isset($Data[2]) ? IntVal($Data[2]) : 0);
}
function TVL_Explode($String, &$Array = array())
{
/****************************************************************************/
$__args_types = array('string', 'array');
#-----------------------------------------------------------------------------
$__args__ = Func_Get_Args();
eval(FUNCTION_INIT);
/****************************************************************************/
$Length = HexDec(Bytes_Get($String, 02, WORD));
#-----------------------------------------------------------------------------
$Array[Bytes_Get($String, 00, WORD)] = SubStr($String, 04, $Length);
#-----------------------------------------------------------------------------
if (StrLen($String = SubStr($String, 04 + $Length)) > 0) {
TVL_Explode($String, $Array);
}
#-----------------------------------------------------------------------------
return $Array;
}
}
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
$Files = IO_Files(SPrintF('%s/core', SYSTEM_PATH));
if (Is_Error($Files)) {
return SPrintF("---\n%s\n---\n", Implode("\n", Array_Slice($__SYSLOG, Count($__SYSLOG) - 20)));
}
#-------------------------------------------------------------------------------
foreach ($Files as $File) {
#-------------------------------------------------------------------------------
$MD5 = MD5_File($File);
if (!$MD5) {
return SPrintF("---\n%s\n---\n", Implode("\n", Array_Slice($__SYSLOG, Count($__SYSLOG) - 20)));
}
#-------------------------------------------------------------------------------
$File = SubStr($File, StrLen(SYSTEM_PATH) + 1);
#-------------------------------------------------------------------------------
$Snapshot[SPrintF('MD5%s', MD5(SPrintF('%s-%s', $MD5, MD5($File))))] = $File;
#-------------------------------------------------------------------------------
}
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
echo "Запрос обновлений\n";
#-------------------------------------------------------------------------------
$Config = Config();
#-------------------------------------------------------------------------------
$Server = $Config['Update']['Server'];
#-------------------------------------------------------------------------------
$Answer = HTTP_Send('/GetUpdate', $Server, array('HostsIDs' => Implode(',', $HostsIDs)), array('Snapshot' => JSON_Encode($Snapshot)));
if (Is_Error($Answer)) {
return "ERROR: не удалось выполнить запрос к серверу\n";
<?php
// starting timer for benchmarking purposes
$timer_start = Time() + SubStr(MicroTime(), 0, 8);
session_start();
// main config file with constants
require_once '../config/config.inc';
// error messges
require_once INCLUDE_DIR . 'error.inc';
// create a global PDO object $db
require_once INCLUDE_DIR . 'database.inc';
// database specific code ( all the SQL/whatever queries )
require_once BACKEND_DIR . '/' . DB_TYPE . '/backend.inc';
// set default node id if not specified
if (!empty($_GET['node_id'])) {
$node_id = $_GET['node_id'];
if (!is_numeric($node_id)) {
$node_id = DEFAULT_NODE_ID;
}
} else {
$node_id = DEFAULT_NODE_ID;
}
if (!empty($_GET['template_id'])) {
$template_id = $_GET['template_id'];
if (!is_numeric($template_id)) {
$template_id = false;
}
} else {
// get template_id from node settings later
$template_id = false;
}
function ShowTab($divName)
{
if (!$this->bInited)
return False;
foreach ($this->arEngines as $key => $value)
{
if (SubStr($divName, 0, StrLen($key."_")) == $key."_")
{
if (array_key_exists("ShowTab", $value))
call_user_func_array($value["ShowTab"], array(SubStr($divName, StrLen($key."_")), $this->arArgs, $this->bVarsFromForm));
}
}
return null;
}
function QueryMinecraft($IP, $Port)
{
$Socket = Socket_Create(AF_INET, SOCK_STREAM, SOL_TCP);
Socket_Set_Option($Socket, SOL_SOCKET, SO_SNDTIMEO, array('sec' => 2, 'usec' => 0));
Socket_Set_Option($Socket, SOL_SOCKET, SO_RCVTIMEO, array('sec' => 2, 'usec' => 0));
if ($Socket === FALSE || @Socket_Connect($Socket, $IP, (int) $Port) === FALSE) {
return FALSE;
}
Socket_Send($Socket, "�", 2, 0);
$Len = Socket_Recv($Socket, $Data, 512, 0);
Socket_Close($Socket);
if ($Len < 4 || $Data[0] !== "�") {
return FALSE;
}
$Data = SubStr($Data, 3);
$Data = iconv('UTF-16BE', 'UTF-8', $Data);
if ($Data[1] === "�" && $Data[2] === "1") {
$Data = Explode("", $Data);
return array('HostName' => $Data[3], 'Players' => IntVal($Data[4]), 'MaxPlayers' => IntVal($Data[5]), 'Protocol' => IntVal($Data[1]), 'Version' => $Data[2]);
}
$Data = Explode("�", $Data);
return array('HostName' => SubStr($Data[0], 0, -1), 'Players' => isset($Data[1]) ? IntVal($Data[1]) : 0, 'MaxPlayers' => isset($Data[2]) ? IntVal($Data[2]) : 0, 'Protocol' => 0, 'Version' => '1.3');
}
$redirectPath .= "?user_settings_id=" . $newID;
} else {
$redirectPath .= "&user_settings_id=" . $newID;
}
LocalRedirect($redirectPath);
}
} else {
$arResult["ShowStep"] = 1;
$arResult["Templates"] = array();
foreach ($arUserTemplatesList as $arUserTemplate) {
$arUserTemplate["LINK"] = htmlspecialcharsbx($APPLICATION->GetCurPageParam("user_template_id=" . $arUserTemplate["NAME"], array("user_template_id")));
if (StrLen($arUserTemplate["TITLE"]) <= 0) {
$arUserTemplate["TITLE"] = $arUserTemplate["NAME"];
}
$arResult["Templates"][] = $arUserTemplate;
}
$arResult["Settings"] = array();
$dbUserOptionsList = CUserOptions::GetList(array("ID" => "ASC"), array("USER_ID_EXT" => $GLOBALS["USER"]->GetID(), "CATEGORY" => $userSettingsCategory));
while ($arUserOptionTmp = $dbUserOptionsList->Fetch()) {
$val = unserialize($arUserOptionTmp["VALUE"]);
if ($val["IBLOCK_ID"] != $iblockId || $val["TASK_TYPE"] != $taskType || $val["OWNER_ID"] != $ownerId) {
continue;
}
$id = IntVal(SubStr($arUserOptionTmp["NAME"], $userSettingsNamePartLength));
$arResult["Settings"][] = array("ID" => $id, "TITLE" => HtmlSpecialCharsbx($val["TITLE"]), "LINK" => htmlspecialcharsbx($APPLICATION->GetCurPageParam("user_template_id=" . $val["TEMPLATE"] . "&user_settings_id=" . $id, array("user_template_id", "user_settings_id"))));
}
}
}
$arResult["arSocNetFeaturesSettings"] = CSocNetAllowed::GetAllowedFeatures();
}
$this->IncludeComponentTemplate();
if (count($arParams["USER_FIELDS_MAIN"]) > 0 || count($arParams["USER_FIELDS_CONTACT"]) > 0 || count($arParams["USER_FIELDS_PERSONAL"]) > 0) {
foreach ($arResult["User"] as $userFieldName => $userFieldValue) {
if (in_array($userFieldName, $arParams["USER_FIELDS_MAIN"]) || in_array($userFieldName, $arParams["USER_FIELDS_CONTACT"]) || in_array($userFieldName, $arParams["USER_FIELDS_PERSONAL"])) {
$val = $userFieldValue;
$strSearch = "";
switch ($userFieldName) {
case 'EMAIL':
if (StrLen($val) > 0) {
$val = '<a href="mailto:' . $val . '">' . $val . '</a>';
}
break;
case 'PERSONAL_WWW':
case 'WORK_WWW':
if (StrLen($val) > 0) {
$valLink = $val;
if (StrToLower(SubStr($val, 0, StrLen("http://"))) != "http://") {
$valLink = "http://" . $val;
}
$val = '<noindex><a href="' . $valLink . '" target="_blank" rel="nofollow">' . $val . '</a></noindex>';
}
break;
case 'PERSONAL_COUNTRY':
case 'WORK_COUNTRY':
if (StrLen($val) > 0) {
if (in_array($userFieldName, $arParams["SONET_USER_FIELDS_SEARCHABLE"])) {
$strSearch = $arParams["PATH_TO_SEARCH_INNER"] . (StrPos($arParams["PATH_TO_SEARCH_INNER"], "?") !== false ? "&" : "?") . "flt_" . StrToLower($userFieldName) . "=" . UrlEncode($val);
}
$val = GetCountryByID($val);
}
break;
case 'PERSONAL_ICQ':
if (Is_Error(System_Load('modules/Authorisation.mod', 'libs/Upload.php'))) {
return ERROR | @Trigger_Error(500);
}
#-------------------------------------------------------------------------------
$Upload = Upload_Get('DataImport');
#-------------------------------------------------------------------------------
switch (ValueOf($Upload)) {
case 'error':
return ERROR | @Trigger_Error(500);
case 'exception':
return 'Файл базы данных не был загружен';
case 'array':
#---------------------------------------------------------------------------
$Data = $Upload['Data'];
#---------------------------------------------------------------------------
if ($gZip = @GzInflate(SubStr($Upload['Data'], 10))) {
#-------------------------------------------------------------------------
echo "Файл базы данных является сжатым файлом gzip\n";
#-------------------------------------------------------------------------
$Data = $gZip;
} else {
echo "Файл базы данных не является сжатым файлом gzip\n";
}
#---------------------------------------------------------------------------
$File = rTrim($Upload['Name'], '.gz');
#---------------------------------------------------------------------------
$File = PathInfo($File);
#---------------------------------------------------------------------------
switch (StrToLower($File['extension'])) {
case 'xml':
#-----------------------------------------------------------------------
$arParams["ORDER_DIR_" . $i] = StrToUpper($arParams["ORDER_DIR_" . $i]) == "ASC" ? "ASC" : "DESC";
$arOrderBy[$orderBy] = $arParams["ORDER_DIR_" . $i];
}
}
if (Count($arOrderBy) <= 0) {
$arOrderBy["NAME"] = "ASC";
$arOrderBy["ID"] = "DESC";
}
$arFilter = array("IBLOCK_ID" => $iblockId, "ACTIVE" => "Y");
if (Is_Array($arParams["FILTER"])) {
foreach ($arParams["FILTER"] as $key => $value) {
$op = "";
$opTmp = SubStr($key, 0, 1);
if (In_Array($opTmp, array("!", "<", ">"))) {
$op = $opTmp;
$key = SubStr($key, 1);
}
if (Array_Key_Exists($key, $arResult["ALLOWED_FIELDS"]) && $arResult["ALLOWED_FIELDS"][$key]["FILTERABLE"]) {
$arFilter[$op . $key] = $value;
}
}
}
}
if (StrLen($arResult["FatalError"]) <= 0) {
$arNavStartParams = array("nPageSize" => $arParams["ITEMS_COUNT"], "bShowAll" => false, "bDescPageNumbering" => false);
$arNavigation = CDBResult::GetNavParams($arNavStartParams);
$arSelectFields = array("IBLOCK_ID");
foreach ($arResult["ALLOWED_FIELDS"] as $key => $value) {
$arSelectFields[] = $key;
}
$arResult["MEETINGS_LIST"] = array();
function _RenderAllComponents($arParams, $bLPA)
{
global $APPLICATION, $USER;
$s = '';
$arPHP = PHPParser::ParseFile($arParams['source']);
$l = count($arPHP);
if ($l > 0) {
$new_source = '';
$end = 0;
$comp_count = 0;
ob_start();
for ($n = 0; $n < $l; $n++) {
//Trim php tags
$src = $arPHP[$n][2];
if (SubStr($src, 0, 5) == "<?" . "php") {
$src = SubStr($src, 5);
} else {
$src = SubStr($src, 2);
}
$src = SubStr($src, 0, -2);
$comp2_begin = '$APPLICATION->INCLUDECOMPONENT(';
if (strtoupper(substr($src, 0, strlen($comp2_begin))) != $comp2_begin) {
continue;
}
$arRes = PHPParser::CheckForComponent2($arPHP[$n][2]);
if ($arRes) {
$comp_name = CMain::_ReplaceNonLatin($arRes['COMPONENT_NAME']);
$template_name = CMain::_ReplaceNonLatin($arRes['TEMPLATE_NAME']);
$arParams = $arRes['PARAMS'];
$arParams['BX_EDITOR_RENDER_MODE'] = 'Y';
if ($bLPA) {
$arPHPparams = array();
CMain::LPAComponentChecker($arParams, $arPHPparams);
$len = count($arPHPparams);
}
$br = "\r\n";
$code = '$APPLICATION->IncludeComponent(' . $br . "\t" . '"' . $comp_name . '",' . $br . "\t" . '"' . $template_name . '",' . $br;
// If exist at least one parameter with php code inside
if (count($arParams) > 0) {
// Get array with description of component params
$arCompParams = CComponentUtil::GetComponentProps($comp_name);
$arTemplParams = CComponentUtil::GetTemplateProps($comp_name, $template_name, $template);
$arParameters = array();
if (isset($arCompParams["PARAMETERS"]) && is_array($arCompParams["PARAMETERS"])) {
$arParameters = $arParameters + $arCompParams["PARAMETERS"];
}
if (is_array($arTemplParams)) {
$arParameters = $arParameters + $arTemplParams;
}
if ($bLPA) {
// Replace values from 'DEFAULT'
for ($e = 0; $e < $len; $e++) {
$par_name = $arPHPparams[$e];
$arParams[$par_name] = isset($arParameters[$par_name]['DEFAULT']) ? $arParameters[$par_name]['DEFAULT'] : '';
}
}
foreach ($arParams as $key => $val) {
if ($key != addslashes($key)) {
unset($arParams[$key]);
} else {
$arParams[$key] = addslashes($val);
}
}
//ReturnPHPStr
$params = PHPParser::ReturnPHPStr2($arParams, $arParameters);
$code .= "\t" . 'Array(' . $br . "\t" . $params . $br . "\t" . ')';
} else {
$code .= "\t" . 'Array()';
}
$parent_comp = CMain::_ReplaceNonLatin($arRes['PARENT_COMP']);
$arExParams_ = $arRes['FUNCTION_PARAMS'];
$bEx = isset($arExParams_) && is_array($arExParams_) && count($arExParams_) > 0;
if (!$parent_comp || strtolower($parent_comp) == 'false') {
$parent_comp = false;
}
if ($parent_comp) {
if ($parent_comp == 'true' || intVal($parent_comp) == $parent_comp) {
$code .= ',' . $br . "\t" . $parent_comp;
} else {
$code .= ',' . $br . "\t\"" . $parent_comp . '"';
}
}
if ($bEx) {
if (!$parent_comp) {
$code .= ',' . $br . "\tfalse";
}
$arExParams = array();
foreach ($arExParams_ as $k => $v) {
$k = CMain::_ReplaceNonLatin($k);
$v = CMain::_ReplaceNonLatin($v);
if (strlen($k) > 0 && strlen($v) > 0) {
$arExParams[$k] = $v;
}
}
$exParams = PHPParser::ReturnPHPStr2($arExParams);
$code .= ',' . $br . "\tArray(" . $exParams . ')';
}
$code .= $br . ');';
echo '#BX_RENDERED_COMPONENT_' . $comp_count . '#';
eval($code);
echo '#BX_RENDERED_COMPONENT_' . $comp_count . '#';
}
$comp_count++;
}
$s = ob_get_contents();
ob_end_clean();
}
return $s;
}
function format_fld($zq1, $zq2)
{
global $hd, $LANG;
$zqr = '';
if (strlen($zq2) > 0) {
if (substr($zq2, 0, 1) == '(') {
$zqr = substr($zq2, strpos($zq2, $zq1 . ':') + 2, 100);
// echo '['.strpos($zq2,$zq1.':').']';
if (strpos($zqr, '&') > 0) {
$zqr = substr($zqr, 0, strpos($zqr, '&'));
}
$zqr = $zq1 . '-' . $zqr;
}
////////////////////// $
if ($zq2 == 'M') {
$zqr = msg($zq1);
}
if ($zq2 == '$') {
$zqr = Number_format($zq1 / 100, 2);
}
////////////////////// $R
if ($zq2 == '$R' or $zq2 == '2') {
$zqr = Number_format($zq1, 2);
if ($LANG == 'en_US') {
$zqr = $zqr;
}
if ($LANG == 'pt_BR' or $zq2 == '2') {
$zqr = troca(troca(troca($zqr, '.', '#'), ',', '.'), '#', '.');
}
}
////////////////////// C
if (substr($zq2, 0, 1) == 'C') {
$zqr = '<CENTER>';
$zqr = $zqr . $zq1;
}
////////////////////// #
if (substr($zq2, 0, 1) == '#') {
$zqr = '<CENTER>';
$zqr = $zqr . $zq1;
}
////////////////////// @
if ($zq2 == 'SHORT') {
$zqr = $zqr . SubStr($zq1, 0, 1) . LowerCase(SubStr($zq1, 1, strpos($zq1, ' ')));
}
if ($zq2 == '@') {
$zqr = UpperCase(SubStr($zq1, 0, 1));
if (substr($zq1, 1, 1) == ' ') {
$zqr = $zqr . ' ';
}
$zqr = $zqr . LowerCase(SubStr($zq1, 1, 200));
}
////////////////////// Bold
if ($zq2 == 'B') {
$zqr = $zqr . '<B>' . $zq1 . '</B>';
}
////////////////////// CB
if ($zq2 == 'CB') {
$varf = $vars[$varf];
$vvvt = '';
$vvvt = $vars['chk' . $zq1];
if ($vvvt == "1") {
$vvvt = "checked";
}
$zqr = $zqr . '<input type="checkbox" name="chk' . $zq1 . '" ' . $vvvt . ' value="1">';
}
////////////////////// CEP
if ($zq2 == 'CEP') {
$xxcep = sonumero($zq1);
if (strlen($xxcep) == 8) {
$xxcep = substr($xxcep, 0, 2) . '.' . substr($xxcep, 2, 3) . '-' . substr($xxcep, 5, 3);
}
$zqr = $zqr . $xxcep;
}
////////////////////// D
if ($zq2 == 'D') {
$zqr = '<CENTER>';
$dta = trim($zq1);
if ($dta == '19000101') {
$zqr = $zqr . '-';
} else {
$zqr = $zqr . stodbr($zq1);
}
}
////////////////////// DR
if ($zq2 == 'DR') {
$zqr = '<CENTER>';
$dta = trim($zq1);
if ($dta == '19000101') {
$zqr = $zqr . '-';
} else {
$zqr = $zqr . substr(stodbr($zq1), 0, 5);
}
}
////////////////////// H
if (substr($zq2, 0, 1) == 'H' and $zq2 != 'H1' and $zq2 != 'H2') {
$zqr = '';
if ($hd != trim($zq1)) {
$zq1v = $zq1;
if (substr($zq2, 1, 1) == 'D') {
$zq1v = stodbr($zq1);
}
// $zqr .= '<TR><TD colspan="15" height="1" bgcolor="#c0c0c0"></TD></TR>';
$zqr .= '<TR><TD bgcolor="#FFFFFF" colspan="15" class="lt2" align="left"><HR size="1"><B>' . $zq1v . '</TD></TR>';
$hd = trim($zq1);
$zqr = $zqr . '<TR><TD></TD>';
}
}
if ($zq2 == 'H1') {
$zqr = $zqr . '<h1>' . $zq1 . '</h1>';
}
if ($zq2 == 'H2') {
$zqr = $zqr . '<h2>' . $zq1 . '</h2>';
}
////////////////////// Italic
if ($zq2 == 'I') {
$zqr = $zqr . '<I>' . $zq1 . '</I>';
}
if (${$zq2} == 'NL') {
$zqr = $zqr . '<TR ' . $xcol . '><TD><TD>' . $linkv . $zq1;
}
if ($zq2 == 'SHORT') {
$zqr = $zqr . LowerCase(SubStr($zq1, 1, strpos($zq1, ' ')));
}
////////////////////// SN
if ($zq2 == 'SN') {
$zqr = '<CENTER>';
$dta = trim($zq1);
if ($dta == '1' or $dta == true or $dta == 'S') {
$zqr = $zqr . 'SIM';
} else {
$zqr = $zqr . 'NAO';
}
}
////////////////////// C
if (substr($zq2, 0, 2) == 'OB') {
$zqr = '<CENTER>';
if ($zq1 == '1') {
$zqr .= msg('yes');
} else {
$zqr .= msg('no');
}
}
if ($zq2 == 'Z') {
$zqr = '<CENTER>';
$zqr = $zqr . strzero($zq1, '0' . substr($zq2, 1, 2));
}
} else {
$zqr = $zq1;
}
return $zqr;
}
echo ' class="' . $sSefClass . '"';
}
?>
>
<td class="bx-width50 bx-popup-label"><?php
echo htmlspecialcharsbx($prop["NAME"]) . ":";
?>
</td>
<td>
<?php
}
if (!array_key_exists($ID, $arValues)) {
if (SubStr($ID, 0, StrLen("SEF_URL_TEMPLATES_")) == "SEF_URL_TEMPLATES_" && is_array($arValues["SEF_URL_TEMPLATES"]) && array_key_exists(SubStr($ID, StrLen("SEF_URL_TEMPLATES_")), $arValues["SEF_URL_TEMPLATES"])) {
$arValues[$ID] = $arValues["SEF_URL_TEMPLATES"][SubStr($ID, StrLen("SEF_URL_TEMPLATES_"))];
} elseif (SubStr($ID, 0, StrLen("VARIABLE_ALIASES_")) == "VARIABLE_ALIASES_" && is_array($arValues["VARIABLE_ALIASES"]) && array_key_exists(SubStr($ID, StrLen("VARIABLE_ALIASES_")), $arValues["VARIABLE_ALIASES"])) {
$arValues[$ID] = $arValues["VARIABLE_ALIASES"][SubStr($ID, StrLen("VARIABLE_ALIASES_"))];
}
}
if (!array_key_exists($ID, $arValues) && isset($prop["DEFAULT"])) {
$arValues[$ID] = $prop["DEFAULT"];
}
if ($arValues["SEF_FOLDER"] == "") {
$arValues["SEF_FOLDER"] = GetDirPath($_GET["src_page"]);
}
if ($prop["MULTIPLE"] == 'Y' && !is_array($arValues[$ID])) {
if (isset($arValues[$ID])) {
$val = array($arValues[$ID]);
} else {
$val = array();
}
} elseif ($prop["TYPE"] == "LIST" && !is_array($arValues[$ID])) {
function DrawBars()
{
if ($this->data_type != "text-data") {
$this->DrawError('Bar plots must be text-data: use function SetDataType("text-data")');
}
$xadjust = $this->records_per_group * $this->record_bar_width / 4;
reset($this->data_values);
while (list($j, $row) = each($this->data_values)) {
$color_index = 0;
$colbarcount = 0;
$x_now = $this->xtr($j + 0.5);
while (list($k, $v) = each($row)) {
if ($k == 0) {
//Draw Data Labels
$xlab = SubStr($v, 0, $this->x_datalabel_maxlength);
$this->DrawXDataLabel($xlab, $x_now);
} else {
// Draw Bars ($v)
$x1 = $x_now - $this->data_group_space + ($k - 1) * $this->record_bar_width;
$x2 = $x1 + $this->record_bar_width * $this->bar_width_adjust;
if ($v < $this->x_axis_position) {
$y1 = $this->ytr($this->x_axis_position);
$y2 = $this->ytr($v);
} else {
$y1 = $this->ytr($v);
$y2 = $this->ytr($this->x_axis_position);
}
if ($color_index >= count($this->ndx_data_color)) {
$color_index = 0;
}
if ($colbarcount >= count($this->ndx_data_border_color)) {
$colbarcount = 0;
}
$barcol = $this->ndx_data_color[$color_index];
$bordercol = $this->ndx_data_border_color[$colbarcount];
if (strval($v) != "") {
//Allow for missing Y data
if ($this->shading > 0) {
for ($i = 0; $i < $this->shading; $i++) {
//Shading set in SetDefaultColors
ImageFilledRectangle($this->img, $x1 + $i, $y1 - $i, $x2 + $i, $y2 - $i, $this->ndx_i_light);
}
}
ImageFilledRectangle($this->img, $x1, $y1, $x2, $y2, $barcol);
ImageRectangle($this->img, $x1, $y1, $x2, $y2, $bordercol);
if ($this->draw_data_labels == '1') {
//ajo
$y1 = $this->ytr($this->label_scale_position * $v);
//$this->DrawDataLabel($v,$j + .5,$v*$this->label_scale_position);
$this->DrawText($this->x_label_ttffont, $this->x_label_angle, $x1 + $this->record_bar_width / 2, $y1, $this->ndx_label_color, $this->x_label_ttffont_size, $v, 'center', 'top');
}
}
$color_index++;
$colbarcount++;
}
}
}
}
function DrawXTitles()
{
if (StrLen($this->title_axis_x) > 0) {
$string_size = $this->TTFStringSize($this->axis_font_size, 0, $this->font, $this->title_axis_x);
$string_height = $string_size[1] * 2;
$ypos = $this->image_height - $this->image_height * 0.03;
$ypos -= $string_height / 0.7;
} else {
$ypos = $this->image_height - $this->image_height * 0.03;
}
$left_offset = $this->chart_area[0];
$width = $this->chart_area[2] - $this->chart_area[0];
$step = $width / $this->record_count_group;
$corr = $step / 2;
$string_size = $this->TTFStringSize($this->axis_font_size, 90, $this->font, "AjxÜ");
$string_width = $string_size[0];
$corr = $step / 2 - $string_width / 2;
$i = $step;
foreach ($this->data_values as $row) {
$string = SubStr($row[0], 0, $this->max_string_size);
$xpos = $i + $left_offset - $corr;
ImageTTFText($this->img, $this->axis_font_size, 90, $xpos, $ypos, $this->font_color, $this->font, $string);
$i += $step;
}
return true;
}
function Update($_1314299381 = "")
{
@$GLOBALS['____467353288'][1004](160 * 2 - 320);
$GLOBALS['____467353288'][1005](___1498308727(2138), ___1498308727(2139));
$GLOBALS['____467353288'][1006](true);
$_2114031822 = ___1498308727(2140);
$_1314299381 = Trim($_1314299381);
if (StrLen($_1314299381) <= 168 * 2 - 336 || $_1314299381 == ___1498308727(2141)) {
$_984440988 = CUpdateControllerSupport::CheckUpdates();
if ($_984440988[1060 / 2 - 530] == ___1498308727(2142)) {
$_2114031822 = ___1498308727(2143) . $_984440988[round(0 + 0.2 + 0.2 + 0.2 + 0.2 + 0.2)];
} elseif ($_984440988[164 * 2 - 328] == ___1498308727(2144)) {
$_2114031822 = ___1498308727(2145);
} elseif ($_984440988[794 - 2 * 397] == ___1498308727(2146)) {
$_2114031822 = ___1498308727(2147);
} elseif ($_984440988[min(170, 0, 56.666666666667)] == ___1498308727(2148)) {
$_2114031822 = ___1498308727(2149) . $_984440988[round(0 + 1)];
} else {
$_2114031822 = ___1498308727(2150) . ___1498308727(2151);
}
} else {
if ($_1314299381 == ___1498308727(2152)) {
$_1988918678 = CUpdateControllerSupport::UpdateUpdate();
if ($_1988918678 == ___1498308727(2153)) {
$_2114031822 = ___1498308727(2154);
} else {
$_2114031822 = ___1498308727(2155) . $_1988918678;
}
} elseif (SubStr($_1314299381, 782 - 2 * 391, round(0 + 0.75 + 0.75 + 0.75 + 0.75)) == ___1498308727(2156)) {
$_1595259486 = SubStr($_1314299381, round(0 + 3));
if ($_1595259486 == ___1498308727(2157)) {
$_1988918678 = CUpdateControllerSupport::UpdateModules();
if ($_1988918678 == ___1498308727(2158)) {
$_2114031822 = ___1498308727(2159) . ___1498308727(2160);
} elseif (SubStr($_1988918678, min(180, 0, 60), round(0 + 1.5 + 1.5)) == ___1498308727(2161)) {
$_2114031822 = ___1498308727(2162) . SubStr($_1988918678, round(0 + 1 + 1 + 1));
} elseif (SubStr($_1988918678, 974 - 2 * 487, round(0 + 0.6 + 0.6 + 0.6 + 0.6 + 0.6)) == ___1498308727(2163)) {
$_2114031822 = ___1498308727(2164) . ___1498308727(2165) . ___1498308727(2166) . SubStr($_1988918678, round(0 + 0.75 + 0.75 + 0.75 + 0.75));
} else {
$_2114031822 = ___1498308727(2167) . ___1498308727(2168);
}
} elseif ($_1595259486 == ___1498308727(2169)) {
$_1988918678 = CUpdateControllerSupport::UpdateModules();
if ($_1988918678 == ___1498308727(2170)) {
$_2114031822 = ___1498308727(2171);
} elseif (SubStr($_1988918678, 1052 / 2 - 526, round(0 + 0.75 + 0.75 + 0.75 + 0.75)) == ___1498308727(2172)) {
$_2114031822 = ___1498308727(2173) . SubStr($_1988918678, round(0 + 1.5 + 1.5));
} elseif (SubStr($_1988918678, 151 * 2 - 302, round(0 + 1.5 + 1.5)) == ___1498308727(2174)) {
$_2114031822 = ___1498308727(2175) . ___1498308727(2176) . ___1498308727(2177) . SubStr($_1988918678, round(0 + 0.75 + 0.75 + 0.75 + 0.75));
} else {
$_2114031822 = ___1498308727(2178) . ___1498308727(2179);
}
} elseif ($_1595259486 == ___1498308727(2180)) {
$_1988918678 = CUpdateControllerSupport::UpdateLangs();
if ($_1988918678 == ___1498308727(2181)) {
$_2114031822 = ___1498308727(2182);
} elseif (SubStr($_1988918678, 199 * 2 - 398, round(0 + 0.6 + 0.6 + 0.6 + 0.6 + 0.6)) == ___1498308727(2183)) {
$_2114031822 = ___1498308727(2184) . SubStr($_1988918678, round(0 + 1 + 1 + 1));
} elseif (SubStr($_1988918678, 200 * 2 - 400, round(0 + 1.5 + 1.5)) == ___1498308727(2185)) {
$_2114031822 = ___1498308727(2186) . ___1498308727(2187) . ___1498308727(2188) . SubStr($_1988918678, round(0 + 1.5 + 1.5));
} else {
$_2114031822 = ___1498308727(2189) . ___1498308727(2190);
}
} else {
$_2114031822 = ___1498308727(2191) . ___1498308727(2192);
}
} else {
$_2114031822 = ___1498308727(2193) . ___1498308727(2194);
}
}
if ($_2114031822 == ___1498308727(2195)) {
CUpdateControllerSupport::Finish();
}
return $_2114031822;
}
public function actionMotd($sid, $adm = 0, $lang = 'ru')
{
$this->layout = FALSE;
$sid = (int) SubStr($sid, 1);
$model = Bans::model()->findByPk($sid);
if ($model === null) {
Yii::app()->end('Error!');
}
$this->render('motd', array('model' => $model, 'show_admin' => $adm == 1 ? TRUE : FALSE));
}
private function WriteData($Command, $Append = "")
{
$Command = Pack('c*', 0xfe, 0xfd, $Command, 0x1, 0x2, 0x3, 0x4) . $Append;
$Length = StrLen($Command);
if ($Length !== FWrite($this->Socket, $Command, $Length)) {
throw new MinecraftQueryException("Failed to write on socket.");
}
$Data = FRead($this->Socket, 2048);
if ($Data === false) {
throw new MinecraftQueryException("Failed to read from socket.");
}
if (StrLen($Data) < 5 || $Data[0] != $Command[2]) {
return false;
}
return SubStr($Data, 5);
}
foreach ($HostsIDs as $HostID) {
#-----------------------------------------------------------------------------
$Path = SPrintF('%s/hosts/%s/comp/Statistics', SYSTEM_PATH, $HostID);
#-----------------------------------------------------------------------------
if (!File_Exists($Path)) {
continue;
}
#-----------------------------------------------------------------------------
$Files = IO_Scan($Path);
if (Is_Error($Files)) {
return ERROR | @Trigger_Error(500);
}
#-----------------------------------------------------------------------------
foreach ($Files as $File) {
#---------------------------------------------------------------------------
$StatisticID = SubStr($File, 0, StriPos($File, '.'));
#---------------------------------------------------------------------------
$Comp = Comp_Load(SPrintF('Statistics/%s', $StatisticID), $IsCreate);
if (Is_Error($Comp)) {
return ERROR | @Trigger_Error(500);
}
#---------------------------------------------------------------------------
$Input = Comp_Load('Form/Input', array('type' => 'checkbox', 'name' => 'StatisticsIDs[]', 'value' => $StatisticID, 'id' => $StatisticID));
if (Is_Error($Input)) {
return ERROR | @Trigger_Error(500);
}
#---------------------------------------------------------------------------
$Table[] = array(new Tag('SPAN', array('style' => 'cursor:pointer;', 'onclick' => SPrintF('ChangeCheckBox(\'%s\'); return false;', $StatisticID)), $Comp['Title']), $Input);
}
}
#-------------------------------------------------------------------------------
$wa = '#WORK_AREA#';
for ($n = 0; $n < $l; $n++) {
$start = $arPHP[$n][0];
$s_cont = substr($old_content, $end, $start - $end);
$end = $arPHP[$n][1];
if ($n == 0) {
continue;
}
$src = $arPHP[$n][2];
if (strpos($s_cont, $wa) !== false) {
$s2 = substr($s_cont, strpos($s_cont, $wa) + strlen($wa)) . $src;
continue;
}
//Trim php tags
$src = SubStr($src, SubStr($src, 0, 5) == "<?" . "php" ? 5 : 2);
$src = SubStr($src, 0, -2);
$comp2_begin = '$APPLICATION->INCLUDECOMPONENT(';
$usrc = unifyPHPfragment($src);
if ($usrc == unifyPHPfragment('$APPLICATION->ShowPanel()') || strtoupper(substr($src, 0, strlen($comp2_begin))) == $comp2_begin) {
// component 2.0 or another predefined fragment
continue;
}
$arPHPscripts[] = $src;
}
$s1 = $arPHP[0][2];
}
// Ok, so we already have array of php scripts lets check our new content
// LPA-users CAN delete PHP fragments and swap them but CAN'T add new or modify existent:
while (preg_match('/#PHP\\d{4}#/i', $CONTENT, $res_php, PREG_OFFSET_CAPTURE)) {
$php_begin = $res_php[0][1];
$php_fr_num = intval(substr($CONTENT, $php_begin + 4, 4)) - 1;
