//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "AppGlobalF.h"
//#include "ITSDbF.h"
//#include "ITSUtilF.h"
//#include "CDSCodeF.h"
#include <inifiles.hpp>

//---------------------------------------------------------------------------

#pragma package(smart_init)

//---------------------------------------------------------------------------
int              g_nPid    = -1;        // Application Process ID
String           g_sAppDir = "";        // Application Directory
String           g_sAppName= "";        // Program name
String           g_sCfgDir = "";        // Config File Directory
String           g_sLogDir = "";        // Program Log Directory
String           g_sTempDir  = "";      // Program Temp Directory
String           g_sFormsDir = "";      // Program Forms Directory
String           g_sBlackBox = "";
String           g_sLangDir = "";
String           g_sImageDir = "";
String           g_sVideoDir = "";
String           g_sMapDir = "";

APP_CONFIG       g_AppCfg;

LOG_INFO         g_LogCfg;
TITSLog         *ITSLog = NULL;
String           g_sLang = "kr";
String           g_IniFileDir = "";
String           g_IniFileName = "Option";
bool g_bControlAuth = true;
//---------------------------------------------------------------------------


bool CheckApplicationParam() {
    int nArgs = ParamCount();
    if (nArgs < 2) {
        return false;
    }

    g_AppCfg.MAGIC_ID = ParamStr(1);
    if (g_AppCfg.MAGIC_ID.UpperCase() != "ICAIR") {
        return false;
    }

    g_AppCfg.OPER_ID = ParamStr(2);
    g_AppCfg.OPER_ID = g_AppCfg.OPER_ID.SubString(1, 10);
    g_AppCfg.PRCS_ID = DEFAULT_PRCS_ID;
    g_AppCfg.PARAM1  = "";
    g_AppCfg.PARAM2  = "";
    g_AppCfg.PARAM3  = "";
    g_AppCfg.PARAM4  = "";

    if (nArgs >= 3) {
        g_AppCfg.PRCS_ID = ParamStr(3);
    }

    if (nArgs >= 4) {
        g_AppCfg.PARAM1 = ParamStr(4);
    }
    if (nArgs >= 5) {
        g_AppCfg.PARAM2 = ParamStr(5);
    }
    if (nArgs >= 6) {
        g_AppCfg.PARAM3 = ParamStr(6);
    }
    if (nArgs >= 7) {
        g_AppCfg.PARAM4 = ParamStr(7);
    }

    return true;
}
//---------------------------------------------------------------------------

void ActiveProgram(String AClassName, String ATitle) {
    //String AClassName = "TFrmVmsFormEdit";
    //String ATitle = g_AppCfg.sTitle + " - Active";
	HWND hExeForm = FindWindow(AClassName.c_str(), ATitle.c_str());
	if (hExeForm)
	{
		bool bResult = SetWindowPos(hExeForm, HWND_TOP, 0, 0, 0, 0, SWP_SHOWWINDOW | SWP_NOSIZE | SWP_NOMOVE);
        if (bResult) {
            bResult = ShowWindow(hExeForm, SW_RESTORE);
            SetForegroundWindow(hExeForm);
        }
	}
}
//---------------------------------------------------------------------------

bool ApplicationSingleRun(String AClassName, String ATitle) {
    HANDLE hMutex;
	try
	{
        String sLockFile = ChangeFileExt(ExtractFileName(Application->ExeName), ".lock");
        String sProgMutexNm = "ICAIR_" + sLockFile;
        if ((hMutex=OpenMutex(MUTEX_ALL_ACCESS, false, sProgMutexNm.c_str()))==NULL)
            hMutex = CreateMutex(NULL, true, sProgMutexNm.c_str());
        else
        {
            ActiveProgram(AClassName, ATitle);
            return false;
        }
    }
    catch (Exception &exception)
    {
        Application->ShowException(&exception);
        return false;
    }
    return true;
}

//---------------------------------------------------------------------------

#include <windows.h>
#include <shlwapi.h>
#pragma comment (lib, "shlwapi.lib")
bool IsDirectoryExists(LPCTSTR path)
{
    return PathFileExists(path);
#if 0
    struct _stat buffer;
    int          iRetTemp = 0;

    memset((void*)&buffer, 0, sizeof(buffer));
    iRetTemp = _stat(path, &buffer);
    if (iRetTemp == 0)
    {
        if (buffer.st_mode & _S_IFDIR)
        {
            return true;
        }
    }
    return false;
#endif
}
//---------------------------------------------------------------------------
void LoadIcon(TIniFile* AIniFile, String ASection, String AItem, String& AValue)
{
    try {
        AValue = AIniFile->ReadString(ASection, AItem, "");
        if (AValue == "") {
            AValue = "vmscam.bmp";
        }
        if (AValue != "") {
            AValue = g_sAppDir + "Image\\" + AValue;
            if (!FileExists(AValue)) AValue = "";
        }
    }
    catch(Exception &e)
    {
    }
}
//---------------------------------------------------------------------------

