X-Git-Url: https://git.toastfreeware.priv.at/philipp/winterrodeln/mediawiki_extensions/wrmap.git/blobdiff_plain/60e4494d367f653625de48e19534bae5c79f45d7..3ffafa56d686b5d917e707b975146787e2196c45:/wrmap.body.php

diff --git a/wrmap.body.php b/wrmap.body.php
index c4e3d9e..b6bd40b 100644
--- a/wrmap.body.php
+++ b/wrmap.body.php
@@ -1,5 +1,99 @@
 <?php
 
+// get value of key or default value if key does not exist
+// gets coordinates and returns an array of lon/lat coordinate pairs, e.g.
+// 47.12 N 11.87 E
+// 47.13 N 11.70 E
+// ->
+// array(array(11.87, 47.12), array(11.70, 47.13))
+function geo_to_coordinates($input) {
+	$matches = array();
+	$num_matches = preg_match_all('/(\d+\.?\d*)\s*N?\s+(\d+\.?\d*)\s*E?\s*/', $input, $matches);
+	$result = array();
+	for ($i=0; $i!=$num_matches; ++$i) {
+		$result[] = array(floatval($matches[2][$i]), floatval($matches[1][$i]));
+	}
+	return $result;
+}
+
+
+// convert sledruns to geojson (http://www.geojson.org/geojson-spec.html)
+// Returns an array of features
+function sledruns_to_json_features() {
+	$json_features = array(); // result
+	$dbr = wfGetDB(DB_SLAVE);
+	$res = $dbr->select(array('wrsledruncache', 'wrreportcache'), array('wrsledruncache.page_title', 'position_latitude', 'position_longitude', 'date_report', '`condition`'), array('show_in_overview', 'not under_construction'), __METHOD__, array(), array('wrreportcache' => array('left outer join', 'wrsledruncache.page_id=wrreportcache.page_id')));
+	while ($sledrun = $dbr->fetchRow($res)) {
+		$lat = $sledrun['position_latitude'];
+		$lon = $sledrun['position_longitude'];
+		if (is_null($lat) || is_null($lon)) continue;
+		$lat = floatval($lat);
+		$lon = floatval($lon);
+		$title = Title::newFromText($sledrun['page_title']);
+		$properties = array('type' => 'sledrun', 'name' => $title->getText(), 'wiki' => $title->getLocalUrl());
+		if (!is_null($sledrun['date_report'])) $properties[] = $sledrun['date_report'];
+		if (!is_null($sledrun['condition'])) $properties[] = intval($sledrun['condition']);
+		$json_feature = array(
+			'type' => 'feature',
+			'geometry' => array(
+				'type' => 'Point',
+				'coordinates' => array($lon, $lat)
+			),
+			'properties' => $properties
+		);
+		$json_features[] = $json_feature;
+	}
+	$dbr->freeResult($res);
+	return $json_features;
+}
+
+
+// convert XML to geojson (http://www.geojson.org/geojson-spec.html)
+// Returns an array of features
+// TODO: Error reporting
+function xml_to_json_features($input) {
+	libxml_use_internal_errors(true); // without that, we get PHP Warnings if the $input is not well-formed
+	$xml = new SimpleXMLElement($input); // input
+	$json_features = array(); // output
+	$point_type = array('gasthaus' => 'inn', 'haltestelle' => 'busstop', 'parkplatz' => 'carpark', 'achtung' => 'attention', 'punkt' => 'point');
+	$line_type = array('rodelbahn' => 'sledrun', 'gehweg' => 'walk', 'alternative' => 'alternative', 'lift' => 'lift', 'linie' => 'line');
+	foreach ($xml as $feature) {
+		// point
+		if (in_array($feature->getName(), array_keys($point_type))) {
+			$properties = array('type' => $point_type[$feature->getName()]);
+			if (isset($feature['wiki'])) $properties['wiki'] = (string) $feature['wiki'];
+			if (isset($feature['name'])) $properties['name'] = (string) $feature['name'];
+			$json_feature = array(
+				'type' => 'feature',
+				'geometry' => array(
+					'type' => 'Point',
+					'coordinates' => geo_to_coordinates($feature)[0]
+				),
+				'properties' => $properties
+			);
+			$json_features[] = $json_feature;
+		}
+		// line
+		if (in_array($feature->getName(), array_keys($line_type))) {
+			$properties = array('type' => $line_type[$feature->getName()]);
+			if (isset($feature['farbe'])) $properties['strokeColor'] = (string) $feature['farbe'];
+			if (isset($feature['dicke'])) $properties['strokeWidth'] = (string) $feature['dicke'];
+			$json_feature = array(
+				'type' => 'feature',
+				'geometry' => array(
+					'type' => 'LineString',
+					'coordinates' => geo_to_coordinates($feature)
+				),
+				'properties' => $properties
+			);
+			$json_features[] = $json_feature;
+		}
+	}
+	return $json_features;
+}
+
+
+
 class WrBaseMap {
 	/// Renders the <wrgmap> tag and the <wrmap> tag.
 	/// This class would be the only class needed but as the function render() toes not provide an argument
@@ -12,7 +106,7 @@ class WrBaseMap {
 	public static function render($content, $args, $parser, $frame) {
 		// Unfortunately, $tagname is no argument of this function, therefore we have to use a trick with derived classes.
 		$tagname = strtolower(get_called_class()); // either wrmap or wrgmap
-		assert(in_array($tagname, 'wrmap', 'wrgmap'));
+		assert(in_array($tagname, array('wrmap', 'wrgmap')));
 
 		// Get center and zoom level from $args
 		if (isset($args['lat'])) $latitude = floatval($args['lat']); else $latitude = 47.267648;   // latitude as float value
@@ -24,42 +118,46 @@ class WrBaseMap {
 		$longitude_s = sprintf('%.6F', $longitude);
 		$width_s = is_null($width) ? '100%' : $width . 'px';
 		$height_s = $height . 'px';
+		$show_sledruns = ($tagname == 'wrgmap');
 
-		// Query database
-		$dbr = wfGetDB(DB_SLAVE);
-		$res = $dbr->select(array('wrsledruncache', 'wrreportcache'), array('wrsledruncache.page_title', 'position_latitude', 'position_longitude', 'date_report', '`condition`'), array('show_in_overview', 'not under_construction'), __METHOD__, array(), array('wrreportcache' => array('left outer join', 'wrsledruncache.page_id=wrreportcache.page_id')));
-		$sledruns = array();
-		while ($sledrun = $dbr->fetchRow($res)) $sledruns[] = $sledrun;
-		$dbr->freeResult($res);
-		
 		$parserOutput = $parser->getOutput();
 		$parserOutput->addHeadItem('<script type="text/javascript" src="http://maps.google.com/maps/api/js?v=3.8&amp;sensor=false"></script>', 'googlemaps');
 		$parserOutput->addModules('ext.wrmap');
 		
+		$json_features = array();
+
+		// append all sledruns as icon
+		if ($show_sledruns) {
+			$json_features = array_merge($json_features, sledruns_to_json_features());
+		}
+
+		// append all elements in the XML
+		try {
+			$json_features = array_merge($json_features, xml_to_json_features('<wrmap>' . $content . '</wrmap>'));
+		} catch (Exception $e) {
+			return htmlspecialchars($e);
+		}
+
+		// create final geojson
+		$json = array(
+			'type' => 'FeatureCollection',
+			'features' => $json_features
+		);
+		$json_string = json_encode($json);
+
 		// Create <div/> element where the map is placed in
 		global $wgExtensionAssetsPath;
-		$output = "<div class=\"wrmap\" style=\"width: $width_s; height: $height_s; border-style:none;\" data-center-lon=\"$longitude_s\" data-center-lat=\"$latitude_s\" data-zoom=\"$zoom\" data-img-path=\"$wgExtensionAssetsPath/wrmap/openlayers/img/\">\n";
-
-		// create layeer showing sledruns as icons (note: why not use WFS?)
-		foreach ($sledruns as $sledrun) {
-			$lat = $sledrun['position_latitude'];
-			$lon = $sledrun['position_longitude'];
-			if (!$lat || !$lon) continue;
-			$title = Title::newFromText($sledrun['page_title']);
-			$title_text = htmlspecialchars($title->getText());
-			$title_url = htmlspecialchars($title->getLocalUrl());
-			$output .= "<p data-lon=\"$lon\" data-lat=\"$lat\" data-title=\"$title_text\" data-url=\"$title_url\" ";
-			if (!is_null($sledrun['date_report'])) $output .= "data-date_report=\"{$sledrun['date_report']}\" ";
-			if (!is_null($sledrun['condition'])) $output .= "data-condition=\"{$sledrun['condition']}\" ";
-			$output .= "/>\n";
-		}
+		$output = "<div class=\"wrmap\" style=\"width: $width_s; height: $height_s; border-style:none;\" data-center-lon=\"$longitude_s\" data-center-lat=\"$latitude_s\" data-zoom=\"$zoom\" data-img-path=\"$wgExtensionAssetsPath/wrmap/openlayers/img/\">";
+		$output .= "<script type=\"application/json\">";
+		$output .= htmlspecialchars($json_string, ENT_NOQUOTES);
+		$output .= "</script>";
 		$output .= "</div>\n";
 		
 		return $output;
 	}
-
 }
 
+
 // <wrmap> tag
 class WrMap extends WrBaseMap {
 }