/*==LICENSE==*

CyanWorlds.com Engine - MMOG client, server and tools
Copyright (C) 2011  Cyan Worlds, Inc.

This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program.  If not, see <http://www.gnu.org/licenses/>.

You can contact Cyan Worlds, Inc. by email legal@cyan.com
 or by snail mail at:
      Cyan Worlds, Inc.
      14617 N Newport Hwy
      Mead, WA   99021

*==LICENSE==*/
#include "plDecalMtl.h"
#include "plDecalMtlBasicPB.h"
#include "../resource.h"
#include "iparamm2.h"

class DecalBasicPBAccessor;
extern DecalBasicPBAccessor basicAccessor;

class DecalBasicDlgProc : public ParamMap2UserDlgProc
{
protected:
    HIMAGELIST hLockButtons;

    void LoadLockButtons()
    {
        static bool loaded = false;
        if (loaded)
            return;
        loaded = true;  

        HINSTANCE hInst = hInstance;
        hLockButtons = ImageList_Create(16, 15, TRUE, 2, 0);
        HBITMAP hBitmap = LoadBitmap(hInstance, MAKEINTRESOURCE(IDB_BUTTONS));
        HBITMAP hMask   = LoadBitmap(hInstance, MAKEINTRESOURCE(IDB_MASKBUTTONS));
        ImageList_Add(hLockButtons, hBitmap, hMask);
        DeleteObject(hBitmap);
        DeleteObject(hMask);
    }
    void ISetLock(HWND hButton)
    {
        LoadLockButtons();

        ICustButton *iBut = GetICustButton(hButton);
        iBut->SetImage(hLockButtons,0,1,0,1,16,15);
        iBut->SetType(CBT_CHECK);
        ReleaseICustButton(iBut);
    }

public:
    DecalBasicDlgProc() : hLockButtons(NULL) {}
    ~DecalBasicDlgProc() { if (hLockButtons) ImageList_Destroy(hLockButtons); }

public:
    virtual BOOL DlgProc(TimeValue t, IParamMap2 *map, HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
    {
        IParamBlock2 *pb = map->GetParamBlock();

        switch (msg)
        {
        case WM_INITDIALOG:
            {
                ISetLock(GetDlgItem(hWnd, IDC_LOCK_AD));
                ISetLock(GetDlgItem(hWnd, IDC_LOCK_COLORS));
            }
            return TRUE;
        }
        return FALSE;
    }
    virtual void DeleteThis() {}
};
static DecalBasicDlgProc gDecalBasicDlgProc;

static ParamBlockDesc2 gDecalBasicPB
(
    plDecalMtl::kBlkBasic, _T("basic"), IDS_PASS_BASIC, GetDecalMtlDesc(),//NULL,
    P_AUTO_CONSTRUCT + P_AUTO_UI, plDecalMtl::kRefBasic,

    // UI
    IDD_PASS_BASIC, IDS_PASS_BASIC, 0, 0, &gDecalBasicDlgProc,

    // Color
    kDecalBasColorLock, _T("colorLock"),    TYPE_BOOL,          0, 0,
        p_ui,           TYPE_CHECKBUTTON, IDC_LOCK_AD,
        p_accessor,     &basicAccessor,
        end,
    kDecalBasColorAmb,  _T("ambColor"),     TYPE_RGBA,          P_ANIMATABLE, IDS_BASIC_AMB,
        p_ui,           TYPE_COLORSWATCH, IDC_LAYER_COLOR_AMB,
        p_accessor,     &basicAccessor,
        end,
    kDecalBasColor,     _T("color"),        TYPE_RGBA,          P_ANIMATABLE, IDS_BASIC_COLOR,
        p_ui,           TYPE_COLORSWATCH, IDC_LAYER_COLOR,
        p_default,      Color(1,1,1),
        p_accessor,     &basicAccessor,
        end,

    kDecalBasRunColor,      _T("runtimeColor"),     TYPE_RGBA,          P_ANIMATABLE, IDS_BASIC_RUNCOLOR,
        p_ui,           TYPE_COLORSWATCH, IDC_LAYER_RUNCOLOR,
        p_default,      Color(1,1,1),
        p_accessor,     &basicAccessor,
        end,
    kDecalBasDiffuseLock,   _T("diffuseLock"),  TYPE_BOOL,          0, 0,
        p_ui,           TYPE_CHECKBUTTON, IDC_LOCK_COLORS,
        p_accessor,     &basicAccessor,
        p_default,      TRUE,
        end,

    // Opacity
    kDecalBasOpacity,   _T("opacity"),      TYPE_INT,           P_ANIMATABLE, IDS_BASIC_OPAC,
        p_ui,           TYPE_SPINNER, EDITTYPE_INT, IDC_TR_EDIT, IDC_TR_SPIN, 0.4,
        p_range,        0, 100,
        p_default,      100,
        end,

    kDecalBasEmissive,  _T("emissive"),     TYPE_BOOL,          0, 0,
        p_ui,           TYPE_SINGLECHEKBOX, IDC_LAYER_EMISSIVE_CB,
        end,

    // Specularity
    kDecalBasUseSpec,       _T("useSpec"),      TYPE_BOOL,      0, 0,
        p_ui,               TYPE_SINGLECHEKBOX, IDC_SHADE_SPECULAR,
        p_enable_ctrls,     2, kDecalBasShine, kDecalBasShineStr,
        end,
    kDecalBasShine,         _T("shine"),        TYPE_INT,       0, 0,
        p_ui,               TYPE_SPINNER, EDITTYPE_INT, IDC_SH_EDIT, IDC_SH_SPIN, 0.4,
        p_range,            0, 100,
        end,
    kDecalBasSpecColor, _T("specularColor"),        TYPE_RGBA,          P_ANIMATABLE, IDS_BASIC_SPECCOLOR,
        p_ui,           TYPE_COLORSWATCH, IDC_LAYER_SPECCOLOR,
        p_default,      Color(0,0,0),
        end,

    // OBSOLETE--here so we can upgrade it to color if necessary
    kDecalBasShineStr,      _T("shineStr"),     TYPE_INT,       0, 0,
        p_range,        -1, 100,
        p_default,      -1,
        end,

    end
);
ParamBlockDesc2 *GetDecalBasicPB() { return &gDecalBasicPB; }

class DecalBasicPBAccessor : public PBAccessor
{
    bool        fColorLocked;

public:
    DecalBasicPBAccessor() : fColorLocked( false ) {}

