2 /************************************************************************
3 * MXChange v0.2.1 Start: 09/25/2004 *
4 * ================ Last change: 09/25/2004 *
6 * -------------------------------------------------------------------- *
8 * -------------------------------------------------------------------- *
9 * Short description : Begging link *
10 * -------------------------------------------------------------------- *
11 * Kurzbeschreibung : Bettel-Link *
12 * -------------------------------------------------------------------- *
14 * -------------------------------------------------------------------- *
15 * Copyright (c) 2003 - 2008 by Roland Haeder *
16 * For more information visit: http://www.mxchange.org *
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. *
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. *
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, *
32 ************************************************************************/
34 // Some security stuff...
35 if ((ereg(basename(__FILE__), $_SERVER['PHP_SELF'])))
37 $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
42 $EXT_VERSION = "0.2.5";
44 // Auto-set extension version
45 if (empty($EXT_VER)) $EXT_VER = $EXT_VERSION;
47 // Version history array (add more with , "0.1" and so on)
48 $EXT_VER_HISTORY = array("0.0", "0.0.1", "0.0.2", "0.0.3", "0.0.4", "0.0.5", "0.0.6", "0.0.7", "0.0.8", "0.0.9", "0.1.0", "0.1.1", "0.1.2", "0.1.3", "0.1.4", "0.1.5", "0.1.6", "0.1.7", "0.1.8", "0.1.9", "0.2.0", "0.2.1", "0.2.2", "0.2.3", "0.2.4", "0.2.5");
50 switch ($EXT_LOAD_MODE)
52 case "register": // Do stuff when installtion is running (modules.php?module=admin&action=login is called)
53 // SQL commands to run
54 $SQLs[] = "INSERT INTO "._MYSQL_PREFIX."_admin_menu (action, what, title, descr, sort) VALUES('setup', 'config_beg', 'Bettel-Link', 'IP-Sperre, {!POINTS!}-Vergütung usw. können Sie hier einstellen.', 10)";
55 $SQLs[] = "INSERT INTO "._MYSQL_PREFIX."_guest_menu (action, what, title, sort, visible, locked) VALUES ('main', 'beg', '{!POINTS!} erbetteln!', 4, 'Y', 'Y')";
56 $SQLs[] = "INSERT INTO "._MYSQL_PREFIX."_member_menu (action, what, title, sort, visible, locked) VALUES ('main', 'beg', 'Ihr Bettel-Link', 6, 'Y', 'Y')";
57 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_timeout bigint(20) not null default '600'";
58 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_uid_timeout bigint(20) not null default '1800'";
59 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_points double(20,5) not null default '0.00100'";
60 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_user_data ADD beg_clicks bigint(20) not null default '0'";
61 $SQLs[] = "DROP TABLE IF EXISTS "._MYSQL_PREFIX."_beg_ips";
62 $SQLs[] = "CREATE TABLE "._MYSQL_PREFIX."_beg_ips (
63 id bigint(20) not null auto_increment,
64 userid bigint(20) not null default '0',
65 remote_ip varchar(15) not null default '0.0.0.0',
66 timeout varchar(10) not null default '',
75 case "remove": // Do stuff when removing extension
76 // SQL commands to run
77 $SQLs[] = "DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_admin_menu WHERE what='config_beg' OR what='list_beg' LIMIT 2";
78 $SQLs[] = "DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_guest_menu WHERE what='beg' LIMIT 1";
79 $SQLs[] = "DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_member_menu WHERE what='beg' OR what='beg2' LIMIT 2";
80 $SQLs[] = "DROP TABLE IF EXISTS "._MYSQL_PREFIX."_beg_ips";
83 case "activate": // Do stuff when admin activates this extension
84 // SQL commands to run
85 $SQLs[] = "UPDATE "._MYSQL_PREFIX."_guest_menu SET visible='Y', locked='N' WHERE what='beg' LIMIT 1";
86 $SQLs[] = "UPDATE "._MYSQL_PREFIX."_member_menu SET visible='Y', locked='N' WHERE what='beg' LIMIT 1";
87 $SQLs[] = "UPDATE "._MYSQL_PREFIX."_mod_reg SET locked='N', hidden='N', admin_only='N', mem_only='N' WHERE module='beg' LIMIT 1";
90 case "deactivate": // Do stuff when admin deactivates this extension
91 // SQL commands to run
92 $SQLs[] = "UPDATE "._MYSQL_PREFIX."_guest_menu SET visible='Y', locked='Y' WHERE what='beg' LIMIT 1";
93 $SQLs[] = "UPDATE "._MYSQL_PREFIX."_member_menu SET visible='Y', locked='Y' WHERE what='beg' LIMIT 1";
94 $SQLs[] = "UPDATE "._MYSQL_PREFIX."_mod_reg SET locked='Y' WHERE module='beg' LIMIT 1";
97 case "update": // Update an extension
100 case "0.0.1": // SQL queries for v0.0.1
101 // Update notes (these will be set as task text!)
102 $UPDATE_NOTES = "Design "Solid-Business" eingebaut.";
105 case "0.0.2": // SQL queries for v0.0.2
106 // Update notes (these will be set as task text!)
107 $UPDATE_NOTES = "Seit <A href=\"".SERVER_URL."/patches/340-Gast_Mitgliedsmenue_Deaktivieren.zip\">Patch 340</A> überflüssige HTML-Tags entfernt.";
110 case "0.0.3": // SQL queries for v0.0.3
111 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_points_max double(20,5) not null default '0.10000'";
113 // Update notes (these will be set as task text!)
114 $UPDATE_NOTES = "Maximale Obergrenze an {!POINTS!} einstellbar (Standart: 0,1 {!POINTS!})";
117 case "0.0.4": // SQL queries for v0.0.4
118 // Update notes (these will be set as task text!)
119 $UPDATE_NOTES = "Überlange Kommastellen bei Punktangaben aus Bettellink und Gastbereich entfernt und Admin-Templates repariert ("Unbekannte Spalte <U>beg_points_ma</U>").";
122 case "0.0.5": // SQL queries for v0.0.5
123 // Update notes (these will be set as task text!)
124 $UPDATE_NOTES = "Im Mitgliedsmenü wurde die Beschreibung aus dem Gastmenü verwendet.";
127 case "0.0.6": // SQL queries for v0.0.6
128 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_uid bigint(20) not null default '0'";
130 // Update notes (these will be set as task text!)
131 $UPDATE_NOTES = "Ein Mitgliedsaccount (empfehlenswert ist Ihr eigenes!) kann zum Abbuchen der {!POINTS!} verwendet werden. Template <U>admin_config_beg.tpl</U> (und pro!) nicht vergessen, zu aktualisieren.";
134 case "0.0.8": // SQL queries for v0.0.8
135 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_ip_timeout bigint(20) not null default '1800'";
137 // Update notes (these will be set as task text!)
138 $UPDATE_NOTES = "Zeitsperre gegen die selbe IP-Nummer hinzugefügt.";
141 case "0.0.9": // SQL queries for v0.0.9
142 // Update notes (these will be set as task text!)
143 $UPDATE_NOTES = "Bitte verschieben Sie die beg-Templates (Ordner: ".PATH."/templates/".GET_LANGUAGE()."/html/) in den neuen Order beg!";
146 case "0.1.0": // SQL queries for v0.2.1
147 // Update notes (these will be set as task text!)
148 $UPDATE_NOTES = "Abspeichern von Einstellungen repariert.";
151 case "0.1.1": // SQL queries for v0.1.1
152 // Update notes (these will be set as task text!)
153 $UPDATE_NOTES = "Vorbereitung auf die neue Mediendaten v0.0.4.";
158 $curr = date("m", time());
159 if (strlen($curr) == 1) $curr = "0".$curr;
160 if ($curr == "00") $curr = "12";
162 // SQL queries for v0.1.2
163 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_mode enum('DIRECT', 'REF') not null default 'REF'";
164 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_month char(2) not null default '".$curr."'";
165 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_ranks tinyint(4) not null default '10'";
166 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_active enum('Y', 'N') not null default 'N'";
167 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_rallye enum('Y', 'N') not null default 'N'";
168 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_user_data ADD beg_points double(21,5) not null default '0.00000'";
169 $VIS = 'N'; $LOCKED = 'Y';
170 if (EXT_IS_ACTIVE("beg")) { $VIS = 'Y'; $LOCKED = 'N'; }
171 $SQLs[] = "INSERT INTO "._MYSQL_PREFIX."_member_menu (action, what, title, visible, locked, sort) VALUES ('main', 'beg2', 'Bettel-Rallye', '".$VIS."', '".$LOCKED."', '7')";
172 $SQLs[] = "INSERT INTO "._MYSQL_PREFIX."_admin_menu (action, what, title, descr, sort) VALUES('user', 'list_beg', 'Bettel-Rallye', 'Listet alle Teilnehmer der monatlichen Bettel-Rallye auf.', '12')";
174 // Update notes (these will be set as task text!)
175 $UPDATE_NOTES = "Optionale Bettel-Rallye möglich. Und die erbettelten {!POINTS!} können entweder nur dem bettelndem Mitglied direkt oder auch seinem Werber gutgeschrieben werden können.";
178 case "0.1.3": // SQL queries for v0.1.3
179 // Update notes (these will be set as task text!)
180 $UPDATE_NOTES = "Erbettelte {!POINTS!} werden nach Deaktivierung der Bettel-Rallye gelöscht.";
183 case "0.1.4": // SQL queries for v0.1.4
184 // Update notes (these will be set as task text!)
185 $UPDATE_NOTES = "Rechtlichen Hinweis im Mitgliedsbereich vergessen (<STRONG>member_list_beg.tpl</STRONG>); Template <STRONG>member_beg_404.tpl</STRONG> fehlte!";
188 case "0.1.5": // SQL queries for v0.1.5
189 $SQLs[] = "UPDATE "._MYSQL_PREFIX."_admin_menu SET title='Bettellink/-rallye', descr='IP-Sperre, {!POINTS!}-Vergütung und auch die Bettel-Rallye können Sie hier einstellen.' WHERE what='config_beg' LIMIT 1";
191 // Update notes (these will be set as task text!)
192 $UPDATE_NOTES = "Fehlendes Template im Admin-Bereich hinzugefügt. Im Admin-Bereich Hinweis hinzugefügt, wenn Bettel-Rallye inaktiv ist. Bitte Script inc/monthly_beg.php löschen!";
195 case "0.1.6": // SQL queries for v0.1.6
196 // Update notes (these will be set as task text!)
197 $UPDATE_NOTES = "Es wurden immer dem ersten bettelndem Mitglied die {!POINTS!} gutgeschrieben.";
200 case "0.1.7": // SQL queries for v0.1.7
201 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_ral_en_notify enum('Y', 'N') not null default 'N'";
202 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_ral_di_notify enum('Y', 'N') not null default 'N'";
203 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_new_mem_notify enum('Y', 'N') not null default 'N'";
204 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_notify_bonus double(20,5) not null default '0.00000'";
205 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_notify_wait bigint(20) not null default '30'";
206 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_user_data ADD beg_ral_notify bigint(20) not null default '0'";
207 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_user_data ADD beg_ral_en_notify bigint(20) not null default '0'";
208 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_user_data ADD beg_ral_di_notify bigint(20) not null default '0'";
210 // Update notes (these will be set as task text!)
211 $UPDATE_NOTES = "Die Mitglieder können nun optional automatisch über eine aktivierte und/oder deaktivierte Bettel-Rallye informiert werden. Beide Benachrichtigungen können Sie unter <STRONG>Einstellungen --> Bettel-Link/-rallye</STRONG> seperat ein- und ausschalten! Zudem ist eine Sperre gegen eingeloggte Mitglieder eingebaut, die das Klicken auf den eigenen Bettel-Link etwas erschweren soll.";
214 case "0.1.8": // SQL queries for v0.1.8
215 // Update notes (these will be set as task text!)
216 $UPDATE_NOTES = "Fehler im täglichen Reset beseitigt.";
219 case "0.1.9": // SQL queries for v0.1.9
220 // Update notes (these will be set as task text!)
221 $UPDATE_NOTES = "De-/Aktivieren des mit dieser Erweiterung verknüpften Modules eingebunden.";
224 case "0.2.0": // SQL queries for v0.2.0
225 // Update notes (these will be set as task text!)
226 $UPDATE_NOTES = "Bei ".POINTS."-Gleichstand wird als nächstes nach wer als letztes Online war umsortiert.";
229 case "0.2.1": // SQL queries for v0.2.1
230 // Update notes (these will be set as task text!)
231 $UPDATE_NOTES = "Fehler <STRONG>unknown column 'uid'</STRONG> beseitigt.";
234 case "0.2.2": // SQL queries for v0.2.2
235 $SQLs[] = "ALTER TABLE "._MYSQL_PREFIX."_config ADD beg_include_own enum('Y', 'N') not null default 'N'";
237 // Update notes (these will be set as task text!)
238 $UPDATE_NOTES = "Eigene User-ID von Bettel-Rallye ausschliessbar.";
241 case "0.2.3": // SQL queries for v0.2.3
242 // Update notes (these will be set as task text!)
243 $UPDATE_NOTES = "Abfrage des Account-Status eingebaut. Es können nur bestätigte Accounts betteln.";
246 case "0.2.4": // SQL queries for v0.2.4
247 $SQLs[] = "UPDATE "._MYSQL_PREFIX."_member_menu SET action='extras', sort='1' WHERE what='beg' LIMIT 1";
248 $SQLs[] = "UPDATE "._MYSQL_PREFIX."_member_menu SET action='rals', sort='3', title='Bettel-Rallye' WHERE what='beg2' LIMIT 1";
250 // Update notes (these will be set as task text!)
251 $UPDATE_NOTES = "Mitgliedsmenü komplett umgebaut.";
254 case "0.2.5": // SQL queries for v0.2.5
255 // Update notes (these will be set as task text!)
256 $UPDATE_NOTES = "Fehlerhinweis bei deaktivierter Erweiterung verbessert.";
261 default: // Do stuff when extension is loaded
262 $DUMMY = LOAD_CONFIG("0");
263 $_CONFIG['beg_timeout'] = $DUMMY['beg_timeout']; // Global timeout
264 $_CONFIG['beg_uid_timeout'] = $DUMMY['beg_uid_timeout']; // Timeout for one userid
265 $_CONFIG['beg_ip_timeout'] = $DUMMY['beg_ip_timeout']; // Timeout for one IP number
266 $_CONFIG['beg_points'] = $DUMMY['beg_points']; // Minimum beggable points
267 $_CONFIG['beg_points_max'] = $DUMMY['beg_points_max']; // Maximum beggable points
268 $_CONFIG['beg_uid'] = $DUMMY['beg_uid']; // Account to subtract begged points from
269 $_CONFIG['beg_mode'] = $DUMMY['beg_mode']; // Payment mode: direct or over referral system?
270 $_CONFIG['beg_month'] = $DUMMY['beg_month']; // Current month
271 $_CONFIG['beg_ranks'] = $DUMMY['beg_ranks']; // Maximum member who will win
272 $_CONFIG['beg_active'] = $DUMMY['beg_active']; // Only active members can win?
273 $_CONFIG['beg_rallye'] = $DUMMY['beg_rallye']; // Is the begging rallye activated?
274 $_CONFIG['beg_ral_en_notify'] = $DUMMY['beg_ral_en_notify']; // Notify members on enabled rallye?
275 $_CONFIG['beg_ral_di_notify'] = $DUMMY['beg_ral_di_notify']; // Notify members on disabled rallye?
276 $_CONFIG['beg_notify_bonus'] = $DUMMY['beg_notify_bonus']; // When points are > 0 and bonus extension is installed, a bonus mail with this amount of points will be send instead of an enable-notification!
277 $_CONFIG['beg_new_mem_notify'] = $DUMMY['beg_new_mem_notify']; // Notify members on disabled rallye?
278 $_CONFIG['beg_notify_wait'] = $DUMMY['beg_notify_wait']; // Time to wait in seconds for bonus mails
279 $_CONFIG['beg_include_own'] = $DUMMY['beg_include_own']; // Include webmaster's own userid in rallye?
282 // Remove old entries
283 $OLD = $_CONFIG['beg_timeout'];
284 if ($_CONFIG['beg_uid_timeout'] > $OLD) $OLD = $_CONFIG['beg_uid_timeout'];
285 $result_ext = SQL_QUERY("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_beg_ips WHERE timeout < ".(time() - $OLD - 60*60), __FILE__, __LINE__);
287 if (defined('__DAILY_RESET') && (!DEBUG_MODE) && ($CSS != 1))
289 // Daily reset was run so let's check if begging rallye is active
290 if ($_CONFIG['beg_rallye'] == 'Y')
292 // Check for our winers
293 $INC_POOL[] = PATH."inc/monthly/monthly_beg.php";
297 // Reset begging points
298 $INC_POOL[] = PATH."inc/reset/reset_beg.php";
302 // Check for beg rallye is active and send mails out
303 if (($_CONFIG['beg_rallye'] == 'Y') && ($_CONFIG['beg_new_mem_notify'] == 'Y'))
305 // Include file for sending out mails
306 $INC_POOL[] = PATH."inc/mails/beg_mails.php";
309 // Return code for the URL
310 define('CODE_BEG_SAME_AS_OWN', 100);
314 // Language file prefix
315 $EXT_LANG_PREFIX = "beg";
317 // Extension is always active?
318 $EXT_ALWAYS_ACTIVE = 'N';