inc/modules/member/what-order.php

   1 <?php
   2 /************************************************************************
   3  * MXChange v0.2.1                                    Start: 10/19/2003 *
   4  * ===============                              Last change: 08/26/2004 *
   5  *                                                                      *
   6  * -------------------------------------------------------------------- *
   7  * File              : what-order.php                                   *
   8  * -------------------------------------------------------------------- *
   9  * Short description : Order mails here                                 *
  10  * -------------------------------------------------------------------- *
  11  * Kurzbeschreibung  : Hier koennen Ihre Mitglieder Mails buchen        *
  12  * -------------------------------------------------------------------- *
  13  *                                                                      *
  14  * -------------------------------------------------------------------- *
  15  * Copyright (c) 2003 - 2008 by Roland Haeder                           *
  16  * For more information visit: http://www.mxchange.org                  *
  17  *                                                                      *
  18  * This program is free software; you can redistribute it and/or modify *
  19  * it under the terms of the GNU General Public License as published by *
  20  * the Free Software Foundation; either version 2 of the License, or    *
  21  * (at your option) any later version.                                  *
  22  *                                                                      *
  23  * This program is distributed in the hope that it will be useful,      *
  24  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
  25  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
  26  * GNU General Public License for more details.                         *
  27  *                                                                      *
  28  * You should have received a copy of the GNU General Public License    *
  29  * along with this program; if not, write to the Free Software          *
  30  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
  31  * MA  02110-1301  USA                                                  *
  32  ************************************************************************/
  33
  34 // Some security stuff...
  35 if (!defined('__SECURITY')) {
  36         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
  37         require($INC);
  38 } elseif (!IS_MEMBER()) {
  39         LOAD_URL("modules.php?module=index");
  40 } elseif ((!EXT_IS_ACTIVE("order")) && (!IS_ADMIN())) {
  41         ADD_FATAL(EXTENSION_PROBLEM_EXT_INACTIVE, "order");
  42         return;
  43 }
  44
  45 // Add description as navigation point
  46 ADD_DESCR("member", __FILE__);
  47
  48 $URL = ""; $id = 0;
  49 $whereStatement = " WHERE visible='Y'";
  50
  51 // Set undefined array elements
  52 if (empty($_GET['msg']))       $_GET['msg']       = "";
  53 if (empty($_POST['zip']))      $_POST['zip']      = "";
  54 if (empty($_POST['html']))     $_POST['html']     = "";
  55 if (empty($_POST['receiver'])) $_POST['receiver'] = "";
  56 if (IS_ADMIN()) $whereStatement = "";
  57
  58 // Minimum mails / order
  59 define('__MIN_VALUE', getConfig('order_min'));
  60
  61 // Count unconfirmed mails
  62 $result_links = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_user_links WHERE userid=%s",
  63  array($GLOBALS['userid']), __FILE__, __LINE__);
  64 $links = SQL_NUMROWS($result_links);
  65 SQL_FREERESULT($result_links);
  66
  67 // Does the user has more than 0 mails per day set?
  68 $HOLIDAY="userid";
  69 if (GET_EXT_VERSION("holiday") >= "0.1.3") {
  70         // Fetch also holiday activation data
  71         $HOLIDAY = "holiday_active";
  72 } // END - if
  73
  74 $result_mmails = SQL_QUERY_ESC("SELECT userid, receive_mails, mail_orders, ".$HOLIDAY."
  75 FROM "._MYSQL_PREFIX."_user_data
  76 WHERE userid=%s AND max_mails > 0 LIMIT 1",
  77  array($GLOBALS['userid']), __FILE__, __LINE__);
  78
  79 $mmails = SQL_NUMROWS($result_mmails);
  80 list($DMY, $MAXI, $ORDERS, $HOLIDAY) = SQL_FETCHROW($result_mmails);
  81 SQL_FREERESULT($result_mmails);
  82 if ($HOLIDAY == $DMY) $HOLIDAY='N';
  83
  84 $ALLOWED = $MAXI - $ORDERS;
  85 if (getConfig('order_max_full') == "MAX") $ALLOWED = $MAXI;
  86
  87 // Now check his points amount
  88 $TOTAL = GET_TOTAL_DATA($GLOBALS['userid'], "user_points", "points");
  89
  90 if ($TOTAL > 0) {
  91         // And subtract his used points...
  92         $TOTAL -= GET_TOTAL_DATA($GLOBALS['userid'], "user_data", "used_points");
  93
  94         // Add (maybe) missing three zeros
  95         if (!ereg(".", $TOTAL)) $TOTAL .= ".00000";
  96 } // END - if
  97
  98 if (($HOLIDAY == "Y") && (GET_EXT_VERSION("holiday") >= "0.1.3")) {
  99         // Holiday is active!
 100         SQL_FREERESULT($result_p);
 101         LOAD_TEMPLATE("admin_settings_saved", false, HOLIDAY_ORDER_NOT_POSSIBLE);
 102 } elseif ((!empty($_POST['frametester'])) && ($ALLOWED > 0) && ($_POST['receiver'] > 0)) {
 103         // Continue with the frametester, we first need to store the data temporary in the pool
 104         //
 105         // First we would like to store the data and get it's pool position back...
 106         $result = SQL_QUERY_ESC("SELECT id, data_type
 107 FROM "._MYSQL_PREFIX."_pool
 108 WHERE sender=%s AND url='%s' AND timestamp > (UNIX_TIMESTAMP() - %s) LIMIT 1",
 109          array($GLOBALS['userid'], $_POST['url'], getConfig('url_tlock')), __FILE__, __LINE__);
 110
 111         $type = "TEMP"; $id = 0;
 112         if (SQL_NUMROWS($result) == 1) {
 113                 list($id, $type) = SQL_FETCHROW($result);
 114         }
 115
 116         // Free result
 117         SQL_FREERESULT($result);
 118
 119         if ($type == "TEMP") {
 120                 // No entry found, so we need to check out the stats table as well... :)
 121                 // We have to add that suff here, now we continue WITHOUT checking and check the text and subject against some filters
 122                 $URL = "";
 123                 if (getConfig('test_text') == "Y") {
 124                         // Test submitted text against some filters (length, URLs in text etc.)
 125                         if ((strpos(strtolower($_POST['text']), "https://") > -1) || (strpos(strtolower($_POST['text']), "http://") > -1) || (strpos(strtolower($_POST['text']), "www") > -1)) {
 126                                 // URL found!
 127                                 $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_URL_FOUND;
 128                         } // END - if
 129
 130                         // Remove new-line and carriage-return characters
 131                         $TEST = str_replace("\n", "", str_replace("\r", "", $_POST['text']));
 132
 133                         // Text length within allowed length?
 134                         if (strlen($TEST) > getConfig('max_tlength')) {
 135                                 // Text is too long!
 136                                 $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_OVERLENGTH;
 137                         } // END - if
 138                 } // END - if
 139
 140                 // Shall I test the subject line against URLs?
 141                 if (getConfig('test_subj') == "Y") {
 142                         // Check the subject line for issues
 143                         $_POST['subject'] = str_replace("\\", "[nl]", substr($_POST['subject'], 0, 200));
 144                         if ((strpos(strtolower($_POST['subject']), "http://") > -1) || (strpos(strtolower($_POST['subject']), "www") > -1)) {
 145                                 // URL in subject found
 146                                 $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_SUBJ_URL;
 147                         } // END - if
 148                 } // END - if
 149
 150                 // And shall I check that his URL is not in the black list?
 151                 if (getConfig('url_blacklist') == "Y") {
 152                         // Ok, I do that for you know...
 153                         $result = SQL_QUERY_ESC("SELECT UNIX_TIMESTAMP(`timestamp`) AS tstamp FROM `"._MYSQL_PREFIX."_url_blacklist` WHERE `url`='%s' LIMIT 1",
 154                                 array($_POST['url']), __FILE__, __LINE__);
 155
 156                         if (SQL_NUMROWS($result) == 1) {
 157                                 // Jupp, we got one listed
 158                                 list($blist) = SQL_FETCHROW($result);
 159
 160                                 // Create redirect-URL
 161                                 $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_BLIST_URL."&blist=".$blist;
 162                         } // END - if
 163
 164                         // Free result
 165                         SQL_FREERESULT($result);
 166                 } // END - if
 167
 168                 // Enougth receivers entered?
 169                 if (($_POST['receiver'] < getConfig('order_min')) && (!IS_ADMIN())) {
 170                         // Less than allowed receivers entered!
 171                         $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_MORE_RECEIVERS3;
 172                 } // END - if
 173
 174                 // Validate URL
 175                 if (!VALIDATE_URL($_POST['url'])) {
 176                         // URL is invalid!
 177                         $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_INVALID_URL;
 178                 } // END - if
 179
 180                 // Probe for HTML extension
 181                 if (EXT_IS_ACTIVE("html_mail")) {
 182                         // HTML or regular text mail?
 183                         if ($_POST['html'] == "Y") {
 184                                 // Chek for valid HTML tags
 185                                 $_POST['text'] = HTML_CHECK_TAGS($_POST['text']);
 186
 187                                 // Maybe invalid tags found?
 188                                 if (empty($_POST['text'])) $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_INVALID_TAGS."&id=".$id;
 189                         } else {
 190                                 // Remove any HTML code
 191                                 $_POST['text'] = str_replace("<", "{OPEN_HTML}", str_replace(">", "{CLOSE_HTML}", $_POST['text']));
 192                         }
 193                 }
 194         } elseif (!IS_ADMIN()) {
 195                 // He has already sent a mail within a specific time
 196                 $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_URL_TLOCK."&id=".$id;
 197         }
 198
 199         // Still no error?
 200         if (empty($URL)) {
 201                 // Check if category and number of receivers is okay
 202                 $ADD = "";
 203                 if ((getConfig('order_multi_page') == "Y") && (!empty($_POST['zip']))) {
 204                         // Choose recipients by ZIP code
 205                         $ADD = " AND d.zip LIKE '".bigintval($_POST['zip'])."{PER}'";
 206                 } // END - if
 207
 208                 // Check for userids
 209                 $result = SQL_QUERY_ESC("SELECT DISTINCT c.userid FROM "._MYSQL_PREFIX."_user_cats AS c
 210 LEFT JOIN `"._MYSQL_PREFIX."_user_data` AS d
 211 ON c.userid=d.userid
 212 WHERE c.cat_id=%s AND c.userid != '%s' AND d.status='CONFIRMED' AND d.receive_mails > 0".$ADD."
 213 ORDER BY d.%s %s",
 214  array(
 215         bigintval($_POST['cat']),
 216         $GLOBALS['userid'],
 217         getConfig('order_select'),
 218         getConfig('order_mode'),
 219  ), __FILE__, __LINE__);
 220
 221                 // Do we enougth receivers left?
 222                 if (SQL_NUMROWS($result) >= $_POST['receiver']) {
 223                         // Check for holiday extensions
 224                         $HOLIDAY = false;
 225                         if (GET_EXT_VERSION("holiday") >= "0.1.3") {
 226                                 // Include checking for users in holiday
 227                                 $HOLIDAY = true;
 228                         } // END - if
 229
 230                         // Load receivers from database
 231                         $TEST = array(); $cnt = 0;
 232                         while (list($REC) = SQL_FETCHROW($result)) {
 233                                 if ($HOLIDAY) {
 234                                         // Check for his holiday status
 235                                         $result_holiday = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_user_holidays
 236 WHERE userid=%s AND holiday_start < UNIX_TIMESTAMP() AND holiday_end > UNIX_TIMESTAMP() LIMIT 1",
 237  array(bigintval($REC)), __FILE__, __LINE__);
 238                                         if (SQL_NUMROWS($result_holiday) == 1) $REC = 0; // Exclude user who are in holiday
 239
 240                                         // Free memory
 241                                         SQL_FREERESULT($result_holiday);
 242                                 } // END - if
 243
 244                                 if ($REC > 0) {
 245                                         // Add receiver
 246                                         $TEST[] = $REC;
 247                                         $cnt++;
 248                                 } // END - if
 249                         } // END - while
 250
 251                         // Free memory
 252                         SQL_FREERESULT($result);
 253
 254                         // Implode array into string for the sending pool
 255                         $RECEIVER = implode($TEST, ";");
 256
 257                         // Count array for maximum sent
 258                         $MAX_SEND = count($TEST);
 259
 260                         // Update receiver list
 261                         $result = SQL_QUERY_ESC("UPDATE `"._MYSQL_PREFIX."_user_data` SET receive_mails=receive_mails-1 WHERE userid IN (%s) LIMIT %s",
 262                                 array(str_replace(";", ", ", $RECEIVER), $MAX_SEND), __FILE__, __LINE__);
 263
 264                         // Is calculated max receivers larger than wanted receivers then reset it
 265                         if ($MAX_SEND > $_POST['receiver']) $MAX_SEND = $_POST['receiver'];
 266
 267                         // Calculate used points
 268                         $USED = $MAX_SEND * GET_PAY_POINTS(bigintval($_POST['type']));
 269
 270                         // Fix empty zip code
 271                         if (empty($_POST['zip'])) $_POST['zip'] = "0";
 272
 273                         // Check if he has enougth points for this order and selected more than 0 receivers
 274                         if (($USED > 0) && ($USED <= $TOTAL) && ($MAX_SEND > 0)) {
 275                                 // Gettings points is okay, so we can add $USED later from
 276                                 $TIME = time();
 277                                 if (($id == "0") || ($type != "TEMP")) {
 278                                         // New order
 279                                         $id = 0;
 280                                         if (EXT_IS_ACTIVE("html_mail")) {
 281                                                 // HTML extension is active
 282                                                 $result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_pool (sender, subject, text, receivers, payment_id, data_type, timestamp, url, cat_id, target_send, zip, html_msg)
 283  VALUES ('%s','%s','%s','%s','%s','TEMP','%s','%s','%s','%s','%s','%s')",
 284 array(
 285         $GLOBALS['userid'],
 286         $_POST['subject'],
 287         $_POST['text'],
 288         $RECEIVER,
 289         bigintval($_POST['type']),
 290         $TIME,
 291         $_POST['url'],
 292         bigintval($_POST['cat']),
 293         $MAX_SEND,
 294         bigintval($_POST['zip']),
 295         $_POST['html']
 296 ), __FILE__, __LINE__);
 297                                         } else {
 298                                                 // No HTML extension is active
 299                                                 $result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_pool (sender, subject, text, receivers, payment_id, data_type, timestamp, url, cat_id, target_send, zip)
 300  VALUES ('%s','%s','%s','%s','%s','TEMP','%s','%s','%s','%s','%s')",
 301 array(
 302         $GLOBALS['userid'],
 303         $_POST['subject'],
 304         $_POST['text'],
 305         $RECEIVER,
 306         bigintval($_POST['type']),
 307         $TIME,
 308         $_POST['url'],
 309         bigintval($_POST['cat']),
 310         $MAX_SEND,
 311         bigintval($_POST['zip']),
 312 ), __FILE__, __LINE__);
 313                                         }
 314                                 } else {
 315                                         // Change current order
 316                                         if (EXT_IS_ACTIVE("html_mail")) {
 317                                                 // HTML extension is active
 318                                                 $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET
 319 subject='%s',
 320 text='%s',
 321 receivers='%s',
 322 payment_id=%s,
 323 timestamp=UNIX_TIMESTAMP(),
 324 url='%s',
 325 cat_id=%s,
 326 target_send=%s,
 327 zip=%s,
 328 html_msg='%s'
 329 WHERE id=%s LIMIT 1",
 330 array(
 331         $_POST['subject'],
 332         $_POST['text'],
 333         $RECEIVER,
 334         bigintval($_POST['type']),
 335         $_POST['url'],
 336         bigintval($_POST['cat']),
 337         $MAX_SEND,
 338         bigintval($_POST['zip']),
 339         $_POST['html'],
 340         bigintval($id)
 341 ), __FILE__, __LINE__);
 342                                         } else {
 343                                                 // No HTML extension is active
 344                                                 $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET
 345 subject='%s',
 346 text='%s',
 347 receivers='%s',
 348 payment_id=%s,
 349 timestamp=UNIX_TIMESTAMP(),
 350 url='%s',
 351 cat_id=%s,
 352 target_send=%s,
 353 zip=%s
 354 WHERE id=%s LIMIT 1",
 355 array(
 356         $_POST['subject'],
 357         $_POST['text'],
 358         $RECEIVER,
 359         bigintval($_POST['type']),
 360         $_POST['url'],
 361         bigintval($_POST['cat']),
 362         $MAX_SEND,
 363         bigintval($_POST['zip']),
 364         bigintval($id)
 365 ), __FILE__, __LINE__);
 366                                         }
 367                                 }
 368
 369                                 // Do we need to get the ID number?
 370                                 if ($id == 0) {
 371                                         // Order is placed as temporary. We need to get it's id for the frametester
 372                                         $result = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_pool WHERE sender=%s AND subject='%s' AND payment_id=%s AND data_type='TEMP' AND timestamp=%s LIMIT 1",
 373                                         array(
 374                                                 $GLOBALS['userid'],
 375                                                 $_POST['subject'],
 376                                                 bigintval($_POST['type']),
 377                                                 $TIME
 378                                         ), __FILE__, __LINE__);
 379
 380                                         list($id) = SQL_FETCHROW($result);
 381                                         SQL_FREERESULT($result);
 382                                 }
 383
 384                                 // ID is received so we can redirect the user, used points will be added when he send's out the mail
 385                                 $URL = URL."/modules.php?module=frametester&amp;order=".$id."";
 386                         } elseif ($MAX_SEND == 0) {
 387                                 // Not enougth receivers found which can receive mails
 388                                 $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_MORE_RECEIVERS2;
 389                         } else {
 390                                 // No enougth points left!
 391                                 $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_MORE_POINTS;
 392                         }
 393                 } else  {
 394                         // Ordered more mails than he can send in this category
 395                         $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_NO_RECS_LEFT;
 396                 }
 397         }
 398 } elseif ($_POST['receiver'] == "0") {
 399         // Not enougth receivers selected
 400         $URL = URL."/modules.php?module=login&amp;what=order&amp;msg=".CODE_MORE_RECEIVERS1;
 401 } elseif (($ALLOWED == 0) && (getConfig('order_max_full') == "ORDER")) {
 402         // No more mail orders allowed
 403         LOAD_TEMPLATE("admin_settings_saved", false, MEMBER_ORDER_ALLOWED_EXHAUSTED);
 404 } elseif (($links < getConfig('unconfirmed')) && ($mmails == "1")) {
 405         // Display order form
 406         $result_cats = SQL_QUERY("SELECT id, cat FROM "._MYSQL_PREFIX."_cats".$whereStatement." ORDER BY sort", __FILE__, __LINE__);
 407         if (SQL_NUMROWS($result_cats) > 0) {
 408                 if ($TOTAL > 0) {
 409                         // Initialize array...
 410                         $CATS = array(
 411                                 'id'   => array(),
 412                                 'name' => array(),
 413                                 'uids' => array()
 414                         );
 415
 416                         // Enable HTML checking
 417                         $HTML = ""; $HOLIDAY = false; $HOL_STRING = "";
 418                         if ((EXT_IS_ACTIVE("html_mail")) && ($_POST['html'] == "Y")) $HTML = " AND html='Y'";
 419                         if (GET_EXT_VERSION("holiday") >= "0.1.3") {
 420                                 // Extension's version is fine
 421                                 $HOLIDAY = true; $HOL_STRING = " AND holiday_active='N'";
 422                         } // END - if
 423
 424                         // ... and begin loading stuff
 425                         while (list($id, $cat) = SQL_FETCHROW($result_cats)) {
 426                                 $CATS['id'][]   = bigintval($id);
 427                                 $CATS['name'][] = $cat;
 428
 429                                 // Select users in current category
 430                                 $result_uids = SQL_QUERY_ESC("SELECT userid FROM "._MYSQL_PREFIX."_user_cats WHERE cat_id=%s AND userid != '%s' ORDER BY userid",
 431                                  array(bigintval($id), $GLOBALS['userid']), __FILE__, __LINE__);
 432
 433                                 $uid_cnt = 0;
 434                                 while (list($ucat) = SQL_FETCHROW($result_uids)) {
 435                                         // Check for holiday system
 436                                         $HOL_ACTIVE = false;
 437                                         if ($HOLIDAY) {
 438                                                 // Check user's holiday status
 439                                                 $result_holiday = SQL_QUERY_ESC("SELECT DISTINCT d.userid FROM `"._MYSQL_PREFIX."_user_data` AS d
 440 LEFT JOIN "._MYSQL_PREFIX."_user_holidays AS h
 441 ON d.userid=h.userid
 442 WHERE d.userid=%s AND d.receive_mails > 0 AND d.status='CONFIRMED' AND d.holiday_active='Y'
 443 AND h.holiday_start < UNIX_TIMESTAMP() AND h.holiday_end > UNIX_TIMESTAMP()
 444 LIMIT 1", array(bigintval($ucat)), __FILE__, __LINE__);
 445                                                 if (SQL_NUMROWS($result_holiday) == 1) {
 446                                                         // Holiday is active!
 447                                                         $HOL_ACTIVE = true;
 448                                                 } // END - if
 449
 450                                                 // Free memory
 451                                                 SQL_FREERESULT($result_holiday);
 452                                         } // END - if
 453
 454                                         if (!$HOL_ACTIVE) {
 455                                                 // Check if the user want's to receive mails?
 456                                                 $result_ver = SQL_QUERY_ESC("SELECT zip FROM `"._MYSQL_PREFIX."_user_data` WHERE userid=%s".$HTML." AND receive_mails > 0 AND status='CONFIRMED' LIMIT 1",
 457                                                  array(bigintval($ucat)), __FILE__, __LINE__);
 458
 459                                                 if ((SQL_NUMROWS($result_ver) == 1) && (!empty($_POST['zip'])) && (getConfig('order_multi_page') == "Y")) {
 460                                                         list($zip) = SQL_FETCHROW($result_ver);
 461                                                         SQL_FREERESULT($result_ver);
 462                                                         if (substr($zip, 0, strlen($_POST['zip'])) == $_POST['zip']) {
 463                                                                 // Ok, ZIP part is found
 464                                                                 $uid_cnt++;
 465                                                         } // END - if
 466                                                 } else {
 467                                                         // Count numbers up!
 468                                                         $uid_cnt += SQL_NUMROWS($result_ver);
 469                                                 }
 470                                         } // END - if
 471                                 } // END - while
 472
 473                                 // Free memory
 474                                 SQL_FREERESULT($result_uids);
 475                                 $CATS['uids'][] = $uid_cnt;
 476                         } // END - while
 477
 478                         // Free memory
 479                         SQL_FREERESULT($result_cats);
 480
 481                         // Now we need to load the mail types...
 482                         $result = SQL_QUERY("SELECT id, price, payment, mail_title FROM "._MYSQL_PREFIX."_payments ORDER BY payment", __FILE__, __LINE__);
 483
 484                         $typeS = array();
 485                         if (SQL_NUMROWS($result) > 0) {
 486                                 // Check for message ID in URL
 487                                 $MSG = "";
 488                                 switch ($_GET['msg'])
 489                                 {
 490                                 case CODE_URL_TLOCK:
 491                                         $result = SQL_QUERY_ESC("SELECT timestamp FROM "._MYSQL_PREFIX."_pool WHERE id=%s LIMIT 1",
 492                                          array(bigintval($_GET['id'])), __FILE__, __LINE__);
 493
 494                                         // Load timestamp from last order
 495                                         list($LORDER) = SQL_FETCHROW($result);
 496                                         $LORDER = MAKE_DATETIME($LORDER, "1");
 497
 498                                         // Free memory
 499                                         SQL_FREERESULT($result);
 500
 501                                         // Calculate hours...
 502                                         $STD = round(getConfig('url_tlock') / 60 / 60);
 503
 504                                         // Minutes...
 505                                         $MIN = round((getConfig('url_tlock') - $STD * 60 * 60) / 60);
 506
 507                                         // And seconds
 508                                         $SEC = getConfig('url_tlock') - $STD * 60 * 60 - $MIN * 60;
 509
 510                                         // Finally contruct the message
 511                                         $MSG = MEMBER_URL_TIME_LOCK."<br />".CONFIG_URL_TLOCK." ".$STD." ".
 512                                                 _HOURS.", ".$MIN." "._MINUTES." "._AND." ".$SEC." "._SECONDS."<br />".
 513                                                 MEMBER_LAST_TLOCK.": ".$LORDER;
 514                                         break;
 515
 516                                 case CODE_OVERLENGTH:
 517                                         $MSG = MEMBER_TEXT_OVERLENGTH;
 518                                         break;
 519
 520                                 case CODE_URL_FOUND:
 521                                         $MSG = MEMBER_TEXT_CONTAINS_URL;
 522                                         break;
 523
 524                                 case CODE_SUBJ_URL:
 525                                         $MSG = MEMBER_SUBJ_CONTAINS_URL;
 526                                         break;
 527
 528                                 case CODE_BLIST_URL:
 529                                         $MSG = MEMBER_URL_BLACK_LISTED."<br />\n".MEMBER_BLIST_TIME.": ".MAKE_DATETIME($_GET['blist'], "0");
 530                                         break;
 531
 532                                 case CODE_NO_RECS_LEFT:
 533                                         $MSG = MEMBER_SELECTED_MORE_RECS;
 534                                         break;
 535
 536                                 case CODE_INVALID_TAGS:
 537                                         $MSG = MEMBER_HTML_INVALID_TAGS;
 538                                         break;
 539
 540                                 case CODE_MORE_POINTS:
 541                                         $MSG = MEMBER_MORE_POINTS_NEEDED;
 542                                         break;
 543
 544                                 case CODE_MORE_RECEIVERS1:
 545                                         $MSG = MEMBER_ENTER_MORE_RECEIVERS;
 546                                         break;
 547
 548                                 case CODE_MORE_RECEIVERS2:
 549                                         $MSG = MEMBER_NO_MORE_RECEIVERS_FOUND;
 550                                         break;
 551
 552                                 case CODE_MORE_RECEIVERS3:
 553                                         $MSG = MEMBER_ENTER_MORE_MIN_RECEIVERS_1.getConfig('order_min').MEMBER_ENTER_MORE_MIN_RECEIVERS_2;
 554                                         break;
 555
 556                                 case CODE_INVALID_URL:
 557                                         $MSG = MEMBER_ENTER_INVALID_URL;
 558                                         break;
 559
 560                                 case "": // When no error code is included in the URL we do not need to output an error message as well...
 561                                         break;
 562
 563                                 default:
 564                                         DEBUG_LOG(__FILE__, __LINE__, sprintf("Unknown error code %s detected.", $_GET['msg']));
 565                                         $MSG = UNKNOWN_CODE_1.$_GET['msg'].UNKNOWN_CODE_2;
 566                                         break;
 567                                 }
 568
 569                                 if (!empty($MSG)) {
 570                                         // We got system message so we drop it out to the user
 571                                         LOAD_TEMPLATE("admin_settings_saved", false, $MSG);
 572                                 } // END - if
 573
 574                                 // Load all email types...
 575                                 while ($typeS[] = SQL_FETCHROW($result)) {
 576                                         // Nothing to do here... ;-)
 577                                 } // END - while
 578
 579                                 // Free memory
 580                                 SQL_FREERESULT($result);
 581
 582                                 // Output user's points
 583                                 $TOTAL = TRANSLATE_COMMA($TOTAL);
 584
 585                                 // Check how many mail orders he has placed today and how many he's allowed to send
 586                                 switch (getConfig('order_max_full'))
 587                                 {
 588                                 case "MAX": // He is allowed to send as much as possible
 589                                         define('ORDER_MAX_VALUE', ORDER_ALLOED_MAX);
 590                                         break;
 591
 592                                 case "ORDER": // He is allowed to send as much as he setup the receiving value
 593                                         define('ORDER_MAX_VALUE', ORDER_ALLOWED_RECEIVE_1.$ALLOWED.ORDER_ALLOWED_RECEIVE_2.$MAXI.ORDER_ALLOWED_RECEIVE_3);
 594                                         break;
 595
 596                                 default: // Unknown/invalid
 597                                         DEBUG_LOG(__FILE__, __LINE__, sprintf("Unknown order_mas_full config detected.", getConfig('order_max_full')));
 598                                         define('ORDER_MAX_VALUE', ORDER_ALLOED_UNKNOWN);
 599                                         break;
 600                                 }
 601
 602                                 // Load final template
 603                                 LOAD_TEMPLATE("member_order_points", false, $TOTAL);
 604
 605                                 // Reset variables
 606                                 $OLD_ORDER = false; $subject = ""; $text = ""; $target = "";
 607
 608                                 // Check if we already have an order placed and make it editable
 609                                 $result = SQL_QUERY_ESC("SELECT subject, text, payment_id, timestamp, url, target_send, cat_id, zip FROM "._MYSQL_PREFIX."_pool WHERE sender=%s AND data_type='TEMP' LIMIT 1",
 610                                  array($GLOBALS['userid']), __FILE__, __LINE__);
 611
 612                                 if (SQL_NUMROWS($result) == 1) {
 613                                         // Old order found
 614                                         list($subject, $text, $payment, $tstamp, $url, $target, $cat, $zip) = SQL_FETCHROW($result);
 615                                         SQL_FREERESULT($result);
 616
 617                                         // Fix max receivers when it is too much
 618                                         if ($target > $CATS['uids'][$cat]) $target = $CATS['uids'][$cat];
 619
 620                                         // Old order is grabbed
 621                                         $OLD_ORDER = true;
 622                                 } else {
 623                                         // Default output for that your members don't forget it...
 624                                         $url = "http://";
 625                                 }
 626
 627                                 // 01      2              21    12                                   2    23         443    3          3210
 628                                 if ((!empty($_POST['data'])) || ((getConfig('order_multi_page') == "N") && ((!IS_ADMIN()) && (!EXT_IS_ACTIVE("html_mail"))))) {
 629                                         // Pre-output categories
 630                                         $CAT = "";
 631                                         foreach ($CATS['id'] as $key => $value) {
 632                                                 $CAT .= "      <OPTION value=\"".$value."\"";
 633                                                 if (($OLD_ORDER) && ($cat == $value)) $CAT .= " selected=\"selected\"";
 634                                                 $CAT .= ">".$CATS['name'][$key]." (".$CATS['uids'][$key]." ".USER_IN_CAT.")</OPTION>\n";
 635                                         } // END - foreach
 636
 637                                         // Mail type
 638                                         $type = "";
 639                                         foreach ($typeS as $key => $value) {
 640                                                 $P = TRANSLATE_COMMA($typeS[$key][1]);
 641                                                 if (is_array($value)) {
 642                                                         // Output option line
 643                                                         $type .= "      <OPTION value=\"".$typeS[$key][0]."\"";
 644                                                         if (($OLD_ORDER) && ($payment == $typeS[$key][0])) $type .= " selected=\"selected\"";
 645                                                         $type .= ">".$P." ".PER_MAIL." - ".$typeS[$key][3]." - ".round($typeS[$key][2])." ".PAYMENT."</OPTION>\n";
 646                                                 } // END - if
 647                                         } // END - foreach
 648
 649                                         // Put all in constants for the template
 650                                         define('CATEGORY_SELECTION', $CAT);
 651                                         define('TYPE_SELECTION', $type);
 652                                         define('TARGET', $target);
 653                                         define('SUBJECT', $subject);
 654                                         define('TEXT', COMPILE_CODE($text));
 655                                         define('T_URL', $url);
 656
 657                                         if (!empty($_POST['zip'])) {
 658                                                 // Output entered ZIP code
 659                                                 define('ZIP_OUTPUT', LOAD_TEMPLATE("member_order-zip2", true, $_POST['zip']));
 660                                         } else {
 661                                                 define('ZIP_OUTPUT', "<TR><TD colspan=\"5\" height=\"5\" class=\"seperator\">&nbsp;</TD></TR>");
 662                                         }
 663
 664                                         // HTML extension
 665                                         if ((EXT_IS_ACTIVE("html_mail")) && ($_POST['html'] == "Y")) {
 666                                                 // Extension is active so output valid HTML tags
 667                                                 define('MEMBER_HTML_EXTENSION', LOAD_TEMPLATE("member_order-html_ext", true, HTML_ADD_VALID_TAGS()));
 668                                         } else {
 669                                                 // Extension not active and/or class not uploaded
 670                                                 define('MEMBER_HTML_EXTENSION', "<TR><TD colspan=\"5\"><INPUT type=\"hidden\" name=\"html\" value=\"N\"></TD></TR>");
 671                                         }
 672
 673                                         // Output form for page 2
 674                                         LOAD_TEMPLATE("member_order_page2");
 675                                 } else {
 676                                         // Remember maybe entered ZIP code in constant
 677                                         $ADD = "";
 678                                         if (EXT_IS_ACTIVE("html_mail")) {
 679                                                 // Add some content when html extension is active
 680                                                 if ((getConfig('order_multi_page') == "Y") || (IS_ADMIN())) $ADD = "<TR><TD colspan=\"2\" class=\"seperator bottom2\" height=\"5\">&nbsp;</TD></TR>\n";
 681                                                 define('MEMBER_HTML_EXTENSION', LOAD_TEMPLATE("member_order-html_intro", true));
 682                                         } else {
 683                                                 // No HTML extension installed
 684                                                 define('MEMBER_HTML_EXTENSION', "<TR><TD colspan=\"2\"><INPUT type=\"hidden\" name=\"html\" value=\"N\"></TD></TR>");
 685                                         }
 686
 687                                         // Do we want ZIP code or not?
 688                                         if ((getConfig('order_multi_page') == "Y") || (IS_ADMIN())) {
 689                                                 // Yes
 690                                                 $content = array(
 691                                                         'zip' => bigintval($_POST['zip']),
 692                                                         'add' => $ADD
 693                                                 );
 694                                                 define('MEMBER_ZIP_CONTENT', LOAD_TEMPLATE("member_order-zip1", true, $content));
 695                                         } else {
 696                                                 // No
 697                                                 define('MEMBER_ZIP_CONTENT', "");
 698                                         }
 699
 700                                         // Output form for page 1 (ZIP code or HTML)
 701                                         LOAD_TEMPLATE("member_order_page1");
 702                                 }
 703                         } else {
 704                                 // No mail types defined
 705                                 OUTPUT_HTML("<STRONG><SPAN class=\"member_failed\">".MEMBER_NO_PAYMENTS."</SPAN></STRONG>");
 706                         }
 707                 } else {
 708                         // No points left!
 709                         OUTPUT_HTML("<STRONG><SPAN class=\"member_failed\">".MEMBER_NO_POINTS."</SPAN></STRONG>");
 710                 }
 711         } else {
 712                 // No cateogries are defined yet
 713                 OUTPUT_HTML("<STRONG><SPAN class=\"member_failed\">".MEMBER_NO_CATS."</SPAN></STRONG>");
 714         }
 715 } elseif ($mmails == "0") {
 716         // Please set more than 0 mails per day!
 717         LOAD_TEMPLATE("admin_settings_saved", false, MEMBER_HAS_ZERO_MMAILS);
 718 } else {
 719         // Please confirm some mails first!
 720         LOAD_TEMPLATE("admin_settings_saved", false, MEMBER_LINKS_LEFT_1.$links.MEMBER_LINKS_LEFT_2.getConfig('unconfirmed').MEMBER_LINKS_LEFT_3);
 721 }
 722
 723 if (!empty($URL)) {
 724         // Redirect to requested URL
 725         LOAD_URL($URL);
 726 } // END - if
 727
 728 //
 729 ?>