1f61105deSAdrian Lang<?php 2f61105deSAdrian Lang 3f61105deSAdrian Langif(!defined('DOKU_INC')) die(); 4e4543b6dSAdrian Langclass helper_plugin_tagging extends DokuWiki_Plugin { 5f61105deSAdrian Lang 6289f50bdSAndreas Gohr /** 7b12334e1SAndreas Gohr * Gives access to the database 8b12334e1SAndreas Gohr * 9b12334e1SAndreas Gohr * Initializes the SQLite helper and register the CLEANTAG function 10b12334e1SAndreas Gohr * 11b12334e1SAndreas Gohr * @return helper_plugin_sqlite|bool false if initialization fails 12289f50bdSAndreas Gohr */ 13289f50bdSAndreas Gohr public function getDB() { 14302a38efSAndreas Gohr static $db = null; 15f61105deSAdrian Lang if(!is_null($db)) { 16f61105deSAdrian Lang return $db; 17f61105deSAdrian Lang } 18f61105deSAdrian Lang 19302a38efSAndreas Gohr /** @var helper_plugin_sqlite $db */ 20f61105deSAdrian Lang $db = plugin_load('helper', 'sqlite'); 21f61105deSAdrian Lang if(is_null($db)) { 22f61105deSAdrian Lang msg('The tagging plugin needs the sqlite plugin', -1); 23f61105deSAdrian Lang return false; 24f61105deSAdrian Lang } 257e6afce6SAndreas Gohr $db->init('tagging', dirname(__FILE__) . '/db/'); 26302a38efSAndreas Gohr $db->create_function('CLEANTAG', array($this, 'cleanTag'), 1); 27f61105deSAdrian Lang return $db; 28f61105deSAdrian Lang } 29f61105deSAdrian Lang 30302a38efSAndreas Gohr /** 31*2ace74f4SAndreas Gohr * Return the user to use for accessing tags 32*2ace74f4SAndreas Gohr * 33*2ace74f4SAndreas Gohr * Handles the singleuser mode by returning 'auto' as user. Returnes false when no user is logged in. 34*2ace74f4SAndreas Gohr * 35*2ace74f4SAndreas Gohr * @return bool|string 36*2ace74f4SAndreas Gohr */ 37*2ace74f4SAndreas Gohr public function getUser() { 38*2ace74f4SAndreas Gohr if(!isset($_SERVER['REMOTE_USER'])) return false; 39*2ace74f4SAndreas Gohr if($this->getConf('singleusermode')) return 'auto'; 40*2ace74f4SAndreas Gohr return $_SERVER['REMOTE_USER']; 41*2ace74f4SAndreas Gohr } 42*2ace74f4SAndreas Gohr 43*2ace74f4SAndreas Gohr 44*2ace74f4SAndreas Gohr /** 45302a38efSAndreas Gohr * Canonicalizes the tag to its lower case nospace form 46302a38efSAndreas Gohr * 47302a38efSAndreas Gohr * @param $tag 48302a38efSAndreas Gohr * @return string 49302a38efSAndreas Gohr */ 50302a38efSAndreas Gohr public function cleanTag($tag) { 51302a38efSAndreas Gohr $tag = str_replace(' ', '', $tag); 52302a38efSAndreas Gohr $tag = utf8_strtolower($tag); 53302a38efSAndreas Gohr return $tag; 54302a38efSAndreas Gohr } 55302a38efSAndreas Gohr 56f61105deSAdrian Lang public function replaceTags($id, $user, $tags) { 57f61105deSAdrian Lang $db = $this->getDB(); 58f61105deSAdrian Lang $db->query('BEGIN TRANSACTION'); 59f61105deSAdrian Lang $queries = array(array('DELETE FROM taggings WHERE pid = ? AND tagger = ?', $id, $user)); 60f61105deSAdrian Lang foreach($tags as $tag) { 61f61105deSAdrian Lang $queries[] = array('INSERT INTO taggings (pid, tagger, tag) VALUES(?, ?, ?)', $id, $user, $tag); 62f61105deSAdrian Lang } 63f61105deSAdrian Lang 64f61105deSAdrian Lang foreach($queries as $query) { 65f61105deSAdrian Lang if(!call_user_func_array(array($db, 'query'), $query)) { 66f61105deSAdrian Lang $db->query('ROLLBACK TRANSACTION'); 67f61105deSAdrian Lang return false; 68f61105deSAdrian Lang } 69f61105deSAdrian Lang } 70f61105deSAdrian Lang return $db->query('COMMIT TRANSACTION'); 71f61105deSAdrian Lang } 72f61105deSAdrian Lang 730a518a11SAndreas Gohr /** 74b12334e1SAndreas Gohr * Get a list of Tags or Pages matching search criteria 750a518a11SAndreas Gohr * 76b12334e1SAndreas Gohr * @param array $filter What to search for array('field' => 'searchterm') 77b12334e1SAndreas Gohr * @param string $type What field to return 'tag'|'pid' 78077ff864SAndreas Gohr * @param int $limit Limit to this many results, 0 for all 790a518a11SAndreas Gohr * @return array associative array in form of value => count 800a518a11SAndreas Gohr */ 81077ff864SAndreas Gohr public function findItems($filter, $type, $limit=0) { 82f61105deSAdrian Lang $db = $this->getDB(); 83b12334e1SAndreas Gohr if(!$db) return array(); 84f61105deSAdrian Lang 85b12334e1SAndreas Gohr // create WHERE clause 86b12334e1SAndreas Gohr $where = '1=1'; 87b12334e1SAndreas Gohr foreach($filter as $field => $value) { 88b12334e1SAndreas Gohr // compare clean tags only 89b12334e1SAndreas Gohr if($field === 'tag') { 90b12334e1SAndreas Gohr $field = 'CLEANTAG(tag)'; 91b12334e1SAndreas Gohr $q = 'CLEANTAG(?)'; 92b12334e1SAndreas Gohr } else { 93b12334e1SAndreas Gohr $q = '?'; 94b12334e1SAndreas Gohr } 95b12334e1SAndreas Gohr // detect LIKE filters 96b12334e1SAndreas Gohr if($this->useLike($value)) { 97b12334e1SAndreas Gohr $where .= " AND $field LIKE $q"; 98b12334e1SAndreas Gohr } else { 99b12334e1SAndreas Gohr $where .= " AND $field = $q"; 100b12334e1SAndreas Gohr } 101b12334e1SAndreas Gohr } 102b12334e1SAndreas Gohr // group and order 103b12334e1SAndreas Gohr if($type == 'tag') { 104b12334e1SAndreas Gohr $groupby = 'CLEANTAG(tag)'; 105b12334e1SAndreas Gohr $orderby = 'CLEANTAG(tag)'; 106b12334e1SAndreas Gohr } else { 107b12334e1SAndreas Gohr $groupby = $type; 108466524f5SAndreas Gohr $orderby = "cnt DESC, $type"; 109b12334e1SAndreas Gohr } 110b12334e1SAndreas Gohr 111077ff864SAndreas Gohr // limit results 112077ff864SAndreas Gohr if($limit) { 113077ff864SAndreas Gohr $limit = " LIMIT $limit"; 114077ff864SAndreas Gohr }else{ 115077ff864SAndreas Gohr $limit = ''; 116077ff864SAndreas Gohr } 117077ff864SAndreas Gohr 118b12334e1SAndreas Gohr // create SQL 119b12334e1SAndreas Gohr $sql = "SELECT $type AS item, COUNT(*) AS cnt 120b12334e1SAndreas Gohr FROM taggings 121b12334e1SAndreas Gohr WHERE $where 122b12334e1SAndreas Gohr GROUP BY $groupby 123077ff864SAndreas Gohr ORDER BY $orderby 124077ff864SAndreas Gohr $limit 125077ff864SAndreas Gohr "; 126b12334e1SAndreas Gohr 127b12334e1SAndreas Gohr // run query and turn into associative array 128b12334e1SAndreas Gohr $res = $db->query($sql, array_values($filter)); 129f61105deSAdrian Lang $res = $db->res2arr($res); 130b12334e1SAndreas Gohr 131f61105deSAdrian Lang $ret = array(); 132b12334e1SAndreas Gohr foreach($res as $row) { 133b12334e1SAndreas Gohr $ret[$row['item']] = $row['cnt']; 134f61105deSAdrian Lang } 135f61105deSAdrian Lang return $ret; 136f61105deSAdrian Lang } 137f61105deSAdrian Lang 138b12334e1SAndreas Gohr /** 139b12334e1SAndreas Gohr * Check if the given string is a LIKE statement 140b12334e1SAndreas Gohr * 141b12334e1SAndreas Gohr * @param string $value 142b12334e1SAndreas Gohr * @return bool 143b12334e1SAndreas Gohr */ 144b12334e1SAndreas Gohr private function useLike($value) { 145b12334e1SAndreas Gohr return strpos($value, '%') === 0 || strrpos($value, '%') === strlen($value) - 1; 146b2073787SDominik Eckelmann } 147b2073787SDominik Eckelmann 148302a38efSAndreas Gohr /** 149302a38efSAndreas Gohr * Constructs the URL to search for a tag 150302a38efSAndreas Gohr * 1515540f91dSAndreas Gohr * @param string $tag 1525540f91dSAndreas Gohr * @param string $ns 153302a38efSAndreas Gohr * @return string 154302a38efSAndreas Gohr */ 1555540f91dSAndreas Gohr public function getTagSearchURL($tag, $ns = '') { 156bed9f360SAndreas Gohr // wrap tag in quotes if non clean 157bed9f360SAndreas Gohr $ctag = $this->cleanTag($tag); 158bed9f360SAndreas Gohr if($ctag != utf8_strtolower($tag)) $tag = '"'.$tag.'"'; 159bed9f360SAndreas Gohr 160bed9f360SAndreas Gohr $ret = '?do=search&id=' . rawurlencode($tag); 1615540f91dSAndreas Gohr if($ns) $ret .= rawurlencode(' @' . $ns); 1625540f91dSAndreas Gohr 1635540f91dSAndreas Gohr return $ret; 164f61105deSAdrian Lang } 165f61105deSAdrian Lang 1665540f91dSAndreas Gohr /** 1675540f91dSAndreas Gohr * Calculates the size levels for the given list of clouds 1685540f91dSAndreas Gohr * 1695540f91dSAndreas Gohr * Automatically determines sensible tresholds 1705540f91dSAndreas Gohr * 1715540f91dSAndreas Gohr * @param array $tags list of tags => count 1725540f91dSAndreas Gohr * @param int $levels 1735540f91dSAndreas Gohr * @return mixed 1745540f91dSAndreas Gohr */ 175f61105deSAdrian Lang public function cloudData($tags, $levels = 10) { 176f61105deSAdrian Lang $min = min($tags); 177f61105deSAdrian Lang $max = max($tags); 178f61105deSAdrian Lang 179f61105deSAdrian Lang // calculate tresholds 180f61105deSAdrian Lang $tresholds = array(); 181f61105deSAdrian Lang for($i = 0; $i <= $levels; $i++) { 182f61105deSAdrian Lang $tresholds[$i] = pow($max - $min + 1, $i / $levels) + $min - 1; 183f61105deSAdrian Lang } 184f61105deSAdrian Lang 185f61105deSAdrian Lang // assign weights 186f61105deSAdrian Lang foreach($tags as $tag => $cnt) { 187f61105deSAdrian Lang foreach($tresholds as $tresh => $val) { 188f61105deSAdrian Lang if($cnt <= $val) { 189f61105deSAdrian Lang $tags[$tag] = $tresh; 190f61105deSAdrian Lang break; 191f61105deSAdrian Lang } 192f61105deSAdrian Lang $tags[$tag] = $levels; 193f61105deSAdrian Lang } 194f61105deSAdrian Lang } 195f61105deSAdrian Lang return $tags; 196f61105deSAdrian Lang } 197f61105deSAdrian Lang 1985540f91dSAndreas Gohr /** 1995540f91dSAndreas Gohr * Display a tag cloud 2005540f91dSAndreas Gohr * 2015540f91dSAndreas Gohr * @param array $tags list of tags => count 2025540f91dSAndreas Gohr * @param string $type 'tag' 2035540f91dSAndreas Gohr * @param Callable $func The function to print the link (gets tag and ns) 2045540f91dSAndreas Gohr * @param bool $wrap wrap cloud in UL tags? 2055540f91dSAndreas Gohr * @param bool $return returnn HTML instead of printing? 2065540f91dSAndreas Gohr * @param string $ns Add this namespace to search links 2075540f91dSAndreas Gohr * @return string 2085540f91dSAndreas Gohr */ 2095540f91dSAndreas Gohr public function html_cloud($tags, $type, $func, $wrap = true, $return = false, $ns = '') { 210f61105deSAdrian Lang $ret = ''; 2110dbdc3fcSAdrian Lang if($wrap) $ret .= '<ul class="tagging_cloud clearfix">'; 212f61105deSAdrian Lang if(count($tags) === 0) { 213f61105deSAdrian Lang // Produce valid XHTML (ul needs a child) 214f61105deSAdrian Lang $this->setupLocale(); 215f61105deSAdrian Lang $ret .= '<li><div class="li">' . $this->lang['js']['no' . $type . 's'] . '</div></li>'; 216f61105deSAdrian Lang } else { 217f61105deSAdrian Lang $tags = $this->cloudData($tags); 218f61105deSAdrian Lang foreach($tags as $val => $size) { 219f61105deSAdrian Lang $ret .= '<li class="t' . $size . '"><div class="li">'; 2205540f91dSAndreas Gohr $ret .= call_user_func($func, $val, $ns); 221f61105deSAdrian Lang $ret .= '</div></li>'; 222f61105deSAdrian Lang } 223f61105deSAdrian Lang } 224f61105deSAdrian Lang if($wrap) $ret .= '</ul>'; 225f61105deSAdrian Lang if($return) return $ret; 226f61105deSAdrian Lang echo $ret; 2275540f91dSAndreas Gohr return ''; 228f61105deSAdrian Lang } 229f61105deSAdrian Lang 2305540f91dSAndreas Gohr /** 2315540f91dSAndreas Gohr * Get the link to a search for the given tag 2325540f91dSAndreas Gohr * 2335540f91dSAndreas Gohr * @param string $tag search for this tag 2345540f91dSAndreas Gohr * @param string $ns limit search to this namespace 2355540f91dSAndreas Gohr * @return string 2365540f91dSAndreas Gohr */ 2375540f91dSAndreas Gohr protected function linkToSearch($tag, $ns = '') { 2385540f91dSAndreas Gohr return '<a href="' . hsc($this->getTagSearchURL($tag, $ns)) . '">' . $tag . '</a>'; 239f61105deSAdrian Lang } 240f61105deSAdrian Lang 24109536771SAndreas Gohr 242f61105deSAdrian Lang public function tpl_tags() { 243f61105deSAdrian Lang global $INFO; 244f61105deSAdrian Lang global $lang; 245fbf38c5bSAndreas Gohr $tags = $this->findItems(array('pid' => $INFO['id']), 'tag'); 24609536771SAndreas Gohr echo '<div class="plugin_tagging_edit">'; 247f61105deSAdrian Lang $this->html_cloud($tags, 'tag', array($this, 'linkToSearch')); 248f61105deSAdrian Lang 249*2ace74f4SAndreas Gohr if($this->getUser() && $INFO['writable']) { 250f61105deSAdrian Lang $lang['btn_tagging_edit'] = $lang['btn_secedit']; 251fbf38c5bSAndreas Gohr echo html_btn('tagging_edit', $INFO['id'], '', array()); 252289f50bdSAndreas Gohr $form = new Doku_Form(array('id' => 'tagging__edit')); 253fbf38c5bSAndreas Gohr $form->addHidden('tagging[id]', $INFO['id']); 254289f50bdSAndreas Gohr $form->addHidden('call', 'plugin_tagging_save'); 255*2ace74f4SAndreas Gohr $form->addElement(form_makeTextField('tagging[tags]', implode(', ', array_keys($this->findItems(array('pid' => $INFO['id'], 'tagger' => $this->getUser()), 'tag'))))); 256289f50bdSAndreas Gohr $form->addElement(form_makeButton('submit', 'save', $lang['btn_save'], array('id' => 'tagging__edit_save'))); 257289f50bdSAndreas Gohr $form->addElement(form_makeButton('submit', 'cancel', $lang['btn_cancel'], array('id' => 'tagging__edit_cancel'))); 258f61105deSAdrian Lang $form->printForm(); 259f61105deSAdrian Lang } 26009536771SAndreas Gohr echo '</div>'; 261f61105deSAdrian Lang } 262872edc7cSRené Corinth 2638a1a3846SAndreas Gohr /** 2648a1a3846SAndreas Gohr * @return array 2658a1a3846SAndreas Gohr */ 266872edc7cSRené Corinth public function getAllTags() { 267872edc7cSRené Corinth 268872edc7cSRené Corinth $db = $this->getDb(); 2698a1a3846SAndreas Gohr $res = $db->query('SELECT pid, tag, tagger FROM taggings ORDER BY tag'); 270872edc7cSRené Corinth 271872edc7cSRené Corinth $tags_tmp = $db->res2arr($res); 272872edc7cSRené Corinth $tags = array(); 273872edc7cSRené Corinth foreach($tags_tmp as $tag) { 274302a38efSAndreas Gohr $tid = $this->cleanTag($tag['tag']); 275872edc7cSRené Corinth 276302a38efSAndreas Gohr //$tags[$tid]['pid'][] = $tag['pid']; 277872edc7cSRené Corinth 278302a38efSAndreas Gohr if(isset($tags[$tid]['count'])) { 279302a38efSAndreas Gohr $tags[$tid]['count']++; 280302a38efSAndreas Gohr $tags[$tid]['tagger'][] = $tag['tagger']; 281872edc7cSRené Corinth } else { 282302a38efSAndreas Gohr $tags[$tid]['count'] = 1; 283302a38efSAndreas Gohr $tags[$tid]['tagger'] = array($tag['tagger']); 284872edc7cSRené Corinth } 285872edc7cSRené Corinth } 286872edc7cSRené Corinth return $tags; 287872edc7cSRené Corinth } 288872edc7cSRené Corinth 2898a1a3846SAndreas Gohr /** 2908a1a3846SAndreas Gohr * Renames a tag 2918a1a3846SAndreas Gohr * 2928a1a3846SAndreas Gohr * @param string $formerTagName 2938a1a3846SAndreas Gohr * @param string $newTagName 2948a1a3846SAndreas Gohr */ 295872edc7cSRené Corinth public function renameTag($formerTagName, $newTagName) { 296872edc7cSRené Corinth 297872edc7cSRené Corinth if(empty($formerTagName) || empty($newTagName)) { 2988a1a3846SAndreas Gohr msg($this->getLang("admin enter tag names"), -1); 2998a1a3846SAndreas Gohr return; 300872edc7cSRené Corinth } 301872edc7cSRené Corinth 302872edc7cSRené Corinth $db = $this->getDb(); 303872edc7cSRené Corinth 304302a38efSAndreas Gohr $res = $db->query('SELECT pid FROM taggings WHERE tag= ?', $formerTagName); 305872edc7cSRené Corinth $check = $db->res2arr($res); 306872edc7cSRené Corinth 307872edc7cSRené Corinth if(empty($check)) { 3088a1a3846SAndreas Gohr msg($this->getLang("admin tag does not exists"), -1); 3098a1a3846SAndreas Gohr return; 310872edc7cSRené Corinth } 311872edc7cSRené Corinth 312302a38efSAndreas Gohr $res = $db->query("UPDATE taggings SET tag = ? WHERE tag = ?", $newTagName, $formerTagName); 313872edc7cSRené Corinth $db->res2arr($res); 314872edc7cSRené Corinth 3158a1a3846SAndreas Gohr msg($this->getLang("admin saved"), 1); 3168a1a3846SAndreas Gohr return; 317872edc7cSRené Corinth } 318872edc7cSRené Corinth 319f61105deSAdrian Lang} 320