<?
use Bitrix\Main\Application;
use Bitrix\Main\Page\Asset;
use Bitrix\Sale\Order;
use Bitrix\Main\Localization\Loc;
use Bitrix\Sale\Delivery\Requests;
use \Bitrix\Sale\Exchange\Integration\Admin\Link,
	\Bitrix\Sale\Exchange\Integration\Admin\Registry,
	\Bitrix\Sale\Exchange\Integration\Admin\ModeType,
	\Bitrix\Sale\Helpers\Admin\Blocks\FactoryMode,
	\Bitrix\Sale\Helpers\Admin\Blocks\BlockType;

require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_before.php");
\Bitrix\Main\Loader::includeModule('sale');




require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/sale/prolog.php");

$moduleId = "sale";

global $USER, $APPLICATION;

Bitrix\Main\Loader::includeModule('sale');
$saleModulePermissions = $APPLICATION->GetGroupRight("sale");
if ($saleModulePermissions == "D")
	$APPLICATION->AuthForm(GetMessage("ACCESS_DENIED"));

IncludeModuleLangFile(__FILE__);
CUtil::InitJSCore();
require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/sale/lib/helpers/admin/orderedit.php");
Asset::getInstance()->addCss('/bitrix/themes/.default/sale.css');

/** @var null|\Bitrix\Sale\Order $saleOrder */
$saleOrder = null;
$shipment = null;
$dataArray = array();
$dataForRecovery = array();
$errors = array();
$request = Application::getInstance()->getContext()->getRequest();
$lang = Application::getInstance()->getContext()->getLanguage();
$orderId = intval($request->get('order_id'));
$shipmentId = intval($request->get('shipment_id'));
$siteId = Application::getInstance()->getContext()->getSite();
$link = Link::getInstance();
$factory = FactoryMode::create($link->getType());
$backUrl = $request->get('backurl');
$save = $_SERVER["REQUEST_METHOD"] == "POST" && (isset($_POST["apply"]) || isset($_POST["save"]));
$refresh = $_SERVER["REQUEST_METHOD"] == "POST" && !$save;

$registry = \Bitrix\Sale\Registry::getInstance(\Bitrix\Sale\Registry::REGISTRY_TYPE_ORDER);

/** @var Order $orderClass */
$orderClass = $registry->getOrderClassName();

if($orderId <= 0 || !($saleOrder = $orderClass::load($orderId)))
{
	$link
		->create()
		->fill()
		->setPageByType(Registry::SALE_ORDER)
		->redirect();
}

$allowedOrderStatusesView = \Bitrix\Sale\OrderStatus::getStatusesUserCanDoOperations($USER->GetID(), array('view'));
$allowedOrderStatusesUpdate = \Bitrix\Sale\OrderStatus::getStatusesUserCanDoOperations($USER->GetID(), array('update'));

$allowUpdate = in_array($saleOrder->getField("STATUS_ID"), $allowedOrderStatusesUpdate);
$allowView = in_array($saleOrder->getField("STATUS_ID"), $allowedOrderStatusesView);
$allowDelete = false;

$shipmentCollection = $saleOrder->getShipmentCollection();

if (intval($shipmentId) > 0)
{
	/** @var \Bitrix\Sale\Shipment $shipment */
	$shipment = $shipmentCollection->getItemById($shipmentId);

	if(!$shipment)
	{
		$link
			->create()
			->fill()
			->setPageByType(Registry::SALE_ORDER)
			->redirect();
	}

	$allowedDeliveryStatusesView = \Bitrix\Sale\DeliveryStatus::getStatusesUserCanDoOperations($USER->GetID(), array('view'));
	$allowedDeliveryStatusesUpdate = \Bitrix\Sale\DeliveryStatus::getStatusesUserCanDoOperations($USER->GetID(), array('update'));
	$allowedDeliveryStatusesDelete = \Bitrix\Sale\DeliveryStatus::getStatusesUserCanDoOperations($USER->GetID(), array('delete'));

	$allowUpdate = in_array($shipment->getField("STATUS_ID"), $allowedDeliveryStatusesUpdate);
	$allowView = in_array($shipment->getField("STATUS_ID"), $allowedDeliveryStatusesView);
	$allowDelete = in_array($shipment->getField("STATUS_ID"), $allowedDeliveryStatusesDelete);
}

