* Author: Mike Macgirvin * Author: Klaus Weidenbach * */ use Friendica\Core\Addon; use Friendica\Core\Cache; use Friendica\Core\Config; use Friendica\Core\L10n; function openstreetmap_install() { Addon::registerHook('render_location', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_location'); Addon::registerHook('generate_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_map'); Addon::registerHook('generate_named_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_named_map'); Addon::registerHook('page_header', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_alterheader'); logger("installed openstreetmap"); } function openstreetmap_uninstall() { Addon::unregisterHook('render_location', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_location'); Addon::unregisterHook('generate_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_map'); Addon::unregisterHook('generate_named_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_named_map'); Addon::unregisterHook('page_header', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_alterheader'); logger("removed openstreetmap"); } function openstreetmap_alterheader($a, &$navHtml) { $addScriptTag = '' . "\r\n"; $a->page['htmlhead'] .= $addScriptTag; } /** * @brief Add link to a map for an item's set location/coordinates. * * If an item has coordinates add link to a tile map server, e.g. openstreetmap.org. * If an item has a location open it with the help of OSM's Nominatim reverse geocode search. * * @param mixed $a * @param array& $item */ function openstreetmap_location($a, &$item) { if(! (strlen($item['location']) || strlen($item['coord']))) { return; } /* * Get the configuration variables from the config. * @todo Separate the tile map server from the text-string to map tile server * since they apparently use different URL conventions. * We use OSM's current convention of "#map=zoom/lat/lon" and optional * ?mlat=lat&mlon=lon for markers. */ $tmsserver = Config::get('openstreetmap', 'tmsserver'); if(! $tmsserver) { $tmsserver = 'http://www.openstreetmap.org'; } $nomserver = Config::get('openstreetmap', 'nomserver'); if(! $nomserver) { $nomserver = 'http://nominatim.openstreetmap.org/search.php'; } $zoom = Config::get('openstreetmap', 'zoom'); if(! $zoom) { $zoom = 16; } $marker = Config::get('openstreetmap', 'marker'); if(! $marker) { $marker = 0; } if ($item['coord'] != "") { $coords = explode(' ', $item['coord']); if(count($coords) > 1) { $lat = urlencode(round($coords[0], 5)); $lon = urlencode(round($coords[1], 5)); $target = $tmsserver; if($marker > 0) $target .= '?mlat='.$lat.'&mlon='.$lon; $target .= '#map='.intval($zoom).'/'.$lat.'/'.$lon; } } if ($target == "") { $target = $nomserver.'?q='.urlencode($item['location']); } if ($item['location'] != "") { $title = $item['location']; } else { $title = $item['coord']; } $item['html'] = ''.$title.''; } function openstreetmap_generate_named_map(&$a, &$b) { $nomserver = Config::get('openstreetmap', 'nomserver'); if(! $nomserver) $nomserver = 'http://nominatim.openstreetmap.org/search.php'; $args = '?q=' . urlencode($b['location']) . '&format=json'; $x = z_fetch_url($nomserver . $args); if($x['success']) { $j = json_decode($x['body'],true); if($j && is_array($j) && $j[0]['lat'] && $j[0]['lon']) { $arr = ['lat' => $j[0]['lat'],'lon' => $j[0]['lon'],'location' => $b['location'], 'html' => '']; openstreetmap_generate_map($a,$arr); $b['html'] = $arr['html']; } } } function openstreetmap_generate_map(&$a, &$b) { $tmsserver = Config::get('openstreetmap', 'tmsserver'); if(! $tmsserver) { $tmsserver = 'http://www.openstreetmap.org'; } if(strpos(z_root(),'https:') !== false) { $tmsserver = str_replace('http:','https:',$tmsserver); } $zoom = Config::get('openstreetmap', 'zoom'); if (!$zoom) { $zoom = 16; } $marker = Config::get('openstreetmap', 'marker'); if (!$marker) { $marker = 0; } $lat = $b['lat']; // round($b['lat'], 5); $lon = $b['lon']; // round($b['lon'], 5); logger('lat: ' . $lat, LOGGER_DATA); logger('lon: ' . $lon, LOGGER_DATA); $b['html'] = '
' . (($b['location']) ? escape_tags($b['location']) : L10n::t('View Larger')) . ''; logger('generate_map: ' . $b['html'], LOGGER_DATA); } function openstreetmap_addon_admin(&$a, &$o) { $t = get_markup_template("admin.tpl", "addon/openstreetmap/"); $tmsserver = Config::get('openstreetmap', 'tmsserver'); if (!$tmsserver) { $tmsserver = 'http://www.openstreetmap.org'; } $nomserver = Config::get('openstreetmap', 'nomserver'); if (!$nomserver) { $nomserver = 'http://nominatim.openstreetmap.org/search.php'; } $zoom = Config::get('openstreetmap', 'zoom'); if (!$zoom) { $zoom = 16; } $marker = Config::get('openstreetmap', 'marker'); if (!$marker) { $marker = 0; } $o = replace_macros($t, [ '$submit' => L10n::t('Submit'), '$tmsserver' => ['tmsserver', L10n::t('Tile Server URL'), $tmsserver, L10n::t('A list of public tile servers')], '$nomserver' => ['nomserver', L10n::t('Nominatim (reverse geocoding) Server URL'), $nomserver, L10n::t('A list of Nominatim servers')], '$zoom' => ['zoom', L10n::t('Default zoom'), $zoom, L10n::t('The default zoom level. (1:world, 18:highest, also depends on tile server)')], '$marker' => ['marker', L10n::t('Include marker on map'), $marker, L10n::t('Include a marker on the map.')], ]); } function openstreetmap_addon_admin_post(&$a) { $urltms = ((x($_POST, 'tmsserver')) ? notags(trim($_POST['tmsserver'])) : ''); $urlnom = ((x($_POST, 'nomserver')) ? notags(trim($_POST['nomserver'])) : ''); $zoom = ((x($_POST, 'zoom')) ? intval(trim($_POST['zoom'])) : '16'); $marker = ((x($_POST, 'marker')) ? intval(trim($_POST['marker'])) : '0'); Config::set('openstreetmap', 'tmsserver', $urltms); Config::set('openstreetmap', 'nomserver', $urlnom); Config::set('openstreetmap', 'zoom', $zoom); Config::set('openstreetmap', 'marker', $marker); info(L10n::t('Settings updated.') . EOL); }