GetID());
$LEARNING_RIGHT = false;
if ($oAccess->IsBaseAccess(
CLearnAccess::OP_LESSON_CREATE
| CLearnAccess::OP_LESSON_LINK_TO_PARENTS
| CLearnAccess::OP_LESSON_LINK_DESCENDANTS
)
||
(
$oAccess->IsBaseAccess (CLearnAccess::OP_LESSON_CREATE )
&& $oAccess->IsBaseAccessForCR (CLearnAccess::OP_LESSON_LINK_TO_PARENTS | CLearnAccess::OP_LESSON_LINK_DESCENDANTS)
)
)
{
$LEARNING_RIGHT = true;
}
if ( ! $LEARNING_RIGHT )
{
$APPLICATION->SetTitle(GetMessage('LEARNING_PAGE_TITLE'));
require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_after.php");
$aContext = array(
array(
"ICON" => "btn_list",
"TEXT"=>GetMessage("LEARNING_BACK_TO_ADMIN"),
"LINK"=>"learn_unilesson_admin.php?lang=" . LANG . '&PARENT_LESSON_ID=-1' . GetFilterParams("filter_"),
"TITLE"=>GetMessage("LEARNING_BACK_TO_ADMIN")
),
);
$context = new CAdminContextMenu($aContext);
$context->Show();
CAdminMessage::ShowMessage(GetMessage("LEARNING_BAD_COURSE"));
require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/epilog_admin.php");
die();
}
set_time_limit(0);
$STEP = intval($STEP);
$strError = "";
if ($STEP <= 0)
$STEP = 1;
if ($_SERVER["REQUEST_METHOD"] == "POST" && $backButton <> '')
$STEP = 1;
if ($_SERVER["REQUEST_METHOD"] == "POST" && $STEP == 2 && check_bitrix_sessid())
{
if (!is_array($SITE_ID) || empty($SITE_ID))
$strError .= GetMessage("LEARNING_BAD_SITE_ID")."
";
if ($URL_DATA_FILE <> '' )
{
if ( ! CBXArchive::IsArchive($_SERVER["DOCUMENT_ROOT"] . $URL_DATA_FILE) )
$strError .= GetMessage("LEARNING_NOT_TAR_GZ")."
";
}
else
$strError .= GetMessage("LEARNING_DATA_FILE_NOT_FOUND");
if ($strError == '')
{
$oArchiver = CBXArchive::GetArchive($_SERVER["DOCUMENT_ROOT"] . $URL_DATA_FILE);
if ($oArchiver === false)
$strError .= GetMessage("LEARNING_NOT_TAR_GZ") . "
";
}
if (($strError == '') && ($oArchiver !== false))
{
$tmp_dir = BX_PERSONAL_ROOT."/tmp/learning/".uniqid(rand());
CheckDirPath($_SERVER["DOCUMENT_ROOT"].$tmp_dir);
if ($oArchiver->Unpack($_SERVER["DOCUMENT_ROOT"].$tmp_dir))
{
if (!isset($SCORM))
{
$package = new CCourseImport($tmp_dir, $SITE_ID);
if ($package->LAST_ERROR == '')
{
if (!$package->ImportPackage())
$strError .= $package->LAST_ERROR;
}
else
{
$strError .= $package->LAST_ERROR;
}
}
else
{
$package = new CCourseSCORM($tmp_dir, $SITE_ID);
if ($package->LAST_ERROR == '')
{
if (!$package->ImportPackage())
$strError .= $package->LAST_ERROR;
}
else
{
$strError .= $package->LAST_ERROR;
}
}
}
else
{
$strError .= GetMessage("MAIN_T_EDIT_IMP_ERR");
$arErrors = &$oArchiver->GetErrors();
if (count($arErrors)>0)
{
$strError .= ":
";
foreach ($arErrors as $value)
$strError .= "[".$value[0]."] ".$value[1]."
";
}
else
$strError .= ".
";
}
DeleteDirFilesEx($tmp_dir);
}
if ($strError <> '')
$STEP = 1;
}
$APPLICATION->SetTitle(GetMessage('LEARNING_PAGE_TITLE'));
require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_after.php");
if (defined("LEARNING_ADMIN_ACCESS_DENIED"))
$APPLICATION->AuthForm(GetMessage("ACCESS_DENIED"), false);
CAdminMessage::ShowMessage($strError);
$aTabs = array(
array("DIV" => "edit1", "TAB" => GetMessage("LEARNING_ADMIN_TAB1"), "TITLE"=>GetMessage("LEARNING_ADMIN_TAB1_EX")),
array("DIV" => "edit2", "TAB" => GetMessage("LEARNING_ADMIN_TAB2"), "TITLE"=>GetMessage("LEARNING_ADMIN_TAB2_EX")),
);
$tabControl = new CAdminTabControl("tabControl", $aTabs, false, true);
?>