function updateList($listId, $listUpdated, $status, $new)
{
$erro = new xerr(__FILE__, __FUNCTION__, __CLASS__);
$total = 0;
@set_time_limit(0);
if ($listUpdated->list_type != '7' and $listUpdated->delay_min > $listUpdated->delay_max) {
$listUpdated->delay_min = $listUpdated->delay_max;
}
$erro->ck = lists::updateListData($listUpdated);
if (!$erro->Eck(__LINE__, '8304')) {
return false;
} else {
if ($listUpdated->auto_add == 2) {
subscribers::updateSubscribers(true);
$subscribers = subscribers::getSubscribers(-1, -1, '', $total, 0, '', 1, 1, '');
$subId = acajoom::convertObjectToIdList($subscribers, 'id');
if (!empty($subId)) {
$erro->ck = queue::updateQueues($subId, '', $listId, $listUpdated->acc_id, $new);
if (!$erro->Eck(__LINE__, '8305')) {
return false;
}
}
} elseif ($status == '' and $listUpdated->list_type == 2) {
$queues = queue::getAllOneList($listId);
$qid = acajoom::convertObjectToIdList($queues, 'qid');
$erro->ck = queue::updatePublished($qid, $status);
if (!$erro->Eck(__LINE__, '8306')) {
return false;
}
} else {
if (class_exists('auto')) {
auto::updateListNb($listUpdated->list_type, $listUpdated->id);
}
}
}
lisType::updateNewsletters();
return true;
}
/**
* @copyright Copyright (C) 2009 Joobi Limited All rights reserved.
* @license This file is released under the GPL license (http://www.gnu.org/licenses )
* @link http://www.ijoobi.com
*/
function subscribers($action, $task, $userid, $listId, $cid)
{
$erro = new xerr(__FILE__, __FUNCTION__);
if (ACA_CMSTYPE) {
// joomla 15
$subscriberId = intval(JRequest::getVar('subscriber_id', ''));
$message = JRequest::getVar('message', '');
} else {
//joomla 1x
$subscriberId = intval(mosGetParam($_REQUEST, 'subscriber_id', ''));
$message = mosGetParam($_REQUEST, 'message', '');
}
//endif
$doShowSubscribers = true;
subscribers::updateSubscribers();
switch ($task) {
case 'updateOneSub':
$doShowSubscribers = true;
$message = acajoom::printYN(subscribers::updateOneSubscriber(), _ACA_UPDATED_SUCCESSFULLY, _ACA_ERROR);
backHTML::_header(_ACA_MENU_SUBSCRIBERS, 'addusers.png', $message, $task, $action);
break;
case 'deleteOneSub':
$doShowSubscribers = true;
$message = acajoom::printYN(subscribers::deleteOneSubscriber($subscriberId), _ACA_SUBSCRIBER_DELETED, _ACA_ERROR);
backHTML::_header(_ACA_MENU_SUBSCRIBERS, 'addusers.png', $message, $task, $action);
break;
case 'cancelSub':
$doShowSubscribers = true;
backHTML::_header(_ACA_MENU_SUBSCRIBERS, 'addusers.png', $message, $task, $action);
break;
case 'edit':
foreach ($cid as $id) {
compa::redirect('index2.php?option=com_acajoom&act=subscribers&task=show&userid=' . $id);
}
break;
case 'show':
$doShowSubscribers = false;
$qid[0] = $userid;
$subscriber = subscribers::getSubscribersFromId($qid, false);
$lists = lists::getLists(0, 0, 1, '', false, false);
$queues = queue::getSubscriberLists($userid);
$forms['main'] = " <form action='index2.php' method='post' name='adminForm'> \n";
backHTML::_header(_ACA_MENU_SUBSCRIBERS, 'addusers.png', $message, $task, $action);
backHTML::formStart('', 0, '');
echo subscribersHTML::editSubscriber($subscriber, $lists, $queues, $forms, acajoom::checkPermissions('admin'), false, false);
$go[] = acajoom::makeObj('act', $action);
$go[] = acajoom::makeObj('subscriber_id', $subscriber->id);
$go[] = acajoom::makeObj('user_id', $subscriber->user_id);
backHTML::formEnd($go);
break;
case 'new':
case 'add':
$doShowSubscribers = false;
$newSubscriber->id = '';
$newSubscriber->user_id = 0;
$newSubscriber->name = '';
$newSubscriber->email = '';
$newSubscriber->receive_html = 1;
$newSubscriber->confirmed = 1;
$newSubscriber->blacklist = 0;
$newSubscriber->timezone = '00:00:00';
$newSubscriber->language_iso = 'eng';
$newSubscriber->params = '';
$newSubscriber->subscribe_date = acajoom::getNow();
$lists = lists::getLists(0, 0, 1, '', false, false);
$queues = '';
$forms['main'] = " <form action='index2.php' method='post' name='adminForm'> \n";
backHTML::_header(_ACA_MENU_SUBSCRIBERS, 'addusers.png', $message, $task, $action);
backHTML::formStart('', 0, '');
echo subscribersHTML::editSubscriber($newSubscriber, $lists, $queues, $forms, acajoom::checkPermissions('admin'), false, false);
$go[] = acajoom::makeObj('act', $action);
$go[] = acajoom::makeObj('subscriber_id', $newSubscriber->id);
$go[] = acajoom::makeObj('user_id', $newSubscriber->user_id);
backHTML::formEnd($go);
break;
case 'doNew':
$doShowSubscribers = true;
$message = acajoom::printYN(subscribers::insertOneSubscriber(), _ACA_UPDATED_SUCCESSFULLY, _ACA_ERROR);
backHTML::_header(_ACA_MENU_SUBSCRIBERS, 'addusers.png', $message, $task, $action);
break;
case 'delete':
if (!is_array($cid) || count($cid) < 1) {
echo "<script> alert('Select an item to delete'); window.history.go(-1);</script>\n";
return false;
} else {
$status = true;
foreach ($cid as $id) {
$erro->ck = subscribers::deleteOneSubscriber($id);
if (!$erro->ck) {
$status = false;
}
}
$message = acajoom::printYN($status, _ACA_SUBSCRIBER_DELETED, _ACA_ERROR);
backHTML::_header(_ACA_MENU_SUBSCRIBERS, 'addusers.png', $message, $task, $action);
}
break;
case 'update':
if (!is_array($cid) || count($cid) < 1) {
echo "<script> alert('Select an item to update'); window.history.go(-1);</script>\n";
return false;
} else {
foreach ($cid as $id) {
if (ACA_CMSTYPE) {
// joomla 15
$changes = JRequest::getVar($id, array(0));
} else {
//joomla 1x
$changes = mosGetParam($_REQUEST, $id, array(0));
}
//endif
if (!isset($changes['receive_html'])) {
$changes['receive_html'] = 0;
}
if (!isset($changes['confirmed'])) {
$changes['confirmed'] = 0;
}
}
}
$message = acajoom::print_message(_ACA_UPDATED_SUCCESSFULLY, 1);
break;
case 'export':
$doShowSubscribers = false;
subscribersHTML::export($action, $listId);
break;
case 'doExport':
$message = acajoom::printYN(subscribers::export($listId), _EXPORT, _ACA_ERROR);
backHTML::_header(_ACA_MENU_SUBSCRIBERS, 'addusers.png', $message, $task, $action);
break;
case 'import':
$doShowSubscribers = false;
$lists = lists::getLists(0, 0, 1, 'listnameA', false, false, true);
subscribersHTML::import($action, $lists);
break;
case 'doImport':
$message = acajoom::printYN(subscribers::import($listId), _ACA_IMPORT_FINISHED, _ACA_ERROR);
backHTML::_header(_ACA_MENU_SUBSCRIBERS, 'addusers.png', $message, $task, $action);
break;
break;
case 'subscribeAll':
break;
case 'unsubscribeAll':
break;
case 'cancel':
if ($listId != 0) {
$listId = 0;
} else {
compa::redirect('index2.php?option=com_acajoom');
}
backHTML::_header(_ACA_MENU_SUBSCRIBERS, 'addusers.png', $message, $task, $action);
break;
case 'cpanel':
backHTML::controlPanel();
$doShowSubscribers = 0;
break;
default:
backHTML::_header(_ACA_MENU_SUBSCRIBERS, 'addusers.png', $message, $task, $action);
break;
}
if ($doShowSubscribers) {
if (ACA_CMSTYPE) {
// joomla 15
$start = intval(JRequest::getVar('start', 0));
$conf =& JFactory::getConfig();
$mail->Mailer = $conf->getValue('config.mailer');
// $GLOBALS['mosConfig_mailer'];
$limit = intval(JRequest::getVar('limit', $conf->getValue('config.list_limit')));
$emailsearch = JRequest::getVar('emailsearch', '');
} else {
//joomla 1x
$mail->Mailer = $GLOBALS['mosConfig_mailer'];
$start = intval(mosGetParam($_REQUEST, 'start', 0));
$limit = intval(mosGetParam($_REQUEST, 'limit', $GLOBALS['mosConfig_list_limit']));
$emailsearch = mosGetParam($_REQUEST, 'emailsearch', '');
}
//endif
$total = 0;
$subscribers = subscribers::getSubscribers($start, $limit, $emailsearch, $total, $listId, '', '', '', 'sub_dateD');
if ($listId != 0) {
$showAdmin = true;
} else {
$showAdmin = false;
}
$dropDownList = lisType::getListsDropList(0, '', '');
if (ACA_CMSTYPE) {
// joomla 15
$lists['listid'] = JHTML::_('select.genericlist', $dropDownList, 'listid', 'class="inputbox" size="1" onchange="document.AcajoomFilterForm.submit();"', 'id', 'list_name', $listId);
} else {
//joomla 1x
$lists['listid'] = mosHTML::selectList($dropDownList, 'listid', 'class="inputbox" size="1" onchange="document.AcajoomFilterForm.submit();"', 'id', 'list_name', $listId);
}
//endif
$forms['main'] = " <form action='index2.php' method='post' name='adminForm'> \n";
$forms['select'] = " <form action='index2.php' method='post' name='AcajoomFilterForm'> \n";
backHTML::formStart('show_mailing', 0, '');
subscribersHTML::showSubscribers($subscribers, $action, $listId, $lists, $start, $limit, $total, $showAdmin, $listId, $emailsearch, $forms);
}
return true;
}
function saveMailing(&$mailingId, $listId)
{
global $database;
$list = lists::getOneList($listId);
$allow_html = compa::allow_html();
$erro = new xerr(__FILE__, __FUNCTION__, __CLASS__);
$xf = new xonfig();
$listType = mosGetParam($_REQUEST, 'listype', 0);
$senddate = mosGetParam($_REQUEST, 'senddate', '0000-00-00 00:00:00');
if (mosGetParam($_REQUEST, 'task', '') == 'saveSend') {
$senddate = acajoom::getNow();
}
$subject = mosGetParam($_REQUEST, 'subject', '', $allow_html);
$content = mosGetParam($_REQUEST, 'content', '', $allow_html);
$alt_content = mosGetParam($_REQUEST, 'alt_content', '', _MOS_ALLOWRAW);
$published = mosGetParam($_REQUEST, 'published', 0);
$visible = mosGetParam($_REQUEST, 'visible', 1);
$html = mosGetParam($_REQUEST, 'html', 1);
$new_list = mosGetParam($_REQUEST, 'new_list', 0);
$fromname = mosGetParam($_REQUEST, 'fromname', '');
$fromemail = mosGetParam($_REQUEST, 'fromemail', '');
$frombounce = mosGetParam($_REQUEST, 'frombounce', '');
$userid = mosGetParam($_REQUEST, 'userid', 0);
$delay = mosGetParam($_REQUEST, 'delay', 1);
$acc_level = mosGetParam($_REQUEST, 'acc_level', $list->acc_id);
$issue_nb = mosGetParam($_REQUEST, 'issue_nb', 1);
$delay = $delay * 24 * 60;
$attachments = mosGetParam($_REQUEST, 'attachments', '');
$attach = '';
if (!empty($attachments)) {
foreach ($attachments as $attachment) {
$attach .= $attachment . "\n";
}
}
if (!empty($_FILES['file_0']['name'])) {
$otherAttachs = xmailing::uploadFiles();
if (!empty($otherAttachs)) {
foreach ($otherAttachs as $otherAttach) {
$attach .= '/' . $otherAttach . "\n";
}
}
}
$images = mosGetParam($_REQUEST, 'images', '');
if ($html == 0) {
$alt_content = $content;
}
if ($senddate != '0000-00-00 00:00:00' and $senddate > acajoom::getNow()) {
$published = 2;
}
if ($new_list != 0) {
$query = 'INSERT INTO `#__acajoom_mailings` (`list_id`, `list_type`, `send_date`, `subject`, `htmlcontent`, `textonly`, `attachments`, `images`, `published`, `html`, `visible`, `fromname`, `fromemail`, `frombounce`, `author_id`, `delay`, `issue_nb` , `acc_level` , `createdate`) VALUES( \'' . $listId . '\', \'' . $listType . '\', \'' . $senddate . '\', \'' . addslashes($subject) . '\', \'' . addslashes($content) . '\', \'' . addslashes($alt_content) . '\', \'' . $attach . '\', \'' . $images . '\', \'' . $published . '\', \'' . $html . '\', \'' . $visible . '\', \'' . $fromname . '\', \'' . $fromemail . '\', \'' . $frombounce . '\', \'' . $userid . '\', \'' . $delay . '\', \'' . $issue_nb . '\', \'' . $acc_level . '\' , \'' . acajoom::getNow() . '\' ) ';
$database->setQuery($query);
$database->query();
$erro->err = $database->getErrorMsg();
$query = 'SELECT max(id) FROM `#__acajoom_mailings` WHERE `list_id` = ' . $listId . ' AND `issue_nb` = \'' . $issue_nb . '\'';
$query .= ' AND `published` != -1 ';
$database->setQuery($query);
$mailingId = $database->loadResult();
$erro->err .= $database->getErrorMsg();
if ($mailingId == 1) {
$xf->update('firstmailing', $listType);
}
$xf->plus('totalmailing0', 1);
$xf->plus('act_totalmailing0', 1);
$xf->plus('totalmailing' . $listType, 1);
$xf->plus('act_totalmailing' . $listType, 1);
xmailing::insertStatsGlobal($mailingId);
} else {
$query = "UPDATE `#__acajoom_mailings` SET " . "\t`subject` = '" . addslashes($subject) . "', " . "\t`htmlcontent` = '" . addslashes($content) . "', " . "\t`textonly` = '" . addslashes($alt_content) . "', " . "\t`attachments` = '{$attach}', " . "\t`images` = '{$images}', " . "\t`published` = '{$published}', " . "\t`html` = {$html} , " . "\t`visible` = {$visible} , " . "\t`fromname` = '{$fromname}', " . "\t`fromemail` = '{$fromemail}', " . "\t`frombounce` = '{$frombounce}', " . "\t`author_id` = '{$userid}' , " . "\t`delay` = {$delay} , " . "\t`acc_level` = {$acc_level} , " . "\t`send_date` = '{$senddate}' " . "\tWHERE `id` = {$mailingId} ";
$database->setQuery($query);
$database->query();
$erro->err = $database->getErrorMsg();
}
if (!$erro->E(__LINE__, '8414', $database)) {
return false;
} else {
lisType::updateNewsletters();
if ($listType == 2) {
if ($new_list) {
$subscribers = subscribers::getSubscribers(-1, -1, '', $total, $listId, '', 1, 1, '');
} else {
$subscribers = subscribers::getSubscribers(-1, -1, '', $total, $listId, $mailingId, 1, 1, '');
}
$subsId = acajoom::convertObjectToIdList($subscribers, 'id');
if (!empty($subsId)) {
$queues = queue::getAllOneList($listId);
if (!empty($queues)) {
if ($queues[0]->mailing_id == 0) {
$qids = acajoom::convertObjectToIdList($queues, 'qid');
$erro->ck = queue::updateQueues('', $qids, $listId, $acc_level, false);
} else {
$erro->ck = queue::updateQueues($subsId, '', $listId, $acc_level, false);
}
} else {
return true;
}
if (!$erro->Eck(__LINE__, '8415')) {
return false;
}
}
} elseif ($listType == 1 and $senddate > acajoom::getNow()) {
$subscribers = subscribers::getSubscribers(-1, -1, '', $total, $listId, '', 1, 1, '');
$subsId = acajoom::convertObjectToIdList($subscribers, 'id');
if (!empty($subsId)) {
if ($new_list == 1) {
if (class_exists('auto')) {
$erro->ck = auto::insertQueuesForScheduledNews($subsId, $listId, $acc_level, $mailingId, $senddate);
}
} else {
$queues = queue::getQueueFromMailingId($mailingId);
if (!empty($queues)) {
$erro->ck = queue::updateQueueData('', $subsId, 1, $listId, $mailingId, $issue_nb, $senddate, 0, $acc_level, 2);
return $erro->Eck(__LINE__, '8417', 'put here 1 $d');
} else {
if (class_exists('auto')) {
$erro->ck = auto::insertQueuesForScheduledNews($subsId, $listId, $acc_level, $mailingId, $senddate);
}
}
}
return $erro->Eck(__LINE__, '8416', 'put here 2 $d');
}
}
return true;
}
}
/**
* @copyright Copyright (C) 2009 Joobi Limited All rights reserved.
* @license This file is released under the GPL license (http://www.gnu.org/licenses )
* @link http://www.ijoobi.com
*/
function mailing($action, $task, $listId, $listType, $mailingId, $message)
{
$showMailings = false;
switch ($task) {
case 'edit':
if (ACA_CMSTYPE) {
// joomla 15
$issue_nb = intval(JRequest::getVar('issue_nb', 1));
} else {
//joomla 1x
$issue_nb = intval(mosGetParam($_REQUEST, 'issue_nb', 1));
}
//endif
$list = lists::getOneList($listId);
$mailing = xmailing::getOneMailing($list, $mailingId, $issue_nb, $new);
$show = lisType::showType($mailing->list_type, 'editmailing');
if ($mailing->published != 1 or $mailing->list_type != 1 or isset($show['admin']) and $show['admin']) {
$forms['main'] = " <form action='index2.php' method='post' enctype='multipart/form-data' name='adminForm'> \n ";
xmailing::_header($task, $action, $mailing->list_type, $message, 'edit');
mailingsHTML::editMailing($mailing, $new, $listId, $forms, $show);
$go[] = acajoom::makeObj('act', $action);
backHTML::formEnd($go);
} else {
$forms['main'] = " <form action='index2.php' method='post' name='adminForm'> \n\r";
xmailing::_header($task, $action, $mailing->list_type, $message);
//backHTML::formStart();
mailingsHTML::viewMailing($mailing, $forms);
$go[] = acajoom::makeObj('act', 'mailing');
$go[] = acajoom::makeObj('task', 'viewmailing');
$go[] = acajoom::makeObj('listid', $mailing->list_id);
backHTML::formEnd($go);
}
break;
case 'new':
case 'add':
if ($listId == 0) {
echo "<script> alert('" . addslashes(_ACA_SELCT_MAILING) . "'); window.history.go(-1);</script>\n";
return false;
} else {
$total = xmailing::countMailings($listId, '');
$total++;
compa::redirect('index2.php?option=com_acajoom&act=mailing&task=edit&mailingid=0&issue_nb=' . $total . '&listid=' . $listId);
}
break;
case 'saveSend':
xmailing::saveMailing($mailingId, $listId);
case 'sendNewsletter':
if ($listId < 1 or $listType < 0) {
$mailing = xmailing::getOneMailing('', $mailingId, '', $new, true);
$listId = $mailing->list_id;
$listType = $mailing->list_type;
}
if (lisType::sendType($listType)) {
$checkStatus = lists::checkStatus($listId);
if ($checkStatus == false) {
$message = acajoom::printYN(0, _ACA_MESSAGE_SENT_SUCCESSFULLY, _ACA_NOT_PUBLISHED);
$showMailings = true;
} else {
$receivers = subscribers::getSubscribers(-1, -1, '', $total, $listId, '', 1, 1, 'sub_emailA');
if (empty($receivers)) {
$message = acajoom::printYN(0, _ACA_MESSAGE_SENT_SUCCESSFULLY, _ACA_NO_SUSCRIBERS);
$showMailings = true;
} else {
$status = queue::sendNewsletter(true, $mailingId, $listId, $receivers, $message);
$message = acajoom::printYN($status, _ACA_MESSAGE_SENT_SUCCESSFULLY, $message);
$showMailings = true;
flush();
sleep(5);
compa::redirect('index2.php?option=com_acajoom&act=mailing&listype=' . $listType, $message);
}
}
} else {
if (class_exists('auto')) {
$message = acajoom::printYN(auto::processQueue(true), _ACA_QUEUE_SENT_SUCCESS, _ACA_ERROR);
}
$showMailings = true;
}
break;
case 'savePreview':
xmailing::saveMailing($mailingId, $listId);
case 'preview':
if (ACA_CMSTYPE) {
// joomla 15
$emailaddress = JRequest::getVar('emailaddress', '');
} else {
//joomla 1x
$emailaddress = mosGetParam($_REQUEST, 'emailaddress', '');
}
//endif
if (!empty($emailaddress)) {
$status = xmailing::preview($mailingId, $listId, $message);
$message = acajoom::printYN($status, _ACA_MESSAGE_SENT_SUCCESSFULLY, $message);
}
backHTML::_header(_ACA_PREVIEW_TITLE, 'preview_f2.png', $message, $task, $action);
mailingsHTML::previewMailingHTML($mailingId, $listId, $listType);
if ($listId > 0) {
$archivemailing = xmailing::getMailingView($mailingId, $listId);
} else {
$archivemailing = xmailing::getMailingView($mailingId);
}
$forms['main'] = '';
$list = lists::getOneList($archivemailing->list_id);
$textonly = '';
acajoom_mail::getContent($archivemailing->images, $list->layout, $archivemailing->htmlcontent, $textonly);
acajoom_mail::replaceClass($archivemailing->htmlcontent, $textonly);
mailingsHTML::viewMailing($archivemailing, $forms);
break;
case 'view':
if ($mailingId != 0) {
if ($listId > 0) {
$archivemailing = xmailing::getMailingView($mailingId, $listId);
} else {
$archivemailing = xmailing::getMailingView($mailingId);
}
$forms['main'] = " <form action='index2.php' method='post' name='adminForm'> \n\r";
xmailing::_header($task, $action, $listType, $message);
backHTML::formStart('', 0, '');
mailingsHTML::viewMailing($archivemailing, $forms);
$go[] = acajoom::makeObj('act', 'mailing');
$go[] = acajoom::makeObj('task', 'viewmailing');
$go[] = acajoom::makeObj('listid', $archivemailing->list_id);
backHTML::formEnd($go);
}
break;
case 'deleteMailing':
$d['mailing'] = xmailing::getOneMailing('', $mailingId, '', $new);
$message = acajoom::printYN(xmailing::delete($d), @constant($GLOBALS[ACA . 'listname' . $d['mailing']->list_type]) . _ACA_SUCCESS_DELETED, _ACA_ERROR);
$showMailings = true;
break;
case 'cancel':
compa::redirect('index2.php?option=com_acajoom');
break;
case 'copy':
$message = acajoom::printYN(xmailing::copyMailing($mailingId), _ACA_MAILING_COPY, _ACA_ERROR);
$showMailings = true;
break;
case 'cancelMailing':
$showMailings = true;
break;
case 'publishMailing':
$mailing = xmailing::getOneMailing('', $mailingId, '', $new);
$message = acajoom::printYN(xmailing::publishMailing($mailingId), @constant($GLOBALS[ACA . 'listname' . $mailing->list_type]) . ' ' . _ACA_PUBLISHED, _ACA_ERROR);
$showMailings = true;
break;
case 'unpublishMailing':
$mailing = xmailing::getOneMailing('', $mailingId, '', $new);
$message = acajoom::printYN(xmailing::unpublishMailing($mailingId), @constant($GLOBALS[ACA . 'listname' . $mailing->list_type]) . ' ' . _ACA_UNPUBLISHED, _ACA_ERROR);
$showMailings = true;
break;
case 'cpanel':
backHTML::controlPanel();
break;
case 'save':
$message = acajoom::printYN(xmailing::saveMailing($mailingId, $listId), _ACA_MAILING_SAVED, _ACA_ERROR);
$showMailings = true;
unset($GLOBALS["task"]);
unset($_REQUEST["task"]);
break;
case 'show':
default:
$showMailings = true;
break;
}
if ($showMailings) {
xmailing::showMailings($task, $action, $listId, $listType, $message, true, _ACA_MENU_MAILING);
}
return true;
}
function controlPanel()
{
//hack for JOomla 13 ADRIEN
unset($GLOBALS["task"]);
unset($_REQUEST["task"]);
?>
<link rel="stylesheet" href="components/com_acajoom/cssadmin/acajoom.css" type="text/css" >
<div align="center" class="centermain">
<div id="acajoom">
<table class="acajoomcss">
<tr>
<td width="58%" valign="top">
<?php
echo backHTML::iconsPanel();
?>
</td>
<td width="42%" valign="top">
<div style="width=100%;">
<form action="index2.php" method="post" name="adminForm">
<?php
$tabs = new mosTabs(1);
$tabs->startPane('acaControlPanel');
$tabs->startTab(_ACA_MENU_TAB_SUM, "acaControlPanel.Summary");
?>
<table class="acajoom_stats" style="text-align: left; width: 100%; " cellpadding="2" cellspacing="0">
<tbody>
<tr>
<th style="text-align: center;"><?php
echo '#';
?>
</th>
<th style="text-align: center;"><?php
echo _ACA_MENU_TAB_LIST;
?>
</th>
<th style="text-align: center;"><?php
echo _ACA_MENU_MAILING_TITLE;
?>
</th>
<th style="text-align: center;"><?php
echo _ACA_SENT_MAILING;
?>
</th>
<th style="text-align: center;"><?php
echo _ACA_DESC_SUBSCRIBERS;
?>
</th>
</tr>
<?php
$html = '';
$totalist = 0;
$totalmail = 0;
$totalsub = 0;
$totalsent = 0;
$nb = explode(',', $GLOBALS[ACA . 'activelist']);
$size = sizeof($nb);
for ($i = 0; $i < $size; $i++) {
$index = $nb[$i];
if ($GLOBALS[ACA . 'listshow' . $index] > 0 and $GLOBALS[ACA . 'listype' . $index] == 1) {
$html .= '<tr>';
$html .= '<td><b>' . @constant($GLOBALS[ACA . 'listnames' . $index]) . '</b></td>';
$html .= '<td style="text-align: center; ">' . $GLOBALS[ACA . 'act_totallist' . $index] . ' </td>';
$html .= '<td style="text-align: center; ">' . $GLOBALS[ACA . 'act_totalmailing' . $index] . ' </td>';
$html .= '<td style="text-align: center; ">' . $GLOBALS[ACA . 'totalmailingsent' . $index] . ' </td>';
$html .= '<td style="text-align: center; ">' . $GLOBALS[ACA . 'act_totalsubcribers' . $index] . ' </td>';
$html .= '</tr>';
$totalist = $totalist + $GLOBALS[ACA . 'act_totallist' . $index];
$totalmail = $totalmail + $GLOBALS[ACA . 'act_totalmailing' . $index];
$totalsent = $totalsent + $GLOBALS[ACA . 'totalmailingsent' . $index];
if ($GLOBALS[ACA . 'act_totalsubcribers' . $index] < $totalsub) {
$totalsub = $GLOBALS[ACA . 'act_totalsubcribers' . $index];
}
}
}
$html .= '<tr>';
$html .= '<td><b>' . _ACA_CP_TOTAL . '</b></td>';
$html .= '<td style="text-align: center; ">' . $totalist . ' </td>';
$html .= '<td style="text-align: center; ">' . $totalmail . ' </td>';
$html .= '<td style="text-align: center; ">' . $totalsent . ' </td>';
$html .= '<td style="text-align: center; ">' . $totalsub . ' </td>';
$html .= '</tr>';
echo $html;
?>
</tbody></table>
<br />
<?php
if (class_exists('auto')) {
echo auto::showQueue();
}
$tabs->endTab();
$tabs->startTab(_ACA_MENU_SUBSCRIBERS, "acaControlPanel.Subscribers");
$emailsearch = '';
$listId = 0;
$start = mosGetParam($_REQUEST, 'start', 0);
$limit = mosGetParam($_REQUEST, 'limit', 15);
$order = mosGetParam($_REQUEST, 'order', 'date');
$total = 0;
$subscribers = subscribers::getSubscribers($start, $limit, $emailsearch, $total, $listId, '', 1, 1, 'sub_dateD');
mosCommonHTML::loadOverlib();
?>
<script type="text/javascript">
function checkcid(myField) {
myField.checked = true;
isChecked(true);
}
</script>
<!-- <div id="overDiv" style="position:absolute; visibility:hidden; z-index:10000;"></div> -->
<form action="index2.php" method="post" name="adminForm">
<input type="hidden" name="option" value="com_acajoom" />
<input type="hidden" name="act" value="acajoom" />
<input type="hidden" name="task" value="" />
<input type="hidden" name="userid" value="" />
<input type="hidden" name="boxchecked" value="0" />
<input type="hidden" name="listid" value="<?php
echo $listId;
?>
" />
<input type="hidden" name="start" value="<?php
echo $start;
?>
" />
<input type="hidden" name="limit" value="<?php
echo $limit;
?>
" />
<input type="hidden" name="emailsearch" value="<?php
echo $emailsearch;
?>
" />
<table width="100%" border="0" cellspacing="0" cellpadding="4" class="adminlist">
<tr>
<th class="title">#</th>
<th class="title" style="text-align: left;"><?php
echo _ACA_INPUT_NAME;
?>
</th>
<th class="title" style="text-align: left;"><?php
echo _ACA_INPUT_EMAIL;
?>
</th>
<th class="title" style="text-align: center;"><?php
echo _ACA_SIGNUP_DATE;
?>
</th>
</tr>
<?php
$i = 0;
foreach ($subscribers as $subscriber) {
?>
<tr class="row<?php
echo $i++ % 2;
?>
">
<td><?php
echo $i + $start;
?>
</td>
<td style="text-align: left;">
<a href="index2.php?option=com_acajoom&act=subscribers&task=show&userid=<?php
echo $subscriber->id;
?>
" >
<?php
echo $subscriber->name;
?>
</a></td>
<td style="text-align: left;"><?php
echo $subscriber->email;
?>
</td>
<td style="text-align: center;"><?php
echo mosFormatDate($subscriber->subscribe_date, '%x');
?>
</td>
</tr>
<?php
}
?>
</table>
</form>
<?php
backHTML::footerCounts($start, $limit, $emailsearch, $total, 4, '', $listId, '');
$tabs->endTab();
$tabs->startTab(_ACA_MENU_TAB_LIST, "acaControlPanel.Lists");
$lists = lists::getLists(0, 0, 1, '', false, false, false);
?>
<table class="adminlist">
<tr>
<th class="title">#</th>
<th class="title" width="65%" style="text-align: left;"><?php
echo _ACA_LIST_NAME;
?>
</th>
<th class="title" width="25%" style="text-align: left;"><?php
echo _ACA_LIST_TYPE;
?>
</th>
<th class="title" style="text-align: center;">#id</th>
</tr>
<?php
$i = 0;
foreach ($lists as $list) {
$i++;
$link = 'index2.php?option=com_acajoom&act=mailing&task=show&listid=' . $list->id;
?>
<tr>
<td><?php
echo $i;
?>
</td>
<td style="text-align: left;">
<a href="<?php
echo $link;
?>
">
<?php
echo $list->list_name;
?>
</a>
</td>
<td style="text-align: left;"><a href='index2.php?option=com_acajoom&act=mailing&listype=<?php
echo $list->list_type;
?>
'><?php
echo @constant($GLOBALS[ACA . 'listname' . $list->list_type]);
?>
</a></td>
<td style="text-align: center;"><?php
echo $list->id;
?>
</td>
</tr>
<?php
}
?>
<tr>
<th colspan="4">
</th>
</tr>
</table>
<?php
$tabs->endTab();
$tabs->endPane();
?>
</form>
</div>
<div style="clear:both; float:left;">
<?php
echo acajoom::printM('blue', _ACA_SERVER_LOCAL_TIME . ' :' . mosFormatDate(acajoom::getNow(), '%A, %d %B %Y %H:%M', 0));
?>
</div>
<td>
</tr>
</table>
</div>
</div>
<?php
}
function upgrade_News3()
{
global $my, $database;
$xf = new xonfig();
$newLists = array();
$idImportedList = array();
$i = 0;
$database->setQuery("SELECT * FROM #__newsletter_letters");
$newsletters = $database->loadObjectList();
$error = $database->getErrorMsg();
if (!empty($error)) {
echo '<p><b>Error (class.upgrade.php->upgrade_News3 () line ' . __LINE__ . '):</b> Error getting newsletters. Database error: <br />' . $error . '</p>';
return false;
} else {
foreach ($newsletters as $newsletter) {
$list->list_name = $newsletter->list_name;
$list->list_desc = $newsletter->list_desc;
$list->sendername = $newsletter->sendername;
$list->senderemail = $newsletter->senderemail;
$list->bounceadres = $newsletter->bounceadres;
$list->layout = $newsletter->layout;
$list->template = 0;
$list->subscribemessage = $newsletter->subscribemessage;
$list->unsubscribemessage = $newsletter->unsubscribemessage;
$list->html = $newsletter->html;
$list->hidden = !$newsletter->hidden;
$list->unsubscribesend = 1;
$list->list_type = '1';
$list->auto_add = 0;
$list->user_choose = 0;
$list->cat_id = 0;
$list->delay_min = 0;
$list->delay_max = 0;
$list->follow_up = 0;
$list->owner = $my->id;
$list->auto_add = 0;
$list->acc_level = $newsletter->aid;
$list->acc_id = 29;
$list->published = 1;
$list->createdate = acajoom::getNow();
$list->footer = 1;
$list->notify_id = 0;
$list->notification = 0;
$query = 'INSERT INTO `#__acajoom_lists` (`list_name`) VALUES (\'' . $list->list_name . '\' )';
$database->setQuery($query);
$database->query();
$error = $database->getErrorMsg();
if (!empty($error)) {
echo '<p><b>Error (class.upgrade.php->upgrade_News3() line ' . __LINE__ . '):</b> Error adding list to database. Database error: <br />' . $error . '</p><br /><br />Are you trying to insert a list name which is already in use? The list name has to be different for each list! <br /><br />';
} else {
$query = 'SELECT * FROM `#__acajoom_lists` WHERE `list_name`= \'' . $list->list_name . '\'';
$database->setQuery($query);
$database->loadObject($mynewlist);
$error = $database->getErrorMsg();
$xf->plus('totallist0', 1);
$xf->plus('act_totallist0', 1);
$xf->plus('totallist1', 1);
$xf->plus('act_totallist1', 1);
if (!empty($error)) {
echo '<p><b>Error (class.upgrade.php->upgrade_News3() line ' . __LINE__ . '):</b> Error getting listname. Database error: <br />' . $error . '</p>';
return false;
} else {
$idImportedList[$newsletter->id] = $mynewlist->id;
$newLists[$i] = $mynewlist->id;
$i++;
$list->id = $mynewlist->id;
$error = lists::updateListData($list);
if (!$error) {
echo '<p><b>Error (class.upgrade.php->upgrade_News3 () line ' . __LINE__ . '):</b> Error inserting list. Database error: <br />' . $error . '</p>';
} else {
echo '<br /><b>' . @constant($GLOBALS[ACA . 'listnames1']) . ': </b>' . $list->list_name . ': ' . acajoom::printM('green', _ACA_IMPORT_SUCCESS);
$database->setQuery("SELECT * FROM #__newsletter_mailing WHERE `list_id`=" . $newsletter->id);
$mailingsImports = $database->loadObjectList();
$error = $database->getErrorMsg();
if (!empty($error)) {
echo '<p><b>Error (class.upgrade.php->upgrade_News3() line ' . __LINE__ . '):</b> Error getting mailings. Database error: <br />' . $error . '</p>';
return false;
} else {
$issue_nb = 1;
foreach ($mailingsImports as $mailingsImport) {
$mailings->list_id = $mynewlist->id;
$mailings->list_type = '1';
$mailings->send_date = $mailingsImport->send_date;
$mailings->subject = $mailingsImport->subject;
$mailings->htmlcontent = $mailingsImport->htmlcontent;
$mailings->textonly = $mailingsImport->textonly;
$mailings->attachments = $mailingsImport->attachments;
$mailings->images = $mailingsImport->images;
$mailings->published = $mailingsImport->published;
$mailings->visible = $mailingsImport->visible;
$mailings->html = $mynewlist->html;
$mailings->fromname = $list->sendername;
$mailings->fromemail = $list->senderemail;
$mailings->frombounce = $list->bounceadres;
$mailings->author_id = $my->id;
$mailings->delay = 0;
$mailings->issue_nb = $issue_nb;
$mailings->acc_level = 25;
$mailings->createdate = $list->createdate;
$issue_nb++;
$error = xmailing::insertMailingData($mailings);
if (!$error) {
echo '<p><b>Error (class.upgrade.php->upgrade_News3() line ' . __LINE__ . '):</b> Error inserting mailing. Database error: <br />' . $error . '</p>';
} else {
echo '<br /><b>' . _ACA_MENU_MAILING_TITLE . ': </b>' . $mailingsImport->subject . ': ' . acajoom::printM('green', _ACA_IMPORT_SUCCESS);
}
}
}
}
}
}
}
$database->setQuery("SELECT * FROM #__newsletter_subscribers");
$subscribers = $database->loadObjectList();
$error = $database->getErrorMsg();
if (!empty($error)) {
echo '<p><b>Error (class.upgrade.php->upgrade_News3() line ' . __LINE__ . '):</b> Error getting subscribers. Database error: <br />' . $error . '</p>';
return false;
} else {
foreach ($subscribers as $subscriber) {
$newSubs = true;
$acajoomsubscribers = subscribers::getSubscribers(-1, -1, '', $total, 0, '', '', '', '');
foreach ($acajoomsubscribers as $acajoomsubscriber) {
if ($subscriber->subscriber_email == $acajoomsubscriber->email) {
$newSubs = false;
$subId[0] = $acajoomsubscriber->id;
}
}
if ($newSubs) {
$newSubscriber->user_id = $subscriber->userid;
$newSubscriber->name = $subscriber->subscriber_name;
$newSubscriber->email = $subscriber->subscriber_email;
$newSubscriber->receive_html = $subscriber->receive_html;
$newSubscriber->confirmed = $subscriber->confirmed;
$newSubscriber->subscribe_date = $subscriber->subscribe_date;
$newSubscriber->blacklist = 0;
$newSubscriber->timezone = '00:00:00';
$newSubscriber->language_iso = 'eng';
$newSubscriber->params = '';
$error = subscribers::insertSubscriber($newSubscriber, $subscriberId);
if (!empty($error)) {
if ($subscriberId < 1) {
echo ' Error inserting subscriber:' . $newSubscriber->name;
}
$error = '';
$subId[0] = $subscriberId;
} else {
echo '<br /><b>' . _ACA_MENU_SUBSCRIBERS . ': </b>' . $newSubscriber->name . ': ' . acajoom::printM('green', _ACA_IMPORT_SUCCESS);
$d['email'] = $subscriber->email;
$erro->ck = subscribers::getSubscriberIdFromEmail($d);
$erro->Eck(__LINE__, '8304');
$subId[0] = $d['subscriberId'];
}
} else {
echo '<br /><b>' . _ACA_MENU_SUBSCRIBERS . ': </b>' . $subscriber->subscriber_name . ': ' . acajoom::printM('red', _ACA_IMPORT_EXIST);
}
$j = 0;
$queue = queue::suscriptionExist($subId[0], $idImportedList[$subscriber->list_id]);
if (empty($queue)) {
$error = queue::insertQueuesForNews($subId, $idImportedList[$subscriber->list_id], 29);
if (!$error) {
echo '<p><b>Error (class.upgrade.php->upgrade_News3 () line ' . __LINE__ . '):</b> Error inserting queue. Database error: <br />' . $error . '</p>';
}
}
}
}
}
return true;
}
function updateQueues($subId, $qids, $listId, $acc_level, $new)
{
if (ACA_CMSTYPE) {
$database =& JFactory::getDBO();
} else {
global $database;
}
//endif
$erro = new xerr(__FILE__, __FUNCTION__, __CLASS__);
$list = lists::getOneList($listId);
if ($list->list_type == 1) {
if ($new) {
if (!empty($subId)) {
$erro->ck = queue::insertQueuesForNews($subId, $listId, $acc_level);
$erro->Eck(__LINE__, '8504');
} else {
if (!empty($qids)) {
$qid = implode(',', $qids);
$query = 'SELECT `subscriber_id` FROM `#__acajoom_queue` WHERE `qid` IN ( ' . $qid . ' ) ';
$database->setQuery($query);
$subIds = $database->loadObjectList();
$erro->err = $database->getErrorMsg();
}
foreach ($subIds as $v) {
$subId[] = $v->subscriber_id;
}
$erro->ck = queue::insertQueuesForNews($subId, $listId, $acc_level);
$erro->E(__LINE__, '8505');
}
} else {
if (!empty($subId)) {
$erro->ck = queue::updateQueueData('', $subId, 0, $listId, 0, 0, 0, 0, $acc_level, 0);
$erro->Eck(__LINE__, '8506');
} elseif (!empty($qids)) {
$erro->ck = queue::updateQueueData($qids, '', 0, $listId, 0, 0, 0, 0, $acc_level, 0);
$erro->Eck(__LINE__, '8507');
}
}
} elseif ($list->list_type == 7) {
$newQueue->list_id = $list->id;
$newQueue->mailing_id = 0;
$newQueue->issue_nb = 0;
$newQueue->send_date = 0;
$newQueue->delay = 0;
$newQueue->acc_level = $acc_level;
$newQueue->published = $list->published;
$erro->ck = autonews::insertQueuesForAutoNews($subId, $newQueue);
$erro->Eck(__LINE__, '8508');
} else {
if ($new) {
if (!empty($subId)) {
$mailingId = 0;
$mailing = queue::getValidMailing($list, $mailingId);
if (!empty($mailing)) {
if (class_exists('auto')) {
if ($mailing->list_type == 2) {
$newQueue->list_id = $mailing->list_id;
$newQueue->mailing_id = $mailing->id;
$newQueue->issue_nb = $mailing->issue_nb;
$newQueue->send_date = acajoom::getNow($mailing->delay);
$newQueue->delay = $mailing->delay;
$newQueue->acc_level = $acc_level;
$newQueue->published = $list->published;
$erro->ck = auto::insertQueuesForAuto($subId, $newQueue);
$erro->Eck(__LINE__, '8508');
} else {
$erro->ck = queue::insertQueuesForNews($subId, $mailing->list_id, $acc_level);
$erro->Eck(__LINE__, '8509');
}
}
} else {
if (class_exists('auto')) {
$newQueue->list_id = $list->id;
$newQueue->mailing_id = 0;
$newQueue->issue_nb = 0;
$newQueue->send_date = 0;
$newQueue->delay = 0;
$newQueue->acc_level = $acc_level;
$newQueue->published = $list->published;
$erro->ck = auto::insertQueuesForAuto($subId, $newQueue);
$erro->Eck(__LINE__, '8510');
}
}
} elseif (!empty($qids)) {
//On r�cup�re le premier mail du follow up
$mailingId = xmailing::getFirstMailingId($listId);
if (!empty($mailingId)) {
$mailing = queue::getValidMailing($list, $mailingId);
if (!empty($mailing)) {
if ($mailing->list_type == 2) {
//$subscribers = subscribers::getSubscribers( -1 , -1 , '' , $total , $listId, '', 1, 1,'' );
//$subId = acajoom::convertObjectToIdList($subscribers , 'id');
if (!empty($subId)) {
$erro->ck = queue::updateQueueData('', $subId, $mailing->list_type, $listId, $mailing->id, $mailing->issue_nb, 0, $mailing->delay, 0, 1);
$erro->Eck(__LINE__, '8511');
} else {
$erro->ck = queue::updateQueueData($qids, '', $mailing->list_type, $listId, $mailing->id, $mailing->issue_nb, 0, $mailing->delay, 0, 1);
$erro->Eck(__LINE__, '8511');
}
} else {
$subscribers = subscribers::getSubscribers(-1, -1, '', $total, $listId, '', 1, 1, '');
$subId = acajoom::convertObjectToIdList($subscribers, 'id');
$erro->ck = queue::insertQueuesForNews($subId, $mailing->list_id, $acc_level);
$erro->Eck(__LINE__, '8512');
}
}
}
}
} else {
if (!empty($subId)) {
$mailing = queue::getValidMailing($list, 0);
if (!empty($mailing)) {
$erro->ck = queue::updateQueueData('', $subId, $list->list_type, $listId, '', '', 0, '', 0, $list->published);
} else {
$erro->ck = queue::updateQueueData('', $subId, $mailing->list_type, $mailing->list_id, $mailing->id, $mailing->issue_nb, acajoom::getNow(), $mailing->delay, $acc_level, $mailing->published);
}
$erro->E(__LINE__, '8513');
} elseif (!empty($qids)) {
$mailing = queue::getValidMailing($list, 0);
if (!empty($mailing)) {
if ($mailing->list_type == 2) {
$erro->ck = queue::updateQueueData($qids, '', $list->list_type, $listId, $mailing->id, $mailing->issue_nb, acajoom::getNow(), $mailing->delay, 0, 1);
$erro->E(__LINE__, '8514');
} else {
$subId = acajoom::convertObjectToIdList($qids, 'subscriber_id');
$erro->ck = queue::deleteQueues($qids);
$erro->Eck(__LINE__, '8515');
$erro->ck = queue::insertQueuesForNews($subId, $mailing->list_id, $acc_level);
$erro->Eck(__LINE__, '8516');
}
}
}
}
}
return $erro->R();
}
function export($listId)
{
$doShowSubscribers = false;
@set_time_limit(0);
if (ereg('Opera(/| )([0-9].[0-9]{1,2})', $HTTP_USER_AGENT)) {
$UserBrowser = 'Opera';
} elseif (ereg('MSIE ([0-9].[0-9]{1,2})', $HTTP_USER_AGENT)) {
$UserBrowser = 'IE';
} else {
$UserBrowser = '';
}
$mime_type = $UserBrowser == 'IE' || $UserBrowser == 'Opera' ? 'application/octetstream' : 'application/octet-stream';
$filename = "subscribers_list_" . $listId . "_" . date("Y.d.m");
ob_end_clean();
ob_start();
$subscribers = subscribers::getSubscribers(-1, -1, '', $total, $listId, '', 1, 1, 'name');
$export = 'Name,Email,ReceiveHTML,Registered' . "\r\n";
foreach ($subscribers as $subscriber) {
if (get_magic_quotes_runtime()) {
$subscriber->name = stripslashes($subscriber->name);
$subscriber->email = stripslashes($subscriber->email);
}
$export .= $subscriber->name . '';
$export .= ',' . $subscriber->email . '';
$export .= ',' . $subscriber->receive_html . '';
if ($subscriber->user_id == 0) {
$export .= ',0' . "\r\n";
} else {
$export .= ',1' . "\r\n";
}
}
header('Content-Type: ' . $mime_type);
header('Expires: ' . gmdate('D, d M Y H:i:s') . ' GMT');
if ($UserBrowser == 'IE') {
header('Content-Disposition: inline; filename="' . $filename . '.csv"');
header('Cache-Control: must-revalidate, post-check=0, pre-check=0');
header('Pragma: public');
} else {
header('Content-Disposition: attachment; filename="' . $filename . '.csv"');
header('Pragma: no-cache');
}
print $export;
exit;
return true;
}
