/*[]=====================================================================[]*/
/*[]     LeadTools Run Time Library - Version 14                         []*/
/*[]                                                                     []*/
/*[]                                                                     []*/
/*[]     Copyright (c) 1991-2004 LEAD Technologies, Inc.                 []*/
/*[]     All Rights Reserved.                                            []*/
/*[]=====================================================================[]*/

#include "ImgPF.h"

static L_BOOL FdMskDlg_OnInitDialog (HWND hWnd, HWND hWndFocus, LPARAM lParam);
static L_VOID FdMskDlg_OnCommand    (HWND hWnd, L_INT nID, HWND hWndCtl, UINT CodeNotify);
static L_VOID FdMskDlg_OnHScroll    (HWND hWnd, HWND hWndCtl, L_UINT uCode, L_INT nPos);
static L_VOID L_ApplyFilter         (HWND hWnd);
static L_VOID FdMskDlg_OnTimer      (HWND hWnd, L_INT nID);

HWND  hWndOld;

L_BOOL CALLBACK FdMskWndProc(HWND hWnd, L_UINT uMessage, WPARAM wParam, LPARAM lParam)
{
   switch(uMessage)
   {
      HANDLE_MSG(hWnd, WM_INITDIALOG, FdMskDlg_OnInitDialog);
      HANDLE_MSG(hWnd, WM_COMMAND,    FdMskDlg_OnCommand);
      HANDLE_MSG(hWnd, WM_HSCROLL,    FdMskDlg_OnHScroll);
      HANDLE_MSG(hWnd, WM_TIMER,      FdMskDlg_OnTimer);

   case WM_USER_UPDATEVIEW:
      StatusProc.ProgressValue = 100;
      L_ApplyFilter (hWnd);
      break;
   }
   return FALSE;
}

