// PhotoGrammetryView.cpp : implementation of the CPhotoGrammetryView class
//

#include "stdafx.h"
#include "PhotoGrammetry.h"

#include "PhotoGrammetryDoc.h"
#include "PhotoGrammetryView.h"
#include "MainFrm.h"

#include "MyJuanJiDlg.h"
#include "DibImage.h"
#include "MyFourial.h"

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

/////////////////////////////////////////////////////////////////////////////
// CPhotoGrammetryView

IMPLEMENT_DYNCREATE(CPhotoGrammetryView, CScrollView)

BEGIN_MESSAGE_MAP(CPhotoGrammetryView, CScrollView)
	//{{AFX_MSG_MAP(CPhotoGrammetryView)
	ON_WM_ERASEBKGND()
	ON_COMMAND(ID_EDIT_COPY, OnEditCopy)
	ON_UPDATE_COMMAND_UI(ID_EDIT_COPY, OnUpdateEditCopy)
	ON_UPDATE_COMMAND_UI(ID_EDIT_PASTE, OnUpdateEditPaste)
	ON_COMMAND(ID_EDIT_PASTE, OnEditPaste)
	ON_COMMAND(ID_Image_JuanJi, OnImageJuanJi)
	ON_COMMAND(ID_FFT, OnFft)
	//}}AFX_MSG_MAP
	// Standard printing commands
	ON_COMMAND(ID_FILE_PRINT, CScrollView::OnFilePrint)
	ON_COMMAND(ID_FILE_PRINT_DIRECT, CScrollView::OnFilePrint)
	ON_COMMAND(ID_FILE_PRINT_PREVIEW, CScrollView::OnFilePrintPreview)
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CPhotoGrammetryView construction/destruction

CPhotoGrammetryView::CPhotoGrammetryView()
{
	// TODO: add construction code here
	m_YuMenShow = TRUE;
}

CPhotoGrammetryView::~CPhotoGrammetryView()
{
}

BOOL CPhotoGrammetryView::PreCreateWindow(CREATESTRUCT& cs)
{
	// TODO: Modify the Window class or styles here by modifying
	//  the CREATESTRUCT cs

	return CScrollView::PreCreateWindow(cs);
}

/////////////////////////////////////////////////////////////////////////////
// CPhotoGrammetryView drawing

void CPhotoGrammetryView::OnDraw(CDC* pDC)
{
/**/
	if(m_YuMenShow)
	{
		CPhotoGrammetryDoc* pDoc = GetDocument();
		ASSERT_VALID(pDoc);
		
		CSize sizeDibDisplay;		
		
		if(!pDoc->m_pDibInit->IsEmpty())
		{	
			sizeDibDisplay = pDoc->m_pDibInit->GetDimensions();
			pDoc->m_pDibInit->Draw(pDC,CPoint(0,0),sizeDibDisplay);	
		}
	}
	else
	{
		BeginWaitCursor();
		CPhotoGrammetryDoc* pDoc = GetDocument();
		ASSERT_VALID(pDoc);
		
		HDIB hDIB = pDoc->GetHDIB();
		if (hDIB != NULL)
		{
			LPSTR lpDIB = (LPSTR) ::GlobalLock((HGLOBAL) hDIB);
			int cxDIB = (int) pDoc->GetDibImage()->DIBWidth(lpDIB);
			int cyDIB = (int) pDoc->GetDibImage()->DIBHeight(lpDIB);
			
			::GlobalUnlock((HGLOBAL) hDIB);
			
			CRect rcDIB;
			rcDIB.top = rcDIB.left = 0;
			rcDIB.right = cxDIB;
			rcDIB.bottom = cyDIB;
			
			CRect rcDest;
			
			if (pDC->IsPrinting())
			{
				// 是打印，計算輸出圖像的位置和大小，以便符合頁面
				
				// 獲取打印頁面的水平寬度(象素)
				int cxPage = pDC->GetDeviceCaps(HORZRES);			
				// 獲取打印頁面的垂直高度(象素)
				int cyPage = pDC->GetDeviceCaps(VERTRES);			
				// 獲取打印機每英寸象素數
				int cxInch = pDC->GetDeviceCaps(LOGPIXELSX);
				int cyInch = pDC->GetDeviceCaps(LOGPIXELSY);
				
				// 計算打印圖像大小（縮放，根據頁面寬度調整圖像大小）
				rcDest.top = rcDest.left = 0;
				rcDest.bottom = (int)(((double)cyDIB * cxPage * cyInch)
					/ ((double)cxDIB * cxInch));
				rcDest.right = cxPage;
				
				// 計算打印圖像位置（垂直居中）
				int temp = cyPage - (rcDest.bottom - rcDest.top);
				rcDest.bottom += temp/2;
				rcDest.top += temp/2;
			}
			else   
			{
				// 不必縮放圖像
				rcDest = rcDIB;
			}
			
			pDoc->GetDibImage()->PaintDIB(pDC->m_hDC, &rcDest, pDoc->GetHDIB(),
				&rcDIB, pDoc->GetDocPalette());
		}
		
		EndWaitCursor();
	}
 /* */
}

