//Callback.cpp
////////////////////////////////////////////////////
#include "stdafx.h"
#include "SanQi.h"
#include "MainFrm.h"

#include "Callback.h"
/////////////////////////////////////////////////////
extern CSanQiApp theApp;
/////////////////////////////////////////////////////
/////////////////////////////////////////////////////
//回調函數(業務管理)
BOOL CALLBACK CB_CloseWindow(DWORD dwFuncID /*= 0*/)
{
	AFX_MANAGE_STATE(AfxGetStaticModuleState());
	CMainFrame*	pMainFrame = (CMainFrame*)theApp.m_pMainWnd;
	if( (NULL != pMainFrame) && (::IsWindow(pMainFrame->m_hWnd)) )
	{
		::PostMessage(pMainFrame->m_hWnd, WM_CLOSE, dwFuncID, dwFuncID);
	}

	return TRUE;
}
/////////////////////////////////////////////////////////
CB_FUNCTION m_pExitInstance = NULL;
/////////////////////////////////////////////////////////
#ifdef _USRDLL
//接口函數
DLLENTRY BOOL CB_SetCallbackFunc(CB_FUNCTION cbFunc, DWORD dwFuncID /*= 0*/)
{
	m_pExitInstance = cbFunc;

	return TRUE;
}

DLLENTRY BOOL CB_ExitApplication(DWORD dwExitCode /*= 0*/)
{
	AFX_MANAGE_STATE(AfxGetStaticModuleState());
	CMainFrame*	pMainFrame = (CMainFrame*)theApp.m_pMainWnd;
	if( (NULL != pMainFrame) && (::IsWindow(pMainFrame->m_hWnd)) )
	{
		::PostMessage(pMainFrame->m_hWnd, WM_CLOSE, dwExitCode, dwExitCode);
	}

	return TRUE;
}
#endif

/////////////////////////////////////////////////////
//全局函數
void CloseMainWindow(UINT nModual)
{
	if( DLL_MODUAL == nModual )
	{
		if( NULL != m_pExitInstance )
		{
			m_pExitInstance((DWORD)WM_CLOSE);
		}
	}

#ifndef _USRDLL
	else if( EXE_MODUAL == nModual )
	{
		theApp.ExitApplication();
	}
#endif

	else {}
}

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

////////////////////////////////////////////////////
CCallBackFuncImpl::CCallBackFuncImpl()
{
	InitLibInstance();
}

CCallBackFuncImpl::~CCallBackFuncImpl()
{
	if( NULL != m_hLibInstance)
	{
		FreeLibrary(m_hLibInstance);
		m_hLibInstance = NULL;
	}
}

void CCallBackFuncImpl::InitLibInstance()
{
	m_hLibInstance = NULL;

	m_pSetCallbackFunc = NULL;
	m_pExitApplication = NULL;
}

//檢查 DLL 文件是否存在。注意: 必須首先調用它進行檢查 DLL 文件是否存在
BOOL CCallBackFuncImpl::CheckLibInstance(char *szDLLPathName)
{
	if(strcmp(szDLLPathName,"") == 0)
	{
		return FALSE;
	}

	m_hLibInstance = LoadLibrary((char *)szDLLPathName);
	BOOL bLoadSuc = ( NULL != m_hLibInstance);

	if( bLoadSuc )
	{
		strcpy(m_szDLLPathName,szDLLPathName);
	}
	else
	{
		memset(m_szDLLPathName,0,sizeof(m_szDLLPathName));
		strcpy(m_szDLLPathName,"");
	}

	return bLoadSuc;
}

FARPROC CCallBackFuncImpl::GetLibInstance(const char *szProcName)
{
	if(NULL == m_hLibInstance)
	{
#if 0
		if(strcmp(m_szDLLPathName,"") == 0)
		{
			return NULL;
		}

		m_hLibInstance = LoadLibrary((char *)m_szDLLPathName);
#endif
		if(NULL == m_hLibInstance)
		{
			char szMessage[256];
			sprintf(szMessage, "Load Library  \" %s \"  failed!", m_szDLLPathName);
			::MessageBox(NULL, szMessage, "Error", MB_OK|MB_ICONSTOP);

			return NULL;
		}		
	}	

	FARPROC pLibInstance = (FARPROC)GetProcAddress(m_hLibInstance,szProcName);
	if( NULL == pLibInstance)
	{
		::MessageBox(NULL,"GetProcAddress(...) failed!",
					 "Error",MB_OK|MB_ICONSTOP);

		return NULL;
	}	
	
	return pLibInstance;
}

BOOL CCallBackFuncImpl::SetCallbackFunction(CB_FUNCTION cbFunction, 
											DWORD dwFuncID /*= 0*/)
{
	if( NULL == m_pSetCallbackFunc )
	{
		m_pSetCallbackFunc = 
		  (SetCallbackFunc)GetLibInstance(szCB_SetCallbackFunc);
		if( NULL == m_pSetCallbackFunc )
		{
			return FALSE;
		}
	}
	
	BOOL bResult = m_pSetCallbackFunc(cbFunction, dwFuncID);

	return bResult;
}

BOOL CCallBackFuncImpl::ExitInstance(DWORD dwExitCode /* = 0 */)
{
	if( NULL == m_pExitApplication )
	{
		m_pExitApplication = 
		  (ExitApplication)GetLibInstance(szCB_ExitApplication);
		if( NULL == m_pExitApplication )
		{
			return FALSE;
		}
	}
	
	BOOL bResult = m_pExitApplication(dwExitCode);

	return bResult;
}