static L_BOOL FdMskDlg_OnInitDialog(HWND hWnd, HWND hWndFocus, LPARAM lParam)
{
   HWND            hListBox;
   LPFDMSKDLGDATA  pFdMskDlgData;
   pCHILDDATA      pData;
   HWND            hWndParent;
   L_INT           nSlider;
   L_INT           nRangeMax[] = {100, 255,  20, 1000,  255};
   L_INT           nRangeMin[] = {1,     1,   1,    0,    0};
   L_INT           nPosInit [] = {20,   10,   2,   30,  255};
   RECT            rcRgn;
   BITMAPHANDLE    bmpRgn;
   HRGN            hRgn = NULL;
   HWND            hWndChild;
   CREATEDATA      CreateData;
   MDICREATESTRUCT mdiCreateStruct;
   BITMAPHANDLE    ResultBitmap;

   hWndParent    = FORWARD_WM_MDIGETACTIVE(hWndClient, SendMessage);
   pData         = LOCKCHILDDATA(hWndParent);
   pFdMskDlgData = (LPFDMSKDLGDATA)lParam;
   hWndOld       = hWndParent;

   MoveDialogToMiddle(hWnd);

   L_GetBitmapRgnBounds(&pData->LeadBitmap, NULL, &rcRgn);
   L_InitBitmap(&bmpRgn, sizeof(BITMAPHANDLE), 0, 0, 0);
   L_CopyBitmapRect(&bmpRgn, &pData->LeadBitmap, sizeof(BITMAPHANDLE), 
                     rcRgn.left, rcRgn.top, 
                     RECTWIDTH(&rcRgn), RECTHEIGHT(&rcRgn));

   L_GetBitmapRgnHandle(&bmpRgn, NULL, &hRgn);
   L_SetBitmapRgnHandle(&bmpRgn, NULL, hRgn, L_RGN_SETNOT);
   L_FillBitmap(&bmpRgn, RGB(0, 0, 0));
   L_SetBitmapRgnHandle(&bmpRgn, NULL, hRgn, L_RGN_SET);
   DeleteObject(hRgn);

   SetWindowLong(hWnd, GWL_USERDATA, (long)pFdMskDlgData);

   StatusProc.bProgress     = TRUE;
   StatusProc.bInvalidate   = FALSE;
   StatusProc.bEnd          = FALSE;
   StatusProc.DlgWnd        = hWnd;
   StatusProc.ProgressValue = 100;
   StatusProc.ProgWnd       = GetDlgItem(hWnd, IDC_FADE_PROG);

   Progress_SetRange(StatusProc.ProgWnd, 0, 100);
   Progress_SetPos(StatusProc.ProgWnd, 0);

   pFdMskDlgData->crTransparency = RGB(255, 0, 0);
   pFdMskDlgData->nLength        = 20;
   pFdMskDlgData->nRate          = 10;
   pFdMskDlgData->nStep          = 2;
   pFdMskDlgData->nInflate       = 30;
   pFdMskDlgData->nGray          = 255;
   pFdMskDlgData->nSldBaseID     = IDC_FADE_LEN_SLD;
   pFdMskDlgData->nEdtBaseID     = IDC_FADE_LEN_EDT;
   pFdMskDlgData->nChkBaseID     = IDC_FADE_OTR_RAD;
   pFdMskDlgData->nSlideNum      = 5;
   pFdMskDlgData->nCheckNum      = 6;
   pFdMskDlgData->uFlage         = 0;

   hListBox   = (HWND) GetDlgItem(hWnd, IDC_FADE_FIL_COM);
   ComboBox_InsertString (hListBox, 0, TEXT("Red"));
   ComboBox_InsertString (hListBox, 1, TEXT("Green"));
   ComboBox_InsertString (hListBox, 2, TEXT("Blue"));
   ComboBox_SetCurSel(hListBox, 0);

   for (nSlider = 0; nSlider < pFdMskDlgData->nSlideNum; nSlider++)
   {
      Trackbar_SetRange(GetDlgItem(hWnd, pFdMskDlgData->nSldBaseID + nSlider), TRUE, nRangeMin[nSlider], nRangeMax[nSlider]);   
      Trackbar_SetPos(GetDlgItem(hWnd, pFdMskDlgData->nSldBaseID + nSlider), TRUE, nPosInit[nSlider]);   
      SetDlgItemInt(hWnd, pFdMskDlgData->nEdtBaseID + nSlider, nPosInit[nSlider], TRUE);      
      SetNumericEditBox(GetDlgItem(hWnd, pFdMskDlgData->nEdtBaseID + nSlider), nRangeMin[nSlider], nRangeMax[nSlider], 1, 0, 0);
   }

   EnableWindow(GetDlgItem(hWnd, IDC_FADE_FLS_RAD), FALSE);
   EnableWindow(GetDlgItem(hWnd, IDC_FADE_NTS_RAD), FALSE);
   EnableWindow(GetDlgItem(hWnd, IDC_FADE_TSD_RAD), FALSE);
   EnableWindow(GetDlgItem(hWnd, IDC_FADE_INF_SLD), FALSE);
   EnableWindow(GetDlgItem(hWnd, IDC_FADE_INF_EDT), FALSE);

   L_CopyBitmap(&ResultBitmap, &bmpRgn, sizeof(BITMAPHANDLE));
   L_CopyBitmap(&pFdMskDlgData->Bitmap, &bmpRgn, sizeof(BITMAPHANDLE));
   
   CreateData.pszTitle      = TEXT("Fade Mask");
   CreateData.pBitmap       = &ResultBitmap;
   CreateData.pThumbnel     = NULL;
   CreateData.nBitmapFormat = 0;
   CreateData.bIsFile       = TRUE;
   mdiCreateStruct.szClass = szChildClass;
   mdiCreateStruct.szTitle = TEXT("Fade Mask");
   mdiCreateStruct.hOwner  = hInst;
   mdiCreateStruct.x       = CW_USEDEFAULT;
   mdiCreateStruct.y       = CW_USEDEFAULT;
   mdiCreateStruct.cx      = CW_USEDEFAULT;
   mdiCreateStruct.cy      = CW_USEDEFAULT;
   mdiCreateStruct.style   = MDIS_ALLCHILDSTYLES|WS_CLIPCHILDREN;
   mdiCreateStruct.lParam  = (LPARAM) (LPCREATEDATA) & CreateData;

   hWndChild = (HWND) SendMessage(hWndClient, 
                                  WM_MDICREATE, 
                                  0, 
                                  (LPARAM) (LPMDICREATESTRUCT) &mdiCreateStruct);
   ShowWindow(hWnd, SW_SHOW);
   
   L_FreeBitmap(&bmpRgn);
   pData->uTimerID = SetTimer(hWnd, 1, 100, NULL);
   L_ApplyFilter (hWnd);
   return TRUE;
}

static L_VOID FdMskDlg_OnTimer (HWND hWnd, L_INT nID)
{
   Dialog_Timer(nID);
}

