/**
 * @file XTPShortcutBarPopup.cpp
 *
 * @copyright
 * (c) 1998-2025 Codejock Software, All Rights Reserved.
 *
 * This source file is the property of Codejock Software and must not be
 * redistributed by any means without the explicit written permission of
 * Codejock Software.
 *
 * The use of this source code is governed by the terms and conditions specified
 * in the Toolkit Pro license agreement. Codejock Software grants you, as a
 * single software developer, the limited right to use this software on one
 * computer only.
 *
 * Contact Information:
 * support@codejock.com
 * http://www.codejock.com
 *
 */

#include "stdafx.h"

#include "Common/XTPTypeId.h"
#include "Common/XTPCasting.h"
#include "Common/XTPFramework.h"
#include "Common/XTPSystemHelpers.h"
#include "Common/XTPSynchro.h"
#include "Common/XTPApplication.h"
#include "Common/XTPSingleton.h"
#include "Common/XTPGdiObjects.h"
#include "Common/XTPDrawHelpers.h"
#include "Common/XTPColorManager.h"
#include "Common/XTPImageManager.h"

#include "ShortcutBar/XTPShortcutBarPaintManager.h"
#include "ShortcutBar/XTPShortcutBarPopup.h"
#include "ShortcutBar/XTPShortcutBar.h"

#include "Common/Base/Diagnostic/XTPDisableNoisyWarnings.h"

#ifdef _DEBUG
#	define new DEBUG_NEW
#	undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

int CXTPShortcutBarPopup::m_nPopupWidth = 250;

CXTPShortcutBarPopup::CXTPShortcutBarPopup(CXTPShortcutBar* pShortcutBar, HWND hWndChild)
{
	m_pShortcutBar = pShortcutBar;
	m_hWndChild	= hWndChild;
	m_szGap.cx	 = XTP_DPI_X(5);
	m_szGap.cy	 = XTP_DPI_Y(5);

	m_nPopupWidth = XTP_DPI_X(250);
};

CXTPShortcutBarPopup::~CXTPShortcutBarPopup()
{
}

#include "Common/Base/Diagnostic/XTPBeginAfxMap.h"
BEGIN_MESSAGE_MAP(CXTPShortcutBarPopup, CWnd)
	ON_WM_PAINT()

	ON_WM_MOUSEACTIVATE()
	ON_WM_NCACTIVATE()
	ON_WM_NCCREATE()
	ON_MESSAGE(WM_FLOATSTATUS, OnFloatStatus)
	ON_WM_NCHITTEST_EX()
	ON_WM_SIZE()
END_MESSAGE_MAP()
#include "Common/Base/Diagnostic/XTPEndAfxMap.h"

void CXTPShortcutBarPopup::Close()
{
	if (m_hWnd)
	{
		ShowWindow(SW_HIDE);
	}

	if (m_hWndChild)
	{
		::SetParent(m_hWndChild, m_pShortcutBar->GetSafeHwnd());
		::ShowWindow(m_hWndChild, SW_HIDE);
		m_hWndChild = NULL;
	}
}

void CXTPShortcutBarPopup::DoModal()
{
	int nClassStyle = 0;
	if (XTPSystemVersion()->IsWinXPOrGreater())
		nClassStyle |= 0x00020000;

	CreateEx(WS_EX_TOOLWINDOW,
			 AfxRegisterWndClass(XTPToUInt(nClassStyle),
								 AfxGetApp()->LoadStandardCursor(IDC_ARROW)),
			 0, MFS_SYNCACTIVE | WS_POPUP | WS_CLIPCHILDREN | WS_CLIPSIBLINGS, CRect(0, 0, 0, 0),
			 m_pShortcutBar, 0);

	CXTPWindowRect rcShortcutBar(m_pShortcutBar);

	CRect rc(rcShortcutBar.right, rcShortcutBar.top,
			 rcShortcutBar.right + m_nPopupWidth + m_szGap.cx * 2, rcShortcutBar.bottom);

	SetWindowPos(0, rc.left, rc.top, rc.Width(), rc.Height(), SWP_NOZORDER | SWP_SHOWWINDOW);

	::SetParent(m_hWndChild, m_hWnd);
	::SetWindowPos(m_hWndChild, 0, m_szGap.cx, m_szGap.cy, rc.Width() - m_szGap.cx * 2,
				   rc.Height() - m_szGap.cy * 2, SWP_NOZORDER | SWP_SHOWWINDOW);

	::SetFocus(m_hWndChild);

	PumpMessage();

	if (m_hWndChild)
	{
		::SetParent(m_hWndChild, m_pShortcutBar->GetSafeHwnd());
		::ShowWindow(m_hWndChild, SW_HIDE);
		m_hWndChild = NULL;
	}

	m_nPopupWidth = CXTPWindowRect(this).Width() - m_szGap.cx * 2;

	DestroyWindow();
}

