135451698d9cae89d70f17775f9c85fe42c869b2
[friendica-addons.git] / openstreetmap / openstreetmap.php
1 <?php
2 /**
3  * Name: OpenStreetMap
4  * Description: Use OpenStreetMap for displaying locations. After activation the post location just beneath your avatar in your posts will link to OpenStreetMap.
5  * Version: 1.3.1
6  * Author: Fabio <http://kirgroup.com/~fabrixxm>
7  * Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
8  * Author: Klaus Weidenbach
9  *
10  */
11  
12 require_once('include/cache.php');
13
14
15 function openstreetmap_install() {
16         register_hook('render_location', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_location');
17         register_hook('generate_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_map');
18         register_hook('generate_named_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_named_map');
19         register_hook('page_header', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_alterheader');
20
21         logger("installed openstreetmap");
22 }
23
24 function openstreetmap_uninstall() {
25         unregister_hook('render_location', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_location');
26         unregister_hook('generate_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_map');
27         unregister_hook('generate_named_map', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_generate_named_map');
28         unregister_hook('page_header', 'addon/openstreetmap/openstreetmap.php', 'openstreetmap_alterheader');
29
30         logger("removed openstreetmap");
31 }
32
33 function openstreetmap_alterheader($a, &$navHtml) {
34         $addScriptTag = '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/openstreetmap/openstreetmap.js"></script>' . "\r\n";
35         $a->page['htmlhead'] .= $addScriptTag;
36 }
37
38 /**
39  * @brief Add link to a map for an item's set location/coordinates.
40  *
41  * If an item has coordinates add link to a tile map server, e.g. openstreetmap.org.
42  * If an item has a location open it with the help of OSM's Nominatim reverse geocode search.
43  * 
44  * @param mixed $a
45  * @param array& $item
46  */
47 function openstreetmap_location($a, &$item) {
48
49         if(! (strlen($item['location']) || strlen($item['coord'])))
50                 return;
51
52         /*
53          * Get the configuration variables from the config.
54          * @todo Separate the tile map server from the text-string to map tile server
55          * since they apparently use different URL conventions.
56          * We use OSM's current convention of "#map=zoom/lat/lon" and optional
57          * ?mlat=lat&mlon=lon for markers.
58          */
59
60         $tmsserver = get_config('openstreetmap', 'tmsserver');
61         if(! $tmsserver)
62                 $tmsserver = 'http://www.openstreetmap.org';
63
64         $nomserver = get_config('openstreetmap', 'nomserver');
65         if(! $nomserver)
66                 $nomserver = 'http://nominatim.openstreetmap.org/search.php';
67
68         $zoom = get_config('openstreetmap', 'zoom');
69         if(! $zoom)
70                 $zoom = 16;
71
72         $marker = get_config('openstreetmap', 'marker');
73         if(! $marker)
74                 $marker = 0;
75
76         if ($item['coord'] != "") {
77                 $coords = explode(' ', $item['coord']);
78                 if(count($coords) > 1) {
79                         $lat = urlencode(round($coords[0], 5));
80                         $lon = urlencode(round($coords[1], 5));
81                         $target = $tmsserver;
82                         if($marker > 0)
83                                 $target .= '?mlat='.$lat.'&mlon='.$lon;
84                         $target .= '#map='.intval($zoom).'/'.$lat.'/'.$lon;
85                 }
86         }
87
88         if ($target == "")
89                 $target = $nomserver.'?q='.urlencode($item['location']);
90
91         if ($item['location'] != "")
92                 $title = $item['location'];
93         else
94                 $title = $item['coord'];
95
96         $item['html'] = '<a target="map" title="'.$title.'" href= "'.$target.'">'.$title.'</a>';
97 }
98
99
100 function openstreetmap_generate_named_map(&$a,&$b) {
101
102
103         $nomserver = get_config('openstreetmap', 'nomserver');
104         if(! $nomserver)
105                 $nomserver = 'http://nominatim.openstreetmap.org/search.php';
106         $args = '?q=' . urlencode($b['location']) . '&format=json';
107
108         $x = z_fetch_url($nomserver . $args);
109         if($x['success']) {
110                 $j = json_decode($x['body'],true);
111
112                 if($j && is_array($j) && $j[0]['lat'] && $j[0]['lon']) {
113                         $arr = array('lat' => $j[0]['lat'],'lon' => $j[0]['lon'],'location' => $b['location'], 'html' => '');
114                         openstreetmap_generate_map($a,$arr);
115                         $b['html'] = $arr['html'];
116                 }
117         }
118 }
119
120 function openstreetmap_generate_map(&$a,&$b) {
121
122         $tmsserver = get_config('openstreetmap', 'tmsserver');
123         if(! $tmsserver)
124                 $tmsserver = 'http://www.openstreetmap.org';
125         if(strpos(z_root(),'https:') !== false)
126                 $tmsserver = str_replace('http:','https:',$tmsserver);
127
128
129         $zoom = get_config('openstreetmap', 'zoom');
130         if(! $zoom)
131                 $zoom = 16;
132
133         $marker = get_config('openstreetmap', 'marker');
134         if(! $marker)
135                 $marker = 0;
136
137         $lat = $b['lat']; // round($b['lat'], 5);
138         $lon = $b['lon']; // round($b['lon'], 5);
139
140         logger('lat: ' . $lat, LOGGER_DATA);
141         logger('lon: ' . $lon, LOGGER_DATA);
142
143
144         $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) ;
145
146         $b['html'] .=  '&amp;layer=mapnik&amp;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>';
147
148         logger('generate_map: ' . $b['html'], LOGGER_DATA);
149
150 }
151
152 function openstreetmap_plugin_admin(&$a, &$o) {
153         $t = get_markup_template("admin.tpl", "addon/openstreetmap/");
154         $tmsserver = get_config('openstreetmap', 'tmsserver');
155         if(! $tmsserver)
156                 $tmsserver = 'http://www.openstreetmap.org';
157         $nomserver = get_config('openstreetmap', 'nomserver');
158         if(! $nomserver)
159                 $nomserver = 'http://nominatim.openstreetmap.org/search.php';
160         $zoom = get_config('openstreetmap', 'zoom');
161         if(! $zoom)
162                 $zoom = 16;
163         $marker = get_config('openstreetmap', 'marker');
164         if(! $marker)
165                 $marker = 0;
166
167         $o = replace_macros($t, array(
168                         '$submit' => t('Submit'),
169                         '$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>')),
170                         '$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>')),
171                         '$zoom' => array('zoom', t('Default zoom'), $zoom, t('The default zoom level. (1:world, 18:highest, also depends on tile server)')),
172                         '$marker' => array('marker', t('Include marker on map'), $marker, t('Include a marker on the map.')),
173         ));
174 }
175 function openstreetmap_plugin_admin_post(&$a) {
176         $urltms = ((x($_POST, 'tmsserver')) ? notags(trim($_POST['tmsserver'])) : '');
177         $urlnom = ((x($_POST, 'nomserver')) ? notags(trim($_POST['nomserver'])) : '');
178         $zoom = ((x($_POST, 'zoom')) ? intval(trim($_POST['zoom'])) : '16');
179         $marker = ((x($_POST, 'marker')) ? intval(trim($_POST['marker'])) : '0');
180         set_config('openstreetmap', 'tmsserver', $urltms);
181         set_config('openstreetmap', 'nomserver', $urlnom);
182         set_config('openstreetmap', 'zoom', $zoom);
183         set_config('openstreetmap', 'marker', $marker);
184         info( t('Settings updated.') . EOL);
185 }
186
187