<?php
# $Id: mod_savewmc.php 264 2006-05-12 11:07:19Z vera_schulze 
# http://www.mapbender.org/index.php/mod_savewmc.php
# Copyright (C) 2002 CCGIS
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2, or (at your option)
# any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.


$gui_id = $_REQUEST["gui_id"];
require_once("../../conf/mapbender.conf");
$con = db_connect($DBSERVER,$OWNER,$PW);
db_select_db(DB,$con);
$sql = "SELECT e_src, e_target FROM gui_element WHERE e_id = 'savewmc' AND fkey_gui_id = $1";
$v = array($gui_id);
$t = array('s');
$res = db_prep_query($sql, $v, $t);
$cnt = 0;
while($row = db_fetch_array($res)){
	$e_src = $row["e_src"];
	$e_target = $row["e_target"];
	$cnt++;
}
if($cnt > 1){
	echo "alert('savewmc: ID not unique!');";
}

$e_id_css = "savewmc";
include("../include/dyn_js.php");

echo "mod_savewmc_target = '".$e_target."';";
?>
function setOnUnload() {
	document.getElementsByTagName('body')[0].setAttribute("onUnload", "mod_savewmc('session');");
}

try {if (saveInSession) {}}catch(e) {saveInSession = 0;}

if (saveInSession == '1') {
	mb_registerInitFunctions('setOnUnload()');
}

var mod_savewmc_img = new Image(); mod_savewmc_img.src = "<?php  echo $e_src;  ?>";
//var mod_savewmc_img_over = new Image(); mod_savewmc_img_over.src = "<?php  echo preg_replace("/_off/","_over",$e_src);  ?>";

