<?php  /*    readpage.php - Version 2015-09-17      include from poi2gpx.php    Author:   https://de.wikivoyage.org/wiki/User:Mey2008         Contributors:   https://it.wikivoyage.org/wiki/Utente:Andyrom75    License:    Affero GPL v3 or later http://www.gnu.org/licenses/agpl-3.0.html       Recent changes:   2017-08-09: variable renaming   2015-12-15: do not filter "]]"   2015-09-17: translate 'all' new associative-array   2015-09-16: translate 'it' new associative-array   2015-07-26: optimize for count()   2015-07-20: image="" error   2015-05-04: file name to file_name    ToDo:   --- */  // DMS to DEC (DIR must be N, E, S or, W) function DMStoDEC($dms) {   $part = preg_split("/[^\d\w\.]+/",$dms);   $pnr = count($part);   if ($pnr == 3) {     $part[3] = $part[2];     $part[2] = 0;   }   elseif ($pnr == 2) {     $part[3] = $part[1];     $part[1] = 0;     $part[2] = 0;   }    $dec = $part[0] + ((($part[1]*60) + ($part[2]))/3600);   if ($part[3] == "S" || $part[3] == "W") {     $dec = $dec * -1;   }    return $dec; }   // reading URL parameters $lang = $_GET["lang"]; $file = str_replace("\'","'",$_GET["name"]); $file = str_replace(" ", "_", $file);  // reading article data $articleContent = file_get_contents("https://" . $lang . ".wikivoyage.org/w/index.php?title=" . $file . "&action=raw");  // strip comments and nowiki $articleContent = preg_replace('/<!--(.|\s)*?-->/', '', $articleContent); $articleContent = preg_replace('/<nowiki(.|\s)*?nowiki>/', '', $articleContent);  // replace special strings $articleContent = str_ireplace(array('[*', ']]', '| ', ' |', '= ', ' =', '=====', '===', '&', '{{Marker', '{{Listing', '{{vCard', '?lang=', '@', '{{Poi', '=listing' ), array('', ']]', '|', '|', '=', '=', 'XXXXX', 'XXX', '%26', '{{listing', '{{listing', '{{listing', 'XxxxxX', 'X', '{{poi', '=' ),  $articleContent);  // poi to listing $articleContent = preg_replace(array('/{{poi\|(.*?)\|(.*?)\|(.*?)\|(.*?)\|(.*?)[\||}](.*?)}}/i', '/\|image=}/i', '/{{poi\|(.*?)\|(.*?)\|(.*?)\|(.*?)\|(.*?)[\||}]/i'), array("{{listing|map=$1|type=$2|lat=$3|long=$4|name=$5|image=$6}}", "}}}", "{{listing|map=$1|type=$2|lat=$3|long=$4|name=$5}}"), $articleContent);  // replace section 2 headers $articleContent = preg_replace('/==.*==/', '{{listing|type=**h2**|name=**SECTION**}}', $articleContent);   // translate to english   include 'trans/trans-' . $lang . '.php';   $articleContent = str_ireplace(array_keys($trans), $trans, $articleContent);  // convert to {{listing| $articleContent = preg_replace("/{{(go|see|do|buy|eat|drink|sleep|fun|vicinity|health|around|city|diplo)/", "{{listing|type=$1", $articleContent);   // strip unwanted templates $articleContent = preg_replace("/{{(?!poi|listing|mapframe|mapmask|geo|photolist)(.|\s)*?}}/im", "", $articleContent);  // echo $articleContent; // *** TEST ***  // mapmask preg_match('/{{MapMask\|(.*?)}}/i', $articleContent, $matches); if (isset($matches[1])) {   $mask = '[[' . str_replace('|', '],[', $matches[1]) . ']]'; } else {   $mask = '[[]]'; }  // read parameters {{listing| $apart = explode('{{listing', $articleContent); $total = count($apart);  $nr = $nother = 0; // $groups, $grpmax only for de $groups = array('error', '**h2**', 'blue', 'buy', 'do', 'drink', 'eat', 'fun', 'go', 'gold', 'health', 'lime', 'listing', 'maroon', 'mediumaquamarine', 'other', 'red', 'see', 'silver', 'sleep', 'view', 'vicinity', 'health', 'around', 'city', 'diplo'); $grpmax = array_fill(0, 29, 0);  for($i=1; $i < $total; $i++){   $text = explode('}}', $apart[$i]);   $part = str_replace('|','&', $text[0]);    $name = $map = $type = $group = $lat = $long = $image = $content = '';   parse_str(str_replace('+', '%2B', $part));    // convert DMS to DEC   if (strpos($lat, "°")) {     $lat = DMStoDEC($lat);     $long = DMStoDEC($long);   }     $n[$i] = (trim($name)  ?: "NoName");   $d[$i] = (trim($content)  ?: "NoDesc");   $p[$i] = (trim($map)   ?: 0);   $c[$i] = (trim($type)  ?: "other");   $x[$i] = (trim($lat)  + 0 ?: "0");   $y[$i] = (trim($long) + 0 ?: "0");   $f[$i] = (str_replace(" ","_",trim($image)) ?: "0/01/no");   if (substr($f[$i],1,1) != "/") {     $md5 = md5($f[$i]);     $f[$i] = substr($md5,0,1) . "/" . substr($md5,0,2) . "/" . $f[$i];   }    // automatic numbering   if ($lang == "de" ) {     if ($x[$i] + 0 != 0 && $p[$i] == 0) {       if ($group != '') {         $c[$i] = trim($group);       }       $key = array_search($c[$i], $groups);       $grpmax[$key]++;        $p[$i] = $grpmax[$key];     }   }   else {     if ($x[$i] + 0 != 0) {       if ($c[$i] == "other") {         $nother++;         $p[$i] = $nother;             }       else {         $nr++;         $p[$i] = $nr;              }        }     if ($c[$i] == "**h2**") {       $nr = 0;     }   } } $max = $i - 1; ?>