void CXTPShortcutBarPopup::PumpMessage()
{
	CWinThread* pThread = XTPGetThread();

	while (IsTrackingMode())
	{
		MSG msg;
		if (::PeekMessage(&msg, NULL, 0, 0, PM_NOREMOVE))
		{
			if (!::GetMessage(&msg, NULL, 0, 0))
				break;

			if (msg.message != WM_KICKIDLE && !pThread->PreTranslateMessage(&msg))
			{
				// process this message
				::TranslateMessage(&msg);
				::DispatchMessage(&msg);
			}
		}
		else
		{
			WaitMessage();
		}
	}
}

BOOL CXTPShortcutBarPopup::IsTrackingMode() const
{
	if (!m_hWndChild)
		return FALSE;

	HWND hWnd = ::GetFocus();

	while (hWnd)
	{
		if (hWnd == m_hWndChild)
			return TRUE;

		if (::GetWindowLong(hWnd, GWL_STYLE) & WS_POPUP)
			hWnd = ::GetWindow(hWnd, GW_OWNER);
		else
			hWnd = ::GetParent(hWnd);
	}

	return FALSE;
}

void CXTPShortcutBarPopup::OnPaint()
{
	CPaintDC dc(this);
	CXTPClientRect rc(this);

	CXTPShortcutBarPaintManager* pPaintManager = m_pShortcutBar->GetPaintManager();
	if (pPaintManager)
	{
		pPaintManager->FillPopupBack(&dc, rc, m_szGap);
	}
}

int CXTPShortcutBarPopup::OnMouseActivate(CWnd* /*pDesktopWnd*/, UINT /*nHitTest*/,
										  UINT /*message*/)
{
	return MA_NOACTIVATE;
}

BOOL CXTPShortcutBarPopup::OnNcActivate(BOOL bActive)
{
	return bActive ? FALSE : CWnd::OnNcActivate(bActive);
}

BOOL CXTPShortcutBarPopup::OnNcCreate(LPCREATESTRUCT lpCreateStruct)
{
	if (!CWnd::OnNcCreate(lpCreateStruct))
		return FALSE;

	if (GetStyle() & MFS_SYNCACTIVE)
	{
		// syncronize activation state with top level parent
		CWnd* pParentWnd = GetTopLevelParent();
		_ASSERTE(pParentWnd != NULL);
		if (!pParentWnd)
			return FALSE;

		CWnd* pActiveWnd = GetForegroundWindow();
		BOOL bActive	 = (pParentWnd == pActiveWnd)
					   || (pParentWnd->GetLastActivePopup() == pActiveWnd
						   && pActiveWnd->SendMessage(WM_FLOATSTATUS, FS_SYNCACTIVE) != 0);

		// the WM_FLOATSTAzTUS does the actual work
		SendMessage(WM_FLOATSTATUS, bActive ? FS_ACTIVATE : FS_DEACTIVATE);
	}

	return TRUE;
}

LRESULT CXTPShortcutBarPopup::OnFloatStatus(WPARAM wParam, LPARAM)
{
	// FS_SYNCACTIVE is used to detect MFS_SYNCACTIVE windows
	LRESULT lResult = ((GetStyle() & MFS_SYNCACTIVE) && (wParam & FS_SYNCACTIVE));
	return lResult;
}

LRESULT CXTPShortcutBarPopup::OnNcHitTest(CPoint point)
{
	CRect rectWindow;
	GetWindowRect(&rectWindow);

	CRect rcBorder(rectWindow.right - m_szGap.cx, rectWindow.top, rectWindow.right,
				   rectWindow.bottom);
	if (rcBorder.PtInRect(point))
		return HTRIGHT;

	return HTCLIENT;
}

void CXTPShortcutBarPopup::OnSize(UINT nType, int cx, int cy)
{
	CWnd::OnSize(nType, cx, cy);

	::SetWindowPos(m_hWndChild, 0, m_szGap.cx, m_szGap.cy, cx - m_szGap.cx * 2, cy - m_szGap.cy * 2,
				   SWP_NOZORDER);

	Invalidate(FALSE);
}