bool LoadDefaultConfigInfo(String ACfgFile/*=""*/)
{
    String   sCfgFile;
    TIniFile *pIniFile = NULL;

    String sIniFile = ACfgFile + ".ini";
    sCfgFile = g_sCfgDir + sIniFile;
    g_AppCfg.sConfigFile = sCfgFile;

    pIniFile = new TIniFile(sCfgFile);

    try
    {
        g_AppCfg.sLang = "en";
        g_sLang = g_AppCfg.sLang;

        g_AppCfg.sTitle       = pIniFile->ReadString("APPLICATION", "TITLE",     "교통정보시스템 통합 운영단말");
        g_AppCfg.sProcessId   = pIniFile->ReadString("APPLICATION", "PROCESSID", "OPER01");
        g_AppCfg.sLogDay      = pIniFile->ReadString("APPLICATION", "LOGDAY",    "");
        g_AppCfg.sAppPath     = pIniFile->ReadString("APPLICATION", "APP_PATH",  "");

        g_AppCfg.sSkinName    = pIniFile->ReadString("APPLICATION", "SKINNAME",    "Blue");
        g_AppCfg.bSaveForm    = pIniFile->ReadString("APPLICATION", "SAVEFORM",    "1").ToIntDef(1) == 1 ? true : false;
        g_AppCfg.bLoginPrompt = pIniFile->ReadString("APPLICATION", "LOGINPROMPT", "1").ToIntDef(1) == 1 ? true : false;
        g_AppCfg.bDebug       = pIniFile->ReadString("APPLICATION", "DEBUG",       "0").ToIntDef(0) == 1 ? true : false;
        g_AppCfg.sDefUseId    = pIniFile->ReadString("APPLICATION", "LASTUSER",    "");

        g_AppCfg.sLang = pIniFile->ReadString("APPLICATION", "LANGUAGE", "kr").LowerCase();
        if (g_AppCfg.sLang != "en" && g_AppCfg.sLang != "kr") g_AppCfg.sLang = "kr";


        g_AppCfg.itsdb.bSqlLog     = pIniFile->ReadString("ITSDB", "SQLLOG",     "0").ToIntDef(0) == 1 ? true : false;
        g_AppCfg.itsdb.sConnectStr = pIniFile->ReadString("ITSDB", "CONNECTSTR", "");
        if (g_AppCfg.itsdb.sConnectStr == "")
        {
            g_AppCfg.itsdb.sProvider   = pIniFile->ReadString("ITSDB", "PROVIDER",   "OraOLEDB.Oracle.1");
            g_AppCfg.itsdb.sServerName = pIniFile->ReadString("ITSDB", "SERVERNAME", "HANTE");
            g_AppCfg.itsdb.sUserName   = pIniFile->ReadString("ITSDB", "USERNAME",   "hnits");
            g_AppCfg.itsdb.sPassword   = pIniFile->ReadString("ITSDB", "PASSWORD",   "hnits");
        }

        //영상미표출시 대체이미지
        LoadIcon(pIniFile, "APPLICATION", "CMRA_EMPTY_IMG", g_AppCfg.sEmptyImg);
    }
    __finally
    {
        if (pIniFile) delete pIniFile;
        pIniFile = NULL;
        //WriteConfigInfo(g_AppCfg.sConfigFile, "AUTOLOGOUT", "LOGOUTEXIT", "0");
    }

    return true;
}
//---------------------------------------------------------------------------
/*
 * 환경설정 정보를 저장하는 함수.
 *  arguments
 *      String : RegisterKey 또는 파일이름
 *  return
 *      bool : 실패하면 false
 */
bool WriteConfigInfo(String sCfgFile, String sTitle, String sItem, String sValue)
{
	String	 ConfigFile;
	TIniFile *pIniFile = NULL;

    ConfigFile = sCfgFile;

    try
    {
        pIniFile = new TIniFile(ConfigFile);
        if (pIniFile == NULL)
        {
            return false;
        }

        pIniFile->WriteString(sTitle, sItem, sValue);
    }
    catch(...)
    {
    }

    if (pIniFile)
    {
        pIniFile->Free();
        pIniFile = NULL;
    }

	return true;
}
//---------------------------------------------------------------------------

/*
 * 환경설정 정보를 읽어오는 함수.
 *  arguments
 *      String : RegisterKey 또는 파일이름
 *  return
 *      bool : 실패하면 false
 */
bool ReadConfigInfo(String sCfgFile, String sTitle, String sItem, String &sValue)
{
    bool     bRes;
	String   ConfigFile;
	TIniFile *pIniFile = NULL;

    bRes = false;

    ConfigFile = sCfgFile;

    try
    {
        pIniFile = new TIniFile(ConfigFile);
        if (pIniFile == NULL)
        {
            return bRes;
        }

        sValue = pIniFile->ReadString(sTitle, sItem, "");
        if (sValue != "")
        {
            bRes = true;
        }
    }
    catch(...)
    {
    }

    if (pIniFile)
    {
        pIniFile->Free();
        pIniFile = NULL;
    }

	return bRes;
}
//---------------------------------------------------------------------------

void ShowErrorMsg(String ATitle, String AErrMsg)
{
    Application->NormalizeTopMosts();
    Application->MessageBox(AErrMsg.c_str(), ATitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
    Application->RestoreTopMosts();
}
//----------------------------------------------------------------------------

ULONG ProcIDFromWnd(HWND hwnd) // 윈도우 핸들로 프로세스 아이디 얻기
{
  ULONG idProc;
  GetWindowThreadProcessId( hwnd, &idProc );
  return idProc;
}
//----------------------------------------------------------------------------

HWND GetWinHandle(ULONG pid) // 프로세스 아이디로 윈도우 핸들 얻기
{
  HWND tempHwnd = FindWindow(NULL,NULL); // 최상위 윈도우 핸들 찾기

  while( tempHwnd != NULL )
  {
    if( GetParent(tempHwnd) == NULL ) // 최상위 핸들인지 체크, 버튼 등도 핸들을 가질 수 있으므로 무시하기 위해
      if( pid == ProcIDFromWnd(tempHwnd) )
        return tempHwnd;
    tempHwnd = GetWindow(tempHwnd, GW_HWNDNEXT); // 다음 윈도우 핸들 찾기
  }
  return NULL;
}
//----------------------------------------------------------------------------