5 * Description: Send admin email message to all account holders. <b>-><a href=/notifyall TARGET = "_blank">send now!</a><-</b>
7 * Author: Mike Macgirvin (Inital Author of the hubbwall Addon for the Hubzilla Project)
8 * Author: Rabuzarus <https://friendica.kommune4.de/profile/rabuzarus> (Port to Friendica)
11 use Friendica\Content\Text\BBCode;
12 use Friendica\Core\L10n;
13 use Friendica\Util\Emailer;
15 function notifyall_install()
17 logger("installed notifyall");
20 function notifyall_uninstall()
22 logger("removed notifyall");
25 function notifyall_module() {}
27 function notifyall_addon_admin(&$a, &$o)
29 $o = '<div></div> <a href="' . z_root() . '/notifyall">' . L10n::t('Send email to all members') . '</a></br/>';
33 function notifyall_post(&$a)
40 $text = trim($_REQUEST['text']);
47 $sitename = $a->config['sitename'];
49 if (!x($a->config['admin_name']))
51 $sender_name = '"' . L10n::t('%s Administrator', $sitename) . '"';
53 $sender_name = '"' . L10n::t('%1$s, %2$s Administrator', $a->config['admin_name'], $sitename) . '"';
56 if (! x($a->config['sender_email']))
58 $sender_email = 'noreply@' . $a->get_hostname();
60 $sender_email = $a->config['sender_email'];
63 $subject = $_REQUEST['subject'];
66 $textversion = strip_tags(html_entity_decode(BBCode::convert(stripslashes(str_replace(["\\r", "\\n"], ["", "\n"], $text))), ENT_QUOTES, 'UTF-8'));
68 $htmlversion = BBCode::convert(stripslashes(str_replace(["\\r", "\\n"], ["", "<br />\n"], $text)));
70 // if this is a test, send it only to the admin(s)
71 // admin_email might be a comma separated list, but we need "a@b','c@d','e@f
72 if (intval($_REQUEST['test']))
74 $email = $a->config['admin_email'];
75 $email = "'" . str_replace([" ",","], ["","','"], $email) . "'";
77 $sql_extra = ((intval($_REQUEST['test'])) ? sprintf(" AND `email` in ( %s )", $email) : '');
79 $recips = q("SELECT DISTINCT `email` FROM `user` WHERE `verified` AND NOT `account_removed` AND NOT `account_expired` $sql_extra");
83 notice(L10n::t('No recipients found.') . EOL);
87 foreach ($recips as $recip)
90 'fromName' => $sender_name,
91 'fromEmail' => $sender_email,
92 'replyTo' => $sender_email,
93 'toEmail' => $recip['email'],
94 'messageSubject' => $subject,
95 'htmlVersion' => $htmlversion,
96 'textVersion' => $textversion
100 notice(L10n::t('Emails sent'));
104 function notifyall_content(&$a)
106 if (! is_site_admin()) {
110 $title = L10n::t('Send email to all members of this Friendica instance.');
112 $o = replace_macros(get_markup_template('notifyall_form.tpl', 'addon/notifyall/'), [
114 '$text' => htmlspecialchars($_REQUEST['text']),
115 '$subject' => ['subject',L10n::t('Message subject'),$_REQUEST['subject'],''],
116 '$test' => ['test',L10n::t('Test mode (only send to administrator)'), 0,''],
117 '$submit' => L10n::t('Submit')