]> ToastFreeware Gitweb - philipp/winterrodeln/mediawiki_extensions/wrmap.git/blobdiff - wrmap.body.php
Add attribution.
[philipp/winterrodeln/mediawiki_extensions/wrmap.git] / wrmap.body.php
index b833eb679e1720ae301982d7ba48514eaf13eb5f..03af984aff360778fc0eca7136ecb06ea731a532 100644 (file)
 <?php
-require_once dirname(__FILE__) . '/../wrgeo/wrgeo.body.php'; # for the function wrGeoGeoStringToGeo
-
-function wrMapParserFirstCallInit() {
-       global $wgParser;
-       // global $wrGoogleMaps; // is this necessary?
-       global $wgGoogleMapsKey;
-       $wrGoogleMaps = new WrGoogleMaps($wgGoogleMapsKey);
-       $wgParser->setHook('wrmap', 'wrmapParserHook');
-       $wgParser->setHook('wrgmap', array($wrGoogleMaps, 'render'));
-       return true;
-}
+/* This extension creates a map using OpenLayers to show sledrun details and sledrun overviews.
+This extension depends on no other extension.
 
 
-// Tool functions
-// --------------
+Example 1
+---------
 
-/// List of markers - used by the functions wrMapReplaceByMarker and wrMapAfterTidy
-$wrMapMarkerList = array();
+<wrgmap lat="47.267648" lon="11.40465" zoom="10"/>
 
+(Shows icons for all sledruns. lat, lon and zoom are optional.)
 
-/// Returns a marker for a text and back-replaces the text in wrReportAfterTidy
-function wrMapReplaceByMarker($text, $marker = 'wrMapMarker') {
-       $marker = $marker . mt_rand(1e5, 1e7);
-       global $wrMapMarkerList;
-       $wrMapMarkerList[$marker] = $text;
-       return $marker;
-}
 
+Example 2
+---------
 
-/// Replaces the markers by its contents
-function wrMapParserAfterTidy(&$parser, &$text) {
-       // find markers in $text
-       // replace markers with actual output
-       global $wrMapMarkerList;
-       foreach ($wrMapMarkerList as $marker => $html) $text = str_replace($marker, $html, $text);
-       return true;
-}
+<wrmap lat="47.2417134" lon="11.21408895" zoom="14" width="700" height="400">
+
+<gasthaus name="Rosskogelhütte" wiki="Rosskogelhütte">47.240689 11.190454</gasthaus>
+<gasthaus name="Stiglreith">47.238186 11.221940</gasthaus>
+<gasthaus name="Sulzstich">47.240287 11.203006</gasthaus>
+<parkplatz>47.245789 11.238971</parkplatz>
+<parkplatz>47.237627 11.218886</parkplatz>
+<haltestelle name="Oberperfuss Rangger Köpfl Lift">47.245711 11.238283</haltestelle>
+<achtung name="Kreuzung mit Schipiste">47.2383200 11.2235592</achtung>
+
+<gehweg>
+47.238587 11.203360
+47.239743 11.203522
+47.240135 11.203247
+</gehweg>
+
+<gehweg>
+47.238442 11.203263
+47.237799 11.203511
+47.237133 11.202988
+47.238091 11.206642
+47.237273 11.211675
+47.237133 11.214466
+47.237513 11.218199
+</gehweg>
+
+<alternative>
+47.240487 11.190169
+47.238996 11.188628
+47.238987 11.188018
+47.238267 11.187075
+47.238461 11.190511
+47.239751 11.191795
+47.240037 11.192702
+47.239525 11.193535
+47.239688 11.194272
+47.239017 11.193925
+47.239536 11.195457
+47.240063 11.196230
+47.240747 11.196658
+47.239734 11.198295
+47.238857 11.198346
+47.237743 11.199778
+47.238250 11.202755
+47.238587 11.203360
+</alternative>
+
+<rodelbahn>
+47.238587 11.203360
+47.238185 11.203982
+47.238297 11.204381
+47.239417 11.204972
+47.239210 11.208772
+47.238999 11.209523
+47.239126 11.209839
+47.238933 11.210641
+47.239102 11.210739
+47.238666 11.215042
+47.238203 11.216089
+47.238183 11.218151
+47.237851 11.218599
+47.238055 11.219755
+47.237686 11.222441
+47.238000 11.223367
+47.238625 11.223687
+47.239915 11.223118
+47.240992 11.219781
+47.243412 11.214141
+47.243207 11.218331
+47.243990 11.216205
+47.243785 11.223251
+47.242845 11.228510
+47.242917 11.232501
+47.242524 11.235001
+47.244737 11.231791
+47.244951 11.230868
+47.245470 11.237853
+</rodelbahn>
+
+<lift>
+47.245656 11.237286
+47.238189 11.221344
+</lift>
 
+</wrmap>
 
 
-// Java script
-// -----------
 
-// Global JavaScript functions
-define(WRGMAPJSFUNCTIONS, <<<JAVASCRIPT
-<script type="text/javascript">
-//<![CDATA[
-var wrSleddingIcon = new GIcon(G_DEFAULT_ICON);
-/*
-var wrSleddingIcon = new GIcon();
-wrSleddingIcon.image = "bahn.png";
-wrSleddingIcon.shadow = "bahns.png";
-wrSleddingIcon.iconSize = new GSize(17, 17);
-wrSleddingIcon.shadowSize = new GSize(23, 23);
-wrSleddingIcon.iconAnchor = new GPoint(9, 9);
-wrSleddingIcon.infoWindowAnchor = new GPoint(9, 9);
+Definition
+----------
+
+* <wrmap>...</wrmap> has to be valid XML.
+* All coordinates are in WGS84 coordinate system.
+* Coordinates have the preferred format "latitude N longitude E",
+  however for parsing the N and E can be omitted.
+* <wrmap> has the following attributes:
+       * lat (float): latitude of map-center, optional.
+       * lon (float): longitude of map-center, optional.
+       * zoom (integer): zoom level of the map (google zoom levels). optional.
+       * width (integer): width of the map in pixel. optional (100% if omitted)
+       * height (integer): height of the map in pixel. optional.
+       * <wrmap> can have any number of the following sub-elements:
+               * <gasthaus>
+               * <haltestelle>
+               * <parkplatz>
+               * <achtung>
+               * <foto>
+               * <verleih>
+               * <punkt>
+               * <rodelbahn>
+               * <alternative>
+               * <gehweg>
+               * <lift>
+               * <anfahrt>
+               * <linie>
+       * The order may be used by the renderer to determine in which order the
+         elements should be drawn.
+* <gasthaus>, <haltestelle>, <parkplatz>, <achtung>, <foto>, <verleih> and <punkt> define points
+       * The elements may have the following attributes:
+               * name (string): defines the name (not the label) of the element
+               * wiki (string): name of a MediaWiki page the point refers to
+       * The content is exactly one coordinate pair.
+* <rodelbahn>, <alternative>, <gehweg>, <lift>, <anfahrt> and <linie>
+  define non-closed polygons.
+       * They may have the following attributes:
+               farbe (hex format, e.g. #12a50f): color of the line
+               dicke (int): width of the line in pixel
+       * The content of the elements are a whitespace separated list of
+               coordinates.
+
+
+For transmitting the map to javascript, geojson is used in the <div> element of the map.
+This way, an extra request is avoided. The geojson format used here consists of a single
+"FeatureCollection" (representing the <wrmap>) containing the sub-elements of wrmap
+as features.
+The features have an properties key that has a hash as values with the properties of
+the XML subelements of wrmap. Optional attributes/properties can be omitted.
+Additionally one mandatory property key is called 'type' and has the sub-element's name
+as value.
+The featurecollection itself has a properties key as well containing the attributes of
+the wrmap element.
 */
 
 
