#include "testApp.h"

/*
openBTS visualisation

ALL units relative to screen size in H or W

viewpoint dynamic? focus on 'interesting' events?

FRAMING

REPRESENTATION OF TIME

LABELLING & INFO

handset class
represents a handset

how to deal with time/ range being limited
-exponential
-choose VP carefully- perspective
-just decide the longest time that it will be active

scalability
-amount of text on screen

icons
-worthwhile?

call/sms -pointer from caller to callee

position update

function to interpolate position

*/

std::vector<std::string> split(std::string l, char delim)
{
    std::istringstream stm(l);
    std::vector<std::string> tokens;
    for (;;) {
        std::string word;
        if (!getline(stm, word, delim)) break;
        tokens.push_back(word);
    }
    return tokens;
}

void testApp::setup(){

    printf("setup: %ix%i on screen %ix%i\n",ofGetWidth(),ofGetHeight(),ofGetScreenWidth(),ofGetScreenHeight());

    int windowMode = ofGetWindowMode();
    if(windowMode == OF_FULLSCREEN){
        this->windowWidth = ofGetScreenWidth();
        this->windowHeight = ofGetScreenHeight();
    }
    else if(windowMode == OF_WINDOW){
        this->windowWidth = ofGetWidth();
        this->windowHeight = ofGetHeight();
    }

    //Q Why is it that if you put a camera at (0,0,-100) looking at (0,0,0) and an object at (0,0,0) the camera isn't pointing at the object?
    //A Because ortho is different
	/*
	camera.enableOrtho();
	camera.setPosition(-windowWidth/2,-windowHeight*4.1f,windowWidth);
	//camera.lookAt(ofVec3f(-windowWidth/2,-windowHeight,0),ofVec3f(0, 1, 0));
	camera.rotate(70,1,0,0);
	camera.cacheMatrices(); //stop error messages
    */

	ofSetFrameRate(25);

	ofSetCircleResolution(windowWidth);
	ofEnableSmoothing();

	camera.setPosition(0,windowHeight*10,windowHeight);
	camera.lookAt(ofVec3f(0,0,-windowHeight*.5),ofVec3f(0, 0, 1));
	camera.setFov(6.5);
	camera.cacheMatrices();

	numLines=100;

	lines = new ofPoint[numLines];
	imeis = new string[numLines];
	for (int i=0;i<numLines;i++) {
		float a=ofRandom(TWO_PI);
		float r=ofRandom(windowWidth/2);
		float l=ofRandom(windowHeight);
		lines[i]=ofPoint(a,r,-l); //polar coords
		for (int j=0;j<15;j++) {
			imeis[i]+=(char)(ofRandom(10)+48);
		}
	}

	start=10;
	end=15;


	bgimg.allocate(256,256,OF_IMAGE_COLOR);


	cols=new ofColor[4];
	cols[0]=ofColor(80,80,120);
	cols[1]=ofColor(80,80,80);
	cols[2]=ofColor(0,0,0);
	cols[3]=ofColor(0,0,0);
	float fi,fj,ifi,ifj;
	fi=0.0f;
	ifi=1.0f;
	float si=1.0f/bgimg.width;
	float sj=1.0f/bgimg.height;
	unsigned char* px=bgimg.getPixels();
	for (int i=0;i<bgimg.width;i++,fi+=si,ifi-=si){
		fj=0.0f;
		ifj=1.0f;
		for (int j=0;j<bgimg.height;j++,fj+=sj,ifj-=sj){
			px[(j*bgimg.width+i)*3]=(unsigned char)((ifj*((ifi*cols[0].r)+(fi*cols[1].r)))+(fj*((ifi*cols[2].r)+(fi*cols[3].r))));
			px[(j*bgimg.width+i)*3+1]=(unsigned char)((ifj*((ifi*cols[0].g)+(fi*cols[1].g)))+(fj*((ifi*cols[2].g)+(fi*cols[3].g))));
			px[(j*bgimg.width+i)*3+2]=(unsigned char)((ifj*((ifi*cols[0].b)+(fi*cols[1].b)))+(fj*((ifi*cols[2].b)+(fi*cols[3].b))));
		}
	}



    bgimg.setUseTexture(true);
    bgimg.update();

	icons=new ofImage[3];

	icons[0].loadImage("Phone.png");
	icons[1].loadImage("iPhone.png");
	icons[2].loadImage("Tablet.png");

	//create the socket and bind to port 7888
	udpConnection.Create();
	udpConnection.Bind(7888);
	udpConnection.SetNonBlocking(true);

}


