#include "ImgPF.h"

static L_BOOL AddNoisDlg_OnInit    (HWND hWnd, HWND hWndCtl, LPARAM Data);
static L_VOID AddNoisDlg_OnHScroll (HWND hWnd, HWND hWndCtl, L_UINT uRequest, L_INT nPosition);
static L_VOID AddNoisDlg_OnCommand (HWND hWnd, L_INT nID, HWND hWndCtl, L_UINT uCodeNotify);
static L_VOID AddNoisDlg_OnTimer   (HWND hWnd, L_INT nID);
static L_BOOL AddNoisDlg_OnClose   (HWND hWnd);
static L_VOID L_ApplyFilter        (HWND hWnd);

L_BOOL CALLBACK AddNoisDlgProc(HWND hWnd, L_UINT uMessage, WPARAM wParam, LPARAM lParam)
{
   switch(uMessage)
   {
      HANDLE_MSG(hWnd, WM_INITDIALOG, AddNoisDlg_OnInit);
      HANDLE_MSG(hWnd, WM_COMMAND   , AddNoisDlg_OnCommand);
      HANDLE_MSG(hWnd, WM_HSCROLL   , AddNoisDlg_OnHScroll);
      HANDLE_MSG(hWnd, WM_TIMER     , AddNoisDlg_OnTimer);

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

static LRESULT CALLBACK Mouse(L_INT nCode, WPARAM wParam, LPARAM lParam) 
{
   LPADDNOISDLGDATA  pAddNoisDlgData;
   LPMOUSEHOOKSTRUCT pMouseHook;
   HWND              hWndParent;
   pCHILDDATA        pData;
   RECT              rcRect;
   POINT             TmpPoint;
   DWORD             dwStyle;   
   
   hWndParent      = FORWARD_WM_MDIGETACTIVE(hWndClient, SendMessage);
   pData           = LOCKCHILDDATA (hWndParent);
   pAddNoisDlgData = (LPADDNOISDLGDATA)GetWindowLong(hGlobalWnd, GWL_USERDATA);
   pMouseHook      = (LPMOUSEHOOKSTRUCT)lParam;

   GetWindowRect(hGlobalWnd, &rcRect);
   if (PtInRect(&rcRect, pMouseHook->pt))
      return 0;

   switch(LOWORD(wParam))
   {
   case WM_NCMOUSEMOVE:
      TmpPoint = pMouseHook->pt;
      if (PtInRect(&rcRect, TmpPoint))
         break;
      if (pAddNoisDlgData->bPushed) 
      {
         PostMessage (hWndParent, WM_USER_CHANGECURSOR, 0, (LONG)IDC_CROSS);
      }
      else
      {
         dwStyle  = GetWindowLong (hWndParent, GWL_STYLE);
         if ((WS_VSCROLL & dwStyle) || (WS_HSCROLL & dwStyle))
            PostMessage(hWndParent, WM_USER_CHANGECURSOR, (WPARAM)hInst, (LONG)MAKEINTRESOURCE(IDC_CURS11));
         ScreenToClient(hWndParent, &pMouseHook->pt);
         GetClientRect(hGlobalWnd, &rcRect);
         if (!PtInRect(&rcRect, pMouseHook->pt))
            SendMessage((hWndParent), WM_MOUSEMOVE, wParam, MAKELPARAM((pMouseHook->pt.x), (pMouseHook->pt.y)));
      }
      break;

   case WM_NCLBUTTONDOWN:
      TmpPoint = pMouseHook->pt;
      if (PtInRect(&rcRect, TmpPoint))
         break;
      if (pAddNoisDlgData->bPushed)
      {
         PostMessage (hWndParent, WM_USER_CHANGECURSOR, 0, (LONG)IDC_CROSS);
         ScreenToClient(hWndParent, &pMouseHook->pt);
         GetClientRect(hWndParent, &rcRect);
         if (PtInRect(&pData->rcView, pMouseHook->pt))
         {
            if (L_BitmapHasRgn(&pData->LeadBitmap))
            {
               L_GetBitmapRgnBounds(&pData->LeadBitmap, NULL, &rcRect);
               TmpPoint.x = pMouseHook->pt.x + pData->nHScrollPos;
               TmpPoint.y = pMouseHook->pt.y + pData->nVScrollPos;
               if (!PtInRect(&rcRect, TmpPoint))
                  return CallNextHookEx(pAddNoisDlgData->hMouseHook, nCode, wParam, lParam); 
            }

            pData->ptCenter.x = pAddNoisDlgData->AddNoiseData.uXOrigin = pMouseHook->pt.x + pData->nHScrollPos;
            pData->ptCenter.y = pAddNoisDlgData->AddNoiseData.uYOrigin = pMouseHook->pt.y + pData->nVScrollPos;

            SetDlgItemInt(hGlobalWnd, IDC_NOIS_XORG_EDT, pAddNoisDlgData->AddNoiseData.uXOrigin, TRUE);
            SetDlgItemInt(hGlobalWnd, IDC_NOIS_YORG_EDT, pAddNoisDlgData->AddNoiseData.uYOrigin, TRUE);
            InvalidateRect(hWndParent, NULL, FALSE);
            L_ApplyFilter (hGlobalWnd);
            PostMessage (hWndParent, WM_USER_CHANGECURSOR, 0, (LONG)IDC_CROSS);
         }
         else
         {
            PostMessage (hWndParent, WM_USER_CHANGECURSOR, 0, (LONG)IDC_ARROW);
         }
      }
      else
      {
         dwStyle  = GetWindowLong (hWndParent, GWL_STYLE);
         if ((WS_VSCROLL & dwStyle) || (WS_HSCROLL & dwStyle))
            PostMessage(hWndParent, WM_USER_CHANGECURSOR, (WPARAM)hInst, (LONG)MAKEINTRESOURCE(IDC_CURS11));
         ScreenToClient(hWndParent, &pMouseHook->pt);
         SendMessage(hWndParent, WM_LBUTTONDOWN, wParam, MAKELPARAM((pMouseHook->pt.x), (pMouseHook->pt.y)));
      }
      break;

   case WM_NCLBUTTONUP:
      TmpPoint = pMouseHook->pt;
      if (PtInRect(&rcRect, TmpPoint))
         break;
      if (pAddNoisDlgData->bPushed)
      {
         PostMessage (hWndParent, WM_USER_CHANGECURSOR, 0, (LONG)IDC_CROSS);
      }
      else
      {
         dwStyle  = GetWindowLong (hWndParent, GWL_STYLE);
         if ((WS_VSCROLL & dwStyle) || (WS_HSCROLL & dwStyle))
            PostMessage(hWndParent, WM_USER_CHANGECURSOR, (WPARAM)hInst, (LONG)MAKEINTRESOURCE(IDC_CURS11));
         ScreenToClient(hWndParent, &pMouseHook->pt);
         GetClientRect(hGlobalWnd, &rcRect);
         if (!PtInRect(&rcRect, pMouseHook->pt))
            SendMessage(hWndParent, WM_LBUTTONUP, wParam, MAKELPARAM((pMouseHook->pt.x), (pMouseHook->pt.y)));
      }
      break;
   }
   
   if (pAddNoisDlgData)
   {
      if (LOWORD(wParam) >= WM_NCMOUSEMOVE && LOWORD(wParam) <= WM_NCMBUTTONDBLCLK)
         return TRUE;
      else
         return CallNextHookEx(pAddNoisDlgData->hMouseHook , nCode, wParam, lParam); 
   }
   else
      return FALSE;
}

static L_BOOL AddNoisDlg_OnInit(HWND hWnd, HWND hWndCtl, LPARAM Data)
{
   LPADDNOISDLGDATA pAddNoisDlgData ;
   pCHILDDATA       pData;
   HWND             hWndParent;
   L_INT            nIndex;
   L_INT            nPosInit[]   = {0, 0, 1};
   L_INT            nRangeMin[]  = {0, 0, 1};
   L_INT            nRangeMax[]  = {0, 0, 100};
   L_TCHAR  L_FAR * ShapString[] = {TEXT("Linear Inner"),TEXT("Linear Outer"),
                                    TEXT("Quadratic Inner"),TEXT("Quadratic Outer")};
   RECT             rcRgn;

   hWndParent      = FORWARD_WM_MDIGETACTIVE(hWndClient, SendMessage);
   pData           = (pCHILDDATA)GetWindowLong(hWndParent, GWL_USERDATA);
   pAddNoisDlgData = (LPADDNOISDLGDATA)Data;
   hGlobalWnd      = hWnd;
   pData->bCross   = TRUE;
   MoveDialogToMiddle(hWnd);

   SetWindowLong(hWnd, GWL_USERDATA, (LONG)pAddNoisDlgData);

      //MEMDISK...//
   MemorizeAndCopyBitmap (hWndParent, &pAddNoisDlgData->LeadBitmap);
   L_GetBitmapRgnBounds(&pAddNoisDlgData->LeadBitmap, NULL, &rcRgn);

   nRangeMin[0] = rcRgn.left;
   nRangeMin[1] = rcRgn.top ;
   nRangeMax[0] = rcRgn.right  - 1;
   nRangeMax[1] = rcRgn.bottom - 1;
   nPosInit[0]  = (rcRgn.right + rcRgn.left) >> 1;
   nPosInit[1]  = (rcRgn.bottom + rcRgn.top) >> 1;

   pAddNoisDlgData->nSldBaseID               = IDC_NOIS_XORG_SLD;  
   pAddNoisDlgData->nEdtBaseID               = IDC_NOIS_XORG_EDT;  
   pAddNoisDlgData->nSlideNum                = 3;  
   pAddNoisDlgData->AddNoiseData.uStructSize = sizeof(LIGHTPARAMS);
   pAddNoisDlgData->AddNoiseData.uXOrigin    = pData->ptCenter.x = nPosInit[0];
   pAddNoisDlgData->AddNoiseData.uYOrigin    = pData->ptCenter.y = nPosInit[1];
   pAddNoisDlgData->AddNoiseData.uRAmp       = nPosInit[2];
   pAddNoisDlgData->AddNoiseData.uFlags      = FL_QUADRATIC_OUTER;

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

   for (nIndex = 0; nIndex < 4; nIndex++)
      ComboBox_AddString(GetDlgItem(hWnd, IDC_NOIS_SHP_COM), ShapString[nIndex]);
   ComboBox_SetCurSel(GetDlgItem(hWnd, IDC_NOIS_SHP_COM), 3);

   Progress_SetRange(GetDlgItem(hWnd, IDC_NOIS_PROG), 0, 100);
   Progress_SetPos(GetDlgItem(hWnd, IDC_NOIS_PROG), 0);

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

   ShowWindow(hWnd, SW_SHOW);
   pAddNoisDlgData->bPushed = FALSE;
   pAddNoisDlgData->hIcon   = LoadIcon(hInst, MAKEINTRESOURCE(IDI_MOUSE));
   SendMessage(GetDlgItem(hWnd, IDC_NOIS_POS_BTN), BM_SETIMAGE, IMAGE_ICON, (LPARAM)(HICON)pAddNoisDlgData->hIcon);
   pAddNoisDlgData->hMouseHook = SetWindowsHookEx(WH_MOUSE, Mouse, hInst, GetCurrentThreadId());
   L_ApplyFilter(hWnd);

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

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

static L_VOID AddNoisDlg_OnCommand(HWND hWnd, L_INT nID, HWND hWndCtl, L_UINT uCodeNotify)
{ 
   LPADDNOISDLGDATA pAddNoisDlgData;
   HWND             hWndParent;
   pCHILDDATA       pData;
   L_INT            nRangeMin[] = {0, 0, 1};
   L_INT            nRangeMax[] = {0, 0, 100};
   RECT             rcRgn;
   L_UINT           uCurrentSel;
   L_INT            nIndex, nValue;
   
   hWndParent      = FORWARD_WM_MDIGETACTIVE(hWndClient, SendMessage);
   pData           = (pCHILDDATA)GetWindowLong(hWndParent, GWL_USERDATA);
   pAddNoisDlgData = (LPADDNOISDLGDATA)GetWindowLong(hWnd, GWL_USERDATA);

   L_GetBitmapRgnBounds(&pAddNoisDlgData->LeadBitmap, NULL, &rcRgn);

   nRangeMin[0] = rcRgn.left;
   nRangeMin[1] = rcRgn.top ;
   nRangeMax[0] = rcRgn.right  - 1;
   nRangeMax[1] = rcRgn.bottom - 1;

   switch(nID)
   {
   case IDC_NOIS_POS_BTN:
      pAddNoisDlgData->bPushed = Button_GetCheck(hWndCtl);
      break;

   case IDCANCEL:
      pData->bCross = FALSE;
      UnhookWindowsHookEx(pAddNoisDlgData->hMouseHook);
      DestroyIcon(pAddNoisDlgData->hIcon);
      StatusProc.bProgress     = FALSE;
      StatusProc.bKillProgress = TRUE ;
      StatusProc.ProgressValue = 100 ;
      EndDialog(hWnd, FALSE);
      break;

   case IDOK:
      pData->bCross = FALSE;
      UnhookWindowsHookEx(pAddNoisDlgData->hMouseHook);
      DestroyIcon(pAddNoisDlgData->hIcon);
      ShowStatusWindow(FALSE);
      StatusProc.bStillWork  = TRUE;
      StatusProc.bInvalidate = TRUE;
      StatusProc.bEnd = TRUE;
      EndDialog(hWnd, TRUE);
      break;

   case IDC_NOIS_SHP_COM:
      if (uCodeNotify == CBN_SELCHANGE)
      {
         uCurrentSel = ComboBox_GetCurSel(GetDlgItem(hWnd, nID));
         if ((1 << uCurrentSel) == (L_INT)pAddNoisDlgData->AddNoiseData.uFlags)
            return;
         pAddNoisDlgData->AddNoiseData.uFlags = (1 << uCurrentSel);

         InvalidateRect(hWndCtl, NULL, FALSE);
         L_ApplyFilter (hWnd);
      }
      break;
   }

   if(nID >= pAddNoisDlgData->nEdtBaseID && nID < (pAddNoisDlgData->nEdtBaseID + pAddNoisDlgData->nSlideNum))
   {
      if(uCodeNotify == EN_CHANGE)
      {
         nIndex = nID - pAddNoisDlgData->nEdtBaseID;
         nValue = GetDlgItemInt(hWnd, nID, NULL, FALSE);
         
         Trackbar_SetPos(GetDlgItem(hWnd, nIndex + pAddNoisDlgData->nSldBaseID), TRUE, nValue);

         switch(nIndex)
         {
         case 0:
            if(pAddNoisDlgData->AddNoiseData.uXOrigin == (L_UINT)nValue)
               return;
            pAddNoisDlgData->AddNoiseData.uXOrigin = (L_UINT)nValue;
            pData->ptCenter.x                    = nValue;
            break;

         case 1:
            if(pAddNoisDlgData->AddNoiseData.uYOrigin == (L_UINT)nValue)
               return;
            pAddNoisDlgData->AddNoiseData.uYOrigin = (L_UINT)nValue;
            pData->ptCenter.y                    = nValue;
            break;

         case 2:
            if(pAddNoisDlgData->AddNoiseData.uRAmp == (L_UINT)nValue)
               return;
           pAddNoisDlgData->AddNoiseData.uRAmp = (L_UINT)nValue;
            break;
         }
         L_ApplyFilter (hWnd);
      }
   }
}

static L_VOID AddNoisDlg_OnHScroll(HWND hWnd, HWND hWndCtl, L_UINT uRequest, L_INT nPosition)
{
   LPADDNOISDLGDATA pAddNoisDlgData = (LPADDNOISDLGDATA) GetWindowLong(hWnd, GWL_USERDATA);
   SetDlgItemInt(hWnd, GetDlgCtrlID(hWndCtl) - pAddNoisDlgData->nSlideNum, Trackbar_GetPos(hWndCtl), TRUE);
}

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

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

   pAddNoisDlgData = (LPADDNOISDLGDATA) GetWindowLong(hWnd, GWL_USERDATA);
   hWndParent      = FORWARD_WM_MDIGETACTIVE(hWndClient, SendMessage);
   pData           = (pCHILDDATA)GetWindowLong(hWndParent, GWL_USERDATA);

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

   pAddNoisDlgData->AddNoiseData.uFlags |= FL_LINEAR_QUADRATIC;
   
   nRet = L_FunctionalLightBitmap(&pData->LeadBitmap,
                                  &pAddNoisDlgData->AddNoiseData);

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