/lenasys/trunk

var startx = 0;

var starty = 0;

var deltax = 0;

var deltay = 0;	

var gridsize = 20;

// Multi-select move offset

var offsx = 0;

var offsy = 0;

// Drawing Globals -- For while in transit drawing

var drawlinesx;

var drawlinesy;

var drawlinedx;

var drawlinedy;

var drawlinekind = 0;

// List of objects

var Objects = new Array();

// List of identifiers 

var Selected = new Array();

// List of selected object identifiers 

var Identifiers = new Array();

// The context object

var ContextObj;

// Mouse Down Result

var downRes;

// User Interface Mode Variables

var multiselect = 0;

var dragsensitivity = 12;

var sidetol = 12;

var printstr;

/*

 *  User interface callbacks

 */

function handler_mouseup() {

	if(clickstate == 1) {

		// Either select on/off for multi or single select

		if(multiselect) {

			if(Selected[downRes.objid]) {

				Selected[downRes.objid] = false;

			} else {

				Selected[downRes.objid] = true;

			}

		} else {

			if(ContextObj == downRes.objid) {

					ContextObj = "";

			} else {

				ContextObj = downRes.objid;

			}

		}

	} else if(clickstate == 8) {

		// Draw Attribute Line

		upRes=mouseover(gridx,gridy);

		if(upRes.code != "None") {

			obj = Objects[downRes.objid];

			if(upRes.typ == "ERAttribute" || upRes.typ == "Entity" || upRes.typ == "ERRel") {

				obj.DrawtoID = upRes.objid;

				obj.DrawfromSide = downRes.side;

				if(upRes.side != "None") {

					obj.DrawtoSide = upRes.side;

					obj.DrawtoPerc = upRes.sideperc;

				} else {

					upobj = Objects[downRes.objid];

					var sid = 1;

					var	perco = 0.5;

					var x1g = Math.abs(upRes.x1 - gridx);

					var x2g = Math.abs(upRes.x2 - gridx);

					var y1g = Math.abs(upRes.y1 - gridy);

					var y2g = Math.abs(upRes.y2 - gridy);

					if(x1g <= x2g && x1g <= y1g && x1g <= y2g){

						sid = 1;

						perco = makesideperc(gridy, upRes.y1, upRes.y2);

					} else if(x2g <= x1g && x2g <= y1g && x2g <= y2g){

						sid = 3;

						perco = makesideperc(gridy, upRes.y1, upRes.y2);

					} else if(y1g <= x1g && y1g <= x2g && y1g <= y2g){

						sid = 4;

						perco = makesideperc(gridx, upRes.x1, upRes.x2);

					} else if(y2g <= x1g && y2g <= x2g && y2g <= y1g){

						sid = 2;

						perco = makesideperc(gridx, upRes.x1, upRes.x2);

					}

					obj.DrawtoSide = sid;

					obj.DrawtoPerc = perco;

				}

				if(upRes.typ == "ERAttribute" || upRes.typ == "ERRel") obj.DrawtoPerc = 0.5;

			}

		}

	} else if(clickstate == 9) {

		// Draw Relationship line

		upRes = mouseover(gridx, gridy);

		if(upRes.code != "None") {

			obj = Objects[downRes.objid];

			if(upRes.side != "None") {

				if(obj.DrawtoID == "None") {

					obj.DrawtoID = upRes.objid;

					obj.DrawtoSide = upRes.side;

					obj.DrawtoPerc = upRes.sideperc;

					obj.DrawfromSide = downRes.side;

				} else {

					obj.DrawtoIDDest = upRes.objid;

					obj.DrawtoSideDest = upRes.side;

					obj.DrawtoPercDest = upRes.sideperc;

					obj.DrawfromSideDest = downRes.side;										

				}

			} else {

				upobj = Objects[downRes.objid];

				var sid = 1;

				var	perco = 0.5;

				var x1g = Math.abs(upRes.x1-gridx);

				var x2g = Math.abs(upRes.x2-gridx);

				var y1g = Math.abs(upRes.y1-gridy);

				var y2g = Math.abs(upRes.y2-gridy);

				if(x1g <= x2g && x1g <= y1g && x1g <= y2g) {

					sid = 1;

					perco = makesideperc(gridy, upRes.y1, upRes.y2);

				} else if(x2g <= x1g && x2g <= y1g && x2g <= y2g) {

					sid = 3;

					perco = makesideperc(gridy, upRes.y1, upRes.y2);

				} else if(y1g <= x1g && y1g <= x2g && y1g <= y2g) {

					sid = 4;

					perco = makesideperc(gridx, upRes.x1, upRes.x2);

				} else if(y2g <= x1g && y2g <= x2g && y2g <= y1g){

					sid = 2;

					perco = makesideperc(gridx, upRes.x1, upRes.x2);

				}									

				if(obj.DrawtoID == "None") {

					obj.DrawtoID = upRes.objid;

					obj.DrawtoSide = sid;

					obj.DrawtoPerc = perco;

					obj.DrawfromSide = downRes.side;										

				} else {

					obj.DrawtoIDDest = upRes.objid;

					obj.DrawtoSideDest = sid;

					obj.DrawtoPercDest = perco;

					obj.DrawfromSideDest = downRes.side;										

				}

			}								

		}

	}

	clickstate = 0;

	cpsel = 0;

	drawlinekind = 0;		

}

