<?php
//
// SOFTWARE NAME: Thematic Mapping Engine
// SOFTWARE RELEASE: 1.6
// COPYRIGHT NOTICE: Copyright (C) 2008 Bjorn Sandvik,
//                   bjorn@thematicmapping.org
// SOFTWARE LICENSE: GNU General Public License version 3 (GPLv3)
// NOTICE: >
//  This program is free software; you can redistribute it and/or
//  modify it under the terms of version 3 of the GNU General
//  Public License as published by the Free Software Foundation.
//
//  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.
//  http://www.gnu.org/licenses/
//
//


class ThematicMap
{
		public $dataStore;
		public $coordDecimals = 2;
		public $engine = "";
		public $logoline = "files/balloonlogo.png";
		public $logo = 'files/logo.png';

		// Parameters
		public $mapType = 'choropleth';     // choropleth / prism / symbol
		public $symbolType;                 // image / polygon // collada
		public $symbolShape;
		public $mapTitle;
		public $mapDescription;
		public $mapSource;
		public $showTitle = true;
		public $showLegend = true;
		public $showValues = false;
		public $showNames = false;
		public $timeType = 'year';              // year / series / slider
		public $maxHeight = 2000000;        // Prism / Bar
	public $symbolMaxSize;                    // Symbol$imgBrand
		public $barSize = 50000;
		public $maxValue;
		public $minValue;

		public $indicatorID;
		public $indicator;
		public $year;
		private $yearArray;

		// Colour parameters
		public $colourType = 'scale';         // scale / single
		public $startColour = 'FFFF99';
		public $endColour = 'FF6600';
		public $noDataColour = 'CCCCCC';
		public $colour = 'FF6600';
		public $opacity = 90;

		public $classification = 'unclassed'; // unclassed / equal / quantile
		public $numClasses = 5;

		private $myColourScale;               // Only choropleth/prism
		private $startColourRGB;            // Array
		private $endColourRGB;              // Array
		private $deltaColour;               // Array
		private $kmlAlphaColour = 220;
		private $colourLegendHeight = 350;
		private $colourLegendWidth = 30;

		private $symbolVertices = 30;       // Circle
		private $showLabel = false;

		private $classBreaks;               // Array
		private $classColours;              // Array


		private $precision = 0;             // Number of decimals

		//
		// Constructor
		// @access protected
		//
		function __construct($dataStore, $paramArray)
		{
				$this->dataStore = $dataStore;

				// Mandatory parameters
		$this->mapType     = $paramArray['mapType'];   // Mapping technique
		$this->indicatorID = $paramArray['indicator']; // Main indicator
		$this->year        = $paramArray['year'];      // Year
		$this->dirtmp        = $paramArray['dirtmp'];
				// Extract indicator metadata and values from dataStore
				$this->indicator = $this->dataStore['indicators'][$this->indicatorID];
				$this->minValue  = $this->indicator['min'];
				$this->maxValue  = $this->indicator['max'];
				$this->precision = $this->indicator['decimals'];

				// Optional parameters: mapTitle, mapDescription and source
				if (isset($paramArray['mapTitle'])) $this->mapTitle = $paramArray['mapTitle'];
				else $this->mapTitle = $this->indicator['name']; // Use default from indicator

				if (isset($paramArray['mapDescription'])) $this->mapDescription = $paramArray['mapDescription'];
				else $this->mapDescription = $this->indicator['description']; // Use default from indicator

				if (isset($paramArray['mapSource'])) $this->mapSource = $paramArray['mapSource'];
				else {
					//$this->mapSource = 'Statistics from ' . $this->indicator['source']; // Use default from indicator
				}

				// Other optional parameters
				if (isset($paramArray['timeType']))       $this->timeType       = $paramArray['timeType'];
				if (isset($paramArray['showTitle']))      $this->showTitle      = $paramArray['showTitle'];
				if (isset($paramArray['showLegend']))     $this->showLegend     = $paramArray['showLegend'];
				if (isset($paramArray['colourType']))     $this->colourType     = $paramArray['colourType'];
				if (isset($paramArray['colour']))         $this->colour         = $paramArray['colour'];
				if (isset($paramArray['startColour']))    $this->startColour    = $paramArray['startColour'];
				if (isset($paramArray['endColour']))      $this->endColour      = $paramArray['endColour'];
				if (isset($paramArray['noDataColour']))   $this->noDataColour   = $paramArray['noDataColour'];
				if (isset($paramArray['showValues']))     $this->showValues     = $paramArray['showValues'];
				if (isset($paramArray['showNames']))      $this->showNames      = $paramArray['showNames'];
				if (isset($paramArray['symbolType']))     $this->symbolType     = $paramArray['symbolType'];
				if (isset($paramArray['symbolShape']))    $this->symbolShape    = $paramArray['symbolShape'];
				if (isset($paramArray['symbolMaxSize']))  $this->symbolMaxSize  = $paramArray['symbolMaxSize'];
				if (isset($paramArray['maxHeight']))      $this->maxHeight      = $paramArray['maxHeight'];
				if (isset($paramArray['barSize']))        $this->barSize        = $paramArray['barSize'];
				if (isset($paramArray['classification'])) $this->classification = $paramArray['classification'];
				if (isset($paramArray['numClasses']))     $this->numClasses     = $paramArray['numClasses'];

				if ($this->showValues || $this->showNames) {
							$this->showLabel = true;
				}

				if (isset($paramArray['opacity'])) {
						$this->opacity = $paramArray['opacity'];
						$this->kmlAlphaColour = 255 * $this->opacity / 100;
				}

				// Make an array of available years
				if ($this->timeType != 'year') $this->yearArray = $this->indicator['years'];
				else $this->yearArray = array($this->year); // Only one year


		}


