// LayerPrevView.cpp : 구현 파일입니다.
//

#include "stdafx.h"
#include "EtWorldPainter.h"
#include "LayerPrevView.h"
#include "XTCustomPropertyGridItemFile.h"
#include "GlobalValue.h"
#include "TEtWorld.h"
#include "TEtWorldSector.h"
#include "PaneDefine.h"
#include "resource.h"
#include "MainFrm.h"
#include "EtWorldPainterDoc.h"
#include "EtWorldPainterView.h"
#include "UserMessage.h"

// CLayerPrevView

IMPLEMENT_DYNCREATE(CLayerPrevView, CFormView)

CLayerPrevView::CLayerPrevView()
	: CFormView(CLayerPrevView::IDD)
{
	m_bActivate = false;
	m_nLayerIndex = 0;

	m_pdcBitmap = NULL;
	m_pmemDC = NULL;
	m_nTextureCount = 0;
	m_nSelectTextureIndex = -1;
	m_nSelectBlockIndex = -1;
	m_nDrawFlag = 0;
	m_ScrollPos = m_ScrollSize = CSize( 0, 0 );

	m_nSlotWidth = 100;
	m_nSlotHeight = 130;

}

CLayerPrevView::~CLayerPrevView()
{
	DeleteMemDC();
}

void CLayerPrevView::DoDataExchange(CDataExchange* pDX)
{
	CFormView::DoDataExchange(pDX);
}

BEGIN_MESSAGE_MAP(CLayerPrevView, CFormView)
	ON_WM_SIZE()
	ON_WM_PAINT()
	ON_WM_ERASEBKGND()
	ON_MESSAGE( UM_REFRESH_PANE_VIEW, OnRefresh )
	ON_MESSAGE( UM_TILEPANE_DROPITEM, OnDropItem )
	ON_MESSAGE( UM_TILEPANE_DROPMOVEITEM, OnDropMoveItem )
	ON_WM_MOUSEWHEEL()
	ON_WM_CREATE()
	ON_COMMAND(ID_RELOAD, &CLayerPrevView::OnReload)
END_MESSAGE_MAP()


// CLayerPrevView 진단입니다.

#ifdef _DEBUG
void CLayerPrevView::AssertValid() const
{
	CFormView::AssertValid();
}

#ifndef _WIN32_WCE
void CLayerPrevView::Dump(CDumpContext& dc) const
{
	CFormView::Dump(dc);
}
#endif
#endif //_DEBUG


void CLayerPrevView::CreateMemDC()
{
	if( m_pdcBitmap || m_pmemDC ) return;

	m_pmemDC = new CDC;
	m_pdcBitmap = new CBitmap;

	CRect rcRect, rcToolbar;
	GetClientRect( &rcRect );
	m_wndToolBar.GetClientRect( &rcToolbar );
	rcRect.top += rcToolbar.Height();

	CDC *pDC = GetDC();
	m_pmemDC->CreateCompatibleDC( pDC );
	m_pdcBitmap->CreateCompatibleBitmap( pDC, rcRect.Width(), rcRect.Height() );
	ReleaseDC( pDC );
}

void CLayerPrevView::DeleteMemDC()
{
	if( m_pdcBitmap ) {
		m_pdcBitmap->DeleteObject();
		SAFE_DELETE( m_pdcBitmap );
	}
	if( m_pmemDC ) {
		m_pmemDC->DeleteDC();
		SAFE_DELETE( m_pmemDC );
	}
}

void CLayerPrevView::OnInitialUpdate()
{
	CFormView::OnInitialUpdate();

	// TODO: 여기에 특수화된 코드를 추가 및/또는 기본 클래스를 호출합니다.
	if( m_bActivate == true ) return;
	m_bActivate = true;

}

void CLayerPrevView::OnSize(UINT nType, int cx, int cy)
{
	CFormView::OnSize(nType, cx, cy);

	// TODO: 여기에 메시지 처리기 코드를 추가합니다.
	DeleteMemDC();
	CreateMemDC();

	ResetScroll();

	if( m_wndToolBar.GetSafeHwnd() )
	{
		CSize sz = m_wndToolBar.CalcDockingLayout(cx, LM_HORZDOCK | LM_HORZ | LM_COMMIT);

		m_wndToolBar.MoveWindow(0, 0, cx, sz.cy);
		m_wndToolBar.Invalidate(FALSE);
	}
}