/*

 *	Mouse down state

 */

function handler_mousedown() {

	clickstate = 1;

	downRes = mouseover(gridx, gridy);

	startx = gridx;

	starty = gridy;	

}

/*

 *	Mouse move

 */

function handler_mousemove(cx, cy) {

//			gridx=Math.round((cx-(gridsize/2.0))/gridsize)*gridsize;

//			gridy=Math.round((cy-(gridsize/2.0))/gridsize)*gridsize;				

	gridx = cx;

	gridy = cy;

	deltax = startx - gridx;

	deltay = starty - gridy;		

	// We start drag mode

	if((distance(gridx, gridy, startx, starty) > dragsensitivity) && clickstate == 1) {

		clickstate = 2;

	}

	// We are in drag mode				

	if(clickstate == 2) {																										

		// Single Object Move - If Not Selected, Or if Selected and Center Area Is Dragged

		if((downRes.typ == "Entity" || downRes.typ == "ERAttribute" || downRes.typ == "ERRel") && (downRes.code == "NonSel" || (downRes.code == "Cont" && downRes.side == "None") || (downRes.code == "ContDraw" && downRes.side == "None"))) {

			clickstate = 3;

		}

		// Single Object Scale Left

		if((downRes.typ == "Entity" || downRes.typ == "ERAttribute") && (downRes.code == "Cont" && downRes.side == "1")) {

			clickstate=4;

		}

		// Single Object Scale Bottom

		if((downRes.typ == "Entity" || downRes.typ == "ERAttribute") && (downRes.code == "Cont" && downRes.side == "2")) {

			clickstate=5;

		}

		// Single Object Scale Right

		if((downRes.typ == "Entity" || downRes.typ == "ERAttribute") && (downRes.code == "Cont" && downRes.side == "3")) {

			clickstate=6;

		}

		// Single Object Scale Top

		if((downRes.typ == "Entity" || downRes.typ == "ERAttribute") && (downRes.code == "Cont" && downRes.side == "4")) {

			clickstate=7;

		}

		if(downRes.typ == "ERAttribute" && downRes.code == "ContDraw" && downRes.side != "None") {													

			clickstate=8; // Attribute Connection Draw

			drawlinekind=1;	// Tell drawing engine to draw attribute line symbol

			if(downRes.side == "1") {

				drawlinesx = downRes.x1; // Initiate start parameters for line drawing left side

				drawlinesy = downRes.y1 + ((downRes.y2 - downRes.y1) * 0.5);									

			} else if(downRes.side == "2") {

				drawlinesx = downRes.x1 + ((downRes.x2 - downRes.x1) * 0.5); // Initiate start parameters for line drawing bottom side

				drawlinesy = downRes.y2;

			} else if(downRes.side == "3") {

				drawlinesx = downRes.x2; // Initiate start parameters for line drawing left side

				drawlinesy = downRes.y1 + ((downRes.y2 - downRes.y1) * 0.5);									

			} else if(downRes.side == "4") {

				drawlinesx = downRes.x1 + ((downRes.x2 - downRes.x1) * 0.5); // Initiate start parameters for line drawing bottom side

				drawlinesy = downRes.y1;

			}

			drawlinedx = drawlinesx;

			drawlinedy = drawlinesy;	

		}

		if(downRes.typ == "ERRel" && downRes.code == "ContDraw" && downRes.side != "None") {						

			var obj=Objects[downRes.objid];													

			if(downRes.side != obj.DrawfromSide && downRes.side != obj.DrawfromSideDest) {

				clickstate = 9; // Attribute Connection Draw

				drawlinekind = 1; // Tell drawing engine to draw relation line symbol 

				if(downRes.side == "1") {

					drawlinesx = downRes.x1; // Initiate start parameters for line drawing left side

					drawlinesy = downRes.y1 + ((downRes.y2 - downRes.y1) * 0.5);									

				} else if(downRes.side == "2") {

					drawlinesx = downRes.x1 + ((downRes.x2 - downRes.x1) * 0.5); // Initiate start parameters for line drawing bottom side

					drawlinesy = downRes.y2;

				} else if(downRes.side == "3") {

					drawlinesx = downRes.x2; // Initiate start parameters for line drawing left side

					drawlinesy = downRes.y1 + ((downRes.y2 - downRes.y1) * 0.5);									

				} else if(downRes.side == "4") {

					drawlinesx = downRes.x1 + ((downRes.x2 - downRes.x1) * 0.5); // Initiate start parameters for line drawing bottom side

					drawlinesy = downRes.y1;

				}

				drawlinedx = drawlinesx;

				drawlinedy = drawlinesy;

			}

		}				

	}

	if(clickstate > 2) {

		var obj = Objects[downRes.objid];

	}

	if(clickstate == 3) { // We are in single rectangular object move 

		obj.x1 = downRes.x1 - deltax;

		obj.y1 = downRes.y1 - deltay;

		obj.x2 = downRes.x2 - deltax;

		obj.y2 = downRes.y2 - deltay;

	} else if(clickstate == 4) { // We are in single rectangular object scale left 

		if((obj.x2 - downRes.x1 + deltax) > 60) obj.x1 = downRes.x1 - deltax;

	} else if(clickstate == 5) { // We are in single rectangular object scale bottom

		if((downRes.y2 - obj.y1 - deltay) > 40) obj.y2 = downRes.y2 - deltay;

	} else if(clickstate==6) {	// We are in single rectangular object scale right

		if((downRes.x2 - obj.x1 - deltax) > 60) obj.x2 = downRes.x2 - deltax;

	} else if(clickstate == 7) { // We are in single rectangular object scale top

		if((obj.y2 - downRes.y1 + deltay) > 40) obj.y1 = downRes.y1 - deltay;

	} else if(clickstate == 8 || clickstate == 9) { // We are in straight connective line drawing mode 

		drawlinedx = gridx;

		drawlinedy = gridy;

	}

}

