X-Git-Url: https://git.toastfreeware.priv.at/philipp/winterrodeln/mediawiki_extensions/wrmap.git/blobdiff_plain/2a454a4aca90c8b8f3f0c3af9f7827fc668b0269..7d906ff443cebe39d1ad109af50c3dea75f7b36d:/wrmap.body.php diff --git a/wrmap.body.php b/wrmap.body.php index 4a0ac32..8723f96 100644 --- a/wrmap.body.php +++ b/wrmap.body.php @@ -1,203 +1,187 @@ setHook('wrmap', 'wrmapParserHook'); - $wgParser->setHook('wrgmap', array($wrGoogleMaps, 'render')); - return true; -} - - -// Tool functions -// -------------- - -/// List of markers - used by the functions wrMapReplaceByMarker and wrMapAfterTidy -$wrMapMarkerList = array(); - -/// 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; +// 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('/\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('Falsches Koordinatenformat: ' . $input); + return $result; } -/// 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; +// 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 +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_types = array('gasthaus', 'haltestelle', 'parkplatz', 'achtung', '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('Unbekanntes Element <' . $feature->getName() . '>. Erlaubt sind: <' . implode('>, <', array_keys(array_merge($point_type, $line_type))) . '>.'); + } -// Java script -// ----------- + // 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("Das Attribut '" . reset($wrong_properties) . "' ist nicht erlaubt bei <" . $feature->getName() . ">. Erlaubt sind: '" . implode("', '", $allowed_properties) . "'."); + foreach ($given_properties as $property) { + $properties[$property] = (string) $feature[$property]; + } + $coordinates = geo_to_coordinates($feature); + if (count($coordinates) != 1) throw new Exception('Das Element <' . $feature->getName() . '> muss genau ein Koordinatenpaar haben.'); + $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("Das Attribut '" . reset($wrong_properties) . "' ist nicht erlaubt bei <" . $feature->getName() . ">. Erlaubt sind: '" . implode("', '", $allowed_properties) . "'."); + if (isset($feature['farbe'])) $properties['strokeColor'] = (string) $feature['farbe']; // e.g. #a200b7 // TODO: Check + if (isset($feature['dicke'])) $properties['strokeWidth'] = (int) $feature['dicke']; // e.g. 6 // TODO: Check + $json_feature = array( + 'type' => 'feature', + 'geometry' => array( + 'type' => 'LineString', + 'coordinates' => geo_to_coordinates($feature) + ), + 'properties' => $properties + ); + $json_features[] = $json_feature; + } + } + return $json_features; +} -// Global JavaScript functions -define(WRGMAPJSFUNCTIONS, << -//" + name+ "");}); - return marker; -} -//]]> - -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 tags are on the current page? - private $mapsCount = 0; - - /// Constructor - function WrGoogleMaps($apiKey) { - $this->apiKey = $apiKey; - } - - /// Renders the tag +class WrBaseMap { + /// Renders the tag and the tag. + /// This class would be the only class needed but as the function render() toes 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 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 /// /// @return string - the html for rendering the map - function render($content, $args, &$parser) { - ++$this->mapsCount; - - // Decode data - if (isset($args['lat'])) $latitude = floatval($args['lat']); else $latitude = 47.267648; - if (isset($args['lon'])) $longitude = floatval($args['lon']); else $longitude = 11.404655; - if (isset($args['zoom'])) $zoom = intval($args['zoom']); else $zoom = 10; // Google Zoom Level - - // 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 .= '' . "\n"; - $output .= WRGMAPJSFUNCTIONS; + 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'))); + + $parserOutput = $parser->getOutput(); + $parserOutput->addHeadItem('', 'googlemaps'); + $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, sledruns_to_json_features()); } - - // Create
element where the map is placed in - $mapName = 'wrgmap' . $this->mapsCount; - $output .= '
'; - - // Return output - $output .= '\n"; - return wrMapReplaceByMarker($output); - } - - // returns a string that creates a map object called 'map' - private function addMap($mapName, $latitude, $longitude, $zoom) { - 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($latitude, $longitude), $zoom);\n" . - "\tmap.setMapType(G_PHYSICAL_MAP);\n" . - "\tmap.enableScrollWheelZoom();\n"; - } - - // 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"; - } - -} - -/// Format inside ... has to be like this: -/// -/// -/// Rodelbahn|47.143241 N 11.208959 E|Birgitzer Alm -/// ... -/// -/// -/// The extension produces a format like this: -/// -/// 47.241731, 11.358994, Birgitzer Alm -/// Die Birgitzer Alm ist nett -/// 47.17607, 11.542763, Naviser Hütte -/// Die Naviser Hütte -/// -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)); + // 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, xml_to_json_features('' . $content . '')); } catch (Exception $e) { - return sprintf(utf8_encode('Ungültige Zeile in der Koordinatenliste: %s. %s'), htmlspecialchars($line), htmlspecialchars($e->getMessage())); + return '
' . htmlspecialchars("Fehler beim Parsen der Landkarte: " . $e->getMessage()) . '
'; } + + // create final geojson + $json = array( + 'type' => 'FeatureCollection', + 'features' => $json_features, + 'properties' => $properties + ); + $json_string = json_encode($json); + + // Create
element where the map is placed in + global $wgExtensionAssetsPath; + $width_s = (isset($properties['width'])) ? (string) $properties['width'] . 'px' : '100%'; + $height_s = (isset($properties['height']) ? (string) $properties['height'] : 450) . 'px'; + $output = "
"; + $output .= ""; + $output .= "
\n"; + + return $output; } - 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 = ''. "\n" . $output . "\n"; - if ($debug) return "
$output
\n"; - return $parser->recursiveTagParse($output); +// tag +class WrMap extends WrBaseMap { } +// tag +class WrGMap extends WrBaseMap { +} + ?>