LRESULT CLayerPrevView::OnRefresh( WPARAM wParam, LPARAM lParam )
{
	SectorIndex Sector = CGlobalValue::GetInstance().m_SelectGrid;
	if( Sector == -1 ) return S_OK;
	CTEtWorldSector *pSector = CTEtWorld::GetInstance().GetSector( Sector );
	if( pSector == NULL ) return S_OK;
	if( (int)wParam == 1 ) {
		m_nSelectBlockIndex = -1;
		m_nDrawFlag = 0;
	}

	int nPrevBlockIndex = m_nSelectBlockIndex;
	int nPrevDrawFlag = m_nDrawFlag;

	m_nTextureCount = 0;
	m_nSelectBlockIndex = -1;

	if( CGlobalValue::GetInstance().m_bEditBlock == true ) {
		int nSize = (int)CGlobalValue::GetInstance().m_nVecEditBlockList.size();
		if( nSize == 0 ) m_nDrawFlag = 1;
		else if( nSize == 1 ) {
			m_nSelectBlockIndex = CGlobalValue::GetInstance().m_nVecEditBlockList[0];
			m_nTextureCount = pSector->GetTextureCount( m_nSelectBlockIndex );
			m_nDrawFlag = 4;
		}
		else {
			bool bCheckSame = true;
			/* 나중에 주석 풀어주자.. Type 체크 만들어지면..
			int nType = pSector->GetBlockType( GlobalValue::GetInstance().m_nVecEditBlockList[0] );
			for( int i=1; i<nSize; i++ ) {
				if( nType != pSector->GetBlockType( GlobalValue::GetInstance().m_nVecEditBlockList[i] ) ) {
					bCheckSame = false;
					break;
				}
			}
			*/
			if( bCheckSame == true ) {
				m_nSelectBlockIndex = CGlobalValue::GetInstance().m_nVecEditBlockList[0];
				m_nTextureCount = pSector->GetTextureCount( m_nSelectBlockIndex );
				m_nDrawFlag = 5;
			}
			else {
				m_nDrawFlag = 2;
			}
		}
	}
	else {
		int nIndex = pSector->GetCurrentBlock();
		if( nIndex == -1 ) m_nDrawFlag = 3;
		else {
			m_nSelectBlockIndex = nIndex;
			m_nTextureCount = pSector->GetTextureCount( m_nSelectBlockIndex );
			m_nDrawFlag = 4;
		}
	}
	if( m_nSelectBlockIndex == nPrevBlockIndex && nPrevDrawFlag == m_nDrawFlag ) return S_OK;
	ResetScroll();
	Invalidate();

	return S_OK;
}

