ITS_OP/VmsOprMain/PLUGIN/99.LOGIN/FRMPswdChngeF.cpp

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

#include <vcl.h>
#include "AppGlobalF.h"
#include "ITSUtilF.h"
#include "ITSDbF.h"
#include "EncryptionF.h"
#pragma hdrstop

#include "FrmPswdChngeF.h"
#include "FrmLoginF.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxButtons"
#pragma link "cxGraphics"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinsCore"
#pragma link "dxSkinMcSkin"
#pragma resource "*.dfm"
TFRMPswdChnge *FRMPswdChnge = NULL;
//---------------------------------------------------------------------------
__fastcall TFRMPswdChnge::TFRMPswdChnge(TComponent* Owner)
    : TForm(Owner)
{
    //ITSSkin_Load(this);
}
//---------------------------------------------------------------------------

/*
 * 사용자가 비밀번호 변경을 요청함.
 *  parameter
 *  return
 *
 */
void __fastcall TFRMPswdChnge::btnPswdChngeClick(TObject *Sender)
{
    if (!ValidateInputField())
        return;

    int nRes;
    nRes = FRMLogin->GetUserPassword(EdUserID->Text, EdPswd->Text);
    if (LOGIN_DB_ERR == nRes)
    {
        return;
    }

    if (LOGIN_ID_ERR == nRes)
    {
        Application->NormalizeTopMosts();
        if (g_sLang == "kr") Application->MessageBox(L"등록되지 않은 사용자 입니다.", L"아이디 오류", MB_OK|MB_ICONERROR);     // 등록되지 않은 사용자 입니다.
        else                 Application->MessageBox(L"Unregistered user.", L"User ID Error", MB_OK|MB_ICONERROR);     // 등록되지 않은 사용자 입니다.
        Application->RestoreTopMosts();
        EdUserID->SetFocus();
        return;
    }
    if (LOGIN_PSWD_ERR == nRes)
    {
        Application->NormalizeTopMosts();
        if (g_sLang == "kr") Application->MessageBox(L"비밀번호가 일치하지 않습니다.", L"비밀번호 오류", MB_OK|MB_ICONERROR);     // 비밀번호가 일치하지 않습니다.
        else                 Application->MessageBox(L"Passwords do not match.", L"Password Error", MB_OK|MB_ICONERROR);     // 비밀번호가 일치하지 않습니다.
        Application->RestoreTopMosts();
        EdPswd->SetFocus();
        return;
    }

    EdUserID->Text      = EdUserID->Text.Trim();
    EdCnfmNewPswd->Text = EdCnfmNewPswd->Text.Trim();

    if (EdNewPswd->Text == EdPswd->Text)
    {
        Application->NormalizeTopMosts();
        if (g_sLang == "kr") Application->MessageBox(L"기존 비밀번호와 신규로 입력한 비밀번호가 일치합니다.\r\n새로운 비밀번호를 입력하세요.", L"비밀번호 변경 오류", MB_OK|MB_ICONERROR);
        else                 Application->MessageBox(L"Your old and new passwords match.\r\nEnter a new password.", L"Password change error", MB_OK|MB_ICONERROR);
        Application->RestoreTopMosts();
        EdNewPswd->SetFocus();
        return;
    }

    int nResult = UpdateUserPassword(EdUserID->Text.Trim(), EdCnfmNewPswd->Text.Trim());
    if (nResult > 0)
    {
        Application->NormalizeTopMosts();
        if (g_sLang == "kr") Application->MessageBox(L"비밀번호가 변경되었습니다.", L"비밀번호 변경 확인", MB_OK);          // 비밀번호가 변경되었습니다.  , 확인
        else                 Application->MessageBox(L"Password changed.", L"Confirm password change", MB_OK);          // 비밀번호가 변경되었습니다.  , 확인
        Application->RestoreTopMosts();
    }

    Close();
}
//---------------------------------------------------------------------------

/*
 * 사용자 아이디에 해당하는 비밀번호를 변경한다.
 *  parameter
 *   strUserID  : 사용자 ID
 *   strNewPswd : 변경한 새로운 비밀번호
 *  return
 *
 */
int __fastcall TFRMPswdChnge::UpdateUserPassword(String sUserID, String sNewPswd)
{
    String     sQry;
    TADOQuery *pADO = NULL;
    
#if 1
    sQry= "UPDATE TB_USER_INFR                   \r\n"
          "   SET PWD = SCP.HASH_B64('71', :p01) \r\n"
          " WHERE USER_ID = :p02                 \r\n";
#else
    sQry= "UPDATE TB_USER_INFR                   \r\n"
          "   SET PWD = :p01                     \r\n"
          " WHERE USER_ID = :p02                 \r\n";
#endif

    String sInNewPswd = sNewPswd;//String(ITSSHA256_Encrpyt(sNewPswd));
    try
    {
        try
        {
            pADO = new TADOQuery(NULL);
            pADO->Connection = ITSDb_GetConnection();

            ITSDb_GetConnection()->BeginTrans();

            pADO->Close();
            pADO->SQL->Text = sQry;
            pADO->Parameters->ParamByName("p01")->Value = sInNewPswd;
            pADO->Parameters->ParamByName("p02")->Value = sUserID;
        
            int nRowCnt = pADO->ExecSQL();
            //ShowMessage(String(nRowCnt));
            ITSDb_GetConnection()->CommitTrans();
            return nRowCnt;
        }
        catch (Exception &exception)
        {
            ITSDb_GetConnection()->RollbackTrans();
            throw Exception(String(exception.ClassName()) + exception.Message);
        }
        catch (...)
        {
            ITSDb_GetConnection()->RollbackTrans();
        }
    }
    __finally
    {
        if (pADO)
        {
            pADO->Close();
            delete pADO;
        }
    }
    
    return -1;
}
//---------------------------------------------------------------------------