		//
		// Constructor
		// @access protected
		//
		function __deconstruct()
		{
				// What goes here?
		}


		//
		// Function
		// @access protected
		//
		public function getKML($url,$download = false)
		{

				// Create KMZ archieve
				$file = $this->dirtmp."/tme". time(). ".kmz";

				/*
				$zip = new ZipArchive();
				if ($zip->open($file, ZIPARCHIVE::CREATE)!==TRUE) {
					exit("cannot open <$file>\n");
				}
		*/
				include(dirname(__FILE__)."/../kmlmapserver/classes/zip.class.php");
				$zip = new zipfile();
				// Add balloon logo to archieve (300 x 30 px)
				$zip->addFile($this->logoline, 'files/balloonlogo.png');

				// KML header
				$kml = "<?xml version='1.0' encoding='UTF-8'?>" . PHP_EOL
						. "<kml xmlns='http://www.opengis.net/kml/2.2' xmlns:atom='http://www.w3.org/2005/Atom'>" . PHP_EOL
						. "  <Document>" . PHP_EOL
						. "    <atom:author>" . PHP_EOL
						. "      <atom:name>Thematic Mapping Engine</atom:name>" . PHP_EOL
						. "    </atom:author>" . PHP_EOL
						. "    <atom:link href='http://thematicmapping.org' rel='related' />" . PHP_EOL
						. "    <name>$this->mapTitle</name>" . PHP_EOL
						. "    <open>1</open>" . PHP_EOL
						. "    <Snippet maxLines='1'>$this->mapSource</Snippet>" . PHP_EOL
						. "    <description><![CDATA[ $this->mapDescription <p>$this->mapSource</p>$this->engine ]]></description>" . PHP_EOL;
				// Add style for indicator balloon
				$kmlStyles = "    <Style id='balloonStyle'>" . PHP_EOL
									. "      <BalloonStyle>" . PHP_EOL
									. "        <text><![CDATA[" . PHP_EOL
									. "          <a href='http://thematicmapping.org'><img src='http://thematicmapping.org/engine/files/balloonlogo.png'></a>" . PHP_EOL
									. "          <p><b><font size='+2'>$[name]</font></b></p>" . PHP_EOL
									. "          <p>$[description]</p>" . PHP_EOL
									. "        ]]></text>" . PHP_EOL
									. "      </BalloonStyle>" . PHP_EOL
									. "    </Style>" . PHP_EOL
									. "    <styleUrl>#balloonStyle</styleUrl>" . PHP_EOL;


				if ($this->colourType == 'scale') {
						// Need to run before getColourValue / getColourLegend / makeClasses
						self::makeColourScale();

						if ($this->classification != 'unclassed') {
								self::makeClasses($this->classification, $this->numClasses);
						}

						// Add colour legend to KMZ archieve
						if ($this->showLegend) {
								$imgLegenda = self::getColourLegend();
							$zip->addFile($imgLegenda,'files/legend.png');
						}
						$kmlSingleColour = ''; // Colours needs to be defined for each feature
						//$kmlColour = self::rgb2bgr($this->noDataColour); // Not in use, only so the variable has a value
				}
				else {
						$kmlSingleColour = '<color>' . self::rgb2bgr($this->colour) . '</color>';
						//$kmlColour = self::rgb2bgr($this->colour);
				}


				// Add style for value placemarks
				if ($this->showLabel) {
						$kmlStyles .= "    <Style id='labelPlacemark'>" . PHP_EOL
										. "      <IconStyle>" . PHP_EOL
									. "        <scale>0.0</scale>" . PHP_EOL
											. "      </IconStyle>" . PHP_EOL
												. "      <LabelStyle>" . PHP_EOL
												. "        <scale>1</scale>" . PHP_EOL
												. "      </LabelStyle>" . PHP_EOL
											. "    </Style>" . PHP_EOL;
				}

				// Define shared styles and legend
				$kmlStyles .= "    <Style id='sharedStyle'>" . PHP_EOL;
				switch ($this->mapType) {

						case "choropleth":
						case "prism":

								$kmlStyles .= "      <PolyStyle>" . PHP_EOL
														. "        <fill>1</fill>" . PHP_EOL
														. "        <outline>1</outline>" . PHP_EOL
														. "        $kmlSingleColour" . PHP_EOL
														. "      </PolyStyle>" . PHP_EOL
														. "      <LineStyle>" . PHP_EOL
														. "        <color>cc000000</color>" . PHP_EOL
														. "      </LineStyle>" . PHP_EOL;
							break;

						case "bar":

								$kmlStyles .= "      <PolyStyle>" . PHP_EOL
														. "        <fill>1</fill>" . PHP_EOL
														. "        <outline>0</outline>" . PHP_EOL
														. "        $kmlSingleColour" . PHP_EOL
														. "      </PolyStyle>" . PHP_EOL;
							break;



						// Proportional symbol
						case "symbol":

								switch($this->symbolType){

										case 'image':
												$zip->addFile("files/$this->symbolShape.png", 'files/symbol.png');
												$kmlStyles .= "      <IconStyle>" . PHP_EOL
															. "        $kmlSingleColour" . PHP_EOL
															. "        <Icon>" . PHP_EOL
														. "          <href>".$url."/symbol.png</href>" . PHP_EOL
															. "        </Icon>" . PHP_EOL
																. "      </IconStyle>" . PHP_EOL;
												break;

										case 'polygon':
												if ($this->symbolShape == 'square') {
														$this->symbolVertices = 4;
												}
												$kmlStyles .= "      <PolyStyle>" . PHP_EOL
																		. "        $kmlSingleColour" . PHP_EOL
																		. "        <fill>1</fill>" . PHP_EOL
																		. "        <outline>1</outline>" . PHP_EOL
																		. "      </PolyStyle>" . PHP_EOL
																		. "      <LineStyle>" . PHP_EOL
																		. "        <color>cc000000</color>" . PHP_EOL
																		. "      </LineStyle>" . PHP_EOL;
												break;

										case 'collada':
												if ($this->colourType == 'scale') {
														// Limit number of collada objects (one for each colour)
														if ($this->classification == 'unclassed') {
																self::makeClasses('equal', 12);
														}

														foreach($this->classColours as $class => $classColour){
																$colladaColour = self::rgb2collada($classColour);

																// Read collada model
																$filename = "files/$this->symbolShape.dae";
																$handle = fopen($filename, "r");
																$collada = fread($handle, filesize($filename));
																fclose($handle);

																// Search and replace colour
																$pos = strpos($collada, '<effect id="material0-effect" name="material0-effect">');
																$pos = strpos($collada, "<diffuse>", $pos);
																$pos = strpos($collada, "<color>", $pos);
																$collada = substr_replace($collada, $colladaColour, $pos+7, 28);

																// Add collada object to kmz archieve
																$zip->addFromString("files/object$class.dae", $collada);
														}
												}

												// Single colour
												else {
														$colladaColour = self::rgb2collada($this->colour);

														// Read collada model
														$filename = "files/$this->symbolShape.dae";
														$handle = fopen($filename, "r");
														$collada = fread($handle, filesize($filename));
														fclose($handle);

														// Search and replace colour
														$pos = strpos($collada, '<effect id="material0-effect" name="material0-effect">');
														$pos = strpos($collada, "<diffuse>", $pos);
														$pos = strpos($collada, "<color>", $pos);
														$collada = substr_replace($collada, $colladaColour, $pos+7, 28);

														// Add collada object to kmz archieve
														$zip->addFromString("files/object.dae", $collada);
												}

												$kmlstyle = ''; // Not possible to define style for collada objects

								} // switch symbol
				} // switch type

				$kmlStyles .= "      <BalloonStyle>" . PHP_EOL
										. "        <text><![CDATA[" . PHP_EOL
										. "          <a href='http://thematicmapping.org'><img src='http://thematicmapping.org/engine/files/balloonlogo.png'></a>" . PHP_EOL
										. "          <p><b><font size='+2'>$[name]</font></b></p>" . PHP_EOL
										. "          <p>$this->mapTitle: $[Snippet]</p>" . PHP_EOL
										. "          <p>$this->mapDescription</p>" . PHP_EOL
										. "          <p>$this->mapSource</p>" . PHP_EOL
										. "          <p>$this->engine</p>" . PHP_EOL
										. "        ]]></text>" . PHP_EOL
										. "      </BalloonStyle>" . PHP_EOL
										. "    </Style>" . PHP_EOL;  // End of shared style

				$kmlFolder = "    <Folder>" . PHP_EOL
									. "      <name>Colunas</name>" . PHP_EOL
									. "      <open>1</open>" . PHP_EOL;

				if ($this->timeType == 'series') {
						$kmlFolder .= "      <Style>" . PHP_EOL
												. "        <ListStyle>" . PHP_EOL
												. "          <listItemType>radioFolder</listItemType>" . PHP_EOL
												. "        </ListStyle>" . PHP_EOL
												. "      </Style>" . PHP_EOL;
				}

				// Loop thorough all years
				foreach ($this->yearArray as $key => $year) {

						$kmlFeatures = '';

						if (($this->timeType == 'slider') OR ($year == $this->year)) $visibility = 1;
						else $visibility = 0;

						$kmlFolder .= "      <Folder>" . PHP_EOL
												. "        <name>$year</name>" . PHP_EOL
												. "        <visibility>$visibility</visibility>" . PHP_EOL;

						if ($this->showLabel) {
								$kmlLabels = "        <Folder>" . PHP_EOL
													. "          <name>Show/hide labels</name>" . PHP_EOL
													. "          <visibility>$visibility</visibility>" . PHP_EOL
													. "          <Style>" . PHP_EOL
													. "            <ListStyle>" . PHP_EOL
													. "              <listItemType>checkHideChildren</listItemType>" . PHP_EOL
													. "            </ListStyle>" . PHP_EOL
													. "          </Style>" . PHP_EOL;
						}

						// Add timespan if time animation
						if ($this->timeType == 'slider') {

				$end = '';
								// Check if there is more years
								if (array_key_exists($key+1, $this->yearArray)) {
										$end = '<end>' . intval($this->yearArray[$key+1]-1) . '-12-31</end>';
								}
								$kmlFolder .= "        <TimeSpan>" . PHP_EOL
														. "          <begin>$year-01-01</begin>$end" . PHP_EOL
														. "        </TimeSpan>" . PHP_EOL;

						}

						// Loop thorough all features (values without features will not be shown)
						foreach ($this->dataStore['features'] as $featureID => $feature)
						{
					$name = $feature['name'];
				//if (!mb_detect_encoding($name,"UTF-8",true))
				//{$name = mb_convert_encoding($name,"UTF-8","ISO-8859-1");}
				$name = "<![CDATA[ ".$name." ]]>";
								$value = ''; // use null?
								$valueText = 'no data';
								$valueLabel = '';
								$kmlFeature = '';
								$altitude = 0;
								$symbolSize = 0;
								$colladaCount = 0;
								//$kmlColour = self::rgb2bgr($this->noDataColour);
								$kmlColour = '';

							$longitude = $feature['lon'];
							$latitude = $feature['lat'];

					// Check if value exists for this feature
								if (isset($this->indicator['values'][$year][$featureID])) {
							// Extract value from dataStore
							$value = $this->indicator['values'][$year][$featureID];
							$valueText = $valueLabel = number_format($value, 2, ',', '.');
										// Colour scale
										if ($this->colourType == 'scale') {
												if ($this->classification != 'unclassed') {
														$class = self::getClass($value);
														$kmlColour = self::rgb2bgr($this->classColours[$class]);
												}
												else {
														$kmlColour = self::getColourValue($value, 'kml');
												}
										}
										// Single colour
										//else {
										//    $kmlColour = self::rgb2bgr($this->colour);
										//}
								}
								else {
										$kmlColour = self::rgb2bgr($this->noDataColour);
								}


								switch ($this->mapType) {

										case "choropleth":

												$kmlFeature = "          <Style>" . PHP_EOL
																		. "            <PolyStyle>" . PHP_EOL
																		. "              <color>$kmlColour</color>" . PHP_EOL
																		. "            </PolyStyle>" . PHP_EOL
																		. "          </Style>" . PHP_EOL;

												$kmlFeature .= self::wkt2kml($feature['wkt'], 0);
												break;

										case "prism":
												$altitude = intval($value * ($this->maxHeight / $this->maxValue));

												if ($this->colourType == 'scale') {
														$kmlFeature = "          <Style>" . PHP_EOL
																				. "            <PolyStyle>" . PHP_EOL
																				. "              <color>$kmlColour</color>" . PHP_EOL
																				. "            </PolyStyle>" . PHP_EOL
																				. "          </Style>" . PHP_EOL;
												}

												$kmlFeature .= self::wkt2kml($feature['wkt'], $altitude) . PHP_EOL;
												break;

										case "bar":
												if ($value != null) {
														$altitude = intval($value * ($this->maxHeight / $this->maxValue));

												if ($this->colourType == 'scale') {
														$kmlFeature = "          <Style>" . PHP_EOL
																				. "            <PolyStyle>" . PHP_EOL
																				. "              <color>$kmlColour</color>" . PHP_EOL
																				. "            </PolyStyle>" . PHP_EOL
																				. "          </Style>" . PHP_EOL;
												}

												$kmlFeature .= self::kmlSymbolCalculator($longitude, $latitude, $this->barSize, 15, $altitude);
												}
												break;

										case "symbol":
												if ($value != null) {

														switch($this->symbolType){

																case 'im$z = new ZipArchive();
$z->open("test.zip", ZIPARCHIVE::CREATE);
folderToZip("storeThisFolder", $z);
$z->close();age':
																//$symbolSize = round(self::getSymbolSize($value, $this->symbolShape),2);
																$symbolSize = round($this->symbolMaxSize * sqrt($value/$this->maxValue), 2);

																		$kmlFeature = "          <Style>" . PHP_EOL
																						. "            <IconStyle>" . PHP_EOL
																					. "              <scale>$symbolSize</scale>" . PHP_EOL
																					. "              <color>$kmlColour</color>" . PHP_EOL
																						. "            </IconStyle>" . PHP_EOL
																								. "          </Style>" . PHP_EOL;

																		$kmlFeature .= "          <LookAt>" . PHP_EOL
																								. "            <longitude>$longitude</longitude>" . PHP_EOL
																								. "            <latitude>$latitude</latitude>" . PHP_EOL
																								. "            <altitude>0</altitude>" . PHP_EOL
																								. "            <range>3200000</range>" . PHP_EOL
																								. "            <altitudeMode>clampToGround</altitudeMode>" . PHP_EOL
																								. "          </LookAt>" . PHP_EOL
																								. "          <Point>" . PHP_EOL
																								. "            <coordinates>$longitude,$latitude,0</coordinates>" . PHP_EOL
																								. "          </Point>" . PHP_EOL;
																		break;

																case 'polygon':
																//$symbolSize = intval(self::getSymbolSize($value, $this->symbolShape));
																$symbolSize = intval($this->symbolMaxSize * sqrt($value/$this->maxValue) * 70000);
																		if ($this->colourType == 'scale') {
																				$kmlFeature = "          <Style>" . PHP_EOL
																										. "            <PolyStyle>" . PHP_EOL
																										. "              <color>$kmlColour</color>" . PHP_EOL
																										. "            </PolyStyle>" . PHP_EOL
																										. "          </Style>" . PHP_EOL;
																		}
												$kmlFeature .= self::kmlSymbolCalculator($longitude, $latitude, $symbolSize, $this->symbolVertices, 0);
																		break;

																case 'collada':

																		//$symbolSize = intval(self::getSymbolSize($value, $this->symbolShape));
																		$symbolSize = intval($this->symbolMaxSize * pow($value/$this->maxValue, 1/3) * 20000);

																		$class = ''; // Single colour
																		if ($this->colourType == 'scale') $class = self::getClass($value);

																		$altitude = $symbolSize; // Used for label placement
																		$kmlFeature = "          <Model>" . PHP_EOL
																								. "            <altitudeMode>absolute</altitudeMode>" . PHP_EOL
																								. "            <Location>" . PHP_EOL
																								. "              <longitude>$longitude</longitude>" . PHP_EOL
																								. "              <latitude>$latitude</latitude>" . PHP_EOL
																								. "              <altitude>0</altitude>" . PHP_EOL
																								. "            </Location>" . PHP_EOL
																								. "            <Scale>" . PHP_EOL
																								. "              <x>$symbolSize</x>" . PHP_EOL
																								. "              <y>$symbolSize</y>" . PHP_EOL
																								. "              <z>$symbolSize</z>" . PHP_EOL
																								. "            </Scale>" . PHP_EOL
																								. "            <Link>" . PHP_EOL
																								. "              <href>files/object$class.dae</href>" . PHP_EOL
																								. "            </Link>" . PHP_EOL
																								. "          </Model>" . PHP_EOL;
														} // switch
												} // if
								} // switch


								$kmlFeatures .= "        <Placemark>" . PHP_EOL
															. "          <name>$name</name>" . PHP_EOL
															. "          <visibility>$visibility</visibility>" . PHP_EOL
															. "          <Snippet>$valueText ($year)</Snippet>" . PHP_EOL
															. "          <styleUrl>#sharedStyle</styleUrl>" . PHP_EOL
															. $kmlFeature
															. "        </Placemark>" . PHP_EOL;

								if ($this->showLabel) {
										$label = '';
										if ($this->showNames) $label = $name;
										if ($this->showValues) $label .= ' ' . $valueLabel;
										$kmlLabels .= "          <Placemark>" . PHP_EOL
																. "            <name>$label</name>" . PHP_EOL
																. "            <visibility>$visibility</visibility>" . PHP_EOL
																. "            <styleUrl>#labelPlacemark</styleUrl>" . PHP_EOL
																. "            <Point>" . PHP_EOL
																. "              <altitudeMode>absolute</altitudeMode>" . PHP_EOL
																. "              <coordinates>$longitude, $latitude, $altitude</coordinates>" . PHP_EOL
																. "            </Point>" . PHP_EOL
																. "          </Placemark>" . PHP_EOL;
								}

						} // foreach features

						if ($this->showLabel) {
								$kmlLabels .= "        </Folder>";
								$kmlFolder .= $kmlLabels;
						}

						$kmlFolder .= $kmlFeatures;

						$kmlFolder .= "      </Folder>" . PHP_EOL;
				} // foreach years



				// Close Years folder
				$kmlFolder .= "    </Folder>" . PHP_EOL;

				// Create logo with title and source and add to archieve
				if ($this->showTitle) {
					$imgBrand = self::mapTitleImage();
					$zip->addFile($imgBrand, 'files/brand.png');
				}
				else {
					$zip->addFile($this->logo, 'files/brand.png');
				}
				// Add title
				$kml .= "    <ScreenOverlay>" . PHP_EOL
							. "      <name>Titulo</name>" . PHP_EOL
							. "      <Icon>" . PHP_EOL
							. "        <href>".$url."/".basename($imgBrand)."</href>" . PHP_EOL
							. "      </Icon>" . PHP_EOL
							. "      <overlayXY x='0.01' y='0.99' xunits='fraction' yunits='fraction'/>" . PHP_EOL
							. "      <screenXY x='0.01' y='0.99' xunits='fraction' yunits='fraction'/>" . PHP_EOL
							. "      <size x='-1' y='-1' xunits='pixels' yunits='pixels'/>" . PHP_EOL
							. "    </ScreenOverlay>" . PHP_EOL;

				// Add legend
				if ($this->showLegend && $this->colourType == 'scale') {
						$kml .= "    <ScreenOverlay>" . PHP_EOL
									. "      <name>Legenda</name>" . PHP_EOL
									. "      <Icon>" . PHP_EOL
									. "        <href>".$url."/".basename($imgLegenda)."</href>" . PHP_EOL
									. "      </Icon>" . PHP_EOL
									. "      <overlayXY x='0.01' y='0.14' xunits='fraction' yunits='fraction'/>" . PHP_EOL
									. "      <screenXY x='0.01' y='0.14' xunits='fraction' yunits='fraction'/>" . PHP_EOL
									. "      <size x='-1' y='-1' xunits='pixels' yunits='pixels'/>" . PHP_EOL
									. "    </ScreenOverlay>" . PHP_EOL;
				}

				$kml .= $kmlStyles . $kmlFolder;

				// Add basemap
				//if (isset($paramArray['basemap'])) {
				//    $kml .= "<NetworkLink>
				//               <name>Basemap</name>
				//               <Link><href>$basemap</href></Link>
				//             </NetworkLink>" . PHP_EOL;
				//}

				$kml .= "  </Document>" . PHP_EOL
							. "</kml>" . PHP_EOL;


// Open archive if collada


				// Add kml to archieve
				//$zip->addFromString("doc.kml", $kml);
				$zip->addFile($kml, 'doc.kml');//edmar


				//$zip->close();
				$zip->output($file);//edmar
				if($download){
					ob_end_clean();
					//header('Content-Type: application/vnd.google-earth.kml+xml');
					header('Content-Disposition: attachment; filename='.basename($file));
			print $file;
			exit;
				}
				else{
					return $url.basename($file);
				}
		}




