// aimsClick.js
/*
*  JavaScript template file for ArcIMS HTML Viewer
*		dependent on aimsXML.js, ArcIMSparam.js, aimsCommon.js, aimsMap.js,
*		aimsLayers.js, aimsDHTML.js
*		aimsNavigation.js
*/

aimsClickPresent=true;

var onOVArea = false;

// Global vars to save mouse position
var mouseX=0;
var mouseY=0;
var x1=0;
var y1=0;
var x2=0;
var y2=0;
var zleft=0;
var zright=0;
var ztop=0;
var zbottom=0;

var totalMeasure=0;
var currentMeasure=0;
var lastTotMeasure=0;

// variables for interactive clicks
var clickCount = 0;
var	clickPointX = new Array();
var clickPointY = new Array();
var clickMeasure = new Array();

	// type - 1=Measure; 2=SelectLine ; 3=SelectPolygon
var clickType = 1;

var shapeSelectBuffer = false;

var panning=false;
var zooming=false;
var selectBox=false;
var blankImage = "images/map.gif";

var leftButton =1;
var rightButton = 2;
if (isNav) {
	leftButton = 1;
	rightButton = 3;
}


/*  *****************************************************
*	Point click functions
* 	used by Measure and Select by Line/Polygon
*	*****************************************************
*/

// put a point at click and add to clickCount
function clickAddPoint() {
	if(isIE)
		mouseClickXY[clickCount] = (mouseX-2)  + ", "  + (mouseY-2);
		
	var theX = mouseX;
	var theY = mouseY;
	getMapXY(theX,theY);
	clickPointX[clickCount]=mapX;
	clickPointY[clickCount]=mapY;
	clickCount += 1;
	selectCount=0;
	totalMeasure = totalMeasure + currentMeasure;
		//var u = Math.pow(10,numDecimals);
		//if (totalMeasure!=0) totalMeasure = parseInt(totalMeasure*u+0.5)/u;

	clickMeasure[clickCount]=totalMeasure;
	
	if(isIE){
		drawRubberBand();
	}else if( (toolMode != 20) || (clickCount > 1)){
		legendTemp=legendVisible;
		legendVisible=false;
		var theString = writeXML();
		var theNum = 99;
		showRetrieveMap();
		sendToServer(imsURL,theString,theNum);
	}
}

// zero out all clicks in clickCount
function resetClick() {
	var c1 = clickCount;
	clickCount=0;
	clickPointX.length=1;
	clickPointY.length=1;
	currentMeasure=0;
	totalMeasure=0;
	lastTotMeasure=0;
	clickMeasure.length=1;
	selectCount=0;
	
	legendTemp=legendVisible;
	legendVisible=false;
	var theString = writeXML();
	var theNum = 99;

	showRetrieveMap();
	sendToServer(imsURL,theString,theNum);
		
	if (toolMode==20) {
		clearRubberBand();
		updateMeasureBox();
	}
	
	if (toolMode==999) {
		clearRubberBand();
		
	}
}	

// remove last click from clickCount
function deleteClick() {
	var c1 = clickCount;
	clickCount=clickCount-1;
	selectCount=0;
	if (clickCount<0) clickCount=0;
	if (clickCount>0) {
		totalMeasure = clickMeasure[clickCount]
		clickPointX.length=clickCount;
		clickPointY.length=clickCount;
		clickMeasure.length=clickCount;
		
	} else {
		totalMeasure=0;
		clickMeasure[0]=0;
	}
	currentMeasure=0;
	if (c1>0) {
		legendTemp=legendVisible;
		legendVisible=false;
		var theString = writeXML();
		var theNum = 99;
		sendToServer(imsURL,theString,theNum);
	}
	
}


