/*==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 "plSimulationInterface.h"

#include "plgDispatch.h"
#include "plPhysical.h"
#include "hsBounds.h"
#include "hsStream.h"
#include "hsResMgr.h"
#include "plSceneObject.h"
#include "pnMessage/plEnableMsg.h"
#include "pnMessage/plIntRefMsg.h"
#include "pnMessage/plWarpMsg.h"
#include "pnMessage/plSimulationSynchMsg.h"
#include "pnMessage/plSimulationMsg.h"
#include "pnMessage/plNodeRefMsg.h"
#include "pnKeyedObject/plKey.h"

plSimulationInterface::plSimulationInterface() : fPhysical(nil)
{
}

plSimulationInterface::~plSimulationInterface()
{
}

void plSimulationInterface::ISetSceneNode(plKey newNode)
{
    if (fPhysical)
        fPhysical->SetSceneNode(newNode);
}

void plSimulationInterface::SetProperty(int prop, hsBool on)
{
    plObjInterface::SetProperty(prop, on);      // set the property locally

    if (fPhysical)
        fPhysical->SetProperty(prop, on ? true : false);
}

void plSimulationInterface::SetTransform(const hsMatrix44& l2w, const hsMatrix44& w2l)
{
    if (fPhysical)
        fPhysical->SetTransform(l2w, w2l);
}

void plSimulationInterface::ClearLinearVelocity()
{
    if (fPhysical)
        fPhysical->ClearLinearVelocity();
}

void plSimulationInterface::Read(hsStream* s, hsResMgr* mgr)
{
    plObjInterface::Read(s, mgr);

    // fProps is already read by plObjInterface, but we'll do it again here to
    // avoid breaking the format
    fProps.Read(s);
    // Also unnecessary
    int poop = s->ReadSwap32();

    plIntRefMsg* refMsg = TRACKED_NEW plIntRefMsg(GetKey(), plRefMsg::kOnCreate, 0, plIntRefMsg::kPhysical, 0);
    mgr->ReadKeyNotifyMe(s, refMsg, plRefFlags::kActiveRef);
}

void plSimulationInterface::Write(hsStream* s, hsResMgr* mgr)
{
    plObjInterface::Write(s, mgr);

    // Legacy crap
    fProps.Write(s);
    s->WriteSwap32(0);

    mgr->WriteKey(s, fPhysical);
}

void plSimulationInterface::ReleaseData()
{
    plPhysical *physical = fPhysical;

    if (physical)
    {
        // To get rid of our data, we need to release our active ref and tell the SceneNode
        // to dump it. It will autodestruct after those two active refs are released, unless
        // someone else has a ref on it as well (in which case we don't want to be nuking it
        // anyway).
        if (physical->GetSceneNode())
        {
            plKey nodeKey = physical->GetSceneNode();

            nodeKey->Release(physical->GetKey());
        }

        GetKey()->Release(physical->GetKey());
    }
}

hsBool plSimulationInterface::MsgReceive(plMessage* msg)
{
    plIntRefMsg* intRefMsg = plIntRefMsg::ConvertNoRef(msg);
    if (intRefMsg)
    {
        switch (intRefMsg->fType)
        {
        case plIntRefMsg::kPhysical:
            if (intRefMsg->GetContext() & (plRefMsg::kOnDestroy|plRefMsg::kOnRemove))
            {
                plPhysical* phys = plPhysical::ConvertNoRef(intRefMsg->GetRef());
                // *** for some reason, we sometimes get a null pointer here
                // *** if we do, we're just going to ignore it for now
                if (phys)
                {
                    hsAssert(phys == fPhysical, "Removing Physical I don't have");
                    fPhysical = nil;
                }
            }
            else
            {
                fPhysical = plPhysical::ConvertNoRef(intRefMsg->GetRef());
            }
            return true;
        }
    }

    plEnableMsg* pEnableMsg = plEnableMsg::ConvertNoRef(msg);
    if (pEnableMsg)
    {
        SetProperty(kDisable, pEnableMsg->Cmd(kDisable));
        SetProperty(kPinned, pEnableMsg->Cmd(kDisable));
        return true;
    }

    plWarpMsg* pWarpMsg = plWarpMsg::ConvertNoRef(msg);
    if (pWarpMsg)
    {
        if (fPhysical)
        {
            hsMatrix44 l2w = pWarpMsg->GetTransform();
            hsMatrix44 inv;
            l2w.GetInverse(&inv);
            SetTransform(l2w, inv);
            if (pWarpMsg->GetWarpFlags() & plWarpMsg::kZeroVelocity)
            {
                ClearLinearVelocity();
            }
        }
    }

    plSimulationMsg* pSimMsg = plSimulationMsg::ConvertNoRef(msg);
    if (pSimMsg)
    {
        if (fPhysical)
            fPhysical->MsgReceive(pSimMsg);
    }
    
    return plObjInterface::MsgReceive(msg);
}

// Export only. Use messages for runtime.
void plSimulationInterface::SetPhysical(plPhysical* ph)
{
    fPhysical = ph;
}

plPhysical* plSimulationInterface::GetPhysical() const
{
    return fPhysical;
}