void CPhotoGrammetryView::OnInitialUpdate()
{
	CScrollView::OnInitialUpdate();
	
	CPhotoGrammetryDoc *pDoc = GetDocument();
	ASSERT_VALID(pDoc);

	CSize sizetotal = pDoc->m_pDibInit->GetDimensions();

	SetScrollSizes(MM_TEXT,sizetotal);
	
	GetParentFrame()->RecalcLayout();
	
	ResizeParentToFit();
	
//	CSize sizeTotal;
//	// TODO: calculate the total size of this view
//	sizeTotal.cx = sizeTotal.cy = 100;
//	SetScrollSizes(MM_TEXT, sizeTotal);
}

/////////////////////////////////////////////////////////////////////////////
// CPhotoGrammetryView printing

BOOL CPhotoGrammetryView::OnPreparePrinting(CPrintInfo* pInfo)
{
	// default preparation
	pInfo->SetMaxPage(1);
	return DoPreparePrinting(pInfo);
}

void CPhotoGrammetryView::OnBeginPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
{
	// TODO: add extra initialization before printing
}

void CPhotoGrammetryView::OnEndPrinting(CDC* /*pDC*/, CPrintInfo* /*pInfo*/)
{
	// TODO: add cleanup after printing
}

/////////////////////////////////////////////////////////////////////////////
// CPhotoGrammetryView diagnostics

#ifdef _DEBUG
void CPhotoGrammetryView::AssertValid() const
{
	CScrollView::AssertValid();
}

void CPhotoGrammetryView::Dump(CDumpContext& dc) const
{
	CScrollView::Dump(dc);
}

CPhotoGrammetryDoc* CPhotoGrammetryView::GetDocument() // non-debug version is inline
{
	ASSERT(m_pDocument->IsKindOf(RUNTIME_CLASS(CPhotoGrammetryDoc)));
	return (CPhotoGrammetryDoc*)m_pDocument;
}
#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CPhotoGrammetryView message handlers

LRESULT CPhotoGrammetryView::OnDoRealize(WPARAM wParam, LPARAM)
{
	ASSERT(wParam != NULL);

	CPhotoGrammetryDoc* pDoc = GetDocument();	
	if (pDoc->GetHDIB() == NULL)
	{
		return 0L;
	}
	
	CPalette* pPal = pDoc->GetDocPalette();
	if (pPal != NULL)
	{
		CMainFrame* pAppFrame = (CMainFrame*) AfxGetApp()->m_pMainWnd;
		ASSERT_KINDOF(CMainFrame, pAppFrame);
		
		CClientDC appDC(pAppFrame);

		// All views but one should be a background palette.
		// wParam contains a handle to the active view, so the SelectPalette
		// bForceBackground flag is FALSE only if wParam == m_hWnd (this view)
		CPalette* oldPalette = appDC.SelectPalette(pPal,((HWND)wParam)!=m_hWnd);	
		if (oldPalette != NULL)
		{
			UINT nColorsChanged = appDC.RealizePalette();
			if (nColorsChanged > 0)
			{
				pDoc->UpdateAllViews(NULL);
			}
			appDC.SelectPalette(oldPalette, TRUE);
		}
		else
		{
			TRACE0("\tCCh1_1View::OnPaletteChanged中調用SelectPalette()失敗！\n");
		}
	}
	
	return 0L;
}

