mirror of
https://github.com/e107inc/e107.git
synced 2025-01-17 20:58:30 +01:00
833 lines
21 KiB
PHP
Executable File
833 lines
21 KiB
PHP
Executable File
<?php
|
|
/*
|
|
* e107 website system
|
|
*
|
|
* Copyright (C) 2008-2013 e107 Inc (e107.org)
|
|
* Released under the terms and conditions of the
|
|
* GNU General Public License (http://www.gnu.org/licenses/gpl.txt)
|
|
*
|
|
* PM Plugin - administration
|
|
*
|
|
*/
|
|
|
|
|
|
/**
|
|
* e107 Private messenger plugin
|
|
*
|
|
* @package e107_plugins
|
|
* @subpackage pm
|
|
*/
|
|
|
|
|
|
/*
|
|
TODO:
|
|
1. Limits page needs some lines round the table
|
|
2. Prefs - use new get method
|
|
3. Maintenance page - to be tested
|
|
4. Put prefs into plugin.xml
|
|
5. User option to enable/disable email notification of PMs
|
|
6. Cron-triggered bulk send.
|
|
7. What are implications of 'anyone but' userclasses?
|
|
*/
|
|
|
|
|
|
$retrieve_prefs[] = 'pm_prefs';
|
|
$eplug_admin = TRUE;
|
|
require_once(__DIR__.'/../../class2.php');
|
|
|
|
if (!e107::isInstalled('pm') || !getperms('P'))
|
|
{
|
|
e107::redirect('admin');
|
|
exit;
|
|
}
|
|
|
|
require_once(e_PLUGIN.'pm/pm_class.php');
|
|
//require_once(e_HANDLER.'userclass_class.php'); Should already be loaded
|
|
$mes = e107::getMessage();
|
|
|
|
$action = e_QUERY;
|
|
|
|
require_once(e_ADMIN.'auth.php');
|
|
|
|
if($action == '')
|
|
{
|
|
$action = 'main';
|
|
}
|
|
|
|
|
|
// $pm_prefs = $sysprefs->getArray('pm_prefs');
|
|
$pm_prefs = e107::getPlugPref('pm');
|
|
|
|
|
|
|
|
|
|
//pm_prefs record not found in core table, set to defaults and create record
|
|
/*
|
|
if(!is_array($pm_prefs))
|
|
{
|
|
require_once(e_PLUGIN.'pm/pm_default.php');
|
|
$pm_prefs = pm_set_default_prefs(); // Use the default settings
|
|
$sysprefs->setArray('pm_prefs');
|
|
$emessage->add(ADLAN_PM_3, E_MESSAGE_INFO);
|
|
$e107->admin_log->add('PM_ADM_01', '');
|
|
}
|
|
*/
|
|
|
|
// Couple of bits of BC/upgrade
|
|
/*
|
|
$savePMP = FALSE;
|
|
if (isset($pref['pm_limits']))
|
|
{
|
|
if (!isset($pm_prefs['pm_limits']))
|
|
{
|
|
$pm_prefs['pm_limits'] = $pref['pm_limits'];
|
|
$savePMP = TRUE;
|
|
}
|
|
unset($pref['pm_limits']);
|
|
save_prefs();
|
|
}
|
|
|
|
if (isset($pm_prefs['allow_userclass']))
|
|
{
|
|
if (!isset($pm_prefs['opt_userclass']))
|
|
{
|
|
$pm_prefs['opt_userclass'] = e_UC_NOBODY;
|
|
if ($pm_prefs['allow_userclass'])
|
|
{
|
|
$pm_prefs['opt_userclass'] = e_UC_MEMBERS;
|
|
}
|
|
}
|
|
unset($pm_prefs['allow_userclass']);
|
|
$savePMP = TRUE;
|
|
}
|
|
|
|
if ($savePMP)
|
|
{
|
|
// $sysprefs->setArray('pm_prefs');
|
|
// $emessage->add(ADLAN_PM_80, E_MESSAGE_SUCCESS);
|
|
}
|
|
*/
|
|
|
|
//include_lan(e_PLUGIN.'pm/languages/admin/'.e_LANGUAGE.'.php');
|
|
|
|
if (isset($_POST['update_prefs']))
|
|
{
|
|
$temp = array();
|
|
foreach($_POST as $k => $v)
|
|
{
|
|
if (strpos($k, 'pm_option-') === 0)
|
|
{
|
|
$k = str_replace('pm_option-','',$k);
|
|
$temp[$k] = $v;
|
|
}
|
|
}
|
|
if (e107::getLog()->logArrayDiffs($temp, $pm_prefs, 'PM_ADM_02'))
|
|
{
|
|
// $sysprefs->setArray('pm_prefs');
|
|
//print_a($temp);
|
|
e107::getPlugConfig('pm')->setPref($temp)->save();
|
|
}
|
|
else
|
|
{
|
|
$mes->addInfo(LAN_NO_CHANGE);
|
|
}
|
|
}
|
|
|
|
|
|
// Mantenance options
|
|
if (isset($_POST['pm_maint_execute']))
|
|
{
|
|
$maintOpts = array();
|
|
if (vartrue($_POST['pm_maint_sent']))
|
|
{
|
|
$maintOpts['sent'] = 1;
|
|
}
|
|
if (vartrue($_POST['pm_maint_rec']))
|
|
{
|
|
$maintOpts['rec'] = 1;
|
|
}
|
|
if (vartrue($_POST['pm_maint_blocked']))
|
|
{
|
|
$maintOpts['blocked'] = 1;
|
|
}
|
|
if (vartrue($_POST['pm_maint_expired']))
|
|
{
|
|
$maintOpts['expired'] = 1;
|
|
}
|
|
if (vartrue($_POST['pm_maint_attach']))
|
|
{
|
|
$maintOpts['attach'] = 1;
|
|
}
|
|
$result = doMaint($maintOpts, $pm_prefs);
|
|
if (is_array($result))
|
|
{
|
|
foreach ($result as $k => $ma)
|
|
{
|
|
foreach ($ma as $m)
|
|
{
|
|
$mes->add($m, $k);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
if(isset($_POST['addlimit']))
|
|
{
|
|
$id = intval($_POST['newlimit_class']);
|
|
if($sql->select('generic','gen_id',"gen_type = 'pm_limit' AND gen_datestamp = ".$id))
|
|
{
|
|
$mes->addInfo(ADLAN_PM_5); // 'Limit for selected user class already exists'
|
|
}
|
|
else
|
|
{
|
|
$limArray = array( // Strange field names because we use the 'generic' table. But at least it documents the correlation
|
|
'gen_type' => 'pm_limit',
|
|
'gen_datestamp' => intval($_POST['newlimit_class']),
|
|
'gen_user_id' => intval($_POST['new_inbox_count']),
|
|
'gen_ip' => intval($_POST['new_outbox_count']),
|
|
'gen_intdata' => intval($_POST['new_inbox_size']),
|
|
'gen_chardata' => intval($_POST['new_outbox_size'])
|
|
);
|
|
|
|
if($sql->insert('generic', $limArray))
|
|
{
|
|
e107::getLog()->addArray($limArray)->save('PM_ADM_05');
|
|
$mes->addSuccess(ADLAN_PM_6);
|
|
}
|
|
else
|
|
{
|
|
e107::getLog()->add('PM_ADM_08', '');
|
|
$mes->addError(ADLAN_PM_7);
|
|
}
|
|
}
|
|
}
|
|
|
|
if(isset($_POST['updatelimits']))
|
|
{
|
|
$limitVal = intval($_POST['pm_limits']);
|
|
if($pm_prefs['pm_limits'] != $limitVal)
|
|
{
|
|
$pm_prefs['pm_limits'] = $limitVal;
|
|
//$sysprefs->setArray('pm_prefs');
|
|
$mes->addSuccess(ADLAN_PM_8);
|
|
}
|
|
foreach(array_keys($_POST['inbox_count']) as $id)
|
|
{
|
|
$id = intval($id);
|
|
if($_POST['inbox_count'][$id] == '' && $_POST['outbox_count'][$id] == '' && $_POST['inbox_size'][$id] == '' && $_POST['outbox_size'][$id] == '')
|
|
{
|
|
//All entries empty - Remove record
|
|
if($sql->delete('generic','gen_id = '.$id))
|
|
{
|
|
e107::getLog()->add('PM_ADM_07', 'ID: '.$id);
|
|
$mes->addSuccess($id.ADLAN_PM_9);
|
|
}
|
|
else
|
|
{
|
|
e107::getLog()->add('PM_ADM_10', '');
|
|
$mes->addError($id.ADLAN_PM_10);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$limArray = array( // Strange field names because we use the 'generic' table. But at least it documents the correlation
|
|
'gen_user_id' => intval($_POST['inbox_count'][$id]),
|
|
'gen_ip' => intval($_POST['outbox_count'][$id]),
|
|
'gen_intdata' => intval($_POST['inbox_size'][$id]),
|
|
'gen_chardata' => intval($_POST['outbox_size'][$id])
|
|
);
|
|
if ($sql->update('generic',array('data' => $limArray, 'WHERE' => 'gen_id = '.$id)))
|
|
{
|
|
e107::getLog()->addArray($limArray)->save('PM_ADM_06');
|
|
$mes->addSuccess($id.ADLAN_PM_11);
|
|
}
|
|
else
|
|
{
|
|
e107::getLog()->add('PM_ADM_09', '');
|
|
$mes->addError($id.ADLAN_PM_7);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
$ns->tablerender($caption, $mes->render() . $text);
|
|
|
|
|
|
switch ($action)
|
|
{
|
|
case 'main' :
|
|
$ns->tablerender(ADLAN_PM_12, show_options($pm_prefs));
|
|
break;
|
|
case 'limits' :
|
|
$ns->tablerender(ADLAN_PM_14, show_limits($pm_prefs));
|
|
$ns->tablerender(ADLAN_PM_15, add_limit($pm_prefs));
|
|
break;
|
|
case 'maint' :
|
|
$ns->tablerender(ADLAN_PM_60, renderPMMaint($pm_prefs));
|
|
break;
|
|
}
|
|
|
|
require_once(e_ADMIN.'footer.php');
|
|
|
|
function show_options($pm_prefs)
|
|
{
|
|
$frm = e107::getForm();
|
|
$txt = "
|
|
<fieldset id='plugin-pm-prefs'>
|
|
<form method='post' action='".e_SELF."'>
|
|
<table class='table adminform'>
|
|
<colgroup span='2'>
|
|
<col class='col-label' />
|
|
<col class='col-control' />
|
|
</colgroup>
|
|
<tbody>
|
|
<tr>
|
|
<td>".ADLAN_PM_16."</td>
|
|
<td>".$frm->text('pm_option-title', varset($pm_prefs['title']), '50')."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_23."</td>
|
|
<td>".e107::getUserClass()->uc_dropdown('pm_option-pm_class', varset($pm_prefs['pm_class']), 'member,admin,classes')."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_29."</td>
|
|
<td>".e107::getUserClass()->uc_dropdown('pm_option-sendall_class', varset($pm_prefs['sendall_class']), 'nobody,member,admin,classes')."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_88."</td>
|
|
<td>";
|
|
|
|
$list = e107::getUserClass()->getClassList('nobody,main,admin,member,classes');
|
|
$list['matchclass'] = ADLAN_PM_89;
|
|
|
|
//$txt .= print_a($list,true);
|
|
$txt .= $frm->select('pm_option-send_to_class', $list, varset($pm_prefs['send_to_class'], e_UC_MEMBER));
|
|
|
|
//$text .= ".e107::getUserClass()->uc_dropdown('pm_option-sendall_class', $pm_prefs['sendall_class'], 'nobody,member,admin,classes')."</td>
|
|
|
|
$txt .= "</td>
|
|
</tr>
|
|
|
|
|
|
<tr>
|
|
<td>".ADLAN_PM_17."</td>
|
|
<td>".$frm->radio_switch('pm_option-animate', varset($pm_prefs['animate']), LAN_YES, LAN_NO)."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_18."</td>
|
|
<td>".$frm->radio_switch('pm_option-dropdown', varset($pm_prefs['dropdown']), LAN_YES, LAN_NO)."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_19."</td>
|
|
<td>".$frm->text('pm_option-read_timeout', varset($pm_prefs['read_timeout']), '5', array('class' => 'tbox input-text'))."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_20."</td>
|
|
<td>".$frm->text('pm_option-unread_timeout', varset($pm_prefs['unread_timeout']), '5', array('class' => 'tbox input-text'))."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_21."</td>
|
|
<td>".$frm->radio_switch('pm_option-popup', varset($pm_prefs['popup']), LAN_YES, LAN_NO)."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_22."</td>
|
|
<td class='form-inline'>".$frm->text('pm_option-popup_delay', varset($pm_prefs['popup_delay']), '5', array('class' => 'tbox input-text'))." ".ADLAN_PM_44."</td>
|
|
</tr>
|
|
|
|
<tr>
|
|
<td>".ADLAN_PM_24."</td>
|
|
<td>".$frm->text('pm_option-perpage', varset($pm_prefs['perpage']), '5', array('class' => 'tbox input-text'))."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_25."</td>
|
|
<td>".e107::getUserClass()->uc_dropdown('pm_option-notify_class', varset($pm_prefs['notify_class']), 'nobody,member,admin,classes')."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_26."</td>
|
|
<td>".e107::getUserClass()->uc_dropdown('pm_option-receipt_class', varset($pm_prefs['receipt_class']), 'nobody,member,admin,classes')."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_27."</td>
|
|
<td>".e107::getUserClass()->uc_dropdown('pm_option-attach_class', varset($pm_prefs['attach_class']), 'nobody,member,admin,classes')."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_28."</td>
|
|
<td class='form-inline'>".$frm->text('pm_option-attach_size', varset($pm_prefs['attach_size']), '8', array('class' => 'tbox input-text'))." kB</td>
|
|
</tr>
|
|
|
|
<tr>
|
|
<td>".ADLAN_PM_30."</td>
|
|
<td>".e107::getUserClass()->uc_dropdown('pm_option-multi_class', varset($pm_prefs['multi_class']), 'nobody,member,admin,classes')."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_31."</td>
|
|
<td>".e107::getUserClass()->uc_dropdown('pm_option-opt_userclass', varset($pm_prefs['opt_userclass']), 'nobody,member,admin,classes')."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_81."</td>
|
|
<td class='form-inline'>".$frm->text('pm_option-v', varset($pm_prefs['pm_max_send']), '5', array('class' => 'tbox input-text'))."<span class='field-help'>".ADLAN_PM_82."</span></td>
|
|
</tr>
|
|
</tbody>
|
|
</table>
|
|
<div class='buttons-bar center'>
|
|
".$frm->admin_button('update_prefs','no-value','update', LAN_UPDATE)."
|
|
</div>
|
|
</form>
|
|
</fieldset>
|
|
";
|
|
return $txt;
|
|
}
|
|
|
|
|
|
function show_limits($pm_prefs)
|
|
{
|
|
$sql = e107::getDb();
|
|
$frm = e107::getForm();
|
|
|
|
if (!isset($pm_prefs['pm_limits'])) { $pm_prefs['pm_limits'] = 0; }
|
|
|
|
if($sql->select('generic', "gen_id as limit_id, gen_datestamp as limit_classnum, gen_user_id as inbox_count, gen_ip as outbox_count, gen_intdata as inbox_size, gen_chardata as outbox_size", "gen_type = 'pm_limit'"))
|
|
{
|
|
while($row = $sql->fetch())
|
|
{
|
|
$limitList[$row['limit_classnum']] = $row;
|
|
}
|
|
}
|
|
$txt = "
|
|
<fieldset id='plugin-pm-showlimits'>
|
|
<form method='post' action='".e_SELF.'?'.e_QUERY."'>
|
|
<table class='table adminform'>
|
|
<colgroup>
|
|
<col class='col-label' />
|
|
<col class='col-control' />
|
|
<col class='col-control' />
|
|
</colgroup>
|
|
<thead>
|
|
<tr>
|
|
<th>".LAN_USERCLASS."</th>
|
|
<th>".ADLAN_PM_37."</th>
|
|
<th>".ADLAN_PM_38."</th>
|
|
</tr>
|
|
</thead>
|
|
<tbody>
|
|
<tr>
|
|
<td colspan='3' style='text-align:left'>".ADLAN_PM_45."
|
|
<select name='pm_limits' class='tbox'>
|
|
";
|
|
$sel = ($pm_prefs['pm_limits'] == 0 ? "selected='selected'" : "");
|
|
$txt .= "<option value='0' {$sel}>".ADLAN_PM_33."</option>\n";
|
|
|
|
$sel = ($pm_prefs['pm_limits'] == 1 ? "selected='selected'" : "");
|
|
$txt .= "<option value='1' {$sel}>".ADLAN_PM_34."</option>\n";
|
|
|
|
$sel = ($pm_prefs['pm_limits'] == 2 ? "selected='selected'" : "");
|
|
$txt .= "<option value='2' {$sel}>".ADLAN_PM_35."</option>\n";
|
|
|
|
$txt .= "</select>\n";
|
|
|
|
$txt .= ' '.ADLAN_PM_77."
|
|
</td>
|
|
</tr>
|
|
|
|
";
|
|
|
|
if (isset($limitList))
|
|
{
|
|
foreach($limitList as $row)
|
|
{
|
|
$txt .= "
|
|
<tr>
|
|
<td>".e107::getUserClass()->getName($row['limit_classnum'])."</td>
|
|
<td>
|
|
".LAN_PLUGIN_PM_INBOX.": <input type='text' class='tbox' size='5' name='inbox_count[{$row['limit_id']}]' value='{$row['inbox_count']}' /> <br />
|
|
".LAN_PLUGIN_PM_OUTBOX.": <input type='text' class='tbox' size='5' name='outbox_count[{$row['limit_id']}]' value='{$row['outbox_count']}' />
|
|
</td>
|
|
<td>
|
|
".LAN_PLUGIN_PM_INBOX.": <input type='text' class='tbox' size='5' name='inbox_size[{$row['limit_id']}]' value='{$row['inbox_size']}' /> <br />
|
|
".LAN_PLUGIN_PM_OUTBOX.": <input type='text' class='tbox' size='5' name='outbox_size[{$row['limit_id']}]' value='{$row['outbox_size']}' />
|
|
</td>
|
|
</tr>
|
|
";
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$txt .= "
|
|
<tr>
|
|
<td colspan='3' style='text-align: center'>".ADLAN_PM_41."</td>
|
|
</tr>
|
|
";
|
|
}
|
|
|
|
$txt .= '
|
|
</tbody>
|
|
</table>
|
|
<div class="buttons-bar center">
|
|
'.$frm->admin_button('updatelimits','no-value','update', LAN_UPDATE).'
|
|
</div>
|
|
</form>
|
|
</fieldset>';
|
|
return $txt;
|
|
}
|
|
|
|
|
|
|
|
|
|
function add_limit($pm_prefs)
|
|
{
|
|
$sql = e107::getDb();
|
|
$frm = e107::getForm();
|
|
|
|
if($sql->select('generic', "gen_id as limit_id, gen_datestamp as limit_classnum, gen_user_id as inbox_count, gen_ip as outbox_count, gen_intdata as inbox_size, gen_chardata as outbox_size", "gen_type = 'pm_limit'"))
|
|
{
|
|
while($row = $sql->fetch())
|
|
{
|
|
$limitList[$row['limit_classnum']] = $row;
|
|
}
|
|
}
|
|
$txt = "
|
|
<fieldset id='plugin-pm-addlimit'>
|
|
<form method='post' action='".e_SELF.'?'.e_QUERY."'>
|
|
<table class='table adminform'>
|
|
<colgroup>
|
|
<col class='col-label' />
|
|
<col class='col-control' />
|
|
<col class='col-control' />
|
|
</colgroup>
|
|
<thead>
|
|
<tr>
|
|
<th>".LAN_USERCLASS."</th>
|
|
<th>".ADLAN_PM_37."</th>
|
|
<th>".ADLAN_PM_38."</th>
|
|
</tr>
|
|
</thead>
|
|
<tbody>
|
|
";
|
|
|
|
$txt .= "
|
|
<tr>
|
|
<td>".e107::getUserClass()->uc_dropdown('newlimit_class', 0, 'guest,member,admin,classes')."</td>
|
|
<td>
|
|
".LAN_PLUGIN_PM_INBOX.": <input type='text' class='tbox' size='5' name='new_inbox_count' value='' /> <br />
|
|
".LAN_PLUGIN_PM_OUTBOX.": <input type='text' class='tbox' size='5' name='new_outbox_count' value='' />
|
|
</td>
|
|
<td>
|
|
".LAN_PLUGIN_PM_INBOX.": <input type='text' class='tbox' size='5' name='new_inbox_size' value='' /> <br />
|
|
".LAN_PLUGIN_PM_OUTBOX.": <input type='text' class='tbox' size='5' name='new_outbox_size' value='' />
|
|
</td>
|
|
</tr>
|
|
|
|
";
|
|
|
|
$txt .= '
|
|
</tbody>
|
|
</table>
|
|
<div class="buttons-bar center">
|
|
'.$frm->admin_button('addlimit','no-value','update', LAN_ADD).'
|
|
</div>
|
|
</form>
|
|
</fieldset>';
|
|
return $txt;
|
|
}
|
|
|
|
|
|
function renderPMMaint($pmPrefs)
|
|
{
|
|
$frm = e107::getForm();
|
|
|
|
$txt = "
|
|
<fieldset id='plugin-pm-maint'>
|
|
<legend>".ADLAN_PM_62."</legend>
|
|
<form method='post' action='".e_SELF."?maint'>
|
|
<table class='table adminform'>
|
|
<colgroup>
|
|
<col class='col-label' />
|
|
<col class='col-control' />
|
|
</colgroup>
|
|
<tbody>
|
|
<tr>
|
|
<td>".ADLAN_PM_63."</td>
|
|
<td>".$frm->radio_switch('pm_maint_sent', '', LAN_YES, LAN_NO)."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_64."</td>
|
|
<td>".$frm->radio_switch('pm_maint_rec', '', LAN_YES, LAN_NO)."</td>
|
|
</tr>
|
|
<tr>
|
|
<td>".ADLAN_PM_65."</td>
|
|
<td>".$frm->radio_switch('pm_maint_blocked', '', LAN_YES, LAN_NO)."</td>
|
|
</tr>
|
|
";
|
|
|
|
if ($pmPrefs['read_timeout'] || $pmPrefs['unread_timeout'])
|
|
{
|
|
$txt .= "
|
|
<tr>
|
|
<td>".ADLAN_PM_71."</td>
|
|
<td>".$frm->radio_switch('pm_maint_expired', '', LAN_YES, LAN_NO)."</td>
|
|
</tr>";
|
|
}
|
|
|
|
$txt .= "
|
|
<tr>
|
|
<td>".ADLAN_PM_78."</td>
|
|
<td>".$frm->radio_switch('pm_maint_attach', '', LAN_YES, LAN_NO)."</td>
|
|
</tr>
|
|
</tbody>
|
|
</table>
|
|
<div class='buttons-bar center'>
|
|
".$frm->admin_button('pm_maint_execute','no-value','delete', LAN_GO)."
|
|
</div>
|
|
</form>
|
|
</fieldset>
|
|
";
|
|
return $txt;
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
* Turn the array produced by doMaint for message display into an array of log strings.
|
|
* Data is sorted into time stamp order
|
|
*
|
|
* @param array $results - array of arrays as returned from doMaint()
|
|
* @param array|boolean $extra - optional additional information which is sorted into the main result according to keys - so use low numbers
|
|
* to make the entry appear at the beginning, and text strings to add to the end.
|
|
*/
|
|
function makeLogEntry($results, $extra = FALSE)
|
|
{
|
|
$logPrefixes = array(E_MESSAGE_SUCCESS => 'Pass - ', E_MESSAGE_ERROR => 'Fail - ', E_MESSAGE_INFO => 'Info - ', E_MESSAGE_DEBUG => 'Debug - ');
|
|
$res = array();
|
|
foreach ($results as $k => $ma)
|
|
{
|
|
foreach ($ma as $ts => $m)
|
|
{
|
|
$res[$ts] = $logPrefixes[$k].$m;
|
|
}
|
|
}
|
|
if (is_array($extra))
|
|
{
|
|
$res = array_merge($res, $extra);
|
|
}
|
|
ksort($res); // Sort in ascending order of timestamp
|
|
return $res;
|
|
}
|
|
|
|
|
|
/**
|
|
* Do PM DB maintenance
|
|
* @param array $opts of tasks key = sent|rec|blocked|expired (one or more present). ATM value not used
|
|
* @return array where key is message type (E_MESSAGE_SUCCESS|E_MESSAGE_ERROR|E_MESSAGE_INFO etc), data is array of messages of that type (key = timestamp)
|
|
*/
|
|
function doMaint($opts, $pmPrefs)
|
|
{
|
|
if (!count($opts))
|
|
{
|
|
return array(E_MESSAGE_ERROR => array(ADLAN_PM_66));
|
|
}
|
|
|
|
$results = array(E_MESSAGE_INFO => array(ADLAN_PM_67)); // 'Maintenance started' - primarily for a log entry to mark start time
|
|
$logResults = array();
|
|
$e107 = e107::getInstance();
|
|
$e107->admin_log->add('PM_ADM_04', implode(', ',array_keys($opts)));
|
|
$pmHandler = new private_message($pmPrefs);
|
|
$db2 = new db(); // Will usually need a second DB object to avoid over load
|
|
$start = 0; // Use to ensure we get different log times
|
|
|
|
|
|
if (isset($opts['sent'])) // Want pm_from = deleted user and pm_read_del = 1
|
|
{
|
|
$cnt = 0;
|
|
if ($res = $db2->gen("SELECT pm.pm_id FROM `#private_msg` AS pm LEFT JOIN `#user` AS u ON pm.`pm_from` = `#user`.`user_id`
|
|
WHERE (pm.`pm_read_del = 1) AND `#user`.`user_id` IS NULL"))
|
|
{
|
|
while ($row = $db2->fetch())
|
|
{
|
|
if ($pmHandler->del($row['pm_id']) !== FALSE)
|
|
{
|
|
$cnt++;
|
|
}
|
|
}
|
|
}
|
|
$start = time();
|
|
$results[E_MESSAGE_SUCCESS][$start] = str_replace('[x]', $cnt, ADLAN_PM_74);
|
|
}
|
|
if (isset($opts['rec'])) // Want pm_to = deleted user and pm_sent_del = 1
|
|
{
|
|
$cnt = 0;
|
|
if ($res = $db2->gen("SELECT pm.pm_id FROM `#private_msg` AS pm LEFT JOIN `#user` AS u ON pm.`pm_to` = `#user`.`user_id`
|
|
WHERE (pm.`pm_sent_del = 1) AND `#user`.`user_id` IS NULL"))
|
|
{
|
|
while ($row = $db2->fetch())
|
|
{
|
|
if ($pmHandler->del($row['pm_id']) !== FALSE)
|
|
{
|
|
$cnt++;
|
|
}
|
|
}
|
|
}
|
|
$start = max($start + 1, time());
|
|
$results[E_MESSAGE_SUCCESS][$start] = str_replace('[x]', $cnt, ADLAN_PM_75);
|
|
}
|
|
|
|
|
|
if (isset($opts['blocked']))
|
|
{
|
|
if ($res = $db2->gen("DELETE `#private_msg_block` FROM `#private_msg_block` LEFT JOIN `#user` ON `#private_msg_block`.`pm_block_from` = `#user`.`user_id`
|
|
WHERE `#user`.`user_id` IS NULL"))
|
|
{
|
|
$start = max($start + 1, time());
|
|
$results[E_MESSAGE_ERROR][$start] = str_replace(array('[y]', '[z]'), array($db2->sql->getLastErrorNum, $db2->sql->getLastErrorText), ADLAN_PM_70);
|
|
}
|
|
else
|
|
{
|
|
$start = max($start + 1, time());
|
|
$results[E_MESSAGE_SUCCESS][$start] = str_replace('[x]', $res, ADLAN_PM_69);
|
|
}
|
|
if ($res = $db2->gen("DELETE `#private_msg_block` FROM `#private_msg_block` LEFT JOIN `#user` ON `#private_msg_block`.`pm_block_to` = `#user`.`user_id`
|
|
WHERE `#user`.`user_id` IS NULL"))
|
|
{
|
|
$start = max($start + 1, time());
|
|
$results[E_MESSAGE_ERROR][$start] = str_replace(array('[y]', '[z]'), array($db2->sql->getLastErrorNum, $db2->sql->getLastErrorText), ADLAN_PM_70);
|
|
}
|
|
else
|
|
{
|
|
$start = max($start + 1, time());
|
|
$results[E_MESSAGE_SUCCESS][$start] = str_replace('[x]', $res, ADLAN_PM_68);
|
|
}
|
|
}
|
|
|
|
|
|
if (isset($opts['expired']))
|
|
{
|
|
$del_qry = array();
|
|
$read_timeout = intval($pmPrefs['read_timeout']);
|
|
$unread_timeout = intval($pmPrefs['unread_timeout']);
|
|
if($read_timeout > 0)
|
|
{
|
|
$timeout = time()-($read_timeout * 86400);
|
|
$del_qry[] = "(pm_sent < {$timeout} AND pm_read > 0)";
|
|
}
|
|
if($unread_timeout > 0)
|
|
{
|
|
$timeout = time()-($unread_timeout * 86400);
|
|
$del_qry[] = "(pm_sent < {$timeout} AND pm_read = 0)";
|
|
}
|
|
if(count($del_qry) > 0)
|
|
{
|
|
$qry = implode(' OR ', $del_qry);
|
|
$cnt = 0;
|
|
if($db2->select('private_msg', 'pm_id', $qry))
|
|
{
|
|
while ($row = $db2->fetch())
|
|
{
|
|
if ($pmHandler->del($row['pm_id']) !== FALSE)
|
|
{
|
|
$cnt++;
|
|
}
|
|
}
|
|
}
|
|
$start = max($start + 1, time());
|
|
$results[E_MESSAGE_SUCCESS][$start] = str_replace('[x]', $cnt, ADLAN_PM_73);
|
|
}
|
|
else
|
|
{
|
|
$start = max($start + 1, time());
|
|
$results[E_MESSAGE_ERROR][$start] = ADLAN_PM_72;
|
|
}
|
|
}
|
|
|
|
|
|
if (isset($opts['attach']))
|
|
{ // Check for orphaned and missing attachments
|
|
require_once(e_HANDLER.'file_class.php');
|
|
$fl = new e_file();
|
|
$missing = array();
|
|
$orphans = array();
|
|
$fileArray = $fl->get_files(e_PLUGIN.'pm/attachments');
|
|
if ($db2->select('private_msg', 'pm_id, pm_attachments', "pm_attachments != ''"))
|
|
{
|
|
while ($row = $db2->fetch())
|
|
{
|
|
$attachList = explode(chr(0), $row['pm_attachments']);
|
|
foreach ($attachList as $a)
|
|
{
|
|
$found = FALSE;
|
|
foreach ($fileArray as $k => $fd)
|
|
{
|
|
if ($fd['fname'] == $a)
|
|
{
|
|
$found = TRUE;
|
|
unset($fileArray[$k]);
|
|
break;
|
|
}
|
|
}
|
|
if (!$found)
|
|
{
|
|
$missing[] = $row['pm_id'].':'.$a;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
// Any files left in $fileArray now are unused
|
|
if (count($fileArray))
|
|
{
|
|
foreach ($fileArray as $k => $fd)
|
|
{
|
|
unlink($fd['path'].$fd['fname']);
|
|
$orphans[] = $fd['fname'];
|
|
}
|
|
}
|
|
$attachMessage = str_replace(array('[x]', '[y]'), array(count($orphans), count($missing)), ADLAN_PM_79);
|
|
if (TRUE)
|
|
{ // Mostly for testing - probably disable this
|
|
if (count($orphans))
|
|
{
|
|
$attachMessage .= '[!br!]Orphans:[!br!]'.implode('[!br!]', $orphans);
|
|
}
|
|
if (count($missing))
|
|
{
|
|
$attachMessage .= '[!br!]Missing:[!br!]'.implode('[!br!]', $missing);
|
|
}
|
|
}
|
|
$start = max($start + 1, time());
|
|
$results[E_MESSAGE_SUCCESS][$start] = $attachMessage;
|
|
}
|
|
|
|
e107::getLog()->addArray(makeLogEntry($results))->save('PM_ADM_03');
|
|
|
|
foreach ($results as $k => $r)
|
|
{
|
|
foreach ($r as $sk => $s)
|
|
{
|
|
$results[$k][$sk] = str_replace('[!br!]','<br />',$s);
|
|
}
|
|
}
|
|
return $results;
|
|
}
|
|
|
|
|
|
|
|
|
|
function pm_conf_adminmenu()
|
|
{
|
|
global $action;
|
|
|
|
if ($action == '') { $action = 'main'; }
|
|
|
|
$var['main']['text'] = ADLAN_PM_54;
|
|
$var['main']['link'] = e_SELF;
|
|
|
|
$var['limits']['text'] = ADLAN_PM_55;
|
|
$var['limits']['link'] = e_SELF.'?limits';
|
|
|
|
$var['maint']['text'] = ADLAN_PM_59;
|
|
$var['maint']['link'] = e_SELF.'?maint';
|
|
|
|
show_admin_menu(ADLAN_PM_12, $action, $var);
|
|
}
|
|
|
|
|