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 /** 31302a38efSAndreas Gohr * Canonicalizes the tag to its lower case nospace form 32302a38efSAndreas Gohr * 33302a38efSAndreas Gohr * @param $tag 34302a38efSAndreas Gohr * @return string 35302a38efSAndreas Gohr */ 36302a38efSAndreas Gohr public function cleanTag($tag) { 37302a38efSAndreas Gohr $tag = str_replace(' ', '', $tag); 38302a38efSAndreas Gohr $tag = utf8_strtolower($tag); 39302a38efSAndreas Gohr return $tag; 40302a38efSAndreas Gohr } 41302a38efSAndreas Gohr 42f61105deSAdrian Lang public function replaceTags($id, $user, $tags) { 43f61105deSAdrian Lang $db = $this->getDB(); 44f61105deSAdrian Lang $db->query('BEGIN TRANSACTION'); 45f61105deSAdrian Lang $queries = array(array('DELETE FROM taggings WHERE pid = ? AND tagger = ?', $id, $user)); 46f61105deSAdrian Lang foreach($tags as $tag) { 47f61105deSAdrian Lang $queries[] = array('INSERT INTO taggings (pid, tagger, tag) VALUES(?, ?, ?)', $id, $user, $tag); 48f61105deSAdrian Lang } 49f61105deSAdrian Lang 50f61105deSAdrian Lang foreach($queries as $query) { 51f61105deSAdrian Lang if(!call_user_func_array(array($db, 'query'), $query)) { 52f61105deSAdrian Lang $db->query('ROLLBACK TRANSACTION'); 53f61105deSAdrian Lang return false; 54f61105deSAdrian Lang } 55f61105deSAdrian Lang } 56f61105deSAdrian Lang return $db->query('COMMIT TRANSACTION'); 57f61105deSAdrian Lang } 58f61105deSAdrian Lang 590a518a11SAndreas Gohr /** 60b12334e1SAndreas Gohr * Get a list of Tags or Pages matching search criteria 610a518a11SAndreas Gohr * 62b12334e1SAndreas Gohr * @param array $filter What to search for array('field' => 'searchterm') 63b12334e1SAndreas Gohr * @param string $type What field to return 'tag'|'pid' 64*077ff864SAndreas Gohr * @param int $limit Limit to this many results, 0 for all 650a518a11SAndreas Gohr * @return array associative array in form of value => count 660a518a11SAndreas Gohr */ 67*077ff864SAndreas Gohr public function findItems($filter, $type, $limit=0) { 68f61105deSAdrian Lang $db = $this->getDB(); 69b12334e1SAndreas Gohr if(!$db) return array(); 70f61105deSAdrian Lang 71b12334e1SAndreas Gohr // create WHERE clause 72b12334e1SAndreas Gohr $where = '1=1'; 73b12334e1SAndreas Gohr foreach($filter as $field => $value) { 74b12334e1SAndreas Gohr // compare clean tags only 75b12334e1SAndreas Gohr if($field === 'tag') { 76b12334e1SAndreas Gohr $field = 'CLEANTAG(tag)'; 77b12334e1SAndreas Gohr $q = 'CLEANTAG(?)'; 78b12334e1SAndreas Gohr } else { 79b12334e1SAndreas Gohr $q = '?'; 80b12334e1SAndreas Gohr } 81b12334e1SAndreas Gohr // detect LIKE filters 82b12334e1SAndreas Gohr if($this->useLike($value)) { 83b12334e1SAndreas Gohr $where .= " AND $field LIKE $q"; 84b12334e1SAndreas Gohr } else { 85b12334e1SAndreas Gohr $where .= " AND $field = $q"; 86b12334e1SAndreas Gohr } 87b12334e1SAndreas Gohr } 88b12334e1SAndreas Gohr // group and order 89b12334e1SAndreas Gohr if($type == 'tag') { 90b12334e1SAndreas Gohr $groupby = 'CLEANTAG(tag)'; 91b12334e1SAndreas Gohr $orderby = 'CLEANTAG(tag)'; 92b12334e1SAndreas Gohr } else { 93b12334e1SAndreas Gohr $groupby = $type; 94466524f5SAndreas Gohr $orderby = "cnt DESC, $type"; 95b12334e1SAndreas Gohr } 96b12334e1SAndreas Gohr 97*077ff864SAndreas Gohr // limit results 98*077ff864SAndreas Gohr if($limit) { 99*077ff864SAndreas Gohr $limit = " LIMIT $limit"; 100*077ff864SAndreas Gohr }else{ 101*077ff864SAndreas Gohr $limit = ''; 102*077ff864SAndreas Gohr } 103*077ff864SAndreas Gohr 104b12334e1SAndreas Gohr // create SQL 105b12334e1SAndreas Gohr $sql = "SELECT $type AS item, COUNT(*) AS cnt 106b12334e1SAndreas Gohr FROM taggings 107b12334e1SAndreas Gohr WHERE $where 108b12334e1SAndreas Gohr GROUP BY $groupby 109*077ff864SAndreas Gohr ORDER BY $orderby 110*077ff864SAndreas Gohr $limit 111*077ff864SAndreas Gohr "; 112b12334e1SAndreas Gohr 113b12334e1SAndreas Gohr // run query and turn into associative array 114b12334e1SAndreas Gohr $res = $db->query($sql, array_values($filter)); 115f61105deSAdrian Lang $res = $db->res2arr($res); 116b12334e1SAndreas Gohr 117f61105deSAdrian Lang $ret = array(); 118b12334e1SAndreas Gohr foreach($res as $row) { 119b12334e1SAndreas Gohr $ret[$row['item']] = $row['cnt']; 120f61105deSAdrian Lang } 121f61105deSAdrian Lang return $ret; 122f61105deSAdrian Lang } 123f61105deSAdrian Lang 124b12334e1SAndreas Gohr /** 125b12334e1SAndreas Gohr * Check if the given string is a LIKE statement 126b12334e1SAndreas Gohr * 127b12334e1SAndreas Gohr * @param string $value 128b12334e1SAndreas Gohr * @return bool 129b12334e1SAndreas Gohr */ 130b12334e1SAndreas Gohr private function useLike($value) { 131b12334e1SAndreas Gohr return strpos($value, '%') === 0 || strrpos($value, '%') === strlen($value) - 1; 132b2073787SDominik Eckelmann } 133b2073787SDominik Eckelmann 134302a38efSAndreas Gohr /** 135302a38efSAndreas Gohr * Constructs the URL to search for a tag 136302a38efSAndreas Gohr * 1375540f91dSAndreas Gohr * @param string $tag 1385540f91dSAndreas Gohr * @param string $ns 139302a38efSAndreas Gohr * @return string 140302a38efSAndreas Gohr */ 1415540f91dSAndreas Gohr public function getTagSearchURL($tag, $ns = '') { 1425540f91dSAndreas Gohr $ret = '?do=search&id=' . rawurlencode($tag); 1435540f91dSAndreas Gohr if($ns) $ret .= rawurlencode(' @' . $ns); 1445540f91dSAndreas Gohr 1455540f91dSAndreas Gohr return $ret; 146f61105deSAdrian Lang } 147f61105deSAdrian Lang 1485540f91dSAndreas Gohr /** 1495540f91dSAndreas Gohr * Calculates the size levels for the given list of clouds 1505540f91dSAndreas Gohr * 1515540f91dSAndreas Gohr * Automatically determines sensible tresholds 1525540f91dSAndreas Gohr * 1535540f91dSAndreas Gohr * @param array $tags list of tags => count 1545540f91dSAndreas Gohr * @param int $levels 1555540f91dSAndreas Gohr * @return mixed 1565540f91dSAndreas Gohr */ 157f61105deSAdrian Lang public function cloudData($tags, $levels = 10) { 158f61105deSAdrian Lang $min = min($tags); 159f61105deSAdrian Lang $max = max($tags); 160f61105deSAdrian Lang 161f61105deSAdrian Lang // calculate tresholds 162f61105deSAdrian Lang $tresholds = array(); 163f61105deSAdrian Lang for($i = 0; $i <= $levels; $i++) { 164f61105deSAdrian Lang $tresholds[$i] = pow($max - $min + 1, $i / $levels) + $min - 1; 165f61105deSAdrian Lang } 166f61105deSAdrian Lang 167f61105deSAdrian Lang // assign weights 168f61105deSAdrian Lang foreach($tags as $tag => $cnt) { 169f61105deSAdrian Lang foreach($tresholds as $tresh => $val) { 170f61105deSAdrian Lang if($cnt <= $val) { 171f61105deSAdrian Lang $tags[$tag] = $tresh; 172f61105deSAdrian Lang break; 173f61105deSAdrian Lang } 174f61105deSAdrian Lang $tags[$tag] = $levels; 175f61105deSAdrian Lang } 176f61105deSAdrian Lang } 177f61105deSAdrian Lang return $tags; 178f61105deSAdrian Lang } 179f61105deSAdrian Lang 1805540f91dSAndreas Gohr /** 1815540f91dSAndreas Gohr * Display a tag cloud 1825540f91dSAndreas Gohr * 1835540f91dSAndreas Gohr * @param array $tags list of tags => count 1845540f91dSAndreas Gohr * @param string $type 'tag' 1855540f91dSAndreas Gohr * @param Callable $func The function to print the link (gets tag and ns) 1865540f91dSAndreas Gohr * @param bool $wrap wrap cloud in UL tags? 1875540f91dSAndreas Gohr * @param bool $return returnn HTML instead of printing? 1885540f91dSAndreas Gohr * @param string $ns Add this namespace to search links 1895540f91dSAndreas Gohr * @return string 1905540f91dSAndreas Gohr */ 1915540f91dSAndreas Gohr public function html_cloud($tags, $type, $func, $wrap = true, $return = false, $ns = '') { 192f61105deSAdrian Lang $ret = ''; 1930dbdc3fcSAdrian Lang if($wrap) $ret .= '<ul class="tagging_cloud clearfix">'; 194f61105deSAdrian Lang if(count($tags) === 0) { 195f61105deSAdrian Lang // Produce valid XHTML (ul needs a child) 196f61105deSAdrian Lang $this->setupLocale(); 197f61105deSAdrian Lang $ret .= '<li><div class="li">' . $this->lang['js']['no' . $type . 's'] . '</div></li>'; 198f61105deSAdrian Lang } else { 199f61105deSAdrian Lang $tags = $this->cloudData($tags); 200f61105deSAdrian Lang foreach($tags as $val => $size) { 201f61105deSAdrian Lang $ret .= '<li class="t' . $size . '"><div class="li">'; 2025540f91dSAndreas Gohr $ret .= call_user_func($func, $val, $ns); 203f61105deSAdrian Lang $ret .= '</div></li>'; 204f61105deSAdrian Lang } 205f61105deSAdrian Lang } 206f61105deSAdrian Lang if($wrap) $ret .= '</ul>'; 207f61105deSAdrian Lang if($return) return $ret; 208f61105deSAdrian Lang echo $ret; 2095540f91dSAndreas Gohr return ''; 210f61105deSAdrian Lang } 211f61105deSAdrian Lang 2125540f91dSAndreas Gohr /** 2135540f91dSAndreas Gohr * Get the link to a search for the given tag 2145540f91dSAndreas Gohr * 2155540f91dSAndreas Gohr * @param string $tag search for this tag 2165540f91dSAndreas Gohr * @param string $ns limit search to this namespace 2175540f91dSAndreas Gohr * @return string 2185540f91dSAndreas Gohr */ 2195540f91dSAndreas Gohr protected function linkToSearch($tag, $ns = '') { 2205540f91dSAndreas Gohr return '<a href="' . hsc($this->getTagSearchURL($tag, $ns)) . '">' . $tag . '</a>'; 221f61105deSAdrian Lang } 222f61105deSAdrian Lang 223f61105deSAdrian Lang public function tpl_tags() { 224f61105deSAdrian Lang global $INFO; 225f61105deSAdrian Lang global $lang; 226fbf38c5bSAndreas Gohr $tags = $this->findItems(array('pid' => $INFO['id']), 'tag'); 227f61105deSAdrian Lang $this->html_cloud($tags, 'tag', array($this, 'linkToSearch')); 228f61105deSAdrian Lang 229f61105deSAdrian Lang if(isset($_SERVER['REMOTE_USER']) && $INFO['writable']) { 230f61105deSAdrian Lang $lang['btn_tagging_edit'] = $lang['btn_secedit']; 231fbf38c5bSAndreas Gohr echo html_btn('tagging_edit', $INFO['id'], '', array()); 232289f50bdSAndreas Gohr $form = new Doku_Form(array('id' => 'tagging__edit')); 233fbf38c5bSAndreas Gohr $form->addHidden('tagging[id]', $INFO['id']); 234289f50bdSAndreas Gohr $form->addHidden('call', 'plugin_tagging_save'); 235fbf38c5bSAndreas Gohr $form->addElement(form_makeTextField('tagging[tags]', implode(', ', array_keys($this->findItems(array('pid' => $INFO['id'], 'tagger' => $_SERVER['REMOTE_USER']), 'tag'))))); 236289f50bdSAndreas Gohr $form->addElement(form_makeButton('submit', 'save', $lang['btn_save'], array('id' => 'tagging__edit_save'))); 237289f50bdSAndreas Gohr $form->addElement(form_makeButton('submit', 'cancel', $lang['btn_cancel'], array('id' => 'tagging__edit_cancel'))); 238f61105deSAdrian Lang $form->printForm(); 239f61105deSAdrian Lang } 240f61105deSAdrian Lang } 241872edc7cSRené Corinth 2428a1a3846SAndreas Gohr /** 2438a1a3846SAndreas Gohr * @return array 2448a1a3846SAndreas Gohr */ 245872edc7cSRené Corinth public function getAllTags() { 246872edc7cSRené Corinth 247872edc7cSRené Corinth $db = $this->getDb(); 2488a1a3846SAndreas Gohr $res = $db->query('SELECT pid, tag, tagger FROM taggings ORDER BY tag'); 249872edc7cSRené Corinth 250872edc7cSRené Corinth $tags_tmp = $db->res2arr($res); 251872edc7cSRené Corinth $tags = array(); 252872edc7cSRené Corinth foreach($tags_tmp as $tag) { 253302a38efSAndreas Gohr $tid = $this->cleanTag($tag['tag']); 254872edc7cSRené Corinth 255302a38efSAndreas Gohr //$tags[$tid]['pid'][] = $tag['pid']; 256872edc7cSRené Corinth 257302a38efSAndreas Gohr if(isset($tags[$tid]['count'])) { 258302a38efSAndreas Gohr $tags[$tid]['count']++; 259302a38efSAndreas Gohr $tags[$tid]['tagger'][] = $tag['tagger']; 260872edc7cSRené Corinth } else { 261302a38efSAndreas Gohr $tags[$tid]['count'] = 1; 262302a38efSAndreas Gohr $tags[$tid]['tagger'] = array($tag['tagger']); 263872edc7cSRené Corinth } 264872edc7cSRené Corinth } 265872edc7cSRené Corinth return $tags; 266872edc7cSRené Corinth } 267872edc7cSRené Corinth 2688a1a3846SAndreas Gohr /** 2698a1a3846SAndreas Gohr * Renames a tag 2708a1a3846SAndreas Gohr * 2718a1a3846SAndreas Gohr * @param string $formerTagName 2728a1a3846SAndreas Gohr * @param string $newTagName 2738a1a3846SAndreas Gohr */ 274872edc7cSRené Corinth public function renameTag($formerTagName, $newTagName) { 275872edc7cSRené Corinth 276872edc7cSRené Corinth if(empty($formerTagName) || empty($newTagName)) { 2778a1a3846SAndreas Gohr msg($this->getLang("admin enter tag names"), -1); 2788a1a3846SAndreas Gohr return; 279872edc7cSRené Corinth } 280872edc7cSRené Corinth 281872edc7cSRené Corinth $db = $this->getDb(); 282872edc7cSRené Corinth 283302a38efSAndreas Gohr $res = $db->query('SELECT pid FROM taggings WHERE tag= ?', $formerTagName); 284872edc7cSRené Corinth $check = $db->res2arr($res); 285872edc7cSRené Corinth 286872edc7cSRené Corinth if(empty($check)) { 2878a1a3846SAndreas Gohr msg($this->getLang("admin tag does not exists"), -1); 2888a1a3846SAndreas Gohr return; 289872edc7cSRené Corinth } 290872edc7cSRené Corinth 291302a38efSAndreas Gohr $res = $db->query("UPDATE taggings SET tag = ? WHERE tag = ?", $newTagName, $formerTagName); 292872edc7cSRené Corinth $db->res2arr($res); 293872edc7cSRené Corinth 2948a1a3846SAndreas Gohr msg($this->getLang("admin saved"), 1); 2958a1a3846SAndreas Gohr return; 296872edc7cSRené Corinth } 297872edc7cSRené Corinth 298f61105deSAdrian Lang} 299