2 /************************************************************************
3 * MXChange v0.2.1 Start: 10/22/2005 *
4 * ================ Last change: 10/22/2005 *
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 * -------------------------------------------------------------------- *
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 ((!defined('__SECURITY')) || (!IS_ADMIN())) {
36 $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
39 // Add description as navigation point
40 ADD_DESCR("admin", __FILE__);
42 if (getConfig('beg_rallye') == "Y") {
43 // Shall I withdraw now?
44 if (REQUEST_ISSET_POST(('withdraw'))) {
45 // Okay, let's prepare...
46 $curr = date("m", time()) - 1;
47 if (strlen($curr) == 1) $curr = "0".$curr;
48 UPDATE_CONFIG("last_month", $curr);
49 LOAD_TEMPLATE("admin_settings_saved", false, getMessage('ADMIN_BEG_WITHDRAW_PREPARED'));
52 // Autopurge installed?
53 $lastOnline = "%s"; $ONLINE = "";
54 if (EXT_IS_ACTIVE("autopurge")) {
55 // Use last online timestamp to keep inactive members away from here
56 $lastOnline = " AND last_online >= (UNIX_TIMESTAMP() - %s)";
57 $ONLINE = getConfig('ap_inactive_since');
60 // Check if at least one is in the active rallye
61 $result = SQL_QUERY_ESC("SELECT userid, email, gender, surname, family, beg_points, last_online
62 FROM `{!_MYSQL_PREFIX!}_user_data`
63 WHERE `status`='CONFIRMED' AND beg_points > 0".$lastOnline."
64 ORDER BY beg_points DESC, last_online DESC, userid",
65 array($ONLINE), __FILE__, __LINE__);
67 if (SQL_NUMROWS($result) > 0) {
69 $OUT = "";$SW = 2; $cnt = 1; $total = 0;
70 while (list($uid, $email, $gender, $sname, $fname, $turbo, $last) = SQL_FETCHROW($result)) {
72 $WIN1 = ""; $WIN2 = "";
73 if ($cnt <= getConfig('beg_ranks')) {
74 // Maybe he can win his active beg?
82 'email' => CREATE_EMAIL_LINK($email, "user_data"),
83 'gender' => TRANSLATE_GENDER($gender),
86 'turbo' => TRANSLATE_COMMA($turbo),
87 'last' => MAKE_DATETIME($last, "2"),
94 // Load template and add it
95 $OUT .= LOAD_TEMPLATE("admin_list_beg_rows", true, $content);
96 $SW = 3 - $SW; $cnt++; $total += $turbo;
98 define('__BEG_ROWS', $OUT);
99 define('__TOTAL', TRANSLATE_COMMA($total));
101 // Check if we need to display form or not with manuel withdraw
102 if (getConfig('last_month') == date("m", time())) {
104 define('__BEG_WITHDRAW_FORM', LOAD_TEMPLATE("admin_list_beg_form", true));
106 // Display message "no manual withdraw possible"
107 define('__BEG_WITHDRAW_FORM', "<div class=\"admin_failed\">{--ADMIN_BEG_ALREADY_WITHDRAW--}</div>");
110 // Prepare constant for timemark
111 if (EXT_IS_ACTIVE("autopurge")) {
112 define('__AUTOPURGE_TIMEOUT', MAKE_DATETIME(time() - getConfig('ap_inactive_since'), "2"));
114 define('__AUTOPURGE_TIMEOUT', sprintf(EXTENSION_PROBLEM_NOT_INSTALLED, "autopurge"));
117 // Load final template
118 LOAD_TEMPLATE("admin_list_beg");
120 // No one has joined the begging rallye...
121 LOAD_TEMPLATE("admin_settings_saved", false, getMessage('ADMIN_BEG_NO_RALLYE'));
124 // Rallye deactivated
125 LOAD_TEMPLATE("admin_settings_saved", false, getMessage('ADMIN_BEG_RALLYE_DEACTIVATED'));