Tons of rewrites (SQL queries), surfbar nearly finished (working: surfing with static...
[mailer.git] / inc / extensions / ext-beg.php
1 <?php
2 /************************************************************************
3  * MXChange v0.2.1                                    Start: 09/25/2004 *
4  * ================                             Last change: 09/25/2004 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : ext-beg.php                                      *
8  * -------------------------------------------------------------------- *
9  * Short description : Begging link                                     *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Bettel-Link                                      *
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
41 // Version number
42 $EXT_VERSION = "0.2.5";
43
44 // Auto-set extension version
45 if (empty($EXT_VER)) $EXT_VER = $EXT_VERSION;
46
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");
49
50 switch ($EXT_LOAD_MODE)
51 {
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&uuml;tung usw. k&ouml;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 '',
67 KEY (userid),
68 PRIMARY KEY(id)
69 ) TYPE=MyISAM";
70
71         // Load CSS file?
72         $EXT_CSS = "Y";
73         break;
74
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";
81         break;
82
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";
88         break;
89
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";
95         break;
96
97 case "update": // Update an extension
98         switch ($EXT_VER)
99         {
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 &quot;Solid-Business&quot; eingebaut.";
103                 break;
104
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> &uuml;berfl&uuml;ssige HTML-Tags entfernt.";
108                 break;
109
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'";
112
113                 // Update notes (these will be set as task text!)
114                 $UPDATE_NOTES = "Maximale Obergrenze an {!POINTS!} einstellbar (Standart: 0,1 {!POINTS!})";
115                 break;
116
117         case "0.0.4": // SQL queries for v0.0.4
118                 // Update notes (these will be set as task text!)
119                 $UPDATE_NOTES = "&Uuml;berlange Kommastellen bei Punktangaben aus Bettellink und Gastbereich entfernt und Admin-Templates repariert (&quot;Unbekannte Spalte <U>beg_points_ma</U>&quot;).";
120                 break;
121
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&uuml; wurde die Beschreibung aus dem Gastmen&uuml; verwendet.";
125                 break;
126
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'";
129
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.";
132                 break;
133
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'";
136
137                 // Update notes (these will be set as task text!)
138                 $UPDATE_NOTES = "Zeitsperre gegen die selbe IP-Nummer hinzugef&uuml;gt.";
139                 break;
140
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!";
144                 break;
145
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.";
149                 break;
150
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.";
154                 break;
155
156         case "0.1.2":
157                 // Get current month
158                 $curr = date("m", time());
159                 if (strlen($curr) == 1) $curr = "0".$curr;
160                 if ($curr == "00") $curr = "12";
161
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(3) 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')";
173
174                 // Update notes (these will be set as task text!)
175                 $UPDATE_NOTES = "Optionale Bettel-Rallye m&ouml;glich. Und die erbettelten {!POINTS!} k&ouml;nnen entweder nur dem bettelndem Mitglied direkt oder auch seinem Werber gutgeschrieben werden k&ouml;nnen.";
176                 break;
177
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&ouml;scht.";
181                 break;
182
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!";
186                 break;
187
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&uuml;tung und auch die Bettel-Rallye k&ouml;nnen Sie hier einstellen.' WHERE what='config_beg' LIMIT 1";
190
191                 // Update notes (these will be set as task text!)
192                 $UPDATE_NOTES = "Fehlendes Template im Admin-Bereich hinzugef&uuml;gt. Im Admin-Bereich Hinweis hinzugef&uuml;gt, wenn Bettel-Rallye inaktiv ist. Bitte Script inc/monthly_beg.php l&ouml;schen!";
193                 break;
194
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.";
198                 break;
199
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'";
209
210                 // Update notes (these will be set as task text!)
211                 $UPDATE_NOTES = "Die Mitglieder k&ouml;nnen nun optional automatisch &uuml;ber eine aktivierte und/oder deaktivierte Bettel-Rallye informiert werden. Beide Benachrichtigungen k&ouml;nnen Sie unter <STRONG>Einstellungen --&gt; 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.";
212                 break;
213
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&auml;glichen Reset beseitigt.";
217                 break;
218
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&uuml;pften Modules eingebunden.";
222                 break;
223
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&auml;chstes nach wer als letztes Online war umsortiert.";
227                 break;
228
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 &#39;uid&#39;</STRONG> beseitigt.";
232                 break;
233
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'";
236
237                 // Update notes (these will be set as task text!)
238                 $UPDATE_NOTES = "Eigene User-ID von Bettel-Rallye ausschliessbar.";
239                 break;
240
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&ouml;nnen nur best&auml;tigte Accounts betteln.";
244                 break;
245
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";
249
250                 // Update notes (these will be set as task text!)
251                 $UPDATE_NOTES = "Mitgliedsmen&uuml; komplett umgebaut.";
252                 break;
253
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.";
257                 break;
258         }
259         break;
260
261 default: // Do stuff when extension is loaded
262         $dummy = LOAD_CONFIG();
263         $_CONFIG = merge_array($_CONFIG, $dummy);
264         unset($dummy);
265
266         // Remove old entries
267         $OLD = $_CONFIG['beg_timeout'];
268         if ($_CONFIG['beg_uid_timeout'] > $OLD) $OLD = $_CONFIG['beg_uid_timeout'];
269         $result_ext = SQL_QUERY("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_beg_ips WHERE timeout < ".(time() - $OLD - 60*60), __FILE__, __LINE__);
270
271         if (isBooleanConstantAndTrue('__DAILY_RESET') && (!DEBUG_MODE) && ($CSS != 1))
272         {
273                 // Daily reset was run so let's check if begging rallye is active
274                 if ($_CONFIG['beg_rallye'] == "Y")
275                 {
276                         // Check for our winers
277                         $INC_POOL[] = sprintf("%sinc/monthly/monthly_beg.php", PATH);
278                 }
279                  else
280                 {
281                         // Reset begging points
282                         $INC_POOL[] = sprintf("inc/reset/reset_beg.php", PATH);
283                 }
284         }
285
286         // Check for beg rallye is active and send mails out
287         if (($_CONFIG['beg_rallye'] == "Y") && ($_CONFIG['beg_new_mem_notify'] == "Y"))
288         {
289                 // Include file for sending out mails
290                 $INC_POOL[] = sprintf("%sinc/mails/beg_mails.php", PATH);
291         }
292
293         // Return code for the URL
294         define('CODE_BEG_SAME_AS_OWN', 100);
295         break;
296 }
297
298 // Language file prefix
299 $EXT_LANG_PREFIX = "beg";
300
301 // Extension is always active?
302 $EXT_ALWAYS_ACTIVE = "N";
303
304 //
305 ?>