		//
		// Function
		// @access protected
		//
		// This function is based on code developed by "TJ":
		// http://bbs.keyhole.com/ubb/showflat.php?Cat=&Board=SupportKML&Number=166379&Searchpage=1&Main=166379&Words=calculate+TJ1&topic=&Search=true
		//
		function kmlSymbolCalculator( $longitude, $latitude, $distance, $points, $altitude )
		{
		$EARTH_RADIUS_EQUATOR = 6378140.0;
		$RADIAN = 180 / pi();

		$long = $longitude;
		$lat = $latitude;

		$long = $long / $RADIAN;
		$lat = $lat / $RADIAN;
		$f = 1/298.257;
		$e = 0.08181922;

				$kml = '          <Polygon>' . PHP_EOL
						. '            <outerBoundaryIs>' . PHP_EOL
						. '              <LinearRing>' . PHP_EOL
						. '                <coordinates>';

		//for ( $bearing = 0; $bearing <= 360; $bearing += 360/$points) {
		// Changed start bearing beacuse of square orientation
				for ( $bearing = 45; $bearing <= 405; $bearing += 360/$points) {

			$b = $bearing / $RADIAN;

			$R = $EARTH_RADIUS_EQUATOR * (1 - $e * $e) / pow( (1 - $e*$e * pow(sin($lat),2)), 1.5);
			$psi = $distance/$R;
			$phi = pi()/2 - $lat;
			$arccos = cos($psi) * cos($phi) + sin($psi) * sin($phi) * cos($b);
			$latA = (pi()/2 - acos($arccos)) * $RADIAN;

			$arcsin = sin($b) * sin($psi) / sin($phi);
			$longA = ($long - asin($arcsin)) * $RADIAN;

			$kml .= " ".round($longA,$this->coordDecimals).",".round($latA,$this->coordDecimals);
			if ($altitude) $kml .= ",".$altitude;
		}

				$kml .= '                </coordinates>' . PHP_EOL
							. '              </LinearRing>' . PHP_EOL
							. '            </outerBoundaryIs>' . PHP_EOL;

				if ($altitude)
				{
						$kml .= '            <extrude>1</extrude>' . PHP_EOL
									. '            <altitudeMode>absolute</altitudeMode>' . PHP_EOL;
				}

				$kml .= '          </Polygon>' . PHP_EOL;

		return $kml;
		}