BOOL CPhotoGrammetryView::OnEraseBkgnd(CDC* pDC) 
{
	// TODO: Add your message handler code here and/or call default
	// 主要是為了設置子窗體默認的背景色
	// 背景色由文檔成員變量m_refColorBKG指定

	CPhotoGrammetryDoc* pDoc = GetDocument();
	CBrush brush(pDoc->m_refColorBKG);                                              
	CBrush* pOldBrush = pDC->SelectObject(&brush);
		
	CRect rectClip;
	pDC->GetClipBox(&rectClip);			// 獲取重繪區域	
	pDC->PatBlt(rectClip.left, rectClip.top, rectClip.Width(), 
		rectClip.Height(), PATCOPY);

	pDC->SelectObject(pOldBrush);                                                  

	return TRUE;
}

void CPhotoGrammetryView::OnEditCopy() 
{
	// TODO: Add your command handler code here
	CPhotoGrammetryDoc* pDoc = GetDocument();
	
	if (OpenClipboard())
	{
		BeginWaitCursor();
		EmptyClipboard();
		
		// 復制當前圖像到剪貼板
		SetClipboardData (CF_DIB, pDoc->GetDibImage()->
			CopyHandle((HANDLE) pDoc->GetHDIB()) );

		CloseClipboard();
		EndWaitCursor();
	}
}

void CPhotoGrammetryView::OnUpdateEditCopy(CCmdUI* pCmdUI) 
{
	// TODO: Add your command update UI handler code here
	pCmdUI->Enable(GetDocument()->GetHDIB() != NULL);
}

void CPhotoGrammetryView::OnUpdateEditPaste(CCmdUI* pCmdUI) 
{
	// TODO: Add your command update UI handler code here
	pCmdUI->Enable(::IsClipboardFormatAvailable(CF_DIB));
}

void CPhotoGrammetryView::OnEditPaste() 
{
	// TODO: Add your command handler code here
	HDIB hNewDIB = NULL;
	CPhotoGrammetryDoc* pDoc = GetDocument();
	
	if (OpenClipboard())
	{
		BeginWaitCursor();

		// 讀取剪貼板中的圖像
		hNewDIB = (HDIB)pDoc->GetDibImage()->CopyHandle(::GetClipboardData(CF_DIB));

		CloseClipboard();
		
		if (hNewDIB != NULL)
		{
			pDoc->ReplaceHDIB(hNewDIB);		// 替換DIB，同時釋放舊DIB對象		
			pDoc->InitDIBData();			// 更新DIB大小和調色板		
			pDoc->SetModifiedFlag(TRUE);	// 設置臟標記	
			SetScrollSizes(MM_TEXT, pDoc->GetDocSize());	// 重新設置滾動視圖大小		
			OnDoRealize((WPARAM)m_hWnd,0);	// 實現新的調色板		
			pDoc->UpdateAllViews(NULL);		// 更新視圖
		}

		EndWaitCursor();
	}
}

void CPhotoGrammetryView::CalcWindowRect(LPRECT lpClientRect, UINT nAdjustType) 
{
	// TODO: Add your specialized code here and/or call the base class
	CScrollView::OnInitialUpdate();
	ASSERT(GetDocument() != NULL);

	SetScrollSizes(MM_TEXT,GetDocument()->GetDocSize());
}

