inc/extensions/ext-beg.php

   1 <?php
   2 /************************************************************************
   3  * Mailer v0.2.1-FINAL                                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  * $Revision::                                                        $ *
  14  * $Date::                                                            $ *
  15  * $Tag:: 0.2.1-FINAL                                                 $ *
  16  * $Author::                                                          $ *
  17  * -------------------------------------------------------------------- *
  18  * Copyright (c) 2003 - 2009 by Roland Haeder                           *
  19  * Copyright (c) 2009 - 2011 by Mailer Developer Team                   *
  20  * For more information visit: http://www.mxchange.org                  *
  21  *                                                                      *
  22  * This program is free software; you can redistribute it and/or modify *
  23  * it under the terms of the GNU General Public License as published by *
  24  * the Free Software Foundation; either version 2 of the License, or    *
  25  * (at your option) any later version.                                  *
  26  *                                                                      *
  27  * This program is distributed in the hope that it will be useful,      *
  28  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
  29  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
  30  * GNU General Public License for more details.                         *
  31  *                                                                      *
  32  * You should have received a copy of the GNU General Public License    *
  33  * along with this program; if not, write to the Free Software          *
  34  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
  35  * MA  02110-1301  USA                                                  *
  36  ************************************************************************/
  37
  38 // Some security stuff...
  39 if (!defined('__SECURITY')) {
  40         die();
  41 } // END - if
  42
  43 // Version number
  44 setThisExtensionVersion('0.2.9');
  45
  46 // Version history array (add more with , '0.0.1' and so on)
  47 setExtensionVersionHistory(array('0.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', '0.2.6', '0.2.7', '0.2.8', '0.2.9'));
  48
  49 switch (getExtensionMode()) {
  50         case 'register': // Do stuff when installation is running
  51                 // SQL commands to run
  52                 addAdminMenuSql('setup', 'config_beg', 'Bettel-Link', 'IP-Sperre, {OPEN_CONFIG}POINTS{CLOSE_CONFIG}-Verg&uuml;tung usw. k&ouml;nnen Sie hier einstellen.', 10);
  53                 addGuestMenuSql('main', 'beg', '{OPEN_CONFIG}POINTS{CLOSE_CONFIG} erbetteln!', 4);
  54                 addMemberMenuSql('main', 'beg', 'Ihr Bettel-Link', 6);
  55                 addConfigAddSql('beg_timeout', 'BIGINT(20) UNSIGNED NOT NULL DEFAULT 600');
  56                 addConfigAddSql('beg_userid_timeout', 'BIGINT(20) UNSIGNED NOT NULL DEFAULT 1800');
  57                 addConfigAddSql('beg_points', 'FLOAT(20,5) UNSIGNED NOT NULL DEFAULT 0.00100');
  58                 addExtensionSql('ALTER TABLE `{?_MYSQL_PREFIX?}_user_data` ADD `beg_clicks` BIGINT(20) UNSIGNED NOT NULL DEFAULT 0');
  59
  60                 // Table for IP locks
  61                 addDropTableSql('beg_ips');
  62                 addCreateTableSql('beg_ips', "(
  63 `id` BIGINT(20) UNSIGNED NOT NULL AUTO_INCREMENT,
  64 `userid` BIGINT(20) UNSIGNED NOT NULL DEFAULT 0,
  65 `remote_ip` VARCHAR(15) NOT NULL DEFAULT '0.0.0.0',
  66 `timeout` VARCHAR(10) NOT NULL DEFAULT '',
  67 `sid` VARCHAR(255) NOT NULL DEFAULT '',
  68 KEY (`userid`),
  69 PRIMARY KEY (`id`)
  70 ) ENGINE = {?_TABLE_TYPE?} CHARACTER SET utf8 COLLATE utf8_general_ci COMMENT = 'IP lock data for beg links'");
  71                 break;
  72
  73         case 'remove': // Do stuff when removing extension
  74                 // SQL commands to run
  75                 addDropTableSql('beg_ips');
  76                 addDropTableSql('beg_referals');
  77                 addExtensionSql("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_admin_menu` WHERE `what` IN ('config_beg','list_beg','list_beg_referal_urls')");
  78                 addExtensionSql("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_guest_menu` WHERE `what`='beg'");
  79                 addExtensionSql("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_member_menu` WHERE `what` IN ('beg','beg2')");
  80                 break;
  81
  82         case 'activate': // Do stuff when admin activates this extension
  83                 // SQL commands to run
  84                 addExtensionSql("UPDATE `{?_MYSQL_PREFIX?}_guest_menu` SET `visible`='Y', `locked`='N' WHERE `what`='beg' LIMIT 1");
  85                 addExtensionSql("UPDATE `{?_MYSQL_PREFIX?}_member_menu` SET `visible`='Y', `locked`='N' WHERE `what` IN ('beg','beg2') LIMIT 2");
  86                 addExtensionSql("UPDATE `{?_MYSQL_PREFIX?}_mod_reg` SET `locked`='N', `hidden`='N', `admin_only`='N', `mem_only`='N' WHERE `module`='beg' LIMIT 1");
  87                 break;
  88
  89         case 'deactivate': // Do stuff when admin deactivates this extension
  90                 // SQL commands to run
  91                 addExtensionSql("UPDATE `{?_MYSQL_PREFIX?}_guest_menu` SET `visible`='N', `locked`='Y' WHERE `what`='beg' LIMIT 1");
  92                 addExtensionSql("UPDATE `{?_MYSQL_PREFIX?}_member_menu` SET `visible`='N', `locked`='Y' WHERE `what` IN('beg','beg2') LIMIT 2");
  93                 addExtensionSql("UPDATE `{?_MYSQL_PREFIX?}_mod_reg` SET `locked`='Y' WHERE `module`='beg' LIMIT 1");
  94                 break;
  95
  96         case 'update': // Update an extension
  97                 switch (getCurrentExtensionVersion()) {
  98                         case '0.0.1': // SQL queries for v0.0.1
  99                                 // Update notes (these will be set as task text!)
 100                                 setExtensionUpdateNotes("Design &quot;Solid-Business&quot; eingebaut.");
 101                                 break;
 102
 103                         case '0.0.2': // SQL queries for v0.0.2
 104                                 // Update notes (these will be set as task text!)
 105                                 setExtensionUpdateNotes("Seit <strong>Patch 340</strong> &uuml;berfl&uuml;ssige HTML-Tags entfernt.");
 106                                 break;
 107
 108                         case '0.0.3': // SQL queries for v0.0.3
 109                                 addConfigAddSql('beg_points_max', 'FLOAT(20,5) UNSIGNED NOT NULL DEFAULT 0.10000');
 110
 111                                 // Update notes (these will be set as task text!)
 112                                 setExtensionUpdateNotes("Maximale Obergrenze an {?POINTS?} einstellbar (Standard: 0,1 {?POINTS?})");
 113                                 break;
 114
 115                         case '0.0.4': // SQL queries for v0.0.4
 116                                 // Update notes (these will be set as task text!)
 117                                 setExtensionUpdateNotes("&Uuml;berlange Kommastellen bei Punktangaben aus Bettellink und Gastbereich entfernt und Admin-Templates repariert (&quot;Unbekannte Spalte <u>beg_points_ma</u>&quot;).");
 118                                 break;
 119
 120                         case '0.0.5': // SQL queries for v0.0.5
 121                                 // Update notes (these will be set as task text!)
 122                                 setExtensionUpdateNotes("Im Mitgliedsmen&uuml; wurde die Beschreibung aus dem Gastmen&uuml; verwendet.");
 123                                 break;
 124
 125                         case '0.0.6': // SQL queries for v0.0.6
 126                                 addConfigAddSql('beg_userid', 'BIGINT(20) UNSIGNED NOT NULL DEFAULT 0');
 127
 128                                 // Update notes (these will be set as task text!)
 129                                 setExtensionUpdateNotes("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.");
 130                                 break;
 131
 132                         case '0.0.8': // SQL queries for v0.0.8
 133                                 addConfigAddSql('beg_ip_timeout', 'BIGINT(20) UNSIGNED NOT NULL DEFAULT 1800');
 134
 135                                 // Update notes (these will be set as task text!)
 136                                 setExtensionUpdateNotes("Zeitsperre gegen die selbe IP-Nummer hinzugef&uuml;gt.");
 137                                 break;
 138
 139                         case '0.0.9': // SQL queries for v0.0.9
 140                                 // Update notes (these will be set as task text!)
 141                                 setExtensionUpdateNotes("Bitte verschieben Sie die beg-Templates (Ordner: {?PATH?}/templates/".getLanguage()."/html/) in den neuen Order beg!");
 142                                 break;
 143
 144                         case '0.1.0': // SQL queries for v0.2.1
 145                                 // Update notes (these will be set as task text!)
 146                                 setExtensionUpdateNotes("Abspeichern von Einstellungen repariert.");
 147                                 break;
 148
 149                         case '0.1.1': // SQL queries for v0.1.1
 150                                 // Update notes (these will be set as task text!)
 151                                 setExtensionUpdateNotes("Vorbereitung auf die neue Mediendaten v0.0.4.");
 152                                 break;
 153
 154                         case '0.1.2':
 155                                 // SQL queries for v0.1.2
 156                                 addConfigAddSql('beg_mode', "ENUM('DIRECT','REF') NOT NULL DEFAULT 'REF'");
 157                                 addConfigAddSql('beg_ranks', 'TINYINT(3) UNSIGNED NOT NULL DEFAULT 10');
 158                                 addConfigAddSql('beg_active', "ENUM('Y','N') NOT NULL DEFAULT 'N'");
 159                                 addConfigAddSql('beg_rallye', "ENUM('Y','N') NOT NULL DEFAULT 'N'");
 160                                 addExtensionSql("ALTER TABLE `{?_MYSQL_PREFIX?}_user_data` ADD `beg_points` FLOAT(21,5) UNSIGNED NOT NULL DEFAULT 0.00000");
 161
 162                                 addMemberMenuSql('main', 'beg2', 'Bettel-Rallye', 7);
 163                                 addAdminMenuSql('user', 'list_beg', 'Bettel-Rallye', 'Listet alle Teilnehmer der monatlichen Bettel-Rallye auf.', 12);
 164
 165                                 // Update notes (these will be set as task text!)
 166                                 setExtensionUpdateNotes("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.");
 167                                 break;
 168
 169                         case '0.1.3': // SQL queries for v0.1.3
 170                                 // Update notes (these will be set as task text!)
 171                                 setExtensionUpdateNotes("Erbettelte {?POINTS?} werden nach Deaktivierung der Bettel-Rallye gel&ouml;scht.");
 172                                 break;
 173
 174                         case '0.1.4': // SQL queries for v0.1.4
 175                                 // Update notes (these will be set as task text!)
 176                                 setExtensionUpdateNotes("Rechtlichen Hinweis im Mitgliedsbereich vergessen (<strong>member_list_beg.tpl</strong>); Template <strong>member_beg_404.tpl</strong> fehlte!");
 177                                 break;
 178
 179                         case '0.1.5': // SQL queries for v0.1.5
 180                                 addExtensionSql("UPDATE `{?_MYSQL_PREFIX?}_admin_menu` SET `title`='Bettellink/-rallye', descr='IP-Sperre, {OPEN_CONFIG}POINTS{CLOSE_CONFIG}-Verg&uuml;tung und auch die Bettel-Rallye k&ouml;nnen Sie hier einstellen.' WHERE `what`='config_beg' LIMIT 1");
 181
 182                                 // Update notes (these will be set as task text!)
 183                                 setExtensionUpdateNotes("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!");
 184                                 break;
 185
 186                         case '0.1.6': // SQL queries for v0.1.6
 187                                 // Update notes (these will be set as task text!)
 188                                 setExtensionUpdateNotes("Es wurden immer dem ersten bettelndem Mitglied die {?POINTS?} gutgeschrieben.");
 189                                 break;
 190
 191                         case '0.1.7': // SQL queries for v0.1.7
 192                                 addConfigAddSql('beg_ral_en_notify', "ENUM('Y','N') NOT NULL DEFAULT 'N'");
 193                                 addConfigAddSql('beg_ral_di_notify', "ENUM('Y','N') NOT NULL DEFAULT 'N'");
 194                                 addConfigAddSql('beg_new_mem_notify', "ENUM('Y','N') NOT NULL DEFAULT 'N'");
 195                                 addConfigAddSql('beg_notify_bonus', 'FLOAT(20,5) UNSIGNED NOT NULL DEFAULT 0.00000');
 196                                 addConfigAddSql('beg_notify_wait', 'BIGINT(20) UNSIGNED NOT NULL DEFAULT 30');
 197                                 addExtensionSql('ALTER TABLE `{?_MYSQL_PREFIX?}_user_data` ADD `beg_ral_notify` BIGINT(20) UNSIGNED NOT NULL DEFAULT 0');
 198                                 addExtensionSql('ALTER TABLE `{?_MYSQL_PREFIX?}_user_data` ADD `beg_ral_en_notify` BIGINT(20) UNSIGNED NOT NULL DEFAULT 0');
 199                                 addExtensionSql('ALTER TABLE `{?_MYSQL_PREFIX?}_user_data` ADD `beg_ral_di_notify` BIGINT(20) UNSIGNED NOT NULL DEFAULT 0');
 200
 201                                 // Update notes (these will be set as task text!)
 202                                 setExtensionUpdateNotes("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.");
 203                                 break;
 204
 205                         case '0.1.8': // SQL queries for v0.1.8
 206                                 // Update notes (these will be set as task text!)
 207                                 setExtensionUpdateNotes("Fehler im t&auml;glichen Reset beseitigt.");
 208                                 break;
 209
 210                         case '0.1.9': // SQL queries for v0.1.9
 211                                 // Update notes (these will be set as task text!)
 212                                 setExtensionUpdateNotes("De-/Aktivieren des mit dieser Erweiterung verkn&uuml;pften Modules eingebunden.");
 213                                 break;
 214
 215                         case '0.2.0': // SQL queries for v0.2.0
 216                                 // Update notes (these will be set as task text!)
 217                                 setExtensionUpdateNotes("Bei {?POINTS?}-Gleichstand wird als n&auml;chstes nach wer als letztes Online war umsortiert.");
 218                                 break;
 219
 220                         case '0.2.1': // SQL queries for v0.2.1
 221                                 // Update notes (these will be set as task text!)
 222                                 setExtensionUpdateNotes("Fehler <strong>unknown column &#39;userid&#39;</strong> beseitigt.");
 223                                 break;
 224
 225                         case '0.2.2': // SQL queries for v0.2.2
 226                                 addConfigAddSql('beg_include_own', "ENUM('Y','N') NOT NULL DEFAULT 'N'");
 227
 228                                 // Update notes (these will be set as task text!)
 229                                 setExtensionUpdateNotes("Eigene Mitglieder-Ids sind von der Bettel-Rallye nun ausschliessbar.");
 230                                 break;
 231
 232                         case '0.2.3': // SQL queries for v0.2.3
 233                                 // Update notes (these will be set as task text!)
 234                                 setExtensionUpdateNotes("Abfrage des Account-Status eingebaut. Es k&ouml;nnen nur best&auml;tigte Accounts betteln.");
 235                                 break;
 236
 237                         case '0.2.4': // SQL queries for v0.2.4
 238                                 addExtensionSql("UPDATE `{?_MYSQL_PREFIX?}_member_menu` SET `action`='extras', `sort`=1 WHERE `what`='beg' LIMIT 1");
 239                                 addExtensionSql("UPDATE `{?_MYSQL_PREFIX?}_member_menu` SET `action`='rals', `sort`=3, `title`='Bettel-Rallye' WHERE `what`='beg2' LIMIT 1");
 240
 241                                 // Update notes (these will be set as task text!)
 242                                 setExtensionUpdateNotes("Mitgliedsmen&uuml; komplett umgebaut.");
 243                                 break;
 244
 245                         case '0.2.5': // SQL queries for v0.2.5
 246                                 // Update notes (these will be set as task text!)
 247                                 setExtensionUpdateNotes("Fehlerhinweis bei deaktivierter Erweiterung verbessert.");
 248                                 break;
 249
 250                         case '0.2.6': // SQL queries for v0.2.6
 251                                 addExtensionSql("ALTER TABLE `{?_MYSQL_PREFIX?}_beg_ips` ADD `sid` VARCHAR(255) NOT NULL DEFAULT ''");
 252                                 addConfigAddSql('beg_pay_mode', "ENUM('IMG','JS','BOTH','NONE') DEFAULT 'NONE' NOT NULL ;");
 253
 254                                 // Update notes (these will be set as task text!)
 255                                 setExtensionUpdateNotes("IP-Lock mit Session-Id erweitert. Tracker-Script eingef&uuml;gt, dass das Einbinden des Bettel-Links als Bild/Script/CSS verhindern soll.");
 256                                 break;
 257
 258                         case '0.2.7': // SQL queries for v0.2.7
 259                                 addConfigChangeSql('beg_ral_en_notify', 'beg_ral_enable_notify', "ENUM('Y','N') NOT NULL DEFAULT 'N'");
 260                                 addConfigChangeSql('beg_ral_di_notify', 'beg_ral_disable_notify', "ENUM('Y','N') NOT NULL DEFAULT 'N'");
 261                                 addConfigChangeSql('beg_new_mem_notify', 'beg_new_member_notify', "ENUM('Y','N') NOT NULL DEFAULT 'N'");
 262                                 addExtensionSql('ALTER TABLE `{?_MYSQL_PREFIX?}_user_data` CHANGE `beg_ral_en_notify` `beg_ral_enable_notify` BIGINT(20) UNSIGNED NOT NULL DEFAULT 0');
 263                                 addExtensionSql('ALTER TABLE `{?_MYSQL_PREFIX?}_user_data` CHANGE `beg_ral_di_notify` `beg_ral_disable_notify` BIGINT(20) UNSIGNED NOT NULL DEFAULT 0');
 264
 265                                 // Update notes (these will be set as task text!)
 266                                 setExtensionUpdateNotes("Umbenannt nach neuer Namenskonvention");
 267                                 break;
 268
 269                         case '0.2.8': // SQL queries for v0.2.8
 270                                 addConfigChangeSql('beg_ral_enable_notify', 'beg_rallye_enable_notify', "ENUM('Y','N') NOT NULL DEFAULT 'N'");
 271                                 addConfigChangeSql('beg_ral_disable_notify', 'beg_rallye_disable_notify', "ENUM('Y','N') NOT NULL DEFAULT 'N'");
 272                                 addExtensionSql('ALTER TABLE `{?_MYSQL_PREFIX?}_user_data` CHANGE `beg_ral_enable_notify` `beg_rallye_enable_notify` BIGINT(20) UNSIGNED NOT NULL DEFAULT 0');
 273                                 addExtensionSql('ALTER TABLE `{?_MYSQL_PREFIX?}_user_data` CHANGE `beg_ral_disable_notify` `beg_rallye_disable_notify` BIGINT(20) UNSIGNED NOT NULL DEFAULT 0');
 274
 275                                 // Update notes (these will be set as task text!)
 276                                 setExtensionUpdateNotes("Umbenannt nach neuer Namenskonvention");
 277                                 break;
 278
 279                         case '0.2.9': // SQL queries for v0.2.9
 280                                 addDropTableSql('beg_referals');
 281                                 addCreateTableSql('beg_referals', "(
 282 `id` BIGINT(20) UNSIGNED NOT NULL AUTO_INCREMENT PRIMARY KEY ,
 283 `userid` BIGINT(20) UNSIGNED NULL DEFAULT NULL ,
 284 `remote_ip` VARCHAR(15) NOT NULL DEFAULT '0.0.0.0',
 285 `timestamp` TIMESTAMP NOT NULL DEFAULT CURRENT_TIMESTAMP ,
 286 `referal_url` TINYTEXT NOT NULL ,
 287 INDEX (`userid`)
 288 ) ENGINE = {?_TABLE_TYPE?} CHARACTER SET utf8 COLLATE utf8_general_ci COMMENT = 'Recorded Referal URLs'");
 289
 290                                 // Add admin menu
 291                                 addAdminMenuSql('user','list_beg_referal_urls','Bettel-Referals auflisten','Listet alle Bettellink-Aufrufe inklusive Referal-URL auf.','13');
 292
 293                                 // Update notes (these will be set as task text!)
 294                                 setExtensionUpdateNotes("Loggen der Referal-URLs hinzugef&uuml;gt.");
 295                                 break;
 296                 } // END - switch
 297                 break;
 298
 299         case 'modify': // When the extension got modified
 300                 break;
 301
 302         case 'test': // For testing purposes
 303                 break;
 304
 305         case 'init': // When extension is initialized
 306                 // Remove old entries
 307                 $OLD = getBegTimeout();
 308                 if (getBegUseridTimeout() > $OLD) {
 309                         $OLD = getBegUseridTimeout();
 310                 } // END - if
 311                 SQL_QUERY('DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_beg_ips` WHERE (UNIX_TIMESTAMP() - `timeout`) >= ' . ($OLD + 60*60) . '', __FILE__, __LINE__);
 312
 313                 // Check for beg rallye is active and send mails out
 314                 if ((isBegRallyeEnabled()) && (isBegNewMemberNotifyEnabled())) {
 315                         // Include file for sending out mails
 316                         addIncludeToPool('notify', 'inc/mails/beg_mails.php');
 317                 } // END - if
 318                 break;
 319
 320         default: // Unknown extension mode
 321                 logDebugMessage(__FILE__, __LINE__, sprintf("Unknown extension mode %s in extension %s detected.", getExtensionMode(), getCurrentExtensionName()));
 322                 break;
 323 } // END - switch
 324
 325 // [EOF]
 326 ?>