//keep track of currently selected tool, and display it to user
// set the imsMap cursor tool
function clickFunction (toolName) {
	modeBlurb = toolName;
	clearRubberBand(toolName);  //added to try to get rid of the rubberband produced when using the lat lon tool--Resz
//alert("The Tool Name is ")
		//alert(modeBlurb)
	switch(toolName) {
	// Zooming functions
	case "zoomin":
		// zoom in mode
		toolMode = 1;
		panning=false;
		selectBox=false;
		setCursor("theTop", "crosshair");
		modeBlurb = modeList[0];
		break;
	case "zoomout":
		// zoom out mode
		toolMode = 2;
		panning=false;
		selectBox=false;
		setCursor("theTop", "crosshair");
		modeBlurb = modeList[1];
		break;
	case "zoomlast":
		zoomBack();
		panning=false;
		zooming=false;
		selectBox=false;
		break;
	case "zoomactive":
		var q = LayerExtent[ActiveLayerIndex].split("|");
		panning=false;
		zooming=false;
		selectBox=false;
		//zoomToEnvelope(parseFloat(q[0]),parseFloat(q[1]),parseFloat(q[2]),parseFloat(q[3]));
		
		var l = parseFloat(setDecimalString(q[0]));
		var b = parseFloat(setDecimalString(q[1]));
		var r = parseFloat(setDecimalString(q[2]));
		var t = parseFloat(setDecimalString(q[3]));
		var w = r-l;
		var h = t-b;
		// add a bit of a margin around the layer
		var wm = w * (5/100);
		var hm = h * (5/100);
		l = l - wm;
		r = r + wm;
		b = b - hm;
		t = t + hm;
		zoomToEnvelope(l,b,r,t);
		break;
	case "fullextent":
		startExtent();
		break;
		
	// Pan functions
	case "pan":
		// pan mode
		toolMode = 3;
		zooming=false;
		selectBox=false;
		setCursor("theTop", "move");
		modeBlurb = modeList[2];
		break;

	// Identify-Hyperlink functions
	case "identify":
		// identify mode - layer attributes - requires aimsIdentify.js
		panning=false;
		zooming=false;
		selectBox=false;
		shapeSelectBuffer = false;
		showBuffer = false;
		if (canQuery) {
			toolMode = 4;
			setCursor("theTop", "crosshair");
			modeBlurb = modeList[3];
		} else {
			alert(msgList[46]);
		}		
		
		showGeocode=false;
		if (useTextFrame) parent.TextFrame.document.location= appDir + "text.htm";
		break;
////////////////////////////////////////		
//	 case "coordinate":
 //       toolMode = 2000;
 //         initCoordinateForm();
 //         break;			
	
	//latlon functions	
	case "latlon":
		panning=false;
		zooming=false;
		selectBox=false;
		shapeSelectBuffer = false;		
		toolMode = 999;
		setCursor("theTop", "crosshair");
		parent.TOCFrame.location = "latlon.htm";
		break;
		
/////////////////////////////////////////

	case "identifyall":
		// identify drill mode
		panning=false;
		zooming=false;
		selectBox=false;
		shapeSelectBuffer = false;
		toolMode = 5;
		if (canQuery) {
			setCursor("theTop", "crosshair");
			modeBlurb = modeList[20]; // identify visible features
		} else {
			alert(msgList[46]);
		}

		showGeocode=false;
		drawSelectBoundary=false;
		if (useTextFrame) parent.TextFrame.document.location= appDir + "text.htm";
		break;
		
	case "hyperlink":
		// hyperlink mode - requires aimsIdentify.js
		var isOk = false;
		var j=-1;
		panning=false;
		zooming=false;
		selectBox=false;
		shapeSelectBuffer = false;
		toolMode = 15;
		modeBlurb = modeList[9];
		showGeocode=false;
		if (useTextFrame) parent.TextFrame.document.location= appDir + "text.htm";
		var isOk = checkHyperLinkLayer(ActiveLayerIndex)
		if (isOk) {
			if (canQuery) {
				setCursor("theTop", "crosshair");
				
			} else {
				alert(msgList[46]);
			}
			//alert("Function Not Implemented");
		} else {
			currentHyperLinkLayer="";
			currentHyperLinkField="";
			alert(msgList[47]);

		}
		break;
		
	case "hyperlinkany":
		// hyperlink mode - requires aimsIdentify.js
		var j=-1;
		panning=false;
		zooming=false;
		selectBox=false;
		shapeSelectBuffer = false;
		toolMode = 30;
		modeBlurb = modeList[9];
		showGeocode=false;
		if (useTextFrame) parent.TextFrame.document.location= appDir + "text.htm";
			if (canQuery) {
				setCursor("theTop", "crosshair");
				
			} else {
				alert(msgList[46]);
			}
			//alert("Function Not Implemented");
		break;
		
	// Measure-Unit function
	case "measure":
		panning=false;
		zooming=false;
		selectBox=false;
		shapeSelectBuffer = false;
		//if (clickCount>0) {
		//	if (totalMeasure==0) resetClick();
		//}
		toolMode = 20;
		setCursor("theTop", "crosshair");
		modeBlurb = modeList[12];
		if (clickType==1) 
			parent.TOCFrame.location= appDir + "measure.htm";
		showGeocode=false;
		break;
		
	case "setunits":
		if (useTextFrame) {
			parent.TextFrame.location = "setUnits.htm";
		} else {
			window.open((appDir + "setUnits.htm"),"OptionWindow","width=575,height=120,scrollbars=yes,resizable=yes");
		}
		break;
		
	// Graphic Selection functions
	case "shape":
		panning=false;
		zooming=false;
		selectBox=false;
		shapeSelectBuffer = false;
		toolMode = 21;
		setCursor("theTop", "crosshair");

		modeBlurb = modeList[13];
	
		showGeocode=false;

		break;
		
	case "selectbox":
		panning=false;
		zooming=false;
		// select mode - requires aimsSelect.js
		if (canQuery) {
			toolMode = 10;
			clickCount=0;
			//mj changed to true..was false..didn't work. buffer still not working
			showBuffer=false;
			setCursor("theTop", "crosshair");

			modeBlurb = modeList[4];
		} else {
			alert(msgList[46]);
		}
		//alert("Function Not Implemented");
		showGeocode=false;
		if (useTextFrame) parent.TextFrame.document.location= appDir + "text.htm";
		break;
		
	case "selectpoint":
		panning=false;
		zooming=false;
		shapeSelectBuffer = false;
		// select mode - requires aimsSelect.js
		if (canQuery) {
			toolMode = 11;
			clickCount=0;
			 resetClick();
			setCursor("theTop", "hand");

			modeBlurb = modeList[5];
		} else {
			alert(msgList[46]);
		}
		//alert("Function Not Implemented");
		showGeocode=false;
		showBuffer=false;
		break;
		
	case "selectline":
		panning=false;
		zooming=false;
		shapeSelectBuffer = false;
		// select mode - requires aimsSelect.js
		if (canQuery) {
			toolMode = 12;
			setCursor("theTop", "crosshair");
			if (useTextFrame) {
				parent.TextFrame.document.location= appDir + "selectline.htm";
			} else {
				Win1 = open("selectline.htm","QueryWindow","width=575,height=150,scrollbars=yes,resizable=yes");
			}
			modeBlurb = modeList[6];
		} else {
			alert(msgList[46]);
		}
		//alert("Function Not Implemented");
		showGeocode=false;
		showBuffer=false;
		break;
		
	case "selectpoly":
		panning=false;
		zooming=false;
		shapeSelectBuffer = false;
		// select mode - requires aimsSelect.js
		if (canQuery) {
			toolMode = 13;
			setCursor("theTop", "crosshair");
			if (useTextFrame) {
				parent.TextFrame.document.location= appDir + "selectpoly.htm";
			} else {
				Win1 = open("selectpoly.htm","QueryWindow","width=575,height=150,scrollbars=yes,resizable=yes");
			}
			modeBlurb = modeList[7];
		} else {
			alert(msgList[46]);
		}
		//alert("Function Not Implemented");
		showGeocode=false;
		showBuffer=false;
		break;
		
	case "selectshape":
		panning=false;
		zooming=false;
		shapeSelectBuffer = false;
		// select mode - requires aimsSelect.js
		if (canQuery) {
			toolMode = 16;
			setCursor("theTop", "crosshair");
			if (useTextFrame) {
				parent.TextFrame.document.location= appDir + "select.htm";
			} else {
				Win1 = open("select.htm","QueryWindow","width=575,height=150,scrollbars=yes,resizable=yes");
			}
			modeBlurb = modeList[8];
		} else {
			alert(msgList[46]);
		}
		//alert("Function Not Implemented");
		showGeocode=false;
		showBuffer=false;
		break;
	///*	
	case "buffershape":
		panning=false;
		zooming=false;
		
		// interactive shape buffer - not implemented
		if (canQuery) {
			toolMode = 17;
			//toolMode = 16;
			shapeSelectBuffer = true;
			setCursor("theTop", "crosshair");
			if (useTextFrame) {
				parent.TextFrame.document.location= appDir + "shapeBuffer.htm";
			} else {
				Win1 = open("shapeBuffer.htm","QueryWindow","width=575,height=150,scrollbars=yes,resizable=yes");
			}
			modeBlurb = modeList[11];
		} else {
			alert(msgList[46]);
		}
		//alert("Function Not Implemented");
		showGeocode=false;
		showBuffer=false;
		break;

	// Query - Search - Find functions
	//if ((toolName=="attributesel") || (toolName=="query")) {
	case "query":
		// query mode - requires aimsQuery.js
		panning=false;
		zooming=false;
		selectBox=false;
		shapeSelectBuffer = false;
		queryStartRecord=1;
		//toolMode=
		if (canQuery) {	
			LayerFields.length=1;
			LayerFieldType.length=1;
			LayerFieldCount=0;
			toolMode=8;
			modeBlurb=modeList[15];
			
			fieldIndex=0;
			setQueryString="";
			queryForm();
		} else {
			alert(msgList[46]);
		}
		showGeocode=false;
		showBuffer=false;
		break;
		
	case "storedquery":
		// storedquery mode - requires aimsQuery.js
		panning=false;
		zooming=false;
		selectBox=false;
		shapeSelectBuffer = false;
		queryStartRecord=1;
		toolMode=51;
		modeBlurb="Search";
		if (canQuery) {	
			toolMode=51;
			modeBlurb=modeList[16];
			fieldIndex=0;
			setQueryString="";
			getStoredQueries();
		} else {
			alert(msgList[46]);
		}
		showGeocode=false;
		showBuffer=false;
		break;
		
	case "find":
		//find
		toolMode=9;
		panning=false;
		zooming=false;
		selectBox=false;
		shapeSelectBuffer = false;
		queryStartRecord=1;
		parent.ButtonFrame.locateproperty();
		break;
		
	case "clearsel":
		 clearSelection();
		 break;
		 
	// Buffer function
	case "buffer":
		//buffer - requires aimsBuffer.js
		if (checkSelected()) {
			toolMode = 25;
			writeBufferForm();	
		} else {
			showBuffer=false;
			alert(msgList[48]);
		}
		break;
		
	case "options":
		writeOptionForm();
		break;
		
	// Print function	
	case "print":
		 printIt();
		 break;
		 
	// custom modes
	case "dbidentify":
		panning=false;
		zooming=false;
		selectBox=false;
		shapeSelectBuffer = false;
		// identify mode - requires custom db query - not in basic
		if (canQuery) {
			toolMode = 40;
			setCursor("theTop", "hand");

			modeBlurb = modeList[3];
		} else {
			alert(msgList[46]);
		}
		//alert("Function Not Implemented");
		
		showGeocode=false;
		if (useTextFrame) parent.TextFrame.document.location= appDir + "text.htm";
		break;
		
		
	case "extract":
		 extractIt();
		 break;
		 
	case "legend":
		if (aimsLegendPresent) {
			if (imsURL!="") {
				if (hasTOC) {
					if (legendVisible) {
						legendVisible=false;
						parent.TOCFrame.document.location=appDir+"toc.htm";
					} else {
						legendVisible=true;
						getLegend();
					}
				} else {
					legendVisible=true;
					getLegend();
				}
			} else {
				alert(msgList[45]);
			}
		} else {
			alert(msgList[50]);
		}
		break;
		
	case "layerlist":
		// put LayerList in separate window
		writeLayerListForm();
		break;
		
	default:
		alert(msgList[51]);
	}
	modeName=modeBlurb;
	if (useModeFrame) {
		writeModeFrame(modeBlurb);
	} else if ((drawFloatingMode) && (modeLayerOn)) {
		writeModeLayers(modeBlurb);
	} else if ((modeRefreshMap) && (drawModeOnMap)) {
		//var theString = writeXML();
		sendMapXML();
	}
}

