#ifndef __Lighting_H__
#define __Lighting_H__

#include "SdkSample.h"

using namespace Ogre;
using namespace OgreBites;

const uint8 cPriorityMain = 50;
const uint8 cPriorityQuery = 51;
const uint8 cPriorityLights = 55;


class _OgreSampleClassExport Sample_Lighting : public SdkSample, public RenderObjectListener
{
public:

	Sample_Lighting() :
	  	mGreenLightAnimState(NULL),
		mYellowLightAnimState(NULL),
		mLight1BBFlare(NULL),
		mLight1BBQueryArea(NULL),
		mLight1BBQueryVisible(NULL),
		mLight2BBFlare(NULL),
		mLight2BBQueryArea(NULL),
		mLight2BBQueryVisible(NULL),
		mLight1QueryArea(NULL),
		mLight1QueryVisible(NULL),
		mLight2QueryArea(NULL),
		mLight2QueryVisible(NULL),
        mActiveQuery(NULL),
		mUseOcclusionQuery(false),
		mDoOcclusionQuery(false)
		
	{
		mInfo["Title"] = "Lighting";
		mInfo["Description"] = "Shows OGRE's lighting support. Also demonstrates "
			"usage of occlusion queries and automatic time-relative behaviour "
			"using billboards and controllers.";
		mInfo["Thumbnail"] = "thumb_lighting.png";
		mInfo["Category"] = "Lighting";
	}

	~Sample_Lighting()
	{
		RenderSystem* renderSystem = Ogre::Root::getSingleton().getRenderSystem();
		if (mLight1QueryArea != NULL) renderSystem->destroyHardwareOcclusionQuery(mLight1QueryArea);
		if (mLight1QueryVisible != NULL) renderSystem->destroyHardwareOcclusionQuery(mLight1QueryVisible);
		if (mLight2QueryArea != NULL) renderSystem->destroyHardwareOcclusionQuery(mLight2QueryArea);
		if (mLight2QueryVisible != NULL) renderSystem->destroyHardwareOcclusionQuery(mLight2QueryVisible);
	}

    bool frameRenderingQueued(const FrameEvent& evt)
    {
		// Move the lights along their paths
		mGreenLightAnimState->addTime(evt.timeSinceLastFrame);
		mYellowLightAnimState->addTime(evt.timeSinceLastFrame);

		// Modulate the light flare according to performed occlusion queries
		if (mUseOcclusionQuery)
		{
			// Stop occlusion queries until we get their information
			// (may not happen on the same frame they are requested in)
			mDoOcclusionQuery = false;
			
			// Check if all query information available
			if ((mLight1QueryArea->isStillOutstanding() == false) &&
				(mLight1QueryVisible->isStillOutstanding() == false) &&
				(mLight2QueryArea->isStillOutstanding() == false) &&
				(mLight2QueryVisible->isStillOutstanding() == false))
			{
				// Modulate the lights according to the query data
				unsigned int lightAreaCount;
				unsigned int lightVisibleCount;
				float ratio;
				
				mLight1QueryArea->pullOcclusionQuery(&lightAreaCount);
				mLight1QueryVisible->pullOcclusionQuery(&lightVisibleCount);
				ratio = float(lightVisibleCount) / float(lightAreaCount);
				mLight1BBFlare->setColour(mTrail->getInitialColour(0) * ratio);
				
				mLight2QueryArea->pullOcclusionQuery(&lightAreaCount);
				mLight2QueryVisible->pullOcclusionQuery(&lightVisibleCount);
				ratio = float(lightVisibleCount) / float(lightAreaCount);
				mLight2BBFlare->setColour(mTrail->getInitialColour(1) * ratio);

				// Request new query data
				mDoOcclusionQuery = true;
			}
		}


		return SdkSample::frameRenderingQueued(evt);   // don't forget the parent class updates!
    }

protected:

