#include "testApp.h"
//--------------------------------------------------------------

/*

alternative - just have a horizontal scroll bar (contextual)
maybe draw into an FBO in order to put a window in a window

method to retreive text as a single string with \n's

set box size - draw scrollbar & set scrollpoint - drag to scroll

load & save

architecture :- text editor in a box or a window?

insertion point/ selection - set with mouse -

get and set clipboard (ofxFensterManager.h)

vector insert a problem performance wise?
you need to use an iterator to insert into a vector anyway- may as well use a list

*/
editorWindow::~editorWindow(){
	cout << "editor window destroyed" << endl;

}
void editorWindow::setup(){
    ofxFenster* win=ofxFensterManager::get()->createFenster(0, 0,  400, 400, OF_WINDOW);
	win->setWindowTitle("editor");
	win->addListener(this);
	selected=false;
	changed=false;
	text.push_back(string(""));
	output="";
	windowResized(400,400);
	insX=2;insY=2;
}
void editorWindow::windowResized(int _w, int _h){
	w=_w;h=_h;
	screen.allocate(w-insX-4,h-insY-4);
	printf("editor window resized to %ix%i\n",w,h);
	changed=true;
}
void editorWindow::draw(){
	if (w!=ofGetWidth()||h!=ofGetHeight()) windowResized(ofGetWidth(),ofGetHeight());
	if (changed) drawScreen();
	ofSetColor(255,255,255);
	screen.draw(insX,insY);
	if (!selected) {
		//draw insertion point
		if ((ofGetElapsedTimeMillis()/300)%2) {
		    ofRect((insertionPoint.column*8)+insX,(insertionPoint.row*12)+insY,2,10);
		}
	}
}	
void editorWindow::drawScreen(){
	screen.begin();
	ofBackground(0);
	ofDisableAlphaBlending();
	ofSetColor(255,255,255);
	for (int i=0;i<text.size();i++) {
	//handle tabs - this could be done in ofGLRenderer.cpp - void drawString
	ofDrawBitmapString(text[i],0,10+(i*12));
	}
	if (selected) {
		ofEnableAlphaBlending();
		ofSetColor(0,128,255,160);
		//draw selection
		if (selectionStart.row==selectionEnd.row) {
		    ofRect((selectionStart.column*8)+0,(selectionStart.row*12)+0,(selectionEnd.column-selectionStart.column)*8,12);
		}
		else {
		    ofRect((selectionStart.column*8)+0,(selectionStart.row*12)+0,(text[selectionStart.row].size()-selectionStart.column)*8,12);
		    for (int i=selectionStart.row+1;i<selectionEnd.row;i++) {
			ofRect(0,(i*12)+0,(text[i].size())*8,12);
		    }
		    ofRect(0,(selectionEnd.row*12)+0,(selectionEnd.column)*8,12);
		}
		ofDisableAlphaBlending();
	}
	screen.end();
	changed=false;
}
void editorWindow::keyPressed(int key){
	//printf("%i\n",key);
	changed=true;
	vector<string>::iterator i;
	string t;
	int l;
	unsigned char *c;
	switch (key) {
	case OF_KEY_DEL:
	    if (selected) deleteSelection();
	    else {
            if (insertionPoint.column<text[insertionPoint.row].size()-1) {
                text[insertionPoint.row].erase(insertionPoint.column,1);
            }
            else if (insertionPoint.row<text.size()-1) {
                text[insertionPoint.row]+=text[insertionPoint.row+1];
                i=text.begin()+insertionPoint.row;
                text.erase(i);
            }
	    }
	    break;
	case OF_KEY_BACKSPACE:
	    if (selected) deleteSelection();
	    else {
		if (insertionPoint.column) {
		    text[insertionPoint.row].erase(insertionPoint.column-1,1);
		    insertionPoint.column--;
		}
		else if (insertionPoint.row) {
		    insertionPoint.column=text[insertionPoint.row-1].size();
		    text[insertionPoint.row-1]+=text[insertionPoint.row];
		    i=text.begin()+insertionPoint.row;
		    text.erase(i);
		    insertionPoint.row--;
		}
	    }
	    break;
	case OF_KEY_RETURN:
	    deleteSelection();
		i=text.begin()+insertionPoint.row+1;
		t=text[insertionPoint.row].substr(insertionPoint.column);
		text[insertionPoint.row].erase(insertionPoint.column);
	    text.insert(i,t);
	    insertionPoint.row++;
	    insertionPoint.column=0;
	    break;
	case OF_KEY_LEFT:
	    if (insertionPoint.column>0) insertionPoint.column--;
		else if (insertionPoint.row>0) {
		    insertionPoint.row--;
		    insertionPoint.column=text[insertionPoint.row].size();
		}
	    break;
	case OF_KEY_UP:
	    if (insertionPoint.row>0) {
		insertionPoint.row--;
		insertionPoint.column=min(insertionPoint.column,(int)text[insertionPoint.row].size());
	    }
	    break;
	case OF_KEY_RIGHT:
	    if (insertionPoint.column<text[insertionPoint.row].size()) {
		insertionPoint.column++;
	    }
	    else {
		if (text.size()>insertionPoint.column) {
		    insertionPoint.row++;
		    insertionPoint.column=min(insertionPoint.column,(int)text[insertionPoint.row].size());
		}
	    }
	    break;
	case OF_KEY_DOWN:
	    if (insertionPoint.row<text.size()-1) {
		insertionPoint.row++;
		insertionPoint.column=min(insertionPoint.column,(int)text[insertionPoint.row].size());
	    }
	    break;
	case 24: //ctrl-x
		setClipboard(getSelection());
		deleteSelection();
		break;
	case 3: //ctrl-c
		setClipboard(getSelection());
		break;
	case 22: //ctrl-v
		deleteSelection();
		c=ofxFensterManager::get()->getClipboard();
		if (c>0) insertText(string(reinterpret_cast<const char *>(c)));
		break;
	default:
	    if (key==9) key=32; //convert tab to space for simplicity
	    if (key>31 && key<127) {
		deleteSelection();
		text[insertionPoint.row].insert(insertionPoint.column,1,(char)key);
		insertionPoint.column++;
	    }
    }
}
void editorWindow::keyReleased(int key){
    //key repeat?
}
void editorWindow::mousePressed(int x, int y, int button){
   selected=false;
    clickX=x;
    clickY=y;
	changed=true;
}
void editorWindow::mouseReleased(int x, int y, int button){
    if (clickX=x&&clickY==y) {
        insertionPoint=clickPos(x,y);
    }
    changed=true;
}
void editorWindow::mouseDragged(int x, int y, int button){
	texPt c1=clickPos(clickX,clickY);
	texPt c2=clickPos(x,y);
    if ((c1.row==c2.row&&c2.column>c1.column)||c2.row>c1.row) {
        selectionStart=c1;
        selectionEnd=c2;
    }
    else {
        selectionStart=c2;
        selectionEnd=c1;
    }
    if (selectionStart.row!=selectionEnd.row||selectionStart.column!=selectionEnd.column) selected=true;
    changed=true;
}
texPt editorWindow::clickPos(int x,int y) {
    texPt t;
    t.row=max(0,min((int)text.size()-1,(y-insY)/12));
    t.column=max(0,min((int)text[t.row].size(),(x-insX)/8));
    return t;
}
void editorWindow::insertText(string t){
   // printf("%s\n",t.c_str());
	for (int i=0;i<t.size();i++) if (t[i]==9) t[i]=32; //convert tab to space
	istringstream in(t);
	string line;
	vector<string> lines;
	int l=0;
	while(std::getline(in, line)) {
		lines.push_back(line);
	}
	//for (int i=0;i<lines.size();i++) printf("%i %s\n",i,lines[i].c_str());
	if (lines.size()==1) {
		text[insertionPoint.row].insert(insertionPoint.column,lines[0]);
		insertionPoint.column+=lines[0].size();
	}
	else {
		string t1=text[insertionPoint.row].substr(insertionPoint.column);
		vector<string>::iterator i=text.begin()+insertionPoint.row+1;
		text[insertionPoint.row].erase(insertionPoint.column);
		text[insertionPoint.row].insert(insertionPoint.column,lines[0]);
		for (int j=1;j<lines.size();j++) {
			//printf("about to insert %s after '%s'\n",lines[j].c_str(),text[insertionPoint.row+j-1].c_str());
			if (text.size()>insertionPoint.row+j) text.insert(i,lines[j]); //crashes on last iter?
			else text.push_back(lines[j]);
			i++;
		}
		insertionPoint.row+=lines.size()-1;
		if (text.size()>insertionPoint.column) {
			insertionPoint.column=text[insertionPoint.row].size();
			text[insertionPoint.row].append(t1);
		}
	}
}
void editorWindow::setClipboard(string text){
	char * cstr = new char [text.size()+1];
	strcpy (cstr, text.c_str());
	ofxFensterManager::get()->setClipboard(cstr);
	delete[] cstr;
}
string editorWindow::getSelection(){
	string t=text[selectionStart.row].substr(selectionStart.column);
	if (selectionStart.row==selectionEnd.row) {
		t.erase(selectionEnd.column-selectionStart.column);
	}
	else {
		for (int i=selectionStart.row+1;i<selectionEnd.row;i++) {
			t+="\n";
			t+=text[i];
		}
		//if (selectionEnd.column<text[selectionEnd.row].size()-1) {
		    t+="\n";
		    t+=text[selectionEnd.row].substr(0,selectionEnd.column);
		//}
	}
	//printf("selection:\n%s\n----------\n",t.c_str());
	return t;
}
void editorWindow::deleteSelection(){
    if (selected){
        string t=text[selectionEnd.row].substr(selectionEnd.column);
        text[selectionStart.row].erase(selectionStart.column);
        text[selectionStart.row]+=t;
        if (selectionEnd.row>selectionStart.row) {
            vector<string>::iterator i=text.begin()+selectionStart.row+1;
            vector<string>::iterator j=text.begin()+selectionEnd.row+1;
            text.erase(i,j);
        }
        insertionPoint=selectionStart;
        selected=false;
    }
}
string editorWindow::getText(){
	if (changed) {
		output =="";
		for (int i=0;i<text.size();i++) {
			output +=text[i];
			output +="\n";
		}
		changed=false;
	}
	return output;
}
//--------------------------------------------------------------

void testApp::setup(){
    ofBackground(0);
	ofSetColor(255);
    editorWin=new editorWindow();
	editorWin->setup();
}

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

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

}

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

}

//--------------------------------------------------------------
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){

}