		//
		// Function
		// @access protected
		//
		public function wkt2kml($wkt, $altitude)
		{

				// Change coordinate format
				$wkt = preg_replace("/([0-9\.\-]+) ([0-9\.\-]+),*/e", "round('$1',2).','.round('$2',2).',$altitude '", $wkt);

				$wkt = substr($wkt, 15); // Remove 'MULTIPOLYGON(((' at the beginning
				$wkt = substr($wkt, 0, -3); // Remove ')))' at the end
				$polygons = explode(')),((', $wkt); // Find all polygons
				$kml = '          <MultiGeometry>' . PHP_EOL;

				foreach ($polygons as $polygon) {
						$kml .= '            <Polygon>' . PHP_EOL;
						$boundary = explode('),(', $polygon); // Find all polygon boundaries
						$kml .= '              <outerBoundaryIs>' . PHP_EOL
									. '                <LinearRing>' . PHP_EOL
									. '                  <coordinates>' . self::kmlReverseCoordinates($boundary[0]) . ' </coordinates>' . PHP_EOL
									. '                </LinearRing>' . PHP_EOL
									. '              </outerBoundaryIs>' . PHP_EOL;

						for ($i=1; $i < count($boundary); $i++) { // If inner boundaries
							$kml .= '              <innerBoundaryIs>' . PHP_EOL
										. '                <LinearRing>' . PHP_EOL
										. '                  <coordinates>' . self::kmlReverseCoordinates($boundary[$i]) . ' </coordinates>' . PHP_EOL
										. '                </LinearRing>' . PHP_EOL
										. '              </innerBoundaryIs>' . PHP_EOL;
						}
						$kml .= '            </Polygon>' . PHP_EOL;
				}
				$kml .= '          </MultiGeometry>' . PHP_EOL;

				if ($altitude)
				{
						$kml = str_replace('<Polygon>', '<Polygon><extrude>1</extrude><tessellate>1</tessellate><altitudeMode>absolute</altitudeMode>', $kml);
				}

				return $kml;
		}