/*
 * 비밀번호 입력전에 사용자가 입력하여야 할 항목이 입력되어 있는지를 확인한다.
 *  parameter
 *  return
 *
 */
bool __fastcall TFRMPswdChnge::ValidateInputField(void)
{
    if (0 == EdUserID->Text.Trim().Length())
    {
        Application->NormalizeTopMosts();
        if (g_sLang == "kr") Application->MessageBox(L"아이디를 입력하십시요.", L"아이디 입력 오류", MB_OK|MB_ICONERROR); // ID를 입력하세요. , 확 인
        else                 Application->MessageBox(L"Please enter User ID.", L"Error entering User ID", MB_OK|MB_ICONERROR); // ID를 입력하세요. , 확 인
        Application->RestoreTopMosts();
        EdUserID->SetFocus();
        return false;
    }
    if (0 == EdPswd->Text.Trim().Length())
    {
        Application->NormalizeTopMosts();
        if (g_sLang == "kr") Application->MessageBox(L"현재 비밀번호를 입력하십시요.", L"비밀번호 입력 오류", MB_OK|MB_ICONERROR); // 현재 비밀번호를 입력하십시요.  확인
        else                 Application->MessageBox(L"Please enter your current password.", L"Error entering User Password", MB_OK|MB_ICONERROR); // 현재 비밀번호를 입력하십시요.  확인
        Application->RestoreTopMosts();
        EdPswd->SetFocus();
        return false;
    }

    if (0 == EdNewPswd->Text.Trim().Length())
    {
        Application->NormalizeTopMosts();
        if (g_sLang == "kr") Application->MessageBox(L"신규 비밀번호를 입력하십시요.", L"신규 비밀번호 입력 오류", MB_OK|MB_ICONERROR);  // 새로운 비밀번호를 입력하십시요.  확인
        else                 Application->MessageBox(L"Please enter your new password.", L"Error entering New Password", MB_OK|MB_ICONERROR);  // 새로운 비밀번호를 입력하십시요.  확인
        Application->RestoreTopMosts();
        EdNewPswd->SetFocus();
        return false;
    }

    if (EdNewPswd->Text != EdCnfmNewPswd->Text)
    {
        Application->NormalizeTopMosts();
        if (g_sLang == "kr") Application->MessageBox(L"신규로 입력한 비밀번호가 일치하지 않습니다.", L"신규 비밀번호 확인 오류", MB_OK|MB_ICONERROR);  // 새로 입력한 비밀번호가 일치하지 않습니다.   확인
        else                 Application->MessageBox(L"The newly entered password does not match.", L"New password verification error", MB_OK|MB_ICONERROR);  // 새로 입력한 비밀번호가 일치하지 않습니다.   확인
        Application->RestoreTopMosts();
        EdNewPswd->SetFocus();
        return false;
    }

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

/*
 * 비밀번호 변경 화면 종료
 *  parameter
 *  return
 *
 */
void __fastcall TFRMPswdChnge::btnCloseClick(TObject *Sender)
{
    Close();
}
//---------------------------------------------------------------------------

void __fastcall TFRMPswdChnge::FormCreate(TObject *Sender)
{
    SetLocalSkin();
}
//---------------------------------------------------------------------------

/*
 * 공통으로 처리되지 않는 스킨을 변경한다.
 *  arguments
 *
 *  return
 *      void
 */
void __fastcall TFRMPswdChnge::SetLocalSkin()
{
}
//---------------------------------------------------------------------------

/*
 * form이 메모리에서 생성될때 호출되는 생성자 파라미터 핸들러
 *  arguments
 *      Sender : event handler 객체
 *  return
 *      void
 */
void __fastcall TFRMPswdChnge::CreateParams(TCreateParams &Params)
{
    TForm::CreateParams(Params);
    //Params.Style = (Params.Style | WS_POPUP) & ~WS_DLGFRAME; //캡션바 삭제
}
//---------------------------------------------------------------------------

/*
 * 캡션타입틀 마우스 클릭시 화면 이동하기
 *  arguments
 *
 *  return
 *      void
 */
void __fastcall TFRMPswdChnge::ShpCaptionMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y)
{
    ReleaseCapture();
    SendMessage(Handle, WM_NCLBUTTONDOWN, HTCAPTION, 0);
}
//---------------------------------------------------------------------------

void __fastcall TFRMPswdChnge::EdUserIDKeyPress(TObject *Sender, wchar_t &Key)
{
    if (Key == 13)
    {
        EdPswd->SetFocus();
    }
}
//---------------------------------------------------------------------------

void __fastcall TFRMPswdChnge::EdPswdKeyPress(TObject *Sender, wchar_t &Key)
{
    if (Key == 13)
    {
        EdNewPswd->SetFocus();
    }
}
//---------------------------------------------------------------------------

void __fastcall TFRMPswdChnge::EdNewPswdKeyPress(TObject *Sender, wchar_t &Key)
{
    if (Key == 13)
    {
        EdCnfmNewPswd->SetFocus();
    }
}
//---------------------------------------------------------------------------

void __fastcall TFRMPswdChnge::EdCnfmNewPswdKeyPress(TObject *Sender, wchar_t &Key)
{
    if (Key == 13)
    {
        BtnConfirm->SetFocus();
    }    
}
//---------------------------------------------------------------------------