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


#include "ImgPF.h"

static L_BOOL CanvasDlg_OnInitDialog (HWND hWnd, HWND hWndFocus, LPARAM lParam);
static L_BOOL CanvasDlg_OnCommand    (HWND hWnd, L_INT nID, HWND hWndCtl, L_UINT codeNotify);
static L_BOOL CanvasDlg_OnHScroll    (HWND hWnd, HWND hWndCtl, L_UINT nCode, L_INT nPos);
static L_VOID CanvasDlg_OnTimer      (HWND hWnd, L_INT nID);
static L_VOID CanvasDlg_OnPaint      (HWND hWnd);
static L_VOID L_ApplyFilter          (HWND hWnd);

L_BOOL CALLBACK CanvasDlgProc (HWND hWnd, L_UINT uMessage, WPARAM wParam, LPARAM lParam)
{
   switch(uMessage)
   {
      HANDLE_MSG (hWnd, WM_COMMAND,     CanvasDlg_OnCommand);
      HANDLE_MSG (hWnd, WM_INITDIALOG,  CanvasDlg_OnInitDialog);
      HANDLE_MSG (hWnd, WM_HSCROLL,     CanvasDlg_OnHScroll);
      HANDLE_MSG (hWnd, WM_PAINT,       CanvasDlg_OnPaint);
      HANDLE_MSG (hWnd, WM_TIMER,       CanvasDlg_OnTimer);

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

L_BOOL CALLBACK CanvasEnum(HWND hWnd, LPARAM lParam)
{
   pCHILDDATA  pData;
   HWND        hDlg;
   L_TCHAR     StripName[255];
   L_INT       nCount;

   hDlg = (HWND)lParam;
   pData = (pCHILDDATA) GetWindowLong(hWnd, GWL_USERDATA);
   if (!pData)
      return FALSE;

   memset(StripName, 0, sizeof(StripName));
   Strip(StripName, pData->pszTitle);
   nCount = ComboBox_GetCount(GetDlgItem(hDlg, IDC_CNVS_IMG_COM));
   ComboBox_AddString(GetDlgItem(hDlg, IDC_CNVS_IMG_COM), StripName);
   ComboBox_SetItemData(GetDlgItem(hDlg, IDC_CNVS_IMG_COM), nCount, (LONG)pData);
   return TRUE;
}

L_VOID GetCanvasImages(HWND hWnd)
{
   EnumChildWindows (hWndClient, CanvasEnum, (LONG)hWnd);
   ComboBox_SetCurSel(GetDlgItem(hWnd, IDC_CNVS_IMG_COM), 0);
}

static L_BOOL CanvasDlg_OnInitDialog (HWND hWnd, HWND hWndFocus, LPARAM lParam)
{
   LPCANVASDLGDATA pCanvasDlgData;
   HWND            hWndParent;
   pCHILDDATA      pData;
   pCHILDDATA      pThumbData;
   L_INT           nRangeMax[] = {100, 200, 0, 0, 0};
   L_INT           nRangeMin[] = {0,   0,   0, 0, 0};
   L_INT           nPosInit [] = {100, 100, 0, 0, 0};
   L_INT           nSlider;
   RECT            rcRgn;
   RECT            rcThumbRgn;

   hWndParent     = FORWARD_WM_MDIGETACTIVE(hWndClient,SendMessage);
   pData          = LOCKCHILDDATA (hWndParent);
   pCanvasDlgData = (LPCANVASDLGDATA)lParam;

   SetWindowLong(hWnd,GWL_USERDATA,(LONG)pCanvasDlgData);
   ShowWindow(hWnd, SW_SHOW);

   MoveDialogToMiddle(hWnd);

   GetCanvasImages(hWnd);
   pThumbData = (pCHILDDATA)ComboBox_GetItemData(GetDlgItem(hWnd, IDC_CNVS_IMG_COM), 0);

   L_GetBitmapRgnBounds(&pData->LeadBitmap, NULL, &rcRgn);
   L_GetBitmapRgnBounds(&pThumbData->LeadBitmap, NULL, &rcThumbRgn);

   nRangeMax[2] = RECTWIDTH(&rcThumbRgn);
   nRangeMin[2] = -RECTWIDTH(&rcThumbRgn);
   nRangeMax[3] = RECTHEIGHT(&rcThumbRgn);
   nRangeMin[3] = -RECTHEIGHT(&rcThumbRgn);
   nRangeMax[4] = max(RECTWIDTH(&rcThumbRgn), RECTWIDTH(&rcRgn));

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

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

   ComboBox_AddString(GetDlgItem(hWnd, IDC_CNVS_TYP_COM), "Fit");
   ComboBox_AddString(GetDlgItem(hWnd, IDC_CNVS_TYP_COM), "Shift");
   ComboBox_SetCurSel(GetDlgItem(hWnd, IDC_CNVS_TYP_COM), 1);

   ComboBox_AddString(GetDlgItem(hWnd, IDC_CNVS_RSZ_COM), "Normal");
   ComboBox_AddString(GetDlgItem(hWnd, IDC_CNVS_RSZ_COM), "Resample");
   ComboBox_AddString(GetDlgItem(hWnd, IDC_CNVS_RSZ_COM), "Bicubic");
   ComboBox_SetCurSel(GetDlgItem(hWnd, IDC_CNVS_RSZ_COM), 2);

   //MEMDISK...//
   MemorizeAndCopyBitmap (hWndParent, &pCanvasDlgData->LeadBitmap);

   pCanvasDlgData->nSlideNum             = 5;
   pCanvasDlgData->nSldBaseID            = IDC_CNVS_OPC_SLD;
   pCanvasDlgData->nEdtBaseID            = IDC_CNVS_OPC_EDT;
   pCanvasDlgData->uTransparency         = nPosInit[0];
   pCanvasDlgData->uEmboss               = nPosInit[1];
   pCanvasDlgData->uXOffset              = nPosInit[2];
   pCanvasDlgData->uYOffset              = nPosInit[3];
   pCanvasDlgData->uTileOffset           = nPosInit[4];
   pCanvasDlgData->uType                 = CANVAS_SHIFT >> 4;
   pCanvasDlgData->uResizeMethod         = SIZE_BICUBIC;

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

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

static L_VOID CanvasDlg_OnPaint(HWND hWnd)
{
   LPCANVASDLGDATA pCanvasDlgData;
   HWND            hWndParent;
   pCHILDDATA      pData;
   pCHILDDATA      pThumbData;
   pBITMAPHANDLE   pThumb;
   HPALETTE        hPalette, hSavedPalette;
   RECT            rcImage;
   PAINTSTRUCT     ps;
   HDC             hDC;
   L_INT           nIndex;

   hWndParent     = FORWARD_WM_MDIGETACTIVE(hWndClient,SendMessage);
   pData          = LOCKCHILDDATA (hWndParent);
   pCanvasDlgData = (LPCANVASDLGDATA) GetWindowLong(hWnd,GWL_USERDATA);

   nIndex = ComboBox_GetCurSel(GetDlgItem(hWnd, IDC_CNVS_IMG_COM));
   pThumbData = (pCHILDDATA)ComboBox_GetItemData(GetDlgItem(hWnd, IDC_CNVS_IMG_COM), nIndex);

   if(&pData->LeadBitmap == &pThumbData->LeadBitmap)
      pThumb = &pCanvasDlgData->LeadBitmap;
   else
      pThumb = &pThumbData->LeadBitmap;

   hDC = BeginPaint(GetDlgItem(hWnd, IDC_CNVS_IMG_TXT), &ps);
   hPalette = L_CreatePaintPalette(hDC, pThumb);
   if (hPalette)
   {
      hSavedPalette = SelectPalette (hDC, hPalette, FALSE);
      RealizePalette (hDC);
   }

   GetClientRect(GetDlgItem(hWnd, IDC_CNVS_IMG_TXT), &rcImage);
   FillRect(hDC, &rcImage, (HBRUSH) COLOR_WINDOW);
   FitImageToWindow(rcImage, pThumb, &rcImage);
   L_PaintDC(hDC, pThumb, NULL, NULL, &rcImage, &ps.rcPaint,SRCCOPY);
   if (hSavedPalette)
      SelectPalette (hDC, hSavedPalette, FALSE);
   if(hPalette)
      DeleteObject (hPalette);
   EndPaint(GetDlgItem(hWnd, IDC_CNVS_IMG_TXT),&ps);
}

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

static L_BOOL CanvasDlg_OnCommand (HWND hWnd, L_INT nID, HWND hWndCtl, L_UINT uCodeNotify)
{
   LPCANVASDLGDATA pCanvasDlgData;
   HWND            hWndParent;
   L_INT           nIndex;
   L_INT           nValue;
   pCHILDDATA      pData;

   hWndParent     = FORWARD_WM_MDIGETACTIVE(hWndClient,SendMessage);
   pData          = LOCKCHILDDATA (hWndParent);
   pCanvasDlgData = (LPCANVASDLGDATA) GetWindowLong(hWnd, GWL_USERDATA);

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

      Trackbar_SetPos(GetDlgItem(hWnd, nID + pCanvasDlgData->nSlideNum), TRUE, nValue);
   
      switch (nIndex)
      {
      case 0:
         if (pCanvasDlgData->uTransparency == (L_UINT) nValue)
            return FALSE;
         pCanvasDlgData->uTransparency = nValue;
         break;
      case 1:
         if (pCanvasDlgData->uEmboss == (L_UINT) nValue)
            return FALSE;
         pCanvasDlgData->uEmboss = nValue;
         break;
      case 2:
         if (pCanvasDlgData->uXOffset == (L_UINT)nValue)
            return FALSE;
         pCanvasDlgData->uXOffset = nValue;
         break;
      case 3:
         if (pCanvasDlgData->uYOffset == (L_UINT)nValue)
            return FALSE;
         pCanvasDlgData->uYOffset = nValue;
         break;
      case 4:
         if (pCanvasDlgData->uTileOffset == (L_UINT) nValue)
            return FALSE;
         pCanvasDlgData->uTileOffset = nValue;
         break;
      }
      L_ApplyFilter (hWnd);
   }

   switch(nID)
   {
   case IDC_CNVS_TYP_COM:
      if (uCodeNotify == CBN_SELCHANGE)
      {
         if (pCanvasDlgData->uType == ComboBox_GetCurSel(hWndCtl))
            break;
         EnableWindow(GetDlgItem(hWnd, IDC_CNVS_TOF_EDT), ComboBox_GetCurSel(hWndCtl));
         EnableWindow(GetDlgItem(hWnd, IDC_CNVS_TOF_SLD), ComboBox_GetCurSel(hWndCtl));
         EnableWindow(GetDlgItem(hWnd, IDC_CNVS_RSZ_COM), !ComboBox_GetCurSel(hWndCtl));
         pCanvasDlgData->uType = ComboBox_GetCurSel(hWndCtl);
         L_ApplyFilter(hWnd);
      }
      break;

   case IDC_CNVS_IMG_COM:
      {
         L_INT      nMin, nMax;
         RECT       rcRgn, rcThumbRgn;
         pCHILDDATA pThumbData;
         if (pCanvasDlgData->uComIndex == ComboBox_GetCurSel(hWndCtl))
            break;
         pCanvasDlgData->uComIndex = ComboBox_GetCurSel(hWndCtl);

         pThumbData = (pCHILDDATA)ComboBox_GetItemData(GetDlgItem(hWnd, IDC_CNVS_IMG_COM), pCanvasDlgData->uComIndex);
         L_GetBitmapRgnBounds(&pCanvasDlgData->LeadBitmap, NULL, &rcRgn);
         L_GetBitmapRgnBounds(&pThumbData->LeadBitmap, NULL, &rcThumbRgn);

         nMax = RECTWIDTH(&rcThumbRgn);
         nMin = -nMax;
         Trackbar_SetRange(GetDlgItem(hWnd, IDC_CNVS_XOF_SLD), TRUE, nMin, nMax);
         EditNumericEditBox(GetDlgItem(hWnd, IDC_CNVS_XOF_EDT), nMin, nMax, 1, 0, FALSE, EDT_MODFY_MAX | EDT_MODFY_MIN);
         SetDlgItemInt(hWnd, IDC_CNVS_XOF_EDT, min(nMax, max(nMin, (L_INT)GetDlgItemInt(hWnd, IDC_CNVS_XOF_EDT, NULL, TRUE))), TRUE);

         nMax = RECTHEIGHT(&rcThumbRgn);
         nMin = -nMax;
         Trackbar_SetRange(GetDlgItem(hWnd, IDC_CNVS_YOF_SLD), TRUE, nMin, nMax);
         EditNumericEditBox(GetDlgItem(hWnd, IDC_CNVS_YOF_EDT), nMin, nMax, 1, 0, FALSE, EDT_MODFY_MAX | EDT_MODFY_MIN);
         SetDlgItemInt(hWnd, IDC_CNVS_YOF_EDT, min(nMax, max(nMin, (L_INT)GetDlgItemInt(hWnd, IDC_CNVS_YOF_EDT, NULL, TRUE))), TRUE);

         Trackbar_SetRange(GetDlgItem(hWnd, IDC_CNVS_TOF_SLD), TRUE, 0, nMax);
         EditNumericEditBox(GetDlgItem(hWnd, IDC_CNVS_TOF_EDT), 0, nMax, 1, 0, FALSE, EDT_MODFY_MAX);
         SetDlgItemInt(hWnd, IDC_CNVS_TOF_EDT, min(nMax, max(0, (L_INT)GetDlgItemInt(hWnd, IDC_CNVS_TOF_EDT, NULL, TRUE))), TRUE);

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

   case IDC_CNVS_RSZ_COM:
      {
         if (pCanvasDlgData->uResizeMethod / 2 == ComboBox_GetCurSel(hWndCtl))
            break;
         pCanvasDlgData->uResizeMethod = ComboBox_GetCurSel(hWndCtl) * 2;
         InvalidateRect(hWnd, NULL, FALSE);
         L_ApplyFilter(hWnd);
      }
      break;

   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;

   }
   return TRUE;
}

static L_BOOL CanvasDlg_OnHScroll (HWND hWnd, HWND hWndCtl, L_UINT nCode, L_INT nPos)
{
   LPCANVASDLGDATA pCanvasDlgData = (LPCANVASDLGDATA) GetWindowLong(hWnd,GWL_USERDATA);
   return SetDlgItemInt(hWnd, GetDlgCtrlID(hWndCtl) - pCanvasDlgData->nSlideNum, Trackbar_GetPos(hWndCtl) , TRUE);
}

static L_VOID L_ApplyFilter (HWND hWnd)
{
   pCHILDDATA      pData;
   pCHILDDATA      pThumbData;
   L_INT           nRet = 0;
   HWND            hWndParent;
   LPCANVASDLGDATA pCanvasDlgData;

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

   pCanvasDlgData = (LPCANVASDLGDATA)GetWindowLong(hWnd,GWL_USERDATA);
   hWndParent     = FORWARD_WM_MDIGETACTIVE(hWndClient,SendMessage);
   pData          = LOCKCHILDDATA(hWndParent);
   pThumbData     = (pCHILDDATA)ComboBox_GetItemData(GetDlgItem(hWnd, IDC_CNVS_IMG_COM), pCanvasDlgData->uComIndex);

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

   nRet = L_CanvasBitmap(&pData->LeadBitmap,
                         &pThumbData->LeadBitmap,
                          pCanvasDlgData->uTransparency,
                          pCanvasDlgData->uEmboss,
                          pCanvasDlgData->uXOffset,
                          pCanvasDlgData->uYOffset,
                          pCanvasDlgData->uTileOffset,
                          (pCanvasDlgData->uType << 4) | pCanvasDlgData->uResizeMethod);

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