$isUserResponsible = false;
$isAllowCompany = false;

if ($saleModulePermissions == 'P')
{
	$userCompanyList = \Bitrix\Sale\Services\Company\Manager::getUserCompanyList($USER->GetID());

	$isUserResponsible = ($saleOrder->getField('RESPONSIBLE_ID') == $USER->GetID() || $shipment->getField('RESPONSIBLE_ID') == $USER->GetID());

	$isAllowCompany = (in_array($saleOrder->getField('COMPANY_ID'), $userCompanyList) || in_array($shipment->getField('COMPANY_ID'), $userCompanyList));

	if (!$isUserResponsible && !$isAllowCompany)
	{
		$link
			->create()
			->fill()
			->setPageByType(Registry::SALE_ORDER)
			->redirect();
	}
}

if ($request->get('delete') == 'Y' && check_bitrix_sessid())
{
	if(!$allowDelete)
	{
		$link
			->create()
			->fill()
			->setPageByType(Registry::SALE_ORDER_SHIPMENT)
			->redirect();
	}

	$delResult = $shipment->delete();
	if (!$delResult->isSuccess())
	{
		$errors = $delResult->getErrorMessages();
	}
	else
	{
		$result = $saleOrder->save();
		if ($result->isSuccess())
		{
			if ($backUrl)
			{
				$link
					->create()
					->setRequestUri($backUrl)
					->redirect();
			}
			else
			{
				$link
					->create()
					->fill()
					->setPageByType(Registry::SALE_ORDER_SHIPMENT)
					->redirect();
			}
		}
		else
		{
			$errors = $result->getErrorMessages();
		}
	}
}

if ($request->isPost() && ($save || $refresh) && check_bitrix_sessid())
{
	if(!$allowUpdate)
	{
		if (isset($_POST["apply"]))
		{
			$link
				->create()
				->fill()
				->setPageByType(Registry::SALE_ORDER_SHIPMENT_EDIT)
				->setField('order_id', $orderId)
				->setField('shipment_id', $shipmentId)
				->setField('backurl', $backUrl)
				->redirect();
		}
		else
		{
			$link
				->create()
				->fill()
				->setPageByType(Registry::SALE_ORDER_SHIPMENT)
				->redirect();
		}


	}

	$result = $factory::create(BlockType::SHIPMENT)->updateData($saleOrder, $request->get('SHIPMENT'));

	$data = $result->getData();

	$shipment = null;
	if ($data['SHIPMENT'])
		$shipment = array_shift($data['SHIPMENT']);

	if ($result->isSuccess() && $save)
	{
		$saveResult = $saleOrder->save();
		if ($saveResult->isSuccess())
		{
			$shipmentId = $shipment->getId();

			if ($request->getPost("apply") == '')
			{
				if ($backUrl)
				{
					$link
						->create()
						->setRequestUri($backUrl)
						->redirect();
				}
				else
				{
					$link
						->create()
						->fill()
						->setPageByType(Registry::SALE_ORDER_SHIPMENT)
						->redirect();
				}
			}
			else
			{
				$link
					->create()
					->fill()
					->setPageByType(Registry::SALE_ORDER_SHIPMENT_EDIT)
					->setField('order_id', $orderId)
					->setField('shipment_id', $shipmentId)
					->setField('backurl', $backUrl)
					->redirect();
			}
		}
		else
		{
			$result->addErrors($saveResult->getErrors());
			$errors = $result->getErrorMessages();
			if (empty($errors))
				$errors[] = Loc::getMessage('SOPE_SHIPMENT_ERROR_MESSAGE');
			$dataForRecovery = $request->get('SHIPMENT');
		}
	}
	else
	{
		if (!$refresh)
		{
			/** @var \Bitrix\Main\Entity\EntityError $error */
			foreach ($result->getErrors() as $error)
				$errors[$error->getCode()] = $error->getMessage();

			if (empty($errors))
				$errors[] = Loc::getMessage('SOPE_SHIPMENT_ERROR_MESSAGE');
		}
		$dataForRecovery = $request->get('SHIPMENT');
	}
}
else
{
	$new = true;
	if ($shipmentId > 0 && $shipment)
	{
		$new = false;
	}

	if ($new)
	{
		$shipment = $saleOrder->getShipmentCollection()->createItem();
		$factory::create(BlockType::SHIPMENT)->setShipmentByDefaultValues($shipment);
	}
}