//--------------------------------------------------------------
void testApp::update(){
	//check incoming messages
	//create device or update as necessary
	char udpMessage[1024];
	udpConnection.Receive(udpMessage,1024);
	string message=udpMessage;
	if(message.length()){
		vector<string> tokens=split(message,',');
		string imsi=tokens[0].substr(4);
		//long dev=atol(n.c_str()); something crazy going on. this always seems to read out 32 bits
		if (!tokens[0].substr(0,4).compare("IMSI")) { //not an event
			if (!devices.count(imsi)) {
				//create a new device at a random position
				float a=ofRandom(TWO_PI);
				float r=ofRandom(windowWidth/2);
				devices[imsi]=obtsDevice(imsi,icons,ofVec2f(a,r));
			}
			printf("%s\n",imsi.c_str());
		}
		else printf("%s\n",tokens[0].c_str());
	}
}

//--------------------------------------------------------------
void testApp::draw(){
	if (ofRandom(1.0)>0.99) start=min(99,start+1);
	if (ofRandom(1.0)>0.98) end=min(99,end+1);


	glDisable(GL_LIGHTING);
	bgimg.draw(0,0,windowWidth,windowHeight);

	camera.begin();

	//ofSphere(0,0,0,10);

	glDisable(GL_DEPTH_TEST);
	glDisable(GL_BLEND);

	ofPushMatrix();
	ofRotate(ofGetElapsedTimef(),0,0,1);

	ofNoFill();

	float rt=((ofGetElapsedTimef()*.25f)-floor(ofGetElapsedTimef()*.25f));
	for (float f=rt*(windowWidth/10);f<windowWidth*0.9;f+=windowWidth/10) {
		float rf=sin((f/(windowWidth*0.9))*TWO_PI);
		ofSetColor(0x7f*rf,0x7f*rf,0xff*rf,0xff*rf);
		ofEnableAlphaBlending();
		ofCircle(0,0,0,f);
		ofDisableAlphaBlending();
	}


	/*
	for (int i=start;i<end;i++) {
		float rf=sin((lines[i].y/(windowWidth*0.9))*TWO_PI);
		ofSetColor(0x8f*rf,0x8f*rf,0x8f*rf);
		ofLine(cos(lines[i].x)*lines[i].y,sin(lines[i].x)*lines[i].y,0,cos(lines[i].x)*lines[i].y,sin(lines[i].x)*lines[i].y,lines[i].z);
	}



	for (int i=start;i<end;i++) {
		float rf=sin((lines[i].y/(windowWidth*0.9))*TWO_PI);
		ofSetColor(0x8f*rf,0x8f*rf,0x8f*rf);
		ofVec3f p=camera.worldToScreen(ofVec3f(cos(lines[i].x)*lines[i].y,sin(lines[i].x)*lines[i].y,lines[i].z).rotated(ofGetElapsedTimef(),ofVec3f(0,0,1)),ofGetCurrentViewport());
		ofDrawBitmapString(imeis[i],p.x-20,p.y,p.z);
	}
	*/
	float timeScale=windowHeight/ofGetElapsedTimef();

	for (map<string,obtsDevice>::iterator i=devices.begin();i!=devices.end();i++){
		(*i).second.draw(timeScale);
	}

	ofPopMatrix();
	camera.end();

	ofSetHexColor(0xffffff);
	char reportStr[1024];
	sprintf(reportStr, "fps: %f", ofGetFrameRate());
	ofDrawBitmapString(reportStr, 10, windowHeight-10);

	//ofSaveFrame();
}

//--------------------------------------------------------------
void testApp::keyPressed(int key){
	switch (key){
		case ' ':
			ofSaveFrame();
			printf("[%8.2f] saved an image\n",ofGetElapsedTimef());
			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){

}

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

}

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

}

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

}