void CLayerPrevView::OnPaint()
{
	CPaintDC dc(this); // device context for painting
	// TODO: 여기에 메시지 처리기 코드를 추가합니다.
	// 그리기 메시지에 대해서는 CFormView::OnPaint()을(를) 호출하지 마십시오.
	

	CreateMemDC();

	CBitmap *pOldBitmap;
	CRect rcRect, rcToolbar;
	GetClientRect( &rcRect );
	m_wndToolBar.GetClientRect( &rcToolbar );

	pOldBitmap = m_pmemDC->SelectObject( m_pdcBitmap );

	m_pmemDC->FillSolidRect( &rcRect, RGB( 0, 0, 0 ) );
	switch( m_nDrawFlag ) {
		case 0:
			break;
		case 1:
			DrawCannotView( m_pmemDC, "블럭을 선택하여 주세요." );
			break;
		case 2:
			DrawCannotView( m_pmemDC, "같지 않는 블럭들 선택" );
			break;
		case 3:
			DrawCannotView( m_pmemDC, "표시할 수 없습니다." );
			break;
		case 4:
			DrawSlot( m_pmemDC, m_nSelectBlockIndex );
			break;
		case 5:
			DrawSlot( m_pmemDC, m_nSelectBlockIndex, false );
			break;
	}

	// 스크롤 그린다.
	rcRect.top += rcToolbar.Height();

	CRect rcScroll;
	rcScroll.top = 0;
	rcScroll.bottom = rcRect.bottom;
	rcScroll.left = rcRect.right - 7;
	rcScroll.right = rcRect.right;
	m_pmemDC->Draw3dRect( &rcScroll, RGB( 129, 129, 129 ), RGB( 255, 255, 255 ) );

	if( m_ScrollSize.cy != 0 ) {
		CRect rcPos;
		rcPos.left = rcScroll.left + 1;
		rcPos.right = rcScroll.right - 1;
		rcPos.top = rcScroll.top + (int)( ( ( rcScroll.Height() - 20 ) / (float)m_ScrollSize.cy ) * (float)m_ScrollPos.cy );
		rcPos.bottom = rcPos.top + 20;
		m_pmemDC->FillSolidRect( &rcPos, RGB( 250, 213, 14 ) );
	}


	dc.BitBlt( rcRect.left, rcRect.top, rcRect.Width(), rcRect.Height() ,
		m_pmemDC, 0, 0, SRCCOPY );

	m_pmemDC->SelectObject( pOldBitmap );
}

CRect CLayerPrevView::GetSlotRect( int nSlotIndex )
{
	CRect rcSlot;

	CRect rcRect;
	GetClientRect( &rcRect );

	int nWidthCount = ( rcRect.Width() - 5 ) / ( m_nSlotWidth + 5 );
	if( nWidthCount < 1 ) nWidthCount = 1;

	rcSlot.left = 5 + ( ( m_nSlotWidth + 5 ) * ( nSlotIndex % nWidthCount ) );
	rcSlot.top = 5 + ( ( m_nSlotHeight + 5 ) * ( nSlotIndex / nWidthCount ) );
	rcSlot.right = rcSlot.left + m_nSlotWidth;
	rcSlot.bottom = rcSlot.top + m_nSlotHeight;

	return rcSlot;
}

void CLayerPrevView::DrawSlot( CDC *pDC, int nBlockIndex, bool bDrawImage )
{
	SectorIndex Sector = CGlobalValue::GetInstance().m_SelectGrid;
	if( Sector == -1 ) return;
	CTEtWorldSector *pSector = CTEtWorld::GetInstance().GetSector( Sector );
	if( pSector == NULL ) return;

	int nImageCount = m_nTextureCount / 4;
	int nTextureIndex = 0;
	CWnd *pWnd = GetPaneWnd( TILEMNG_PANE );

	const char *szFileName;
	CRect rcSlot, rcTemp;
	TileStruct *pStruct = NULL;

	pDC->SetBkMode( TRANSPARENT );
	pDC->SelectStockObject( DEFAULT_GUI_FONT );
	pDC->SetTextColor( RGB( 255, 255, 255 ) );
	pDC->SetStretchBltMode( COLORONCOLOR );

	for( int i=0; i<nImageCount; i++ ) {
		nTextureIndex = m_nLayerIndex + ( i * 4 );
		rcSlot = GetSlotRect(i);
		rcSlot.top -= m_ScrollPos.cy;
		rcSlot.bottom -= m_ScrollPos.cy;

		// 선택된것 그려준다.
		if( m_nSelectTextureIndex == i ) {
			pDC->FillSolidRect( &rcSlot, RGB( 255, 50, 20 ) );
		}

		pDC->Draw3dRect( &rcSlot, RGB( 128, 128, 128 ), RGB( 255, 255, 255 ) );

		rcTemp = rcSlot;
		rcTemp.bottom = rcTemp.top + 15;
		pDC->Draw3dRect( &rcTemp, RGB( 128, 128, 128 ), RGB( 255, 255, 255 ) );

		szFileName = pSector->GetTextureSemanticName( nBlockIndex, nTextureIndex );
		pDC->IntersectClipRect( &rcTemp ); 
		pDC->TextOut( rcTemp.left + 1, rcTemp.top + 2, CString(szFileName) );
		pDC->SelectClipRgn( NULL );


		rcTemp = rcSlot;
		rcTemp.top = rcTemp.bottom - 15;
		pDC->Draw3dRect( &rcTemp, RGB( 128, 128, 128 ), RGB( 255, 255, 255 ) );

		szFileName = pSector->GetTextureName( nBlockIndex, nTextureIndex );
		pDC->IntersectClipRect( &rcTemp ); 
		pDC->TextOut( rcTemp.left + 1, rcTemp.top + 2, CString(szFileName) );
		pDC->SelectClipRgn( NULL );

		// 그림을 그려준당~
		if( bDrawImage == true ) {
			if( !pWnd ) continue;
			pStruct = (TileStruct*)pWnd->SendMessage( UM_TILEPANE_GET_PREVIEW_IMAGE, (WPARAM)szFileName );
			if( !pStruct ) continue;
			rcTemp = rcSlot;
			rcTemp.top += 15;
			rcTemp.bottom -= 15;
			rcTemp.left += 1;
			rcTemp.right -= 1;

			pDC->StretchBlt( rcTemp.left, rcTemp.top, rcTemp.Width(), rcTemp.Height(), pStruct->pmemDC, 0, 0, pStruct->SurfaceDesc.Width, pStruct->SurfaceDesc.Height, SRCPAINT );
		}
		else {
			rcTemp = rcSlot;
			rcTemp.top += 15;
			rcTemp.bottom -= 15;
			rcTemp.left += 1;
			rcTemp.right -= 1;
			pDC->IntersectClipRect( &rcTemp ); 
			pDC->TextOut( rcTemp.left + 1, rcTemp.top + 2, "Multi Select" );
			pDC->SelectClipRgn( NULL );
		}
	}
}