// check for mouseup
function chkMouseUp(e) { 
	if ((toolMode == 1) && (zooming)) {
			stopZoomBox(e);
		
	}
	if ((toolMode == 2) && (zooming)) {
			stopZoomOutBox(e);
	}
	if ((toolMode == 3) && (panning)) {
			stopPan(e);

	}
	if ((toolMode == 10) && (selectBox)) {
			stopSelectBox(e);
	}
		
	return false;
	
}

// perform appropriate action with mapTool
function mapTool (e) {
	var theButton= 0;
	// get the button pushed... if right, ignore... let browser do the popup... it will anyway
	if (isNav) {
		theButton = e.which;
	} else {
		theButton =window.event.button;
	}	
	if (theButton==leftButton) {
		getImageXY(e);
		if ((mouseX>=0) && (mouseX<iWidth) && (mouseY>=0) && (mouseY<iHeight)) {
			if ((hasOVMap) && (ovIsVisible) && (mouseX<i2Width+ovBoxSize) && (mouseY<i2Height) && (ovMapIsLayer)) {
					ovMapClick(mouseX,mouseY);
					window.status = "On OV Map Area";
			} else {
				switch(toolMode) {
				case 1:
					startZoomBox(e);
					return false;
					break;				
				case 2:
					startZoomOutBox(e);
					return false;
					break;
				case 3:
					startPan(e);
					return false;
					break;
				case 4:
					identify(e);
					break;
				case 5:
					// identify all
					identifyAll(e);
					break;
				// custom modes
				case 6:
					// route - requires custom route routine - not in default
						// requires aimsRoute.js, aimsGeocode.js
					address(e);
					break;
				case 7:
					// address - requires custom reverseGeocode routine - not in default
						// requires aimsRoute.js, aimsGeocode.js
					address(e);
					break;
				case 10:
					//select(e);
					startSelectBox(e);
					return false;
					break;
				case 11:
					//select point
					if (checkIfActiveLayerAvailable()) {
						select(e);
					}
					break;
				case 12:
					//select line
					if (checkIfActiveLayerAvailable()) {
						clickType=2;
						clickAddPoint();
						if (useTextFrame) {
							if (parent.TextFrame.document.title!==modeList[60]) {
								parent.TextFrame.document.location= appDir + "selectline.htm";
							}
						}
					}
					break;
				case 13:
					//select polygon
					if (checkIfActiveLayerAvailable()) {
						clickType=3;
						clickAddPoint();
						if (useTextFrame) {
							if (parent.TextFrame.document.title!==modeList[7]) {
								parent.TextFrame.document.location= appDir + "selectpoly.htm";
							}
						}
					}
					break;
				case 15:
					// hyperlink
					hyperLink(e);
					break;
				case 16:
					//select shape
					if (checkIfActiveLayerAvailable()) {
						clickType=2;
						clickAddPoint();
						if (useTextFrame) {
							if (parent.TextFrame.document.title!==modeList[8]) {
								parent.TextFrame.document.location= appDir + "select.htm";
							}
						}
					}
					break;
					///* 
				case 17:
					//buffer shape - 
					if (checkIfActiveLayerAvailable()) {
						clickType=2;
						clickAddPoint();
						if (useTextFrame) {
							if (parent.TextFrame.document.title!=modeList[11]) {
								parent.TextFrame.document.location= appDir + "shapeBuffer.htm";
							}
						}
					}
					break;
					//*/
				case 20:
					// measure
					if (parent.TOCFrame.document.location.href.indexOf("measure.htm") == -1)
						parent.TOCFrame.document.location = appDir + "measure.htm";
						
					clickType=1;
					clickAddPoint();
					break;
				case 21:
					// shape
					clickType=4;
					clickAddPoint();
					break;
				case 30:
					// hyperlink
					hyperLinkAny(e);
					break;
				case 40:
					// db identify - requires custom db query - not in default
					if (aimsDBPresent) {
						matchDBLinkLayer(dbLinkLayer);
						dbIdentify(e);
					}
					break;
				case 999:
					coordinate_getLatLon(e);
					break;
				default:
					if (toolMode>=1000) {
						//coordinateTool(e);
						customMapTool(e);
					}
				}
			}
		}
	}
}

