Mercurial > hg > vamp-website

annotate forum/Sources/ManageNews.php @ 76:e3e11437ecea website

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add forum code
author Chris Cannam
date Sun, 07 Jul 2013 11:25:48 +0200
parents
children
rev   line source
Chris@76 1 <?php
Chris@76 2
Chris@76 3 /**
Chris@76 4 * Simple Machines Forum (SMF)
Chris@76 5 *
Chris@76 6 * @package SMF
Chris@76 7 * @author Simple Machines http://www.simplemachines.org
Chris@76 8 * @copyright 2011 Simple Machines
Chris@76 9 * @license http://www.simplemachines.org/about/smf/license.php BSD
Chris@76 10 *
Chris@76 11 * @version 2.0
Chris@76 12 */
Chris@76 13
Chris@76 14 if (!defined('SMF'))
Chris@76 15 die('Hacking attempt...');
Chris@76 16
Chris@76 17 /*
Chris@76 18 void ManageNews()
Chris@76 19 - the entrance point for all News and Newsletter screens.
Chris@76 20 - called by ?action=admin;area=news.
Chris@76 21 - does the permission checks.
Chris@76 22 - calls the appropriate function based on the requested sub-action.
Chris@76 23
Chris@76 24 void EditNews()
Chris@76 25 - changes the current news items for the forum.
Chris@76 26 - uses the ManageNews template and edit_news sub template.
Chris@76 27 - called by ?action=admin;area=news.
Chris@76 28 - requires the edit_news permission.
Chris@76 29 - writes an entry into the moderation log.
Chris@76 30 - uses the edit_news administration area.
Chris@76 31 - can be accessed with ?action=admin;sa=editnews.
Chris@76 32
Chris@76 33 void SelectMailingMembers()
Chris@76 34 - allows a user to select the membergroups to send their mailing to.
Chris@76 35 - uses the ManageNews template and email_members sub template.
Chris@76 36 - called by ?action=admin;area=news;sa=mailingmembers.
Chris@76 37 - requires the send_mail permission.
Chris@76 38 - form is submitted to ?action=admin;area=news;mailingcompose.
Chris@76 39
Chris@76 40 void ComposeMailing()
Chris@76 41 - shows a form to edit a forum mailing and its recipients.
Chris@76 42 - uses the ManageNews template and email_members_compose sub template.
Chris@76 43 - called by ?action=admin;area=news;sa=mailingcompose.
Chris@76 44 - requires the send_mail permission.
Chris@76 45 - form is submitted to ?action=admin;area=news;sa=mailingsend.
Chris@76 46
Chris@76 47 void SendMailing(bool clean_only = false)
Chris@76 48 - handles the sending of the forum mailing in batches.
Chris@76 49 - uses the ManageNews template and email_members_send sub template.
Chris@76 50 - called by ?action=admin;area=news;sa=mailingsend
Chris@76 51 - requires the send_mail permission.
Chris@76 52 - redirects to itself when more batches need to be sent.
Chris@76 53 - redirects to ?action=admin after everything has been sent.
Chris@76 54 - if clean_only is set will only clean the variables, put them in context, then return.
Chris@76 55
Chris@76 56 void NewsSettings()
Chris@76 57 - set general news and newsletter settings and permissions.
Chris@76 58 - uses the ManageNews template and news_settings sub template.
Chris@76 59 - called by ?action=admin;area=news;sa=settings.
Chris@76 60 - requires the forum_admin permission.
Chris@76 61 */
Chris@76 62
Chris@76 63 // The controller; doesn't do anything, just delegates.
Chris@76 64 function ManageNews()
Chris@76 65 {
Chris@76 66 global $context, $txt, $scripturl;
Chris@76 67
Chris@76 68 // First, let's do a quick permissions check for the best error message possible.
Chris@76 69 isAllowedTo(array('edit_news', 'send_mail', 'admin_forum'));
Chris@76 70
Chris@76 71 loadTemplate('ManageNews');
Chris@76 72
Chris@76 73 // Format: 'sub-action' => array('function', 'permission')
Chris@76 74 $subActions = array(
Chris@76 75 'editnews' => array('EditNews', 'edit_news'),
Chris@76 76 'mailingmembers' => array('SelectMailingMembers', 'send_mail'),
Chris@76 77 'mailingcompose' => array('ComposeMailing', 'send_mail'),
Chris@76 78 'mailingsend' => array('SendMailing', 'send_mail'),
Chris@76 79 'settings' => array('ModifyNewsSettings', 'admin_forum'),
Chris@76 80 );
Chris@76 81
Chris@76 82 // Default to sub action 'main' or 'settings' depending on permissions.
Chris@76 83 $_REQUEST['sa'] = isset($_REQUEST['sa']) && isset($subActions[$_REQUEST['sa']]) ? $_REQUEST['sa'] : (allowedTo('edit_news') ? 'editnews' : (allowedTo('send_mail') ? 'mailingmembers' : 'settings'));
Chris@76 84
Chris@76 85 // Have you got the proper permissions?
Chris@76 86 isAllowedTo($subActions[$_REQUEST['sa']][1]);
Chris@76 87
Chris@76 88 // Create the tabs for the template.
Chris@76 89 $context[$context['admin_menu_name']]['tab_data'] = array(
Chris@76 90 'title' => $txt['news_title'],
Chris@76 91 'help' => 'edit_news',
Chris@76 92 'description' => $txt['admin_news_desc'],
Chris@76 93 'tabs' => array(
Chris@76 94 'editnews' => array(
Chris@76 95 ),
Chris@76 96 'mailingmembers' => array(
Chris@76 97 'description' => $txt['news_mailing_desc'],
Chris@76 98 ),
Chris@76 99 'settings' => array(
Chris@76 100 'description' => $txt['news_settings_desc'],
Chris@76 101 ),
Chris@76 102 ),
Chris@76 103 );
Chris@76 104
Chris@76 105 // Force the right area...
Chris@76 106 if (substr($_REQUEST['sa'], 0, 7) == 'mailing')
Chris@76 107 $context[$context['admin_menu_name']]['current_subsection'] = 'mailingmembers';
Chris@76 108
Chris@76 109 $subActions[$_REQUEST['sa']][0]();
Chris@76 110 }
Chris@76 111
Chris@76 112 // Let the administrator(s) edit the news.
Chris@76 113 function EditNews()
Chris@76 114 {
Chris@76 115 global $txt, $modSettings, $context, $sourcedir, $user_info;
Chris@76 116 global $smcFunc;
Chris@76 117
Chris@76 118 require_once($sourcedir . '/Subs-Post.php');
Chris@76 119
Chris@76 120 // The 'remove selected' button was pressed.
Chris@76 121 if (!empty($_POST['delete_selection']) && !empty($_POST['remove']))
Chris@76 122 {
Chris@76 123 checkSession();
Chris@76 124
Chris@76 125 // Store the news temporarily in this array.
Chris@76 126 $temp_news = explode("\n", $modSettings['news']);
Chris@76 127
Chris@76 128 // Remove the items that were selected.
Chris@76 129 foreach ($temp_news as $i => $news)
Chris@76 130 if (in_array($i, $_POST['remove']))
Chris@76 131 unset($temp_news[$i]);
Chris@76 132
Chris@76 133 // Update the database.
Chris@76 134 updateSettings(array('news' => implode("\n", $temp_news)));
Chris@76 135
Chris@76 136 logAction('news');
Chris@76 137 }
Chris@76 138 // The 'Save' button was pressed.
Chris@76 139 elseif (!empty($_POST['save_items']))
Chris@76 140 {
Chris@76 141 checkSession();
Chris@76 142
Chris@76 143 foreach ($_POST['news'] as $i => $news)
Chris@76 144 {
Chris@76 145 if (trim($news) == '')
Chris@76 146 unset($_POST['news'][$i]);
Chris@76 147 else
Chris@76 148 {
Chris@76 149 $_POST['news'][$i] = $smcFunc['htmlspecialchars']($_POST['news'][$i], ENT_QUOTES);
Chris@76 150 preparsecode($_POST['news'][$i]);
Chris@76 151 }
Chris@76 152 }
Chris@76 153
Chris@76 154 // Send the new news to the database.
Chris@76 155 updateSettings(array('news' => implode("\n", $_POST['news'])));
Chris@76 156
Chris@76 157 // Log this into the moderation log.
Chris@76 158 logAction('news');
Chris@76 159 }
Chris@76 160
Chris@76 161 // Ready the current news.
Chris@76 162 foreach (explode("\n", $modSettings['news']) as $id => $line)
Chris@76 163 $context['admin_current_news'][$id] = array(
Chris@76 164 'id' => $id,
Chris@76 165 'unparsed' => un_preparsecode($line),
Chris@76 166 'parsed' => preg_replace('~<([/]?)form[^>]*?[>]*>~i', '<em class="smalltext">&lt;$1form&gt;</em>', parse_bbc($line)),
Chris@76 167 );
Chris@76 168
Chris@76 169 $context['sub_template'] = 'edit_news';
Chris@76 170 $context['page_title'] = $txt['admin_edit_news'];
Chris@76 171 }
Chris@76 172
Chris@76 173 function SelectMailingMembers()
Chris@76 174 {
Chris@76 175 global $txt, $context, $modSettings, $smcFunc;
Chris@76 176
Chris@76 177 $context['page_title'] = $txt['admin_newsletters'];
Chris@76 178
Chris@76 179 $context['sub_template'] = 'email_members';
Chris@76 180
Chris@76 181 $context['groups'] = array();
Chris@76 182 $postGroups = array();
Chris@76 183 $normalGroups = array();
Chris@76 184
Chris@76 185 // If we have post groups disabled then we need to give a "ungrouped members" option.
Chris@76 186 if (empty($modSettings['permission_enable_postgroups']))
Chris@76 187 {
Chris@76 188 $context['groups'][0] = array(
Chris@76 189 'id' => 0,
Chris@76 190 'name' => $txt['membergroups_members'],
Chris@76 191 'member_count' => 0,
Chris@76 192 );
Chris@76 193 $normalGroups[0] = 0;
Chris@76 194 }
Chris@76 195
Chris@76 196 // Get all the extra groups as well as Administrator and Global Moderator.
Chris@76 197 $request = $smcFunc['db_query']('', '
Chris@76 198 SELECT mg.id_group, mg.group_name, mg.min_posts
Chris@76 199 FROM {db_prefix}membergroups AS mg' . (empty($modSettings['permission_enable_postgroups']) ? '
Chris@76 200 WHERE mg.min_posts = {int:min_posts}' : '') . '
Chris@76 201 GROUP BY mg.id_group, mg.min_posts, mg.group_name
Chris@76 202 ORDER BY mg.min_posts, CASE WHEN mg.id_group < {int:newbie_group} THEN mg.id_group ELSE 4 END, mg.group_name',
Chris@76 203 array(
Chris@76 204 'min_posts' => -1,
Chris@76 205 'newbie_group' => 4,
Chris@76 206 )
Chris@76 207 );
Chris@76 208 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 209 {
Chris@76 210 $context['groups'][$row['id_group']] = array(
Chris@76 211 'id' => $row['id_group'],
Chris@76 212 'name' => $row['group_name'],
Chris@76 213 'member_count' => 0,
Chris@76 214 );
Chris@76 215
Chris@76 216 if ($row['min_posts'] == -1)
Chris@76 217 $normalGroups[$row['id_group']] = $row['id_group'];
Chris@76 218 else
Chris@76 219 $postGroups[$row['id_group']] = $row['id_group'];
Chris@76 220 }
Chris@76 221 $smcFunc['db_free_result']($request);
Chris@76 222
Chris@76 223 // If we have post groups, let's count the number of members...
Chris@76 224 if (!empty($postGroups))
Chris@76 225 {
Chris@76 226 $query = $smcFunc['db_query']('', '
Chris@76 227 SELECT mem.id_post_group AS id_group, COUNT(*) AS member_count
Chris@76 228 FROM {db_prefix}members AS mem
Chris@76 229 WHERE mem.id_post_group IN ({array_int:post_group_list})
Chris@76 230 GROUP BY mem.id_post_group',
Chris@76 231 array(
Chris@76 232 'post_group_list' => $postGroups,
Chris@76 233 )
Chris@76 234 );
Chris@76 235 while ($row = $smcFunc['db_fetch_assoc']($query))
Chris@76 236 $context['groups'][$row['id_group']]['member_count'] += $row['member_count'];
Chris@76 237 $smcFunc['db_free_result']($query);
Chris@76 238 }
Chris@76 239
Chris@76 240 if (!empty($normalGroups))
Chris@76 241 {
Chris@76 242 // Find people who are members of this group...
Chris@76 243 $query = $smcFunc['db_query']('', '
Chris@76 244 SELECT id_group, COUNT(*) AS member_count
Chris@76 245 FROM {db_prefix}members
Chris@76 246 WHERE id_group IN ({array_int:normal_group_list})
Chris@76 247 GROUP BY id_group',
Chris@76 248 array(
Chris@76 249 'normal_group_list' => $normalGroups,
Chris@76 250 )
Chris@76 251 );
Chris@76 252 while ($row = $smcFunc['db_fetch_assoc']($query))
Chris@76 253 $context['groups'][$row['id_group']]['member_count'] += $row['member_count'];
Chris@76 254 $smcFunc['db_free_result']($query);
Chris@76 255
Chris@76 256 // Also do those who have it as an additional membergroup - this ones more yucky...
Chris@76 257 $query = $smcFunc['db_query']('', '
Chris@76 258 SELECT mg.id_group, COUNT(*) AS member_count
Chris@76 259 FROM {db_prefix}membergroups AS mg
Chris@76 260 INNER JOIN {db_prefix}members AS mem ON (mem.additional_groups != {string:blank_string}
Chris@76 261 AND mem.id_group != mg.id_group
Chris@76 262 AND FIND_IN_SET(mg.id_group, mem.additional_groups) != 0)
Chris@76 263 WHERE mg.id_group IN ({array_int:normal_group_list})
Chris@76 264 GROUP BY mg.id_group',
Chris@76 265 array(
Chris@76 266 'normal_group_list' => $normalGroups,
Chris@76 267 'blank_string' => '',
Chris@76 268 )
Chris@76 269 );
Chris@76 270 while ($row = $smcFunc['db_fetch_assoc']($query))
Chris@76 271 $context['groups'][$row['id_group']]['member_count'] += $row['member_count'];
Chris@76 272 $smcFunc['db_free_result']($query);
Chris@76 273 }
Chris@76 274
Chris@76 275 // Any moderators?
Chris@76 276 $request = $smcFunc['db_query']('', '
Chris@76 277 SELECT COUNT(DISTINCT id_member) AS num_distinct_mods
Chris@76 278 FROM {db_prefix}moderators
Chris@76 279 LIMIT 1',
Chris@76 280 array(
Chris@76 281 )
Chris@76 282 );
Chris@76 283 list ($context['groups'][3]['member_count']) = $smcFunc['db_fetch_row']($request);
Chris@76 284 $smcFunc['db_free_result']($request);
Chris@76 285
Chris@76 286 $context['can_send_pm'] = allowedTo('pm_send');
Chris@76 287 }
Chris@76 288
Chris@76 289 // Email your members...
Chris@76 290 function ComposeMailing()
Chris@76 291 {
Chris@76 292 global $txt, $sourcedir, $context, $smcFunc;
Chris@76 293
Chris@76 294 // Start by finding any members!
Chris@76 295 $toClean = array();
Chris@76 296 if (!empty($_POST['members']))
Chris@76 297 $toClean[] = 'members';
Chris@76 298 if (!empty($_POST['exclude_members']))
Chris@76 299 $toClean[] = 'exclude_members';
Chris@76 300 if (!empty($toClean))
Chris@76 301 {
Chris@76 302 require_once($sourcedir . '/Subs-Auth.php');
Chris@76 303 foreach ($toClean as $type)
Chris@76 304 {
Chris@76 305 // Remove the quotes.
Chris@76 306 $_POST[$type] = strtr($_POST[$type], array('\\"' => '"'));
Chris@76 307
Chris@76 308 preg_match_all('~"([^"]+)"~', $_POST[$type], $matches);
Chris@76 309 $_POST[$type] = array_unique(array_merge($matches[1], explode(',', preg_replace('~"[^"]+"~', '', $_POST[$type]))));
Chris@76 310
Chris@76 311 foreach ($_POST[$type] as $index => $member)
Chris@76 312 if (strlen(trim($member)) > 0)
Chris@76 313 $_POST[$type][$index] = $smcFunc['htmlspecialchars']($smcFunc['strtolower'](trim($member)));
Chris@76 314 else
Chris@76 315 unset($_POST[$type][$index]);
Chris@76 316
Chris@76 317 // Find the members
Chris@76 318 $_POST[$type] = implode(',', array_keys(findMembers($_POST[$type])));
Chris@76 319 }
Chris@76 320 }
Chris@76 321
Chris@76 322 if (isset($_POST['member_list']) && is_array($_POST['member_list']))
Chris@76 323 {
Chris@76 324 $members = array();
Chris@76 325 foreach ($_POST['member_list'] as $member_id)
Chris@76 326 $members[] = (int) $member_id;
Chris@76 327 $_POST['members'] = implode(',', $members);
Chris@76 328 }
Chris@76 329
Chris@76 330 if (isset($_POST['exclude_member_list']) && is_array($_POST['exclude_member_list']))
Chris@76 331 {
Chris@76 332 $members = array();
Chris@76 333 foreach ($_POST['exclude_member_list'] as $member_id)
Chris@76 334 $members[] = (int) $member_id;
Chris@76 335 $_POST['exclude_members'] = implode(',', $members);
Chris@76 336 }
Chris@76 337
Chris@76 338 // Clean the other vars.
Chris@76 339 SendMailing(true);
Chris@76 340
Chris@76 341 // We need a couple strings from the email template file
Chris@76 342 loadLanguage('EmailTemplates');
Chris@76 343
Chris@76 344 // Get a list of all full banned users. Use their Username and email to find them. Only get the ones that can't login to turn off notification.
Chris@76 345 $request = $smcFunc['db_query']('', '
Chris@76 346 SELECT DISTINCT mem.id_member
Chris@76 347 FROM {db_prefix}ban_groups AS bg
Chris@76 348 INNER JOIN {db_prefix}ban_items AS bi ON (bg.id_ban_group = bi.id_ban_group)
Chris@76 349 INNER JOIN {db_prefix}members AS mem ON (bi.id_member = mem.id_member)
Chris@76 350 WHERE (bg.cannot_access = {int:cannot_access} OR bg.cannot_login = {int:cannot_login})
Chris@76 351 AND (bg.expire_time IS NULL OR bg.expire_time > {int:current_time})',
Chris@76 352 array(
Chris@76 353 'cannot_access' => 1,
Chris@76 354 'cannot_login' => 1,
Chris@76 355 'current_time' => time(),
Chris@76 356 )
Chris@76 357 );
Chris@76 358 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 359 $context['recipients']['exclude_members'][] = $row['id_member'];
Chris@76 360 $smcFunc['db_free_result']($request);
Chris@76 361
Chris@76 362 $request = $smcFunc['db_query']('', '
Chris@76 363 SELECT DISTINCT bi.email_address
Chris@76 364 FROM {db_prefix}ban_items AS bi
Chris@76 365 INNER JOIN {db_prefix}ban_groups AS bg ON (bg.id_ban_group = bi.id_ban_group)
Chris@76 366 WHERE (bg.cannot_access = {int:cannot_access} OR bg.cannot_login = {int:cannot_login})
Chris@76 367 AND (COALESCE(bg.expire_time, 1=1) OR bg.expire_time > {int:current_time})
Chris@76 368 AND bi.email_address != {string:blank_string}',
Chris@76 369 array(
Chris@76 370 'cannot_access' => 1,
Chris@76 371 'cannot_login' => 1,
Chris@76 372 'current_time' => time(),
Chris@76 373 'blank_string' => '',
Chris@76 374 )
Chris@76 375 );
Chris@76 376 $condition_array = array();
Chris@76 377 $condition_array_params = array();
Chris@76 378 $count = 0;
Chris@76 379 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 380 {
Chris@76 381 $condition_array[] = '{string:email_' . $count . '}';
Chris@76 382 $condition_array_params['email_' . $count++] = $row['email_address'];
Chris@76 383 }
Chris@76 384
Chris@76 385 if (!empty($condition_array))
Chris@76 386 {
Chris@76 387 $request = $smcFunc['db_query']('', '
Chris@76 388 SELECT id_member
Chris@76 389 FROM {db_prefix}members
Chris@76 390 WHERE email_address IN(' . implode(', ', $condition_array) .')',
Chris@76 391 $condition_array_params
Chris@76 392 );
Chris@76 393 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 394 $context['recipients']['exclude_members'][] = $row['id_member'];
Chris@76 395 }
Chris@76 396
Chris@76 397 // Did they select moderators - if so add them as specific members...
Chris@76 398 if ((!empty($context['recipients']['groups']) && in_array(3, $context['recipients']['groups'])) || (!empty($context['recipients']['exclude_groups']) && in_array(3, $context['recipients']['exclude_groups'])))
Chris@76 399 {
Chris@76 400 $request = $smcFunc['db_query']('', '
Chris@76 401 SELECT DISTINCT mem.id_member AS identifier
Chris@76 402 FROM {db_prefix}members AS mem
Chris@76 403 INNER JOIN {db_prefix}moderators AS mods ON (mods.id_member = mem.id_member)
Chris@76 404 WHERE mem.is_activated = {int:is_activated}',
Chris@76 405 array(
Chris@76 406 'is_activated' => 1,
Chris@76 407 )
Chris@76 408 );
Chris@76 409 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 410 {
Chris@76 411 if (in_array(3, $context['recipients']))
Chris@76 412 $context['recipients']['exclude_members'][] = $row['identifier'];
Chris@76 413 else
Chris@76 414 $context['recipients']['members'][] = $row['identifier'];
Chris@76 415 }
Chris@76 416 $smcFunc['db_free_result']($request);
Chris@76 417 }
Chris@76 418
Chris@76 419 // For progress bar!
Chris@76 420 $context['total_emails'] = count($context['recipients']['emails']);
Chris@76 421 $request = $smcFunc['db_query']('', '
Chris@76 422 SELECT MAX(id_member)
Chris@76 423 FROM {db_prefix}members',
Chris@76 424 array(
Chris@76 425 )
Chris@76 426 );
Chris@76 427 list ($context['max_id_member']) = $smcFunc['db_fetch_row']($request);
Chris@76 428 $smcFunc['db_free_result']($request);
Chris@76 429
Chris@76 430 // Clean up the arrays.
Chris@76 431 $context['recipients']['members'] = array_unique($context['recipients']['members']);
Chris@76 432 $context['recipients']['exclude_members'] = array_unique($context['recipients']['exclude_members']);
Chris@76 433
Chris@76 434 // Setup the template!
Chris@76 435 $context['page_title'] = $txt['admin_newsletters'];
Chris@76 436 $context['sub_template'] = 'email_members_compose';
Chris@76 437
Chris@76 438 $context['default_subject'] = htmlspecialchars($context['forum_name'] . ': ' . $txt['subject']);
Chris@76 439 $context['default_message'] = htmlspecialchars($txt['message'] . "\n\n" . $txt['regards_team'] . "\n\n" . '{$board_url}');
Chris@76 440 }
Chris@76 441
Chris@76 442 // Send out the mailing!
Chris@76 443 function SendMailing($clean_only = false)
Chris@76 444 {
Chris@76 445 global $txt, $sourcedir, $context, $smcFunc;
Chris@76 446 global $scripturl, $modSettings, $user_info;
Chris@76 447
Chris@76 448 // How many to send at once? Quantity depends on whether we are queueing or not.
Chris@76 449 $num_at_once = empty($modSettings['mail_queue']) ? 60 : 1000;
Chris@76 450
Chris@76 451 // If by PM's I suggest we half the above number.
Chris@76 452 if (!empty($_POST['send_pm']))
Chris@76 453 $num_at_once /= 2;
Chris@76 454
Chris@76 455 checkSession();
Chris@76 456
Chris@76 457 // Where are we actually to?
Chris@76 458 $context['start'] = isset($_REQUEST['start']) ? $_REQUEST['start'] : 0;
Chris@76 459 $context['email_force'] = !empty($_POST['email_force']) ? 1 : 0;
Chris@76 460 $context['send_pm'] = !empty($_POST['send_pm']) ? 1 : 0;
Chris@76 461 $context['total_emails'] = !empty($_POST['total_emails']) ? (int) $_POST['total_emails'] : 0;
Chris@76 462 $context['max_id_member'] = !empty($_POST['max_id_member']) ? (int) $_POST['max_id_member'] : 0;
Chris@76 463 $context['send_html'] = !empty($_POST['send_html']) ? '1' : '0';
Chris@76 464 $context['parse_html'] = !empty($_POST['parse_html']) ? '1' : '0';
Chris@76 465
Chris@76 466 // Create our main context.
Chris@76 467 $context['recipients'] = array(
Chris@76 468 'groups' => array(),
Chris@76 469 'exclude_groups' => array(),
Chris@76 470 'members' => array(),
Chris@76 471 'exclude_members' => array(),
Chris@76 472 'emails' => array(),
Chris@76 473 );
Chris@76 474
Chris@76 475 // Have we any excluded members?
Chris@76 476 if (!empty($_POST['exclude_members']))
Chris@76 477 {
Chris@76 478 $members = explode(',', $_POST['exclude_members']);
Chris@76 479 foreach ($members as $member)
Chris@76 480 if ($member >= $context['start'])
Chris@76 481 $context['recipients']['exclude_members'][] = (int) $member;
Chris@76 482 }
Chris@76 483
Chris@76 484 // What about members we *must* do?
Chris@76 485 if (!empty($_POST['members']))
Chris@76 486 {
Chris@76 487 $members = explode(',', $_POST['members']);
Chris@76 488 foreach ($members as $member)
Chris@76 489 if ($member >= $context['start'])
Chris@76 490 $context['recipients']['members'][] = (int) $member;
Chris@76 491 }
Chris@76 492 // Cleaning groups is simple - although deal with both checkbox and commas.
Chris@76 493 if (!empty($_POST['groups']))
Chris@76 494 {
Chris@76 495 if (is_array($_POST['groups']))
Chris@76 496 {
Chris@76 497 foreach ($_POST['groups'] as $group => $dummy)
Chris@76 498 $context['recipients']['groups'][] = (int) $group;
Chris@76 499 }
Chris@76 500 else
Chris@76 501 {
Chris@76 502 $groups = explode(',', $_POST['groups']);
Chris@76 503 foreach ($groups as $group)
Chris@76 504 $context['recipients']['groups'][] = (int) $group;
Chris@76 505 }
Chris@76 506 }
Chris@76 507 // Same for excluded groups
Chris@76 508 if (!empty($_POST['exclude_groups']))
Chris@76 509 {
Chris@76 510 if (is_array($_POST['exclude_groups']))
Chris@76 511 {
Chris@76 512 foreach ($_POST['exclude_groups'] as $group => $dummy)
Chris@76 513 $context['recipients']['exclude_groups'][] = (int) $group;
Chris@76 514 }
Chris@76 515 else
Chris@76 516 {
Chris@76 517 $groups = explode(',', $_POST['exclude_groups']);
Chris@76 518 foreach ($groups as $group)
Chris@76 519 $context['recipients']['exclude_groups'][] = (int) $group;
Chris@76 520 }
Chris@76 521 }
Chris@76 522 // Finally - emails!
Chris@76 523 if (!empty($_POST['emails']))
Chris@76 524 {
Chris@76 525 $addressed = array_unique(explode(';', strtr($_POST['emails'], array("\n" => ';', "\r" => ';', ',' => ';'))));
Chris@76 526 foreach ($addressed as $curmem)
Chris@76 527 {
Chris@76 528 $curmem = trim($curmem);
Chris@76 529 if ($curmem != '')
Chris@76 530 $context['recipients']['emails'][$curmem] = $curmem;
Chris@76 531 }
Chris@76 532 }
Chris@76 533
Chris@76 534 // If we're only cleaning drop out here.
Chris@76 535 if ($clean_only)
Chris@76 536 return;
Chris@76 537
Chris@76 538 require_once($sourcedir . '/Subs-Post.php');
Chris@76 539
Chris@76 540 // Save the message and its subject in $context
Chris@76 541 $context['subject'] = htmlspecialchars($_POST['subject']);
Chris@76 542 $context['message'] = htmlspecialchars($_POST['message']);
Chris@76 543
Chris@76 544 // Prepare the message for sending it as HTML
Chris@76 545 if (!$context['send_pm'] && !empty($_POST['send_html']))
Chris@76 546 {
Chris@76 547 // Prepare the message for HTML.
Chris@76 548 if (!empty($_POST['parse_html']))
Chris@76 549 $_POST['message'] = str_replace(array("\n", ' '), array('<br />' . "\n", '&nbsp; '), $_POST['message']);
Chris@76 550
Chris@76 551 // This is here to prevent spam filters from tagging this as spam.
Chris@76 552 if (preg_match('~\<html~i', $_POST['message']) == 0)
Chris@76 553 {
Chris@76 554 if (preg_match('~\<body~i', $_POST['message']) == 0)
Chris@76 555 $_POST['message'] = '<html><head><title>' . $_POST['subject'] . '</title></head>' . "\n" . '<body>' . $_POST['message'] . '</body></html>';
Chris@76 556 else
Chris@76 557 $_POST['message'] = '<html>' . $_POST['message'] . '</html>';
Chris@76 558 }
Chris@76 559 }
Chris@76 560
Chris@76 561 // Use the default time format.
Chris@76 562 $user_info['time_format'] = $modSettings['time_format'];
Chris@76 563
Chris@76 564 $variables = array(
Chris@76 565 '{$board_url}',
Chris@76 566 '{$current_time}',
Chris@76 567 '{$latest_member.link}',
Chris@76 568 '{$latest_member.id}',
Chris@76 569 '{$latest_member.name}'
Chris@76 570 );
Chris@76 571
Chris@76 572 // We might need this in a bit
Chris@76 573 $cleanLatestMember = empty($_POST['send_html']) || $context['send_pm'] ? un_htmlspecialchars($modSettings['latestRealName']) : $modSettings['latestRealName'];
Chris@76 574
Chris@76 575 // Replace in all the standard things.
Chris@76 576 $_POST['message'] = str_replace($variables,
Chris@76 577 array(
Chris@76 578 !empty($_POST['send_html']) ? '<a href="' . $scripturl . '">' . $scripturl . '</a>' : $scripturl,
Chris@76 579 timeformat(forum_time(), false),
Chris@76 580 !empty($_POST['send_html']) ? '<a href="' . $scripturl . '?action=profile;u=' . $modSettings['latestMember'] . '">' . $cleanLatestMember . '</a>' : ($context['send_pm'] ? '[url=' . $scripturl . '?action=profile;u=' . $modSettings['latestMember'] . ']' . $cleanLatestMember . '[/url]' : $cleanLatestMember),
Chris@76 581 $modSettings['latestMember'],
Chris@76 582 $cleanLatestMember
Chris@76 583 ), $_POST['message']);
Chris@76 584 $_POST['subject'] = str_replace($variables,
Chris@76 585 array(
Chris@76 586 $scripturl,
Chris@76 587 timeformat(forum_time(), false),
Chris@76 588 $modSettings['latestRealName'],
Chris@76 589 $modSettings['latestMember'],
Chris@76 590 $modSettings['latestRealName']
Chris@76 591 ), $_POST['subject']);
Chris@76 592
Chris@76 593 $from_member = array(
Chris@76 594 '{$member.email}',
Chris@76 595 '{$member.link}',
Chris@76 596 '{$member.id}',
Chris@76 597 '{$member.name}'
Chris@76 598 );
Chris@76 599
Chris@76 600 // If we still have emails, do them first!
Chris@76 601 $i = 0;
Chris@76 602 foreach ($context['recipients']['emails'] as $k => $email)
Chris@76 603 {
Chris@76 604 // Done as many as we can?
Chris@76 605 if ($i >= $num_at_once)
Chris@76 606 break;
Chris@76 607
Chris@76 608 // Don't sent it twice!
Chris@76 609 unset($context['recipients']['emails'][$k]);
Chris@76 610
Chris@76 611 // Dammit - can't PM emails!
Chris@76 612 if ($context['send_pm'])
Chris@76 613 continue;
Chris@76 614
Chris@76 615 $to_member = array(
Chris@76 616 $email,
Chris@76 617 !empty($_POST['send_html']) ? '<a href="mailto:' . $email . '">' . $email . '</a>' : $email,
Chris@76 618 '??',
Chris@76 619 $email
Chris@76 620 );
Chris@76 621
Chris@76 622 sendmail($email, str_replace($from_member, $to_member, $_POST['subject']), str_replace($from_member, $to_member, $_POST['message']), null, null, !empty($_POST['send_html']), 5);
Chris@76 623
Chris@76 624 // Done another...
Chris@76 625 $i++;
Chris@76 626 }
Chris@76 627
Chris@76 628 // Got some more to send this batch?
Chris@76 629 $last_id_member = 0;
Chris@76 630 if ($i < $num_at_once)
Chris@76 631 {
Chris@76 632 // Need to build quite a query!
Chris@76 633 $sendQuery = '(';
Chris@76 634 $sendParams = array();
Chris@76 635 if (!empty($context['recipients']['groups']))
Chris@76 636 {
Chris@76 637 // Take the long route...
Chris@76 638 $queryBuild = array();
Chris@76 639 foreach ($context['recipients']['groups'] as $group)
Chris@76 640 {
Chris@76 641 $sendParams['group_' . $group] = $group;
Chris@76 642 $queryBuild[] = 'mem.id_group = {int:group_' . $group . '}';
Chris@76 643 if (!empty($group))
Chris@76 644 {
Chris@76 645 $queryBuild[] = 'FIND_IN_SET({int:group_' . $group . '}, mem.additional_groups) != 0';
Chris@76 646 $queryBuild[] = 'mem.id_post_group = {int:group_' . $group . '}';
Chris@76 647 }
Chris@76 648 }
Chris@76 649 if (!empty($queryBuild))
Chris@76 650 $sendQuery .= implode(' OR ', $queryBuild);
Chris@76 651 }
Chris@76 652 if (!empty($context['recipients']['members']))
Chris@76 653 {
Chris@76 654 $sendQuery .= ($sendQuery == '(' ? '' : ' OR ') . 'mem.id_member IN ({array_int:members})';
Chris@76 655 $sendParams['members'] = $context['recipients']['members'];
Chris@76 656 }
Chris@76 657
Chris@76 658 $sendQuery .= ')';
Chris@76 659
Chris@76 660 // If we've not got a query then we must be done!
Chris@76 661 if ($sendQuery == '()')
Chris@76 662 redirectexit('action=admin');
Chris@76 663
Chris@76 664 // Anything to exclude?
Chris@76 665 if (!empty($context['recipients']['exclude_groups']) && in_array(0, $context['recipients']['exclude_groups']))
Chris@76 666 $sendQuery .= ' AND mem.id_group != {int:regular_group}';
Chris@76 667 if (!empty($context['recipients']['exclude_members']))
Chris@76 668 {
Chris@76 669 $sendQuery .= ' AND mem.id_member NOT IN ({array_int:exclude_members})';
Chris@76 670 $sendParams['exclude_members'] = $context['recipients']['exclude_members'];
Chris@76 671 }
Chris@76 672
Chris@76 673 // Force them to have it?
Chris@76 674 if (empty($context['email_force']))
Chris@76 675 $sendQuery .= ' AND mem.notify_announcements = {int:notify_announcements}';
Chris@76 676
Chris@76 677 // Get the smelly people - note we respect the id_member range as it gives us a quicker query.
Chris@76 678 $result = $smcFunc['db_query']('', '
Chris@76 679 SELECT mem.id_member, mem.email_address, mem.real_name, mem.id_group, mem.additional_groups, mem.id_post_group
Chris@76 680 FROM {db_prefix}members AS mem
Chris@76 681 WHERE mem.id_member > {int:min_id_member}
Chris@76 682 AND mem.id_member < {int:max_id_member}
Chris@76 683 AND ' . $sendQuery . '
Chris@76 684 AND mem.is_activated = {int:is_activated}
Chris@76 685 ORDER BY mem.id_member ASC
Chris@76 686 LIMIT {int:atonce}',
Chris@76 687 array_merge($sendParams, array(
Chris@76 688 'min_id_member' => $context['start'],
Chris@76 689 'max_id_member' => $context['start'] + $num_at_once - $i,
Chris@76 690 'atonce' => $num_at_once - $i,
Chris@76 691 'regular_group' => 0,
Chris@76 692 'notify_announcements' => 1,
Chris@76 693 'is_activated' => 1,
Chris@76 694 ))
Chris@76 695 );
Chris@76 696
Chris@76 697 while ($row = $smcFunc['db_fetch_assoc']($result))
Chris@76 698 {
Chris@76 699 $last_id_member = $row['id_member'];
Chris@76 700
Chris@76 701 // What groups are we looking at here?
Chris@76 702 if (empty($row['additional_groups']))
Chris@76 703 $groups = array($row['id_group'], $row['id_post_group']);
Chris@76 704 else
Chris@76 705 $groups = array_merge(
Chris@76 706 array($row['id_group'], $row['id_post_group']),
Chris@76 707 explode(',', $row['additional_groups'])
Chris@76 708 );
Chris@76 709
Chris@76 710 // Excluded groups?
Chris@76 711 if (array_intersect($groups, $context['recipients']['exclude_groups']))
Chris@76 712 continue;
Chris@76 713
Chris@76 714 // We might need this
Chris@76 715 $cleanMemberName = empty($_POST['send_html']) || $context['send_pm'] ? un_htmlspecialchars($row['real_name']) : $row['real_name'];
Chris@76 716
Chris@76 717 // Replace the member-dependant variables
Chris@76 718 $message = str_replace($from_member,
Chris@76 719 array(
Chris@76 720 $row['email_address'],
Chris@76 721 !empty($_POST['send_html']) ? '<a href="' . $scripturl . '?action=profile;u=' . $row['id_member'] . '">' . $cleanMemberName . '</a>' : ($context['send_pm'] ? '[url=' . $scripturl . '?action=profile;u=' . $row['id_member'] . ']' . $cleanMemberName . '[/url]' : $cleanMemberName),
Chris@76 722 $row['id_member'],
Chris@76 723 $cleanMemberName,
Chris@76 724 ), $_POST['message']);
Chris@76 725
Chris@76 726 $subject = str_replace($from_member,
Chris@76 727 array(
Chris@76 728 $row['email_address'],
Chris@76 729 $row['real_name'],
Chris@76 730 $row['id_member'],
Chris@76 731 $row['real_name'],
Chris@76 732 ), $_POST['subject']);
Chris@76 733
Chris@76 734 // Send the actual email - or a PM!
Chris@76 735 if (!$context['send_pm'])
Chris@76 736 sendmail($row['email_address'], $subject, $message, null, null, !empty($_POST['send_html']), 5);
Chris@76 737 else
Chris@76 738 sendpm(array('to' => array($row['id_member']), 'bcc' => array()), $subject, $message);
Chris@76 739 }
Chris@76 740 $smcFunc['db_free_result']($result);
Chris@76 741 }
Chris@76 742
Chris@76 743 // If used our batch assume we still have a member.
Chris@76 744 if ($i >= $num_at_once)
Chris@76 745 $last_id_member = $context['start'];
Chris@76 746 // Or we didn't have one in range?
Chris@76 747 elseif (empty($last_id_member) && $context['start'] + $num_at_once < $context['max_id_member'])
Chris@76 748 $last_id_member = $context['start'] + $num_at_once;
Chris@76 749 // If we have no id_member then we're done.
Chris@76 750 elseif (empty($last_id_member) && empty($context['recipients']['emails']))
Chris@76 751 {
Chris@76 752 // Log this into the admin log.
Chris@76 753 logAction('newsletter', array(), 'admin');
Chris@76 754
Chris@76 755 redirectexit('action=admin');
Chris@76 756 }
Chris@76 757
Chris@76 758 $context['start'] = $last_id_member;
Chris@76 759
Chris@76 760 // Working out progress is a black art of sorts.
Chris@76 761 $percentEmails = $context['total_emails'] == 0 ? 0 : ((count($context['recipients']['emails']) / $context['total_emails']) * ($context['total_emails'] / ($context['total_emails'] + $context['max_id_member'])));
Chris@76 762 $percentMembers = ($context['start'] / $context['max_id_member']) * ($context['max_id_member'] / ($context['total_emails'] + $context['max_id_member']));
Chris@76 763 $context['percentage_done'] = round(($percentEmails + $percentMembers) * 100, 2);
Chris@76 764
Chris@76 765 $context['page_title'] = $txt['admin_newsletters'];
Chris@76 766 $context['sub_template'] = 'email_members_send';
Chris@76 767 }
Chris@76 768
Chris@76 769 function ModifyNewsSettings($return_config = false)
Chris@76 770 {
Chris@76 771 global $context, $sourcedir, $modSettings, $txt, $scripturl;
Chris@76 772
Chris@76 773 $config_vars = array(
Chris@76 774 array('title', 'settings'),
Chris@76 775 // Inline permissions.
Chris@76 776 array('permissions', 'edit_news', 'help' => ''),
Chris@76 777 array('permissions', 'send_mail'),
Chris@76 778 '',
Chris@76 779 // Just the remaining settings.
Chris@76 780 array('check', 'xmlnews_enable', 'onclick' => 'document.getElementById(\'xmlnews_maxlen\').disabled = !this.checked;'),
Chris@76 781 array('text', 'xmlnews_maxlen', 10),
Chris@76 782 );
Chris@76 783
Chris@76 784 if ($return_config)
Chris@76 785 return $config_vars;
Chris@76 786
Chris@76 787 $context['page_title'] = $txt['admin_edit_news'] . ' - ' . $txt['settings'];
Chris@76 788 $context['sub_template'] = 'show_settings';
Chris@76 789
Chris@76 790 // Needed for the inline permission functions, and the settings template.
Chris@76 791 require_once($sourcedir . '/ManagePermissions.php');
Chris@76 792 require_once($sourcedir . '/ManageServer.php');
Chris@76 793
Chris@76 794 // Wrap it all up nice and warm...
Chris@76 795 $context['post_url'] = $scripturl . '?action=admin;area=news;save;sa=settings';
Chris@76 796 $context['permissions_excluded'] = array(-1);
Chris@76 797
Chris@76 798 // Add some javascript at the bottom...
Chris@76 799 $context['settings_insert_below'] = '
Chris@76 800 <script type="text/javascript"><!-- // --><![CDATA[
Chris@76 801 document.getElementById("xmlnews_maxlen").disabled = !document.getElementById("xmlnews_enable").checked;
Chris@76 802 // ]]></script>';
Chris@76 803
Chris@76 804 // Saving the settings?
Chris@76 805 if (isset($_GET['save']))
Chris@76 806 {
Chris@76 807 checkSession();
Chris@76 808
Chris@76 809 saveDBSettings($config_vars);
Chris@76 810 redirectexit('action=admin;area=news;sa=settings');
Chris@76 811 }
Chris@76 812
Chris@76 813 prepareDBSettingContext($config_vars);
Chris@76 814 }
Chris@76 815
Chris@76 816 ?>