Dotclear

source: admin/comments.php @ 3342:f2a717eb5f79

Revision 3342:f2a717eb5f79, 9.0 KB checked in by franck <carnet.franck.paul@…>, 9 years ago (diff)

Add Entry date as sort order in comments list. May be useful when displaying spam and looking for false-positive
Line 
1<?php
2# -- BEGIN LICENSE BLOCK ---------------------------------------
3#
4# This file is part of Dotclear 2.
5#
6# Copyright (c) 2003-2013 Olivier Meunier & Association Dotclear
7# Licensed under the GPL version 2.0 license.
8# See LICENSE file or
9# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
10#
11# -- END LICENSE BLOCK -----------------------------------------
12
13require dirname(__FILE__).'/../inc/admin/prepend.php';
14
15dcPage::check('usage,contentadmin');
16
17if (!empty($_POST['delete_all_spam']))
18{
19     try {
20          $core->blog->delJunkComments();
21          $_SESSION['comments_del_spam'] = true;
22          $core->adminurl->redirect("admin.comments");
23     } catch (Exception $e) {
24          $core->error->add($e->getMessage());
25     }
26}
27
28# Creating filter combo boxes
29# Filter form we'll put in html_block
30$status_combo = array_merge(
31     array('-' => ''),
32     dcAdminCombos::getCommentStatusescombo()
33);
34
35
36$type_combo = array(
37'-' => '',
38__('Comment') => 'co',
39__('Trackback') => 'tb'
40);
41
42$sortby_combo = array(
43__('Date') => 'comment_dt',
44__('Entry title') => 'post_title',
45__('Entry date') => 'post_dt',
46__('Author') => 'comment_author',
47__('Status') => 'comment_status'
48);
49
50$order_combo = array(
51__('Descending') => 'desc',
52__('Ascending') => 'asc'
53);
54
55/* Get comments
56-------------------------------------------------------- */
57$author = isset($_GET['author']) ? $_GET['author'] : '';
58$status = isset($_GET['status']) ? $_GET['status'] : '';
59$type   = !empty($_GET['type']) ? $_GET['type'] : '';
60$sortby = !empty($_GET['sortby']) ? $_GET['sortby'] : 'comment_dt';
61$order  = !empty($_GET['order']) ? $_GET['order'] : 'desc';
62$ip     = !empty($_GET['ip']) ? $_GET['ip'] : '';
63$email  = !empty($_GET['email']) ? $_GET['email'] : '';
64$site   = !empty($_GET['site']) ? $_GET['site'] : '';
65
66$with_spam = $author || $status || $type || $sortby != 'comment_dt' || $order != 'desc' || $ip;
67
68$show_filters = false;
69
70$page = !empty($_GET['page']) ? max(1,(integer) $_GET['page']) : 1;
71$nb_per_page =  30;
72
73if (!empty($_GET['nb']) && (integer) $_GET['nb'] > 0) {
74     if ($nb_per_page != $_GET['nb']) {
75          $show_filters = true;
76     }
77     $nb_per_page = (integer) $_GET['nb'];
78}
79
80$params['limit'] = array((($page-1)*$nb_per_page),$nb_per_page);
81$params['no_content'] = true;
82
83# Author filter
84if ($author !== '') {
85     $params['q_author'] = $author;
86     $show_filters = true;
87} else {
88     $author='';
89}
90
91# - Type filter
92if ($type == 'tb' || $type == 'co') {
93     $params['comment_trackback'] = ($type == 'tb');
94     $show_filters = true;
95} else {
96     $type='';
97}
98
99# - Status filter
100if ($status !== '' && in_array($status,$status_combo)) {
101     $params['comment_status'] = $status;
102     $show_filters = true;
103} elseif (!$with_spam) {
104     $params['comment_status_not'] = -2;
105     $status='';
106} else {
107     $status='';
108}
109
110# - IP filter
111if ($ip) {
112     $params['comment_ip'] = $ip;
113     $show_filters = true;
114}
115
116# - email filter
117if ($email) {
118     $params['comment_email'] = $email;
119     $show_filters = true;
120}
121
122# - site filter
123if ($site) {
124     $params['comment_site'] = $site;
125     $show_filters = true;
126}
127
128// Add some sort order if spams displayed
129if ($with_spam || ($status == -2)) {
130     $sortby_combo[__('IP')] = 'comment_ip';
131     $sortby_combo[__('Spam filter')] = 'comment_spam_filter';
132}
133
134# Sortby and order filter
135if ($sortby !== '' && in_array($sortby,$sortby_combo)) {
136     if ($order !== '' && in_array($order,$order_combo)) {
137          $params['order'] = $sortby.' '.$order;
138     } else {
139          $order = 'desc';
140     }
141
142     if ($sortby != 'comment_dt' || $order != 'desc') {
143          $show_filters = true;
144     }
145} else {
146     $sortby = 'comment_dt';
147     $order = 'desc';
148}
149
150# Actions combo box
151$combo_action = array();
152$default = '';
153if ($core->auth->check('delete,contentadmin',$core->blog->id) && $status == -2)
154{
155     $default = 'delete';
156}
157
158$comments_actions_page = new dcCommentsActionsPage($core,$core->adminurl->get("admin.comments"));
159
160if ($comments_actions_page->process()) {
161     return;
162}
163
164/* Get comments
165-------------------------------------------------------- */
166try {
167     $comments = $core->blog->getComments($params);
168     $counter = $core->blog->getComments($params,true);
169     $comment_list = new adminCommentList($core,$comments,$counter->f(0));
170} catch (Exception $e) {
171     $core->error->add($e->getMessage());
172}
173
174/* DISPLAY
175-------------------------------------------------------- */
176
177$form_filter_title = __('Show filters and display options');
178$starting_script  = dcPage::jsLoad('js/_comments.js');
179$starting_script .= dcPage::jsLoad('js/filter-controls.js');
180$starting_script .=
181     '<script type="text/javascript">'."\n".
182     "//<![CDATA["."\n".
183     dcPage::jsVar('dotclear.msg.show_filters', $show_filters ? 'true':'false')."\n".
184     dcPage::jsVar('dotclear.msg.filter_posts_list',$form_filter_title)."\n".
185     dcPage::jsVar('dotclear.msg.cancel_the_filter',__('Cancel filters and display options'))."\n".
186     "//]]>".
187     "</script>";
188
189dcPage::open(__('Comments and trackbacks'),$starting_script,
190     dcPage::breadcrumb(
191          array(
192               html::escapeHTML($core->blog->name) => '',
193               __('Comments and trackbacks') => ''
194          ))
195);
196if (!empty($_GET['upd'])) {
197     dcPage::success(__('Selected comments have been successfully updated.'));
198} elseif (!empty($_GET['del'])) {
199     dcPage::success(__('Selected comments have been successfully deleted.'));
200}
201
202if (!$core->error->flag())
203{
204     if (isset($_SESSION['comments_del_spam'])) {
205          dcPage::message(__('Spam comments have been successfully deleted.'));
206          unset($_SESSION['comments_del_spam']);
207     }
208
209     $spam_count = $core->blog->getComments(array('comment_status'=>-2),true)->f(0);
210     if ($spam_count > 0) {
211
212          echo
213               '<form action="'.$core->adminurl->get("admin.comments").'" method="post" class="fieldset">';
214
215          if (!$with_spam || ($status != -2)) {
216               if ($spam_count == 1) {
217                    echo '<p>'.sprintf(__('You have one spam comment.'),'<strong>'.$spam_count.'</strong>').' '.
218                    '<a href="'.$core->adminurl->get("admin.comments",array('status' => -2)).'">'.__('Show it.').'</a></p>';
219               } elseif ($spam_count > 1) {
220                    echo '<p>'.sprintf(__('You have %s spam comments.'),'<strong>'.$spam_count.'</strong>').' '.
221                    '<a href="'.$core->adminurl->get("admin.comments",array('status' => -2)).'">'.__('Show them.').'</a></p>';
222               }
223          }
224
225          echo
226               '<p>'.
227               $core->formNonce().
228               '<input name="delete_all_spam" class="delete" type="submit" value="'.__('Delete all spams').'" /></p>';
229
230          # --BEHAVIOR-- adminCommentsSpamForm
231          $core->callBehavior('adminCommentsSpamForm',$core);
232
233          echo '</form>';
234     }
235
236     echo
237     '<form action="'.$core->adminurl->get("admin.comments").'" method="get" id="filters-form">'.
238     '<h3 class="hidden">'.__('Filter comments and trackbacks list').'</h3>'.
239     '<div class="table">'.
240
241     '<div class="cell">'.
242     '<h4>'.__('Filters').'</h4>'.
243     '<p><label for="type" class="ib">'.__('Type:').'</label> '.
244     form::combo('type',$type_combo,$type).'</p> '.
245     '<p><label for="status" class="ib">'.__('Status:').'</label> '.
246     form::combo('status',$status_combo,$status).'</p>'.
247     '</div>'.
248
249     '<div class="cell filters-sibling-cell">'.
250     '<p><label for="author" class="ib">'.__('Author:').'</label> '.
251     form::field('author',20,255,html::escapeHTML($author)).'</p>'.
252     '<p><label for="ip" class="ib">'.__('IP address:').'</label> '.
253     form::field('ip',20,39,html::escapeHTML($ip)).'</p>'.
254     '<p><label for="email" class="ib">'.__('Email:').'</label> '.
255     form::field('email',20,255,html::escapeHTML($email)).'</p>'.
256     '<p><label for="site" class="ib">'.__('Web site:').'</label> '.
257     form::field('site',20,255,html::escapeHTML($site)).'</p>'.
258     '</div>'.
259
260     '<div class="cell filters-options">'.
261     '<h4>'.__('Display options').'</h4>'.
262     '<p><label for="sortby" class="ib">'.__('Order by:').'</label> '.
263     form::combo('sortby',$sortby_combo,$sortby).'</p>'.
264     '<p><label for="order" class="ib">'.__('Sort:').'</label> '.
265     form::combo('order',$order_combo,$order).'</p>'.
266     '<p><span class="label ib">'.__('Show').'</span> <label for="nb" class="classic">'.
267     form::field('nb',3,3,$nb_per_page).' '.
268     __('comments per page').'</label></p>'.
269     '</div>'.
270
271     '</div>'.
272     '<p><input type="submit" value="'.__('Apply filters and display options').'" />'.
273     '<br class="clear" /></p>'. //Opera sucks
274     '</form>';
275
276     # Show comments
277     $comment_list->display($page,$nb_per_page,
278     '<form action="'.$core->adminurl->get("admin.comments").'" method="post" id="form-comments">'.
279
280     '%s'.
281
282     '<div class="two-cols">'.
283     '<p class="col checkboxes-helpers"></p>'.
284
285     '<p class="col right"><label for="action" class="classic">'.__('Selected comments action:').'</label> '.
286     form::combo('action',$comments_actions_page->getCombo(),$default,'','','','title="'.__('Actions').'"').
287     $core->formNonce().
288     '<input id="do-action" type="submit" value="'.__('ok').'" /></p>'.
289     form::hidden(array('type'),$type).
290     form::hidden(array('sortby'),$sortby).
291     form::hidden(array('order'),$order).
292     form::hidden(array('author'),html::escapeHTML(preg_replace('/%/','%%',$author))).
293     form::hidden(array('status'),$status).
294     form::hidden(array('ip'),preg_replace('/%/','%%',$ip)).
295     form::hidden(array('page'),$page).
296     form::hidden(array('nb'),$nb_per_page).
297     form::hidden(array('email'),html::escapeHTML(preg_replace('/%/','%%',$email))).
298     form::hidden(array('site'),html::escapeHTML(preg_replace('/%/','%%',$site))).
299     '</div>'.
300
301     '</form>',
302     $show_filters,
303     ($with_spam || ($status == -2))
304     );
305}
306
307dcPage::helpBlock('core_comments');
308dcPage::close();
Note: See TracBrowser for help on using the repository browser.

Sites map