$discussid));
discuss_list($message);
}
//-------------------------------------------------------------
function short_preview($message)
{
$message = strip_tags($message);
$offset = min(150, strlen($message));
if (strpos($message, ' ', $offset) !== false)
{
$maxpos = strpos($message,' ',$offset);
$message = substr($message, 0, $maxpos).'…';
}
return $message;
}
//-------------------------------------------------------------
function discuss_list($message = '')
{
global $comment_list_pageby;
pagetop(gTxt('list_discussions'), $message);
echo graf(
''.gTxt('list_banned_ips').''
, ' style="text-align: center;"');
extract(gpsa(array('sort', 'dir', 'page', 'crit', 'search_method')));
$dir = ($dir == 'asc') ? 'asc' : 'desc';
switch ($sort)
{
case 'id':
$sort_sql = 'discussid '.$dir;
break;
case 'ip':
$sort_sql = 'ip '.$dir;
break;
case 'name':
$sort_sql = 'name '.$dir;
break;
case 'email':
$sort_sql = 'email '.$dir;
break;
case 'website':
$sort_sql = 'web '.$dir;
break;
case 'message':
$sort_sql = 'message '.$dir;
break;
case 'status':
$sort_sql = 'visible '.$dir;
break;
case 'parent':
$sort_sql = 'parentid '.$dir;
break;
default:
$sort = 'date';
$sort_sql = 'txp_discuss.posted '.$dir;
break;
}
if ($sort != 'date') $sort_sql .= ', txp_discuss.posted asc';
$switch_dir = ($dir == 'desc') ? 'asc' : 'desc';
$criteria = 1;
if ($search_method and $crit)
{
$crit_escaped = doSlash($crit);
$critsql = array(
'id' => "discussid = '$crit_escaped'",
'parent' => "parentid = '$crit_escaped'".(intval($crit_escaped) ? '' : " OR title like '%$crit_escaped%'"),
'name' => "name like '%$crit_escaped%'",
'message' => "message like '%$crit_escaped%'",
'email' => "email like '%$crit_escaped%'",
'website' => "web like '%$crit_escaped%'",
'ip' => "ip like '%$crit_escaped%'",
);
if (array_key_exists($search_method, $critsql))
{
$criteria = $critsql[$search_method];
$limit = 500;
}
else
{
$search_method = '';
$crit = '';
}
}
else
{
$search_method = '';
$crit = '';
}
$counts = getRows(
'SELECT visible, COUNT(*) AS c'.
' FROM '.safe_pfx_j('txp_discuss').' LEFT JOIN '.safe_pfx_j('textpattern').' ON txp_discuss.parentid = textpattern.ID'.
' WHERE '. $criteria.' GROUP BY visible'
);
$count[SPAM] = $count[MODERATE] = $count[VISIBLE] = 0;
if ($counts) foreach($counts as $c)
{
$count[$c['visible']] = $c['c'];
}
// grand total comment count
$total = $count[SPAM] + $count[MODERATE] + $count[VISIBLE];
if ($total < 1)
{
if ($criteria != 1)
{
echo n.discuss_search_form($crit, $search_method).
n.graf(gTxt('no_results_found'), ' class="indicator"');
}
else
{
echo graf(gTxt('no_comments_recorded'), ' class="indicator"');
}
return;
}
// paging through displayed comments
$total = ((cs('toggle_show_spam')) ? $count[SPAM] : 0) + $count[MODERATE] + $count[VISIBLE];
$limit = max($comment_list_pageby, 15);
list($page, $offset, $numPages) = pager($total, $limit, $page);
echo discuss_search_form($crit, $search_method);
$spamq = cs('toggle_show_spam') ? '1=1' : 'visible != '.intval(SPAM);
$rs = safe_query(
'SELECT txp_discuss.*, unix_timestamp(txp_discuss.posted) as uPosted, ID as thisid, Section as section, url_title, Title as title, Status, unix_timestamp(textpattern.Posted) as posted'.
' FROM '.safe_pfx_j('txp_discuss').' LEFT JOIN '.safe_pfx_j('textpattern').' ON txp_discuss.parentid = textpattern.ID'.
' WHERE '.$spamq.' AND '.$criteria.
' ORDER BY '.$sort_sql.
' LIMIT '.$offset.', '.$limit
);
if ($rs)
{
echo n.n.''.
n.cookie_box('show_spam').
nav_form('discuss', $page, $numPages, $sort, $dir, $crit, $search_method).
pageby_form('discuss', $comment_list_pageby);
}
}
//-------------------------------------------------------------
function discuss_search_form($crit, $method)
{
$methods = array(
'id' => gTxt('ID'),
'parent' => gTxt('parent'),
'name' => gTxt('name'),
'message' => gTxt('message'),
'email' => gTxt('email'),
'website' => gTxt('website'),
'ip' => gTxt('IP')
);
return search_form('discuss', 'list', $crit, $methods, $method, 'message');
}
//-------------------------------------------------------------
function discuss_edit()
{
pagetop(gTxt('edit_comment'));
extract(gpsa(array('discussid', 'sort', 'dir', 'page', 'crit', 'search_method')));
$discussid = assert_int($discussid);
$rs = safe_row('*, unix_timestamp(posted) as uPosted', 'txp_discuss', "discussid = $discussid");
if ($rs)
{
extract($rs);
$message = htmlspecialchars($message);
if (fetch('ip', 'txp_discuss_ipban', 'ip', $ip))
{
$ban_step = 'ipban_unban';
$ban_text = gTxt('unban');
}
else
{
$ban_step = 'ipban_add';
$ban_text = gTxt('ban');
}
$ban_link = '['.$ban_text.']';
echo form(
startTable('edit').
stackRows(
fLabelCell('name').
fInputCell('name', $name),
fLabelCell('IP').
td("$ip $ban_link"),
fLabelCell('email').
fInputCell('email', $email),
fLabelCell('website').
fInputCell('web', $web),
fLabelCell('date').
td(
safe_strftime('%d %b %Y %X', $uPosted)
),
tda(gTxt('message')).
td(
''
),
fLabelCell('status').
td(
selectInput('visible', array(
VISIBLE => gTxt('visible'),
SPAM => gTxt('spam'),
MODERATE => gTxt('unmoderated')
), $visible, false)
),
td().td(fInput('submit', 'step', gTxt('save'), 'publish')),
hInput('sort', $sort).
hInput('dir', $dir).
hInput('page', $page).
hInput('crit', $crit).
hInput('search_method', $search_method).
hInput('discussid', $discussid).
hInput('parentid', $parentid).
hInput('ip', $ip).
eInput('discuss').
sInput('discuss_save')
).
endTable()
);
}
else
{
echo graf(gTxt('comment_not_found'),' class="indicator"');
}
}
// -------------------------------------------------------------
function ipban_add()
{
extract(gpsa(array('ip', 'name', 'discussid')));
$discussid = assert_int($discussid);
if (!$ip)
{
return ipban_list(gTxt('cant_ban_blank_ip'));
}
$ban_exists = fetch('ip', 'txp_discuss_ipban', 'ip', $ip);
if ($ban_exists)
{
$message = gTxt('ip_already_banned', array('{ip}' => $ip));
return ipban_list($message);
}
$rs = safe_insert('txp_discuss_ipban', "
ip = '".doSlash($ip)."',
name_used = '".doSlash($name)."',
banned_on_message = $discussid,
date_banned = now()
");
// hide all messages from that IP also
if ($rs)
{
safe_update('txp_discuss', "visible = ".SPAM, "ip = '".doSlash($ip)."'");
$message = gTxt('ip_banned', array('{ip}' => $ip));
return ipban_list($message);
}
ipban_list();
}
// -------------------------------------------------------------
function ipban_unban()
{
$ip = doSlash(gps('ip'));
$rs = safe_delete('txp_discuss_ipban', "ip = '$ip'");
if ($rs)
{
$message = gTxt('ip_ban_removed', array('{ip}' => $ip));
ipban_list($message);
}
}
// -------------------------------------------------------------
function ipban_list($message = '')
{
pageTop(gTxt('list_banned_ips'), $message);
$rs = safe_rows_start('*, unix_timestamp(date_banned) as uBanned', 'txp_discuss_ipban',
"1 = 1 order by date_banned desc");
if ($rs and numRows($rs) > 0)
{
echo startTable('list').
tr(
hCell(gTxt('date_banned')).
hCell(gTxt('IP')).
hCell(gTxt('name_used')).
hCell(gTxt('banned_for')).
hCell()
);
while ($a = nextRow($rs))
{
extract($a);
echo tr(
td(
safe_strftime('%d %b %Y %I:%M %p', $uBanned)
, 100).
td(
$ip
, 100).
td(
$name_used
, 100).
td(
''.
$banned_on_message.''
, 100).
td(
''.gTxt('unban').''
)
);
}
echo endTable();
}
else
{
echo graf(gTxt('no_ips_banned'),' class="indicator"');
}
}
// -------------------------------------------------------------
function discuss_change_pageby()
{
event_change_pageby('comment');
discuss_list();
}
// -------------------------------------------------------------
function discuss_multiedit_form($page, $sort, $dir, $crit, $search_method)
{
$methods = array(
'visible' => gTxt('show'),
'unmoderated' => gTxt('hide_unmoderated'),
'spam' => gTxt('hide_spam'),
'ban' => gTxt('ban_author'),
'delete' => gTxt('delete'),
);
return event_multiedit_form('discuss', $methods, $page, $sort, $dir, $crit, $search_method);
}
// -------------------------------------------------------------
function discuss_multi_edit()
{
//FIXME, this method needs some refactoring
$selected = ps('selected');
$method = ps('edit_method');
$done = array();
if ($selected and is_array($selected))
{
// Get all articles for which we have to update the count
foreach($selected as $id)
$ids[] = assert_int($id);
$parentids = safe_column("DISTINCT parentid","txp_discuss","discussid IN (".implode(',',$ids).")");
$rs = safe_rows_start('*', 'txp_discuss', "discussid IN (".implode(',',$ids).")");
while ($row = nextRow($rs)) {
extract($row);
$id = assert_int($discussid);
$parentids[] = $parentid;
if ($method == 'delete') {
// Delete and if succesful update commnet count
if (safe_delete('txp_discuss', "discussid = $id"))
$done[] = $id;
}
elseif ($method == 'ban') {
// Ban the IP and hide all messages by that IP
if (!safe_field('ip', 'txp_discuss_ipban', "ip='".doSlash($ip)."'")) {
safe_insert("txp_discuss_ipban",
"ip = '".doSlash($ip)."',
name_used = '".doSlash($name)."',
banned_on_message = $id,
date_banned = now()
");
safe_update('txp_discuss',
"visible = ".SPAM,
"ip='".doSlash($ip)."'"
);
}
$done[] = $id;
}
elseif ($method == 'spam') {
if (safe_update('txp_discuss',
"visible = ".SPAM,
"discussid = $id"
))
$done[] = $id;
}
elseif ($method == 'unmoderated') {
if (safe_update('txp_discuss',
"visible = ".MODERATE,
"discussid = $id"
))
$done[] = $id;
}
elseif ($method == 'visible') {
if (safe_update('txp_discuss',
"visible = ".VISIBLE,
"discussid = $id"
))
$done[] = $id;
}
}
$done = join(', ', $done);
if ($done)
{
// might as well clean up all comment counts while we're here.
clean_comment_counts($parentids);
$messages = array(
'delete' => gTxt('comments_deleted', array('{list}' => $done)),
'ban' => gTxt('ips_banned', array('{list}' => $done)),
'spam' => gTxt('comments_marked_spam', array('{list}' => $done)),
'unmoderated' => gTxt('comments_marked_unmoderated', array('{list}' => $done)),
'visible' => gTxt('comments_marked_visible', array('{list}' => $done))
);
update_lastmod();
return discuss_list($messages[$method]);
}
}
return discuss_list();
}
?>