<?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");