win32 to unix line delimiters changed
[mailer.git] / 0.2.1 / inc / modules / admin / what-list_unconfirmed.php
1 <?php
2 /************************************************************************
3  * MXChange v0.2.1                                    Start: 10/09/2004 *
4  * ================                             Last change: 10/31/2004 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : what-list_unconfirmed.php                        *
8  * -------------------------------------------------------------------- *
9  * Short description : List unconfirmed mail links                      *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Unbest. Mail-Links 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 // Don't load the admin_list_unconfirmed template by default
44 $listed = false;
45
46 if (!empty($_GET['mid']))
47 {
48         // List confirmation links from your member's mail orders
49         define('__LIST_UNCON_TITLE', LIST_UNCONFIRMED_MEMBER_LINKS);
50
51         // SQL query for mail data
52         $SQL = "SELECT DISTINCT s.id, p.sender, p.subject, p.text, p.url, p.timestamp, s.max_rec  FROM "._MYSQL_PREFIX."_pool AS p
53 LEFT JOIN "._MYSQL_PREFIX."_user_stats AS s
54 ON p.id=s.pool_id
55 WHERE p.id='".$_GET['mid']."' LIMIT 1";
56
57         // Column, type and ID for member's mail
58         $col = "stats_id"; $type = "NORMAL"; $ID = "-1";
59
60         // Load admin_list_unconfirmed template
61         $listed = true; $DATA = $_GET['mid']; $LINK = "mailid";
62 }
63  elseif ((!empty($_GET['bid'])) && (EXT_IS_ACTIVE("bonus")))
64 {
65         // List confirmation links from bonus mails
66         define('__LIST_UNCON_TITLE', LIST_UNCONFIRMED_BONUS_LINKS);
67
68         // SQL query for mail data (both ids are required for compatiblity to above normal mail
69         $SQL = "SELECT id, id, subject, text, url, timestamp, mails_sent FROM "._MYSQL_PREFIX."_bonus WHERE id='".$_GET['bid']."' LIMIT 1";
70
71         // Column, type and ID for member's mail
72         $col = "bonus_id"; $type = "BONUS"; $ID = $_GET['bid'];
73
74         // Load admin_list_unconfirmed template
75         $listed = true; $DATA = $ID; $LINK = "bonusid";
76 }
77  else
78 {
79         // "Please do not call me directly."
80         LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_CALL_NOT_DIRECTLY);
81 }
82
83 // Shall I display links or not?
84 if ($listed)
85 {
86         // Load mail data
87         $result = SQL_QUERY($SQL, __FILE__, __LINE__);
88         if (SQL_NUMROWS($result) == 1)
89         {
90                 // Mail order / bonus mail found!
91                 list($stats_id, $sender, $subj, $text, $url, $stamp, $max) = SQL_FETCHROW($result);
92                 SQL_FREERESULT($result);
93
94                 // Transfer data to constants for the template
95                 if (($stats_id > 0) && ($ID == "-1")) $ID = $stats_id;
96                 if ($col == "bonus_id") $sender = "0";
97                 define('__LIST_UNCON_SENDER' , $sender);
98                 define('__LIST_UNCON_SUBJECT', COMPILE_CODE($subj));
99                 define('__LIST_UNCON_TEXT'   , COMPILE_CODE($text));
100                 define('__LIST_UNCON_URL'    , urlencode(base64_encode($url)));
101                 define('__LIST_UNCON_STAMP'  , MAKE_DATETIME($stamp, "2"));
102
103                 // Load unconfirmed mail links. Hmmm, this select query is pretty cool
104                 // but it does only show unconfirmed mail links from existing user
105                 // accounts. So if you have delete one you did not see those links
106                 //
107                 $result = SQL_QUERY_ESC("SELECT DISTINCT l.userid, u.status, u.surname, u.family, u.sex, u.email
108 FROM "._MYSQL_PREFIX."_user_links AS l
109 LEFT JOIN "._MYSQL_PREFIX."_user_data AS u
110 ON l.userid=u.userid
111 WHERE l.%s='%s' ORDER BY l.userid LIMIT %s",
112  array($col, $ID, bigintval($max)),__FILE__, __LINE__);
113                 $unconfirmed = SQL_NUMROWS($result);
114                 define('__LIST_UNCO_UNCONFIRMED', $unconfirmed);
115
116                 if ($unconfirmed > 0)
117                 {
118                         // At least one link left to confirm
119                         $OUT = LOAD_TEMPLATE("admin_list_unconfirmed_header", true);
120                         $SW = 2;
121                         while(list($uid, $status, $sname, $fname, $sex, $email) = SQL_FETCHROW($result))
122                         {
123                                 // Prepare data for the row template
124                                 $content = array(
125                                         'sw'     => $SW,
126                                         'u_link' => ADMIN_USER_PROFILE_LINK($uid),
127                                         'uid'    => $uid,
128                                         'link'   => $LINK,
129                                         'id'     => $ID,
130                                         'email'  => "<A href=\"".CREATE_EMAIL_LINK($email, "user_data")."\">".TRANSLATE_SEX($sex)." ".$sname." ".$fname."</A>",
131                                         'status' => TRANSLATE_STATUS($status),
132                                 );
133
134                                 // Load row template and switch colors
135                                 $OUT .= LOAD_TEMPLATE("admin_list_unconfirmed_row", true, $content);
136                                 $SW = 3 - $SW;
137                         }
138                         $OUT .= "</TABLE>\n";
139
140                         // Free memory
141                         SQL_FREERESULT($result);
142
143                         // Store table rows in a constant
144                         define('__LIST_UNCON_LISTING', $OUT);
145                 }
146                  else
147                 {
148                         // All links are confirmed... strange, you shall normally not get a link to this place in this scenario... hmmm.
149                         define('__LIST_UNCON_LISTING', LOAD_TEMPLATE("admin_settings_saved", true, ADMIN_UNCONFIRMED_NO_LINK_LEFT));
150                 }
151
152                 // Load final template
153                 LOAD_TEMPLATE("admin_list_unconfirmed");
154         }
155          elseif ($_GET['mid'] > 0)
156         {
157                 // Data in pool or in user_stats not found, so let's find out where data is missing
158                 $result1 = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_pool WHERE id=%d LIMIT 1",
159                  array(bigintval($ID)), __FILE__, __LINE__);
160                 $result2 = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_user_stats WHERE pool_id=%d LIMIT 1",
161                  array(bigintval($ID)), __FILE__, __LINE__);
162                 if (SQL_NUMROWS($result1) == 1)
163                 {
164                         // pool table
165                         LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_UNCONFIRMED_POOL_MISSING_1.$ID.ADMIN_UNCONFIRMED_POOL_MISSING_2);
166                 }
167                  elseif (SQL_NUMROWS($result2) == 1)
168                 {
169                         // user_stats table
170                         LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_UNCONFIRMED_STATS_MISSING_1.$ID.ADMIN_UNCONFIRMED_STATS_MISSING_2);
171                 }
172                  else
173                 {
174                         // both or link is invalid
175                         LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_UNCONFIRMED_INVALID_LINK);
176                 }
177
178                 // Free memory
179                 SQL_FREERESULT($result1);
180                 SQL_FREERESULT($result2);
181         }
182          elseif (!empty($_GET['bid']))
183         {
184                 // Data in bonus table not found
185                 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_UNCONFIRMED_INVALID_LINK);
186         }
187 }
188 //
189 ?>