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

#include "ImgPF.h"

static L_BOOL RadWavDialog_OnCommand    (HWND hWnd, L_INT id, HWND hWndCtl, L_UINT codeNotify);
static L_BOOL RadWavDialog_OnHScroll    (HWND hWnd, HWND hWndCtl, L_UINT nCode, L_INT nPos);
static L_BOOL RadWavDialog_OnInitDialog (HWND hWnd, HWND hWndFocus, LPARAM lParam);
static L_VOID RadWavDialog_OnTimer      (HWND hWnd, L_INT ID);
static L_BOOL RadWavDialog_OnPaint      (HWND hWnd);
static L_VOID L_ApplyFilter             (HWND hWnd);

L_BOOL CALLBACK RadWaveDlgProc (HWND hWnd, L_UINT message, WPARAM wParam, LPARAM lParam)
{
   switch(message)
   {
      HANDLE_MSG (hWnd, WM_COMMAND,    RadWavDialog_OnCommand);
      HANDLE_MSG (hWnd, WM_INITDIALOG, RadWavDialog_OnInitDialog);
      HANDLE_MSG (hWnd, WM_HSCROLL,    RadWavDialog_OnHScroll);
      HANDLE_MSG (hWnd, WM_PAINT,      RadWavDialog_OnPaint);
      HANDLE_MSG (hWnd, WM_TIMER,      RadWavDialog_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) 
{
   LPRADWAVDLGDATA   pRadWavDlgData;
   LPMOUSEHOOKSTRUCT pMouseHook;
   HWND              hWndParent;
   pCHILDDATA        pData;
   RECT              rcRect;
   POINT             TmpPoint;
   DWORD             dwStyle;   

   hWndParent     = FORWARD_WM_MDIGETACTIVE(hWndClient,SendMessage);
   pData          = LOCKCHILDDATA (hWndParent);
   pRadWavDlgData = (LPRADWAVDLGDATA)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 (pRadWavDlgData->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 (pRadWavDlgData->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(pRadWavDlgData->hMouseHook , nCode, wParam, lParam); 
            }

            pData->ptCenter.x = pRadWavDlgData->ptCenter.x = pMouseHook->pt.x + pData->nHScrollPos;
            pData->ptCenter.y = pRadWavDlgData->ptCenter.y = pMouseHook->pt.y + pData->nVScrollPos;
            
            SetDlgItemInt(hGlobalWnd, IDC_WVRAD_XPOS_EDT, pRadWavDlgData->ptCenter.x, TRUE);
            SetDlgItemInt(hGlobalWnd, IDC_WVRAD_YPOS_EDT, pRadWavDlgData->ptCenter.y, 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 (pRadWavDlgData->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 (pRadWavDlgData)
   {
      if (LOWORD(wParam) >= WM_NCMOUSEMOVE && LOWORD(wParam) <= WM_NCMBUTTONDBLCLK)
         return TRUE;
      else
         return CallNextHookEx(pRadWavDlgData->hMouseHook , nCode, wParam, lParam); 
   }
   else
      return FALSE;
}

static L_BOOL RadWavDialog_OnInitDialog (HWND hWnd, HWND hWndFocus, LPARAM lParam)
{
   LPRADWAVDLGDATA pRadWavDlgData;
   HWND            hWndParent;
   pCHILDDATA      pData;
   RECT            rcRgn;
   L_INT           nSlider;
   L_INT           nRangeMax[] = { 100,  100, 360,  0, 0};
   L_INT           nRangeMin[] = { 1,    1,   -360, 0, 0};
   L_INT           nPosInit [] = { 100,  1,   0,     0, 0};

   hWndParent     = FORWARD_WM_MDIGETACTIVE(hWndClient,SendMessage);
   pData          = LOCKCHILDDATA (hWndParent);
   pRadWavDlgData = (LPRADWAVDLGDATA)lParam;
   hGlobalWnd     = hWnd;
   pData->bCross  = TRUE;
   MoveDialogToMiddle(hWnd);

   SetWindowLong(hWnd, GWL_USERDATA, (LONG)pRadWavDlgData);
   //MEMDISK...//
   MemorizeAndCopyBitmap (hWndParent, &pRadWavDlgData->Bitmap);
   L_GetBitmapRgnBounds(&pRadWavDlgData->Bitmap, NULL, &rcRgn);

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

   StatusProc.bProgress     = TRUE;
   StatusProc.bInvalidate   = FALSE;
   StatusProc.bEnd          = FALSE;
   StatusProc.DlgWnd        = hWnd;
   StatusProc.ProgressValue = 100;
   StatusProc.ProgWnd       = GetDlgItem(hWnd, IDC_WVRAD_PROG);
   
   ComboBox_AddString(GetDlgItem(hWnd, IDC_WVRAD_MOD_COM), TEXT("Period"));
   ComboBox_AddString(GetDlgItem(hWnd, IDC_WVRAD_MOD_COM), TEXT("Freqeuncy"));
   ComboBox_SetCurSel(GetDlgItem(hWnd, IDC_WVRAD_MOD_COM), 0);

   ComboBox_AddString(GetDlgItem(hWnd, IDC_WVRAD_FILL_COM), TEXT("Fill Color"));
   ComboBox_AddString(GetDlgItem(hWnd, IDC_WVRAD_FILL_COM), TEXT("Repeat Edge"));
   ComboBox_AddString(GetDlgItem(hWnd, IDC_WVRAD_FILL_COM), TEXT("No Change"));
   ComboBox_SetCurSel(GetDlgItem(hWnd, IDC_WVRAD_FILL_COM), 0);

   memset (pRadWavDlgData->nPostionH, 0, 3 * sizeof(L_INT));
   pRadWavDlgData->nPostionH[0]  = 100;
   pRadWavDlgData->nPostionH[1]  = 1;
   pRadWavDlgData->uFreq         = 100;
   pRadWavDlgData->uAmpl         = 1;
   pRadWavDlgData->nPhase        = 0;
   pRadWavDlgData->uFlag         = 0;
   pRadWavDlgData->nSlideNum     = 5;
   pRadWavDlgData->nEdtBaseID    = IDC_WVRAD_FREQ_EDT;
   pRadWavDlgData->nSldBaseID    = IDC_WVRAD_FREQ_SLD;
   nPosInit[3]  = pRadWavDlgData->ptCenter.x = pData->ptCenter.x = (rcRgn.right + rcRgn.left) / 2;
   nPosInit[4]  = pRadWavDlgData->ptCenter.y = pData->ptCenter.y = (rcRgn.bottom + rcRgn.top) / 2;
   nRangeMax[3] = rcRgn.right;
   nRangeMax[4] = rcRgn.bottom;
   nRangeMin[3] = rcRgn.left;
   nRangeMin[4] = rcRgn.top;

   for (nSlider = 0; nSlider < pRadWavDlgData->nSlideNum; nSlider++)
   {
      Trackbar_SetRange(GetDlgItem(hWnd, pRadWavDlgData->nSldBaseID + nSlider), FALSE, nRangeMin[nSlider], nRangeMax[nSlider]);
      SetDlgItemInt(hWnd, pRadWavDlgData->nEdtBaseID + nSlider, nPosInit[nSlider], FALSE);
      SetNumericEditBox(GetDlgItem(hWnd, pRadWavDlgData->nEdtBaseID + nSlider), nRangeMin[nSlider], nRangeMax[nSlider], 1, 0, FALSE);
   }
   pRadWavDlgData->bPushed = FALSE;
   pRadWavDlgData->hIcon = LoadIcon(hInst, MAKEINTRESOURCE(IDI_MOUSE));
   SendMessage(GetDlgItem(hWnd, IDC_WVRAD_POS_BTN), BM_SETIMAGE, IMAGE_ICON, (LPARAM)(HICON)pRadWavDlgData->hIcon);

   pRadWavDlgData->hMouseHook = SetWindowsHookEx(WH_MOUSE, Mouse, hInst, GetCurrentThreadId());
   pData->uTimerID = SetTimer(hWnd, 1, 100, NULL);
   return ( TRUE );
}

static L_VOID RadWavDialog_OnTimer (HWND hWnd, L_INT ID)
{
   Dialog_Timer(ID);
}

static L_BOOL RadWavDialog_OnPaint(HWND hWnd)
{
   HDC             hdc;
   PAINTSTRUCT     ps;
   RECT            Rect;
   HBRUSH          hbrush;
   LPRADWAVDLGDATA pRadWavDlgData;

   pRadWavDlgData = (LPRADWAVDLGDATA) GetWindowLong(hWnd, GWL_USERDATA);
   GetClientRect(GetDlgItem(hWnd , IDC_WVRAD_COLOR_TXT), &Rect);
   hdc = BeginPaint(GetDlgItem(hWnd, IDC_WVRAD_COLOR_TXT),&ps);

   hbrush = CreateSolidBrush(pRadWavDlgData->crColor);
   FillRect(hdc, &Rect, !ComboBox_GetCurSel(GetDlgItem(hWnd, IDC_WVRAD_FILL_COM)) ? hbrush : (HBRUSH) COLOR_WINDOW);
   DeleteObject (hbrush);
   EndPaint(GetDlgItem(hWnd, IDC_WVRAD_COLOR_TXT), &ps);
   return FALSE;
}
static L_BOOL RadWavDialog_OnCommand (HWND hWnd, L_INT id, HWND hWndCtl, L_UINT codeNotify)
{
   LPRADWAVDLGDATA pRadWavDlgData;
   HWND            hWndParent;
   L_INT           nRangeMax[] = { 100, 100, 360,  0 , 0};
   L_INT           nRangeMin[] = { 1,   1,   -360, 0 , 0};
   HWND            hCtl;
   pCHILDDATA      pData;
   L_INT           nValue, nIndex;
   RECT            rcRgn;
   COLORREF        crColor;

   hWndParent     = FORWARD_WM_MDIGETACTIVE(hWndClient,SendMessage);
   pData          = LOCKCHILDDATA (hWndParent);
   pRadWavDlgData = (LPRADWAVDLGDATA) GetWindowLong(hWnd, GWL_USERDATA);

   
   L_GetBitmapRgnBounds(&pRadWavDlgData->Bitmap, NULL, &rcRgn);
   
   nRangeMax[3] = rcRgn.right;
   nRangeMax[4] = rcRgn.bottom;
   nRangeMin[3] = rcRgn.left;
   nRangeMin[4] = rcRgn.top;

   if (id >= pRadWavDlgData->nEdtBaseID && id < pRadWavDlgData->nEdtBaseID + pRadWavDlgData->nSlideNum)
   {
      if(codeNotify == EN_CHANGE)
      {
         nValue = GetDlgItemInt(hWnd, id, NULL, TRUE);
         hCtl   = GetDlgItem(hWnd,id + pRadWavDlgData->nSlideNum);
         nIndex = id - pRadWavDlgData->nEdtBaseID;
         Trackbar_SetPos(hCtl, TRUE, nValue);

         if(nValue > nRangeMax[nIndex])
         {            
            SetDlgItemInt(hWnd, id,  nRangeMax[nIndex], TRUE);
            return FALSE;
         }

         if(nValue < nRangeMin[nIndex])
         {            
            SetDlgItemInt(hWnd, id,  nRangeMin[nIndex], TRUE);
            return FALSE;
         }
         
         switch (nIndex)
         {
         case 0:
            if(pRadWavDlgData->uFreq == nValue)
               return TRUE;
            pRadWavDlgData->uFreq = nValue;
            break;
         case 1:
            if(pRadWavDlgData->uAmpl == nValue)
               return TRUE;
            pRadWavDlgData->uAmpl = nValue;
            break;

         case 2:
            if(pRadWavDlgData->nPhase== nValue)
               return TRUE;
            pRadWavDlgData->nPhase = nValue;
            break;
         case 3:
            if(pRadWavDlgData->ptCenter.x== nValue)
               return TRUE;
            pRadWavDlgData->ptCenter.x = nValue;
            pData->ptCenter.x          = nValue;
           break;
         case 4:
            if(pRadWavDlgData->ptCenter.y== nValue)
               return TRUE;
            pRadWavDlgData->ptCenter.y = nValue;
            pData->ptCenter.y          = nValue;
            break;
         }
         L_ApplyFilter (hWnd);
      }
   }

   switch (id)
   {
   case IDC_WVRAD_POS_BTN:
      pRadWavDlgData->bPushed = Button_GetCheck(hWndCtl);
      break;

   case IDC_WVRAD_COLOR_BTN:
      crColor = pRadWavDlgData->crColor;

      pRadWavDlgData->crColor = ShowColorDialog(hWnd, crColor);

      if (crColor != pRadWavDlgData->crColor)
      {
         InvalidateRect(hWnd, NULL, FALSE);
         L_ApplyFilter (hWnd);
      }
      break;
      
   case IDC_WVRAD_MOD_COM:
      if (codeNotify == CBN_SELCHANGE)
      {
         nIndex = (ComboBox_GetCurSel(GetDlgItem(hWnd, IDC_WVRAD_MOD_COM)) << 4);

         if (pRadWavDlgData->uFlag != ((pRadWavDlgData->uFlag & 0xFFFFFF0F) | nIndex))
         {
            pRadWavDlgData->uFlag = pRadWavDlgData->uFlag & 0xFFFFFF0F;
            pRadWavDlgData->uFlag = pRadWavDlgData->uFlag | nIndex;
            InvalidateRect(hWndCtl, NULL, FALSE);
            L_ApplyFilter (hWnd);
         }
      }
      break;

   case IDC_WVRAD_FILL_COM:
      if (codeNotify == CBN_SELCHANGE)
      {
         nIndex = (ComboBox_GetCurSel(GetDlgItem(hWnd, IDC_WVRAD_FILL_COM)));

         if (pRadWavDlgData->uFlag != ((pRadWavDlgData->uFlag & 0xFFFFFFF0) | nIndex))
         {
            EnableWindow(GetDlgItem(hWnd, IDC_WVRAD_COLOR_BTN), !ComboBox_GetCurSel(hWndCtl));
            pRadWavDlgData->uFlag = pRadWavDlgData->uFlag & 0xFFFFFFF0;
            pRadWavDlgData->uFlag = pRadWavDlgData->uFlag | nIndex;
            InvalidateRect(hWnd, NULL, FALSE);
            InvalidateRect(hWndCtl, NULL, FALSE);
            L_ApplyFilter (hWnd);
         }
      }
      break;
   
   case IDCANCEL:
      pData->bCross            = FALSE;
      StatusProc.bProgress     = FALSE;
      StatusProc.bKillProgress = TRUE ;
      StatusProc.ProgressValue = 100 ;
      UnhookWindowsHookEx(pRadWavDlgData->hMouseHook);
      DestroyIcon(pRadWavDlgData->hIcon);
      EndDialog(hWnd, FALSE);
      break;
   case IDOK:
      pData->bCross = FALSE;
      ShowStatusWindow(FALSE);
      StatusProc.bStillWork  = TRUE;
      StatusProc.bInvalidate = TRUE;
      StatusProc.bEnd = TRUE;
      UnhookWindowsHookEx(pRadWavDlgData->hMouseHook);
      DestroyIcon(pRadWavDlgData->hIcon);
      EndDialog(hWnd, TRUE);
      break;
   }
   return TRUE;
}

static L_BOOL RadWavDialog_OnHScroll (HWND hWnd, HWND hWndCtl, L_UINT nCode, L_INT nPos)
{
   LPRADWAVDLGDATA pRadWavDlgData;

   pRadWavDlgData = (LPRADWAVDLGDATA) GetWindowLong(hWnd, GWL_USERDATA);
   SetDlgItemInt(hWnd, GetDlgCtrlID(hWndCtl) - pRadWavDlgData->nSlideNum , Trackbar_GetPos(hWndCtl), TRUE);
   return TRUE;
}

L_VOID L_ApplyFilter (HWND hWnd)
{
   pCHILDDATA      pData;
   L_INT           nRet = 0;
   HWND            hWndParent;
   LPRADWAVDLGDATA pRadWavDlgData;

   

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

   pRadWavDlgData = (LPRADWAVDLGDATA) GetWindowLong(hWnd,GWL_USERDATA);
   hWndParent     = FORWARD_WM_MDIGETACTIVE(hWndClient,SendMessage);
   pData          = LOCKCHILDDATA (hWndParent);

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

   nRet = L_RadWaveBitmap(&pData->LeadBitmap,
                           pRadWavDlgData->uAmpl,
                           pRadWavDlgData->uFreq,
                           pRadWavDlgData->nPhase * 100,
                           pRadWavDlgData->ptCenter,
                           pRadWavDlgData->crColor,
                           pRadWavDlgData->uFlag);
   if(nRet == SUCCESS)
   {
      InvalidateRect(hWndParent, NULL, FALSE);
      StatusProc.ProgressValue = 100;
      Progress_SetPos(StatusProc.ProgWnd , 0);
      if(StatusProc.bEnd)
      {
         StatusProc.bProgress = FALSE;
         StatusProc.bKillProgress = TRUE ;
      }
   }
}