#include "ImgPF.h"

static L_BOOL SBGDlg_OnInitDialog (HWND hWnd, HWND hWndFocus, LPARAM lParam);
static L_VOID SBGDlg_OnCommand    (HWND hWnd, L_INT nID, HWND hWndCtl, UINT CodeNotify);
static L_VOID SBGDlg_OnHScroll    (HWND hWnd, HWND hWndCtl, L_UINT uCode, L_INT nPos);
static L_VOID SBGDlg_OnTimer      (HWND hWnd, L_INT nID);
static L_VOID L_ApplyFilter       (HWND hWnd);

L_BOOL CALLBACK SBGDlgProc(HWND hWnd, L_UINT uMessage, WPARAM wParam, LPARAM lParam)
{
   switch(uMessage)
   {
      HANDLE_MSG(hWnd, WM_INITDIALOG, SBGDlg_OnInitDialog);
      HANDLE_MSG(hWnd, WM_COMMAND,    SBGDlg_OnCommand);
      HANDLE_MSG(hWnd, WM_HSCROLL,    SBGDlg_OnHScroll);
      HANDLE_MSG(hWnd, WM_TIMER,      SBGDlg_OnTimer);

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

static L_BOOL SBGDlg_OnInitDialog(HWND hWnd, HWND hWndFocus, LPARAM lParam)
{
   LPSBGDATA   pSBG;
   pCHILDDATA  pData;
   HWND        hWndParent;
   L_INT       nSlider;
   L_INT       nRangeMax[] = {400, 1000};
   L_INT       nRangeMin[] = {0,   1};
   L_INT       nPosInit [] = {100, 50};

   hWndParent = FORWARD_WM_MDIGETACTIVE(hWndClient,SendMessage);
   pData      = LOCKCHILDDATA(hWndParent);
   pSBG       = (LPSBGDATA)lParam;
   MoveDialogToMiddle(hWnd);

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

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

   //MEMDISK...//
   MemorizeAndCopyBitmap (hWndParent, &pSBG->LeadBitmap);
 
   pSBG->nSldBaseID       = IDC_SBK_WHT_SLD;
   pSBG->nEdtBaseID       = IDC_SBK_WHT_EDT;
   pSBG->nSlideNum        = 2;
   pSBG->uBallSize        = 50;
   pSBG->bWhiteBackground = FALSE;
   pSBG->bShowBackground  = FALSE;
   pSBG->nBrightness      = 100;
   pSBG->uShrinkSize      = 0;
   pSBG->nRdoBaseID       = IDC_SBK_DEPEND;
   pSBG->nRadioNum        = 5;

   Button_SetCheck(GetDlgItem(hWnd, IDC_SBK_DEPEND), TRUE);
   SetWindowLong(hWnd, GWL_USERDATA, (long)pSBG);  

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

   pData->uTimerID = SetTimer(hWnd, 1, 100, NULL);
   ShowWindow(hWnd, SW_SHOW);
   UpdateWindow(hWnd);
   L_ApplyFilter (hWnd);
   return TRUE;
}

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

static L_VOID SBGDlg_OnCommand(HWND hWnd, L_INT nID, HWND hWndCtl, L_UINT uCodeNotify)
{
   LPSBGDATA  pSBG;
   L_INT      nValue;
   pCHILDDATA pData;
   HWND       hWndParent;
   L_INT      nRangeMax[] = {400, 1000};
   L_INT      nRangeMin[] = {0,   1};
   L_INT      nIndex;

   pSBG       = (LPSBGDATA) 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 ;
      EndDialog(hWnd, FALSE);
      break;

   case IDOK:
      ShowStatusWindow(FALSE);
      StatusProc.bStillWork  = TRUE;
      StatusProc.bInvalidate = TRUE;
      StatusProc.bEnd = TRUE;
      EndDialog(hWnd, TRUE);
      break;

   case IDC_SBK_BK_CHK:
      pSBG->bShowBackground = !pSBG->bShowBackground;
      L_ApplyFilter (hWnd);
      break;

   case IDC_SBK_WHITE_CHK:
      pSBG->bWhiteBackground = !pSBG->bWhiteBackground;
      L_ApplyFilter (hWnd);
      break;
   }

   if (nID >= pSBG->nRdoBaseID && nID < pSBG->nRdoBaseID + pSBG->nRadioNum)
   {
      if (pSBG->uShrinkSize != (L_UINT)(GetDlgCtrlID(hWndCtl) - pSBG->nRdoBaseID))
      {
         pSBG->uShrinkSize = GetDlgCtrlID(hWndCtl) - pSBG->nRdoBaseID;
         L_ApplyFilter (hWnd);
      }
   }

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

         Trackbar_SetPos(GetDlgItem(hWnd, pSBG->nSldBaseID + nIndex), TRUE, nValue);

         switch(nIndex)
         {
         case 0:
            if (pSBG->nBrightness == nValue)
               return;
            pSBG->nBrightness = nValue;
            break;

         case 1:
            if (pSBG->uBallSize == (L_UINT)nValue)
               return;
            pSBG->uBallSize = nValue;
            break;
         }
         L_ApplyFilter (hWnd);
      }
   }
}

static L_VOID SBGDlg_OnHScroll (HWND hWnd, HWND hWndCtl, L_UINT uCode, L_INT nPos)
{
   LPSBGDATA pSBG = (LPSBGDATA) GetWindowLong(hWnd, GWL_USERDATA);
   SetDlgItemInt(hWnd, GetDlgCtrlID(hWndCtl) - pSBG->nSlideNum , Trackbar_GetPos(hWndCtl), TRUE);
}

static L_VOID L_ApplyFilter (HWND hWnd)
{
   pCHILDDATA pData;
   L_INT      nRet = 0;
   HWND       hWndParent;
   LPSBGDATA  pSBG;

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

   pSBG       = (LPSBGDATA) GetWindowLong(hWnd,GWL_USERDATA);
   hWndParent = FORWARD_WM_MDIGETACTIVE(hWndClient,SendMessage);
   pData      = LOCKCHILDDATA (hWndParent);

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

   nRet = L_SubtractBackgroundBitmap(&pData->LeadBitmap,
                                      pSBG->uBallSize,
                                      pSBG->uShrinkSize,
                                      pSBG->nBrightness,
                                     (pSBG->bWhiteBackground) | (pSBG->bShowBackground << 4));

   if(nRet == SUCCESS)
   {
      InvalidateRect(hWndParent, NULL, FALSE);
      StatusProc.ProgressValue = 100;
      Progress_SetPos(StatusProc.ProgWnd , 0);
      if(StatusProc.bEnd)
      {
         StatusProc.bProgress = FALSE;
         StatusProc.bKillProgress = TRUE ;
      }
   }
}