// EARView.cpp : implementation of the CEARView class
//

#include "stdafx.h"
#include "EAR.h"

#include "EARDoc.h"
#include "EARView.h"

//添加頭文件
#include "MainFrm.h"
#include "IntensityDlg.h"		// 直方圖
#include "LinerParaDlg.h"		// 線性變換
#include "PointThreDlg.h"		// 閾值變換
#include "PointWinDlg.h"		// 窗口變換
#include "PointStreDlg.h"		// 灰度拉伸

#include "SmoothDlg.h"			// 圖像平滑
#include "MidFilterDlg.h"		// 中值濾波
#include "SharpThreDlg.h"		// 圖像梯度銳化

#include "MorphErosionDlg.h"	// 圖像腐蝕
#include "MorphDilationDlg.h"	// 圖像膨脹
#include "MorphOpenDlg.h"		// 開運算
#include "MorphCloseDlg.h"		// 閉運算

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

/////////////////////////////////////////////////////////////////////////////
// CEARView

IMPLEMENT_DYNCREATE(CEARView, CScrollView)

BEGIN_MESSAGE_MAP(CEARView, CScrollView)
	//{{AFX_MSG_MAP(CEARView)
	ON_WM_ERASEBKGND()
	ON_COMMAND(ID_EDIT_COPY, OnEditCopy)
	ON_UPDATE_COMMAND_UI(ID_EDIT_COPY, OnUpdateEditCopy)
	ON_COMMAND(ID_EDIT_PASTE, OnEditPaste)
	ON_UPDATE_COMMAND_UI(ID_EDIT_PASTE, OnUpdateEditPaste)
	ON_COMMAND(ID_VEIW_INTENSITY, OnVeiwIntensity)
	ON_COMMAND(ID_POINT_INVERT, OnPointInvert)
	ON_COMMAND(ID_POINT_LINER, OnPointLiner)
	ON_COMMAND(ID_POINT_THRE, OnPointThre)
	ON_COMMAND(ID_POINT_WIND, OnPointWind)
	ON_COMMAND(ID_POINT_STRE, OnPointStre)
	ON_COMMAND(ID_POINT_EQUA, OnPointEqua)
	ON_COMMAND(ID_ENHA_SMOOTH, OnEnhaSmooth)
	ON_COMMAND(ID_ENHA_GRADSHARP, OnEnhaGradsharp)
	ON_COMMAND(ID_ENHA_MIDIANF, OnEnhaMidianF)
	ON_COMMAND(ID_ENHA_SHARP, OnEnhaSharp)
	ON_COMMAND(ID_MORPH_EROSION, OnMorphErosion)
	ON_COMMAND(ID_MORPH_DILATION, OnMorphDilation)
	ON_COMMAND(ID_MORPH_OPEN, OnMorphOpen)
	ON_COMMAND(ID_MORPH_CLOSE, OnMorphClose)
	ON_COMMAND(ID_EDGE_SOBEL, OnEdgeSobel)
	ON_COMMAND(ID_EDGE_KIRSCH, OnEdgeKirsch)
	ON_COMMAND(ID_EDGE_CONTOUR, OnEdgeContour)
	//}}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()

/////////////////////////////////////////////////////////////////////////////
// CEARView construction/destruction

CEARView::CEARView()
{
	// TODO: add construction code here

}

CEARView::~CEARView()
{
}

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

	return CScrollView::PreCreateWindow(cs);
}

/////////////////////////////////////////////////////////////////////////////
// CEARView drawing