void CPhotoGrammetryView::OnActivateView(BOOL bActivate, CView* pActivateView, CView* pDeactiveView) 
{
	// TODO: Add your specialized code here and/or call the base class
	if (bActivate)
	{
		ASSERT(pDeactiveView == this);
		OnDoRealize((WPARAM)m_hWnd,0);
	}
	CScrollView::OnActivateView(bActivate, pActivateView, pDeactiveView);
	
}

void CPhotoGrammetryView::OnImageJuanJi() 
{
	CMyJuanJiDlg dlg;

	if (dlg.DoModal() != IDOK) {
		return ;
	}
	delete dlg;
	BeginWaitCursor();

	CPhotoGrammetryDoc *pDoc = GetDocument();

	LPSTR lpDIB =  (LPSTR) ::GlobalLock((HGLOBAL) pDoc->GetHDIB());

	CDib* pDib = pDoc->m_pDibInit;

	////////////////////////////////////////////////////////////////////

	// the model array
	float pdpTemp[9];
	pdpTemp[0] = (float)dlg.m_Num0;
	pdpTemp[1] = (float)dlg.m_Num1;
	pdpTemp[2] = (float)dlg.m_Num2;
	pdpTemp[3] = (float)dlg.m_Num3;
	pdpTemp[4] = (float)dlg.m_Num4;
	pdpTemp[5] = (float)dlg.m_Num5;
	pdpTemp[6] = (float)dlg.m_Num6;
	pdpTemp[7] = (float)dlg.m_Num7;
	pdpTemp[8] = (float)dlg.m_Num8;

	float modelFc = 0.0;
	for (int i = 0; i < 9; i++)
	{
		modelFc += pdpTemp[i];
	}
	modelFc = modelFc / 9;
	
	CDibImage my_JuanJi;
	if (my_JuanJi.JuanJi(pDib,pdpTemp,modelFc))
	{
		pDoc->SetModifiedFlag(TRUE);

		pDoc->UpdateAllViews(NULL);
	}
	else
	{
		MessageBox("分配內存失敗","系統提示",MB_ICONINFORMATION | MB_OK);
	}
	EndWaitCursor();
}

void CPhotoGrammetryView::OnFft() 
{
	// TODO: Add your command handler code here
	
	m_YuMenShow =  FALSE;
    // 圖像付立葉變換
	CPhotoGrammetryDoc* pFFTDoc = GetDocument();
		
	LPSTR	lpDIB;				// 指向DIB的指針	
	LPSTR    lpDIBBits;			// 指向DIB象素指針

	lpDIB = (LPSTR) ::GlobalLock((HGLOBAL) pFFTDoc->GetHDIB());
	
	// 找到DIB圖像象素起始位置
	lpDIBBits = pFFTDoc->GetDibImage()->FindDIBBits(lpDIB);
	
	// 判斷是否是8-bpp位圖（這里為了方便，只處理8-bpp位圖的付立葉變換，其它的可以類推）
	if (pFFTDoc->GetDibImage()->DIBNumColors(lpDIB) != 256)
	{
		MessageBox("not 256 colors", "system alarm", MB_ICONINFORMATION | MB_OK);
		::GlobalUnlock((HGLOBAL) pFFTDoc->GetHDIB());

		return;
	}
	
	LONG lWidth  = pFFTDoc->GetDibImage()->DIBWidth(lpDIB);
	LONG lHeight = pFFTDoc->GetDibImage()->DIBWidth(lpDIB);;
	
	BeginWaitCursor();
	
	// 調用Fourier()函數進行付立葉變換
	CMyFourial MyFoural;
	
	MyFoural.Fourier(lpDIBBits,lWidth, lHeight);
	
	pFFTDoc->SetModifiedFlag(TRUE);		// 設置臟標記
	pFFTDoc->UpdateAllViews(NULL);			// 更新視圖
	
	::GlobalUnlock((HGLOBAL) pFFTDoc->GetHDIB());

	EndWaitCursor();
}