4 * Description: Use OpenStreetMap for displaying locations. After activation the post location just beneath your avatar in your posts will link to OpenStreetMap.
6 * Author: Fabio <http://kirgroup.com/~fabrixxm>
7 * Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
8 * Author: Klaus Weidenbach
12 use Friendica\Core\Cache;
13 use Friendica\Core\Config;
16 function openstreetmap_install()
18 register_hook('render_location', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_location');
19 register_hook('generate_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_map');
20 register_hook('generate_named_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_named_map');
21 register_hook('page_header', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_alterheader');
23 logger("installed openstreetmap");
26 function openstreetmap_uninstall()
28 unregister_hook('render_location', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_location');
29 unregister_hook('generate_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_map');
30 unregister_hook('generate_named_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_named_map');
31 unregister_hook('page_header', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_alterheader');
33 logger("removed openstreetmap");
36 function openstreetmap_alterheader($a, &$navHtml)
38 $addScriptTag = '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/openstreetmap/openstreetmap.js"></script>' . "\r\n";
39 $a->page['htmlhead'] .= $addScriptTag;
43 * @brief Add link to a map for an item's set location/coordinates.
45 * If an item has coordinates add link to a tile map server, e.g. openstreetmap.org.
46 * If an item has a location open it with the help of OSM's Nominatim reverse geocode search.
51 function openstreetmap_location($a, &$item) {
53 if(! (strlen($item['location']) || strlen($item['coord']))) {
58 * Get the configuration variables from the config.
59 * @todo Separate the tile map server from the text-string to map tile server
60 * since they apparently use different URL conventions.
61 * We use OSM's current convention of "#map=zoom/lat/lon" and optional
62 * ?mlat=lat&mlon=lon for markers.
65 $tmsserver = Config::get('openstreetmap', 'tmsserver');
67 $tmsserver = 'http://www.openstreetmap.org';
70 $nomserver = Config::get('openstreetmap', 'nomserver');
72 $nomserver = 'http://nominatim.openstreetmap.org/search.php';
75 $zoom = Config::get('openstreetmap', 'zoom');
80 $marker = Config::get('openstreetmap', 'marker');
85 if ($item['coord'] != "") {
86 $coords = explode(' ', $item['coord']);
87 if(count($coords) > 1) {
88 $lat = urlencode(round($coords[0], 5));
89 $lon = urlencode(round($coords[1], 5));
92 $target .= '?mlat='.$lat.'&mlon='.$lon;
93 $target .= '#map='.intval($zoom).'/'.$lat.'/'.$lon;
98 $target = $nomserver.'?q='.urlencode($item['location']);
101 if ($item['location'] != "") {
102 $title = $item['location'];
104 $title = $item['coord'];
107 $item['html'] = '<a target="map" title="'.$title.'" href= "'.$target.'">'.$title.'</a>';
111 function openstreetmap_generate_named_map(&$a, &$b)
113 $nomserver = Config::get('openstreetmap', 'nomserver');
115 $nomserver = 'http://nominatim.openstreetmap.org/search.php';
116 $args = '?q=' . urlencode($b['location']) . '&format=json';
118 $x = z_fetch_url($nomserver . $args);
120 $j = json_decode($x['body'],true);
122 if($j && is_array($j) && $j[0]['lat'] && $j[0]['lon']) {
123 $arr = array('lat' => $j[0]['lat'],'lon' => $j[0]['lon'],'location' => $b['location'], 'html' => '');
124 openstreetmap_generate_map($a,$arr);
125 $b['html'] = $arr['html'];
130 function openstreetmap_generate_map(&$a, &$b)
132 $tmsserver = Config::get('openstreetmap', 'tmsserver');
134 $tmsserver = 'http://www.openstreetmap.org';
136 if(strpos(z_root(),'https:') !== false) {
137 $tmsserver = str_replace('http:','https:',$tmsserver);
141 $zoom = Config::get('openstreetmap', 'zoom');
146 $marker = Config::get('openstreetmap', 'marker');
151 $lat = $b['lat']; // round($b['lat'], 5);
152 $lon = $b['lon']; // round($b['lon'], 5);
154 logger('lat: ' . $lat, LOGGER_DATA);
155 logger('lon: ' . $lon, LOGGER_DATA);
158 $b['html'] = '<iframe style="width:100%; height:300px; border:1px solid #ccc" src="' . $tmsserver . '/export/embed.html?bbox=' . ($lon - 0.01) . '%2C' . ($lat - 0.01) . '%2C' . ($lon + 0.01) . '%2C' . ($lat + 0.01) ;
160 $b['html'] .= '&layer=mapnik&marker=' . $lat . '%2C' . $lon . '" style="border: 1px solid black"></iframe><br/><small><a href="' . $tmsserver . '/?mlat=' . $lat . '&mlon=' . $lon . '#map=16/' . $lat . '/' . $lon . '">' . (($b['location']) ? escape_tags($b['location']) : t('View Larger')) . '</a></small>';
162 logger('generate_map: ' . $b['html'], LOGGER_DATA);
166 function openstreetmap_plugin_admin(&$a, &$o)
168 $t = get_markup_template("admin.tpl", "addon/openstreetmap/");
169 $tmsserver = Config::get('openstreetmap', 'tmsserver');
171 $tmsserver = 'http://www.openstreetmap.org';
173 $nomserver = Config::get('openstreetmap', 'nomserver');
175 $nomserver = 'http://nominatim.openstreetmap.org/search.php';
177 $zoom = Config::get('openstreetmap', 'zoom');
181 $marker = Config::get('openstreetmap', 'marker');
186 $o = replace_macros($t, array(
187 '$submit' => t('Submit'),
188 '$tmsserver' => array('tmsserver', t('Tile Server URL'), $tmsserver, t('A list of <a href="http://wiki.openstreetmap.org/wiki/TMS" target="_blank">public tile servers</a>')),
189 '$nomserver' => array('nomserver', t('Nominatim (reverse geocoding) Server URL'), $nomserver, t('A list of <a href="http://wiki.openstreetmap.org/wiki/Nominatim" target="_blank">Nominatim servers</a>')),
190 '$zoom' => array('zoom', t('Default zoom'), $zoom, t('The default zoom level. (1:world, 18:highest, also depends on tile server)')),
191 '$marker' => array('marker', t('Include marker on map'), $marker, t('Include a marker on the map.')),
195 function openstreetmap_plugin_admin_post(&$a)
197 $urltms = ((x($_POST, 'tmsserver')) ? notags(trim($_POST['tmsserver'])) : '');
198 $urlnom = ((x($_POST, 'nomserver')) ? notags(trim($_POST['nomserver'])) : '');
199 $zoom = ((x($_POST, 'zoom')) ? intval(trim($_POST['zoom'])) : '16');
200 $marker = ((x($_POST, 'marker')) ? intval(trim($_POST['marker'])) : '0');
201 Config::set('openstreetmap', 'tmsserver', $urltms);
202 Config::set('openstreetmap', 'nomserver', $urlnom);
203 Config::set('openstreetmap', 'zoom', $zoom);
204 Config::set('openstreetmap', 'marker', $marker);
205 info( t('Settings updated.') . EOL);