auth->getOptions(); echo '
' . __('Email notification') . '
' . '

' . form::combo( 'notify_comments', [ __('Never') => '0', __('My entries') => 'mine', __('All entries') => 'all', ], $options['notify_comments'] ?? '0' ) . '

' . '
'; } public static function adminBeforeUserUpdate($cur, $user_id = '') { $cur->user_options['notify_comments'] = $_POST['notify_comments']; } public static function publicAfterCommentCreate($cur, $comment_id) { # We don't want notification for spam if ($cur->comment_status == -2) { return; } # Information on comment author and post author $rs = dcCore::app()->auth->sudo([dcCore::app()->blog, 'getComments'], ['comment_id' => $comment_id]); if ($rs->isEmpty()) { return; } # Information on blog users $strReq = 'SELECT U.user_id, user_email, user_options ' . 'FROM ' . dcCore::app()->blog->prefix . dcAuth::USER_TABLE_NAME . ' U ' . 'JOIN ' . dcCore::app()->blog->prefix . dcAuth::PERMISSIONS_TABLE_NAME . ' P ON U.user_id = P.user_id ' . "WHERE blog_id = '" . dcCore::app()->con->escape(dcCore::app()->blog->id) . "' " . 'UNION ' . 'SELECT user_id, user_email, user_options ' . 'FROM ' . dcCore::app()->blog->prefix . dcAuth::USER_TABLE_NAME . ' ' . 'WHERE user_super = 1 '; $users = dcCore::app()->con->select($strReq); # Create notify list $ulist = []; while ($users->fetch()) { if (!$users->user_email) { continue; } $notification_pref = self::notificationPref(rsExtUser::options(new dcRecord($users))); if ($notification_pref == 'all' || ($notification_pref == 'mine' && $users->user_id == $rs->user_id)) { $ulist[$users->user_id] = $users->user_email; } } if (count($ulist) > 0) { # Author of the post wants to be notified by mail $headers = [ 'Reply-To: ' . $rs->comment_email, 'Content-Type: text/plain; charset=UTF-8;', 'X-Mailer: Dotclear', 'X-Blog-Id: ' . mail::B64Header(dcCore::app()->blog->id), 'X-Blog-Name: ' . mail::B64Header(dcCore::app()->blog->name), 'X-Blog-Url: ' . mail::B64Header(dcCore::app()->blog->url), ]; $subject = '[' . dcCore::app()->blog->name . '] ' . sprintf(__('"%s" - New comment'), $rs->post_title); $subject = mail::B64Header($subject); $msg = preg_replace('%

\s*

%msu', "\n\n", $rs->comment_content); $msg = html::clean($msg); $msg = html_entity_decode($msg); if ($cur->comment_status == 1) { $status = __('published'); } elseif ($cur->comment_status == 0) { $status = __('unpublished'); } elseif ($cur->comment_status == -1) { $status = __('pending'); } else { # unknown status $status = $cur->comment_status; } $msg .= "\n\n-- \n" . sprintf(__('Blog: %s'), dcCore::app()->blog->name) . "\n" . sprintf(__('Entry: %s <%s>'), $rs->post_title, $rs->getPostURL()) . "\n" . sprintf(__('Comment by: %s <%s>'), $rs->comment_author, $rs->comment_email) . "\n" . sprintf(__('Website: %s'), $rs->getAuthorURL()) . "\n" . sprintf(__('Comment status: %s'), $status) . "\n" . sprintf(__('Edit this comment: <%s>'), DC_ADMIN_URL . ((substr(DC_ADMIN_URL, -1) != '/') ? '/' : '') . 'comment.php?id=' . $cur->comment_id . '&switchblog=' . dcCore::app()->blog->id) . "\n" . __('You must log in on the backend before clicking on this link to go directly to the comment.'); $msg = __('You received a new comment on your blog:') . "\n\n" . $msg; # --BEHAVIOR-- emailNotificationAppendToEmail $msg .= dcCore::app()->callBehavior('emailNotificationAppendToEmail', $cur); foreach ($ulist as $email) { $h = array_merge(['From: ' . $email], $headers); mail::sendMail($email, $subject, $msg, $h); } } } protected static function notificationPref($o) { if (is_array($o) && isset($o['notify_comments'])) { return $o['notify_comments']; } return null; } }