void CLayerPrevView::DrawCannotView( CDC *pDC, char *szStr )
{
	CRect rcRect;
	GetClientRect( &rcRect );
	pDC->SetBkMode( TRANSPARENT );
	pDC->SelectStockObject( DEFAULT_GUI_FONT );
	pDC->SetTextColor( RGB( 255, 255, 255 ) );

	pDC->TextOut( rcRect.left, rcRect.Height() / 2, szStr );
}


BOOL CLayerPrevView::OnEraseBkgnd(CDC* pDC)
{
	// TODO: 여기에 메시지 처리기 코드를 추가 및/또는 기본값을 호출합니다.

//	return CFormView::OnEraseBkgnd(pDC);
	return TRUE;
}

LRESULT CLayerPrevView::OnDropItem( WPARAM wParam, LPARAM lParam )
{
	CPoint p;
	p.x = (long)lParam >> 16;
	p.y = (long)( lParam << 16 ) >> 16;
	p.y += m_ScrollPos.cy;
	char *szFileName = (char *)wParam;

	CRect rcRect;
	m_wndToolBar.GetClientRect( &rcRect );
	p.y -= rcRect.Height();
	m_nSelectTextureIndex = -1;

	for( int i=0; i<m_nTextureCount/4; i++ ) {
		rcRect = GetSlotRect(i);
		if( p.x >= rcRect.left && p.x <= rcRect.right && p.y >= rcRect.top && p.y <= rcRect.bottom ) {
			ChangeTexture( i, szFileName );
			break;
		}
	}

	SendMessage( UM_REFRESH_PANE_VIEW );
	return S_OK;
}

LRESULT CLayerPrevView::OnDropMoveItem( WPARAM wParam, LPARAM lParam )
{
	CPoint p;
	p.x = (long)wParam >> 16;
	p.y = (long)( wParam << 16 ) >> 16;

	p.y += m_ScrollPos.cy;
	CRect rcRect;
	m_wndToolBar.GetClientRect( &rcRect );
	p.y -= rcRect.Height();
	m_nSelectTextureIndex = -1;
	for( int i=0; i<m_nTextureCount/4; i++ ) {
		rcRect = GetSlotRect(i);
		if( p.x >= rcRect.left && p.x <= rcRect.right && p.y >= rcRect.top && p.y <= rcRect.bottom ) {
			m_nSelectTextureIndex = i;
			break;
		}
	}

	Invalidate();
	return S_OK;
}