static L_VOID FdMskDlg_OnCommand(HWND hWnd, L_INT nID, HWND hWndCtl, L_UINT uCodeNotify)
{
   LPFDMSKDLGDATA  pFdMskDlgData;
   L_INT           nValue;
   pCHILDDATA      pData;
   HWND            hWndParent;
   L_INT           nRangeMax[] = {100, 255, 20, 1000, 255};
   L_INT           nRangeMin[] = {1,   1,   1,  0,    0};
   L_INT           nIndex;
   L_CHAR          a[20] = "\0";

   pFdMskDlgData  = (LPFDMSKDLGDATA) GetWindowLong(hWnd, GWL_USERDATA);
   hWndParent = FORWARD_WM_MDIGETACTIVE(hWndClient, SendMessage);
   pData      = LOCKCHILDDATA (hWndParent);

   switch (nID)
   {
   case IDCANCEL:
      StatusProc.bProgress = FALSE;
      StatusProc.bKillProgress = TRUE ;
      StatusProc.ProgressValue = 100 ;
      if (pFdMskDlgData->Bitmap.Flags.Allocated)
         L_FreeBitmap(&pFdMskDlgData->Bitmap);
      if (FadeBitmap.Flags.Allocated)
         L_FreeBitmap(&FadeBitmap);
      FORWARD_WM_CLOSE(hWndParent, DefMDIChildProc);
      SendMessage(hWndClient, WM_MDIACTIVATE, (WPARAM)hWndOld, (LPARAM)0);
      EndDialog(hWnd, FALSE);
      break;

   case IDOK:
      StatusProc.bInvalidate = TRUE;
      StatusProc.bEnd = TRUE;
      if (pFdMskDlgData->Bitmap.Flags.Allocated)
         L_FreeBitmap(&pFdMskDlgData->Bitmap);
      if (FadeBitmap.Flags.Allocated)
         L_FreeBitmap(&FadeBitmap);
      L_CopyBitmap(&FadeBitmap, &pData->LeadBitmap, sizeof(BITMAPHANDLE));
      L_FreeBitmap(&pData->LeadBitmap);
      FORWARD_WM_CLOSE(hWndParent, DefMDIChildProc);
      SendMessage(hWndClient, WM_MDIACTIVATE, (WPARAM)hWndOld, (LPARAM)0);
      EndDialog(hWnd, TRUE);
      break;

   case IDC_FADE_FIL_COM:
      if (uCodeNotify == CBN_SELCHANGE)
      {
         pFdMskDlgData->crTransparency = (L_UINT)(0xff << 8 * ComboBox_GetCurSel(hWndCtl));
         InvalidateRect(hWndCtl, NULL, FALSE);
         L_ApplyFilter (hWnd);
      }
      break;
   }

   if (nID >= pFdMskDlgData->nEdtBaseID && nID < pFdMskDlgData->nEdtBaseID + pFdMskDlgData->nSlideNum)
   {
      if ((uCodeNotify == EN_CHANGE))
      {
         nValue        = GetDlgItemInt(hWnd, nID, NULL, TRUE);
         nIndex        = nID - pFdMskDlgData->nEdtBaseID;

         if (nValue < nRangeMin[nIndex])
         {
            nValue = nRangeMin[nIndex];
            SetDlgItemInt(hWnd, nID, nRangeMin[nIndex], TRUE);
         }
         if (nValue > nRangeMax[nIndex]) 
         {
            nValue = nRangeMax[nIndex];
            SetDlgItemInt(hWnd, nID, nRangeMax[nIndex], TRUE);
         }
         
         switch(nIndex)
         {
         case 0:
            if (pFdMskDlgData->nLength == nValue)
               return;
            pFdMskDlgData->nLength = nValue;
            break;
         case 1:
            if (pFdMskDlgData->nRate == nValue)
               return;
            pFdMskDlgData->nRate = nValue;
            break;
         case 2:
            if (pFdMskDlgData->nStep == nValue)
               return;
            pFdMskDlgData->nStep = nValue;
            break;
         case 3:
            if (pFdMskDlgData->nInflate == nValue)
               return;
            pFdMskDlgData->nInflate = nValue;
            break;
         case 4:
            if (pFdMskDlgData->nGray == nValue)
               return;
            pFdMskDlgData->nGray = nValue;
            break;
         }
         Trackbar_SetPos(GetDlgItem(hWnd, pFdMskDlgData->nSldBaseID + nIndex), TRUE, nValue);
         L_ApplyFilter (hWnd);
      }
   }

   if (nID >= pFdMskDlgData->nChkBaseID && nID < pFdMskDlgData->nChkBaseID + pFdMskDlgData->nCheckNum)
   {
      nIndex = nID - pFdMskDlgData->nChkBaseID;
      pFdMskDlgData->uFlage ^= 1 << nIndex;
      
      if (nID == IDC_FADE_OTR_RAD)
      {
         EnableWindow(GetDlgItem(hWnd, IDC_FADE_INF_SLD), Button_GetCheck(hWndCtl));
         EnableWindow(GetDlgItem(hWnd, IDC_FADE_INF_EDT), Button_GetCheck(hWndCtl));
      }

      if (nID == IDC_FADE_FLD_RAD)
      {
         EnableWindow(GetDlgItem(hWnd, IDC_FADE_FLS_RAD), Button_GetCheck(hWndCtl));
         EnableWindow(GetDlgItem(hWnd, IDC_FADE_NTS_RAD), Button_GetCheck(hWndCtl));
         EnableWindow(GetDlgItem(hWnd, IDC_FADE_TSD_RAD), Button_GetCheck(hWndCtl) && Button_GetCheck(GetDlgItem(hWnd, IDC_FADE_NTS_RAD)));
      }

      if (nID == IDC_FADE_NTS_RAD)
         EnableWindow(GetDlgItem(hWnd, IDC_FADE_TSD_RAD), Button_GetCheck(hWndCtl));
      L_ApplyFilter (hWnd);
   }
}