// update measureBox layer
function updateMeasureBox() {
	if (parent.TOCFrame.document.location.href.indexOf("measure.htm") == -1) return;
	
	var theForm = parent.TOCFrame.document.forms[0];
	var j = 1;
	for (var i=0;i<sUnitList.length;i++) {
		if (ScaleBarUnits==sUnitList[i]) j=i;
	}
	var u = Math.pow(10,numDecimals);
	var tMeas = 0;
	if (totalMeasure!=0) tMeas = parseInt(totalMeasure*u+0.5)/u;
	
	theForm.theMeasSegmentFt.value = currentMeasure;
	theForm.theMeasSegmentMile.value = Math.round(currentMeasure / 5280 * 100) / 100;
	theForm.theMeasTotalFt.value = tMeas;
	theForm.theMeasTotalMile.value = Math.round(tMeas / 5280 * 100) / 100;
}

// set the cursor of the specified layer
function setCursor(divLayer, cursor) {
	var dObj = getLayer(divLayer);
	if (dObj!=null) {
		dObj.cursor = cursor;
		theCursor = dObj.cursor;
	}
}

//Added by Yan Barnett
//var pntStr = "";
//alert(pntStr)
//var mouseClickXY = new Array();

function clearRubberBand2(toolName){
	if (!document.all) return;
	if ((arguments.length > 0) && (toolName == "print") ) return;

	clickCount = 0;
	mouseClickXY.length=0;
	pntStr = "";
	document.all['rubberBand'].path = "m 0 0";
}

