xref: /plugin/geotag/action.php (revision 2b579309fed27c4c706243b75b39813e5b6dda9c)
1c3b1bf17SMark C. Prins<?php
2c3b1bf17SMark C. Prins/*
3a42972efSMark C. Prins * Copyright (c) 2011-2013 Mark C. Prins <mprins@users.sf.net>
4c3b1bf17SMark C. Prins *
5c3b1bf17SMark C. Prins * Permission to use, copy, modify, and distribute this software for any
6c3b1bf17SMark C. Prins * purpose with or without fee is hereby granted, provided that the above
7c3b1bf17SMark C. Prins * copyright notice and this permission notice appear in all copies.
8c3b1bf17SMark C. Prins *
9c3b1bf17SMark C. Prins * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10c3b1bf17SMark C. Prins * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11c3b1bf17SMark C. Prins * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12c3b1bf17SMark C. Prins * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13c3b1bf17SMark C. Prins * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14c3b1bf17SMark C. Prins * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15c3b1bf17SMark C. Prins * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16c3b1bf17SMark C. Prins */
17*2b579309SMark C. Prinsif (! defined ( 'DOKU_INC' ))
18*2b579309SMark C. Prins	die ();
1962d582daSMark C. Prins
20*2b579309SMark C. Prinsif (! defined ( 'DOKU_PLUGIN' ))
21*2b579309SMark C. Prins	define ( 'DOKU_PLUGIN', DOKU_INC . 'lib/plugins/' );
2262d582daSMark C. Prinsrequire_once (DOKU_PLUGIN . 'action.php');
23c3b1bf17SMark C. Prins
24c3b1bf17SMark C. Prins/**
25a42972efSMark C. Prins * DokuWiki Plugin geotag (Action Component).
26c3b1bf17SMark C. Prins *
2762d582daSMark C. Prins * @license BSD license
2830c0df9cSMark C. Prins * @author Mark C. Prins <mprins@users.sf.net>
29c3b1bf17SMark C. Prins */
30c3b1bf17SMark C. Prinsclass action_plugin_geotag extends DokuWiki_Action_Plugin {
31c3b1bf17SMark C. Prins
3281dae509SMark C. Prins	/**
3381dae509SMark C. Prins	 * Register for events.
3481dae509SMark C. Prins	 *
35*2b579309SMark C. Prins	 * @param Doku_Event_Handler $controller
36*2b579309SMark C. Prins	 *        	DokuWiki's event controller object. Also available as global $EVENT_HANDLER
3781dae509SMark C. Prins	 */
38*2b579309SMark C. Prins	public function register(Doku_Event_Handler $controller) {
39c3b1bf17SMark C. Prins		$controller->register_hook ( 'TPL_METAHEADER_OUTPUT', 'BEFORE', $this, 'handle_metaheader_output' );
4081dae509SMark C. Prins		$controller->register_hook ( 'IO_WIKIPAGE_WRITE', 'BEFORE', $this, 'ping_geourl', array () );
4194769ee6SMark C. Prins		if ($this->getConf ( 'toolbar_icon' )) {
4294769ee6SMark C. Prins			$controller->register_hook ( 'TOOLBAR_DEFINE', 'AFTER', $this, 'insert_button', array () );
4394769ee6SMark C. Prins		}
44c3b1bf17SMark C. Prins	}
45c3b1bf17SMark C. Prins
4681dae509SMark C. Prins	/**
47*2b579309SMark C. Prins	 * Retrieve metadata and add to the head of the page using appropriate meta tags.
48*2b579309SMark C. Prins	 *
49*2b579309SMark C. Prins	 * @param Doku_Event $event
50*2b579309SMark C. Prins	 *        	the DokuWiki event. $event->data is a two-dimensional
51a9539fccSMark C. Prins	 *        	array of all meta headers. The keys are meta, link and script.
5281dae509SMark C. Prins	 * @param unknown_type $param
53a42972efSMark C. Prins	 *
54a42972efSMark C. Prins	 * @see http://www.dokuwiki.org/devel:event:tpl_metaheader_output
5581dae509SMark C. Prins	 */
56c3b1bf17SMark C. Prins	public function handle_metaheader_output(Doku_Event &$event, $param) {
57c3b1bf17SMark C. Prins		global $ID;
5881dae509SMark C. Prins		$title = p_get_metadata ( $ID, 'title', true );
59c3b1bf17SMark C. Prins		$geotags = p_get_metadata ( $ID, 'geo', true );
60c3b1bf17SMark C. Prins		$region = $geotags ['region'];
61c3b1bf17SMark C. Prins		$lat = $geotags ['lat'];
62c3b1bf17SMark C. Prins		$lon = $geotags ['lon'];
63*2b579309SMark C. Prins		$alt = $geotags ['alt'];
64c3b1bf17SMark C. Prins		$country = $geotags ['country'];
65c3b1bf17SMark C. Prins		$placename = $geotags ['placename'];
66a42972efSMark C. Prins		$geohash = $geotags ['geohash'];
67c3b1bf17SMark C. Prins
68a42972efSMark C. Prins		if (! empty ( $region )) {
69*2b579309SMark C. Prins			$event->data ['meta'] [] = array (
70*2b579309SMark C. Prins					'name' => 'geo.region',
71*2b579309SMark C. Prins					'content' => $region
72*2b579309SMark C. Prins			);
73a42972efSMark C. Prins		}
74a42972efSMark C. Prins		if (! empty ( $placename )) {
75*2b579309SMark C. Prins			$event->data ['meta'] [] = array (
76*2b579309SMark C. Prins					'name' => 'geo.placename',
77*2b579309SMark C. Prins					'content' => $placename
78*2b579309SMark C. Prins			);
79a42972efSMark C. Prins		}
80a42972efSMark C. Prins		if (! (empty ( $lat ) && empty ( $lon ))) {
81*2b579309SMark C. Prins			$event->data ['meta'] [] = array (
82*2b579309SMark C. Prins					'name' => 'geo.position',
83*2b579309SMark C. Prins					'content' => $lat . ';' . $lon
84*2b579309SMark C. Prins			);
85*2b579309SMark C. Prins			if (! empty ( $alt )) {
86*2b579309SMark C. Prins				$event->data ['meta'] [] = array (
87*2b579309SMark C. Prins						'name' => 'geo.position',
88*2b579309SMark C. Prins						'content' => $lat . ';' . $lon . ';' . $alt
89*2b579309SMark C. Prins				);
90*2b579309SMark C. Prins			}
91a42972efSMark C. Prins		}
92a42972efSMark C. Prins		if (! empty ( $country )) {
93*2b579309SMark C. Prins			$event->data ['meta'] [] = array (
94*2b579309SMark C. Prins					'name' => 'geo.country',
95*2b579309SMark C. Prins					'content' => $country
96*2b579309SMark C. Prins			);
97a42972efSMark C. Prins		}
98dfaf64a7SMark C. Prins		if (! (empty ( $lat ) && empty ( $lon ))) {
99*2b579309SMark C. Prins			$event->data ['meta'] [] = array (
100*2b579309SMark C. Prins					'name' => "ICBM",
101*2b579309SMark C. Prins					'content' => $lat . ', ' . $lon
102*2b579309SMark C. Prins			);
103*2b579309SMark C. Prins			// icbm is generally useless without a dc.title,
104*2b579309SMark C. Prins			// so we copy that from title unless it's empty
105a42972efSMark C. Prins			if (! (empty ( $title ))) {
106*2b579309SMark C. Prins				$event->data ['meta'] [] = array (
107*2b579309SMark C. Prins						'name' => "DC.title",
108*2b579309SMark C. Prins						'content' => $title
109*2b579309SMark C. Prins				);
110a42972efSMark C. Prins			}
111a42972efSMark C. Prins		}
112a42972efSMark C. Prins		if (! empty ( $geohash )) {
113*2b579309SMark C. Prins			$event->data ['meta'] [] = array (
114*2b579309SMark C. Prins					'name' => 'geo.geohash',
115*2b579309SMark C. Prins					'content' => $geohash
116*2b579309SMark C. Prins			);
117c3b1bf17SMark C. Prins		}
118dfaf64a7SMark C. Prins	}
119dfaf64a7SMark C. Prins
12081dae509SMark C. Prins	/**
12162d582daSMark C. Prins	 * Ping the geourl webservice with the url of the for indexing, only if the page is new.
122a42972efSMark C. Prins	 *
123*2b579309SMark C. Prins	 * @param Doku_Event $event
124*2b579309SMark C. Prins	 *        	the DokuWiki event
125*2b579309SMark C. Prins	 * @param mixed $param
126*2b579309SMark C. Prins	 *        	not used
12781dae509SMark C. Prins	 */
12881dae509SMark C. Prins	function ping_geourl(Doku_Event &$event, $param) {
12995b11af8SMark C. Prins		global $ID;
130e8ec65d2SMark C. Prins		/*
131*2b579309SMark C. Prins		 * see: http://www.dokuwiki.org/devel:event:io_wikipage_write event data:
132e8ec65d2SMark C. Prins		 * $data[0] – The raw arguments for io_saveFile as an array. Do not change file path.
133e8ec65d2SMark C. Prins		 * $data[0][0] – the file path.
134e8ec65d2SMark C. Prins		 * $data[0][1] – the content to be saved, and may be modified.
135e8ec65d2SMark C. Prins		 * $data[1] – ns: The colon separated namespace path minus the trailing page name. (false if root ns)
136e8ec65d2SMark C. Prins		 * $data[2] – page_name: The wiki page name.
137e8ec65d2SMark C. Prins		 * $data[3] – rev: The page revision, false for current wiki pages.
138e8ec65d2SMark C. Prins		 */
139*2b579309SMark C. Prins		if (! $this->getConf ( 'geotag_pinggeourl' ))
140*2b579309SMark C. Prins			return false; // config says don't ping
141*2b579309SMark C. Prins		if ($event->data [3])
142*2b579309SMark C. Prins			return false; // old revision saved
143*2b579309SMark C. Prins		if (@file_exists ( $event->data [0] [0] ))
144*2b579309SMark C. Prins			return false; // file not new
145*2b579309SMark C. Prins		if (! $event->data [0] [1])
146*2b579309SMark C. Prins			return false; // file is empty
147*2b579309SMark C. Prins		if (p_get_metadata ( $ID, 'geo', true ))
148*2b579309SMark C. Prins			return false; // no geo metadata available, ping is useless
149c3b1bf17SMark C. Prins
15062d582daSMark C. Prins		$url = 'http://geourl.org/ping/?p=' . wl ( $ID, '', true );
151c3b1bf17SMark C. Prins		$http = new DokuHTTPClient ();
15295b11af8SMark C. Prins		$result = $http->get ( $url );
15362d582daSMark C. Prins		dbglog ( $result, "GeoURL Ping response for $url" );
15495b11af8SMark C. Prins		return $result;
155c3b1bf17SMark C. Prins	}
15694769ee6SMark C. Prins
15794769ee6SMark C. Prins	/**
15894769ee6SMark C. Prins	 * Inserts the toolbar button.
159a42972efSMark C. Prins	 *
160*2b579309SMark C. Prins	 * @param Doku_Event $event
161*2b579309SMark C. Prins	 *        	the DokuWiki event
16294769ee6SMark C. Prins	 */
16394769ee6SMark C. Prins	function insert_button(Doku_Event &$event, $param) {
16494769ee6SMark C. Prins		$event->data [] = array (
16594769ee6SMark C. Prins				'type' => 'format',
16694769ee6SMark C. Prins				'title' => $this->getLang ( 'toolbar_desc' ),
16794769ee6SMark C. Prins				'icon' => '../../plugins/geotag/images/geotag.png',
16894769ee6SMark C. Prins				'open' => '{{geotag>lat:',
16994769ee6SMark C. Prins				'sample' => '52.2345',
170*2b579309SMark C. Prins				'close' => ', lon: 7.521, alt: , placename: , country: , region: }}'
17194769ee6SMark C. Prins		);
17294769ee6SMark C. Prins	}
173c3b1bf17SMark C. Prins}
174