Froogle
IncludeModuleLangFile($_SERVER['DOCUMENT_ROOT'].'/bitrix/modules/catalog/data_export.php');
global $USER;
$bTmpUserCreated = false;
if (!CCatalog::IsUserExists())
{
$bTmpUserCreated = true;
if (isset($USER))
$USER_TMP = $USER;
$USER = new CUser();
}
CCatalogDiscountSave::Disable();
function PrepareString($str, $KillTags = False)
{
if ($KillTags)
{
$str = strip_tags($str);
}
$str = str_replace("\r", "", str_replace("\n", "", str_replace("\t", " ", $str)));
return $str;
}
$strExportErrorMessage = "";
if (CModule::IncludeModule("iblock") && CModule::IncludeModule("catalog"))
{
$IBLOCK_ID = intval($IBLOCK_ID);
$db_iblock = CIBlock::GetByID($IBLOCK_ID);
if ($IBLOCK_ID <= 0 || (!($ar_iblock = $db_iblock->Fetch())))
{
$strExportErrorMessage .= "Information block #".$IBLOCK_ID." does not exist.\n";
}
/* elseif (!CIBlockRights::UserHasRightTo($IBLOCK_ID, $IBLOCK_ID, 'iblock_admin_display'))
{
$strCSVError .= str_replace('#IBLOCK_ID#',$IBLOCK_ID,GetMessage('CET_ERROR_IBLOCK_PERM')).'
';
} */
if ($strExportErrorMessage == '')
{
$bAllSections = False;
$arSections = array();
if (!empty($V) && is_array($V))
{
foreach ($V as $key => $value)
{
if (trim($value)=="0")
{
$bAllSections = True;
break;
}
if (intval($value)>0)
{
$arSections[] = intval($value);
}
}
}
if (!$bAllSections && empty($arSections))
$strExportErrorMessage .= "Section list is not set.\n";
}
if ($strExportErrorMessage == '')
{
$arFilter = array("IBLOCK_ID" => $IBLOCK_ID, "ACTIVE_DATE" => "Y", "ACTIVE" => "Y", 'CHECK_PERMISSIONS' => 'N');
if (!$bAllSections)
{
$arFilter["INCLUDE_SUBSECTIONS"] = "Y";
$arFilter["SECTION_ID"] = $arSections;
}
$arSelect = array("ID", "IBLOCK_ID", "IBLOCK_SECTION_ID", "NAME", "PREVIEW_PICTURE", "PREVIEW_TEXT", "PREVIEW_TEXT_TYPE", "DETAIL_PICTURE", "LANG_DIR", "DETAIL_PAGE_URL", "EXTERNAL_ID");
$db_res = CCatalogGroup::GetGroupsList(array("GROUP_ID"=>2));
$arPTypes = array();
while ($ar_res = $db_res->Fetch())
{
if (!in_array($ar_res["CATALOG_GROUP_ID"], $arPTypes))
{
$arPTypes[] = $ar_res["CATALOG_GROUP_ID"];
$arSelect[] = "CATALOG_GROUP_".$ar_res["CATALOG_GROUP_ID"];
}
}
$arSectionPaths = array();
}
if ($SETUP_FILE_NAME == '')
{
$strExportErrorMessage .= GetMessage("CATI_NO_SAVE_FILE")."
";
}
elseif (preg_match(BX_CATALOG_FILENAME_REG,$SETUP_FILE_NAME))
{
$strExportErrorMessage .= GetMessage("CES_ERROR_BAD_EXPORT_FILENAME")."
";
}
if ($strExportErrorMessage == '')
{
$SETUP_FILE_NAME = Rel2Abs("/", $SETUP_FILE_NAME);
if (mb_strtolower(mb_substr($SETUP_FILE_NAME, mb_strlen($SETUP_FILE_NAME) - 4)) != ".txt")
$SETUP_FILE_NAME .= ".txt";
/* if ($GLOBALS["APPLICATION"]->GetFileAccessPermission($SETUP_FILE_NAME) < "W")
$strExportErrorMessage .= str_replace("#FILE#", $SETUP_FILE_NAME, "You do not have access rights to add or modify #FILE#")."
"; */
}
if ($strExportErrorMessage == '')
{
if (!$fp = @fopen($_SERVER["DOCUMENT_ROOT"].$SETUP_FILE_NAME, "wb"))
{
$strExportErrorMessage .= "Can not open \"".$_SERVER["DOCUMENT_ROOT"].$SETUP_FILE_NAME."\" file for writing.\n";
}
else
{
if (!@fwrite($fp, "product_url name description image_url category price\n"))
{
$strExportErrorMessage .= "Can not write in \"".$_SERVER["DOCUMENT_ROOT"].$SETUP_FILE_NAME."\" file.\n";
@fclose($fp);
}
}
}
if ($strExportErrorMessage == '')
{
if (!($ar_usd_cur = CCurrency::GetByID("USD")))
{
$strExportErrorMessage .= "USD currency is not found.\n";
}
}
if ($strExportErrorMessage == '')
{
$db_elems = CIBlockElement::GetList(array(), $arFilter, false, false, $arSelect);
while ($ar_elems = $db_elems->GetNext())
{
$ar_file = CFile::GetFileArray($ar_elems["DETAIL_PICTURE"]);
if (!$ar_file)
$ar_file = CFile::GetFileArray($ar_elems["PREVIEW_PICTURE"]);
if ($ar_file)
{
if(mb_substr($ar_file["SRC"], 0, 1) == "/")
$strImage = "http://".COption::GetOptionString("main", "server_name", $SERVER_NAME).$ar_file["SRC"];
else
$strImage = $ar_file["SRC"];
}
else
{
$strImage = "";
}
if (!is_set($arSectionPaths, intval($ar_elems["IBLOCK_SECTION_ID"])))
{
$strCategory = $ar_iblock["NAME"];
$sections_path = GetIBlockSectionPath($IBLOCK_ID, $ar_elems["IBLOCK_SECTION_ID"]);
while ($arSection = $sections_path->GetNext())
{
if ($strCategory <> '') $strCategory .= ">";
$strCategory .= $arSection["NAME"];
}
$arSectionPaths[intval($ar_elems["IBLOCK_SECTION_ID"])] = PrepareString($strCategory);
}
$minPrice = 0;
for ($i = 0, $intPCount = count($arPTypes); $i < $intPCount; $i++)
{
if ($ar_elems["CATALOG_CURRENCY_".$arPTypes[$i]] == '') continue;
$tmpPrice = Round(CCurrencyRates::ConvertCurrency($ar_elems["CATALOG_PRICE_".$arPTypes[$i]], $ar_elems["CATALOG_CURRENCY_".$arPTypes[$i]], "USD"), 2);
if ($minPrice<=0 || $minPrice>$tmpPrice)
{
$minPrice = $tmpPrice;
}
}
if ($minPrice <= 0) continue;
@fwrite($fp, "http://".
COption::GetOptionString("main", "server_name", $SERVER_NAME).
str_replace("//", "/", $ar_elems["DETAIL_PAGE_URL"]).
" ".
$ar_elems["~NAME"].
" ".
PrepareString($ar_elems["~PREVIEW_TEXT"], true).
" ".
$strImage.
" ".
$arSectionPaths[intval($ar_elems["IBLOCK_SECTION_ID"])].
" ".
$minPrice."\n");
}
@fclose($fp);
}
}
CCatalogDiscountSave::Enable();
if ($bTmpUserCreated)
{
if (isset($USER_TMP))
{
$USER = $USER_TMP;
unset($USER_TMP);
}
}