		//
		// Function
		// @access protected
		//
		function kmlReverseCoordinates($coordinates)
		{
				$coordinates = explode(" ", $coordinates);
				$coordinates = array_reverse($coordinates);
				$coordinates = implode(" ", $coordinates);
				return $coordinates;
		}

		// Generates KML colour
		function rgb2bgr($rgb)
		{
				$colour = dechex($this->kmlAlphaColour) . substr($rgb, -2) . substr($rgb, 2, 2) . substr($rgb, 0, 2);
				return $colour;
		}

		// Generates COLLADA colour
		function rgb2collada($rgb)
		{
				$red   = number_format(hexdec(substr($rgb, 0, 2)) / 255, 6);
				$green = number_format(hexdec(substr($rgb, 2, 2)) / 255, 6);
				$blue  = number_format(hexdec(substr($rgb, -2)) / 255, 6);

				$colour = "$red $green $blue 1"; // Transparency not supported in GE?
				return $colour;
		}


		// Generates a colour scale
		function makeColourScale(){

				// Extract red/green/blue decimal values from hexadecimal colours
				$this->startColourRGB = array(hexdec(substr($this->startColour, 0, 2)),
																			hexdec(substr($this->startColour, 2, 2)),
																			hexdec(substr($this->startColour, 4, 2)));

				$this->endColourRGB = array(hexdec(substr($this->endColour, 0, 2)),
																		hexdec(substr($this->endColour, 2, 2)),
																		hexdec(substr($this->endColour, 4, 2)));

				// Calculate the change value for red/green/blue
				$this->deltaColourRGB = array($this->endColourRGB[0] - $this->startColourRGB[0],
																			$this->endColourRGB[1] - $this->startColourRGB[1],
																			$this->endColourRGB[2] - $this->startColourRGB[2]);
		}

