xref: /plugin/discussion/admin.php (revision e7ac9ada4998117ca2a6894a8446c270f3b90808)
1a768ba62Swikidesign<?php
2264b7327Swikidesign/**
3264b7327Swikidesign * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
4264b7327Swikidesign * @author     Esther Brunner <wikidesign@gmail.com>
5264b7327Swikidesign */
6264b7327Swikidesign
7264b7327Swikidesign// must be run within Dokuwiki
8264b7327Swikidesignif (!defined('DOKU_INC')) die();
9264b7327Swikidesign
10de7e6f00SGerrit Uitslag/**
11de7e6f00SGerrit Uitslag * Class admin_plugin_discussion
12de7e6f00SGerrit Uitslag */
13a768ba62Swikidesignclass admin_plugin_discussion extends DokuWiki_Admin_Plugin {
14a768ba62Swikidesign
15de7e6f00SGerrit Uitslag    /**
16de7e6f00SGerrit Uitslag     * @return int
17de7e6f00SGerrit Uitslag     */
18264b7327Swikidesign    function getMenuSort() { return 200; }
19de7e6f00SGerrit Uitslag
20de7e6f00SGerrit Uitslag    /**
21de7e6f00SGerrit Uitslag     * @return bool
22de7e6f00SGerrit Uitslag     */
23264b7327Swikidesign    function forAdminOnly() { return false; }
24a768ba62Swikidesign
25573e23a1Swikidesign    function handle() {
26573e23a1Swikidesign        global $lang;
27573e23a1Swikidesign
28573e23a1Swikidesign        $cid = $_REQUEST['cid'];
29573e23a1Swikidesign        if (is_array($cid)) $cid = array_keys($cid);
30573e23a1Swikidesign
31de7e6f00SGerrit Uitslag        /** @var action_plugin_discussion $action */
32573e23a1Swikidesign        $action =& plugin_load('action', 'discussion');
33573e23a1Swikidesign        if (!$action) return; // couldn't load action plugin component
34573e23a1Swikidesign
35573e23a1Swikidesign        switch ($_REQUEST['comment']) {
36573e23a1Swikidesign            case $lang['btn_delete']:
37de7e6f00SGerrit Uitslag                $action->save($cid, '');
38573e23a1Swikidesign                break;
39573e23a1Swikidesign
40573e23a1Swikidesign            case $this->getLang('btn_show'):
41de7e6f00SGerrit Uitslag                $action->save($cid, '', 'show');
42573e23a1Swikidesign                break;
43573e23a1Swikidesign
44573e23a1Swikidesign            case $this->getLang('btn_hide'):
45de7e6f00SGerrit Uitslag                $action->save($cid, '', 'hide');
46573e23a1Swikidesign                break;
47573e23a1Swikidesign
48573e23a1Swikidesign            case $this->getLang('btn_change'):
496fd05bf5Swikidesign                $this->_changeStatus($_REQUEST['status']);
50573e23a1Swikidesign                break;
51573e23a1Swikidesign        }
52573e23a1Swikidesign    }
53573e23a1Swikidesign
54a768ba62Swikidesign    function html() {
55264b7327Swikidesign        global $conf;
56264b7327Swikidesign
57573e23a1Swikidesign        $first = $_REQUEST['first'];
58573e23a1Swikidesign        if (!is_numeric($first)) $first = 0;
59bc3cb1d5SMichael Klier        $num = ($conf['recent']) ? $conf['recent'] : 20;
60264b7327Swikidesign
61573e23a1Swikidesign        ptln('<h1>'.$this->getLang('menu').'</h1>');
62264b7327Swikidesign
63573e23a1Swikidesign        $threads = $this->_getThreads();
64573e23a1Swikidesign
65573e23a1Swikidesign        // slice the needed chunk of discussion pages
66573e23a1Swikidesign        $more = ((count($threads) > ($first + $num)) ? true : false);
67573e23a1Swikidesign        $threads = array_slice($threads, $first, $num);
68573e23a1Swikidesign
69264b7327Swikidesign        foreach ($threads as $thread) {
70573e23a1Swikidesign            $comments = $this->_getComments($thread);
71573e23a1Swikidesign            $this->_threadHead($thread);
72573e23a1Swikidesign            if ($comments === false) {
736fd05bf5Swikidesign                ptln('</div>', 6); // class="level2"
74264b7327Swikidesign                continue;
75264b7327Swikidesign            }
76264b7327Swikidesign
776fd05bf5Swikidesign            ptln('<form method="post" action="'.wl($thread['id']).'">', 8);
786fd05bf5Swikidesign            ptln('<div class="no">', 10);
796fd05bf5Swikidesign            ptln('<input type="hidden" name="do" value="admin" />', 10);
806fd05bf5Swikidesign            ptln('<input type="hidden" name="page" value="discussion" />', 10);
81264b7327Swikidesign            echo html_buildlist($comments, 'admin_discussion', array($this, '_commentItem'), array($this, '_li_comment'));
82573e23a1Swikidesign            $this->_actionButtons($thread['id']);
83264b7327Swikidesign        }
84573e23a1Swikidesign        $this->_browseDiscussionLinks($more, $first, $num);
856fd05bf5Swikidesign
86264b7327Swikidesign    }
87264b7327Swikidesign
88264b7327Swikidesign    /**
89573e23a1Swikidesign     * Returns an array of pages with discussion sections, sorted by recent comments
90*e7ac9adaSGerrit Uitslag     *
91*e7ac9adaSGerrit Uitslag     * @return array
92573e23a1Swikidesign     */
93573e23a1Swikidesign    function _getThreads() {
94573e23a1Swikidesign        global $conf;
95573e23a1Swikidesign
96573e23a1Swikidesign        require_once(DOKU_INC.'inc/search.php');
97573e23a1Swikidesign
98573e23a1Swikidesign        // returns the list of pages in the given namespace and it's subspaces
99573e23a1Swikidesign        $items = array();
100387bc4d2SMichael Hamann        search($items, $conf['datadir'], 'search_allpages', array());
101573e23a1Swikidesign
102573e23a1Swikidesign        // add pages with comments to result
103573e23a1Swikidesign        $result = array();
104573e23a1Swikidesign        foreach ($items as $item) {
105573e23a1Swikidesign            $id = $item['id'];
106573e23a1Swikidesign
107573e23a1Swikidesign            // some checks
108573e23a1Swikidesign            $file = metaFN($id, '.comments');
109573e23a1Swikidesign            if (!@file_exists($file)) continue; // skip if no comments file
110573e23a1Swikidesign
111573e23a1Swikidesign            $date = filemtime($file);
11271a0ae95SGina Haeussge            $result[] = array(
113573e23a1Swikidesign                    'id'   => $id,
114573e23a1Swikidesign                    'file' => $file,
115573e23a1Swikidesign                    'date' => $date,
116573e23a1Swikidesign                    );
117573e23a1Swikidesign        }
118573e23a1Swikidesign
119573e23a1Swikidesign        // finally sort by time of last comment
12071a0ae95SGina Haeussge        usort($result, array('admin_plugin_discussion', '_threadCmp'));
121573e23a1Swikidesign
122573e23a1Swikidesign        return $result;
123573e23a1Swikidesign    }
124573e23a1Swikidesign
125573e23a1Swikidesign    /**
12671a0ae95SGina Haeussge     * Callback for comparison of thread data.
12771a0ae95SGina Haeussge     *
12871a0ae95SGina Haeussge     * Used for sorting threads in descending order by date of last comment.
12971a0ae95SGina Haeussge     * If this date happens to be equal for the compared threads, page id
13071a0ae95SGina Haeussge     * is used as second comparison attribute.
131*e7ac9adaSGerrit Uitslag     *
132*e7ac9adaSGerrit Uitslag     * @param array $a
133*e7ac9adaSGerrit Uitslag     * @param array $b
134*e7ac9adaSGerrit Uitslag     * @return int
13571a0ae95SGina Haeussge     */
13671a0ae95SGina Haeussge    function _threadCmp($a, $b) {
13771a0ae95SGina Haeussge        if ($a['date'] == $b['date']) {
13871a0ae95SGina Haeussge            return strcmp($a['id'], $b['id']);
13971a0ae95SGina Haeussge        }
14071a0ae95SGina Haeussge        return ($a['date'] < $b['date']) ? 1 : -1;
14171a0ae95SGina Haeussge    }
14271a0ae95SGina Haeussge
14371a0ae95SGina Haeussge    /**
144573e23a1Swikidesign     * Outputs header, page ID and status of a discussion thread
145*e7ac9adaSGerrit Uitslag     *
146*e7ac9adaSGerrit Uitslag     * @param array $thread
147*e7ac9adaSGerrit Uitslag     * @return bool
148264b7327Swikidesign     */
149264b7327Swikidesign    function _threadHead($thread) {
150573e23a1Swikidesign        $id = $thread['id'];
151573e23a1Swikidesign
152573e23a1Swikidesign        $labels = array(
153573e23a1Swikidesign                0 => $this->getLang('off'),
154573e23a1Swikidesign                1 => $this->getLang('open'),
155573e23a1Swikidesign                2 => $this->getLang('closed')
156264b7327Swikidesign                );
1576fd05bf5Swikidesign        $title = p_get_metadata($id, 'title');
1586fd05bf5Swikidesign        if (!$title) $title = $id;
1596fd05bf5Swikidesign        ptln('<h2 name="'.$id.'" id="'.$id.'">'.hsc($title).'</h2>', 6);
1606fd05bf5Swikidesign        ptln('<form method="post" action="'.wl($id).'">', 6);
1616fd05bf5Swikidesign        ptln('<div class="mediaright">', 8);
1626fd05bf5Swikidesign        ptln('<input type="hidden" name="do" value="admin" />', 10);
1636fd05bf5Swikidesign        ptln('<input type="hidden" name="page" value="discussion" />', 10);
1646fd05bf5Swikidesign        ptln($this->getLang('status').': <select name="status" size="1">', 10);
165573e23a1Swikidesign        foreach ($labels as $key => $label) {
166573e23a1Swikidesign            $selected = (($key == $thread['status']) ? ' selected="selected"' : '');
1676fd05bf5Swikidesign            ptln('<option value="'.$key.'"'.$selected.'>'.$label.'</option>', 12);
168573e23a1Swikidesign        }
1696fd05bf5Swikidesign        ptln('</select> ', 10);
17014382ebaSMichael Klier        ptln('<input type="submit" class="button" name="comment" value="'.$this->getLang('btn_change').'" class"button" title="'.$this->getLang('btn_change').'" />', 10);
1716fd05bf5Swikidesign        ptln('</div>', 8);
1726fd05bf5Swikidesign        ptln('</form>', 6);
1736fd05bf5Swikidesign        ptln('<div class="level2">', 6);
1746fd05bf5Swikidesign        ptln('<a href="'.wl($id).'" class="wikilink1">'.$id.'</a> ', 8);
175573e23a1Swikidesign        return true;
176573e23a1Swikidesign    }
177573e23a1Swikidesign
178573e23a1Swikidesign    /**
179573e23a1Swikidesign     * Returns the full comments data for a given wiki page
180*e7ac9adaSGerrit Uitslag     *
181*e7ac9adaSGerrit Uitslag     * @param array $thread
182*e7ac9adaSGerrit Uitslag     * @return array|bool
183573e23a1Swikidesign     */
184573e23a1Swikidesign    function _getComments(&$thread) {
185573e23a1Swikidesign        $id = $thread['id'];
186573e23a1Swikidesign
187573e23a1Swikidesign        if (!$thread['file']) $thread['file'] = metaFN($id, '.comments');
188573e23a1Swikidesign        if (!@file_exists($thread['file'])) return false; // no discussion thread at all
189573e23a1Swikidesign
190573e23a1Swikidesign        $data = unserialize(io_readFile($thread['file'], false));
191573e23a1Swikidesign
192573e23a1Swikidesign        $thread['status'] = $data['status'];
193573e23a1Swikidesign        $thread['number'] = $data['number'];
194573e23a1Swikidesign        if (!$data['status']) return false;   // comments are turned off
1956fd05bf5Swikidesign        if (!$data['comments']) return false; // no comments
196573e23a1Swikidesign
197573e23a1Swikidesign        $result = array();
198573e23a1Swikidesign        foreach ($data['comments'] as $cid => $comment) {
199573e23a1Swikidesign            $this->_addComment($cid, $data, $result);
200573e23a1Swikidesign        }
201573e23a1Swikidesign
2026fd05bf5Swikidesign        if (empty($result)) return false;
2036fd05bf5Swikidesign        else return $result;
204573e23a1Swikidesign    }
205573e23a1Swikidesign
206573e23a1Swikidesign    /**
207573e23a1Swikidesign     * Recursive function to add the comment hierarchy to the result
208*e7ac9adaSGerrit Uitslag     *
209*e7ac9adaSGerrit Uitslag     * @param string $cid
210*e7ac9adaSGerrit Uitslag     * @param array  $data
211*e7ac9adaSGerrit Uitslag     * @param array  $result
212*e7ac9adaSGerrit Uitslag     * @param string $parent
213*e7ac9adaSGerrit Uitslag     * @param int    $level
214573e23a1Swikidesign     */
215573e23a1Swikidesign    function _addComment($cid, &$data, &$result, $parent = '', $level = 1) {
216573e23a1Swikidesign        if (!is_array($data['comments'][$cid])) return; // corrupt datatype
217573e23a1Swikidesign        $comment = $data['comments'][$cid];
218573e23a1Swikidesign        if ($comment['parent'] != $parent) return;      // answer to another comment
219573e23a1Swikidesign
220573e23a1Swikidesign        // okay, add the comment to the result
221573e23a1Swikidesign        $comment['id'] = $cid;
222573e23a1Swikidesign        $comment['level'] = $level;
223573e23a1Swikidesign        $result[] = $comment;
224573e23a1Swikidesign
225573e23a1Swikidesign        // check answers to this comment
226573e23a1Swikidesign        if (count($comment['replies'])) {
227573e23a1Swikidesign            foreach ($comment['replies'] as $rid) {
228573e23a1Swikidesign                $this->_addComment($rid, $data, $result, $cid, $level + 1);
229573e23a1Swikidesign            }
230573e23a1Swikidesign        }
231264b7327Swikidesign    }
232264b7327Swikidesign
233264b7327Swikidesign    /**
234264b7327Swikidesign     * Checkbox and info about a comment item
235*e7ac9adaSGerrit Uitslag     *
236*e7ac9adaSGerrit Uitslag     * @param array $comment
237*e7ac9adaSGerrit Uitslag     * @return string
238264b7327Swikidesign     */
239264b7327Swikidesign    function _commentItem($comment) {
240264b7327Swikidesign        global $conf;
241264b7327Swikidesign
242264b7327Swikidesign        // prepare variables
243264b7327Swikidesign        if (is_array($comment['user'])) { // new format
244264b7327Swikidesign            $name    = $comment['user']['name'];
245264b7327Swikidesign            $mail    = $comment['user']['mail'];
246264b7327Swikidesign        } else {                         // old format
247264b7327Swikidesign            $name    = $comment['name'];
248264b7327Swikidesign            $mail    = $comment['mail'];
249264b7327Swikidesign        }
250264b7327Swikidesign        if (is_array($comment['date'])) { // new format
251264b7327Swikidesign            $created  = $comment['date']['created'];
252264b7327Swikidesign        } else {                         // old format
253264b7327Swikidesign            $created  = $comment['date'];
254264b7327Swikidesign        }
255573e23a1Swikidesign        $abstract = preg_replace('/\s+?/', ' ', strip_tags($comment['xhtml']));
256264b7327Swikidesign        if (utf8_strlen($abstract) > 160) $abstract = utf8_substr($abstract, 0, 160).'...';
257264b7327Swikidesign
258573e23a1Swikidesign        return '<input type="checkbox" name="cid['.$comment['id'].']" value="1" /> '.
259f014bc86SMichael Klier            $this->email($mail, $name, 'email').', '.strftime($conf['dformat'], $created).': '.
260573e23a1Swikidesign            '<span class="abstract">'.$abstract.'</span>';
261264b7327Swikidesign    }
262264b7327Swikidesign
263264b7327Swikidesign    /**
264264b7327Swikidesign     * list item tag
265*e7ac9adaSGerrit Uitslag     *
266*e7ac9adaSGerrit Uitslag     * @param array $comment
267*e7ac9adaSGerrit Uitslag     * @return string
268264b7327Swikidesign     */
269264b7327Swikidesign    function _li_comment($comment) {
270264b7327Swikidesign        $show = ($comment['show'] ? '' : ' hidden');
271264b7327Swikidesign        return '<li class="level'.$comment['level'].$show.'">';
272264b7327Swikidesign    }
273264b7327Swikidesign
274264b7327Swikidesign    /**
275264b7327Swikidesign     * Show buttons to bulk remove, hide or show comments
276*e7ac9adaSGerrit Uitslag     *
277*e7ac9adaSGerrit Uitslag     * @param string $id
278*e7ac9adaSGerrit Uitslag     * @return bool
279264b7327Swikidesign     */
280264b7327Swikidesign    function _actionButtons($id) {
281264b7327Swikidesign        global $lang;
282264b7327Swikidesign
2836fd05bf5Swikidesign        ptln('<div class="comment_buttons">', 12);
2846fd05bf5Swikidesign        ptln('<input type="submit" name="comment" value="'.$this->getLang('btn_show').'" class="button" title="'.$this->getLang('btn_show').'" />', 14);
2856fd05bf5Swikidesign        ptln('<input type="submit" name="comment" value="'.$this->getLang('btn_hide').'" class="button" title="'.$this->getLang('btn_hide').'" />', 14);
2866fd05bf5Swikidesign        ptln('<input type="submit" name="comment" value="'.$lang['btn_delete'].'" class="button" title="'.$lang['btn_delete'].'" />', 14);
2876fd05bf5Swikidesign        ptln('</div>', 12); // class="comment_buttons"
2886fd05bf5Swikidesign        ptln('</div>', 10); // class="no"
2896fd05bf5Swikidesign        ptln('</form>', 8);
2906fd05bf5Swikidesign        ptln('</div>', 6); // class="level2"
291573e23a1Swikidesign        return true;
292573e23a1Swikidesign    }
293573e23a1Swikidesign
294573e23a1Swikidesign    /**
295573e23a1Swikidesign     * Displays links to older newer discussions
296*e7ac9adaSGerrit Uitslag     *
297*e7ac9adaSGerrit Uitslag     * @param bool $more
298*e7ac9adaSGerrit Uitslag     * @param int  $first
299*e7ac9adaSGerrit Uitslag     * @param int  $num
300*e7ac9adaSGerrit Uitslag     * @return bool
301573e23a1Swikidesign     */
302573e23a1Swikidesign    function _browseDiscussionLinks($more, $first, $num) {
303573e23a1Swikidesign        global $ID;
304573e23a1Swikidesign
3053e02b3ffSwikidesign        if (($first == 0) && (!$more)) return true;
3063e02b3ffSwikidesign
307573e23a1Swikidesign        $params = array('do' => 'admin', 'page' => 'discussion');
308573e23a1Swikidesign        $last = $first+$num;
3096fd05bf5Swikidesign        ptln('<div class="level1">', 8);
310de7e6f00SGerrit Uitslag        $ret = '';
311573e23a1Swikidesign        if ($first > 0) {
312573e23a1Swikidesign            $first -= $num;
313573e23a1Swikidesign            if ($first < 0) $first = 0;
314573e23a1Swikidesign            $params['first'] = $first;
3156fd05bf5Swikidesign            ptln('<p class="centeralign">', 8);
316573e23a1Swikidesign            $ret = '<a href="'.wl($ID, $params).'" class="wikilink1">&lt;&lt; '.$this->getLang('newer').'</a>';
317573e23a1Swikidesign            if ($more) {
318573e23a1Swikidesign                $ret .= ' | ';
319573e23a1Swikidesign            } else {
3206fd05bf5Swikidesign                ptln($ret, 10);
3216fd05bf5Swikidesign                ptln('</p>', 8);
322573e23a1Swikidesign            }
323573e23a1Swikidesign        } else if ($more) {
3246fd05bf5Swikidesign            ptln('<p class="centeralign">', 8);
325573e23a1Swikidesign        }
326573e23a1Swikidesign        if ($more) {
327573e23a1Swikidesign            $params['first'] = $last;
328573e23a1Swikidesign            $ret .= '<a href="'.wl($ID, $params).'" class="wikilink1">'.$this->getLang('older').' &gt;&gt;</a>';
3296fd05bf5Swikidesign            ptln($ret, 10);
3306fd05bf5Swikidesign            ptln('</p>', 8);
331573e23a1Swikidesign        }
3326fd05bf5Swikidesign        ptln('</div>', 6); // class="level1"
333573e23a1Swikidesign        return true;
334573e23a1Swikidesign    }
335573e23a1Swikidesign
336573e23a1Swikidesign    /**
337573e23a1Swikidesign     * Changes the status of a comment
338*e7ac9adaSGerrit Uitslag     *
339*e7ac9adaSGerrit Uitslag     * @param string $new
340*e7ac9adaSGerrit Uitslag     * @return bool
341573e23a1Swikidesign     */
342573e23a1Swikidesign    function _changeStatus($new) {
343573e23a1Swikidesign        global $ID;
344573e23a1Swikidesign
345573e23a1Swikidesign        // get discussion meta file name
346573e23a1Swikidesign        $file = metaFN($ID, '.comments');
347573e23a1Swikidesign        $data = unserialize(io_readFile($file, false));
348573e23a1Swikidesign
349573e23a1Swikidesign        $old = $data['status'];
350573e23a1Swikidesign        if ($old == $new) return true;
351573e23a1Swikidesign
352573e23a1Swikidesign        // save the comment metadata file
353573e23a1Swikidesign        $data['status'] = $new;
354573e23a1Swikidesign        io_saveFile($file, serialize($data));
355573e23a1Swikidesign
356573e23a1Swikidesign        // look for ~~DISCUSSION~~ command in page file and change it accordingly
3573e02b3ffSwikidesign        $patterns = array('~~DISCUSSION:off\2~~', '~~DISCUSSION\2~~', '~~DISCUSSION:closed\2~~');
358573e23a1Swikidesign        $replace = $patterns[$new];
3593e02b3ffSwikidesign        $wiki = preg_replace('/~~DISCUSSION([\w:]*)(\|?.*?)~~/', $replace, rawWiki($ID));
360573e23a1Swikidesign        saveWikiText($ID, $wiki, $this->getLang('statuschanged'), true);
361573e23a1Swikidesign
362573e23a1Swikidesign        return true;
363264b7327Swikidesign    }
3645ef1705fSiLoveiDo}
365530693fbSMichael Klier// vim:ts=4:sw=4:et:enc=utf-8:
366