void CEARView::OnDraw(CDC* pDC)
{
	// TODO: add draw code for native data here
	BeginWaitCursor();

	CEARDoc* 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 CEARView::OnInitialUpdate()
{
	CScrollView::OnInitialUpdate();

	// TODO: calculate the total size of this view
}

/////////////////////////////////////////////////////////////////////////////
// CEARView printing

BOOL CEARView::OnPreparePrinting(CPrintInfo* pInfo)
{
	// default preparation
	// 設置總頁數為一
	pInfo->SetMaxPage(1);
	return DoPreparePrinting(pInfo);
}

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

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

/////////////////////////////////////////////////////////////////////////////
// CEARView diagnostics

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

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

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

/////////////////////////////////////////////////////////////////////////////
// CEARView message handlers

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

	CEARDoc* 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 CEARView::OnEraseBkgnd(CDC* pDC) 
{
	// TODO: Add your message handler code here and/or call default
	// 主要是為了設置子窗體默認的背景色
	// 背景色由文檔成員變量m_refColorBKG指定

	CEARDoc* 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 CEARView::OnEditCopy() 
{
	// TODO: Add your command handler code here
	// 復制當前圖像

	CEARDoc* pDoc = GetDocument();
	
	if (OpenClipboard())
	{
		BeginWaitCursor();
		EmptyClipboard();
		
		// 復制當前圖像到剪貼板
		SetClipboardData (CF_DIB, pDoc->GetDibImage()->
			CopyHandle((HANDLE) pDoc->GetHDIB()) );

		CloseClipboard();
		EndWaitCursor();
	}		
}

void CEARView::OnUpdateEditCopy(CCmdUI* pCmdUI) 
{
	// TODO: Add your command update UI handler code here
	// 如果當前DIB對象不空，復制菜單項有效
	pCmdUI->Enable(GetDocument()->GetHDIB() != NULL);
}

void CEARView::OnEditPaste() 
{
	// TODO: Add your command handler code here
	// 粘貼圖像
	
	HDIB hNewDIB = NULL;
	CEARDoc* 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 CEARView::OnUpdateEditPaste(CCmdUI* pCmdUI) 
{
	// TODO: Add your command update UI handler code here
	// 如果當前剪貼板中有DIB對象，粘貼菜單項有效
	pCmdUI->Enable(::IsClipboardFormatAvailable(CF_DIB));	
}

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

void CEARView::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 CEARView::OnVeiwIntensity() 
{
	// TODO: Add your command handler code here
	// 查看當前圖像灰度直方圖

	CEARDoc* pDoc = GetDocument();
	
	LPSTR lpDIB;			// 指向DIB的指針	
	LPSTR    lpDIBBits;		// 指向DIB象素指針
	lpDIB = (LPSTR) ::GlobalLock((HGLOBAL) pDoc->GetHDIB());	
	// 找到DIB圖像象素起始位置
	lpDIBBits = pDoc->GetDibImage()->FindDIBBits(lpDIB);
	
	// 判斷是否是8-bpp位圖（這里為了方便，只處理8-bpp位圖，其它的可以類推）
	if (pDoc->GetDibImage()->DIBNumColors(lpDIB) != 256)
	{
		MessageBox("目前只支持查看256色位圖灰度直方圖！", "系統提示" , 
			MB_ICONINFORMATION | MB_OK);
		::GlobalUnlock((HGLOBAL) pDoc->GetHDIB());
		
		return;
	}
	
	BeginWaitCursor();

	CIntensityDlg dlgPara;
	dlgPara.m_lpDIBBits = lpDIBBits;
	dlgPara.m_lWidth = pDoc->GetDibImage()->DIBWidth(lpDIB);
	dlgPara.m_lHeight = pDoc->GetDibImage()->DIBHeight(lpDIB);
	dlgPara.m_iLowGray = 0;
	dlgPara.m_iUpGray = 255;
	
	// 顯示對話框，提示用戶設定平移量
	if (dlgPara.DoModal() != IDOK)
	{
		return;
	}

	::GlobalUnlock((HGLOBAL) pDoc->GetHDIB());
	EndWaitCursor();	
}

void CEARView::OnPointInvert() 
{
	// TODO: Add your command handler code here
	// 圖像反色
	
	CEARDoc* pDoc = GetDocument();
	
	LPSTR lpDIB;			// 指向DIB的指針	
	LPSTR    lpDIBBits;		// 指向DIB象素指針	
	FLOAT fA;				// 線性變換的斜率	
	FLOAT fB;				// 線性變換的截距	
	// 反色操作的線性變換的方程是-x + 255
	fA = -1.0;
	fB = 255.0;
	
	lpDIB = (LPSTR) ::GlobalLock((HGLOBAL) pDoc->GetHDIB());
	// 找到DIB圖像象素起始位置
	lpDIBBits = pDoc->GetDibImage()->FindDIBBits(lpDIB);
	
	// 判斷是否是8-bpp位圖（這里為了方便，只處理8-bpp位圖的反色，其它的可以類推）
	if (pDoc->GetDibImage()->DIBNumColors(lpDIB) != 256)
	{
		MessageBox("目前只支持256色位圖的反色！", "系統提示" , 
			MB_ICONINFORMATION | MB_OK);
		::GlobalUnlock((HGLOBAL) pDoc->GetHDIB());
		
		return;
	}
	
	BeginWaitCursor();
	
	// 調用LinerTrans()函數反色
	pDoc->GetDibImage()->LinerTrans(lpDIBBits,pDoc->GetDibImage()->DIBWidth(lpDIB), 
		pDoc->GetDibImage()->DIBHeight(lpDIB), fA, fB);
	
	pDoc->SetModifiedFlag(TRUE);	// 設置臟標記	
	pDoc->UpdateAllViews(NULL);		// 更新視圖
	
	::GlobalUnlock((HGLOBAL) pDoc->GetHDIB());
	EndWaitCursor();	
}

void CEARView::OnPointLiner() 
{
	// TODO: Add your command handler code here
	// 線性變換

	CEARDoc* pDoc = GetDocument();
		
	LPSTR lpDIB;				// 指向DIB的指針	
	LPSTR    lpDIBBits;			// 指向DIB象素指針	
	CLinerParaDlg dlgPara;		// 創建對話框	
	FLOAT fA;					// 線性變換的斜率	
	FLOAT fB;					// 線性變換的截距
	
	lpDIB = (LPSTR) ::GlobalLock((HGLOBAL) pDoc->GetHDIB());
	// 找到DIB圖像象素起始位置
	lpDIBBits = pDoc->GetDibImage()->FindDIBBits(lpDIB);
	
	// 判斷是否是8-bpp位圖（這里為了方便，只處理8-bpp位圖的線性變換，其它的可以類推）
	if (pDoc->GetDibImage()->DIBNumColors(lpDIB) != 256)
	{
		MessageBox("目前只支持256色位圖的線性變換！", "系統提示" , 
			MB_ICONINFORMATION | MB_OK);
		::GlobalUnlock((HGLOBAL) pDoc->GetHDIB());

		return;
	}
	
	dlgPara.m_fA = 2.0;
	dlgPara.m_fB = -128.0;