// ch1_1Doc.cpp : implementation of the CCh1_1Doc class
//

#include "stdafx.h"
#include "ch1_1.h"

#include "ch1_1Doc.h"

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

/////////////////////////////////////////////////////////////////////////////
// CCh1_1Doc

IMPLEMENT_DYNCREATE(CCh1_1Doc, CDocument)

BEGIN_MESSAGE_MAP(CCh1_1Doc, CDocument)
	//{{AFX_MSG_MAP(CCh1_1Doc)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CCh1_1Doc construction/destruction

CCh1_1Doc::CCh1_1Doc()
{
	// 默認背景色，灰色
	m_refColorBKG = 0x00808080;	
	
	// 初始化變量
	m_hDIB = NULL;
	m_palDIB = NULL;
	m_sizeDoc = CSize(1,1);
}

CCh1_1Doc::~CCh1_1Doc()
{
	// 判斷DIB對象是否存在
	if (m_hDIB != NULL)
	{
		// 清除DIB對象
		::GlobalFree((HGLOBAL) m_hDIB);
	}
	
	// 判斷調色板是否存在
	if (m_palDIB != NULL)
	{
		// 清除調色板
		delete m_palDIB;
	}
}

BOOL CCh1_1Doc::OnNewDocument()
{
	if (!CDocument::OnNewDocument())
		return FALSE;

	// TODO: add reinitialization code here
	// (SDI documents will reuse this document)

	return TRUE;
}

/////////////////////////////////////////////////////////////////////////////
// CCh1_1Doc diagnostics

#ifdef _DEBUG
void CCh1_1Doc::AssertValid() const
{
	CDocument::AssertValid();
}

void CCh1_1Doc::Dump(CDumpContext& dc) const
{
	CDocument::Dump(dc);
}
#endif //_DEBUG

/////////////////////////////////////////////////////////////////////////////
// CCh1_1Doc commands

BOOL CCh1_1Doc::CanCloseFrame(CFrameWnd* pFrame) 
{
	// TODO: Add your specialized code here and/or call the base class
	
	return CDocument::CanCloseFrame(pFrame);
}

void CCh1_1Doc::DeleteContents() 
{
	// TODO: Add your specialized code here and/or call the base class
	
	CDocument::DeleteContents();
}

BOOL CCh1_1Doc::OnOpenDocument(LPCTSTR lpszPathName) 
{
	CFile file;
	CFileException fe;

	// 打開文件
	if (!file.Open(lpszPathName, CFile::modeRead | CFile::shareDenyWrite, &fe))
	{
		// 失敗
		ReportSaveLoadException(lpszPathName, &fe,
			FALSE, AFX_IDP_FAILED_TO_OPEN_DOC);
		
		// 返回FALSE
		return FALSE;
	}
	
	DeleteContents();
	
	// 更改光標形狀
	BeginWaitCursor();
	
	// 嘗試調用ReadDIBFile()讀取圖像
	TRY
	{
		m_hDIB = ::ReadDIBFile(file);
	}
	CATCH (CFileException, eLoad)
	{
		// 讀取失敗
		file.Abort();
		
		// 恢復光標形狀
		EndWaitCursor();
		
		// 報告失敗
		ReportSaveLoadException(lpszPathName, eLoad,
			FALSE, AFX_IDP_FAILED_TO_OPEN_DOC);
		
		// 設置DIB為空
		m_hDIB = NULL;
		
		// 返回FALSE
		return FALSE;
	}
	END_CATCH
	
	// 初始化DIB
	InitDIBData();
	
	// 恢復光標形狀
	EndWaitCursor();
	
	// 判斷讀取文件是否成功
	if (m_hDIB == NULL)
	{
		// 失敗，可能非BMP格式
		CString strMsg;
		strMsg = "讀取圖像時出錯！可能是不支持該類型的圖像文件！";
		
		// 提示出錯
		MessageBox(NULL, strMsg, "系統提示", MB_ICONINFORMATION | MB_OK);
		
		// 返回FALSE
		return FALSE;
	}
	
	// 設置文件名稱
	SetPathName(lpszPathName);
	
	// 初始化脹標記為FALSE
	SetModifiedFlag(FALSE);
	
	// 返回TRUE
	return TRUE;
}


