xref: /plugin/tagging/helper.php (revision 2ace74f450a66733630bc7e433b777cd7455ad31)
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