    void Set(PB2Value& val, ReferenceMaker* owner, ParamID id, int tabIndex, TimeValue t)
    {
        plDecalMtl* mtl = (plDecalMtl*)owner;
        IParamBlock2 *pb = mtl->GetParamBlockByID(plDecalMtl::kBlkBasic);

        switch (id)
        {
        case kDecalBasColorLock:
            if (val.i)
                pb->SetValue(kDecalBasColor, t, pb->GetColor(kDecalBasColorAmb, t));
            break;

        case kDecalBasDiffuseLock:
            if (val.i)
                pb->SetValue(kDecalBasRunColor, t, pb->GetColor(kDecalBasColor, t));
            break;

        case kDecalBasColor:
        case kDecalBasColorAmb:
        case kDecalBasRunColor:
            ISyncLockedColors( id, pb, val, t );
            break;
        }
    }
    void Get(PB2Value& v, ReferenceMaker* owner, ParamID id, int tabIndex, TimeValue t, Interval &valid)
    {
    }

    void    ISyncLockedColors( ParamID settingID, IParamBlock2 *pb, PB2Value &val, TimeValue t )
    {
        int         i, numToSet = 0;
        ParamID     toSet[ 2 ];


        if( fColorLocked )
            return;
        fColorLocked = true;

        if( settingID == kDecalBasColorAmb && pb->GetInt( kDecalBasColorLock, t ) )
        {
            toSet[ numToSet++ ] = kDecalBasColor;
            if( pb->GetInt( kDecalBasDiffuseLock, t ) )
                toSet[ numToSet++ ] = kDecalBasRunColor;
        }
        else if( settingID == kDecalBasRunColor && pb->GetInt( kDecalBasDiffuseLock, t ) )
        {
            toSet[ numToSet++ ] = kDecalBasColor;
            if( pb->GetInt( kDecalBasColorLock, t ) )
                toSet[ numToSet++ ] = kDecalBasColorAmb;
        }
        else if( settingID == kDecalBasColor )
        {
            if( pb->GetInt( kDecalBasColorLock, t ) )
                toSet[ numToSet++ ] = kDecalBasColorAmb;
            if( pb->GetInt( kDecalBasDiffuseLock, t ) )
                toSet[ numToSet++ ] = kDecalBasRunColor;
        }

        for( i = 0; i < numToSet; i++ )
        {
            pb->SetValue( toSet[ i ], t, *val.p );
            pb->GetMap()->Invalidate( toSet[ i ] );
        }

        fColorLocked = false;
    }
};
static DecalBasicPBAccessor basicAccessor;