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