function LoadLangsUpdates($arLangs, &$strError, $lang = false, $stableVersionsOnly = "Y")
{
$strError_tmp = "";
CUpdateSystem::AddMessage2Log("exec CUpdateSystem::LoadLangsUpdates");
$stableVersionsOnly = (($stableVersionsOnly == "N") ? "N" : "Y");
if ($lang===false)
$lang = LANGUAGE_ID;
if (!is_array($arLangs) || count($arLangs)<=0)
{
$strError_tmp .= "[ULLU01] ".GetMessage("SUPP_LLU_NO_LANGS").".<br>";
}
if (strlen($strError_tmp)<=0)
{
$arClientLangs = CUpdateSystem::GetLanguages($strError_tmp, $arLangs);
for ($i = 0; $i < count($arLangs); $i++)
{
if (!array_key_exists($arLangs[$i], $arClientLangs))
$arClientLangs[$arLangs[$i]] = "";
}
if (!is_array($arClientLangs) || count($arClientLangs)<=0)
{
$strError_tmp .= "[ULLU02] ".GetMessage("SUPP_LLU_NO_LANGS").".<br>";
}
}
if (strlen($strError_tmp)<=0)
{
$GLOBALS["DB"]->GetVersion();
$strVars = "LICENSE_KEY=".urlencode(md5(CUpdateSystem::GetLicenseKey())).
"&lang=".urlencode($lang).
"&UTYPES=".urlencode("L").
"&ALL_MODULES=".urlencode("N").
"&SUPD_VER=".urlencode(UPDATE_SYSTEM_VERSION).
"&SUPD_STS=".urlencode(CUpdateSystem::GetFooPath("GetList")).
"&COUNT_ONLY=".urlencode("F").
"&CLIENT_SITE=".urlencode($_SERVER["SERVER_NAME"]).
"&CANGZIP=".urlencode((CUpdateSystem::IsGzipInstalled()) ? "Y" : "N").
"&CLIENT_PHPVER=".urlencode(phpversion()).
"&SUPD_DBS=".urlencode($GLOBALS["DB"]->type).
"&XE=".urlencode(($GLOBALS["DB"]->XE) ? "Y" : "N").
"&stable=".urlencode($stableVersionsOnly).
"&".CUpdateSystem::ModulesArray2Query($arClientLangs, "bitl_");
CUpdateSystem::AddMessage2Log(preg_replace("/LICENSE_KEY=[^&]*/i", "LICENSE_KEY=X", $strVars));
$stime = CUpdateSystem::getmicrotime();
$content = CUpdateSystem::getHTTPPage("bit_sysserver.php", $strVars, $strError_tmp);
CUpdateSystem::AddMessage2Log("TIME LoadLangsUpdates.getHTTPPage ".Round(CUpdateSystem::getmicrotime()-$stime, 3)." sec");
if (strlen($content)<=0)
$strError_tmp .= "[ULLU03] ".GetMessage("SUPP_AS_EMPTY_RESP").".<br>";
}
if (strlen($strError_tmp)<=0)
{
if (!($fp1 = fopen($_SERVER["DOCUMENT_ROOT"]."/bitrix/updates/update_archive.gz", "wb")))
{
$strError_tmp .= "[ULLU04] ".str_replace("#FILE#", $_SERVER["DOCUMENT_ROOT"]."/bitrix/updates", GetMessage("SUPP_RV_ER_TEMP_FILE")).".<br>";
}
}
if (strlen($strError_tmp)<=0)
{
fwrite($fp1, $content);
fclose($fp1);
if (!file_exists($_SERVER["DOCUMENT_ROOT"]."/bitrix/updates/update_archive.gz")
|| !is_file($_SERVER["DOCUMENT_ROOT"]."/bitrix/updates/update_archive.gz"))
{
$strError_tmp .= "[ULLU05] ".str_replace("#FILE#", $_SERVER["DOCUMENT_ROOT"]."/bitrix/updates/update_archive.gz", GetMessage("SUPP_LMU_NO_TMP_FILE")).".<br>";
}
}
if (strlen($strError_tmp)>0)
{
CUpdateSystem::AddMessage2Log($strError_tmp, "CULLU");
$strError .= $strError_tmp;
return False;
}
else
return True;
}