		function getColourValue($value, $format){
				$red   = $this->startColourRGB[0] + ($this->deltaColourRGB[0] / ($this->maxValue - $this->minValue)) * ($value - $this->minValue);
				$green = $this->startColourRGB[1] + ($this->deltaColourRGB[1] / ($this->maxValue - $this->minValue)) * ($value - $this->minValue);
				$blue  = $this->startColourRGB[2] + ($this->deltaColourRGB[2] / ($this->maxValue - $this->minValue)) * ($value - $this->minValue);

				if ($format == 'kml') {
						$colour = sprintf('%02X%02X%02X%02X', $this->kmlAlphaColour, $blue, $green, $red);
				}
				else { // Hex colour
						$colour = sprintf('%02X%02X%02X', $red, $green, $blue);
				}

				return $colour;
		}

		function getColourLegend(){
				$height = $this->colourLegendHeight;
				$width = $this->colourLegendWidth;

				// Create colour scale canvas
				$legend = imagecreatetruecolor(150, $height+6);

				// Allocate colours
				$bgColour = imagecolorallocatealpha($legend, 255, 255, 255, 127);
				$white = $fontColour = imagecolorallocate($legend, 255, 255, 255);
				imageSaveAlpha($legend, true);

				// Set background colour
				imagefill($legend, 0, 0, $bgColour);

				switch ($this->classification) {

						case 'unclassed':
								for ($i = 0; $i <= $height; $i++) {
										$red   = intval($this->endColourRGB[0] - (($this->deltaColourRGB[0] / $height) * $i));
										$green = intval($this->endColourRGB[1] - (($this->deltaColourRGB[1] / $height) * $i));
										$blue  = intval($this->endColourRGB[2] - (($this->deltaColourRGB[2] / $height) * $i));
										$myColourScale[] = imagecolorallocate($legend, $red, $green, $blue);
								}
								// Draw colour scale
								imagesetstyle($legend, $myColourScale);

								for ($i = 0; $i < $width; $i++) {
									imageline($legend, 21+$i, 2, 21+$i, $height+2, IMG_COLOR_STYLED);
								}

								// print min and max values
								//number_format(($s / $ocorrencias),2,",",".")
								//imagestring($legend, 3, $width+29, $height-6, number_format($this->minValue, $this->precision), $fontColour);
								//imagestring($legend, 3, $width+29, -3, number_format($this->maxValue, $this->precision), $fontColour);
								imagestring($legend, 3, $width+29, $height-6, number_format($this->minValue, 2,",","."), $fontColour);
								imagestring($legend, 3, $width+29, -3, number_format($this->maxValue, 2,",","."), $fontColour);

								break;

						// classed (equal intervals / quantiles)
						default:
							$ypos = 0;
							$interval = $height / $this->numClasses;
							$v = $this->classColours;
							foreach($v as $key => $colour){
										$red   = hexdec(substr($colour, 0, 2));
										$green = hexdec(substr($colour, 2, 2));
										$blue  = hexdec(substr($colour, 4, 2));

										$classColour = imagecolorallocate($legend, $red, $green, $blue);
										imagefilledrectangle($legend, 21, $height-$ypos+2, $width+20, $height-$ypos-$interval, $classColour);

										//imagestring($legend, 3, $width+29, $height-$ypos-5, number_format($this->classBreaks[$key], $this->precision), $fontColour);
										imagestring($legend, 3, $width+29, $height-$ypos-5, number_format($this->classBreaks[$key], 2,",","."), $fontColour);

										$ypos += $interval;
							}
							//imagestring($legend, 3, $width+29, -3, number_format($this->classBreaks[$key+1], $this->precision), $fontColour);
							imagestring($legend, 3, $width+29, -3, number_format($this->classBreaks[$key+1], 2,",","."), $fontColour);

				}

				// Border around colour scale
				imagerectangle($legend, 19, 0, $width+22, $height+4, $white);
				imagerectangle($legend, 20, 1, $width+21, $height+3, $white);

				// Legend title
				//imagestringup($legend, 3, 0, ($height/2)+(strlen($this->mapTitle)/2)*7, $this->mapTitle, $white);

				// Save legend
				$file = $this->dirtmp.'/legend'. time() .'.png';
				imagepng($legend, $file);

				return $file;
		}