/*

 *	Call-forward for mouse-over event

 */

function mouseover(x, y) {

	// Code of touch, and if available object id and id of side of object that was touched

	// Tolerances included as constant

	var obj_code = "None";

	var obj_id = "None";

	var obj_sidentifier =" None";

	var obj_sideperc = 0;

	var obj_centerdist = 0;

	var obj_type = "None";

	var obj_x1 = 0; 

	var obj_y1 = 0; 

	var obj_x2 = 0; 

	var obj_y2 = 0;

	var Cont;

	var found = 0;

	var side;

	for(j = 0; j < Identifiers.length; j++) {

		var objid = Identifiers[j];

		var obj = Objects[objid];				

		var Sel = Selected[objid];

		if(ContextObj == objid) {

			Cont = 1;

		} else {

			Cont = 0;

		}

		// Compute coordinates including offset

		if(obj.type == "Entity" || obj.type == "ERAttribute" || obj.type == "ERRel") {										

			x1 = obj.x1 + offsx;

			y1 = obj.y1 + offsy;

			x2 = obj.x2 + offsx;

			y2 = obj.y2 + offsy;

			rx = (x2 - x1) * 0.5;

			ry = (y2 - y1) * 0.5;

		}

		found = 0;

		// For each kind of clickable object, check if we are inside object and if so assign variables

		// Any general properties for all object types are set when "found" is true

		if(obj.type == "Entity") {				

			if(x > (x1 - sidetol) && y > (y1 - sidetol ) && x < (x2 + sidetol) && y < (y2 + sidetol)) {

				obj_code = "NonSel";

				if(Sel) {

					obj_code = "Sel";

				}

				if(Cont) {

					obj_code = "Cont";

				}

				side = computeside(x, y, x1, y1, x2, y2, sidetol);

				obj_sidentifier = side.side;

				obj_sideperc = side.perc;

				obj_centerdist = side.dist;					

				found = 1;																	

			}

		} else if(obj.type=="ERAttribute") {

				if(x > (x1 - sidetol) && y > (y1 - sidetol) && x < (x2 + sidetol) && y < (y2 + sidetol)) {

					obj_code = "NonSel";

					if(Sel) {

						obj_code="Sel";

					}							

					if(Cont) {

						if(obj.DrawtoID == "None") {

							obj_code = "ContDraw";											

						} else {

							obj_code = "Cont";

						}

					} 

					side = computeside(x, y, x1, y1, x2, y2, sidetol);

					obj_sidentifier = side.side;

					obj_sideperc = side.perc;

					obj_centerdist = side.dist;

					found = 1;

				}

		} else if(obj.type == "ERRel") {

			if(x > (x1 - sidetol) && y > (y1 - sidetol) && x < (x2 + sidetol) && y < (y2 + sidetol)) {

				xk = x - x1;

				// Colision detection against diamond

				var inside = 0;																		

				if(xk <= rx) {

					if(y > (y1 + ry - xk - sidetol) && y < (y1 + ry + xk + sidetol)) {

						inside = 1;

					}

				} else {

					if(y > (y1 - rx + xk - sidetol) && y < ( y2 + rx - xk + sidetol)) {

						inside = 1;

					}

				}

				if(inside) {	

					if((x > (x1 - sidetol)) && (x < (x1 + sidetol)) && (y > (y1 + ry - sidetol)) && (y < (y1 + ry + sidetol))) {

						obj_sidentifier = 1;

					}

					if((x > (x1 + rx - sidetol)) && (x < (x1 + rx + sidetol)) && (y > (y2 - sidetol)) && (y < (y2 + sidetol))) {

						obj_sidentifier = 2;

					}

					if((x > (x2 - sidetol)) && (x < (x2 + sidetol)) && (y > (y1 + ry - sidetol)) && (y < (y1 + ry + sidetol))) {

						obj_sidentifier = 3;

					}

					if((x > (x1 + rx - sidetol)) && (x < (x1 + rx + sidetol)) && (y > (y1 - sidetol)) && (y < (y1 + sidetol))) {

						obj_sidentifier = 4;

					}

					obj_code = "NonSel";

					if(Sel) {

						obj_code = "Sel";

					}

					if(Cont) {

						if(obj.DrawtoID == "None"){

							obj_code = "ContDraw";											

						} else if(obj.DrawtoIDDest == "None") {

							obj_code = "ContDraw";											

						} else {

							obj_code = "Cont";

						}

					} 

					obj_sideperc = 0.5;

					found = 1;

				}

			}			

		}

		if(found == 1) {

			// Save coordinates at time of click									

			obj_x1 = x1;

			obj_y1 = y1;

			obj_x2 = x2;

			obj_y2 = y2;						

			obj_id = objid;

			obj_type = obj.type;

			printstr=obj_id + " " + obj_sidentifier + " " + obj_sideperc;

		}

	}						

	return {

		objid:obj_id,

		code:obj_code,

		side:obj_sidentifier,

		sideperc:obj_sideperc,

		centerdist:obj_centerdist,

		typ:obj_type,

		x1:obj_x1,

		y1:obj_y1,

		x2:obj_x2,

		y2:obj_y2

	}

}