if (!$shipment || (!$allowView && !$allowUpdate) || Order::isLocked($orderId))
{
	$link
		->create()
		->fill()
		->setPageByType(Registry::SALE_ORDER_SHIPMENT)
		->redirect();
}

if ($shipmentId)
	$title = str_replace("#ID#", $shipmentId, GetMessage("EDIT_ORDER_SHIPMENT"));
else
	$title = GetMessage("NEW_ORDER_SHIPMENT");
$APPLICATION->SetTitle($title);


if ($shipmentId > 0)
{
	global $historyEntity;

	$historyEntity = array(
		'ENTITY' => 'SHIPMENT',
		'ENTITY_ID' => $shipmentId
	);
	$_GET['ID'] = $orderId;

	ob_start();
	require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/sale/admin/order_history.php");
	$historyContent = ob_get_contents();
	ob_end_clean();
}

require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_after.php");

$aMenu = array();

$aMenu[] = array(
	"ICON" => "btn_list",
	"TEXT" => Loc::getMessage("SOPE_SHIPMENT_TRANSITION"),
	"TITLE"=> Loc::getMessage("SOPE_SHIPMENT_TRANSITION_TITLE"),
	"LINK" => $link
		->create()
		->fill()
		->setField('ID', $orderId)
		->setPageByType(Registry::SALE_ORDER_VIEW)
		->build()
);

if (!$new)
{
	if($allowDelete)
	{
		$href = $link
			->create()
			->setField('order_id', $orderId)
			->setField('shipment_id', $shipmentId)
			->setField('delete', 'Y')
			->setQuery(bitrix_sessid_get())
			->setPageByType(Registry::SALE_ORDER_SHIPMENT_EDIT)
			->fill()
			->build();

		$aMenu[] = array(
			"TEXT" => Loc::getMessage("SOPE_SHIPMENT_DELETE"),
			"TITLE" => Loc::getMessage("SOPE_SHIPMENT_DELETE_TITLE"),
			"LINK" => 'javascript:void(0)',
			"ONCLICK" => "if(confirm('".Loc::getMessage('SOPE_SHIPMENT_DELETE_MESSAGE')."')) window.location.href='".$href."'"
		);
	}
}

