Mercurial > hg > vamp-website

annotate forum/Sources/ManagePaid.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.3
Chris@76 12 */
Chris@76 13
Chris@76 14 if (!defined('SMF'))
Chris@76 15 die('Hacking attempt...');
Chris@76 16
Chris@76 17 /* This file contains all the screens that control settings for topics and
Chris@76 18 posts.
Chris@76 19
Chris@76 20 void ManagePaidSubscriptions()
Chris@76 21 - the main entrance point for the 'Paid Subscription' screen.
Chris@76 22 - accessed from ?action=admin;area=paidsubscribe.
Chris@76 23 - calls the right function based on the given sub-action.
Chris@76 24 - defaults to sub-action 'view'.
Chris@76 25 - requires admin_forum permission for admin based actions.
Chris@76 26
Chris@76 27 void ModifySubscriptionSettings()
Chris@76 28 - set any setting related to paid subscriptions.
Chris@76 29 - requires the moderate_forum permission
Chris@76 30 - accessed from ?action=admin;area=paidsubscribe;sa=settings.
Chris@76 31
Chris@76 32 void ViewSubscriptions()
Chris@76 33 - view a list of all the current subscriptions
Chris@76 34 - requires the admin_forum permission
Chris@76 35 - accessed from ?action=admin;area=paidsubscribe;sa=view.
Chris@76 36
Chris@76 37 void ModifySubscription()
Chris@76 38 - edit a subscription.
Chris@76 39 - accessed from ?action=admin;area=paidsubscribe;sa=modify.
Chris@76 40
Chris@76 41 void ViewSubscribedUsers()
Chris@76 42 - view a list of all the users who currently have a subscription.
Chris@76 43 - requires the admin_forum permission.
Chris@76 44 - subscription ID is required, in the form of $_GET['sid'].
Chris@76 45 - accessed from ?action=admin;area=paidsubscribe;sa=viewsub.
Chris@76 46
Chris@76 47 int list_getSubscribedUserCount()
Chris@76 48 // !!
Chris@76 49
Chris@76 50 array list_getSubscribedUsers()
Chris@76 51 // !!
Chris@76 52
Chris@76 53 void ModifyUserSubscription()
Chris@76 54 - edit a users subscription.
Chris@76 55 - accessed from ?action=admin;area=paidsubscribe;sa=modifyuser.
Chris@76 56
Chris@76 57 void reapplySubscriptions(array users)
Chris@76 58 - reapplies all subscription rules for each of the users.
Chris@76 59
Chris@76 60 void addSubscription(int id_subscribe, int id_member)
Chris@76 61 - add/extend a subscription for a member.
Chris@76 62
Chris@76 63 void removeSubscription(int id_subscribe, int id_member)
Chris@76 64 - remove a subscription from a user.
Chris@76 65
Chris@76 66 array loadPaymentGateways()
Chris@76 67 - checks the Sources directory for any files fitting the format of a payment gateway.
Chris@76 68 - loads each file to check it's valid.
Chris@76 69 - includes each file and returns the function name and whether it should work with this version of SMF.
Chris@76 70 */
Chris@76 71
Chris@76 72 function ManagePaidSubscriptions()
Chris@76 73 {
Chris@76 74 global $context, $txt, $scripturl, $sourcedir, $smcFunc, $modSettings;
Chris@76 75
Chris@76 76 // Load the required language and template.
Chris@76 77 loadLanguage('ManagePaid');
Chris@76 78 loadTemplate('ManagePaid');
Chris@76 79
Chris@76 80 $subActions = array(
Chris@76 81 'modify' => array('ModifySubscription', 'admin_forum'),
Chris@76 82 'modifyuser' => array('ModifyUserSubscription', 'admin_forum'),
Chris@76 83 'settings' => array('ModifySubscriptionSettings', 'admin_forum'),
Chris@76 84 'view' => array('ViewSubscriptions', 'admin_forum'),
Chris@76 85 'viewsub' => array('ViewSubscribedUsers', 'admin_forum'),
Chris@76 86 );
Chris@76 87
Chris@76 88 // Default the sub-action to 'view subscriptions', but only if they have already set things up..
Chris@76 89 $_REQUEST['sa'] = isset($_REQUEST['sa']) && isset($subActions[$_REQUEST['sa']]) ? $_REQUEST['sa'] : (!empty($modSettings['paid_currency_symbol']) ? 'view' : 'settings');
Chris@76 90
Chris@76 91 // Make sure you can do this.
Chris@76 92 isAllowedTo($subActions[$_REQUEST['sa']][1]);
Chris@76 93
Chris@76 94 $context['page_title'] = $txt['paid_subscriptions'];
Chris@76 95
Chris@76 96 // Tabs for browsing the different subscription functions.
Chris@76 97 $context[$context['admin_menu_name']]['tab_data'] = array(
Chris@76 98 'title' => $txt['paid_subscriptions'],
Chris@76 99 'help' => '',
Chris@76 100 'description' => $txt['paid_subscriptions_desc'],
Chris@76 101 'tabs' => array(
Chris@76 102 'view' => array(
Chris@76 103 'description' => $txt['paid_subs_view_desc'],
Chris@76 104 ),
Chris@76 105 'settings' => array(
Chris@76 106 'description' => $txt['paid_subs_settings_desc'],
Chris@76 107 ),
Chris@76 108 ),
Chris@76 109 );
Chris@76 110
Chris@76 111 // Call the right function for this sub-acton.
Chris@76 112 $subActions[$_REQUEST['sa']][0]();
Chris@76 113 }
Chris@76 114
Chris@76 115 // Modify which payment methods are to be used.
Chris@76 116 function ModifySubscriptionSettings($return_config = false)
Chris@76 117 {
Chris@76 118 global $context, $txt, $modSettings, $sourcedir, $smcFunc, $scripturl;
Chris@76 119
Chris@76 120 // If the currency is set to something different then we need to set it to other for this to work and set it back shortly.
Chris@76 121 $modSettings['paid_currency'] = !empty($modSettings['paid_currency_code']) ? $modSettings['paid_currency_code'] : '';
Chris@76 122 if (!empty($modSettings['paid_currency_code']) && !in_array($modSettings['paid_currency_code'], array('usd', 'eur', 'gbp')))
Chris@76 123 $modSettings['paid_currency'] = 'other';
Chris@76 124
Chris@76 125 // These are all the default settings.
Chris@76 126 $config_vars = array(
Chris@76 127 array('select', 'paid_email', array(0 => $txt['paid_email_no'], 1 => $txt['paid_email_error'], 2 => $txt['paid_email_all']), 'subtext' => $txt['paid_email_desc']),
Chris@76 128 array('text', 'paid_email_to', 'subtext' => $txt['paid_email_to_desc'], 'size' => 60),
Chris@76 129 '',
Chris@76 130 'dummy_currency' => array('select', 'paid_currency', array('usd' => $txt['usd'], 'eur' => $txt['eur'], 'gbp' => $txt['gbp'], 'other' => $txt['other']), 'javascript' => 'onchange="toggleOther();"'),
Chris@76 131 array('text', 'paid_currency_code', 'subtext' => $txt['paid_currency_code_desc'], 'size' => 5, 'force_div_id' => 'custom_currency_code_div'),
Chris@76 132 array('text', 'paid_currency_symbol', 'subtext' => $txt['paid_currency_symbol_desc'], 'size' => 8, 'force_div_id' => 'custom_currency_symbol_div'),
Chris@76 133 array('check', 'paidsubs_test', 'subtext' => $txt['paidsubs_test_desc'], 'onclick' => 'return document.getElementById(\'paidsubs_test\').checked ? confirm(\'' . $txt['paidsubs_test_confirm'] . '\') : true;'),
Chris@76 134 );
Chris@76 135
Chris@76 136 // Now load all the other gateway settings.
Chris@76 137 $gateways = loadPaymentGateways();
Chris@76 138 foreach ($gateways as $gateway)
Chris@76 139 {
Chris@76 140 $gatewayClass = new $gateway['display_class']();
Chris@76 141 $setting_data = $gatewayClass->getGatewaySettings();
Chris@76 142 if (!empty($setting_data))
Chris@76 143 {
Chris@76 144 $config_vars[] = array('title', $gatewayClass->title, 'text_label' => (isset($txt['paidsubs_gateway_title_' . $gatewayClass->title]) ? $txt['paidsubs_gateway_title_' . $gatewayClass->title] : $gatewayClass->title));
Chris@76 145 $config_vars = array_merge($config_vars, $setting_data);
Chris@76 146 }
Chris@76 147 }
Chris@76 148
Chris@76 149 // Just searching?
Chris@76 150 if ($return_config)
Chris@76 151 return $config_vars;
Chris@76 152
Chris@76 153 // Get the settings template fired up.
Chris@76 154 require_once($sourcedir . '/ManageServer.php');
Chris@76 155
Chris@76 156 // Some important context stuff
Chris@76 157 $context['page_title'] = $txt['settings'];
Chris@76 158 $context['sub_template'] = 'show_settings';
Chris@76 159 $context['settings_message'] = '<span class="smalltext">' . $txt['paid_note'] . '</span>';
Chris@76 160 $context[$context['admin_menu_name']]['current_subsection'] = 'settings';
Chris@76 161
Chris@76 162 // Get the final touches in place.
Chris@76 163 $context['post_url'] = $scripturl . '?action=admin;area=paidsubscribe;save;sa=settings';
Chris@76 164 $context['settings_title'] = $txt['settings'];
Chris@76 165
Chris@76 166 // We want javascript for our currency options.
Chris@76 167 $context['settings_insert_below'] = '
Chris@76 168 <script type="text/javascript"><!-- // --><![CDATA[
Chris@76 169 function toggleOther()
Chris@76 170 {
Chris@76 171 var otherOn = document.getElementById("paid_currency").value == \'other\';
Chris@76 172 var currencydd = document.getElementById("custom_currency_code_div_dd");
Chris@76 173
Chris@76 174 if (otherOn)
Chris@76 175 {
Chris@76 176 document.getElementById("custom_currency_code_div").style.display = "";
Chris@76 177 document.getElementById("custom_currency_symbol_div").style.display = "";
Chris@76 178
Chris@76 179 if (currencydd)
Chris@76 180 {
Chris@76 181 document.getElementById("custom_currency_code_div_dd").style.display = "";
Chris@76 182 document.getElementById("custom_currency_symbol_div_dd").style.display = "";
Chris@76 183 }
Chris@76 184 }
Chris@76 185 else
Chris@76 186 {
Chris@76 187 document.getElementById("custom_currency_code_div").style.display = "none";
Chris@76 188 document.getElementById("custom_currency_symbol_div").style.display = "none";
Chris@76 189
Chris@76 190 if (currencydd)
Chris@76 191 {
Chris@76 192 document.getElementById("custom_currency_symbol_div_dd").style.display = "none";
Chris@76 193 document.getElementById("custom_currency_code_div_dd").style.display = "none";
Chris@76 194 }
Chris@76 195 }
Chris@76 196 }
Chris@76 197 toggleOther();
Chris@76 198 // ]]></script>';
Chris@76 199
Chris@76 200 // Saving the settings?
Chris@76 201 if (isset($_GET['save']))
Chris@76 202 {
Chris@76 203 checkSession();
Chris@76 204
Chris@76 205 // Sort out the currency stuff.
Chris@76 206 if ($_POST['paid_currency'] != 'other')
Chris@76 207 {
Chris@76 208 $_POST['paid_currency_code'] = $_POST['paid_currency'];
Chris@76 209 $_POST['paid_currency_symbol'] = $txt[$_POST['paid_currency'] . '_symbol'];
Chris@76 210 }
Chris@76 211 unset($config_vars['dummy_currency']);
Chris@76 212
Chris@76 213 saveDBSettings($config_vars);
Chris@76 214
Chris@76 215 redirectexit('action=admin;area=paidsubscribe;sa=settings');
Chris@76 216 }
Chris@76 217
Chris@76 218 // Prepare the settings...
Chris@76 219 prepareDBSettingContext($config_vars);
Chris@76 220 }
Chris@76 221
Chris@76 222 // Are we looking at viewing the subscriptions?
Chris@76 223 function ViewSubscriptions()
Chris@76 224 {
Chris@76 225 global $context, $txt, $modSettings, $smcFunc, $sourcedir, $scripturl;
Chris@76 226
Chris@76 227 // Not made the settings yet?
Chris@76 228 if (empty($modSettings['paid_currency_symbol']))
Chris@76 229 fatal_lang_error('paid_not_set_currency', false, $scripturl . '?action=admin;area=paidsubscribe;sa=settings');
Chris@76 230
Chris@76 231 // Some basic stuff.
Chris@76 232 $context['page_title'] = $txt['paid_subs_view'];
Chris@76 233 loadSubscriptions();
Chris@76 234
Chris@76 235 $listOptions = array(
Chris@76 236 'id' => 'subscription_list',
Chris@76 237 'items_per_page' => 20,
Chris@76 238 'base_href' => $scripturl . '?action=admin;area=paidsubscribe;sa=view',
Chris@76 239 'get_items' => array(
Chris@76 240 'function' => create_function('', '
Chris@76 241 global $context;
Chris@76 242 return $context[\'subscriptions\'];
Chris@76 243 '),
Chris@76 244 ),
Chris@76 245 'get_count' => array(
Chris@76 246 'function' => create_function('', '
Chris@76 247 global $context;
Chris@76 248 return count($context[\'subscriptions\']);
Chris@76 249 '),
Chris@76 250 ),
Chris@76 251 'no_items_label' => $txt['paid_none_yet'],
Chris@76 252 'columns' => array(
Chris@76 253 'name' => array(
Chris@76 254 'header' => array(
Chris@76 255 'value' => $txt['paid_name'],
Chris@76 256 'style' => 'text-align: left; width: 35%;',
Chris@76 257 ),
Chris@76 258 'data' => array(
Chris@76 259 'function' => create_function('$rowData', '
Chris@76 260 global $scripturl;
Chris@76 261
Chris@76 262 return sprintf(\'<a href="%1$s?action=admin;area=paidsubscribe;sa=viewsub;sid=%2$s">%3$s</a>\', $scripturl, $rowData[\'id\'], $rowData[\'name\']);
Chris@76 263 '),
Chris@76 264 ),
Chris@76 265 ),
Chris@76 266 'cost' => array(
Chris@76 267 'header' => array(
Chris@76 268 'value' => $txt['paid_cost'],
Chris@76 269 'style' => 'text-align: left;',
Chris@76 270 ),
Chris@76 271 'data' => array(
Chris@76 272 'function' => create_function('$rowData', '
Chris@76 273 global $context, $txt;
Chris@76 274
Chris@76 275 return $rowData[\'flexible\'] ? \'<em>\' . $txt[\'flexible\'] . \'</em>\' : $rowData[\'cost\'] . \' / \' . $rowData[\'length\'];
Chris@76 276 '),
Chris@76 277 ),
Chris@76 278 ),
Chris@76 279 'pending' => array(
Chris@76 280 'header' => array(
Chris@76 281 'value' => $txt['paid_pending'],
Chris@76 282 'style' => 'width: 18%;',
Chris@76 283 ),
Chris@76 284 'data' => array(
Chris@76 285 'db_htmlsafe' => 'pending',
Chris@76 286 'style' => 'text-align: center;',
Chris@76 287 ),
Chris@76 288 ),
Chris@76 289 'finished' => array(
Chris@76 290 'header' => array(
Chris@76 291 'value' => $txt['paid_finished'],
Chris@76 292 ),
Chris@76 293 'data' => array(
Chris@76 294 'db_htmlsafe' => 'finished',
Chris@76 295 'style' => 'text-align: center;',
Chris@76 296 ),
Chris@76 297 ),
Chris@76 298 'total' => array(
Chris@76 299 'header' => array(
Chris@76 300 'value' => $txt['paid_active'],
Chris@76 301 ),
Chris@76 302 'data' => array(
Chris@76 303 'db_htmlsafe' => 'total',
Chris@76 304 'style' => 'text-align: center;',
Chris@76 305 ),
Chris@76 306 ),
Chris@76 307 'is_active' => array(
Chris@76 308 'header' => array(
Chris@76 309 'value' => $txt['paid_is_active'],
Chris@76 310 ),
Chris@76 311 'data' => array(
Chris@76 312 'function' => create_function('$rowData', '
Chris@76 313 global $context, $txt;
Chris@76 314
Chris@76 315 return \'<span style="color: \' . ($rowData[\'active\'] ? \'green\' : \'red\') . \'">\' . ($rowData[\'active\'] ? $txt[\'yes\'] : $txt[\'no\']) . \'</span>\';
Chris@76 316 '),
Chris@76 317 'style' => 'text-align: center;',
Chris@76 318 ),
Chris@76 319 ),
Chris@76 320 'modify' => array(
Chris@76 321 'data' => array(
Chris@76 322 'function' => create_function('$rowData', '
Chris@76 323 global $context, $txt, $scripturl;
Chris@76 324
Chris@76 325 return \'<a href="\' . $scripturl . \'?action=admin;area=paidsubscribe;sa=modify;sid=\' . $rowData[\'id\'] . \'">\' . $txt[\'modify\'] . \'</a>\';
Chris@76 326 '),
Chris@76 327 'style' => 'text-align: center;',
Chris@76 328 ),
Chris@76 329 ),
Chris@76 330 'delete' => array(
Chris@76 331 'data' => array(
Chris@76 332 'function' => create_function('$rowData', '
Chris@76 333 global $context, $txt, $scripturl;
Chris@76 334
Chris@76 335 return \'<a href="\' . $scripturl . \'?action=admin;area=paidsubscribe;sa=modify;delete;sid=\' . $rowData[\'id\'] . \'">\' . $txt[\'delete\'] . \'</a>\';
Chris@76 336 '),
Chris@76 337 'style' => 'text-align: center;',
Chris@76 338 ),
Chris@76 339 ),
Chris@76 340 ),
Chris@76 341 'form' => array(
Chris@76 342 'href' => $scripturl . '?action=admin;area=paidsubscribe;sa=modify',
Chris@76 343 ),
Chris@76 344 'additional_rows' => array(
Chris@76 345 array(
Chris@76 346 'position' => 'below_table_data',
Chris@76 347 'value' => '
Chris@76 348 <input type="submit" name="add" value="' . $txt['paid_add_subscription'] . '" class="button_submit" />
Chris@76 349 ',
Chris@76 350 'style' => 'text-align: right;',
Chris@76 351 ),
Chris@76 352 ),
Chris@76 353 );
Chris@76 354
Chris@76 355 require_once($sourcedir . '/Subs-List.php');
Chris@76 356 createList($listOptions);
Chris@76 357
Chris@76 358 $context['sub_template'] = 'show_list';
Chris@76 359 $context['default_list'] = 'subscription_list';
Chris@76 360 }
Chris@76 361
Chris@76 362 // Adding, editing and deleting subscriptions.
Chris@76 363 function ModifySubscription()
Chris@76 364 {
Chris@76 365 global $context, $txt, $modSettings, $smcFunc;
Chris@76 366
Chris@76 367 $context['sub_id'] = isset($_REQUEST['sid']) ? (int) $_REQUEST['sid'] : 0;
Chris@76 368 $context['action_type'] = $context['sub_id'] ? (isset($_REQUEST['delete']) ? 'delete' : 'edit') : 'add';
Chris@76 369
Chris@76 370 // Setup the template.
Chris@76 371 $context['sub_template'] = $context['action_type'] == 'delete' ? 'delete_subscription' : 'modify_subscription';
Chris@76 372 $context['page_title'] = $txt['paid_' . $context['action_type'] . '_subscription'];
Chris@76 373
Chris@76 374 // Delete it?
Chris@76 375 if (isset($_POST['delete_confirm']) && isset($_REQUEST['delete']))
Chris@76 376 {
Chris@76 377 checkSession();
Chris@76 378
Chris@76 379 $smcFunc['db_query']('delete_subscription', '
Chris@76 380 DELETE FROM {db_prefix}subscriptions
Chris@76 381 WHERE id_subscribe = {int:current_subscription}',
Chris@76 382 array(
Chris@76 383 'current_subscription' => $context['sub_id'],
Chris@76 384 )
Chris@76 385 );
Chris@76 386
Chris@76 387 redirectexit('action=admin;area=paidsubscribe;view');
Chris@76 388 }
Chris@76 389
Chris@76 390 // Saving?
Chris@76 391 if (isset($_POST['save']))
Chris@76 392 {
Chris@76 393 checkSession();
Chris@76 394
Chris@76 395 // Some cleaning...
Chris@76 396 $isActive = isset($_POST['active']) ? 1 : 0;
Chris@76 397 $isRepeatable = isset($_POST['repeatable']) ? 1 : 0;
Chris@76 398 $allowpartial = isset($_POST['allow_partial']) ? 1 : 0;
Chris@76 399 $reminder = isset($_POST['reminder']) ? (int) $_POST['reminder'] : 0;
Chris@76 400 $emailComplete = strlen($_POST['emailcomplete']) > 10 ? trim($_POST['emailcomplete']) : '';
Chris@76 401
Chris@76 402 // Is this a fixed one?
Chris@76 403 if ($_POST['duration_type'] == 'fixed')
Chris@76 404 {
Chris@76 405 // Clean the span.
Chris@76 406 $span = $_POST['span_value'] . $_POST['span_unit'];
Chris@76 407
Chris@76 408 // Sort out the cost.
Chris@76 409 $cost = array('fixed' => sprintf('%01.2f', strtr($_POST['cost'], ',', '.')));
Chris@76 410
Chris@76 411 // There needs to be something.
Chris@76 412 if (empty($_POST['span_value']) || empty($_POST['cost']))
Chris@76 413 fatal_lang_error('paid_no_cost_value');
Chris@76 414 }
Chris@76 415 // Flexible is harder but more fun ;)
Chris@76 416 else
Chris@76 417 {
Chris@76 418 $span = 'F';
Chris@76 419
Chris@76 420 $cost = array(
Chris@76 421 'day' => sprintf('%01.2f', strtr($_POST['cost_day'], ',', '.')),
Chris@76 422 'week' => sprintf('%01.2f', strtr($_POST['cost_week'], ',', '.')),
Chris@76 423 'month' => sprintf('%01.2f', strtr($_POST['cost_month'], ',', '.')),
Chris@76 424 'year' => sprintf('%01.2f', strtr($_POST['cost_year'], ',', '.')),
Chris@76 425 );
Chris@76 426
Chris@76 427 if (empty($_POST['cost_day']) && empty($_POST['cost_week']) && empty($_POST['cost_month']) && empty($_POST['cost_year']))
Chris@76 428 fatal_lang_error('paid_all_freq_blank');
Chris@76 429 }
Chris@76 430 $cost = serialize($cost);
Chris@76 431
Chris@76 432 // Yep, time to do additional groups.
Chris@76 433 $addgroups = array();
Chris@76 434 if (!empty($_POST['addgroup']))
Chris@76 435 foreach ($_POST['addgroup'] as $id => $dummy)
Chris@76 436 $addgroups[] = (int) $id;
Chris@76 437 $addgroups = implode(',', $addgroups);
Chris@76 438
Chris@76 439 // Is it new?!
Chris@76 440 if ($context['action_type'] == 'add')
Chris@76 441 {
Chris@76 442 $smcFunc['db_insert']('',
Chris@76 443 '{db_prefix}subscriptions',
Chris@76 444 array(
Chris@76 445 'name' => 'string-60', 'description' => 'string-255', 'active' => 'int', 'length' => 'string-4', 'cost' => 'string',
Chris@76 446 'id_group' => 'int', 'add_groups' => 'string-40', 'repeatable' => 'int', 'allow_partial' => 'int', 'email_complete' => 'string',
Chris@76 447 'reminder' => 'int',
Chris@76 448 ),
Chris@76 449 array(
Chris@76 450 $_POST['name'], $_POST['desc'], $isActive, $span, $cost,
Chris@76 451 $_POST['prim_group'], $addgroups, $isRepeatable, $allowpartial, $emailComplete,
Chris@76 452 $reminder,
Chris@76 453 ),
Chris@76 454 array('id_subscribe')
Chris@76 455 );
Chris@76 456 }
Chris@76 457 // Otherwise must be editing.
Chris@76 458 else
Chris@76 459 {
Chris@76 460 // Don't do groups if there are active members
Chris@76 461 $request = $smcFunc['db_query']('', '
Chris@76 462 SELECT COUNT(*)
Chris@76 463 FROM {db_prefix}log_subscribed
Chris@76 464 WHERE id_subscribe = {int:current_subscription}
Chris@76 465 AND status = {int:is_active}',
Chris@76 466 array(
Chris@76 467 'current_subscription' => $context['sub_id'],
Chris@76 468 'is_active' => 1,
Chris@76 469 )
Chris@76 470 );
Chris@76 471 list ($disableGroups) = $smcFunc['db_fetch_row']($request);
Chris@76 472 $smcFunc['db_free_result']($request);
Chris@76 473
Chris@76 474 $smcFunc['db_query']('substring', '
Chris@76 475 UPDATE {db_prefix}subscriptions
Chris@76 476 SET name = SUBSTRING({string:name}, 1, 60), description = SUBSTRING({string:description}, 1, 255), active = {int:is_active},
Chris@76 477 length = SUBSTRING({string:length}, 1, 4), cost = {string:cost}' . ($disableGroups ? '' : ', id_group = {int:id_group},
Chris@76 478 add_groups = {string:additional_groups}') . ', repeatable = {int:repeatable}, allow_partial = {int:allow_partial},
Chris@76 479 email_complete = {string:email_complete}, reminder = {int:reminder}
Chris@76 480 WHERE id_subscribe = {int:current_subscription}',
Chris@76 481 array(
Chris@76 482 'is_active' => $isActive,
Chris@76 483 'id_group' => !empty($_POST['prim_group']) ? $_POST['prim_group'] : 0,
Chris@76 484 'repeatable' => $isRepeatable,
Chris@76 485 'allow_partial' => $allowpartial,
Chris@76 486 'reminder' => $reminder,
Chris@76 487 'current_subscription' => $context['sub_id'],
Chris@76 488 'name' => $_POST['name'],
Chris@76 489 'description' => $_POST['desc'],
Chris@76 490 'length' => $span,
Chris@76 491 'cost' => $cost,
Chris@76 492 'additional_groups' => !empty($addgroups) ? $addgroups : '',
Chris@76 493 'email_complete' => $emailComplete,
Chris@76 494 )
Chris@76 495 );
Chris@76 496 }
Chris@76 497
Chris@76 498 redirectexit('action=admin;area=paidsubscribe;view');
Chris@76 499 }
Chris@76 500
Chris@76 501 // Defaults.
Chris@76 502 if ($context['action_type'] == 'add')
Chris@76 503 {
Chris@76 504 $context['sub'] = array(
Chris@76 505 'name' => '',
Chris@76 506 'desc' => '',
Chris@76 507 'cost' => array(
Chris@76 508 'fixed' => 0,
Chris@76 509 ),
Chris@76 510 'span' => array(
Chris@76 511 'value' => '',
Chris@76 512 'unit' => 'D',
Chris@76 513 ),
Chris@76 514 'prim_group' => 0,
Chris@76 515 'add_groups' => array(),
Chris@76 516 'active' => 1,
Chris@76 517 'repeatable' => 1,
Chris@76 518 'allow_partial' => 0,
Chris@76 519 'duration' => 'fixed',
Chris@76 520 'email_complete' => '',
Chris@76 521 'reminder' => 0,
Chris@76 522 );
Chris@76 523 }
Chris@76 524 // Otherwise load up all the details.
Chris@76 525 else
Chris@76 526 {
Chris@76 527 $request = $smcFunc['db_query']('', '
Chris@76 528 SELECT name, description, cost, length, id_group, add_groups, active, repeatable, allow_partial, email_complete, reminder
Chris@76 529 FROM {db_prefix}subscriptions
Chris@76 530 WHERE id_subscribe = {int:current_subscription}
Chris@76 531 LIMIT 1',
Chris@76 532 array(
Chris@76 533 'current_subscription' => $context['sub_id'],
Chris@76 534 )
Chris@76 535 );
Chris@76 536 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 537 {
Chris@76 538 // Sort the date.
Chris@76 539 preg_match('~(\d*)(\w)~', $row['length'], $match);
Chris@76 540 if (isset($match[2]))
Chris@76 541 {
Chris@76 542 $span_value = $match[1];
Chris@76 543 $span_unit = $match[2];
Chris@76 544 }
Chris@76 545 else
Chris@76 546 {
Chris@76 547 $span_value = 0;
Chris@76 548 $span_unit = 'D';
Chris@76 549 }
Chris@76 550
Chris@76 551 // Is this a flexible one?
Chris@76 552 if ($row['length'] == 'F')
Chris@76 553 $isFlexible = true;
Chris@76 554 else
Chris@76 555 $isFlexible = false;
Chris@76 556
Chris@76 557 $context['sub'] = array(
Chris@76 558 'name' => $row['name'],
Chris@76 559 'desc' => $row['description'],
Chris@76 560 'cost' => @unserialize($row['cost']),
Chris@76 561 'span' => array(
Chris@76 562 'value' => $span_value,
Chris@76 563 'unit' => $span_unit,
Chris@76 564 ),
Chris@76 565 'prim_group' => $row['id_group'],
Chris@76 566 'add_groups' => explode(',', $row['add_groups']),
Chris@76 567 'active' => $row['active'],
Chris@76 568 'repeatable' => $row['repeatable'],
Chris@76 569 'allow_partial' => $row['allow_partial'],
Chris@76 570 'duration' => $isFlexible ? 'flexible' : 'fixed',
Chris@76 571 'email_complete' => htmlspecialchars($row['email_complete']),
Chris@76 572 'reminder' => $row['reminder'],
Chris@76 573 );
Chris@76 574 }
Chris@76 575 $smcFunc['db_free_result']($request);
Chris@76 576
Chris@76 577 // Does this have members who are active?
Chris@76 578 $request = $smcFunc['db_query']('', '
Chris@76 579 SELECT COUNT(*)
Chris@76 580 FROM {db_prefix}log_subscribed
Chris@76 581 WHERE id_subscribe = {int:current_subscription}
Chris@76 582 AND status = {int:is_active}',
Chris@76 583 array(
Chris@76 584 'current_subscription' => $context['sub_id'],
Chris@76 585 'is_active' => 1,
Chris@76 586 )
Chris@76 587 );
Chris@76 588 list ($context['disable_groups']) = $smcFunc['db_fetch_row']($request);
Chris@76 589 $smcFunc['db_free_result']($request);
Chris@76 590 }
Chris@76 591
Chris@76 592 // Load up all the groups.
Chris@76 593 $request = $smcFunc['db_query']('', '
Chris@76 594 SELECT id_group, group_name
Chris@76 595 FROM {db_prefix}membergroups
Chris@76 596 WHERE id_group != {int:moderator_group}
Chris@76 597 AND min_posts = {int:min_posts}',
Chris@76 598 array(
Chris@76 599 'moderator_group' => 3,
Chris@76 600 'min_posts' => -1,
Chris@76 601 )
Chris@76 602 );
Chris@76 603 $context['groups'] = array();
Chris@76 604 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 605 $context['groups'][$row['id_group']] = $row['group_name'];
Chris@76 606 $smcFunc['db_free_result']($request);
Chris@76 607 }
Chris@76 608
Chris@76 609 // View all the users subscribed to a particular subscription!
Chris@76 610 function ViewSubscribedUsers()
Chris@76 611 {
Chris@76 612 global $context, $txt, $modSettings, $scripturl, $options, $smcFunc, $sourcedir;
Chris@76 613
Chris@76 614 // Setup the template.
Chris@76 615 $context['page_title'] = $txt['viewing_users_subscribed'];
Chris@76 616
Chris@76 617 // ID of the subscription.
Chris@76 618 $context['sub_id'] = (int) $_REQUEST['sid'];
Chris@76 619
Chris@76 620 // Load the subscription information.
Chris@76 621 $request = $smcFunc['db_query']('', '
Chris@76 622 SELECT id_subscribe, name, description, cost, length, id_group, add_groups, active
Chris@76 623 FROM {db_prefix}subscriptions
Chris@76 624 WHERE id_subscribe = {int:current_subscription}',
Chris@76 625 array(
Chris@76 626 'current_subscription' => $context['sub_id'],
Chris@76 627 )
Chris@76 628 );
Chris@76 629 // Something wrong?
Chris@76 630 if ($smcFunc['db_num_rows']($request) == 0)
Chris@76 631 fatal_lang_error('no_access', false);
Chris@76 632 // Do the subscription context.
Chris@76 633 $row = $smcFunc['db_fetch_assoc']($request);
Chris@76 634 $context['subscription'] = array(
Chris@76 635 'id' => $row['id_subscribe'],
Chris@76 636 'name' => $row['name'],
Chris@76 637 'desc' => $row['description'],
Chris@76 638 'active' => $row['active'],
Chris@76 639 );
Chris@76 640 $smcFunc['db_free_result']($request);
Chris@76 641
Chris@76 642 // Are we searching for people?
Chris@76 643 $search_string = isset($_POST['ssearch']) && !empty($_POST['sub_search']) ? ' AND IFNULL(mem.real_name, {string:guest}) LIKE {string:search}' : '';
Chris@76 644 $search_vars = empty($_POST['sub_search']) ? array() : array('search' => '%' . $_POST['sub_search'] . '%', 'guest' => $txt['guest']);
Chris@76 645
Chris@76 646 $listOptions = array(
Chris@76 647 'id' => 'subscribed_users_list',
Chris@76 648 'items_per_page' => 20,
Chris@76 649 'base_href' => $scripturl . '?action=admin;area=paidsubscribe;sa=viewsub;sid=' . $context['sub_id'],
Chris@76 650 'default_sort_col' => 'name',
Chris@76 651 'get_items' => array(
Chris@76 652 'function' => 'list_getSubscribedUsers',
Chris@76 653 'params' => array(
Chris@76 654 $context['sub_id'],
Chris@76 655 $search_string,
Chris@76 656 $search_vars,
Chris@76 657 ),
Chris@76 658 ),
Chris@76 659 'get_count' => array(
Chris@76 660 'function' => 'list_getSubscribedUserCount',
Chris@76 661 'params' => array(
Chris@76 662 $context['sub_id'],
Chris@76 663 $search_string,
Chris@76 664 $search_vars,
Chris@76 665 ),
Chris@76 666 ),
Chris@76 667 'no_items_label' => $txt['no_subscribers'],
Chris@76 668 'columns' => array(
Chris@76 669 'name' => array(
Chris@76 670 'header' => array(
Chris@76 671 'value' => $txt['who_member'],
Chris@76 672 'style' => 'text-align: left; width: 20%;',
Chris@76 673 ),
Chris@76 674 'data' => array(
Chris@76 675 'function' => create_function('$rowData', '
Chris@76 676 global $context, $txt, $scripturl;
Chris@76 677
Chris@76 678 return $rowData[\'id_member\'] == 0 ? $txt[\'guest\'] : \'<a href="\' . $scripturl . \'?action=profile;u=\' . $rowData[\'id_member\'] . \'">\' . $rowData[\'name\'] . \'</a>\';
Chris@76 679 '),
Chris@76 680 ),
Chris@76 681 'sort' => array(
Chris@76 682 'default' => 'name',
Chris@76 683 'reverse' => 'name DESC',
Chris@76 684 ),
Chris@76 685 ),
Chris@76 686 'status' => array(
Chris@76 687 'header' => array(
Chris@76 688 'value' => $txt['paid_status'],
Chris@76 689 'style' => 'text-align: left; width: 10%;',
Chris@76 690 ),
Chris@76 691 'data' => array(
Chris@76 692 'db_htmlsafe' => 'status_text',
Chris@76 693 ),
Chris@76 694 'sort' => array(
Chris@76 695 'default' => 'status',
Chris@76 696 'reverse' => 'status DESC',
Chris@76 697 ),
Chris@76 698 ),
Chris@76 699 'payments_pending' => array(
Chris@76 700 'header' => array(
Chris@76 701 'value' => $txt['paid_payments_pending'],
Chris@76 702 'style' => 'text-align: left; width: 10%;',
Chris@76 703 ),
Chris@76 704 'data' => array(
Chris@76 705 'db_htmlsafe' => 'pending',
Chris@76 706 ),
Chris@76 707 'sort' => array(
Chris@76 708 'default' => 'payments_pending',
Chris@76 709 'reverse' => 'payments_pending DESC',
Chris@76 710 ),
Chris@76 711 ),
Chris@76 712 'start_time' => array(
Chris@76 713 'header' => array(
Chris@76 714 'value' => $txt['start_date'],
Chris@76 715 'style' => 'text-align: left; width: 20%;',
Chris@76 716 ),
Chris@76 717 'data' => array(
Chris@76 718 'db_htmlsafe' => 'start_date',
Chris@76 719 'class' => 'smalltext',
Chris@76 720 ),
Chris@76 721 'sort' => array(
Chris@76 722 'default' => 'start_time',
Chris@76 723 'reverse' => 'start_time DESC',
Chris@76 724 ),
Chris@76 725 ),
Chris@76 726 'end_time' => array(
Chris@76 727 'header' => array(
Chris@76 728 'value' => $txt['end_date'],
Chris@76 729 'style' => 'text-align: left; width: 20%;',
Chris@76 730 ),
Chris@76 731 'data' => array(
Chris@76 732 'db_htmlsafe' => 'end_date',
Chris@76 733 'class' => 'smalltext',
Chris@76 734 ),
Chris@76 735 'sort' => array(
Chris@76 736 'default' => 'end_time',
Chris@76 737 'reverse' => 'end_time DESC',
Chris@76 738 ),
Chris@76 739 ),
Chris@76 740 'modify' => array(
Chris@76 741 'header' => array(
Chris@76 742 'style' => 'width: 10%;',
Chris@76 743 ),
Chris@76 744 'data' => array(
Chris@76 745 'function' => create_function('$rowData', '
Chris@76 746 global $context, $txt, $scripturl;
Chris@76 747
Chris@76 748 return \'<a href="\' . $scripturl . \'?action=admin;area=paidsubscribe;sa=modifyuser;lid=\' . $rowData[\'id\'] . \'">\' . $txt[\'modify\'] . \'</a>\';
Chris@76 749 '),
Chris@76 750 'style' => 'text-align: center;',
Chris@76 751 ),
Chris@76 752 ),
Chris@76 753 'delete' => array(
Chris@76 754 'header' => array(
Chris@76 755 'style' => 'width: 4%;',
Chris@76 756 ),
Chris@76 757 'data' => array(
Chris@76 758 'function' => create_function('$rowData', '
Chris@76 759 global $context, $txt, $scripturl;
Chris@76 760
Chris@76 761 return \'<input type="checkbox" name="delsub[\' . $rowData[\'id\'] . \']" class="input_check" />\';
Chris@76 762 '),
Chris@76 763 'style' => 'text-align: center;',
Chris@76 764 ),
Chris@76 765 ),
Chris@76 766 ),
Chris@76 767 'form' => array(
Chris@76 768 'href' => $scripturl . '?action=admin;area=paidsubscribe;sa=modifyuser;sid=' . $context['sub_id'],
Chris@76 769 ),
Chris@76 770 'additional_rows' => array(
Chris@76 771 array(
Chris@76 772 'position' => 'below_table_data',
Chris@76 773 'value' => '
Chris@76 774 <div class="floatleft">
Chris@76 775 <input type="submit" name="add" value="' . $txt['add_subscriber'] . '" class="button_submit" />
Chris@76 776 </div>
Chris@76 777 <div class="floatright">
Chris@76 778 <input type="submit" name="finished" value="' . $txt['complete_selected'] . '" onclick="return confirm(\'' . $txt['complete_are_sure'] . '\');" class="button_submit" />
Chris@76 779 <input type="submit" name="delete" value="' . $txt['delete_selected'] . '" onclick="return confirm(\'' . $txt['delete_are_sure'] . '\');" class="button_submit" />
Chris@76 780 </div>
Chris@76 781 ',
Chris@76 782 ),
Chris@76 783 array(
Chris@76 784 'position' => 'top_of_list',
Chris@76 785 'value' => '
Chris@76 786 <div class="title_bar">
Chris@76 787 <h3 class="titlebg">' . sprintf($txt['view_users_subscribed'], $row['name']) . '</h3>
Chris@76 788 </div>
Chris@76 789 <div class="floatright">
Chris@76 790 <input type="text" name="sub_search" value="" class="input_text" />
Chris@76 791 <input type="submit" name="ssearch" value="' . $txt['search_sub'] . '" class="button_submit" />
Chris@76 792 </div>
Chris@76 793 ',
Chris@76 794 ),
Chris@76 795 ),
Chris@76 796 );
Chris@76 797
Chris@76 798 require_once($sourcedir . '/Subs-List.php');
Chris@76 799 createList($listOptions);
Chris@76 800
Chris@76 801 $context['sub_template'] = 'show_list';
Chris@76 802 $context['default_list'] = 'subscribed_users_list';
Chris@76 803 }
Chris@76 804
Chris@76 805 // Returns how many people are subscribed to a paid subscription.
Chris@76 806 function list_getSubscribedUserCount($id_sub, $search_string, $search_vars = array())
Chris@76 807 {
Chris@76 808 global $smcFunc;
Chris@76 809
Chris@76 810 // Get the total amount of users.
Chris@76 811 $request = $smcFunc['db_query']('', '
Chris@76 812 SELECT COUNT(*) AS total_subs
Chris@76 813 FROM {db_prefix}log_subscribed AS ls
Chris@76 814 LEFT JOIN {db_prefix}members AS mem ON (mem.id_member = ls.id_member)
Chris@76 815 WHERE ls.id_subscribe = {int:current_subscription} ' . $search_string . '
Chris@76 816 AND (ls.end_time != {int:no_end_time} OR ls.payments_pending != {int:no_pending_payments})',
Chris@76 817 array_merge($search_vars, array(
Chris@76 818 'current_subscription' => $id_sub,
Chris@76 819 'no_end_time' => 0,
Chris@76 820 'no_pending_payments' => 0,
Chris@76 821 ))
Chris@76 822 );
Chris@76 823 list ($memberCount) = $smcFunc['db_fetch_row']($request);
Chris@76 824 $smcFunc['db_free_result']($request);
Chris@76 825
Chris@76 826 return $memberCount;
Chris@76 827 }
Chris@76 828
Chris@76 829 function list_getSubscribedUsers($start, $items_per_page, $sort, $id_sub, $search_string, $search_vars = array())
Chris@76 830 {
Chris@76 831 global $smcFunc, $txt;
Chris@76 832
Chris@76 833 $request = $smcFunc['db_query']('', '
Chris@76 834 SELECT ls.id_sublog, IFNULL(mem.id_member, 0) AS id_member, IFNULL(mem.real_name, {string:guest}) AS name, ls.start_time, ls.end_time,
Chris@76 835 ls.status, ls.payments_pending
Chris@76 836 FROM {db_prefix}log_subscribed AS ls
Chris@76 837 LEFT JOIN {db_prefix}members AS mem ON (mem.id_member = ls.id_member)
Chris@76 838 WHERE ls.id_subscribe = {int:current_subscription} ' . $search_string . '
Chris@76 839 AND (ls.end_time != {int:no_end_time} OR ls.payments_pending != {int:no_payments_pending})
Chris@76 840 ORDER BY ' . $sort . '
Chris@76 841 LIMIT ' . $start . ', ' . $items_per_page,
Chris@76 842 array_merge($search_vars, array(
Chris@76 843 'current_subscription' => $id_sub,
Chris@76 844 'no_end_time' => 0,
Chris@76 845 'no_payments_pending' => 0,
Chris@76 846 'guest' => $txt['guest'],
Chris@76 847 ))
Chris@76 848 );
Chris@76 849 $subscribers = array();
Chris@76 850 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 851 $subscribers[] = array(
Chris@76 852 'id' => $row['id_sublog'],
Chris@76 853 'id_member' => $row['id_member'],
Chris@76 854 'name' => $row['name'],
Chris@76 855 'start_date' => timeformat($row['start_time'], false),
Chris@76 856 'end_date' => $row['end_time'] == 0 ? 'N/A' : timeformat($row['end_time'], false),
Chris@76 857 'pending' => $row['payments_pending'],
Chris@76 858 'status' => $row['status'],
Chris@76 859 'status_text' => $row['status'] == 0 ? ($row['payments_pending'] == 0 ? $txt['paid_finished'] : $txt['paid_pending']) : $txt['paid_active'],
Chris@76 860 );
Chris@76 861 $smcFunc['db_free_result']($request);
Chris@76 862
Chris@76 863 return $subscribers;
Chris@76 864 }
Chris@76 865
Chris@76 866 // Edit or add a user subscription.
Chris@76 867 function ModifyUserSubscription()
Chris@76 868 {
Chris@76 869 global $context, $txt, $modSettings, $smcFunc;
Chris@76 870
Chris@76 871 loadSubscriptions();
Chris@76 872
Chris@76 873 $context['log_id'] = isset($_REQUEST['lid']) ? (int) $_REQUEST['lid'] : 0;
Chris@76 874 $context['sub_id'] = isset($_REQUEST['sid']) ? (int) $_REQUEST['sid'] : 0;
Chris@76 875 $context['action_type'] = $context['log_id'] ? 'edit' : 'add';
Chris@76 876
Chris@76 877 // Setup the template.
Chris@76 878 $context['sub_template'] = 'modify_user_subscription';
Chris@76 879 $context['page_title'] = $txt[$context['action_type'] . '_subscriber'];
Chris@76 880
Chris@76 881 // If we haven't been passed the subscription ID get it.
Chris@76 882 if ($context['log_id'] && !$context['sub_id'])
Chris@76 883 {
Chris@76 884 $request = $smcFunc['db_query']('', '
Chris@76 885 SELECT id_subscribe
Chris@76 886 FROM {db_prefix}log_subscribed
Chris@76 887 WHERE id_sublog = {int:current_log_item}',
Chris@76 888 array(
Chris@76 889 'current_log_item' => $context['log_id'],
Chris@76 890 )
Chris@76 891 );
Chris@76 892 if ($smcFunc['db_num_rows']($request) == 0)
Chris@76 893 fatal_lang_error('no_access', false);
Chris@76 894 list ($context['sub_id']) = $smcFunc['db_fetch_row']($request);
Chris@76 895 $smcFunc['db_free_result']($request);
Chris@76 896 }
Chris@76 897
Chris@76 898 if (!isset($context['subscriptions'][$context['sub_id']]))
Chris@76 899 fatal_lang_error('no_access', false);
Chris@76 900 $context['current_subscription'] = $context['subscriptions'][$context['sub_id']];
Chris@76 901
Chris@76 902 // Searching?
Chris@76 903 if (isset($_POST['ssearch']))
Chris@76 904 {
Chris@76 905 return ViewSubscribedUsers();
Chris@76 906 }
Chris@76 907 // Saving?
Chris@76 908 elseif (isset($_REQUEST['save_sub']))
Chris@76 909 {
Chris@76 910 checkSession();
Chris@76 911
Chris@76 912 // Work out the dates...
Chris@76 913 $starttime = mktime($_POST['hour'], $_POST['minute'], 0, $_POST['month'], $_POST['day'], $_POST['year']);
Chris@76 914 $endtime = mktime($_POST['hourend'], $_POST['minuteend'], 0, $_POST['monthend'], $_POST['dayend'], $_POST['yearend']);
Chris@76 915
Chris@76 916 // Status.
Chris@76 917 $status = $_POST['status'];
Chris@76 918
Chris@76 919 // New one?
Chris@76 920 if (empty($context['log_id']))
Chris@76 921 {
Chris@76 922 // Find the user...
Chris@76 923 $request = $smcFunc['db_query']('', '
Chris@76 924 SELECT id_member, id_group
Chris@76 925 FROM {db_prefix}members
Chris@76 926 WHERE real_name = {string:name}
Chris@76 927 LIMIT 1',
Chris@76 928 array(
Chris@76 929 'name' => $_POST['name'],
Chris@76 930 )
Chris@76 931 );
Chris@76 932 if ($smcFunc['db_num_rows']($request) == 0)
Chris@76 933 fatal_lang_error('error_member_not_found');
Chris@76 934
Chris@76 935 list ($id_member, $id_group) = $smcFunc['db_fetch_row']($request);
Chris@76 936 $smcFunc['db_free_result']($request);
Chris@76 937
Chris@76 938 // Ensure the member doesn't already have a subscription!
Chris@76 939 $request = $smcFunc['db_query']('', '
Chris@76 940 SELECT id_subscribe
Chris@76 941 FROM {db_prefix}log_subscribed
Chris@76 942 WHERE id_subscribe = {int:current_subscription}
Chris@76 943 AND id_member = {int:current_member}',
Chris@76 944 array(
Chris@76 945 'current_subscription' => $context['sub_id'],
Chris@76 946 'current_member' => $id_member,
Chris@76 947 )
Chris@76 948 );
Chris@76 949 if ($smcFunc['db_num_rows']($request) != 0)
Chris@76 950 fatal_lang_error('member_already_subscribed');
Chris@76 951 $smcFunc['db_free_result']($request);
Chris@76 952
Chris@76 953 // Actually put the subscription in place.
Chris@76 954 if ($status == 1)
Chris@76 955 addSubscription($context['sub_id'], $id_member, 0, $starttime, $endtime);
Chris@76 956 else
Chris@76 957 {
Chris@76 958 $smcFunc['db_insert']('',
Chris@76 959 '{db_prefix}log_subscribed',
Chris@76 960 array(
Chris@76 961 'id_subscribe' => 'int', 'id_member' => 'int', 'old_id_group' => 'int', 'start_time' => 'int',
Chris@76 962 'end_time' => 'int', 'status' => 'int',
Chris@76 963 ),
Chris@76 964 array(
Chris@76 965 $context['sub_id'], $id_member, $id_group, $starttime,
Chris@76 966 $endtime, $status,
Chris@76 967 ),
Chris@76 968 array('id_sublog')
Chris@76 969 );
Chris@76 970 }
Chris@76 971 }
Chris@76 972 // Updating.
Chris@76 973 else
Chris@76 974 {
Chris@76 975 $request = $smcFunc['db_query']('', '
Chris@76 976 SELECT id_member, status
Chris@76 977 FROM {db_prefix}log_subscribed
Chris@76 978 WHERE id_sublog = {int:current_log_item}',
Chris@76 979 array(
Chris@76 980 'current_log_item' => $context['log_id'],
Chris@76 981 )
Chris@76 982 );
Chris@76 983 if ($smcFunc['db_num_rows']($request) == 0)
Chris@76 984 fatal_lang_error('no_access', false);
Chris@76 985
Chris@76 986 list ($id_member, $old_status) = $smcFunc['db_fetch_row']($request);
Chris@76 987 $smcFunc['db_free_result']($request);
Chris@76 988
Chris@76 989 // Pick the right permission stuff depending on what the status is changing from/to.
Chris@76 990 if ($old_status == 1 && $status != 1)
Chris@76 991 removeSubscription($context['sub_id'], $id_member);
Chris@76 992 elseif ($status == 1 && $old_status != 1)
Chris@76 993 {
Chris@76 994 addSubscription($context['sub_id'], $id_member, 0, $starttime, $endtime);
Chris@76 995 }
Chris@76 996 else
Chris@76 997 {
Chris@76 998 $smcFunc['db_query']('', '
Chris@76 999 UPDATE {db_prefix}log_subscribed
Chris@76 1000 SET start_time = {int:start_time}, end_time = {int:end_time}, status = {int:status}
Chris@76 1001 WHERE id_sublog = {int:current_log_item}',
Chris@76 1002 array(
Chris@76 1003 'start_time' => $starttime,
Chris@76 1004 'end_time' => $endtime,
Chris@76 1005 'status' => $status,
Chris@76 1006 'current_log_item' => $context['log_id'],
Chris@76 1007 )
Chris@76 1008 );
Chris@76 1009 }
Chris@76 1010 }
Chris@76 1011
Chris@76 1012 // Done - redirect...
Chris@76 1013 redirectexit('action=admin;area=paidsubscribe;sa=viewsub;sid=' . $context['sub_id']);
Chris@76 1014 }
Chris@76 1015 // Deleting?
Chris@76 1016 elseif (isset($_REQUEST['delete']) || isset($_REQUEST['finished']))
Chris@76 1017 {
Chris@76 1018 checkSession();
Chris@76 1019
Chris@76 1020 // Do the actual deletes!
Chris@76 1021 if (!empty($_REQUEST['delsub']))
Chris@76 1022 {
Chris@76 1023 $toDelete = array();
Chris@76 1024 foreach ($_REQUEST['delsub'] as $id => $dummy)
Chris@76 1025 $toDelete[] = (int) $id;
Chris@76 1026
Chris@76 1027 $request = $smcFunc['db_query']('', '
Chris@76 1028 SELECT id_subscribe, id_member
Chris@76 1029 FROM {db_prefix}log_subscribed
Chris@76 1030 WHERE id_sublog IN ({array_int:subscription_list})',
Chris@76 1031 array(
Chris@76 1032 'subscription_list' => $toDelete,
Chris@76 1033 )
Chris@76 1034 );
Chris@76 1035 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 1036 removeSubscription($row['id_subscribe'], $row['id_member'], isset($_REQUEST['delete']));
Chris@76 1037 $smcFunc['db_free_result']($request);
Chris@76 1038 }
Chris@76 1039 redirectexit('action=admin;area=paidsubscribe;sa=viewsub;sid=' . $context['sub_id']);
Chris@76 1040 }
Chris@76 1041
Chris@76 1042 // Default attributes.
Chris@76 1043 if ($context['action_type'] == 'add')
Chris@76 1044 {
Chris@76 1045 $context['sub'] = array(
Chris@76 1046 'id' => 0,
Chris@76 1047 'start' => array(
Chris@76 1048 'year' => (int) strftime('%Y', time()),
Chris@76 1049 'month' => (int) strftime('%m', time()),
Chris@76 1050 'day' => (int) strftime('%d', time()),
Chris@76 1051 'hour' => (int) strftime('%H', time()),
Chris@76 1052 'min' => (int) strftime('%M', time()) < 10 ? '0' . (int) strftime('%M', time()) : (int) strftime('%M', time()),
Chris@76 1053 'last_day' => 0,
Chris@76 1054 ),
Chris@76 1055 'end' => array(
Chris@76 1056 'year' => (int) strftime('%Y', time()),
Chris@76 1057 'month' => (int) strftime('%m', time()),
Chris@76 1058 'day' => (int) strftime('%d', time()),
Chris@76 1059 'hour' => (int) strftime('%H', time()),
Chris@76 1060 'min' => (int) strftime('%M', time()) < 10 ? '0' . (int) strftime('%M', time()) : (int) strftime('%M', time()),
Chris@76 1061 'last_day' => 0,
Chris@76 1062 ),
Chris@76 1063 'status' => 1,
Chris@76 1064 );
Chris@76 1065 $context['sub']['start']['last_day'] = (int) strftime('%d', mktime(0, 0, 0, $context['sub']['start']['month'] == 12 ? 1 : $context['sub']['start']['month'] + 1, 0, $context['sub']['start']['month'] == 12 ? $context['sub']['start']['year'] + 1 : $context['sub']['start']['year']));
Chris@76 1066 $context['sub']['end']['last_day'] = (int) strftime('%d', mktime(0, 0, 0, $context['sub']['end']['month'] == 12 ? 1 : $context['sub']['end']['month'] + 1, 0, $context['sub']['end']['month'] == 12 ? $context['sub']['end']['year'] + 1 : $context['sub']['end']['year']));
Chris@76 1067
Chris@76 1068 if (isset($_GET['uid']))
Chris@76 1069 {
Chris@76 1070 $request = $smcFunc['db_query']('', '
Chris@76 1071 SELECT real_name
Chris@76 1072 FROM {db_prefix}members
Chris@76 1073 WHERE id_member = {int:current_member}',
Chris@76 1074 array(
Chris@76 1075 'current_member' => (int) $_GET['uid'],
Chris@76 1076 )
Chris@76 1077 );
Chris@76 1078 list ($context['sub']['username']) = $smcFunc['db_fetch_row']($request);
Chris@76 1079 $smcFunc['db_free_result']($request);
Chris@76 1080 }
Chris@76 1081 else
Chris@76 1082 $context['sub']['username'] = '';
Chris@76 1083 }
Chris@76 1084 // Otherwise load the existing info.
Chris@76 1085 else
Chris@76 1086 {
Chris@76 1087 $request = $smcFunc['db_query']('', '
Chris@76 1088 SELECT ls.id_sublog, ls.id_subscribe, ls.id_member, start_time, end_time, status, payments_pending, pending_details,
Chris@76 1089 IFNULL(mem.real_name, {string:blank_string}) AS username
Chris@76 1090 FROM {db_prefix}log_subscribed AS ls
Chris@76 1091 LEFT JOIN {db_prefix}members AS mem ON (mem.id_member = ls.id_member)
Chris@76 1092 WHERE ls.id_sublog = {int:current_subscription_item}
Chris@76 1093 LIMIT 1',
Chris@76 1094 array(
Chris@76 1095 'current_subscription_item' => $context['log_id'],
Chris@76 1096 'blank_string' => '',
Chris@76 1097 )
Chris@76 1098 );
Chris@76 1099 if ($smcFunc['db_num_rows']($request) == 0)
Chris@76 1100 fatal_lang_error('no_access', false);
Chris@76 1101 $row = $smcFunc['db_fetch_assoc']($request);
Chris@76 1102 $smcFunc['db_free_result']($request);
Chris@76 1103
Chris@76 1104 // Any pending payments?
Chris@76 1105 $context['pending_payments'] = array();
Chris@76 1106 if (!empty($row['pending_details']))
Chris@76 1107 {
Chris@76 1108 $pending_details = @unserialize($row['pending_details']);
Chris@76 1109 foreach ($pending_details as $id => $pending)
Chris@76 1110 {
Chris@76 1111 // Only this type need be displayed.
Chris@76 1112 if ($pending[3] == 'payback')
Chris@76 1113 {
Chris@76 1114 // Work out what the options were.
Chris@76 1115 $costs = @unserialize($context['current_subscription']['real_cost']);
Chris@76 1116
Chris@76 1117 if ($context['current_subscription']['real_length'] == 'F')
Chris@76 1118 {
Chris@76 1119 foreach ($costs as $duration => $cost)
Chris@76 1120 {
Chris@76 1121 if ($cost != 0 && $cost == $pending[1] && $duration == $pending[2])
Chris@76 1122 $context['pending_payments'][$id] = array(
Chris@76 1123 'desc' => sprintf($modSettings['paid_currency_symbol'], $cost . '/' . $txt[$duration]),
Chris@76 1124 );
Chris@76 1125 }
Chris@76 1126 }
Chris@76 1127 elseif ($costs['fixed'] == $pending[1])
Chris@76 1128 {
Chris@76 1129 $context['pending_payments'][$id] = array(
Chris@76 1130 'desc' => sprintf($modSettings['paid_currency_symbol'], $costs['fixed']),
Chris@76 1131 );
Chris@76 1132 }
Chris@76 1133 }
Chris@76 1134 }
Chris@76 1135
Chris@76 1136 // Check if we are adding/removing any.
Chris@76 1137 if (isset($_GET['pending']))
Chris@76 1138 {
Chris@76 1139 foreach ($pending_details as $id => $pending)
Chris@76 1140 {
Chris@76 1141 // Found the one to action?
Chris@76 1142 if ($_GET['pending'] == $id && $pending[3] == 'payback' && isset($context['pending_payments'][$id]))
Chris@76 1143 {
Chris@76 1144 // Flexible?
Chris@76 1145 if (isset($_GET['accept']))
Chris@76 1146 addSubscription($context['current_subscription']['id'], $row['id_member'], $context['current_subscription']['real_length'] == 'F' ? strtoupper(substr($pending[2], 0, 1)) : 0);
Chris@76 1147 unset($pending_details[$id]);
Chris@76 1148
Chris@76 1149 $new_details = serialize($pending_details);
Chris@76 1150
Chris@76 1151 // Update the entry.
Chris@76 1152 $smcFunc['db_query']('', '
Chris@76 1153 UPDATE {db_prefix}log_subscribed
Chris@76 1154 SET payments_pending = payments_pending - 1, pending_details = {string:pending_details}
Chris@76 1155 WHERE id_sublog = {int:current_subscription_item}',
Chris@76 1156 array(
Chris@76 1157 'current_subscription_item' => $context['log_id'],
Chris@76 1158 'pending_details' => $new_details,
Chris@76 1159 )
Chris@76 1160 );
Chris@76 1161
Chris@76 1162 // Reload
Chris@76 1163 redirectexit('action=admin;area=paidsubscribe;sa=modifyuser;lid=' . $context['log_id']);
Chris@76 1164 }
Chris@76 1165 }
Chris@76 1166 }
Chris@76 1167 }
Chris@76 1168
Chris@76 1169 $context['sub_id'] = $row['id_subscribe'];
Chris@76 1170 $context['sub'] = array(
Chris@76 1171 'id' => 0,
Chris@76 1172 'start' => array(
Chris@76 1173 'year' => (int) strftime('%Y', $row['start_time']),
Chris@76 1174 'month' => (int) strftime('%m', $row['start_time']),
Chris@76 1175 'day' => (int) strftime('%d', $row['start_time']),
Chris@76 1176 'hour' => (int) strftime('%H', $row['start_time']),
Chris@76 1177 'min' => (int) strftime('%M', $row['start_time']) < 10 ? '0' . (int) strftime('%M', $row['start_time']) : (int) strftime('%M', $row['start_time']),
Chris@76 1178 'last_day' => 0,
Chris@76 1179 ),
Chris@76 1180 'end' => array(
Chris@76 1181 'year' => (int) strftime('%Y', $row['end_time']),
Chris@76 1182 'month' => (int) strftime('%m', $row['end_time']),
Chris@76 1183 'day' => (int) strftime('%d', $row['end_time']),
Chris@76 1184 'hour' => (int) strftime('%H', $row['end_time']),
Chris@76 1185 'min' => (int) strftime('%M', $row['end_time']) < 10 ? '0' . (int) strftime('%M', $row['end_time']) : (int) strftime('%M', $row['end_time']),
Chris@76 1186 'last_day' => 0,
Chris@76 1187 ),
Chris@76 1188 'status' => $row['status'],
Chris@76 1189 'username' => $row['username'],
Chris@76 1190 );
Chris@76 1191 $context['sub']['start']['last_day'] = (int) strftime('%d', mktime(0, 0, 0, $context['sub']['start']['month'] == 12 ? 1 : $context['sub']['start']['month'] + 1, 0, $context['sub']['start']['month'] == 12 ? $context['sub']['start']['year'] + 1 : $context['sub']['start']['year']));
Chris@76 1192 $context['sub']['end']['last_day'] = (int) strftime('%d', mktime(0, 0, 0, $context['sub']['end']['month'] == 12 ? 1 : $context['sub']['end']['month'] + 1, 0, $context['sub']['end']['month'] == 12 ? $context['sub']['end']['year'] + 1 : $context['sub']['end']['year']));
Chris@76 1193 }
Chris@76 1194 }
Chris@76 1195
Chris@76 1196 // Re-apply subscription rules.
Chris@76 1197 function reapplySubscriptions($users)
Chris@76 1198 {
Chris@76 1199 global $smcFunc;
Chris@76 1200
Chris@76 1201 // Make it an array.
Chris@76 1202 if (!is_array($users))
Chris@76 1203 $users = array($users);
Chris@76 1204
Chris@76 1205 // Get all the members current groups.
Chris@76 1206 $groups = array();
Chris@76 1207 $request = $smcFunc['db_query']('', '
Chris@76 1208 SELECT id_member, id_group, additional_groups
Chris@76 1209 FROM {db_prefix}members
Chris@76 1210 WHERE id_member IN ({array_int:user_list})',
Chris@76 1211 array(
Chris@76 1212 'user_list' => $users,
Chris@76 1213 )
Chris@76 1214 );
Chris@76 1215 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 1216 {
Chris@76 1217 $groups[$row['id_member']] = array(
Chris@76 1218 'primary' => $row['id_group'],
Chris@76 1219 'additional' => explode(',', $row['additional_groups']),
Chris@76 1220 );
Chris@76 1221 }
Chris@76 1222 $smcFunc['db_free_result']($request);
Chris@76 1223
Chris@76 1224 $request = $smcFunc['db_query']('', '
Chris@76 1225 SELECT ls.id_member, ls.old_id_group, s.id_group, s.add_groups
Chris@76 1226 FROM {db_prefix}log_subscribed AS ls
Chris@76 1227 INNER JOIN {db_prefix}subscriptions AS s ON (s.id_subscribe = ls.id_subscribe)
Chris@76 1228 WHERE ls.id_member IN ({array_int:user_list})
Chris@76 1229 AND ls.end_time > {int:current_time}',
Chris@76 1230 array(
Chris@76 1231 'user_list' => $users,
Chris@76 1232 'current_time' => time(),
Chris@76 1233 )
Chris@76 1234 );
Chris@76 1235 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 1236 {
Chris@76 1237 // Specific primary group?
Chris@76 1238 if ($row['id_group'] != 0)
Chris@76 1239 {
Chris@76 1240 // If this is changing - add the old one to the additional groups so it's not lost.
Chris@76 1241 if ($row['id_group'] != $groups[$row['id_member']]['primary'])
Chris@76 1242 $groups[$row['id_member']]['additional'][] = $groups[$row['id_member']]['primary'];
Chris@76 1243 $groups[$row['id_member']]['primary'] = $row['id_group'];
Chris@76 1244 }
Chris@76 1245
Chris@76 1246 // Additional groups.
Chris@76 1247 if (!empty($row['add_groups']))
Chris@76 1248 $groups[$row['id_member']]['additional'] = array_merge($groups[$row['id_member']]['additional'], explode(',', $row['add_groups']));
Chris@76 1249 }
Chris@76 1250 $smcFunc['db_free_result']($request);
Chris@76 1251
Chris@76 1252 // Update all the members.
Chris@76 1253 foreach ($groups as $id => $group)
Chris@76 1254 {
Chris@76 1255 $group['additional'] = array_unique($group['additional']);
Chris@76 1256 foreach ($group['additional'] as $key => $value)
Chris@76 1257 if (empty($value))
Chris@76 1258 unset($group['additional'][$key]);
Chris@76 1259 $addgroups = implode(',', $group['additional']);
Chris@76 1260
Chris@76 1261 $smcFunc['db_query']('', '
Chris@76 1262 UPDATE {db_prefix}members
Chris@76 1263 SET id_group = {int:primary_group}, additional_groups = {string:additional_groups}
Chris@76 1264 WHERE id_member = {int:current_member}
Chris@76 1265 LIMIT 1',
Chris@76 1266 array(
Chris@76 1267 'primary_group' => $group['primary'],
Chris@76 1268 'current_member' => $id,
Chris@76 1269 'additional_groups' => $addgroups,
Chris@76 1270 )
Chris@76 1271 );
Chris@76 1272 }
Chris@76 1273 }
Chris@76 1274
Chris@76 1275 // Add or extend a subscription of a user.
Chris@76 1276 function addSubscription($id_subscribe, $id_member, $renewal = 0, $forceStartTime = 0, $forceEndTime = 0)
Chris@76 1277 {
Chris@76 1278 global $context, $smcFunc;
Chris@76 1279
Chris@76 1280 // Take the easy way out...
Chris@76 1281 loadSubscriptions();
Chris@76 1282
Chris@76 1283 // Exists, yes?
Chris@76 1284 if (!isset($context['subscriptions'][$id_subscribe]))
Chris@76 1285 return;
Chris@76 1286
Chris@76 1287 $curSub = $context['subscriptions'][$id_subscribe];
Chris@76 1288
Chris@76 1289 // Grab the duration.
Chris@76 1290 $duration = $curSub['num_length'];
Chris@76 1291
Chris@76 1292 // If this is a renewal change the duration to be correct.
Chris@76 1293 if (!empty($renewal))
Chris@76 1294 {
Chris@76 1295 switch ($renewal)
Chris@76 1296 {
Chris@76 1297 case 'D':
Chris@76 1298 $duration = 86400;
Chris@76 1299 break;
Chris@76 1300 case 'W':
Chris@76 1301 $duration = 604800;
Chris@76 1302 break;
Chris@76 1303 case 'M':
Chris@76 1304 $duration = 2629743;
Chris@76 1305 break;
Chris@76 1306 case 'Y':
Chris@76 1307 $duration = 31556926;
Chris@76 1308 break;
Chris@76 1309 default:
Chris@76 1310 break;
Chris@76 1311 }
Chris@76 1312 }
Chris@76 1313
Chris@76 1314 // Firstly, see whether it exists, and is active. If so then this is meerly an extension.
Chris@76 1315 $request = $smcFunc['db_query']('', '
Chris@76 1316 SELECT id_sublog, end_time, start_time
Chris@76 1317 FROM {db_prefix}log_subscribed
Chris@76 1318 WHERE id_subscribe = {int:current_subscription}
Chris@76 1319 AND id_member = {int:current_member}
Chris@76 1320 AND status = {int:is_active}',
Chris@76 1321 array(
Chris@76 1322 'current_subscription' => $id_subscribe,
Chris@76 1323 'current_member' => $id_member,
Chris@76 1324 'is_active' => 1,
Chris@76 1325 )
Chris@76 1326 );
Chris@76 1327 if ($smcFunc['db_num_rows']($request) != 0)
Chris@76 1328 {
Chris@76 1329 list ($id_sublog, $endtime, $starttime) = $smcFunc['db_fetch_row']($request);
Chris@76 1330
Chris@76 1331 // If this has already expired but is active, extension means the period from now.
Chris@76 1332 if ($endtime < time())
Chris@76 1333 $endtime = time();
Chris@76 1334 if ($starttime == 0)
Chris@76 1335 $starttime = time();
Chris@76 1336
Chris@76 1337 // Work out the new expiry date.
Chris@76 1338 $endtime += $duration;
Chris@76 1339
Chris@76 1340 if ($forceEndTime != 0)
Chris@76 1341 $endtime = $forceEndTime;
Chris@76 1342
Chris@76 1343 // As everything else should be good, just update!
Chris@76 1344 $smcFunc['db_query']('', '
Chris@76 1345 UPDATE {db_prefix}log_subscribed
Chris@76 1346 SET end_time = {int:end_time}, start_time = {int:start_time}
Chris@76 1347 WHERE id_sublog = {int:current_subscription_item}',
Chris@76 1348 array(
Chris@76 1349 'end_time' => $endtime,
Chris@76 1350 'start_time' => $starttime,
Chris@76 1351 'current_subscription_item' => $id_sublog,
Chris@76 1352 )
Chris@76 1353 );
Chris@76 1354
Chris@76 1355 return;
Chris@76 1356 }
Chris@76 1357 $smcFunc['db_free_result']($request);
Chris@76 1358
Chris@76 1359 // If we're here, that means we don't have an active subscription - that means we need to do some work!
Chris@76 1360 $request = $smcFunc['db_query']('', '
Chris@76 1361 SELECT m.id_group, m.additional_groups
Chris@76 1362 FROM {db_prefix}members AS m
Chris@76 1363 WHERE m.id_member = {int:current_member}',
Chris@76 1364 array(
Chris@76 1365 'current_member' => $id_member,
Chris@76 1366 )
Chris@76 1367 );
Chris@76 1368 // Just in case the member doesn't exist.
Chris@76 1369 if ($smcFunc['db_num_rows']($request) == 0)
Chris@76 1370 return;
Chris@76 1371
Chris@76 1372 list ($old_id_group, $additional_groups) = $smcFunc['db_fetch_row']($request);
Chris@76 1373 $smcFunc['db_free_result']($request);
Chris@76 1374
Chris@76 1375 // Prepare additional groups.
Chris@76 1376 $newAddGroups = explode(',', $curSub['add_groups']);
Chris@76 1377 $curAddGroups = explode(',', $additional_groups);
Chris@76 1378
Chris@76 1379 $newAddGroups = array_merge($newAddGroups, $curAddGroups);
Chris@76 1380
Chris@76 1381 // Simple, simple, simple - hopefully... id_group first.
Chris@76 1382 if ($curSub['prim_group'] != 0)
Chris@76 1383 {
Chris@76 1384 $id_group = $curSub['prim_group'];
Chris@76 1385
Chris@76 1386 // Ensure their old privileges are maintained.
Chris@76 1387 if ($old_id_group != 0)
Chris@76 1388 $newAddGroups[] = $old_id_group;
Chris@76 1389 }
Chris@76 1390 else
Chris@76 1391 $id_group = $old_id_group;
Chris@76 1392
Chris@76 1393 // Yep, make sure it's unique, and no empties.
Chris@76 1394 foreach ($newAddGroups as $k => $v)
Chris@76 1395 if (empty($v))
Chris@76 1396 unset($newAddGroups[$k]);
Chris@76 1397 $newAddGroups = array_unique($newAddGroups);
Chris@76 1398 $newAddGroups = implode(',', $newAddGroups);
Chris@76 1399
Chris@76 1400 // Store the new settings.
Chris@76 1401 $smcFunc['db_query']('', '
Chris@76 1402 UPDATE {db_prefix}members
Chris@76 1403 SET id_group = {int:primary_group}, additional_groups = {string:additional_groups}
Chris@76 1404 WHERE id_member = {int:current_member}',
Chris@76 1405 array(
Chris@76 1406 'primary_group' => $id_group,
Chris@76 1407 'current_member' => $id_member,
Chris@76 1408 'additional_groups' => $newAddGroups,
Chris@76 1409 )
Chris@76 1410 );
Chris@76 1411
Chris@76 1412 // Now log the subscription - maybe we have a dorment subscription we can restore?
Chris@76 1413 $request = $smcFunc['db_query']('', '
Chris@76 1414 SELECT id_sublog, end_time, start_time
Chris@76 1415 FROM {db_prefix}log_subscribed
Chris@76 1416 WHERE id_subscribe = {int:current_subscription}
Chris@76 1417 AND id_member = {int:current_member}',
Chris@76 1418 array(
Chris@76 1419 'current_subscription' => $id_subscribe,
Chris@76 1420 'current_member' => $id_member,
Chris@76 1421 )
Chris@76 1422 );
Chris@76 1423 //!!! Don't really need to do this twice...
Chris@76 1424 if ($smcFunc['db_num_rows']($request) != 0)
Chris@76 1425 {
Chris@76 1426 list ($id_sublog, $endtime, $starttime) = $smcFunc['db_fetch_row']($request);
Chris@76 1427
Chris@76 1428 // If this has already expired but is active, extension means the period from now.
Chris@76 1429 if ($endtime < time())
Chris@76 1430 $endtime = time();
Chris@76 1431 if ($starttime == 0)
Chris@76 1432 $starttime = time();
Chris@76 1433
Chris@76 1434 // Work out the new expiry date.
Chris@76 1435 $endtime += $duration;
Chris@76 1436
Chris@76 1437 if ($forceEndTime != 0)
Chris@76 1438 $endtime = $forceEndTime;
Chris@76 1439
Chris@76 1440 // As everything else should be good, just update!
Chris@76 1441 $smcFunc['db_query']('', '
Chris@76 1442 UPDATE {db_prefix}log_subscribed
Chris@76 1443 SET start_time = {int:start_time}, end_time = {int:end_time}, old_id_group = {int:old_id_group}, status = {int:is_active},
Chris@76 1444 reminder_sent = {int:no_reminder_sent}
Chris@76 1445 WHERE id_sublog = {int:current_subscription_item}',
Chris@76 1446 array(
Chris@76 1447 'start_time' => $starttime,
Chris@76 1448 'end_time' => $endtime,
Chris@76 1449 'old_id_group' => $old_id_group,
Chris@76 1450 'is_active' => 1,
Chris@76 1451 'no_reminder_sent' => 0,
Chris@76 1452 'current_subscription_item' => $id_sublog,
Chris@76 1453 )
Chris@76 1454 );
Chris@76 1455
Chris@76 1456 return;
Chris@76 1457 }
Chris@76 1458 $smcFunc['db_free_result']($request);
Chris@76 1459
Chris@76 1460 // Otherwise a very simple insert.
Chris@76 1461 $endtime = time() + $duration;
Chris@76 1462 if ($forceEndTime != 0)
Chris@76 1463 $endtime = $forceEndTime;
Chris@76 1464
Chris@76 1465 if ($forceStartTime == 0)
Chris@76 1466 $starttime = time();
Chris@76 1467 else
Chris@76 1468 $starttime = $forceStartTime;
Chris@76 1469
Chris@76 1470 $smcFunc['db_insert']('',
Chris@76 1471 '{db_prefix}log_subscribed',
Chris@76 1472 array(
Chris@76 1473 'id_subscribe' => 'int', 'id_member' => 'int', 'old_id_group' => 'int', 'start_time' => 'int',
Chris@76 1474 'end_time' => 'int', 'status' => 'int', 'pending_details' => 'string',
Chris@76 1475 ),
Chris@76 1476 array(
Chris@76 1477 $id_subscribe, $id_member, $old_id_group, $starttime,
Chris@76 1478 $endtime, 1, '',
Chris@76 1479 ),
Chris@76 1480 array('id_sublog')
Chris@76 1481 );
Chris@76 1482 }
Chris@76 1483
Chris@76 1484 // Removes a subscription from a user, as in removes the groups.
Chris@76 1485 function removeSubscription($id_subscribe, $id_member, $delete = false)
Chris@76 1486 {
Chris@76 1487 global $context, $smcFunc;
Chris@76 1488
Chris@76 1489 loadSubscriptions();
Chris@76 1490
Chris@76 1491 // Load the user core bits.
Chris@76 1492 $request = $smcFunc['db_query']('', '
Chris@76 1493 SELECT m.id_group, m.additional_groups
Chris@76 1494 FROM {db_prefix}members AS m
Chris@76 1495 WHERE m.id_member = {int:current_member}',
Chris@76 1496 array(
Chris@76 1497 'current_member' => $id_member,
Chris@76 1498 )
Chris@76 1499 );
Chris@76 1500
Chris@76 1501 // Just in case of errors.
Chris@76 1502 if ($smcFunc['db_num_rows']($request) == 0)
Chris@76 1503 {
Chris@76 1504 $smcFunc['db_query']('', '
Chris@76 1505 DELETE FROM {db_prefix}log_subscribed
Chris@76 1506 WHERE id_member = {int:current_member}',
Chris@76 1507 array(
Chris@76 1508 'current_member' => $id_member,
Chris@76 1509 )
Chris@76 1510 );
Chris@76 1511 return;
Chris@76 1512 }
Chris@76 1513 list ($id_group, $additional_groups) = $smcFunc['db_fetch_row']($request);
Chris@76 1514 $smcFunc['db_free_result']($request);
Chris@76 1515
Chris@76 1516 // Get all of the subscriptions for this user that are active - it will be necessary!
Chris@76 1517 $request = $smcFunc['db_query']('', '
Chris@76 1518 SELECT id_subscribe, old_id_group
Chris@76 1519 FROM {db_prefix}log_subscribed
Chris@76 1520 WHERE id_member = {int:current_member}
Chris@76 1521 AND status = {int:is_active}',
Chris@76 1522 array(
Chris@76 1523 'current_member' => $id_member,
Chris@76 1524 'is_active' => 1,
Chris@76 1525 )
Chris@76 1526 );
Chris@76 1527
Chris@76 1528 // These variables will be handy, honest ;)
Chris@76 1529 $removals = array();
Chris@76 1530 $allowed = array();
Chris@76 1531 $old_id_group = 0;
Chris@76 1532 $new_id_group = -1;
Chris@76 1533 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 1534 {
Chris@76 1535 if (!isset($context['subscriptions'][$row['id_subscribe']]))
Chris@76 1536 continue;
Chris@76 1537
Chris@76 1538 // The one we're removing?
Chris@76 1539 if ($row['id_subscribe'] == $id_subscribe)
Chris@76 1540 {
Chris@76 1541 $removals = explode(',', $context['subscriptions'][$row['id_subscribe']]['add_groups']);
Chris@76 1542 if ($context['subscriptions'][$row['id_subscribe']]['prim_group'] != 0)
Chris@76 1543 $removals[] = $context['subscriptions'][$row['id_subscribe']]['prim_group'];
Chris@76 1544 $old_id_group = $row['old_id_group'];
Chris@76 1545 }
Chris@76 1546 // Otherwise things we allow.
Chris@76 1547 else
Chris@76 1548 {
Chris@76 1549 $allowed = array_merge($allowed, explode(',', $context['subscriptions'][$row['id_subscribe']]['add_groups']));
Chris@76 1550 if ($context['subscriptions'][$row['id_subscribe']]['prim_group'] != 0)
Chris@76 1551 {
Chris@76 1552 $allowed[] = $context['subscriptions'][$row['id_subscribe']]['prim_group'];
Chris@76 1553 $new_id_group = $context['subscriptions'][$row['id_subscribe']]['prim_group'];
Chris@76 1554 }
Chris@76 1555 }
Chris@76 1556 }
Chris@76 1557 $smcFunc['db_free_result']($request);
Chris@76 1558
Chris@76 1559 // Now, for everything we are removing check they defintely are not allowed it.
Chris@76 1560 $existingGroups = explode(',', $additional_groups);
Chris@76 1561 foreach ($existingGroups as $key => $group)
Chris@76 1562 if (empty($group) || (in_array($group, $removals) && !in_array($group, $allowed)))
Chris@76 1563 unset($existingGroups[$key]);
Chris@76 1564
Chris@76 1565 // Finally, do something with the current primary group.
Chris@76 1566 if (in_array($id_group, $removals))
Chris@76 1567 {
Chris@76 1568 // If this primary group is actually allowed keep it.
Chris@76 1569 if (in_array($id_group, $allowed))
Chris@76 1570 $existingGroups[] = $id_group;
Chris@76 1571
Chris@76 1572 // Either way, change the id_group back.
Chris@76 1573 if ($new_id_group < 1)
Chris@76 1574 {
Chris@76 1575 // If we revert to the old id-group we need to ensure it wasn't from a subscription.
Chris@76 1576 foreach ($context['subscriptions'] as $id => $group)
Chris@76 1577 // It was? Make them a regular member then!
Chris@76 1578 if ($group['prim_group'] == $old_id_group)
Chris@76 1579 $old_id_group = 0;
Chris@76 1580
Chris@76 1581 $id_group = $old_id_group;
Chris@76 1582 }
Chris@76 1583 else
Chris@76 1584 $id_group = $new_id_group;
Chris@76 1585 }
Chris@76 1586
Chris@76 1587 // Crazy stuff, we seem to have our groups fixed, just make them unique
Chris@76 1588 $existingGroups = array_unique($existingGroups);
Chris@76 1589 $existingGroups = implode(',', $existingGroups);
Chris@76 1590
Chris@76 1591 // Update the member
Chris@76 1592 $smcFunc['db_query']('', '
Chris@76 1593 UPDATE {db_prefix}members
Chris@76 1594 SET id_group = {int:primary_group}, additional_groups = {string:existing_groups}
Chris@76 1595 WHERE id_member = {int:current_member}',
Chris@76 1596 array(
Chris@76 1597 'primary_group' => $id_group,
Chris@76 1598 'current_member' => $id_member,
Chris@76 1599 'existing_groups' => $existingGroups,
Chris@76 1600 )
Chris@76 1601 );
Chris@76 1602
Chris@76 1603 // Disable the subscription.
Chris@76 1604 if (!$delete)
Chris@76 1605 $smcFunc['db_query']('', '
Chris@76 1606 UPDATE {db_prefix}log_subscribed
Chris@76 1607 SET status = {int:not_active}
Chris@76 1608 WHERE id_member = {int:current_member}
Chris@76 1609 AND id_subscribe = {int:current_subscription}',
Chris@76 1610 array(
Chris@76 1611 'not_active' => 0,
Chris@76 1612 'current_member' => $id_member,
Chris@76 1613 'current_subscription' => $id_subscribe,
Chris@76 1614 )
Chris@76 1615 );
Chris@76 1616 // Otherwise delete it!
Chris@76 1617 else
Chris@76 1618 $smcFunc['db_query']('', '
Chris@76 1619 DELETE FROM {db_prefix}log_subscribed
Chris@76 1620 WHERE id_member = {int:current_member}
Chris@76 1621 AND id_subscribe = {int:current_subscription}',
Chris@76 1622 array(
Chris@76 1623 'current_member' => $id_member,
Chris@76 1624 'current_subscription' => $id_subscribe,
Chris@76 1625 )
Chris@76 1626 );
Chris@76 1627 }
Chris@76 1628
Chris@76 1629 // This just kind of caches all the subscription data.
Chris@76 1630 function loadSubscriptions()
Chris@76 1631 {
Chris@76 1632 global $context, $txt, $modSettings, $smcFunc;
Chris@76 1633
Chris@76 1634 if (!empty($context['subscriptions']))
Chris@76 1635 return;
Chris@76 1636
Chris@76 1637 // Make sure this is loaded, just in case.
Chris@76 1638 loadLanguage('ManagePaid');
Chris@76 1639
Chris@76 1640 $request = $smcFunc['db_query']('', '
Chris@76 1641 SELECT id_subscribe, name, description, cost, length, id_group, add_groups, active, repeatable
Chris@76 1642 FROM {db_prefix}subscriptions',
Chris@76 1643 array(
Chris@76 1644 )
Chris@76 1645 );
Chris@76 1646 $context['subscriptions'] = array();
Chris@76 1647 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 1648 {
Chris@76 1649 // Pick a cost.
Chris@76 1650 $costs = @unserialize($row['cost']);
Chris@76 1651
Chris@76 1652 if ($row['length'] != 'F' && !empty($modSettings['paid_currency_symbol']) && !empty($costs['fixed']))
Chris@76 1653 $cost = sprintf($modSettings['paid_currency_symbol'], $costs['fixed']);
Chris@76 1654 else
Chris@76 1655 $cost = '???';
Chris@76 1656
Chris@76 1657 // Do the span.
Chris@76 1658 preg_match('~(\d*)(\w)~', $row['length'], $match);
Chris@76 1659 if (isset($match[2]))
Chris@76 1660 {
Chris@76 1661 $num_length = $match[1];
Chris@76 1662 $length = $match[1] . ' ';
Chris@76 1663 switch ($match[2])
Chris@76 1664 {
Chris@76 1665 case 'D':
Chris@76 1666 $length .= $txt['paid_mod_span_days'];
Chris@76 1667 $num_length *= 86400;
Chris@76 1668 break;
Chris@76 1669 case 'W':
Chris@76 1670 $length .= $txt['paid_mod_span_weeks'];
Chris@76 1671 $num_length *= 604800;
Chris@76 1672 break;
Chris@76 1673 case 'M':
Chris@76 1674 $length .= $txt['paid_mod_span_months'];
Chris@76 1675 $num_length *= 2629743;
Chris@76 1676 break;
Chris@76 1677 case 'Y':
Chris@76 1678 $length .= $txt['paid_mod_span_years'];
Chris@76 1679 $num_length *= 31556926;
Chris@76 1680 break;
Chris@76 1681 }
Chris@76 1682 }
Chris@76 1683 else
Chris@76 1684 $length = '??';
Chris@76 1685
Chris@76 1686 $context['subscriptions'][$row['id_subscribe']] = array(
Chris@76 1687 'id' => $row['id_subscribe'],
Chris@76 1688 'name' => $row['name'],
Chris@76 1689 'desc' => $row['description'],
Chris@76 1690 'cost' => $cost,
Chris@76 1691 'real_cost' => $row['cost'],
Chris@76 1692 'length' => $length,
Chris@76 1693 'num_length' => $num_length,
Chris@76 1694 'real_length' => $row['length'],
Chris@76 1695 'pending' => 0,
Chris@76 1696 'finished' => 0,
Chris@76 1697 'total' => 0,
Chris@76 1698 'active' => $row['active'],
Chris@76 1699 'prim_group' => $row['id_group'],
Chris@76 1700 'add_groups' => $row['add_groups'],
Chris@76 1701 'flexible' => $row['length'] == 'F' ? true : false,
Chris@76 1702 'repeatable' => $row['repeatable'],
Chris@76 1703 );
Chris@76 1704 }
Chris@76 1705 $smcFunc['db_free_result']($request);
Chris@76 1706
Chris@76 1707 // Do the counts.
Chris@76 1708 $request = $smcFunc['db_query']('', '
Chris@76 1709 SELECT COUNT(id_sublog) AS member_count, id_subscribe, status
Chris@76 1710 FROM {db_prefix}log_subscribed
Chris@76 1711 GROUP BY id_subscribe, status',
Chris@76 1712 array(
Chris@76 1713 )
Chris@76 1714 );
Chris@76 1715 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 1716 {
Chris@76 1717 $ind = $row['status'] == 0 ? 'finished' : 'total';
Chris@76 1718
Chris@76 1719 if (isset($context['subscriptions'][$row['id_subscribe']]))
Chris@76 1720 $context['subscriptions'][$row['id_subscribe']][$ind] = $row['member_count'];
Chris@76 1721 }
Chris@76 1722 $smcFunc['db_free_result']($request);
Chris@76 1723
Chris@76 1724 // How many payments are we waiting on?
Chris@76 1725 $request = $smcFunc['db_query']('', '
Chris@76 1726 SELECT SUM(payments_pending) AS total_pending, id_subscribe
Chris@76 1727 FROM {db_prefix}log_subscribed
Chris@76 1728 GROUP BY id_subscribe',
Chris@76 1729 array(
Chris@76 1730 )
Chris@76 1731 );
Chris@76 1732 while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76 1733 {
Chris@76 1734 if (isset($context['subscriptions'][$row['id_subscribe']]))
Chris@76 1735 $context['subscriptions'][$row['id_subscribe']]['pending'] = $row['total_pending'];
Chris@76 1736 }
Chris@76 1737 $smcFunc['db_free_result']($request);
Chris@76 1738 }
Chris@76 1739
Chris@76 1740 // Load all the payment gateways.
Chris@76 1741 function loadPaymentGateways()
Chris@76 1742 {
Chris@76 1743 global $sourcedir;
Chris@76 1744
Chris@76 1745 $gateways = array();
Chris@76 1746 if ($dh = opendir($sourcedir))
Chris@76 1747 {
Chris@76 1748 while (($file = readdir($dh)) !== false)
Chris@76 1749 {
Chris@76 1750 if (is_file($sourcedir .'/'. $file) && preg_match('~^Subscriptions-([A-Za-z\d]+)\.php$~', $file, $matches))
Chris@76 1751 {
Chris@76 1752 // Check this is definitely a valid gateway!
Chris@76 1753 $fp = fopen($sourcedir . '/' . $file, 'rb');
Chris@76 1754 $header = fread($fp, 4096);
Chris@76 1755 fclose($fp);
Chris@76 1756
Chris@76 1757 if (strpos($header, '// SMF Payment Gateway: ' . strtolower($matches[1])) !== false)
Chris@76 1758 {
Chris@76 1759 loadClassFile($file);
Chris@76 1760
Chris@76 1761 $gateways[] = array(
Chris@76 1762 'filename' => $file,
Chris@76 1763 'code' => strtolower($matches[1]),
Chris@76 1764 // Don't need anything snazier than this yet.
Chris@76 1765 'valid_version' => class_exists(strtolower($matches[1]) . '_payment') && class_exists(strtolower($matches[1]) . '_display'),
Chris@76 1766 'payment_class' => strtolower($matches[1]) . '_payment',
Chris@76 1767 'display_class' => strtolower($matches[1]) . '_display',
Chris@76 1768 );
Chris@76 1769 }
Chris@76 1770 }
Chris@76 1771 }
Chris@76 1772 }
Chris@76 1773 closedir($dh);
Chris@76 1774
Chris@76 1775 return $gateways;
Chris@76 1776 }
Chris@76 1777
Chris@76 1778 ?>