You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
148 lines
5.3 KiB
148 lines
5.3 KiB
<?php
|
|
|
|
/**
|
|
* @package tikiwiki
|
|
*/
|
|
|
|
// (c) Copyright by authors of the Tiki Wiki CMS Groupware Project
|
|
//
|
|
// All Rights Reserved. See copyright.txt for details and a complete list of authors.
|
|
// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
|
|
// $Id$
|
|
$section = 'newsletters';
|
|
require_once('tiki-setup.php');
|
|
global $nllib;
|
|
include_once('lib/newsletters/nllib.php');
|
|
$access->check_feature('feature_newsletters');
|
|
if (! isset($_REQUEST["unsubscribe"])) {
|
|
$access->check_permission('tiki_p_list_newsletters');
|
|
}
|
|
|
|
$auto_query_args = ['nlId', 'offset', 'sort_mode', 'find'];
|
|
//TODO: memorize the charset for each subscription
|
|
if (isset($_REQUEST["confirm_subscription"])) {
|
|
$conf = $nllib->confirm_subscription($_REQUEST["confirm_subscription"]);
|
|
if ($conf) {
|
|
Feedback::success(
|
|
tr(
|
|
'Subscription confirmed for newsletter %0 (%1)',
|
|
htmlspecialchars($conf['name']),
|
|
htmlspecialchars($conf['description'])
|
|
)
|
|
);
|
|
$smarty->assign('nl_info', $conf);
|
|
} else {
|
|
Feedback::error(tr('Subscription request failed'));
|
|
}
|
|
}
|
|
if (isset($_REQUEST["unsubscribe"])) {
|
|
$conf = $nllib->unsubscribe($_REQUEST["unsubscribe"]);
|
|
if ($conf) {
|
|
Feedback::success(
|
|
tr(
|
|
'You have been unsubscribed from newsletter %0',
|
|
htmlspecialchars($conf['name'])
|
|
)
|
|
);
|
|
$smarty->assign('nl_info', $conf);
|
|
} else {
|
|
Feedback::error(tr('Your request to unsubscribe failed'));
|
|
}
|
|
}
|
|
if (
|
|
! $user && $tiki_p_subscribe_newsletters != 'y' && ! isset($_REQUEST["confirm_subscription"])
|
|
&& ! isset($_REQUEST["unsubscribe"])
|
|
) {
|
|
Feedback::errorPage(tr('You must be logged in to subscribe to newsletters'));
|
|
}
|
|
if (! isset($_REQUEST["nlId"])) {
|
|
$_REQUEST["nlId"] = 0;
|
|
}
|
|
$smarty->assign('nlId', $_REQUEST["nlId"]);
|
|
$smarty->assign('subscribe', 'n');
|
|
$smarty->assign('subscribed', 'n');
|
|
$foo = parse_url($_SERVER["REQUEST_URI"]);
|
|
$smarty->assign('url_subscribe', $tikilib->httpPrefix(true) . $foo["path"]);
|
|
if (isset($_REQUEST["nlId"])) {
|
|
$tikilib->get_perm_object($_REQUEST["nlId"], 'newsletter');
|
|
}
|
|
if ($user) {
|
|
$user_email = $userlib->get_user_email($user);
|
|
} else {
|
|
$user_email = '';
|
|
}
|
|
$smarty->assign('email', $user_email);
|
|
if ($tiki_p_subscribe_newsletters == 'y') {
|
|
if (isset($_REQUEST["subscribe"]) && $access->checkCsrf()) {
|
|
if (empty($user) && $prefs['feature_antibot'] == 'y' && ! $captchalib->validate()) {
|
|
Feedback::errorPage(['mes' => $captchalib->getErrors(), 'errortype' => 'no_redirect_login']);
|
|
}
|
|
if ($tiki_p_subscribe_email != 'y') {
|
|
$_REQUEST["email"] = $userlib->get_user_email($user);
|
|
}
|
|
// Save the ip at the log for email subscriptions from anonymous
|
|
if (empty($user)) {
|
|
$logslib->add_log('newsletter', 'subscribed email ' . $_REQUEST["email"] . ' to newsletter ' . $_REQUEST["nlId"]);
|
|
$smarty->assign('subscribed', 'y'); // will receive en email
|
|
}
|
|
// Now subscribe the email address to the newsletter
|
|
$nl_info = $nllib->get_newsletter($_REQUEST["nlId"]);
|
|
$successMsg = tr('You will receive an email soon to confirm your subscription. Click on the confirmation link in that email to begin receiving the newsletter.');
|
|
if ($nl_info['allowAnySub'] != 'y' && $user) {
|
|
if ($nllib->newsletter_subscribe($_REQUEST["nlId"], $user, "y")) {
|
|
Feedback::success($successMsg);
|
|
$smarty->assign('subscribed', 'y');
|
|
} else {
|
|
Feedback::error(tr('Newsletter not subscribed'));
|
|
}
|
|
} elseif ($nllib->newsletter_subscribe($_REQUEST["nlId"], $_REQUEST["email"])) {
|
|
Feedback::success($successMsg);
|
|
$smarty->assign('subscribed', 'y'); // will receive en email
|
|
} else {
|
|
Feedback::error(tr('Newsletter not subscribed'));
|
|
}
|
|
}
|
|
}
|
|
if (isset($_REQUEST["info"])) {
|
|
$nl_info = $nllib->get_newsletter($_REQUEST["nlId"]);
|
|
$smarty->assign('nl_info', $nl_info);
|
|
$smarty->assign('subscribe', 'y');
|
|
}
|
|
// List newsletters
|
|
if (! isset($_REQUEST["sort_mode"])) {
|
|
$sort_mode = 'created_desc';
|
|
} else {
|
|
$sort_mode = $_REQUEST["sort_mode"];
|
|
}
|
|
if (! isset($_REQUEST["offset"])) {
|
|
$offset = 0;
|
|
} else {
|
|
$offset = $_REQUEST["offset"];
|
|
}
|
|
if (isset($_REQUEST["noshowlist"])) {
|
|
$showlist = 'n';
|
|
} else {
|
|
// No need to display an empty list to people who can't subscribe
|
|
if ($tiki_p_subscribe_newsletters != 'y') {
|
|
$showlist = 'n';
|
|
} else {
|
|
$showlist = 'y';
|
|
}
|
|
}
|
|
$smarty->assign('showlist', $showlist);
|
|
$smarty->assign_by_ref('offset', $offset);
|
|
if (isset($_REQUEST["find"])) {
|
|
$find = $_REQUEST["find"];
|
|
} else {
|
|
$find = '';
|
|
}
|
|
$smarty->assign('find', $find);
|
|
$smarty->assign_by_ref('sort_mode', $sort_mode);
|
|
$channels = $nllib->list_newsletters($offset, $maxRecords, $sort_mode, $find, '', ["tiki_p_subscribe_newsletters", "tiki_p_admin_newsletters", "tiki_p_send_newsletters"]);
|
|
$smarty->assign_by_ref('cant', $channels['cant']);
|
|
$smarty->assign_by_ref('channels', $channels["data"]);
|
|
$section = 'newsletters';
|
|
include_once('tiki-section_options.php');
|
|
// Display the template
|
|
$smarty->assign('mid', 'tiki-newsletters.tpl');
|
|
$smarty->display("tiki.tpl");
|