notifyall/notifyall.php

   1 <?php
   2 /**
   3  *
   4  * Name: Notifyall
   5  * Description: Send admin email message to all account holders. <b>-><a href=/notifyall TARGET = "_blank">send now!</a><-</b>
   6  * Version: 1.0
   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)
   9  */
  10
  11 use Friendica\App;
  12 use Friendica\Content\Text\BBCode;
  13 use Friendica\Core\Config;
  14 use Friendica\Core\L10n;
  15 use Friendica\Core\Logger;
  16 use Friendica\Core\Renderer;
  17 use Friendica\Core\System;
  18 use Friendica\DI;
  19 use Friendica\Util\Emailer;
  20
  21 function notifyall_install()
  22 {
  23         Logger::log("installed notifyall");
  24 }
  25
  26 function notifyall_uninstall()
  27 {
  28         Logger::log("removed notifyall");
  29 }
  30
  31 function notifyall_module() {}
  32
  33 function notifyall_addon_admin(App $a, &$o)
  34 {
  35         $o = '<div></div>&nbsp;&nbsp;&nbsp;&nbsp;<a href="' . $a->getBaseURL() . '/notifyall">' . L10n::t('Send email to all members') . '</a></br/>';
  36 }
  37
  38
  39 function notifyall_post(App $a)
  40 {
  41         if(!is_site_admin()) {
  42                 return;
  43         }
  44
  45         $text = trim($_REQUEST['text']);
  46
  47         if(! $text) {
  48                 return;
  49         }
  50
  51         $sitename = Config::get('config', 'sitename');
  52
  53         if (empty(Config::get('config', 'admin_name'))) {
  54                 $sender_name = '"' . L10n::t('%s Administrator', $sitename) . '"';
  55         } else {
  56                 $sender_name = '"' . L10n::t('%1$s, %2$s Administrator', Config::get('config', 'admin_name'), $sitename) . '"';
  57         }
  58
  59         if (!Config::get('config', 'sender_email')) {
  60                 $sender_email = 'noreply@' . DI::baseUrl()->getHostname();
  61         } else {
  62                 $sender_email = Config::get('config', 'sender_email');
  63         }
  64
  65         $subject = $_REQUEST['subject'];
  66
  67
  68         $textversion = strip_tags(html_entity_decode(BBCode::convert(stripslashes(str_replace(["\\r", "\\n"], ["", "\n"], $text))), ENT_QUOTES, 'UTF-8'));
  69
  70         $htmlversion = BBCode::convert(stripslashes(str_replace(["\\r", "\\n"], ["", "<br />\n"], $text)));
  71
  72         // if this is a test, send it only to the admin(s)
  73         // admin_email might be a comma separated list, but we need "a@b','c@d','e@f
  74         if (intval($_REQUEST['test'])) {
  75                 $email = Config::get('config', 'admin_email');
  76                 $email = "'" . str_replace([" ",","], ["","','"], $email) . "'";
  77         }
  78         $sql_extra = ((intval($_REQUEST['test'])) ? sprintf(" AND `email` in ( %s )", $email) : '');
  79
  80         $recips = q("SELECT DISTINCT `email` FROM `user` WHERE `verified` AND NOT `account_removed` AND NOT `account_expired` $sql_extra");
  81
  82         if (! $recips) {
  83                 notice(L10n::t('No recipients found.') . EOL);
  84                 return;
  85         }
  86
  87         foreach ($recips as $recip) {
  88                 Emailer::send([
  89                         'fromName'             => $sender_name,
  90                         'fromEmail'            => $sender_email,
  91                         'replyTo'              => $sender_email,
  92                         'toEmail'              => $recip['email'],
  93                         'messageSubject'       => $subject,
  94                         'htmlVersion'          => $htmlversion,
  95                         'textVersion'          => $textversion
  96                 ]);
  97         }
  98
  99         notice(L10n::t('Emails sent'));
 100         DI::baseUrl()->redirect('admin');
 101 }
 102
 103 function notifyall_content(&$a)
 104 {
 105         if (! is_site_admin()) {
 106                 return;
 107         }
 108
 109         $title = L10n::t('Send email to all members of this Friendica instance.');
 110
 111         $o = Renderer::replaceMacros(Renderer::getMarkupTemplate('notifyall_form.tpl', 'addon/notifyall/'), [
 112                 '$title' => $title,
 113                 '$text' => htmlspecialchars($_REQUEST['text'] ?? ''),
 114                 '$subject' => ['subject', L10n::t('Message subject'), $_REQUEST['subject'] ?? '',''],
 115                 '$test' => ['test',L10n::t('Test mode (only send to administrator)'), 0,''],
 116                 '$submit' => L10n::t('Submit')
 117         ]);
 118
 119         return $o;
 120 }