    void testCapabilities( const RenderSystemCapabilities* caps )
    {
        if (Ogre::Root::getSingletonPtr()->getRenderSystem()->getName().find("OpenGL ES 1") != String::npos)
        {
            OGRE_EXCEPT(Exception::ERR_NOT_IMPLEMENTED, "This sample uses 1D textures which are not supported in OpenGL ES 1.1, "
                "so you cannot run this sample. Sorry!", "Sample_Lighting::testCapabilities");
        }
    }

	void setupContent()
	{
		// Set our camera to orbit around the origin at a suitable distance
		mCameraMan->setStyle(CS_ORBIT);
		mCameraMan->setYawPitchDist(Radian(0), Radian(0), 400);

		mTrayMgr->showCursor();

		// Create an ogre head and place it at the origin
		Entity* head = mSceneMgr->createEntity("Head", "ogrehead.mesh");
		head->setRenderQueueGroup(cPriorityMain);
		mSceneMgr->getRootSceneNode()->attachObject(head);

		setupLights();
	}

	void setupLights()
	{
		
		mSceneMgr->setAmbientLight(ColourValue(0.1, 0.1, 0.1));  // Dim ambient lighting

		// Create a ribbon trail that our lights will leave behind
		NameValuePairList params;
		params["numberOfChains"] = "2";
		params["maxElements"] = "80";
		mTrail = (RibbonTrail*)mSceneMgr->createMovableObject("RibbonTrail", &params);
		mSceneMgr->getRootSceneNode()->attachObject(mTrail);
		mTrail->setMaterialName("Examples/LightRibbonTrail");
		mTrail->setTrailLength(400);
		mTrail->setRenderQueueGroup(cPriorityLights);
		
		// Create the occlusion queries to be used in this sample
		try {
			RenderSystem* renderSystem = Ogre::Root::getSingleton().getRenderSystem();
			mLight1QueryArea = renderSystem->createHardwareOcclusionQuery();
			mLight1QueryVisible = renderSystem->createHardwareOcclusionQuery();
			mLight2QueryArea = renderSystem->createHardwareOcclusionQuery();
			mLight2QueryVisible = renderSystem->createHardwareOcclusionQuery();

			mUseOcclusionQuery = (mLight1QueryArea != NULL) &&
				(mLight1QueryVisible != NULL) &&
				(mLight2QueryArea != NULL) &&
				(mLight2QueryVisible != NULL);
		}
		catch (Ogre::Exception e)
		{
			mUseOcclusionQuery = false;
		}

		if (mUseOcclusionQuery == false)
		{
			LogManager::getSingleton().logMessage("Sample_Lighting - Error: failed to create hardware occlusion query");
		}
		
		// Create the materials to be used by the objects used fo the occlusion query
		MaterialPtr matBase = MaterialManager::getSingleton().getByName("BaseWhiteNoLighting");
		MaterialPtr matQueryArea = matBase->clone("QueryArea");
		matQueryArea->setDepthWriteEnabled(false);
		matQueryArea->setColourWriteEnabled(false);
		matQueryArea->setDepthCheckEnabled(false); // Not occluded by objects
		MaterialPtr matQueryVisible = matBase->clone("QueryVisible");
		matQueryVisible->setDepthWriteEnabled(false);
		matQueryVisible->setColourWriteEnabled(false);
		matQueryVisible->setDepthCheckEnabled(true); // Occluded by objects

		SceneNode* node;
		Animation* anim;
		NodeAnimationTrack* track;
		Light* light;
		BillboardSet* bbs;
		
		// Create a light node
		node = mSceneMgr->getRootSceneNode()->createChildSceneNode(Vector3(50, 30, 0));

		// Create a 14 second animation with spline interpolation
		anim = mSceneMgr->createAnimation("Path1", 14);
		anim->setInterpolationMode(Animation::IM_SPLINE);

		track = anim->createNodeTrack(1, node);  // Create a node track for our animation

		// Enter keyframes for our track to define a path for the light to follow
		track->createNodeKeyFrame(0)->setTranslate(Vector3(50, 30, 0));
		track->createNodeKeyFrame(2)->setTranslate(Vector3(100, -30, 0));
		track->createNodeKeyFrame(4)->setTranslate(Vector3(120, -80, 150));
		track->createNodeKeyFrame(6)->setTranslate(Vector3(30, -80, 50));
		track->createNodeKeyFrame(8)->setTranslate(Vector3(-50, 30, -50));
		track->createNodeKeyFrame(10)->setTranslate(Vector3(-150, -20, -100));
		track->createNodeKeyFrame(12)->setTranslate(Vector3(-50, -30, 0));
		track->createNodeKeyFrame(14)->setTranslate(Vector3(50, 30, 0));

		// Create an animation state from the animation and enable it
		mYellowLightAnimState = mSceneMgr->createAnimationState("Path1");
		mYellowLightAnimState->setEnabled(true);

		// Set initial settings for the ribbon mTrail and add the light node
		mTrail->setInitialColour(0, 1.0, 0.8, 0);
		mTrail->setColourChange(0, 0.5, 0.5, 0.5, 0.5);
		mTrail->setInitialWidth(0, 5);
		mTrail->addNode(node);
		

		// Attach a light with the same colour to the light node
		light = mSceneMgr->createLight();
		light->setDiffuseColour(mTrail->getInitialColour(0));
		node->attachObject(light);

		// Attach a flare with the same colour to the light node
		bbs = mSceneMgr->createBillboardSet(1);
		mLight1BBFlare = bbs->createBillboard(Vector3::ZERO, mTrail->getInitialColour(0));
		bbs->setMaterialName("Examples/Flare");
		bbs->setRenderQueueGroup(cPriorityLights);
		node->attachObject(bbs);

		if (mUseOcclusionQuery)
		{
			// Attach a billboard which will be used to get a relative area occupied by the light
			mLight1BBQueryArea = mSceneMgr->createBillboardSet(1);
			mLight1BBQueryArea->setDefaultDimensions(10,10);
			mLight1BBQueryArea->createBillboard(Vector3::ZERO);
			mLight1BBQueryArea->setMaterialName("QueryArea");
			mLight1BBQueryArea->setRenderQueueGroup(cPriorityQuery);
			node->attachObject(mLight1BBQueryArea);

			// Attach a billboard which will be used to get the visible area occupied by the light
			mLight1BBQueryVisible = mSceneMgr->createBillboardSet(1);
			mLight1BBQueryVisible->setDefaultDimensions(10,10);
			mLight1BBQueryVisible->createBillboard(Vector3::ZERO);
			mLight1BBQueryVisible->setMaterialName("QueryVisible");
			mLight1BBQueryVisible->setRenderQueueGroup(cPriorityQuery);
			node->attachObject(mLight1BBQueryVisible);
		}

		// Create a second light node
		node = mSceneMgr->getRootSceneNode()->createChildSceneNode(Vector3(-50, 100, 0));

		// Create a 10 second animation with spline interpolation
		anim = mSceneMgr->createAnimation("Path2", 10);
		anim->setInterpolationMode(Animation::IM_SPLINE);

		track = anim->createNodeTrack(1, node);  // Create a node track for our animation

		// Enter keyframes for our track to define a path for the light to follow
		track->createNodeKeyFrame(0)->setTranslate(Vector3(-50, 100, 0));
		track->createNodeKeyFrame(2)->setTranslate(Vector3(-100, 150, -30));
		track->createNodeKeyFrame(4)->setTranslate(Vector3(-200, 0, 40));
		track->createNodeKeyFrame(6)->setTranslate(Vector3(0, -150, 70));
		track->createNodeKeyFrame(8)->setTranslate(Vector3(50, 0, 30));
		track->createNodeKeyFrame(10)->setTranslate(Vector3(-50, 100, 0));

		// Create an animation state from the animation and enable it
		mGreenLightAnimState = mSceneMgr->createAnimationState("Path2");
		mGreenLightAnimState->setEnabled(true);

		// Set initial settings for the ribbon mTrail and add the light node
		mTrail->setInitialColour(1, 0.0, 1.0, 0.4);
		mTrail->setColourChange(1, 0.5, 0.5, 0.5, 0.5);
		mTrail->setInitialWidth(1, 5);
		mTrail->addNode(node);

		// Attach a light with the same colour to the light node
		light = mSceneMgr->createLight();
		light->setDiffuseColour(mTrail->getInitialColour(1));
		node->attachObject(light);

		// Attach a flare with the same colour to the light node
		bbs = mSceneMgr->createBillboardSet(1);
		mLight2BBFlare = bbs->createBillboard(Vector3::ZERO, mTrail->getInitialColour(1));
		bbs->setMaterialName("Examples/Flare");
		bbs->setRenderQueueGroup(cPriorityLights);
		node->attachObject(bbs);
		
		if (mUseOcclusionQuery)
		{
			// Attach a billboard which will be used to get a relative area occupied by the light
			mLight2BBQueryArea = mSceneMgr->createBillboardSet(1);
			mLight2BBQueryArea->setDefaultDimensions(10,10);
			mLight2BBQueryArea->createBillboard(Vector3::ZERO);
			mLight2BBQueryArea->setMaterialName("QueryArea");
			mLight2BBQueryArea->setRenderQueueGroup(cPriorityQuery);
			node->attachObject(mLight2BBQueryArea);

			// Attach a billboard which will be used to get the visible area occupied by the light
			mLight2BBQueryVisible = mSceneMgr->createBillboardSet(1);
			mLight2BBQueryVisible->setDefaultDimensions(10,10);
			mLight2BBQueryVisible->createBillboard(Vector3::ZERO);
			mLight2BBQueryVisible->setMaterialName("QueryVisible");
			mLight2BBQueryVisible->setRenderQueueGroup(cPriorityQuery);
			node->attachObject(mLight2BBQueryVisible);
		}

		// Setup the listener for the occlusion query
		if (mUseOcclusionQuery)
		{
			mSceneMgr->addRenderObjectListener(this);
			mDoOcclusionQuery = true;
		}
	}