/*

 * Turns JSON data into jQuery objects 

 */

function importdata() {				

	for(i = 0; i < 7; i++) {

		if(i == 0) {

			obj = jQuery.parseJSON('{"type":"ERAttribute","id":"ATT1","kind":"Multiple","name":"Addressfosoppooo","x1":220,"y1":100,"x2":300,"y2":140, "DrawtoID":"None", "DrawfromSide":"None","DrawtoSide":"None", "DrawtoPerc":"None", "DrawX1":"", "DrawY1":"", "DrawX2":"","DrawY2":""}');

		}

		if(i == 1) {

			obj = jQuery.parseJSON('{"type":"Entity","id":"ENT2","kind":"Weak","name":"Carsmashoepppoloo","x1":100,"y1":160,"x2":220,"y2":220}');

		}

		if(i == 2) {

			obj = jQuery.parseJSON('{"type":"ERAttribute","id":"ATT3","kind":"Key","name":"SSNFooomesPoo","x1":160,"y1":260,"x2":260,"y2":300, "DrawtoID":"None", "DrawfromSide":"None","DrawtoSide":"None", "DrawtoPerc":"None", "DrawX1":"", "DrawY1":"", "DrawX2":"","DrawY2":""}');

		}

		if(i == 3) {

			obj = jQuery.parseJSON('{"type":"Entity","id":"ENT4","kind":"Strong","name":"Trailerfpdddpeoooooe","x1":320,"y1":260,"x2":420,"y2":320}');

		}

		if(i == 4) {

			obj = jQuery.parseJSON('{"type":"Entity","id":"ENT5","kind":"Strong","name":"Grail","x1":120,"y1":440,"x2":220,"y2":480}');

		}

		if(i == 5) {

			obj = jQuery.parseJSON('{"type":"ERRel","id":"REL6","kind":"Strong","name":"FGFool","x1":460,"y1":160,"x2":520,"y2":220, "DrawtoID":"None", "DrawfromSide":"None","DrawtoSide":"None", "DrawtoPerc":"0", "DrawtoCard":"N", "DrawtoRole":"Fumo", "DrawtoXoffs":"20", "DrawtoYoffs":"50", "DrawtoIDDest":"None",  "DrawfromSideDest":"None","DrawtoSideDest":"None", "DrawtoPercDest":"0", "DrawtoDestCard":"N", "DrawtoDestRole":"Luma", "DrawtoDestXoffs":"0", "DrawtoDestYoffs":"-50", "DrawX1":"", "DrawY1":"", "DrawX2":"","DrawY2":"","DrawX3":"", "DrawY3":"", "DrawX4":"","DrawY4":""}');

		}

		if(i == 6) {

			obj = jQuery.parseJSON('{"type":"ERRel","id":"REL7","kind":"Weak","name":"PODrool","x1":360,"y1":360,"x2":420,"y2":420, "DrawtoID":"None",  "DrawfromSide":"None","DrawtoSide":"None", "DrawtoPerc":"0", "DrawtoCard":"N", "DrawtoRole":"Kumo", "DrawtoXoffs":"60", "DrawtoYoffs":"70", "DrawtoIDDest":"None",  "DrawfromSideDest":"None","DrawtoSideDest":"None", "DrawtoPercDest":"0", "DrawtoDestCard":"N", "DrawtoDestRole":"Zuuma", "DrawtoDestXoffs":"40", "DrawtoDestYoffs":"50", "DrawX1":"", "DrawY1":"", "DrawX2":"","DrawY2":"","DrawX3":"", "DrawY3":"", "DrawX4":"","DrawY4":""}');

		}

		objid = obj.id;

		Objects[objid] = obj;

		Identifiers.push(objid);

	}

}

