// NeL - MMORPG Framework <http://dev.ryzom.com/projects/nel/>
// Copyright (C) 2010  Winch Gate Property Limited
//
// This program is free software: you can redistribute it and/or modify
// it under the terms of the GNU Affero 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 Affero General Public License for more details.
//
// You should have received a copy of the GNU Affero General Public License
// along with this program.  If not, see <http://www.gnu.org/licenses/>.



#include "StdAfx.h"
#include "export_nel.h"
#include "nel/3d/flare_shape.h"
#include "nel/misc/path.h"


using namespace NL3D;


IShape* CExportNel::buildFlare(INode& node, TimeValue time)
{
	// build the shape
	CFlareShape *fshape = new CFlareShape;
	Point3 col;
	float persistence, size, spacing, attenuationRange, pos, maxViewDist = 1000.f, maxViewDistRatio = 0.9f;
	int   attenuable;
	int	  firstFlareKeepSize;
	int   hasDazzle;
	// retrieve the color of the flare from the node
	CExportNel::getValueByNameUsingParamBlock2(node, "ColorParam", (ParamType2)TYPE_RGBA, &col, 0);
	fshape->setColor(NLMISC::CRGBA((uint) (255.f * col.x), (uint) (255.f * col.y), (uint) (255.f * col.z)));
	// retrieve the persistence of the flare
	CExportNel::getValueByNameUsingParamBlock2(node, "PersistenceParam", (ParamType2)TYPE_FLOAT, &persistence, 0);
	fshape->setPersistence(persistence);
	// retrieve spacing of the flare
	CExportNel::getValueByNameUsingParamBlock2(node, "Spacing", (ParamType2)TYPE_FLOAT, &spacing, 0);
	fshape->setFlareSpacing(spacing);
	// retrieve use of radial attenuation
	CExportNel::getValueByNameUsingParamBlock2(node, "Attenuable", (ParamType2) TYPE_BOOL, &attenuable, 0);			
	if (attenuable)
	{
		fshape->setAttenuable();
		CExportNel::getValueByNameUsingParamBlock2(node, "AttenuationRange", (ParamType2) TYPE_FLOAT, &attenuationRange, 0);			
		fshape->setAttenuationRange(attenuationRange);
	}			
	CExportNel::getValueByNameUsingParamBlock2(node, "FirstFlareKeepSize", (ParamType2) TYPE_BOOL, &firstFlareKeepSize, 0);			
	fshape->setFirstFlareKeepSize(firstFlareKeepSize ? true : false); // avoid VC++ warning
	/// check for dazzle
	CExportNel::getValueByNameUsingParamBlock2(node, "HasDazzle", (ParamType2) TYPE_BOOL, &hasDazzle, 0);			
	if (hasDazzle)
	{
		fshape->enableDazzle();
		// get dazzle color
		CExportNel::getValueByNameUsingParamBlock2(node, "DazzleColor", (ParamType2) TYPE_RGBA, &col, 0);			
		fshape->setDazzleColor(NLMISC::CRGBA((uint) (255.f * col.x), (uint) (255.f * col.y), (uint) (255.f * col.z)));
		// get dazzle attenuation range
		CExportNel::getValueByNameUsingParamBlock2(node, "DazzleAttenuationRange", (ParamType2) TYPE_FLOAT, &attenuationRange, 0);			
		fshape->setDazzleAttenuationRange(attenuationRange);
	}
	/// retrieve maxViewDistRatio
	CExportNel::getValueByNameUsingParamBlock2(node, "MaxViewDist", (ParamType2) TYPE_FLOAT, &maxViewDist, 0);
	fshape->setMaxViewDist(maxViewDist);
	/// retrieve maxViewDistRatio
	CExportNel::getValueByNameUsingParamBlock2(node, "MaxViewDistRatio", (ParamType2) TYPE_FLOAT, &maxViewDistRatio, 0);
	fshape->setMaxViewDistRatio(maxViewDistRatio);
	// retrieve sizes & tex
	for (uint k = 0; k < MaxFlareNum; ++k)
	{
		char out[16]; sprintf(out, "size%d", k);
		CExportNel::getValueByNameUsingParamBlock2(node, out, (ParamType2)TYPE_FLOAT, &size, 0);
		fshape->setSize(k, size);
		// get relative position
		sprintf(out, "pos%d", k);
		CExportNel::getValueByNameUsingParamBlock2(node, out, (ParamType2)TYPE_FLOAT, &pos, 0);
		fshape->setRelativePos(k, pos);

		// check wether the flare is used
		int texUsed;
		sprintf(out, "flareUsed%d", k);
		CExportNel::getValueByNameUsingParamBlock2(node, out, (ParamType2) TYPE_BOOL, &texUsed, 0);			
		if (texUsed)
		{
			sprintf(out, "texFileName%d", k);
			// retrieve the texture name
			std::string fileName;
			CExportNel::getValueByNameUsingParamBlock2(node, out, (ParamType2) TYPE_STRING, &fileName, 0);
			if (_AbsolutePath)
			{
				fshape->setTexture(k, new NL3D::CTextureFile(fileName.c_str()));
			}
			else
			{				
				fshape->setTexture(k, new NL3D::CTextureFile(NLMISC::CFile::getFilename(fileName)));
			}
		}
		else
		{
			fshape->setTexture(k, NULL);
		}	
	}
	// retrieve the occlusion test mesh
	std::string occlusionTestMesh;
	if (CExportNel::getValueByNameUsingParamBlock2(node, "occlusionTestMesh", (ParamType2) TYPE_STRING, &occlusionTestMesh, 0))
	{	
		fshape->setOcclusionTestMeshName(NLMISC::CFile::getFilename(occlusionTestMesh));
	}
	//
	bool occlusionTestMeshInheritScaleRot;
	if (CExportNel::getValueByNameUsingParamBlock2(node, "occlusionTestMeshInheritScaleRot", (ParamType2) TYPE_BOOL, &occlusionTestMeshInheritScaleRot, 0))
	{	
		fshape->setOcclusionTestMeshInheritScaleRot(occlusionTestMeshInheritScaleRot != 0);
	}
	//
	int scaleWhenDisappear;
	if (CExportNel::getValueByNameUsingParamBlock2(node, "scaleWhenDisappear", (ParamType2) TYPE_BOOL, &scaleWhenDisappear, 0))
	{	
		fshape->setScaleWhenDisappear(scaleWhenDisappear != 0);
	}
	//
	float sizeDisappear;	
	if (CExportNel::getValueByNameUsingParamBlock2(node, "sizeDisappear", (ParamType2) TYPE_FLOAT, &sizeDisappear, 0))
	{	
		fshape->setSizeDisappear(sizeDisappear);
	}
	//
	float angleDisappear;
	if (CExportNel::getValueByNameUsingParamBlock2(node, "angleDisappear", (ParamType2) TYPE_FLOAT, &angleDisappear, 0))
	{	
		fshape->setAngleDisappear(angleDisappear);
	}
	//
	bool lookAtMode;
	if (CExportNel::getValueByNameUsingParamBlock2(node, "lookAtMode", (ParamType2) TYPE_BOOL, &lookAtMode, 0))
	{
		fshape->setLookAtMode(lookAtMode);
	}
	
	// Get the node matrix
	Matrix3 localTM;
	getLocalMatrix (localTM, node, time);			
	Point3  fp = localTM.GetTrans();
	// export default transformation
	fshape->getDefaultPos()->setDefaultValue( CVector(fp.x, fp.y, fp.z) );						
	return fshape;
}