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