function drawRubberBand2(){
	if(clickCount == 1)
		pntStr = "m " + mouseClickXY[0]  + " l ";
	if(clickCount > 2) 
		pntStr += ", "; 
	if(clickCount >=2)
		pntStr += mouseClickXY[clickCount-1];

	//Do not close the polygon if measure distance
	pathStr = (toolMode==20)? pntStr + " e": pntStr + " x e";

	document.all['rubberBand'].style.top = document.all['theImage'].offsetTop;
	document.all['rubberBand'].style.left = document.all['theImage'].offsetLeft;
	document.all['rubberBand'].path = pathStr;
}

///////////////////////////////////////////////////////////////
//Added by Greg Resz to get LatLon,UTM, & State Plane Coord  //
///////////////////////////////////////////////////////////////
function coordinate_getLatLon(e){
var theX = mouseX;
var theY = mouseY;
getMapXY(theX,theY);
var theString = '<ARCXML version="1.1">';
theString += '<REQUEST>';
theString += '<GET_PROJECT envelope="false">';
//theString += '<COORDSYS id="102697" />';
theString += '<FROMCOORDSYS id="102697" />';
theString += '<TOCOORDSYS id="4326" />';
theString += '<MULTIPOINT>';
theString += '<POINT x="' + mapX + '" y="' + mapY + '" />';
theString += '</MULTIPOINT>';
theString += '</GET_PROJECT>';
theString += '</REQUEST>';
theString += '</ARCXML>';
sendToServer(imsQueryURL,theString,999); 
///code below added to retrieve the state plane coordinates and pass them to latlon.htm
var pos = theString.indexOf("POINT");
if (pos!=-1) {
var startpos = theString.indexOf("x=",pos) + 3;
var endpos = theString.indexOf(dQuote,startpos);
var spX = parseFloat(theString.substring(startpos,endpos));
startpos = theString.indexOf("y=",pos)+3;
endpos = theString.indexOf(dQuote,startpos);
var spY = parseFloat(theString.substring(startpos,endpos));
spX = numRound(spX,3);
spY = numRound(spY,3);
var theForm = parent.TOCFrame.document.forms[0];
	theForm.spx.value = spX;
	theForm.spy.value = spY;
	

}
}