/* 

 * 	prepareobj

 * 	Prepares all kinds of objects, with local movement-offset (scrolling offset is handled with transforms??)

 * 	Ofss in prepare are not finished.

 */

function prepareobj(obji) {

	var fromobj = Objects[obji];

	// Attributes are prepared by re-pointing the DrawX1, DrawY1, DrawX2 and DrawY2 variables and Relationships are prepared by re-pointing DrawX1-DrawX4 and DrawY1-DrawY4

	if((fromobj.type == "ERAttribute" || fromobj.type == "ERRel") && fromobj.DrawtoID != "None") {									

		var toid = fromobj.DrawtoID;

		var toobj = Objects[toid];

		var sidek;

		if(fromobj.DrawtoIDDest != "None" && fromobj.DrawtoIDDest != undefined) {

			var toiddest = fromobj.DrawtoIDDest;

			var toobjdest = Objects[toiddest];						

			sidek = makeside(fromobj.DrawfromSideDest, fromobj.x1, fromobj.y1, fromobj.x2, fromobj.y2, 0.5);

			fromobj.DrawX3 = sidek.x;

			fromobj.DrawY3 = sidek.y;

			sidek = makeside(fromobj.DrawtoSideDest, toobjdest.x1, toobjdest.y1, toobjdest.x2, toobjdest.y2, fromobj.DrawtoPercDest);

			fromobj.DrawX4 = sidek.x;

			fromobj.DrawY4 = sidek.y;

		}

		//printstr=fromobj.DrawfromSide+" "+fromobj.x1+" "+fromobj.y1+" "+fromobj.x2+" "+fromobj.y2+" :: "+fromobj.DrawtoSide+" "+toobj.x1+" "+toobj.y1+" "+toobj.x2+" "+toobj.y2+" "+fromobj.DrawtoPerc;				

		sidek = makeside(fromobj.DrawfromSide, fromobj.x1, fromobj.y1, fromobj.x2, fromobj.y2, 0.5);

		fromobj.DrawX1 = sidek.x;

		fromobj.DrawY1 = sidek.y;				

		sidek = makeside(fromobj.DrawtoSide, toobj.x1, toobj.y1, toobj.x2, toobj.y2, fromobj.DrawtoPerc);

		fromobj.DrawX2 = sidek.x; 

		fromobj.DrawY2 = sidek.y;						

	}

}

/*

 * 	Drawobj

 * 	Draws all kinds of objects, with local movement-offset (scrolling offset is handled with transforms??)

 */

function drawobj(obji) {

	var obj = Objects[obji];

	var Sel = Selected[obji];

	if(ContextObj == obji) {

		Cont = 1;