A lot variables renamed from all upper-case to hungarian notation
[mailer.git] / inc / modules / admin / what-lock_sponsor.php
1 <?php
2 /************************************************************************
3  * M-XChange v0.2.1                                   Start: 04/24/2005 *
4  * ================                             Last change: 05/19/2008 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : what-lock_sponsor.php                            *
8  * -------------------------------------------------------------------- *
9  * Short description : Edit sponsor account                             *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Sponsorenaccount aendern                         *
12  * -------------------------------------------------------------------- *
13  * $Revision::                                                        $ *
14  * $Date::                                                            $ *
15  * $Tag:: 0.2.1-FINAL                                                 $ *
16  * $Author::                                                          $ *
17  * Needs to be in all Files and every File needs "svn propset           *
18  * svn:keywords Date Revision" (autoprobset!) at least!!!!!!            *
19  * -------------------------------------------------------------------- *
20  * Copyright (c) 2003 - 2008 by Roland Haeder                           *
21  * For more information visit: http://www.mxchange.org                  *
22  *                                                                      *
23  * This program is free software; you can redistribute it and/or modify *
24  * it under the terms of the GNU General Public License as published by *
25  * the Free Software Foundation; either version 2 of the License, or    *
26  * (at your option) any later version.                                  *
27  *                                                                      *
28  * This program is distributed in the hope that it will be useful,      *
29  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
30  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
31  * GNU General Public License for more details.                         *
32  *                                                                      *
33  * You should have received a copy of the GNU General Public License    *
34  * along with this program; if not, write to the Free Software          *
35  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
36  * MA  02110-1301  USA                                                  *
37  ************************************************************************/
38
39 // Some security stuff...
40 if ((!defined('__SECURITY')) || (!IS_ADMIN())) {
41         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4)."/security.php";
42         require($INC);
43 }
44
45 // Add description as navigation point
46 ADD_DESCR("admin", __FILE__);
47 $message = "";
48
49 if (REQUEST_ISSET_GET(('id'))) {
50         // Check for selected sponsor
51         $result = SQL_QUERY_ESC("SELECT gender, surname, family, email, status FROM `{!_MYSQL_PREFIX!}_sponsor_data` WHERE id='%s' LIMIT 1",
52          array(bigintval(REQUEST_GET('id'))), __FILE__, __LINE__);
53         if (SQL_NUMROWS($result) == 1) {
54                 // Get sponsor's current status and let only confirmed and locked status pass
55                 list($gender, $sname, $fname, $email, $status) = SQL_FETCHROW($result);
56                 SQL_FREERESULT($result);
57
58                 if (($status == "CONFIRMED") || ($status == "LOCKED")) {
59                         // Transfer data to constants
60                         define('__GENDER'  , TRANSLATE_GENDER($gender));
61                         define('__SURNAME', $sname);
62                         define('__FAMILY' , $fname);
63                         define('__ID'     , bigintval(REQUEST_GET('id')));
64
65                         if (IS_FORM_SENT()) {
66                                 // Create messages
67                                 if ($status == "CONFIRMED") {
68                                         // Message when sponsor's account got lock
69                                         define('__EMAIL_MSG', getMessage('SPONSOR_ACCOUNT_LOCKED'));
70                                         $subject = getMessage('SPONSOR_SUBJECT_LOCKED');
71                                         $status = "LOCKED";
72                                 } else {
73                                         // Message when sponsor's account got unlock
74                                         define('__EMAIL_MSG', getMessage('SPONSOR_ACCOUNT_UNLOCKED'));
75                                         $subject = getMessage('SPONSOR_SUBJECT_UNLOCKED');
76                                         $status = "CONFIRMED";
77                                 }
78
79                                 // Load email message
80                                 $msg = LOAD_EMAIL_TEMPLATE("lock_sponsor", REQUEST_POST('reason'), bigintval(REQUEST_GET('id')));
81
82                                 // And send it away
83                                 SEND_EMAIL($email, $subject, $msg);
84
85                                 // Update sponsor's account
86                                 SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_sponsor_data` SET `status`='".$status."' WHERE id='%s' LIMIT 1",
87                                         array(bigintval(REQUEST_GET('id'))), __FILE__, __LINE__);
88                         } elseif (REQUEST_ISSET_POST(('no'))) {
89                                 // No don't lock / unlock now!
90                                 LOAD_URL("modules.php?module=admin&amp;what=list_sponsor&amp;id=".bigintval(REQUEST_GET('id')));
91                         } else {
92                                 // Create header and text messages
93                                 if ($status == "CONFIRMED") {
94                                         // Messages when sponsor's account is confirmed
95                                         define('__HEADER_MESSAGE', getMessage('SPONSOR_LOCK_SPONSOR_HEADER'));
96                                         define('__TEXT_MESSAGE'  , getMessage('SPONSOR_LOCK_SPONSOR_TEXT'));
97                                 } else {
98                                         // Messages when sponsor's account is locked
99                                         define('__HEADER_MESSAGE', getMessage('SPONSOR_UNLOCK_SPONSOR_HEADER'));
100                                         define('__TEXT_MESSAGE'  , getMessage('SPONSOR_UNLOCK_SPONSOR_TEXT'));
101                                 }
102
103                                 // Create email link
104                                 define('__EMAIL_LINK', "<a href=\"mailto:".$email."\">{!__GENDER!} {!__SURNAME!} {!__FAMILY!}</a>");
105
106                                 // Display form
107                                 LOAD_TEMPLATE("admin_lock_sponsor");
108                         }
109                 } else {
110                         // Cannot change status on unconfirmed or pending accounts!
111                         $message = getMessage('ADMIN_SPONSPOR_CANNOT_LOCK_PENDING_UNCINFIRMED_ACCOUNTS');
112                 }
113         } else {
114                 // Sponsor not found!
115                 $message = sprintf(getMessage('ADMIN_SPONSOR_404'), bigintval(REQUEST_GET('id')));
116         }
117 } else {
118         // Not called by what-list_sponsor.php
119         $message = getMessage('ADMIN_CALL_NOT_DIRECTLY');
120 }
121
122 if (!empty($message)) {
123         // Output message
124         LOAD_TEMPLATE("admin_settings_saved", false, $message);
125 }
126
127 //
128 ?>