#include "testApp.h"

//--------------------------------------------------------------
//units ~ 10cm
//
void testApp::setup(){

	bLearnBakground = true;
	cam_angle=0;
	threshold = 80;

	loadSettings("settings.xml");

	vidPlayer.loadMovie("camoutput.mov"); //footage/ camera needs to be the same res as opencv planes and output
	vidPlayer.setLoopState(OF_LOOP_NORMAL);
        vidGrabber.setVerbose(true);
        if (vidGrabber.initGrabber(640,480)) {
		hasCamera=true;
		useCamera=true;
	}
	else
	{
		hasCamera=false;
		useCamera=false;
		vidPlayer.play();
	}

	colorImg.allocate(640,480);
	colorImg.setUseTexture(true);
	grayImage.allocate(640,480);
	grayBg.allocate(640,480);
	grayDiff.allocate(640,480);

	blobsManager.normalizePercentage = 0.7;
	blobsManager.giveLowestPossibleIDs = false;
	blobsManager.maxUndetectedTime = 500;
	blobsManager.minDetectedTime = 500;
	blobsManager.debugDrawCandidates = true;

	ofVec3f centre=ofVec3f(ofGetWidth()/2,0,0);
	ofVec3f normal=ofVec3f(0,0,-1);
	ray=ofRay();
	plane=ofPlane(centre,normal);
	plane.color=ofColor(255,255,255);

	projector=ofProjector(2.0f, ofVec2f(0.0f, 0.0f),ofGetWidth(),ofGetHeight()); //1.535f
	projector.setPosition(ofGetWidth()/2,ofGetHeight()/2,-ofGetWidth());
	projector.lookAt(ofVec3f(ofGetWidth()/2,ofGetHeight()/2,0),ofVec3f(0, -1, 0));

	cam=ofCamera();
	cam.setPosition(ofGetWidth()/2,ofGetHeight()/2,-ofGetWidth());
	cam.lookAt(ofVec3f(ofGetWidth()/2,ofGetHeight()/2,0),ofVec3f(0, -1, 0));
	cam.setFov(41.1); //39.85); //53.13);
	cam.cacheMatrices(); //stop error messages

	testpts=new ofVec3f[4];

	trapDoor=trapdoor(screen2plane(ofVec2f(ofGetWidth(),0)),screen2plane(ofVec2f(ofGetWidth(),ofGetHeight())),ofVec2f(30,30));
	updatePlane();

	mode=PLAY;


}

ofVec2f testApp::screen2plane(ofVec2f screenpos){
	ofVec3f p;
	ray=projector.castPixel(screenpos.x,screenpos.y);
	bool hit = plane.intersect(ray,p);
	return ofVec2f(p.x,pow(pow(p.y,2)+pow(p.z,2),0.5f));
}
ofVec3f testApp::plane2world(ofVec2f planepos){
	return ofVec3f(planepos.x,planepos.y,0);
}
bool testApp::rectsCross(ofRectangle rect1,ofRectangle rect2) {
	bool overlap=true; //must overlap in x and y
	if (rect1.x<rect2.x) {
		if (rect1.x+rect1.width<rect2.x) overlap = false;
	}
	else if (rect2.x<rect1.x) {
		if (rect2.x+rect2.width<rect1.x) overlap = false;
	}
	if (overlap) { //still possible
		if (rect1.y<rect2.y) {
			if (rect1.y+rect1.height<rect2.y) overlap = false;
		}
	else if (rect2.y<rect1.y) {
			if (rect2.y+rect2.height<rect1.y) overlap = false;
		}
	}
	return overlap;
}


void testApp::updatePlane(){
	plane.setNormal(ofVec3f(0,sin(cam_angle*DEG_TO_RAD),-cos(cam_angle*DEG_TO_RAD)));
	//create ground mesh with hole for trapdoor
	ground=ofMesh();
	ground.addVertex(ofVec3f(0,0,0));
	ground.addTexCoord(ofVec2f(0,0));
	ground.addVertex(ofVec3f(ofGetWidth(),0,0));
	ground.addTexCoord(ofVec2f(1,0));
	ground.addVertex(ofVec3f(ofGetWidth(),ofGetHeight(),0));
	ground.addTexCoord(ofVec2f(1,1));
	ground.addVertex(ofVec3f(0,ofGetHeight(),0));
	ground.addTexCoord(ofVec2f(0,1));

	vector<ofVec2f> corners=trapDoor.getCorners();
	ofVec2f screenCorners[4];

	for (int i=0;i<corners.size();i++) {

		ofNode axis;
		ofNode c;
		c.setParent(axis);

		c.setPosition(corners[i].x,corners[i].y,0);

		axis.rotate(cam_angle,1,0,0);

		ofVec3f p=c.getGlobalPosition();

		testpts[i]=p;
		ofVec3f s=cam.worldToScreen(p);
		//printf("corner %i: %f,%f,%f\n",i,s.x,s.y,s.z);
		screenCorners[i]=ofVec2f(s.x,s.y);

		ground.addVertex(s);
		ground.addTexCoord(ofVec2f(s.x/ofGetWidth(),s.y/ofGetHeight()));
	}
	//join a quad for each side
	// the 2 rear sides should always point towards the rear
	for (int i=0;i<3;i++) {
		ground.addTriangle(i,i+4,i+5);
		ground.addTriangle(i+5,i+1,i);
	}
	ground.addTriangle(3,7,0);
	ground.addTriangle(7,4,0);
	float x=min(screenCorners[0].x,screenCorners[3].x);
	float y=min(screenCorners[0].y,screenCorners[1].y);
	float w=max(screenCorners[1].x,screenCorners[2].x)-x;
	float h=max(screenCorners[2].y,screenCorners[3].y)-y;
	trapDoor.setBoundingRect(x,y,w,h);



}