void CLayerPrevView::ChangeTexture( int nTextureIndex, char *szFileName )
{
	SectorIndex Sector = CGlobalValue::GetInstance().m_SelectGrid;
	if( Sector == -1 ) return;
	CTEtWorldSector *pSector = CTEtWorld::GetInstance().GetSector( Sector );
	if( pSector == NULL ) return;

	if( CGlobalValue::GetInstance().m_bEditBlock != true ) return;
	if( CGlobalValue::GetInstance().m_nVecEditBlockList.size() == 0 ) return;
	
	// Add Undo/Redo Infomation
	CString szDesc;
	std::vector<CString> szVecPrevNameList;
	for( DWORD i=0; i<CGlobalValue::GetInstance().m_nVecEditBlockList.size(); i++ ) {
		szVecPrevNameList.push_back( pSector->GetTextureName( CGlobalValue::GetInstance().m_nVecEditBlockList[i], m_nLayerIndex + ( nTextureIndex * 4 ) ) );
	}
	CActionElementChangeTexture *pAction = new CActionElementChangeTexture( pSector );
	szDesc.Format( "Change Block Texture : %d", CGlobalValue::GetInstance().m_nVecEditBlockList.size() );
	pAction->SetDesc( szDesc );
	pAction->ChangeTexture( m_nLayerIndex, nTextureIndex, CGlobalValue::GetInstance().m_nVecEditBlockList, szVecPrevNameList, szFileName );
	pAction->AddAction();

	// Change
	for( DWORD i=0; i<CGlobalValue::GetInstance().m_nVecEditBlockList.size(); i++ ) {
		pSector->SetTexture( CGlobalValue::GetInstance().m_nVecEditBlockList[i], m_nLayerIndex + ( nTextureIndex * 4 ), szFileName );
	}

	CGlobalValue::GetInstance().RefreshRender();
//	m_nSelectBlockIndex = -1;
//	m_nDrawFlag = 0;
	SendMessage( UM_REFRESH_PANE_VIEW, 1 );

	CGlobalValue::GetInstance().SetModify();
}

void CLayerPrevView::ResetScroll()
{
	if( m_nTextureCount == 0 ) {
		m_ScrollPos = CSize( 0, 0 );
		m_ScrollSize = CSize( 0, 0 );
		return;
	}
	CRect rcRect;
	GetClientRect( &rcRect );

	int nWidthCount = ( rcRect.Width() - 5 ) / ( m_nSlotWidth + 5 );
	int nHeightCount = ( rcRect.Height() - 5 ) / ( m_nSlotHeight + 5 );
	if( nWidthCount < 1 ) nWidthCount = 1;
	if( nHeightCount < 1 ) nHeightCount = 1;

	int nCount = m_nTextureCount / 4;
	int nNeedHeightCount = nCount / nWidthCount;
	if( nCount % nWidthCount != 0 ) nNeedHeightCount++;

	m_ScrollSize.cx = 0;
	m_ScrollSize.cy = 0;
	if( nNeedHeightCount > nHeightCount ) {
		m_ScrollSize.cx = 0;
		m_ScrollSize.cy = nNeedHeightCount * m_nSlotHeight;
		if( m_ScrollPos.cy > m_ScrollSize.cy )
			m_ScrollPos.cy = m_ScrollSize.cy;
	}
}
BOOL CLayerPrevView::OnMouseWheel(UINT nFlags, short zDelta, CPoint pt)
{
	// TODO: 여기에 메시지 처리기 코드를 추가 및/또는 기본값을 호출합니다.
	if( zDelta > 0 ) m_ScrollPos.cy -= ( m_nSlotHeight + 5 );
	else m_ScrollPos.cy += ( m_nSlotHeight + 5 );

	if( m_ScrollPos.cy < 0 ) m_ScrollPos.cy = 0;
	else if( m_ScrollPos.cy >= m_ScrollSize.cy ) m_ScrollPos.cy = m_ScrollSize.cy;

	Invalidate();

	return CFormView::OnMouseWheel(nFlags, zDelta, pt);
}