static L_VOID FdMskDlg_OnHScroll (HWND hWnd, HWND hWndCtl, L_UINT uCode, L_INT nPos)
{
   LPFDMSKDLGDATA pFdMskDlgData;

   pFdMskDlgData = (LPFDMSKDLGDATA) GetWindowLong(hWnd, GWL_USERDATA);
   SetDlgItemInt(hWnd, GetDlgCtrlID(hWndCtl) - pFdMskDlgData->nSlideNum , Trackbar_GetPos(hWndCtl), TRUE);
}


static L_VOID L_ApplyFilter (HWND hWnd)
{
   pCHILDDATA     pData, pBitmapData;
   L_INT          nRet = 0;
   HWND           hWndParent;
   LPFDMSKDLGDATA pFdMskDlgData;

   if ( 100 != StatusProc.ProgressValue )
   {
      StatusProc.bKillProgress = TRUE ;
      return ;
   }

   pFdMskDlgData = (LPFDMSKDLGDATA) GetWindowLong(hWnd, GWL_USERDATA);
   hWndParent    = FORWARD_WM_MDIGETACTIVE(hWndClient, SendMessage);
   pData         = LOCKCHILDDATA (hWndParent);
   pBitmapData   = LOCKCHILDDATA (hWndOld);

   FreeMemorizedBitmap (hWndParent); //MEMDISK//
   L_CopyBitmap(&pData->LeadBitmap, &pFdMskDlgData->Bitmap, sizeof(BITMAPHANDLE));

   EnableWindow(GetDlgItem(hWnd, IDOK), FALSE);
   EnableWindow(GetDlgItem(hWnd, IDCANCEL), FALSE);

   nRet = L_CreateFadedMask(&pBitmapData->LeadBitmap, 
                            &pData->LeadBitmap, 
                            sizeof(BITMAPHANDLE), 
                            pFdMskDlgData->nLength, 
                            pFdMskDlgData->nRate, 
                            pFdMskDlgData->nStep, 
                            pFdMskDlgData->nInflate, 
                            pFdMskDlgData->uFlage, 
                            pFdMskDlgData->nGray, 
                            pFdMskDlgData->crTransparency);

   if(nRet == SUCCESS)
   {
      EnableWindow(GetDlgItem(hWnd, IDOK), TRUE );
      EnableWindow(GetDlgItem(hWnd, IDCANCEL), TRUE);
      InvalidateRect(hWndParent, NULL, FALSE);
      StatusProc.ProgressValue = 100;
      Progress_SetPos(StatusProc.ProgWnd , 0);
      if(StatusProc.bEnd)
      {
         StatusProc.bProgress     = FALSE;
         StatusProc.bKillProgress = TRUE;
         if(pFdMskDlgData)
         { 
            GlobalFreePtr(pFdMskDlgData);
         }
          
      }
   }
}