//--------------------------------------------------------------
void testApp::update(){

    bool bNewFrame = false;

	if (useCamera) {
	       vidGrabber.grabFrame();
		bNewFrame = vidGrabber.isFrameNew();
	}else {
		vidPlayer.idleMovie();
		bNewFrame = vidPlayer.isFrameNew();
	}

	if (bNewFrame){

	if (useCamera) {
            colorImg.setFromPixels(vidGrabber.getPixels(), 640,480);
	}else {
            colorImg.setFromPixels(vidPlayer.getPixels(), 640,480);
        }

        grayImage = colorImg;
		if (bLearnBakground == true){
			grayBg = grayImage;		// the = sign copys the pixels from grayImage into grayBg (operator overloading)
			bLearnBakground = false;
		}

		// take the abs value of the difference between background and incoming and then threshold:
		grayDiff.absDiff(grayBg, grayImage);
		grayDiff.threshold(threshold);

		// find contours which are between the size of 20 pixels and 1/3 the w*h pixels.
		// also, find holes is set to true so we will get interior contours as well....

		//hard coded size threshold of 100 pix
		contourFinder.findContours(grayDiff, 200, (640*480)/3, 20, false);	// don't find holes

		blobsManager.update(contourFinder.blobs);
	}

}

//--------------------------------------------------------------
void testApp::draw(){
    ofBackground(0,0,0);
	cam.begin();

	if (trapDoor.checkUpdate(players)) updatePlane();

	switch(mode) {
		case PLAY:
			glDisable(GL_DEPTH_TEST);
			colorImg.draw(0,0,ofGetWidth(),ofGetHeight());
			ofSetHexColor(0x000000);
			ofRect(0,0,ofGetWidth(),ofGetHeight());
			//PITA
			ofSetHexColor(0xffffff);
			ofPushMatrix();
				ofRotate(cam_angle,1,0,0);
				trapDoor.draw();
			ofPopMatrix();
			ofSetHexColor(0xffffff);
		/*
			glEnable(GL_BLEND);
			glBlendFunc(GL_CONSTANT_ALPHA,GL_ONE);
			glBlendColor(1.0f,1.0f,1.0f, 0.5f);
			glDisable(GL_BLEND);
		*/

			bindTexture(colorImg);
			 ground.draw();
			unbindTexture(colorImg);

			/*
			glEnable(GL_BLEND);
			glBlendFunc(GL_CONSTANT_ALPHA,GL_ONE);
			glBlendColor(1.0f,0.5f,0.1f, 0.5f);
			ofRect(trapDoor.getBoundingRect());
			glDisable(GL_BLEND);
			*/
			for (int i = 0; i < contourFinder.nBlobs; i++){
				ofxCvBlob blob=contourFinder.blobs[i];
				if (rectsCross(blob.boundingRect,trapDoor.getBoundingRect())){
					//create outline mesh
					playeroutline=ofPolyline(blob.pts);
					tesselator.tessellateToMesh(playeroutline,OF_POLY_WINDING_NONZERO,player,true);
					for (int i=0;i<player.getNumVertices();i++) {
						ofVec3f v=player.getVertex(i);
						player.addTexCoord(ofVec2f(v.x,v.y));
					}

					//figure out if player has stood on trap door
					//get screen basepoint
					ofRectangle r=blob.boundingRect;
					ofVec2f blobBase=ofVec2f(r.x+(r.width/2),r.y+r.height-(r.width/2));
					if (trapDoor.getInnerRect().inside(blobBase.x,blobBase.y)) trapDoor.trigger();

					colorImg.getTextureReference().bind();
					player.draw(); //trapdoor.getoffset());
					colorImg.getTextureReference().unbind();
				}
			}

			Bird.update(players);

			ofPushMatrix();
				ofRotate(cam_angle,1,0,0);
				Bird.draw();
			ofPopMatrix();


		break;
		case CALIBRATE:
			ofFill();
			ofSetHexColor(0x333333);
			ofSetHexColor(0xa0a0a0);
			// we could draw the whole contour finder
			//contourFinder.draw(360,540);
			//keep running background average- how do you use a custom background
			ofSetHexColor(0xffffff);
			colorImg.draw(0,0,ofGetWidth(),ofGetHeight());

			ofPushMatrix();
				ofRotate(cam_angle,1,0,0);
				for (float i=0;i<=ofGetWidth();i+=ofGetWidth()/10) {
				glBegin(GL_LINES);
				    glVertex3f(i,0,0);
				    glVertex3f(i,ofGetWidth(),0);
				glEnd();
				glBegin(GL_LINES);
				    glVertex3f(0,i,0);
				    glVertex3f(ofGetWidth(),i,0);
				glEnd();
				}

				ofVec2f pp=screen2plane(pos);
				ofSphere(pp.x,pp.y,0,5);
			ofPopMatrix();

			ofPushMatrix();
				ofRotate(cam_angle,1,0,0);
				trapDoor.draw();
			ofPopMatrix();


			vector<ofVec3f> newPlayers;
			float movethresh=10;
			for(int i=0;i<blobsManager.blobs.size();i++){
				ofxCvBlob blob = blobsManager.blobs.at(i);
				ofRectangle r=blob.boundingRect;
				ofVec2f blobBase=ofVec2f(r.x+(r.width/2),r.y+r.height-(r.width/2));
				blob.draw(0,0);
				ofPoint p=blob.centroid;
				ofSetHexColor(0xffff00);
				char numStr[16];
				sprintf(numStr, "%i", i);
				ofDrawBitmapString(numStr, r.x, r.y);
				ofVec3f pp;
				ray=projector.castPixel(blobBase.x,blobBase.y); //(ofGetHeight()-y));
				bool hit = plane.intersect(ray,pp);
				for (int i=0;i<players.size();i++) {
					if (abs(players[i].x-pp.x)<10&&abs(players[i].z-pp.z)) {
						//identified a player
						//this is flawed: tracking boxes in a skewed axis
						//how to get UV coords on the plane
						//maybe rotate the camera instead of the plane

						//for the bird interaction, need to get player coords in the ground axis.
						//for the door interaction, need to build player outline in the screen axis

						//for the door, first determine if the boundings cross - create overlay
						//if the base centre is in the hole- trigger falling behaviour

					}
				}
				ofPushMatrix();
				ofTranslate(pp);
				ofRotate(cam_angle,1,0,0);
				ofBox(0,-10,0,20);
				//TODO get this into plane axis
				ofPopMatrix();

				//
			}


			// finally, a report:

			ofSetHexColor(0xffffff);
			char reportStr[1024];
			sprintf(reportStr, "threshold %i\nnum blobs found %i, fps: %f", threshold, contourFinder.nBlobs, ofGetFrameRate());
			ofDrawBitmapString(reportStr, 10, ofGetHeight()-40);
		break;
	}
	cam.end();
}