BOOL CCh1_1Doc::OnSaveDocument(LPCTSTR lpszPathName) 
{
	CFile file;
	CFileException fe;

	// 打開文件
	if (!file.Open(lpszPathName, CFile::modeCreate |
	  CFile::modeReadWrite | CFile::shareExclusive, &fe))
	{
		// 失敗
		ReportSaveLoadException(lpszPathName, &fe,
			TRUE, AFX_IDP_INVALID_FILENAME);
		
		// 返回FALSE
		return FALSE;
	}

	// 嘗試調用SaveDIB保存圖像
	BOOL bSuccess = FALSE;
	TRY
	{
		
		// 更改光標形狀
		BeginWaitCursor();

		// 嘗試保存圖像
		bSuccess = ::SaveDIB(m_hDIB, file);

		// 關閉文件
		file.Close();
	}
	CATCH (CException, eSave)
	{
		// 失敗
		file.Abort();
		
		// 恢復光標形狀
		EndWaitCursor();
		ReportSaveLoadException(lpszPathName, eSave,
			TRUE, AFX_IDP_FAILED_TO_SAVE_DOC);
		
		// 返回FALSE
		return FALSE;
	}
	END_CATCH

	// 恢復光標形狀
	EndWaitCursor();
	
	// 重置脹標記為FALSE
	SetModifiedFlag(FALSE);

	if (!bSuccess)
	{
		// 保存失敗，可能是其它格式的DIB，可以讀取但是不能保存
		// 或者是SaveDIB函數有誤

		CString strMsg;
		strMsg = "無法保存BMP圖像！";
		
		// 提示出錯
		MessageBox(NULL, strMsg, "系統提示", MB_ICONINFORMATION | MB_OK);
	}
	
	return bSuccess;
}

void CCh1_1Doc::ReplaceHDIB(HDIB hDIB)
{
	// 替換DIB，在功能粘貼中用到該函數
	
	// 判斷DIB是否為空
	if (m_hDIB != NULL)
	{
		// 非空，則清除
		::GlobalFree((HGLOBAL) m_hDIB);
	}

	// 替換成新的DIB對象
	m_hDIB = hDIB;
	
}

void CCh1_1Doc::InitDIBData()
{
	// 初始化DIB對象

	// 判斷調色板是否為空
	if (m_palDIB != NULL)
	{
		// 刪除調色板對象
		delete m_palDIB;

		// 重置調色板為空
		m_palDIB = NULL;
	}
	
	// 如果DIB對象為空，直接返回
	if (m_hDIB == NULL)
	{
		// 返回
		return;
	}
	
	LPSTR lpDIB = (LPSTR) ::GlobalLock((HGLOBAL) m_hDIB);
	
	// 判斷圖像是否過大
	if (::DIBWidth(lpDIB) > INT_MAX ||::DIBHeight(lpDIB) > INT_MAX)
	{
		::GlobalUnlock((HGLOBAL) m_hDIB);
		
		// 釋放DIB對象
		::GlobalFree((HGLOBAL) m_hDIB);
		
		// 設置DIB為空
		m_hDIB = NULL;
		
		CString strMsg;
		strMsg = "BMP圖像太大！";
		
		// 提示用戶
		MessageBox(NULL, strMsg, "系統提示", MB_ICONINFORMATION | MB_OK);
		
		// 返回
		return;
	}
	
	// 設置文檔大小
	m_sizeDoc = CSize((int) ::DIBWidth(lpDIB), (int) ::DIBHeight(lpDIB));
	
	::GlobalUnlock((HGLOBAL) m_hDIB);
	
	// 創建新調色板
	m_palDIB = new CPalette;
	
	// 判斷是否創建成功
	if (m_palDIB == NULL)
	{
		// 失敗，可能是內存不足
		::GlobalFree((HGLOBAL) m_hDIB);
		
		// 設置DIB對象為空
		m_hDIB = NULL;
		
		// 返回
		return;
	}
	
	// 調用CreateDIBPalette來創建調色板
	if (::CreateDIBPalette(m_hDIB, m_palDIB) == NULL)
	{
		// 返回空，可能該DIB對象沒有調色板
		
		// 刪除
		delete m_palDIB;
		
		// 設置為空
		m_palDIB = NULL;
		
		// 返回
		return;
	}
}