		function getSymbolSize($value, $geometry)
		{
				switch ($geometry) {
						case 'circle': // Returns radius of the circle
						case 'square': // Returns length of a side
								return sqrt($value/$this->maxValue)*$this->symbolMaxSize;
						case 'column': // Returns height of the column
								return ($value/$this->maxValue)*$this->symbolMaxSize;
						case 'sphere': // Returns radius of the sphere
						case 'cube': // Returns length of a side
								return pow($value/$this->maxValue, 1/3)*$this->symbolMaxSize;
		}
		}

		function makeClasses($classification, $numClasses){
				$this->classBreaks = array();

				switch ($classification) {

						case 'equal':
								$interval = ($this->maxValue - $this->minValue) / $numClasses;
								for ($i = 0; $i < $numClasses; $i++) {
										$position = $this->minValue + ($interval * $i);
										$this->classBreaks[] = round($position, $this->precision);
								}
								$this->classBreaks[] = $this->maxValue; // Last class break = biggest value
								break;

						case 'quantile':
								$values = array_values($this->indicator['values'][$this->year]);
								sort($values);
								$numValues = count($values);
								$classNum = $numValues / $numClasses; // Number in each class
								for ($i = 0; $i < $numClasses; $i++) {
										$position = (int)($classNum * $i);
										$this->classBreaks[] = $values[$position];
								}
								$this->classBreaks[] = $values[$numValues-1]; // Last class break = biggest value
		}

				// Make class colours (could be separate function)
				for ($i = 0; $i < $numClasses; $i++) {
						$red   = (int)($this->startColourRGB[0] + ($this->deltaColourRGB[0] / ($numClasses - 1)) * $i);
						$green = (int)($this->startColourRGB[1] + ($this->deltaColourRGB[1] / ($numClasses - 1)) * $i);
						$blue  = (int)($this->startColourRGB[2] + ($this->deltaColourRGB[2] / ($numClasses - 1)) * $i);

						$this->classColours[$i] = sprintf('%02X%02X%02X', $red, $green, $blue);
				}
		}