if($link->getType() == ModeType::APP_LAYOUT_TYPE)
{
	//do nothing
}
else
{
	$aMenu[] = array(
		"TEXT" => Loc::getMessage("SOPE_SHIPMENT_LIST"),
		"TITLE"=> Loc::getMessage("SOPE_SHIPMENT_LIST_TITLE"),
		"LINK" => $link
			->create()
			->setPageByType(Registry::SALE_ORDER_SHIPMENT)
			->fill()
			->build()
	);


	if (!$new)
	{

		$arSysLangs = array();
		$db_lang = CLangAdmin::GetList("sort", "asc", array("ACTIVE" => "Y"));
		while ($arLang = $db_lang->Fetch())
			$arSysLangs[] = $arLang["LID"];

		$arReports = array();
		$dirs = array(
			$_SERVER["DOCUMENT_ROOT"]."/bitrix/admin/reports/",
			$_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/sale/reports/"

		);
		foreach ($dirs as $dir)




		{
			if (file_exists($dir))
			{
				if ($handle = opendir($dir))
				{
					while (($file = readdir($handle)) !== false)






					{
						$file_contents = '';
						if ($file == "." || $file == ".." || $file == ".access.php" || isset($arReports[$file]))
							continue;
						if (is_file($dir.$file) && ToUpper(mb_substr($file, -4)) == ".PHP")
						{
							$rep_title = $file;
							if ($dir == $_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/sale/reports/")
							{
								if (is_file($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/sale/ru/reports/".$file))
									$file_contents = file_get_contents($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/sale/ru/reports/".$file);
							}

							if (empty($file_contents))
								$file_contents = file_get_contents($dir.$file);

							$rep_langs = "";
							$arMatches = array();
							if (preg_match("#<title([\s]+langs[\s]*=[\s]*\"([^\"]*)\"|)[\s]*>([^<]*)</title[\s]*>#i", $file_contents, $arMatches))




















							{
								$arMatches[3] = Trim($arMatches[3]);
								if ($arMatches[3] <> '') $rep_title = $arMatches[3];
								$arMatches[2] = Trim($arMatches[2]);
								if ($arMatches[2] <> '') $rep_langs = $arMatches[2];
							}
							if ($rep_langs <> '')
							{
								$bContinue = true;
								foreach ($arSysLangs as $sysLang)
								{
									if (mb_strpos($rep_langs, $sysLang) !== false)
									{
										$bContinue = false;
										break;
									}
								}

								if ($bContinue)
									continue;
							}

							$defaultLink = new \Bitrix\Sale\Exchange\Integration\Admin\DefaultLink();
							$href = $defaultLink
								->setPageByType(Registry::SALE_ORDER_PRINT_NEW)
								->setField('ORDER_ID', $orderId)
								->setField('SHIPMENT_ID', $shipmentId)
								->setField('doc', mb_substr($file, 0, mb_strlen($file) - 4))
								->setQuery(bitrix_sessid_get())
								->build();

							$arReports[$file] = array(
								"TEXT" => $rep_title,
								"ONCLICK" => "window.open('".$href."', '_blank');"
							);
						}
					}
				}
				closedir($handle);
			}


		}



		$aMenu[] = array(
			"TEXT" => Loc::getMessage("SOPE_SHIPMENT_PRINT"),
			"TITLE" => Loc::getMessage("SOPE_SHIPMENT_PRINT_TITLE"),
			"LINK" => 'javascript:void(0)',
			"MENU" => $arReports
		);
	}











	if($shipmentId > 0)
	{
		$deliveryId = $shipment->getDeliveryId();
		$deliveryRequestHandler = Requests\Manager::getDeliveryRequestHandlerByDeliveryId($deliveryId);

		if($deliveryRequestHandler)
		{
			$rTypesMenu = array();
			$requestId = Requests\Manager::getRequestIdByShipmentId($shipmentId);

			if($requestId > 0)
			{
				foreach(Requests\Manager::getDeliveryRequestShipmentActions($shipment) as $action => $actionName)
				{
					$rTypesMenu[] = array(
						"TEXT" => $actionName,
						"LINK" =>"javascript:BX.Sale.Delivery.Request.processRequest({action: 'actionShipmentExecute', deliveryId: ".$deliveryId.", requestAction: '".CUtil::JSEscape($action)."', requestId: ".$requestId.", shipmentIds: [".$shipmentId."], lang: '".LANGUAGE_ID."'})"
					);
				}

				if(!empty($rTypesMenu))
					$rTypesMenu[] = array("SEPARATOR" => true);

				$rTypesMenu[] = array(
					"TEXT" => Loc::getMessage('SOPE_DELIVERY_REQUEST_SHIPMENT_UPDATE'),
					"LINK" => "javascript:BX.Sale.Delivery.Request.processRequest({action: 'updateShipmentsFromDeliveryRequest', shipmentIds: [".$shipmentId."]}, true)"
				);





				$rTypesMenu[] = array(




					"TEXT" => Loc::getMessage('SOPE_DELIVERY_REQUEST_SHIPMENT_DELETE'),
					"LINK" => "javascript:BX.Sale.Delivery.Request.processRequest({action: 'deleteShipmentsFromDeliveryRequest', shipmentIds: [".$shipmentId."]}, true)"
				);
			}
			else
			{
				$rTypesMenu[] = array(
					"TEXT" => Loc::getMessage('SOPE_DELIVERY_REQUEST_CREATE'),
					"LINK" => $link
						->create()
						->fill()
						->setPageByType(Registry::SALE_DELIVERY_REQUEST)
						->setField('ACTION', 'CREATE_DELIVERY_REQUEST')
						->setField('BACK_URL', $APPLICATION->GetCurPageParam())
						->setFieldsValues(['SHIPMENT_IDS'=>[$shipmentId]])
						->build()
				);

				$rTypesMenu[] = array(
					"TEXT" => Loc::getMessage('SOPE_DELIVERY_REQUEST_ADD'),
					"LINK" => $link
						->create()
						->fill()






						->setPageByType(Registry::SALE_DELIVERY_REQUEST)
						->setField('ACTION', 'ADD_SHIPMENTS_TO_REQUEST')
						->setField('BACK_URL', $APPLICATION->GetCurPageParam())
						->setFieldsValues(['SHIPMENT_IDS'=>[$shipmentId]])
						->build()
				);
			}

			$aMenu[] = array(
				"TEXT" => Loc::getMessage('SOPE_DELIVERY_REQUEST'),
				"TITLE" => Loc::getMessage('SOPE_DELIVERY_REQUEST_TITLE'),
				"LINK" => 'javascript:void(0)',
				"MENU" => $rTypesMenu
			);
		}














	}
}

$context = new CAdminContextMenu($aMenu);
$context->Show();

// Problem block
?><div id="sale-adm-order-problem-block"><?
if($shipmentId > 0 && $shipment->getField("MARKED") == "Y")
{
	/** @var \Bitrix\Sale\Helpers\Admin\Blocks\OrderMarker $marker */
	$marker = $factory::create(BlockType::MARKER);
	echo $marker->getViewForEntity($saleOrder->getId(), $shipmentId);
}
?></div><?

if(!empty($errors))
	CAdminMessage::ShowMessage(implode("<br>\n", $errors));

$aTabs = array(
	array("DIV" => "tab_order", "TAB" => GetMessage("SOP_TAB_SHIPMENT"), "SHOW_WRAP" => "N", "IS_DRAGGABLE" => "Y")
);

if ($shipmentId > 0)
{
	$aTabs[] = array("DIV" => "tab_history", "TAB" => GetMessage("SOP_TAB_HISTORY"), "TITLE" => GetMessage("SOP_TAB_HISTORY"));
	$aTabs[] = array("DIV" => "tab_analysis", "TAB" => GetMessage("SOP_TAB_ANALYSIS"), "TITLE" => GetMessage("SOP_TAB_ANALYSIS"));
}

$formId = "order_shipment_edit_info";

$action = $link
	->create()
	->setPage($APPLICATION->GetCurPage())
	->setLang($lang)
	->setField('order_id', $orderId)
	->setField('shipment_id', $shipmentId)
	->setField('backurl', $backUrl)
	->setQuery($urlForm ?? '')
	->fill()
	->build();

?><form method="POST" action="<?=$action?>" name="<?=$formId?>_form" id="<?=$formId?>_form"><?
$tabControl = new CAdminTabControlDrag($formId, $aTabs, $moduleId, false, true);
$tabControl->Begin();

//TAB order --
$tabControl->BeginNextTab();

//prepare blocks order
$defaultBlocksOrder = array(
	"goodsList",
	"shipmentStatus",
	"shipment",
	"buyer",
	"additional"
);
$blocksOrder = $tabControl->getCurrentTabBlocksOrder($defaultBlocksOrder);
$shipmentOrderBasket = $factory::create(BlockType::SHIPMENT_BASKET, [
	'shipment'=>$shipment,
	'jsObjName'=>'BX.Sale.Admin.ShipmentBasketObj',
	'idPrefix'=>'sale_shipment_basket']);
?>

	<input type="hidden" name="lang" id="lang" value="<?=$lang;?>">
	<input type="hidden" id="order_id" name="order_id" value="<?=$orderId?>">
	<input type="hidden" id="site_id" name="site_id" value="<?=$siteId;?>">
<?=bitrix_sessid_post();?>
<?
\Bitrix\Main\Page\Asset::getInstance()->addJs("/bitrix/js/sale/admin/order_ajaxer.js");
\Bitrix\Sale\Delivery\Requests\Manager::initJs();

echo $factory::create(BlockType::ADDITIONAL)->getScripts();
echo \Bitrix\Sale\Helpers\Admin\OrderEdit::getScripts($saleOrder, $formId);
echo $factory::create(BlockType::SHIPMENT)->getScripts();
echo $shipmentOrderBasket->getScripts($dataForRecovery);

require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/sale/general/admin_tool.php");
?>
	<tr>
		<td>
			<div style="position: relative; vertical-align: top">
				<?$tabControl->DraggableBlocksStart();?>
				<?
				foreach ($blocksOrder as $blockCode)
				{
					$tabControl->DraggableBlockBegin(GetMessage("SALE_BLOCK_TITLE_".toUpper($blockCode)), $blockCode);

					if(BlockType::isDefined(BlockType::resolveId($blockCode)))
					{
						$block = null;
						if(BlockType::resolveId($blockCode) && BlockType::resolveId($blockCode) !== BlockType::SHIPMENT_BASKET)
							$block = $factory::create(BlockType::resolveId($blockCode));

						switch (BlockType::resolveId($blockCode))
						{
							case BlockType::SHIPMENT_BASKET:
								echo $shipmentOrderBasket->getEdit();
								echo '<div style="display: none;">'.$shipmentOrderBasket->settingsDialog->getHtml().'</div>';
								break;
							case BlockType::SHIPMENT_STATUS:
								echo $block::getEdit($shipment);
								break;
							case BlockType::SHIPMENT:
								echo $block::getEdit($shipment, 0, 'edit', $dataForRecovery[1] ?? []);
								break;
							case BlockType::BUYER:
								echo $block::getView($saleOrder);
								break;
							case BlockType::ADDITIONAL:
								echo $block::getEdit($shipment, $formId.'_form', 'SHIPMENT[1]');
								break;
						}
					}
					$tabControl->DraggableBlockEnd();
				}
				?>
			</div>
		</td>
	</tr>

<?

//--TAB order
$tabControl->EndTab();
?>
	</form>
<?
if ($shipmentId > 0):
	//TAB history --
	$tabControl->BeginNextTab();
	?>
	<tr>
		<td id="order-history"><?= $historyContent; ?></td>
	</tr>
	<?
	//-- TAB history
	$tabControl->EndTab();

	$tabControl->BeginNextTab();

	?>
	<tr>
		<td>
			<div style="position:relative; vertical-align:top">
				<?
				$orderBasket = $factory::create(BlockType::BASKET, [
					'order'=> $saleOrder,
					'jsObjName' => "BX.Sale.Admin.OrderBasketObj",
					'idPrefix' => "sale_order_basket",
					'createProductBasement' => true,
					'mode' => \Bitrix\Sale\Helpers\Admin\Blocks\OrderBasket::VIEW_MODE
				]);

				echo $factory::create(BlockType::ANALYSIS)->getView($saleOrder, $orderBasket, false, $shipmentId);
				?>
			</div>
		</td>
	</tr>
	<?

	//-- TAB analysis
	$tabControl->EndTab();
endif;
$tabControl->Buttons(
	array(
		"disabled" => !$allowUpdate,
		"back_url" => $backUrl
	)
);

$tabControl->End();
?>
<div style="display: none;">
	<?=$shipmentOrderBasket->getSettingsDialogContent();?>
</div>
<?require($_SERVER['DOCUMENT_ROOT']."/bitrix/modules/main/include/epilog_admin.php");?>