-function wrCreateMarker(latitude, longitude, name, icon) {
-       var point = new GLatLng(latitude, longitude);
-       var marker = new GMarker(point, icon);
-       GEvent.addListener(marker, "click", function() {marker.openInfoWindowHtml("<strong>" + name + "</strong>");});
-       return marker;
+// DOM helper classes
+// ------------------
+
+// The following two classes are "duplicated" from the wrreport extension to keep them separate.
+// Put improvements in both classes.
+class WrMapDOMDocument extends DOMDocument {
+       function __construct() {
+               parent::__construct('1.0', 'utf-8');
+               $this->registerNodeClass('DOMElement', 'WrMapDOMElement');
+       }
+
+       /// Creates and adds the element with the given tag name and returns it.
+       /// Additionally, it calls setAttribute($key, $value) for every entry
+       /// in $attributes.
+       function appendElement($tagName, $attributes=array()) {
+               $child = $this->appendChild($this->createElement($tagName));
+               foreach ($attributes as $key => $value) $child->setAttribute($key, $value);
+               return $child;
+       }
+}
+
+
+class WrMapDOMElement extends DOMElement {
+
+       /// Creates and adds the element with the given tag name and returns it
+       /// Additionally, it calls setAttribute($key, $value) for every entry
+       /// in $attributes.
+       function appendElement($tagName, $attributes=array()) {
+               $child = $this->appendChild($this->ownerDocument->createElement($tagName));
+               foreach ($attributes as $key => $value) $child->setAttribute($key, $value);
+               return $child;
+       }
+
+       /// Adds any UTF-8 string as content of the element - it will be escaped.
+       function appendText($text) {
+               return $this->appendChild($this->ownerDocument->createTextNode($text));
+       }
+
+       // Appends a CDATASections to the element. This can be used to include
+       // raw (unparsed) HTML to the DOM tree as it is necessary because
+       // $parser->recursiveTagParse does not always escape & characters.
+       // (see https://bugzilla.wikimedia.org/show_bug.cgi?id=55526 )
+       // Workaround: Use a CDATA section. When serializing with $doc->saveHTML,
+       // the <![CDATA[...]]> is returned as ... .
+       // However, we end up having unescaped & in the output due to this bug in recursiveTagParse.
+       function appendCDATA($data) {
+               return $this->appendChild($this->ownerDocument->createCDATASection($data));
+       }
 }
-//]]>
-</script>
-JAVASCRIPT
-);
-
-
-/** This class was inpired by the GoogleMaps class of the GoogleMaps extension. */
-class WrGoogleMaps {
-       /// the Google API key (obtained from
-       /// http://www.google.com/apis/maps/signup.html)
-       private $apiKey = null;
-       
-       /// How many <wrgmap> tags are on the current page?
-       private $mapsCount = 0;
-       
-       /// Constructor
-       function WrGoogleMaps($apiKey) {
-               $this->apiKey = $apiKey;
+
+
+// WrBaseMap
+// ---------
+
+class WrBaseMap {
+       // 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))
+       public static function geo_to_coordinates($input) {
+               $matches = array();
+               $num_matches = preg_match_all('/\s*(\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]));
+               }
+               if (implode($matches[0]) != $input) throw new Exception(wfMessage('wrmap-error-coordinate-format', $input)->text());
+               return $result;
+       }
+
+
+       /// Takes a page title from the wiki and returns an image (if available)
+       /// or Null. For image wiki pages, the image is the corresponding image,
+       /// for inns it's the image of the "Gasthausbox".
+       public static function wikipage_to_image($title, $width) {
+               $file = false; // File class or false
+               // for NS_FILE titles, use the corresponding file as image
+               if ($title->getNamespace() == NS_FILE) {
+                       $file = wfFindFile($title); // $file is a mediawiki File class or false
+               } else {
+                       $categories = $title->getParentCategories(); // e.g. array('Kategorie:Rodelbahn' => 'Juifenalm')
+                       global $wgContLang;
+                       $key_sledrun = $wgContLang->getNSText(NS_CATEGORY) . ':Rodelbahn';
+                       if (array_key_exists($key_sledrun, $categories)) {
+                               // for sledrun titles use the image from the rodelbahnbox
+                               $dbr = wfGetDB(DB_SLAVE);
+                               $res = $dbr->select('wrsledruncache', 'image', array('page_id' => $title->getArticleID()), __METHOD__);
+                               $image = $dbr->fetchRow($res);
+                               if ($image && !is_null($image['image'])) $file = wfFindFile($image['image']);
+                               $dbr->freeResult($res);
+                       }
+                       $key_inn = $wgContLang->getNSText(NS_CATEGORY) . ':Gasthaus';
+                       if (array_key_exists($key_inn, $categories)) {
+                               // for inn titles use the image from the gasthausbox
+                               $dbr = wfGetDB(DB_SLAVE);
+                               $res = $dbr->select('wrinncache', 'image', array('page_id' => $title->getArticleID()), __METHOD__);
+                               $image = $dbr->fetchRow($res);
+                               if ($image && !is_null($image['image'])) $file = wfFindFile($image['image']);
+                               $dbr->freeResult($res);
+                       }
+               }
+               if ($file === false) return Null;
+               if (!$file->canRender()) return Null;
+               $thumb_url = $file->createThumb($width, $width); // limit width and hight to $width
+               if (strlen($thumb_url) == 0) return Null;
+               return $thumb_url;
        }
-       
-       /// Renders the <wrgmap> tag
+
+
+       // convert sledruns to geojson (http://www.geojson.org/geojson-spec.html)
+       // Returns an array of features
+       public static 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['date_report'] = $sledrun['date_report'];
+                       if (!is_null($sledrun['condition'])) $properties['condition'] = intval($sledrun['condition']);
+                       $image_url = WrBaseMap::wikipage_to_image($title, 150);
+                       if (!is_null($image_url)) $properties['thumb_url'] = $image_url;
+                       $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
+       public static 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
+               $whitespace = (string) $xml; // everything between <wrmap> and </wrmap> that's not a sub-element
+               if (strlen($whitespace) > 0 && !ctype_space($whitespace)) { // there must not be anythin except sub-elements or whitespace
+                       throw new Exception(wfMessage('wrmap-error-invalid-text', trim($xml))->text());
+               }
+               $json_features = array(); // output
+               $point_types = array('gasthaus', 'haltestelle', 'parkplatz', 'achtung', 'foto', 'verleih', 'punkt');
+               $line_types = array('rodelbahn', 'gehweg', 'alternative', 'lift', 'anfahrt', 'linie');
+               foreach ($xml as $feature) {
+                       $given_properties = array();
+                       foreach ($feature->attributes() as $key => $value) $given_properties[] = $key;
+
+                       // determine feature type
+                       $is_point = in_array($feature->getName(), $point_types);
+                       $is_line = in_array($feature->getName(), $line_types);
+                       if (!$is_point && !$is_line) {
+                               throw new Exception(wfMessage('wrmap-error-invalid-element', $feature->getName(), '<' . implode('>, <', array_merge($point_types, $line_types)) . '>')->text());
+                       }
+
+                       // point
+                       if ($is_point) {
+                               $properties = array('type' => $feature->getName());
+                               $allowed_properties = array('name', 'wiki');
+                               $wrong_properties = array_diff($given_properties, $allowed_properties);
+                               if (count($wrong_properties) > 0) throw new Exception(wfMessage('wrmap-error-invalid-attribute',  reset($wrong_properties), $feature->getName(), "'" . implode("', '", $allowed_properties) . "'")->text());
+                               foreach ($given_properties as $property) {
+                                       $propval = (string) $feature[$property];
+                                       if ($property == 'wiki') {
+                                               $title = Title::newFromText($propval);
+                                               $propval = $title->getLocalUrl();
+                                               $file_url = WrBaseMap::wikipage_to_image($title, 200);
+                                               if (!is_null($file_url)) $properties['thumb_url'] = $file_url;
+                                       }
+                                       $properties[$property] = $propval;
+                               }
+                               $coordinates = WrBaseMap::geo_to_coordinates($feature);
+                               if (count($coordinates) != 1) throw new Exception(wfMessage('wrmap-error-coordinate-count', $feature->getName())->text());
+                               $json_feature = array(
+                                       'type' => 'Feature',
+                                       'geometry' => array(
+                                               'type' => 'Point',
+                                               'coordinates' => reset($coordinates)
+                                       ),
+                                       'properties' => $properties
+                               );
+                               $json_features[] = $json_feature;
+                       }
+                       // line
+                       if ($is_line) {
+                               $properties = array('type' => $feature->getName());
+                               $allowed_properties = array('farbe', 'dicke');
+                               $wrong_properties = array_diff($given_properties, $allowed_properties);
+                               if (count($wrong_properties) > 0) throw new Exception(wfMessage('wrmap-error-invalid-attribute',  reset($wrong_properties), $feature->getName(), "'" . implode("', '", $allowed_properties) . "'")->text());
+                               if (isset($feature['farbe'])) {
+                                       $color = (string) $feature['farbe']; // e.g. #a200b7
+                                       if (preg_match('/^#[0-9a-f]{6}$/i', $color) != 1)
+                                               throw new Exception(wfMessage('wrmap-error-line-color')->text());
+                                       $properties['strokeColor'] = $color;
+                               }
+                               if (isset($feature['dicke'])) {
+                                       $stroke_width = (int) $feature['dicke']; // e.g. 6
+                                       if (((string) $stroke_width) !== (string) $feature['dicke'])
+                                               throw new Exception(wfMessage('wrmap-error-line-width')->text());
+                                       $properties['strokeWidth'] = $stroke_width;
+                               }
+                               $json_feature = array(
+                                       'type' => 'Feature',
+                                       'geometry' => array(
+                                               'type' => 'LineString',
+                                               'coordinates' => WrBaseMap::geo_to_coordinates($feature)
+                                       ),
+                                       'properties' => $properties
+                               );
+                               $json_features[] = $json_feature;
+                       }
+               }
+               return $json_features;
+       }
+
+
+       /// Renders the <wrgmap> tag and the <wrmap> tag.
+       /// The WrBaseMap class would be the only class needed but as the function render() does not provide an argument
+       /// telling which tag name called the function, a trick with two inherited classes has to be used.
        /// @param $content string - the content of the <wrgmap> tag
        /// @param $args array - the array of attribute name/value pairs for the tag
        /// @param $parser Parser - the MW Parser object for the current page
-       /// @param $localParser Parser - the parser for parsing local content
        ///
        /// @return string - the html for rendering the map
-       function render($content, $args, &$parser) {
-               ++$this->mapsCount;
+       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, array('wrmap', 'wrgmap')));
 
-               // Query database
-               $dbr = wfGetDB(DB_SLAVE);
-               $res = $dbr->select('wrsleddingcache', array('page_title', 'position_latitude', 'position_longitude'));
-               $sleddingRoutes = array();
-               while ($sleddingRoute = $dbr->fetchRow($res)) $sleddingRoutes[] = $sleddingRoute;
-               $dbr->freeResult($res);
-               
-               // Load Google Maps Script and define functions
-               $output = '';
-               if ($this->mapsCount == 1) {
-                       $output .= '<script src="http://maps.google.com/maps?file=api&amp;v=2&amp;key=' . htmlspecialchars($this->apiKey) . '" type="text/javascript"></script>' . "\n";
-                       $output .= WRGMAPJSFUNCTIONS;
+               $parserOutput = $parser->getOutput();
+               $parserOutput->addHeadItem('<script src="https://cdnjs.cloudflare.com/ajax/libs/openlayers/4.6.5/ol-debug.js"></script>', 'openlayers_js');
+               $parserOutput->addHeadItem('<link rel="stylesheet" type="text/css" href="https://cdnjs.cloudflare.com/ajax/libs/openlayers/4.6.5/ol-debug.css">', 'openlayers_css');
+               $parserOutput->addModules('ext.wrmap');
+
+               // append all sledruns as icon
+               $json_features = array();
+               $show_sledruns = ($tagname == 'wrgmap');
+               if ($show_sledruns) {
+                       $json_features = array_merge($json_features, WrBaseMap::sledruns_to_json_features());
                }
-                       
-               // Create <div/> element where the map is placed in
-               $mapName = 'wrgmap' . $this->mapsCount;
-               $output .= '<div id="' . $mapName . '" style="width: 100%; height: 450px; border-style:none;"></div>';
-               
-               // Return output
-               $output .= '<script type="text/javascript">' . "\n//<![CDATA[\n";
-               $output .= 'if (GBrowserIsCompatible()) {' . "\n";
-               $output .= $this->addMap($mapName);
-               foreach ($sleddingRoutes as $s) {
-                       $lat = $s['position_latitude'];
-                       $lon = $s['position_longitude'];
-                       $pageTitle = $s['page_title'];
-                       if (!$lat || !$lon) continue;
-                       $output .= $this->addJsMarker($lat, $lon, $pageTitle);
+
+               try {
+                       // map properties
+                       $properties = array();
+                       if (isset($args['lat'])) $properties['lat'] = (float) $args['lat']; // latitude as float value
+                       if (isset($args['lon'])) $properties['lon'] = (float) $args['lon']; // longitude as float value
+                       if (isset($args['zoom'])) $properties['zoom'] = (int) $args['zoom']; // zoom as int value
+                       if (isset($args['width'])) $properties['width'] = (int) $args['width']; // width as int value
+                       if (isset($args['height'])) $properties['height'] = (int) $args['height']; // height as int value
+
+                       // append all elements in the XML
+                       $json_features = array_merge($json_features, WrBaseMap::xml_to_json_features('<wrmap>' . $content . '</wrmap>'));
+               } catch (Exception $e) {
+                       $doc = new WrMapDOMDocument();
+                       $doc->appendElement('div', array('class' => 'error'))->appendText('Fehler beim Parsen der Landkarte: ' . $e->getMessage());
+                       return array($doc->saveHTML($doc->firstChild), 'markerType' => 'nowiki');
                }
-               $output .= "}\n//]]>\n</script>\n";
-               return wrMapReplaceByMarker($output);
-       }
-       
-       // returns a string that creates a map object called 'map'
-       private function addMap($mapName) {
-               return "\tvar map = new GMap2(document.getElementById('$mapName'), {'mapTypes': [G_NORMAL_MAP, G_HYBRID_MAP, G_PHYSICAL_MAP, G_SATELLITE_MAP]});\n" .
-               "\tmap.addControl(new GLargeMapControl());\n" .
-               "\tmap.addControl(new GMapTypeControl());\n" .
-               "\tmap.addControl(new GScaleControl());\n" .
-               "\tmap.setCenter(new GLatLng(47.267648, 11.404655), 10);\n" .
-               "\tmap.setMapType(G_PHYSICAL_MAP);\n" .
-               "\tmap.enableScrollWheelZoom();\n";
+
+               // create final geojson
+               $json = array(
+                       'type' => 'FeatureCollection',
+                       'features' => $json_features,
+                       'properties' => $properties
+               );
+               $json_string = json_encode($json);
+
+               // Create <div/> element where the map is placed in
+               global $wgExtensionAssetsPath;
+               $doc = new WrMapDOMDocument();
+               $div = $doc->appendElement('div', array('class' => 'wrmap', 'style' => 'border-style:none;', 'data-ext-path' => "$wgExtensionAssetsPath/wrmap"));
+               // progress message
+               $div->appendElement('div', array())->appendText(wfMessage('wrmap-loading')->text());
+               // data
+               $div->appendElement('div', array('style' => 'height: 0px; display:none;'))->appendText($json_string);
+               return array($doc->saveHTML($div), 'markerType' => 'nowiki');
        }
 
-       // returns a string with a add marker javascript call
-       private function addJsMarker($latitude, $longitude, $pageTitle) {
-               return "\tmap.addOverlay(wrCreateMarker($latitude, $longitude, \"" . htmlspecialchars(addslashes($pageTitle)) . "\", wrSleddingIcon));\n";
+
+       public static function onEnableMobileModules($out, $mode) {
+               $out->addModules('ext.wrmap.mobile');
+               return true;
        }
-       
 }
 
 
-/// Format inside <wrmap>...</wrmap> has to be like this:
-///
-/// <wrmap>
-/// Rodelbahn|47.143241 N 11.208959 E|Birgitzer Alm
-/// ...
-/// </wrmap>
-///
-/// The extension produces a format like this:
-/// <googlemap version="0.9" lat="47.241016" lon="11.56517" zoom="11">
-/// 47.241731, 11.358994, Birgitzer Alm
-/// Die Birgitzer Alm ist nett
-/// 47.17607, 11.542763, Naviser Hütte
-/// Die Naviser Hütte
-/// </googlemap>
-function wrmapParserHook($input, $args, $parser) {
-       $debug = (isset($args['debug']) && $args['debug'] != '0');
-
-       $output = '';
-       $lines = explode("\n", $input);
-       $latitudes = array();
-       $longitudes = array();
-       foreach ($lines as $line) {
-               try {
-                       $l = trim($line);
-                       if (strlen($l) == 0) continue;
-                       $columns = explode('|', $line);
-                       if (count($columns) != 3) throw new Exception(sprintf(utf8_encode('Die Anzahl der Spalten ist nicht 3 sondern %d'), count($columns)));
-                       $columns = list($type, $geo, $name) = $columns;
-                       if (strlen(trim($geo)) == 0) continue;
-                       list($latitude, $longitude) = wrGeoStringToGeo($geo);
-                       $latitudes[] = $latitude;
-                       $longitudes[] = $longitude;
-                       $output .= sprintf("%F, %F, %s\n", $latitude, $longitude, htmlspecialchars($name));
-               } catch (Exception $e) {
-                       return sprintf(utf8_encode('Ungültige Zeile in der Koordinatenliste: <em>%s</em>. %s'), htmlspecialchars($line), htmlspecialchars($e->getMessage()));
-               }
+// <wrmap> tag
+class WrMap extends WrBaseMap {
+       public static function onParserFirstCallInit(Parser $parser) {
+               $parser->setHook('wrmap', 'WrMap::render');
+               return true;
        }
-       if (count($latitudes) == 0) return utf8_encode('Keine Koordinaten eingetragen');
-       $minLatitude = min($latitudes);
-       $centerLat = $minLatitude + (max($latitudes) - $minLatitude) / 2;
-       $minLongitude = min($longitudes);
-       $centerLon = $minLongitude + (max($longitudes) - $minLongitude) / 2;
+}
 
-       // TODO: Varable zoom level
-       $output = '<googlemap version="0.9" lat="' . $centerLat . '" lon="' . $centerLon . '" type="terrain" zoom="9">'. "\n" . $output . "</googlemap>\n";
 
-       if ($debug) return "<pre><nowiki>$output</nowiki></pre>\n";
-       return $parser->recursiveTagParse($output);
+// <wrgmap> tag
+class WrGMap extends WrBaseMap {
+       public static function onParserFirstCallInit(Parser $parser) {
+               $parser->setHook('wrgmap', 'WrGMap::render');
+               return true;
+       }
 }
 
-
 ?>