		function getClass($value){
				$class = 0;
				//var_dump($this->classBreaks);exit;
				for ($i = 1; $i < count($this->classBreaks); $i++) {
						if ($value > $this->classBreaks[$i] && $value <= $this->classBreaks[$i+1]) {
								$class = $i;
						}
				}
				return $class;
		}

		function mapTitleImage(){
				$title = explode('|', wordwrap($this->mapTitle, 25, "|", true));
				$source = explode('|', wordwrap($this->mapSource, 25, "|", true));

				// Calculate text height (15px for each text line)
				$textSize = (count($title) + count($source)) * 15;

				// Create new legend canvas
				$legend = imagecreatetruecolor(200, 56 + $textSize);

				// Allocate colours
				$bgColour = imagecolorallocatealpha($legend, 255, 255, 255, 10);
				$black = $fontColour = imagecolorallocate($legend, 0, 0, 0);
				imageSaveAlpha($legend, true);

				// Set background colour
				imagefill($legend, 0, 0, $bgColour);

				// Add logo
				$legendTop = imagecreatefrompng($this->logo);
				imagecopy($legend, $legendTop, 0, 0, 0, 0, 200, 30);

				// Print title
				$ypos = 37;
				foreach($title as $line){

						imagestring($legend, 3, 100-(strlen($line)*7)/2, $ypos, $line, $fontColour);
						$ypos += 15;
				}

				// Print source
				foreach($source as $line){
						$ypos += 15;
						imagestring($legend, 2, 192-(strlen($line)*6), $ypos, $line, $fontColour);
				}

				// Save legend
				$file = $this->dirtmp.'/logo'. time() .'.png';
				imagepng($legend, $file);

				return $file;
		}
} // class ThematicMap


?>