//0 = Keine Anführungszeichen umwandeln
//1 = Nur einfache Anführungszeichen umwandeln
//2 = Nur doppelte Anführungszeichen umwandeln (Standardeinstellung)
//3 = Beide Arten (einfache und doppelte Anführungszeichen) umwandeln
function htmlspecialchars(str,typ) {
	if(typeof str=="undefined") str="";
	if(typeof typ!="number") typ=2;
	typ=Math.max(0,Math.min(3,parseInt(typ)));
	var html=new Array();
	html[38]="&amp;"; html[60]="&#38;#60;"; html[62]="&#38;#62;";
	if(typ==1 || typ==3) html[39]="&#38;#39;";
	if(typ==2 || typ==3) html[34]="&#38;#34;";
	for(var i in html) {
		if (typeof(html[i]) != 'function') {
			var functionString ="str=str.replace('"+String.fromCharCode(i)+"',\""+html[i]+"\");";
			eval(functionString);
		}
	}
    return str;
}
function mod_savewmc(title){
	var user = "<?php echo $_SESSION["mb_user_id"]; ?>";
	var ind = getMapObjIndexByName(mod_savewmc_target);
	var session = 0;
	if (title) {
		var generalTitle = htmlspecialchars(title,0);
		title_alert = 0;
		if (title == 'session') {
			session = 1;
		}
	}
	else {
		var generalTitle = htmlspecialchars(prompt("Save WMC as..."),0);
		title_alert = 1;
	}
	if (generalTitle != null){
		var wmc = "";

		// ViewContext variables
		var version = "1.0.0";
		var id = "<?php echo $_SESSION["mb_user_id"] . "_";?>";
		var jetzt = new Date();
		id += jetzt.getTime();

		// General variables
		var generalWidth = mb_mapObj[ind].width;
		var generalHeight = mb_mapObj[ind].height;
		var generalBboxSrs = mb_mapObj[ind].epsg;
		var arrayBBox = mb_mapObj[ind].extent.split(",");
		var generalBboxMinx = parseFloat(arrayBBox[0]);
		var generalBboxMiny = parseFloat(arrayBBox[1]);
		var generalBboxMaxx = parseFloat(arrayBBox[2]);
		var generalBboxMaxy = parseFloat(arrayBBox[3]);
		var generalName = "Mapbender WMC"; // TO do : insert proper data
		var generalKeywords = new Array('Mapbender', 'WMC'); // TO do : insert proper data
		var generalAbstract = ""; // TO do : insert proper data
		var generalLogoUrl = ""; // TO do : insert proper data
		var generalLogoUrlWidth = ""; // TO do : insert proper data
		var generalLogoUrlHeight = ""; // TO do : insert proper data
		var generalLogoUrlFormat = ""; // TO do : insert proper data
		var generalDescriptionUrl = ""; // TO do : insert proper data

		var generalContactPerson = "";
		var generalContactOrganization = "";
		var generalContactPosition = "";
		var generalContactAddressType = "";
		var generalContactAddress = "";
		var generalContactCity = "";
		var generalContactStateOrProvince = "";
		var generalContactPostCode = "";
		var generalContactCountry = "";
		var generalContactVoiceTelephone = "";
		var generalContactFacsimileTelephone = "";
		var generalContactElectronicMailAddress = "";

		var extension_namespace = "mapbender";

		// LayerList variables
		var layerHidden = "";
		var layerQueryable = "";
		var layerAbstract = "";
		var layerName = "";
		var layerSrs = "";
		var layerDataUrl = "";
		var layerMetadataUrl = "";
		var layerFormat = "";
		var layerFormat_current = "";
		var layerStyle_current = "";
		var layerStyle_name = "";
		var layerStyle_title = "";
		var layerStyle_legendURL = "";
		var layerStyle_legendURL_width = "";
		var layerStyle_legendURL_height = "";
		var layerStyle_legendURL_format = "";
		// Missing: Extension

		//ViewContext
		wmc += "&lt;?xml version=\"1.0\" encoding=\"<?php echo CHARSET; ?>\"?&gt;";
		// wmc += "&lt;!ENTITY amp    \"&amp;#38;#38;\"&gt;\n";
		wmc += "&lt;ViewContext version=\"" + version + "\" ";
		wmc += "id = \"" + id + "\" ";
		wmc += "xmlns=\"http://www.opengis.net/context\" xmlns:xlink=\"http://www.w3.org/1999/xlink\" xmlns:mapbender=\"http://www.mapbender.org\" xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\" xsi:SchemaLocation=\"http://schemas.opengis.net/context/1.0.0/context.xsd\" ";
		wmc += "&gt;\n";

		//General
		wmc += "\t&lt;General&gt;\n";

		if (generalWidth && generalHeight){
			wmc += "\t\t&lt;Window width=\"" + generalWidth + "\" height=\"" + generalHeight + "\" /&gt;\n";
		}

		wmc += "\t\t&lt;BoundingBox SRS=\"" + generalBboxSrs + "\" minx =\"" + generalBboxMinx + "\" ";
		wmc += "miny =\"" + generalBboxMiny + "\" maxx =\"" + generalBboxMaxx + "\" maxy =\"" + generalBboxMaxy + "\" /&gt;\n";
		wmc += "\t\t&lt;Name&gt;" + generalName + "&lt;/Name&gt;\n";
		wmc += "\t\t&lt;Title&gt;" + generalTitle + "&lt;/Title&gt;\n";

		if (generalKeywords){
			wmc += "\t\t&lt;KeywordList&gt;\n";
			for (var i = 0; i < generalKeywords.length ; i++) {
				wmc += "\t\t\t&lt;Keyword&gt;" + generalKeywords[i] + "&lt;/Keyword&gt;\n";
			}
			wmc += "\t\t&lt;/KeywordList&gt;\n";
		}
		if (generalAbstract){
			wmc += "\t\t&lt;Abstract&gt;" + generalAbstract + "&lt;/Abstract&gt;\n";
		}

		if (generalLogoUrlWidth && generalLogoUrlHeight && generalLogoUrlFormat && generalLogoUrl){
			wmc += "\t\t&lt;LogoURL width = \"" + generalLogoUrlWidth + "\" ";
			wmc += "height = \"" + generalLogoUrlHeight + "\" ";
			wmc += "format = \"" + generalLogoUrlFormat + "\"&gt;\n";
			wmc += "\t\t\t&lt;OnlineResource xmlns:xlink=\"http://www.w3.org/1999/xlink\" xlink:type = \"simple\" xlink:href=\"" + generalLogoUrl + "\" /&gt;\n";
			wmc += "\t\t&lt;/LogoUrl&gt;\n";
		}

		if (generalDescriptionUrl){
			wmc += "\t\t&lt;DescriptionURL&gt;\n";
			wmc += "\t\t\t&lt;OnlineResource xmlns:xlink=\"http://www.w3.org/1999/xlink\" xlink:type = \"simple\" xlink:href=\"" + generalDescriptionUrl + "\" /&gt;\n";
			wmc += "\t\t&lt;/DescriptionUrl&gt;\n";
		}

		if (generalContactElectronicMailAddress || generalContactOrganization ||
			generalContactPerson || generalContactPosition || generalContactAddressType ||
			generalContactAddress || generalContactCity || generalContactStateOrProvince ||
			generalContactPostCode || generalContactCountry || generalContactVoiceTelephone ||
			generalContactFacsimileTelephone || generalContactElectronicMailAddress){
			wmc += "\t\t&lt;ContactInformation&gt;\n";

			if (generalContactPerson || generalContactOrganization){
				wmc += "\t\t\t&lt;ContactPersonPrimary&gt;\n";
				if (generalContactPerson){
					wmc += "\t\t\t\t&lt;ContactPerson&gt;" + generalContactPerson + "&lt;/ContactPerson&gt;\n";
				}
				if (generalContactOrganization){
					wmc += "\t\t\t\t&lt;ContactOrganization&gt;" + generalContactOrganization + "&lt;/ContactOrganization&gt;\n";
				}
				wmc += "\t\t\t&lt;/ContactPersonPrimary&gt;\n";
			}

			if (generalContactPosition){
				wmc += "\t\t\t&lt;ContactPosition&gt;" + generalContactPosition + "&lt;/ContactPosition&gt;\n";
			}

			if (generalContactAddressType || generalContactAddress || generalContactCity || generalContactStateOrProvince ||
				generalContactPostCode || generalContactCountry){
				wmc += "\t\t\t&lt;ContactAddress&gt;\n";

				if (generalContactAddressType){
					wmc += "\t\t\t\t&lt;AddressType&gt;" + generalContactAddressType + "&lt;/AddressType&gt;\n";
				}
				if (generalContactAddress){
					wmc += "\t\t\t\t&lt;Address&gt;" + generalContactAddress + "&lt;/Address&gt;\n";
				}
				if (generalContactCity){
					wmc += "\t\t\t\t&lt;City&gt;" + generalContactCity + "&lt;/City&gt;\n";
				}
				if (generalContactStateOrProvince){
					wmc += "\t\t\t\t&lt;StateOrProvince&gt;" + generalContactStateOrProvince + "&lt;/StateOrProvince&gt;\n";
				}
				if (generalContactPostCode){
					wmc += "\t\t\t\t&lt;PostCode&gt;" + generalContactPostCode + "&lt;/PostCode&gt;\n";
				}
				if (generalContactCountry){
					wmc += "\t\t\t\t&lt;Country&gt;" + generalContactCountry + "&lt;/Country&gt;\n";
				}
				wmc += "\t\t\t&lt;/ContactAddress&gt;\n";
			}
			wmc += "\t\t\t&lt;ContactVoiceTelephone&gt;" + generalContactVoiceTelephone + "&lt;/ContactVoiceTelephone&gt;\n";
			wmc += "\t\t\t&lt;ContactFacsimileTelephone&gt;" + generalContactFacsimileTelephone + "&lt;/ContactFacsimileTelephone&gt;\n";
			wmc += "\t\t\t&lt;ContactElectronicMailAddress&gt;" + generalContactElectronicMailAddress + "&lt;/ContactElectronicMailAddress&gt;\n";
			wmc += "\t\t&lt;/ContactInformation&gt;\n";
		}

		wmc += "\t&lt;/General&gt;\n";

		//layerList
		wmc += "\t&lt;LayerList&gt;\n";
		for (var i = 0; i < mb_mapObj[ind].wms.length; i++){

			wmsId = mb_mapObj[ind].wms[i].wms_id;

			var wms_epsg = new Array();
			wms_epsg[0] = mb_mapObj[ind].epsg;
			if (mb_mapObj[ind].wms[i].gui_wms_epsg != mb_mapObj[ind].epsg){
				wms_epsg[1] = mb_mapObj[ind].wms[i].gui_wms_epsg;
			}
			for (q = 0; q < mb_mapObj[ind].wms[i].gui_epsg.length ; q ++){
				var isInArray = false;
				for (r = 0 ; r < wms_epsg.length ; r ++){
					if (wms_epsg[r] == mb_mapObj[ind].wms[i].gui_epsg[q]){
						isInArray = true;
					}
				}
				if (isInArray == false){
					wms_epsg[wms_epsg.length] = mb_mapObj[ind].wms[i].gui_epsg[q];
				}
			}

			for (var j = 0; j < mb_mapObj[ind].wms[i].objLayer.length; j++){
				if (mb_mapObj[ind].wms[i].objLayer[j].layer_parent != ''){
					if (mb_mapObj[ind].wms[i].objLayer[j].gui_layer_visible == '1'){
						layerHidden = 0;
					}
					else{
						layerHidden = 1;
					}
					layerQueryable = mb_mapObj[ind].wms[i].objLayer[j].layer_queryable;
					layerQuerylayer = mb_mapObj[ind].wms[i].objLayer[j].gui_layer_querylayer;
					layerId = mb_mapObj[ind].wms[i].objLayer[j].layer_uid;
					layerName = htmlspecialchars(mb_mapObj[ind].wms[i].objLayer[j].layer_name,0);
					layerTitle = htmlspecialchars(mb_mapObj[ind].wms[i].objLayer[j].layer_title, 0);
					layerAbstract = mb_mapObj[ind].wms[i].wms_abstract; //To Do: insert actual abstract
					layerDataUrl = mb_mapObj[ind].wms[i].objLayer[j].layer_dataurl_href; 
					layerMetadataUrl = mb_mapObj[ind].wms[i].objLayer[j].layer_metadataurl;
					layerMinscale = mb_mapObj[ind].wms[i].objLayer[j].layer_minscale; 
					layerMaxscale = mb_mapObj[ind].wms[i].objLayer[j].layer_maxscale; 
					wmsVersion = mb_mapObj[ind].wms[i].wms_version;
					wmsTitle = htmlspecialchars(mb_mapObj[ind].wms[i].wms_title,0)	;
					wmsOnlineResource = mb_mapObj[ind].wms[i].wms_getmap;

					wmc += "\t\t&lt;Layer queryable = \"" + layerQueryable + "\" hidden = \"" + layerHidden + "\"&gt;\n";
					wmc += "\t\t\t&lt;Server service = \"OGC:WMS\" version = \"" + wmsVersion + "\" title = \"" + wmsTitle + "\"&gt;\n";
					wmc += "\t\t\t\t&lt;OnlineResource xmlns:xlink=\"http://www.w3.org/1999/xlink\" xlink:type=\"simple\" xlink:href=\"" + wmsOnlineResource + "\" /&gt;\n";
					wmc += "\t\t\t&lt;/Server&gt;\n";

					wmc += "\t\t\t&lt;Name&gt;" + layerName + "&lt;/Name&gt;\n";
					wmc += "\t\t\t&lt;Title&gt;" + layerTitle + "&lt;/Title&gt;\n";

					if (layerAbstract){
						wmc += "\t\t\t&lt;Abstract&gt;" + layerAbstract + "&lt;/Abstract&gt;\n";
					}

					wmc += "\t\t\t&lt;SRS&gt;";
					for (var k = 0; k < wms_epsg.length ; k ++){
						wmc +=  wms_epsg[k];
						if (k < wms_epsg.length-1){
							wmc += " ";
						}
					}
					wmc += "&lt;/SRS&gt;\n";
	  
					if (layerDataUrl){
						wmc += "\t\t\t&lt;DataURL&gt;\n";
						wmc += "\t\t\t\t&lt;OnlineResource xmlns:xlink=\"http://www.w3.org/1999/xlink\" xlink:type = \"simple\" xlink:href=\"" + layerDataUrl + "\" /&gt;\n";
						wmc += "\t\t\t&lt;/DataURL&gt;\n";
					}

					if (layerMetadataUrl){
						wmc += "\t\t\t&lt;MetadataURL&gt;\n";
						wmc += "\t\t\t\t&lt;OnlineResource xmlns:xlink=\"http://www.w3.org/1999/xlink\" xlink:type = \"simple\" xlink:href=\"" + layerMetadataUrl + "\" /&gt;\n";
						wmc += "\t\t\t&lt;/MetadataURL&gt;\n";
					}

					wmc += "\t\t\t&lt;Extension&gt;\n";
					if (layerMinscale && layerMaxscale) {
						wmc += "\t\t\t\t&lt;"+extension_namespace+":ScaleHint min=\""+layerMinscale+"\" max=\""+layerMaxscale+"\"/&gt;\n";
					}
					wmc += "\t\t\t\t&lt;"+extension_namespace+":layer_id&gt;"+layerId+"&lt;/"+extension_namespace+":layer_id&gt;\n";
					wmc += "\t\t\t\t&lt;"+extension_namespace+":wms_id&gt;"+wmsId+"&lt;/"+extension_namespace+":wms_id&gt;\n";
					wmc += "\t\t\t\t&lt;"+extension_namespace+":querylayer&gt;"+layerQuerylayer+"&lt;/"+extension_namespace+":querylayer&gt;\n";
					wmc += "\t\t\t&lt;/Extension&gt;\n";

					//layerFormat
					wmc += "\t\t\t&lt;FormatList&gt;\n";

					var data_format_current = false;
					for (var k = 0; k < wms[i].data_format.length; k++){

						if (wms[i].data_type[k] == 'map') {
							layerFormat = mb_mapObj[ind].wms[i].data_format[k];
							wmc += "\t\t\t\t&lt;Format";
							if (data_format_current == false && ( 
									(mb_mapObj[ind].wms[i].data_format[k] == mb_mapObj[ind].wms[i].gui_wms_mapformat) ||
									(k == wms[i].data_format.length-1)
							)){
								wmc += " current = \"1\"";
								data_format_current = true;
							}
							wmc += "&gt;" + layerFormat + "&lt;/Format&gt;\n";
						}
					}
					wmc += "\t\t\t&lt;/FormatList&gt;\n";

					// LayerStyle
					wmc += "\t\t\t&lt;StyleList&gt;\n";
	
					for (var k = 0; k < 1; k++){

						if (k == 0){
							layerStyle_current = 1; // To do: insert proper data
						}
						else{
							layerStyle_current = 0; // To do: insert proper data
						}
						wmc += "\t\t\t\t&lt;Style";

						layerStyleSLD = "";

						if (layerStyleSLD){
							layerStyleSLDUrl = ""; // To Do: Insert Proper Data
							wmc += "\t\t\t\t\t\t&lt;OnlineResource xmlns:xlink=\"http://www.w3.org/1999/xlink\" xlink:type=\"simple\" xlink:href=\"" + layerStyleSLDUrl + "\" /&gt;\n";
						}
						else{
							if (mb_mapObj[ind].wms[i].objLayer[j].layer_style[k]){
								layerStyle_name = mb_mapObj[ind].wms[i].objLayer[j].layer_style[k]['name'];
								layerStyle_title = mb_mapObj[ind].wms[i].objLayer[j].layer_style[k]['title'];
								layerStyle_legendUrl = mb_mapObj[ind].wms[i].objLayer[j].layer_style[k]["legendurl"];
							}
							else{
								layerStyle_name = "default";
								layerStyle_title = "default";
								layerStyle_legendUrl = "";
							}

							layerStyle_legendUrl_width = ""; // To Do: add proper data
							layerStyle_legendUrl_height = ""; // To Do: add proper data
							layerStyle_legendUrl_format = ""; // To Do: add proper data

							if (layerStyle_current == 1){
								wmc += " current = \"1\"";
							}
							wmc += "&gt;\n\t\t\t\t\t&lt;Name&gt;" + layerStyle_name + "&lt;/Name&gt;\n";
							wmc += "\t\t\t\t\t&lt;Title&gt;" + layerStyle_title + "&lt;/Title&gt;\n";
							wmc += "\t\t\t\t\t&lt;LegendUrl ";
							wmc += "width = \"" + layerStyle_legendUrl_width + "\" ";
							wmc += "height = \"" + layerStyle_legendUrl_height + "\" ";
							wmc += "format = \"" + layerStyle_legendUrl_format + "\"&gt;\n";
							wmc += "\t\t\t\t\t\t&lt;OnlineResource xmlns:xlink=\"http://www.w3.org/1999/xlink\" xlink:type=\"simple\" xlink:href=\"" + layerStyle_legendUrl + "\" /&gt;\n";
							wmc += "\t\t\t\t\t&lt;/LegendUrl&gt;\n";
						}

						wmc += "\t\t\t\t&lt;/Style&gt;\n";
						// Missing: Describe Style via SLD (see: http://center.ccgis/phprojekt/addons/ewiki/index.php?id=links/SLD)
					}
					wmc += "\t\t\t&lt;/StyleList&gt;\n";
					wmc += "\t\t&lt;/Layer&gt;\n";
				}
			}
		}
		wmc += "\t&lt;/LayerList&gt;\n";
		wmc += "&lt;/ViewContext&gt;\n";

		if (session == 1) {
			var wmc_win = window.open('about:blank', 'wmc_confirm', 'width=200,height=10,left='+Math.round(0.5*screen.width)+',top='+Math.round(0.5*screen.height));
			document.sendData.target = 'wmc_confirm';
//			document.sendData.target = '_blank';

		}
		document.sendData.action = "../javascripts/mod_insertWmcIntoDb.php";
		document.sendData.data.value = user + "____" + generalTitle + "____" + wmc + "____" + id + "____" + title_alert + "____" + session;
		document.sendData.submit();
	}
	return id;
}