//--------------------------------------------------------------
void testApp::keyPressed(int key){

	switch (key){
		case ' ':
			bLearnBakground = true;
			break;
		case '+':
			threshold ++;
			if (threshold > 255) threshold = 255;
			break;
		case '-':
			threshold --;
			if (threshold < 0) threshold = 0;
			break;
		case 'a':
			cam_angle+=1;
			updatePlane();
			break;
		case 'z':
			cam_angle-=1;
			updatePlane();
			break;
		case 's':
			saveSettings("settings.xml");
			break;
		case '1':
			mode=PLAY;
			break;
		case '2':
			mode=CALIBRATE;
			break;
	}
}

//--------------------------------------------------------------
void testApp::keyReleased(int key){

}

//--------------------------------------------------------------
void testApp::mouseMoved(int x, int y ){

}

//--------------------------------------------------------------
void testApp::mouseDragged(int x, int y, int button){

}

//--------------------------------------------------------------
void testApp::mousePressed(int x, int y, int button){

}

//--------------------------------------------------------------
void testApp::mouseReleased(int x, int y, int button){
	pos=ofVec2f(x,y);
	//if (hit) printf("ray:%i,%i hit plane:%f,%f,%f\n",x,y,pos.x,pos.y,pos.z);
	//else printf("ray:%i,%i missed plane\n",x,y);
	trapDoor.startPos(screen2plane(pos));
	updatePlane();
}

//--------------------------------------------------------------
void testApp::windowResized(int w, int h){

}

//--------------------------------------------------------------
void testApp::gotMessage(ofMessage msg){

}

//--------------------------------------------------------------
void testApp::dragEvent(ofDragInfo dragInfo){

}

void testApp::loadSettings(string filename){
	if( !XML.loadFile(filename) ){
		printf("unable to load %s check data/ folder\n",filename.c_str());
	}else{
		cam_angle=ofToInt(XML.getAttribute("gauntlet","cam_angle","none",0));
		threshold=ofToInt(XML.getAttribute("gauntlet","threshold","none",0));
		printf("loaded %s\n",filename.c_str());
	}
}
//--------------------------------------------------------------
void testApp::saveSettings(string filename){
	XML.setAttribute("gauntlet","cam_angle",ofToString(cam_angle),0);
	XML.setAttribute("gauntlet","threshold",ofToString(threshold),0);
	XML.saveFile(filename);
	printf("saved %s\n",filename.c_str());
}