CActionElementChangeTexture::CActionElementChangeTexture( CTEtWorldSector *pSector )
: CActionElement( &s_BrushActionCommander )
{
	m_pSector = pSector;
	m_nLayerIndex = -1;
	m_nTextureIndex = -1;
}

CActionElementChangeTexture::~CActionElementChangeTexture()
{
}

bool CActionElementChangeTexture::Redo()
{
	for( DWORD i=0; i<m_nVecBlockList.size(); i++ ) {
		m_pSector->SetTexture( m_nVecBlockList[i], m_nLayerIndex + ( m_nTextureIndex * 4 ), m_szTextureName );
	}
	CGlobalValue::GetInstance().RefreshRender();

	CWnd *pWnd = GetPaneWnd( LAYER_PANE );
	if( pWnd ) pWnd->SendMessage( UM_REFRESH_PANE_VIEW, 1 );
	return true;
}

bool CActionElementChangeTexture::Undo()
{
	for( DWORD i=0; i<m_nVecBlockList.size(); i++ ) {
		if( m_szVecPrevTextureName[i].IsEmpty() || m_szVecPrevTextureName[i].GetLength() == 0 )
			m_pSector->SetTexture( m_nVecBlockList[i], m_nLayerIndex + ( m_nTextureIndex * 4 ), NULL );
		else 
			m_pSector->SetTexture( m_nVecBlockList[i], m_nLayerIndex + ( m_nTextureIndex * 4 ), m_szVecPrevTextureName[i] );
	}
	CGlobalValue::GetInstance().RefreshRender();
	CWnd *pWnd = GetPaneWnd( LAYER_PANE );
	if( pWnd ) pWnd->SendMessage( UM_REFRESH_PANE_VIEW, 1 );
	return true;
}

void CActionElementChangeTexture::ChangeTexture( int nLayerIndex, int nTextureIndex, std::vector<int> &nVecList, std::vector<CString> szVecName, CString szTextureName )
{
	m_nLayerIndex = nLayerIndex;
	m_nTextureIndex = nTextureIndex;
	m_nVecBlockList = nVecList;
	m_szVecPrevTextureName = szVecName;
	m_szTextureName = szTextureName;
}

int CLayerPrevView::OnCreate(LPCREATESTRUCT lpCreateStruct)
{
	if (CFormView::OnCreate(lpCreateStruct) == -1)
		return -1;

	// TODO:  여기에 특수화된 작성 코드를 추가합니다.
	m_wndToolBar.CreateToolBar(WS_VISIBLE|WS_CHILD|CBRS_TOOLTIPS, this);
	m_wndToolBar.LoadToolBar(IDR_RELOAD);

	m_wndToolBar.GetControls()->SetControlType( 0, xtpControlButton );

	return 0;
}

void CLayerPrevView::OnReload()
{
	// TODO: 여기에 명령 처리기 코드를 추가합니다.

	SectorIndex Sector = CGlobalValue::GetInstance().m_SelectGrid;
	if( Sector == -1 ) return;
	CTEtWorldSector *pSector = CTEtWorld::GetInstance().GetSector( Sector );
	if( pSector == NULL ) return;

	int nSize = (int)CGlobalValue::GetInstance().m_nVecEditBlockList.size();
	if( nSize > 1 ) return;

	EtTextureHandle hTexture;
#ifdef _TOOLCOMPILE
	hTexture = pSector->GetTexture( m_nSelectBlockIndex, m_nLayerIndex );
#endif
	if( hTexture )
	{
		// 현재 로딩된 텍스처를 쓰는 Terrain들의 텍스처를 모두 릴리즈 하고 다시 셋팅하는건 작업량이 많아서 이렇게 강제로 로딩하는거로 하겠다.
		CFileStream *pStream = new CFileStream( hTexture->GetFullName() );
		hTexture->LoadResource( pStream );
		pStream->Close();
		SAFE_DELETE( pStream );
	}
}