Your IP : 18.220.167.202
<?
if(!check_bitrix_sessid()) return;
global $obModule;
if(!is_object($obModule)) return;
IncludeModuleLangFile(__FILE__);
include_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/iblock/include.php");
global $MESS;
$bReWriteAdditionalFiles_n = (($public_rewrite_n == "Y") ? True : False);
$bReWriteAdditionalFiles_c = (($public_rewrite_c == "Y") ? True : False);
function CheckIBlockType($ID, $SECTIONS = "Y")
{
$obType = new CIBlockType;
$rsType = $obType->GetByID($ID);
if($arType = $rsType->Fetch())
{
return $arType["ID"];
}
else
{
$arFields = array(
"ID" => $ID,
"SECTIONS" => $SECTIONS,
"LANG" => array(),
);
$rsLanguages = CLanguage::GetList(($by="sort"), ($order="asc"));
while($arLanguage = $rsLanguages->Fetch())
{
$MY_MESS = IncludeModuleLangFile(__FILE__, $arLanguage["LID"], true);
$arFields["LANG"][$arLanguage["LID"]] = array(
"NAME" => $MY_MESS["IBLOCK_INSTALL_".strtoupper($ID)."_NAME"],
"SECTION_NAME" => $MY_MESS["IBLOCK_INSTALL_".strtoupper($ID)."_SECTIONS_NAME"],
"ELEMENT_NAME" => $MY_MESS["IBLOCK_INSTALL_".strtoupper($ID)."_ELEMENTS_NAME"],
);
}
$result = $obType->Add($arFields);
if($result)
return $result;
else
return false;
}
}
if($obModule->errors===false)
{
if(($news == "Y") && CheckIBlockType("news", "N"))
{
//This makes translation checker happy
//$MY_MESS['IBLOCK_INSTALL_NEWS_NAME']
//$MY_MESS['IBLOCK_INSTALL_NEWS_SECTIONS_NAME']
//$MY_MESS['IBLOCK_INSTALL_NEWS_ELEMENTS_NAME']
//$MY_MESS['IBLOCK_INSTALL_NEWS_SECTION_NAME']
//$MY_MESS['IBLOCK_INSTALL_NEWS_ELEMENT_NAME']
$sites = CSite::GetList($by, $order, Array("ACTIVE"=>"Y"));
while($site = $sites->Fetch())
{
$MY_MESS = IncludeModuleLangFile(__FILE__, $site["LANGUAGE_ID"], true);
$obBlock = new CIBlock;
$arFields = array(
"LID" => $site["LID"],
"NAME" => GetMessage("IBLOCK_INSTALL_COMPANY_NEWS"),
"IBLOCK_TYPE_ID" => "news",
"CODE" => "comp_news",
"LIST_PAGE_URL" => "#SITE_DIR#/".$news_dir."/index.php",
"DETAIL_PAGE_URL" => "#SITE_DIR#/".$news_dir."/index.php?news=#ID#",
"ELEMENTS_NAME" => $MY_MESS["IBLOCK_INSTALL_NEWS_ELEMENTS_NAME"],
"ELEMENT_NAME" => $MY_MESS["IBLOCK_INSTALL_NEWS_ELEMENT_NAME"],
"GROUP_ID" => array("2"=>"R"),
);
if($id = $obBlock->Add($arFields))
{
$obBlockProperty = new CIBlockProperty;
$arFields = array(
"IBLOCK_ID" => $id,
"NAME" => GetMessage("IBLOCK_INSTALL_SOURCE"),
"CODE" => "SOURCE",
"COL_COUNT" => "30",
);
$obBlockProperty->Add($arFields);
}
if(strlen($news_dir)>0)
{
$source = $_SERVER['DOCUMENT_ROOT']."/bitrix/modules/iblock/install/public/news/";
$target = $site['ABS_DOC_ROOT'].$site["DIR"].$news_dir."/";
if(file_exists($source))
{
CheckDirPath($target);
$dh = opendir($source);
while($file = readdir($dh))
{
if($file == "." || $file == "..")
continue;
if($bReWriteAdditionalFiles_n || !file_exists($target.$file))
{
$fh = fopen($source.$file, "rb");
$php_source = fread($fh, filesize($source.$file));
fclose($fh);
if(preg_match_all('/GetMessage\("(.*?)"\)/', $php_source, $matches))
{
IncludeModuleLangFile($source.$file, $site["LANGUAGE_ID"]);
$MESS["IBLOCK_INSTALL_PUBLIC_IBLOCK_ID"] = $id;
foreach($matches[0] as $i => $text)
{
$php_source = str_replace(
$text,
'"'.GetMessage($matches[1][$i]).'"',
$php_source
);
}
}
$fh = fopen($target.$file, "wb");
fwrite($fh, $php_source);
fclose($fh);
@chmod($target.$file, BX_FILE_PERMISSIONS);
}
}
}
}
}
}
if(($catalog == "Y") && CheckIBlockType("catalog", "Y"))
{
//This makes translation checker happy
//$MY_MESS['IBLOCK_INSTALL_CATALOG_NAME']
//$MY_MESS['IBLOCK_INSTALL_CATALOG_SECTIONS_NAME']
//$MY_MESS['IBLOCK_INSTALL_CATALOG_ELEMENTS_NAME']
//$MY_MESS['IBLOCK_INSTALL_CATALOG_SECTION_NAME']
//$MY_MESS['IBLOCK_INSTALL_CATALOG_ELEMENT_NAME']
$sites = CSite::GetList($by, $order, Array("ACTIVE"=>"Y"));
while($site = $sites->Fetch())
{
$MY_MESS = IncludeModuleLangFile(__FILE__, $site["LANGUAGE_ID"], true);
$obBlock = new CIBlock;
$arFields = array(
"LID" => $site["LID"],
"NAME" => GetMessage("IBLOCK_INSTALL_PRODUCTS"),
"IBLOCK_TYPE_ID" => "catalog",
"CODE" => "comp_catalog",
"LIST_PAGE_URL" => "#SITE_DIR#/".$catalog_dir."/index.php",
"DETAIL_PAGE_URL" => "#SITE_DIR#/".$catalog_dir."/index.php?ID=#ID#",
"ELEMENTS_NAME" => $MY_MESS["IBLOCK_INSTALL_CATALOG_ELEMENTS_NAME"],
"ELEMENT_NAME" => $MY_MESS["IBLOCK_INSTALL_CATALOG_ELEMENT_NAME"],
"SECTIONS_NAME" => $MY_MESS["IBLOCK_INSTALL_CATALOG_SECTIONS_NAME"],
"SECTION_NAME" => $MY_MESS["IBLOCK_INSTALL_CATALOG_SECTION_NAME"],
"GROUP_ID" => array("2"=>"R"),
);
if($id = $obBlock->Add($arFields))
{
$obBlockProperty = new CIBlockProperty;
$arFields = array(
"IBLOCK_ID" => $id,
"NAME" => GetMessage("IBLOCK_INSTALL_SIMILAR_PRODUCTS"),
"CODE" => "ANALOG",
"PROPERTY_TYPE" => "E",
"MULTIPLE" => "Y",
"LINK_IBLOCK_ID" => $id,
);
$obBlockProperty->Add($arFields);
}
if(strlen($catalog_dir)>0)
{
$source = $_SERVER['DOCUMENT_ROOT']."/bitrix/modules/iblock/install/public/catalog/";
$target = $site['ABS_DOC_ROOT'].$site["DIR"].$catalog_dir."/";
if(file_exists($source))
{
CheckDirPath($target);
$dh = opendir($source);
while($file = readdir($dh))
{
if($file == "." || $file == "..")
continue;
if($bReWriteAdditionalFiles_c || !file_exists($target.$file))
{
$fh = fopen($source.$file, "rb");
$php_source = fread($fh, filesize($source.$file));
fclose($fh);
if(preg_match_all('/GetMessage\("(.*?)"\)/', $php_source, $matches))
{
IncludeModuleLangFile($source.$file, $site["LANGUAGE_ID"]);
$MESS["IBLOCK_INSTALL_PUBLIC_IBLOCK_ID"] = $id;
foreach($matches[0] as $i => $text)
{
$php_source = str_replace(
$text,
'"'.GetMessage($matches[1][$i]).'"',
$php_source
);
}
}
$fh = fopen($target.$file, "wb");
fwrite($fh, $php_source);
fclose($fh);
@chmod($target.$file, BX_FILE_PERMISSIONS);
}
}
}
}
}
}
}
if(is_array($obModule->errors) && count($obModule->errors)):
CAdminMessage::ShowMessage(array(
"TYPE"=>"ERROR",
"MESSAGE" =>GetMessage("MOD_INST_ERR"),
"DETAILS"=>implode("<br>", $obModule->errors),
"HTML"=>true
));
else:
CAdminMessage::ShowNote(GetMessage("MOD_INST_OK"));
endif;
if($obModule->errors===false && $news == "Y" && strlen($news_dir) > 0):
?>
<p><?=GetMessage("IBLOCK_DEMO_DIR")?></p>
<table border="0" cellspacing="0" cellpadding="3">
<tr>
<td align="center"><p><b><?=GetMessage("IBLOCK_SITE")?></b></p></td>
<td align="center"><p><b><?=GetMessage("IBLOCK_LINK")?></b></p></td>
</tr>
<?
$sites = CSite::GetList($by, $order, Array("ACTIVE"=>"Y"));
while($site = $sites->Fetch())
{
$server = '';
if (strlen($site["SERVER_NAME"]) > 0)
$server .= "http://".$site["SERVER_NAME"];
$url = $site["DIR"].$news_dir.'/';
?>
<tr>
<td width="0%"><p>[<?=$site["ID"]?>] <?echo htmlspecialcharsbx($site["NAME"]);?></p></td>
<td width="0%"><p><a href="<?echo htmlspecialcharsbx($server.$url);?>"><?echo htmlspecialcharsEx($url);?></a></p></td>
</tr>
<?
}
?>
</table>
<?
endif;
if($obModule->errors===false && $catalog == "Y" && strlen($catalog_dir) > 0):
?>
<p><?=GetMessage("IBLOCK_DEMO_DIR")?></p>
<table border="0" cellspacing="0" cellpadding="3">
<tr>
<td align="center"><p><b><?=GetMessage("IBLOCK_SITE")?></b></p></td>
<td align="center"><p><b><?=GetMessage("IBLOCK_LINK")?></b></p></td>
</tr>
<?
$sites = CSite::GetList($by, $order, Array("ACTIVE"=>"Y"));
while($site = $sites->Fetch())
{
?>
<tr>
<td width="0%"><p>[<?=$site["ID"]?>] <?=htmlspecialcharsbx($site["NAME"])?></p></td>
<td width="0%"><p><a href="<?if(strlen($site["SERVER_NAME"])>0) echo "http://".$site["SERVER_NAME"];?><?=$site["DIR"].$catalog_dir?>/"><?=$site["DIR"].$catalog_dir?>/</a></p></td>
</tr>
<?
}
?>
</table>
<?
endif;
?>
<form action="<?echo $APPLICATION->GetCurPage()?>">
<p>
<input type="hidden" name="lang" value="<?echo LANG?>">
<input type="submit" name="" value="<?echo GetMessage("MOD_BACK")?>">
</p>
<form>