	// Event raised when render single object started.
	virtual void notifyRenderSingleObject(Renderable* rend, const Pass* pass, const AutoParamDataSource* source, 
			const LightList* pLightList, bool suppressRenderStateChanges)
	{
		//
		// The following code activates and deactivates the occlusion queries
		// so that the queries only include the rendering of their intended targets
		//

		// Close the last occlusion query
		// Each occlusion query should only last a single rendering
		if (mActiveQuery != NULL)
		{
			mActiveQuery->endOcclusionQuery();
			mActiveQuery = NULL;
		}

		// Open a new occlusion query
		if (mDoOcclusionQuery == true)
		{
			// Check if a the object being rendered needs
			// to be occlusion queried, and by which query instance.
			if (rend == mLight1BBQueryArea) 
				mActiveQuery = mLight1QueryArea;
			else if (rend == mLight1BBQueryVisible) 
				mActiveQuery = mLight1QueryVisible;
			else if (rend == mLight2BBQueryArea) 
				mActiveQuery = mLight2QueryArea;
			else if (rend == mLight2BBQueryVisible) 
				mActiveQuery = mLight2QueryVisible;
			
			if (mActiveQuery != NULL)
			{
				mActiveQuery->beginOcclusionQuery();
			}
		}
	}

	AnimationState* mGreenLightAnimState;
	AnimationState* mYellowLightAnimState;

	RibbonTrail* mTrail;

	Billboard* mLight1BBFlare;
	BillboardSet* mLight1BBQueryArea;
	BillboardSet* mLight1BBQueryVisible;
	Billboard* mLight2BBFlare;
	BillboardSet* mLight2BBQueryArea;
	BillboardSet* mLight2BBQueryVisible;

	HardwareOcclusionQuery* mLight1QueryArea;
	HardwareOcclusionQuery* mLight1QueryVisible;
	HardwareOcclusionQuery* mLight2QueryArea;
	HardwareOcclusionQuery* mLight2QueryVisible;
	HardwareOcclusionQuery* mActiveQuery;

	bool mUseOcclusionQuery;
	bool mDoOcclusionQuery;
};

#endif