-<?php\r
-/************************************************************************\r
- * MXChange v0.2.1 Start: 10/22/2005 *\r
- * =============== Last change: 10/22/2005 *\r
- * *\r
- * -------------------------------------------------------------------- *\r
- * File : monthly_beg.php *\r
- * -------------------------------------------------------------------- *\r
- * Short description : Monthly begging rallye *\r
- * -------------------------------------------------------------------- *\r
- * Kurzbeschreibung : Monatliche Bettelrallye *\r
- * -------------------------------------------------------------------- *\r
- * *\r
- * -------------------------------------------------------------------- *\r
- * Copyright (c) 2003 - 2007 by Roland Haeder *\r
- * For more information visit: http://www.mxchange.org *\r
- * *\r
- * This program is free software; you can redistribute it and/or modify *\r
- * it under the terms of the GNU General Public License as published by *\r
- * the Free Software Foundation; either version 2 of the License, or *\r
- * (at your option) any later version. *\r
- * *\r
- * This program is distributed in the hope that it will be useful, *\r
- * but WITHOUT ANY WARRANTY; without even the implied warranty of *\r
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *\r
- * GNU General Public License for more details. *\r
- * *\r
- * You should have received a copy of the GNU General Public License *\r
- * along with this program; if not, write to the Free Software *\r
- * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, *\r
- * MA 02110-1301 USA *\r
- ************************************************************************/\r
-\r
-// Some security stuff...\r
-if (ereg(basename(__FILE__), $_SERVER['PHP_SELF']))\r
-{\r
- $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4)."/security.php";\r
- require($INC);\r
-}\r
- elseif ((!EXT_IS_ACTIVE("beg")) && (!IS_ADMIN()))\r
-{\r
- ADD_FATAL(EXTENSION_PROBLEM_EXT_INACTIVE, "beg");\r
- return;\r
-}\r
-\r
-// Do not execute when script is in CSS mode or no daily reset\r
-if (($CSS == 1) || (!defined('__DAILY_RESET'))) return;\r
-\r
-// Get current month (2 digits)\r
-$curr = date("m", time());\r
-\r
-// Check if month is done\r
-if (($curr != $CONFIG['beg_month']) && ($CONFIG['beg_month'] > 0) && ($CONFIG['beg_ranks'] > 0) && ($CSS != 1))\r
-{\r
- // Extension "autopurge" is inactive or purging of inactive accounts is deactivated\r
- $WHERE1 = "";\r
- $WHERE2 = 0;\r
- $WHERE3 = bigintval($CONFIG['beg_ranks']);\r
-\r
- // Let's check if there are some points left we can "pay"...\r
- if (EXT_IS_ACTIVE("autopurge"))\r
- {\r
- // Use last online stamp only when autopurge for inactive members is activated\r
- if (($CONFIG['ap_in_since'] > 0) && ($CONFIG['beg_active'] == "Y"))\r
- {\r
- // Okay, include last online timestamp\r
- $WHERE1 = "AND last_online >=";\r
- $WHERE2 = bigintval(time() - $CONFIG['ap_in_since']);\r
- $WHERE3 = bigintval($CONFIG['beg_ranks']);\r
- }\r
- }\r
-\r
- // SQL string to check for accounts\r
- $result_main = SQL_QUERY_ESC("SELECT userid, email, beg_points\r
-FROM "._MYSQL_PREFIX."_user_data WHERE status='CONFIRMED' ".$WHERE1." %s AND beg_points > 0 ORDER BY beg_points DESC, userid LIMIT %s",\r
- array($WHERE2, $WHERE3), __FILE__, __LINE__);\r
-\r
- if (SQL_NUMROWS($result_main) > 0)\r
- {\r
- // Load our winners...\r
- $UIDs = "";\r
- while(list($uid, $email, $points) = SQL_FETCHROW($result_main))\r
- {\r
- // Add points to user's account directly\r
- $result_data = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_points\r
-SET points=points+%s WHERE ref_depth='0' AND userid=%d LIMIT 1",\r
- array($points, bigintval($uid)), __FILE__, __LINE__);\r
-\r
- // Update mediadata as well\r
- if (GET_EXT_VERSION("mediadata") >= "0.0.4")\r
- {\r
- // Update database\r
- MEDIA_UPDATE_ENTRY(array("total_points"), "add", $points);\r
- }\r
-\r
- // Load email template and email it away\r
- $msg = LOAD_EMAIL_TEMPLATE("member_beg", $points, bigintval($uid));\r
- SEND_EMAIL($email, BEG_MONTHLY_RALLYE, $msg);\r
- }\r
-\r
- // Remove first commata\r
- $UIDs = substr($UIDs, 1);\r
-\r
- // Get current month\r
- $curr = date("m", time());\r
- if (strlen($curr) == 1) $curr = "0".$curr;\r
- if ($curr == "00") $curr = "12";\r
-\r
- // Reset accounts\r
- $result = SQL_QUERY("UPDATE "._MYSQL_PREFIX."_user_data SET beg_points='0.00000' WHERE beg_points > 0",\r
- __FILE__, __LINE__);\r
- }\r
-\r
- // Free memory\r
- SQL_FREERESULT($result_main);\r
-\r
- // Finally update database and config array\r
- $CONFIG['beg_month'] = $curr;\r
- $result_update = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_config SET beg_month='%s' WHERE config='0' LIMIT 1",\r
- array($curr), __FILE__, __LINE__);\r
-\r
- // Destroy cache\r
-}\r
-//\r
-?>\r
+<?php
+/************************************************************************
+ * MXChange v0.2.1 Start: 10/22/2005 *
+ * =============== Last change: 10/22/2005 *
+ * *
+ * -------------------------------------------------------------------- *
+ * File : monthly_beg.php *
+ * -------------------------------------------------------------------- *
+ * Short description : Monthly begging rallye *
+ * -------------------------------------------------------------------- *
+ * Kurzbeschreibung : Monatliche Bettelrallye *
+ * -------------------------------------------------------------------- *
+ * *
+ * -------------------------------------------------------------------- *
+ * Copyright (c) 2003 - 2008 by Roland Haeder *
+ * For more information visit: http://www.mxchange.org *
+ * *
+ * This program is free software; you can redistribute it and/or modify *
+ * it under the terms of the GNU General Public License as published by *
+ * the Free Software Foundation; either version 2 of the License, or *
+ * (at your option) any later version. *
+ * *
+ * This program is distributed in the hope that it will be useful, *
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of *
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
+ * GNU General Public License for more details. *
+ * *
+ * You should have received a copy of the GNU General Public License *
+ * along with this program; if not, write to the Free Software *
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, *
+ * MA 02110-1301 USA *
+ ************************************************************************/
+
+// Some security stuff...
+if (ereg(basename(__FILE__), $_SERVER['PHP_SELF']))
+{
+ $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
+ require($INC);
+}
+ elseif ((!EXT_IS_ACTIVE("beg")) && (!IS_ADMIN()))
+{
+ ADD_FATAL(EXTENSION_PROBLEM_EXT_INACTIVE, "beg");
+ return;
+}
+
+// Do not execute when script is in CSS mode or no daily reset
+if (($CSS == 1) || (!defined('__DAILY_RESET'))) return;
+
+// Get current month (2 digits)
+$curr = date("m", time());
+
+// Check if month is done
+if (($curr != $CONFIG['beg_month']) && ($CONFIG['beg_month'] > 0) && ($CONFIG['beg_ranks'] > 0) && ($CSS != 1))
+{
+ // Extension "autopurge" is inactive or purging of inactive accounts is deactivated
+ $WHERE1 = "";
+ $WHERE2 = 0;
+ $WHERE3 = bigintval($CONFIG['beg_ranks']);
+
+ // Let's check if there are some points left we can "pay"...
+ if (EXT_IS_ACTIVE("autopurge"))
+ {
+ // Use last online stamp only when autopurge for inactive members is activated
+ if (($CONFIG['ap_in_since'] > 0) && ($CONFIG['beg_active'] == "Y"))
+ {
+ // Okay, include last online timestamp
+ $WHERE1 = "AND last_online >=";
+ $WHERE2 = bigintval(time() - $CONFIG['ap_in_since']);
+ $WHERE3 = bigintval($CONFIG['beg_ranks']);
+ }
+ }
+
+ // SQL string to check for accounts
+ $result_main = SQL_QUERY_ESC("SELECT userid, email, beg_points
+FROM "._MYSQL_PREFIX."_user_data WHERE status='CONFIRMED' ".$WHERE1." %s AND beg_points > 0 ORDER BY beg_points DESC, userid LIMIT %s",
+ array($WHERE2, $WHERE3), __FILE__, __LINE__);
+
+ if (SQL_NUMROWS($result_main) > 0)
+ {
+ // Load our winners...
+ $UIDs = "";
+ while(list($uid, $email, $points) = SQL_FETCHROW($result_main))
+ {
+ // Add points to user's account directly
+ $result_data = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_points
+SET points=points+%s WHERE ref_depth='0' AND userid=%d LIMIT 1",
+ array($points, bigintval($uid)), __FILE__, __LINE__);
+
+ // Update mediadata as well
+ if (GET_EXT_VERSION("mediadata") >= "0.0.4")
+ {
+ // Update database
+ MEDIA_UPDATE_ENTRY(array("total_points"), "add", $points);
+ }
+
+ // Load email template and email it away
+ $msg = LOAD_EMAIL_TEMPLATE("member_beg", $points, bigintval($uid));
+ SEND_EMAIL($email, BEG_MONTHLY_RALLYE, $msg);
+ }
+
+ // Remove first commata
+ $UIDs = substr($UIDs, 1);
+
+ // Get current month
+ $curr = date("m", time());
+ if (strlen($curr) == 1) $curr = "0".$curr;
+ if ($curr == "00") $curr = "12";
+
+ // Reset accounts
+ $result = SQL_QUERY("UPDATE "._MYSQL_PREFIX."_user_data SET beg_points='0.00000' WHERE beg_points > 0",
+ __FILE__, __LINE__);
+ }
+
+ // Free memory
+ SQL_FREERESULT($result_main);
+
+ // Finally update database and config array
+ $CONFIG['beg_month'] = $curr;
+ $result_update = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_config SET beg_month='%s' WHERE config='0' LIMIT 1",
+ array($curr), __FILE__, __LINE__);
+
+ // Destroy cache
+}
+//
+?>