inc/modules/admin/what-list_beg.php

   1 <?php
   2 /************************************************************************
   3  * MXChange v0.2.1                                    Start: 10/22/2005 *
   4  * ================                             Last change: 10/22/2005 *
   5  *                                                                      *
   6  * -------------------------------------------------------------------- *
   7  * File              : what-list_beg.php                                *
   8  * -------------------------------------------------------------------- *
   9  * Short description : List members in begging-rallye                   *
  10  * -------------------------------------------------------------------- *
  11  * Kurzbeschreibung  : Mitglieder in Bettel-Rallye auflisten            *
  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'])) || (!is_admin()))
  36 {
  37         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
  38         require($INC);
  39 }
  40 // Add description as navigation point
  41 ADD_DESCR("admin", basename(__FILE__));
  42
  43 if ($_CONFIG['beg_rallye'] == "Y")
  44 {
  45         // Shall I withdraw now?
  46         if (isset($_POST['withdraw']))
  47         {
  48                 // Okay, let's prepare...
  49                 $curr = date("m", time()) - 1;
  50                 if (strlen($curr) == 1) $curr = "0".$curr;
  51                 $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_config SET beg_month='%s' WHERE config=0 LIMIT 1",
  52                  array($curr), __FILE__, __LINE__);
  53                 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_BEG_WITHDRAW_PREPARED);
  54                 OUTPUT_HTML("<br />");
  55         }
  56
  57         // Autopurge installed?
  58         $LAST = "%s"; $ONLINE = "";
  59         if (EXT_IS_ACTIVE("autopurge"))
  60         {
  61                 // Use last online timestamp to keep inactive members away from here
  62                 $LAST   = " AND last_online >= %s";
  63                 $ONLINE = bigintval(time() - $_CONFIG['ap_in_since']);
  64         }
  65
  66         // Check if at least one is in the active rallye
  67         $result = SQL_QUERY_ESC("SELECT userid, email, sex, surname, family, beg_points, last_online
  68 FROM "._MYSQL_PREFIX."_user_data
  69 WHERE status='CONFIRMED' AND beg_points > 0".$LAST."
  70 ORDER BY beg_points DESC, last_online DESC, userid",
  71          array($ONLINE), __FILE__, __LINE__);
  72
  73         if (SQL_NUMROWS($result) > 0)
  74         {
  75                 // List users
  76                 $OUT = "";$SW = 2; $cnt = 1; $total = 0;
  77                 while(list($uid, $email, $sex, $sname, $fname, $turbo, $last) = SQL_FETCHROW($result))
  78                 {
  79                         // Generate array fore the dynamic template
  80                         $WIN1 = ""; $WIN2 = "";
  81                         if ($cnt <= $_CONFIG['beg_ranks'])
  82                         {
  83                                 // Maybe he can win his active beg?
  84                                 $WIN1 = "<STRONG>";
  85                                 $WIN2 = "</STRONG>";
  86                         }
  87                         $content = array(
  88                                 'uid'   => $uid,
  89                                 'email' => CREATE_EMAIL_LINK($email, "user_data"),
  90                                 'salut' => TRANSLATE_SEX($sex),
  91                                 'sname' => $sname,
  92                                 'fname' => $fname,
  93                                 'turbo' => TRANSLATE_COMMA($turbo),
  94                                 'last'  => MAKE_DATETIME($last, "2"),
  95                                 'sw'    => $SW,
  96                                 'win1'  => $WIN1,
  97                                 'win2'  => $WIN2,
  98                                 'cnt'   => $cnt,
  99                         );
 100
 101                         // Load template and add it
 102                         $OUT .= LOAD_TEMPLATE("admin_list_beg_rows", true, $content);
 103                         $SW = 3 - $SW; $cnt++; $total += $turbo;
 104                 }
 105                 define('__BEG_ROWS', $OUT);
 106                 define('__TOTAL', TRANSLATE_COMMA($total));
 107
 108                 // Check if we need to display form or not with manuel withdraw
 109                 if ($_CONFIG['beg_month'] == date("m", time()))
 110                 {
 111                         // Load form
 112                         define('__BEG_WITHDRAW_FORM', LOAD_TEMPLATE("admin_list_beg_form", true));
 113                 }
 114                  else
 115                 {
 116                         // Display message "no manual withdraw possible"
 117                         define('__BEG_WITHDRAW_FORM', "<FONT class=\"admin_failed\">".ADMIN_BEG_ALREADY_WITHDRAW."</FONT>");
 118                 }
 119
 120                 // Prepare constant for timemark
 121                 define('__AUTOPURGE_TIMEOUT', MAKE_DATETIME(time() - $_CONFIG['ap_in_since'], "2"));
 122
 123                 // Load final template
 124                 LOAD_TEMPLATE("admin_list_beg");
 125         }
 126          else
 127         {
 128                 // No one has joined the begging rallye...
 129                 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_BEG_NO_RALLYE);
 130         }
 131 }
 132  else
 133 {
 134         // Rallye deactivated
 135         LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_BEG_RALLYE_DEACTIVATED);
 136 }
 137
 138 //
 139 ?>