// BMP.cpp: implementation of the BMP class.
//
//////////////////////////////////////////////////////////////////////

#include "stdafx.h"
#include "BMP.h"
#ifdef _DEBUG
#undef THIS_FILE
static char THIS_FILE[]=__FILE__;
#define new DEBUG_NEW
#endif

//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////

BMP::BMP()
{
    m_nHeight    = 0;
	m_nWidth     = 0;
	m_nFileSize  = 0;
	m_nScanWidth = 0;
	m_nColorBits = 0;
	m_pDib       = NULL;
	m_pDibBits   = NULL;
}

BMP::~BMP()
{

	
}

int WIDTHBYTES(int Width)
{
	return ((Width+31)/32*4);
}

BOOL BMP::LoadImage(CString FileName)
{
    /**************
    BITMAPFILEHEADER          |  (14 byte)
	------------------------
  + BITMAPINFOHEADER (40 byte)|
  + Palette          (4  byte)|  BITMAPINFO(44 byte)
	***************/

	int test1 =sizeof(BITMAPINFOHEADER);  //40
	int test2 = sizeof(BITMAPFILEHEADER); //14
	int test3 = sizeof(LOGPALETTE);       //8
	int test4 = sizeof(PALETTEENTRY);     //4
	int test5 = sizeof(RGBQUAD);          //4
	int test7 = sizeof(LOGPALETTE);       ///8
    int test8 = sizeof(BITMAPINFO);      //44
	/******************/
	
	m_sFilePath = FileName;
	CFile file(m_sFilePath,CFile::modeRead);
	m_sFilePath = file.GetFilePath();
	m_sFileName = file.GetFileName();
	m_sFilePath = m_sFilePath.Left(m_sFilePath.GetLength()-m_sFileName.GetLength());
	file.Close();
    
    //創建文件句柄
	HANDLE hFile = ::CreateFile(FileName,GENERIC_READ,FILE_SHARE_READ,NULL,
		                 OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
    ASSERT(hFile != INVALID_HANDLE_VALUE);
	
	
	
	
	//獲取文件大小
	m_nFileSize = GetFileSize(hFile,NULL);
	m_pDib = new unsigned char[m_nFileSize];
	ASSERT(m_pDib != NULL);

	//讀圖像
	unsigned long WriteNum;
	ReadFile(hFile,m_pDib,m_nFileSize,&WriteNum,NULL);
	ASSERT(m_nFileSize == (long)WriteNum);
	CloseHandle(hFile);
/////////////////////////////////////////////////
    //獲取圖象信息
	/*BITMAPFILEHEADER *pBFH; //圖象文件頭
	BITMAPINFOHEADER *pBIH; //圖象信息頭
	unsigned char *pPixel;
	unsigned char *pFirst = m_pDib;
	pBFH = (BITMAPFILEHEADER *)pFirst;
	pFirst += sizeof(BITMAPFILEHEADER);
	pBIH = (BITMAPINFOHEADER *)pFirst;
	pFirst += sizeof(BITMAPINFOHEADER);
	//獲取圖象的實際象素值
 
	pPixel = pFirst + 256*sizeof(RGBQUAD);
    // pPixel = pFirst;
	BYTE  gray1 =pPixel[0];
	long lWidth = pBIH->biWidth;
	long lHeight = pBIH->biHeight;*/
	
	




//////////////////////////////////////////////
    //獲取文件頭和文件信息頭
	//(1)指針指向文件的頭
	unsigned char *pDib = (unsigned char *)m_pDib;  
	BITMAPFILEHEADER *pFileHeader = (BITMAPFILEHEADER * )pDib;
	if(pFileHeader->bfType != 'MB')
	{
		AfxMessageBox("文件類型有誤,無法打開,請重新選擇");
		return FALSE;
	}
	//（2）指向BITMAPFILEHEADER的末尾
	pDib += sizeof(BITMAPFILEHEADER);

	BITMAPINFOHEADER *pInfoHeader = (BITMAPINFOHEADER * )pDib;
	
	//初始化成員數據
    m_nHeight    = pInfoHeader->biHeight;
	m_nWidth     = pInfoHeader->biWidth ;
	m_nScanWidth = WIDTHBYTES(m_nWidth*pInfoHeader->biBitCount);
	m_nColorBits = pInfoHeader->biBitCount;
	//（3）指向BITMAPINFOHEADER的末尾
	pDib        += sizeof(BITMAPINFOHEADER);
	int ColorNumber = 1<<m_nColorBits;           //圖像的顏色數圖像的顏色數pow(2,m_nColorBits)
	RGBQUAD *pPaletteInfo = (RGBQUAD*)pDib;
	if( m_Palette.GetSafeHandle() != NULL )     //刪除現有的調色板信息
		m_Palette.DeleteObject();

	if( m_nColorBits == 24 )                        //真彩色圖像，無調色板
	{
		m_pDibBits = pDib;

		BYTE GRAY1 =  m_pDibBits[0];
		return TRUE;                     //退出函數，不執行席面的操作
	} 
	//否則設置調色板（對于8位）

	LOGPALETTE *pLogPal = (LOGPALETTE *) new char[sizeof(LOGPALETTE)+
		ColorNumber * sizeof(PALETTEENTRY)];
	if( pLogPal != NULL )
	{
		pLogPal->palVersion    = 0x300;
		pLogPal->palNumEntries = ColorNumber;
		for( int i = 0; i < ColorNumber; i++ )
		{
			pLogPal->palPalEntry[i].peRed   = pPaletteInfo[i].rgbRed;					
			pLogPal->palPalEntry[i].peGreen = pPaletteInfo[i].rgbGreen;					
			pLogPal->palPalEntry[i].peBlue  = pPaletteInfo[i].rgbBlue;

			//初始化調色板數組
			m_nPalette[i][0] = pPaletteInfo[i].rgbBlue;
			m_nPalette[i][1] = pPaletteInfo[i].rgbGreen;
			m_nPalette[i][2] = pPaletteInfo[i].rgbRed;
		}
		m_Palette.CreatePalette( pLogPal );
		delete [] pLogPal;
	}
	//(4)指向位圖數據(Palette的末尾)
	
	m_pDibBits = pDib + ColorNumber * sizeof(RGBQUAD);

	//BYTE gray = m_pDibBits[0];

    /**************
      m_pDib--> BITMAPFILEHEADER
				----------------------
                BITMAPINFOHEADER
                Palette
				------------------------
  m_pDibBits--> Data

	***************/

	return TRUE;
}

BOOL BMP::SaveImage(CString FileName)
{
    if( m_pDibBits == NULL )
	{
		AfxMessageBox("還沒有打開文件，請先載入一幅圖像再保存!",0,0);
		return( FALSE );
	}
	HANDLE hFile = ::CreateFile(FileName,GENERIC_WRITE,FILE_SHARE_WRITE,NULL,
		                 CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,NULL);
	if(hFile == NULL)
	{
		AfxMessageBox("無法創建文件.",0,0);
		CloseHandle(hFile);
		hFile = NULL;
		return FALSE;
	}

	unsigned long WriteNum;
	WriteFile(hFile,m_pDib,m_nFileSize,&WriteNum,NULL);
	if(WriteNum != (unsigned long)m_nFileSize)
		 return FALSE;

	CloseHandle(hFile);
	return TRUE;
	return TRUE;
}

BOOL BMP::Draw(CDC *pDC, int nX, int nY, int nWidth, int nHeight)
{
	if( m_Palette.GetSafeHandle() != NULL )
	{
		// 選擇調色板，實現調色板并保存舊的調色板
		CPalette *pOldPalette;
		pOldPalette = pDC->SelectPalette( &m_Palette, FALSE );
		pDC->RealizePalette();
		pDC->SelectPalette( pOldPalette, FALSE );
	}
	//調用StrechDibBits繪圖
	if( nWidth == -1 )
		nWidth = m_nWidth;
	if( nHeight == -1 )
		nHeight = m_nHeight;
	//使用拉伸模式使彩色圖像顯示時的彩色效果最好
	::SetStretchBltMode(pDC->m_hDC, COLORONCOLOR);
	StretchDIBits( pDC->m_hDC, nX, nY, nWidth, nHeight, 0, 0,		         	           	
		           m_nWidth, m_nHeight, m_pDibBits,
		           (BITMAPINFO *)(m_pDib + sizeof(BITMAPFILEHEADER)),		
		           BI_RGB, SRCCOPY );	
	return TRUE;

}

int BMP::GetImageWidth()
{
  return m_nWidth;
}

int BMP::GetImageHeight()
{
  return m_nHeight;
}


int BMP::GetImageBits()
{
   return m_nColorBits;
}

BOOL BMP::GetPixel(int i, int j, COLORREF &Value)
{
   if( (i < 0)||(i>=m_nHeight)||(j<0)||(j>=m_nWidth) )
		return FALSE;
	if(m_nColorBits == 24)
	{
		BYTE *pData = m_pDibBits + (m_nHeight-1-i)*m_nScanWidth + j*3;
		Value = RGB(pData[2], pData[1], pData[0]);
	}
	else if( m_nColorBits == 8 )
	{
		BYTE *pData = m_pDibBits + (m_nHeight-1-i)*m_nScanWidth + j;
		Value = RGB( *pData, *pData, *pData );
	}
	return TRUE;
}

BOOL BMP::SetPixel(int i, int j, COLORREF Value)
{
   	if( (i < 0)||(i>=m_nHeight)||(j<0)||(j>=m_nWidth) )
		return FALSE;
	if( m_nColorBits == 24 )
	{
		 BYTE *pData = m_pDibBits + (m_nHeight-1-i)*m_nScanWidth + j*3;
		 pData[0] = GetBValue(Value);
		 pData[1] = GetGValue(Value);
		 pData[2] = GetRValue(Value);
	}
	else if( m_nColorBits == 8 )
	{
		BYTE *pData = m_pDibBits + (m_nHeight-1-i)*m_nScanWidth + j;
		*pData = GetBValue(Value);
	}
	return TRUE;
}

CString BMP::GetFileName()
{
   	return m_sFileName;
}

CString BMP::GetFilePath()
{
  	return m_sFilePath;
}



int BMP::ConvolutionPixel8(int i, int j, int Values[][9], int nSize, int Division, int Offset)
{
    int gray = 0;
	int cof=0; int size=0;
	for(int m=0;m<nSize;m++)
	{
		for(int n=0;n<nSize;n++)
		{
			COLORREF c;
			if(GetPixel(i-nSize/2+m,j-nSize/2+n,c))
			{
				gray += (Values[m][n] *GetBValue(c));
				cof += Values[m][n];
				size ++;
			}
		}//end n
	}//end m
	if(cof <0)  //如果系數小于0，取原值
	{ 
		COLORREF c;
		GetPixel(i,j,c);
		gray =GetBValue(c);
	}
	else if(size <nSize*nSize)
	{
		if(cof == 0) cof =1;
		gray = min(gray/cof +Offset,255);
	}
	else gray = min(gray/Division + Offset,255);
	//把變換的結果保存到新建的數組中
	gray = max(0,gray);
    return gray;
}


float BMP::ConvolutionPixel8f(int i, int j, int Values[][9], int nSize, int Division, int Offset)
{
	float gray = 0;
	float cof=0; int size=0;
	for(int m=0;m<nSize;m++)
	{
		for(int n=0;n<nSize;n++)
		{
			COLORREF c;
			if(GetPixel(i-nSize/2+m,j-nSize/2+n,c))
			{
				gray += (Values[m][n] *GetBValue(c));
				cof += Values[m][n];
				size ++;
			}
		}//end n
	}//end m
	if(cof <0)  //如果系數小于0，取原值
	{ 
		COLORREF c;
		GetPixel(i,j,c);
		gray = GetBValue(c);
	}
	else if(size <nSize*nSize)
	{
		if(cof == 0) cof =1;
		gray = (float)(gray/cof +Offset);
	}
	else gray = float(gray/(float)Division + Offset);
	//把變換的結果保存到新建的數組中
    return gray;

}
void BMP::ConvertDIB8(int Values[][9], int nSize, int Division, int Offset)
{
   	int Width    =  GetImageWidth();
	int Height   =  GetImageHeight();
	int ColorBits = GetImageBits();
	int WidthBytes = WIDTHBYTES(Width*ColorBits);
	//開辟與圖象同樣大小的數組，用于保存圖象結果
	unsigned char *pDibBits = new unsigned char[WidthBytes*Height];
	for(int i = 0 ;i < Height; i++)
	{
		for(int j = 0;j < Width; j++)
		{
			//計算第i行，第j列象素的新值
			int gray = ConvolutionPixel8(i,j,Values,nSize,Division,Offset);
			BYTE *pData = pDibBits + (Height-i-1)*WidthBytes+j;
			*pData = gray;
		}
	}
	//賦值
	for(i=0;i<Height*WidthBytes;i++)