Copyright updated
[mailer.git] / 0.2.1 / inc / modules / admin / what-list_unconfirmed.php
1 <?php\r
2 /************************************************************************\r
3  * MXChange v0.2.1                                    Start: 10/09/2004 *\r
4  * ================                             Last change: 10/31/2004 *\r
5  *                                                                      *\r
6  * -------------------------------------------------------------------- *\r
7  * File              : what-list_unconfirmed.php                        *\r
8  * -------------------------------------------------------------------- *\r
9  * Short description : List unconfirmed mail links                      *\r
10  * -------------------------------------------------------------------- *\r
11  * Kurzbeschreibung  : Unbest. Mail-Links auflisten                     *\r
12  * -------------------------------------------------------------------- *\r
13  *                                                                      *\r
14  * -------------------------------------------------------------------- *\r
15  * Copyright (c) 2003 - 2008 by Roland Haeder                           *\r
16  * For more information visit: http://www.mxchange.org                  *\r
17  *                                                                      *\r
18  * This program is free software; you can redistribute it and/or modify *\r
19  * it under the terms of the GNU General Public License as published by *\r
20  * the Free Software Foundation; either version 2 of the License, or    *\r
21  * (at your option) any later version.                                  *\r
22  *                                                                      *\r
23  * This program is distributed in the hope that it will be useful,      *\r
24  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *\r
25  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *\r
26  * GNU General Public License for more details.                         *\r
27  *                                                                      *\r
28  * You should have received a copy of the GNU General Public License    *\r
29  * along with this program; if not, write to the Free Software          *\r
30  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *\r
31  * MA  02110-1301  USA                                                  *\r
32  ************************************************************************/\r
33 \r
34 // Some security stuff...\r
35 if ((ereg(basename(__FILE__), $_SERVER['PHP_SELF'])) || (!IS_ADMIN()))\r
36 {\r
37         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4)."/security.php";\r
38         require($INC);\r
39 }\r
40 // Add description as navigation point\r
41 ADD_DESCR("admin", basename(__FILE__));\r
42 \r
43 // Don't load the admin_list_unconfirmed template by default\r
44 $listed = false;\r
45 \r
46 if (!empty($_GET['mid']))\r
47 {\r
48         // List confirmation links from your member's mail orders\r
49         define('__LIST_UNCON_TITLE', LIST_UNCONFIRMED_MEMBER_LINKS);\r
50 \r
51         // SQL query for mail data\r
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\r
53 LEFT JOIN "._MYSQL_PREFIX."_user_stats AS s\r
54 ON p.id=s.pool_id\r
55 WHERE p.id='".$_GET['mid']."' LIMIT 1";\r
56 \r
57         // Column, type and ID for member's mail\r
58         $col = "stats_id"; $type = "NORMAL"; $ID = "-1";\r
59 \r
60         // Load admin_list_unconfirmed template\r
61         $listed = true; $DATA = $_GET['mid']; $LINK = "mailid";\r
62 }\r
63  elseif ((!empty($_GET['bid'])) && (EXT_IS_ACTIVE("bonus")))\r
64 {\r
65         // List confirmation links from bonus mails\r
66         define('__LIST_UNCON_TITLE', LIST_UNCONFIRMED_BONUS_LINKS);\r
67 \r
68         // SQL query for mail data (both ids are required for compatiblity to above normal mail\r
69         $SQL = "SELECT id, id, subject, text, url, timestamp, mails_sent FROM "._MYSQL_PREFIX."_bonus WHERE id='".$_GET['bid']."' LIMIT 1";\r
70 \r
71         // Column, type and ID for member's mail\r
72         $col = "bonus_id"; $type = "BONUS"; $ID = $_GET['bid'];\r
73 \r
74         // Load admin_list_unconfirmed template\r
75         $listed = true; $DATA = $ID; $LINK = "bonusid";\r
76 }\r
77  else\r
78 {\r
79         // "Please do not call me directly."\r
80         LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_CALL_NOT_DIRECTLY);\r
81 }\r
82 \r
83 // Shall I display links or not?\r
84 if ($listed)\r
85 {\r
86         // Load mail data\r
87         $result = SQL_QUERY($SQL, __FILE__, __LINE__);\r
88         if (SQL_NUMROWS($result) == 1)\r
89         {\r
90                 // Mail order / bonus mail found!\r
91                 list($stats_id, $sender, $subj, $text, $url, $stamp, $max) = SQL_FETCHROW($result);\r
92                 SQL_FREERESULT($result);\r
93 \r
94                 // Transfer data to constants for the template\r
95                 if (($stats_id > 0) && ($ID == "-1")) $ID = $stats_id;\r
96                 if ($col == "bonus_id") $sender = "0";\r
97                 define('__LIST_UNCON_SENDER' , $sender);\r
98                 define('__LIST_UNCON_SUBJECT', COMPILE_CODE($subj));\r
99                 define('__LIST_UNCON_TEXT'   , COMPILE_CODE($text));\r
100                 define('__LIST_UNCON_URL'    , urlencode(base64_encode($url)));\r
101                 define('__LIST_UNCON_STAMP'  , MAKE_DATETIME($stamp, "2"));\r
102 \r
103                 // Load unconfirmed mail links. Hmmm, this select query is pretty cool\r
104                 // but it does only show unconfirmed mail links from existing user\r
105                 // accounts. So if you have delete one you did not see those links\r
106                 //\r
107                 $result = SQL_QUERY_ESC("SELECT DISTINCT l.userid, u.status, u.surname, u.family, u.sex, u.email\r
108 FROM "._MYSQL_PREFIX."_user_links AS l\r
109 LEFT JOIN "._MYSQL_PREFIX."_user_data AS u\r
110 ON l.userid=u.userid\r
111 WHERE l.%s='%s' ORDER BY l.userid LIMIT %s",\r
112  array($col, $ID, bigintval($max)),__FILE__, __LINE__);\r
113                 $unconfirmed = SQL_NUMROWS($result);\r
114                 define('__LIST_UNCO_UNCONFIRMED', $unconfirmed);\r
115 \r
116                 if ($unconfirmed > 0)\r
117                 {\r
118                         // At least one link left to confirm\r
119                         $OUT = LOAD_TEMPLATE("admin_list_unconfirmed_header", true);\r
120                         $SW = 2;\r
121                         while(list($uid, $status, $sname, $fname, $sex, $email) = SQL_FETCHROW($result))\r
122                         {\r
123                                 // Prepare data for the row template\r
124                                 $content = array(\r
125                                         'sw'     => $SW,\r
126                                         'u_link' => ADMIN_USER_PROFILE_LINK($uid),\r
127                                         'uid'    => $uid,\r
128                                         'link'   => $LINK,\r
129                                         'id'     => $ID,\r
130                                         'email'  => "<A href=\"".CREATE_EMAIL_LINK($email, "user_data")."\">".TRANSLATE_SEX($sex)." ".$sname." ".$fname."</A>",\r
131                                         'status' => TRANSLATE_STATUS($status),\r
132                                 );\r
133 \r
134                                 // Load row template and switch colors\r
135                                 $OUT .= LOAD_TEMPLATE("admin_list_unconfirmed_row", true, $content);\r
136                                 $SW = 3 - $SW;\r
137                         }\r
138                         $OUT .= "</TABLE>\n";\r
139 \r
140                         // Free memory\r
141                         SQL_FREERESULT($result);\r
142 \r
143                         // Store table rows in a constant\r
144                         define('__LIST_UNCON_LISTING', $OUT);\r
145                 }\r
146                  else\r
147                 {\r
148                         // All links are confirmed... strange, you shall normally not get a link to this place in this scenario... hmmm.\r
149                         define('__LIST_UNCON_LISTING', LOAD_TEMPLATE("admin_settings_saved", true, ADMIN_UNCONFIRMED_NO_LINK_LEFT));\r
150                 }\r
151 \r
152                 // Load final template\r
153                 LOAD_TEMPLATE("admin_list_unconfirmed");\r
154         }\r
155          elseif ($_GET['mid'] > 0)\r
156         {\r
157                 // Data in pool or in user_stats not found, so let's find out where data is missing\r
158                 $result1 = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_pool WHERE id=%d LIMIT 1",\r
159                  array(bigintval($ID)), __FILE__, __LINE__);\r
160                 $result2 = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_user_stats WHERE pool_id=%d LIMIT 1",\r
161                  array(bigintval($ID)), __FILE__, __LINE__);\r
162                 if (SQL_NUMROWS($result1) == 1)\r
163                 {\r
164                         // pool table\r
165                         LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_UNCONFIRMED_POOL_MISSING_1.$ID.ADMIN_UNCONFIRMED_POOL_MISSING_2);\r
166                 }\r
167                  elseif (SQL_NUMROWS($result2) == 1)\r
168                 {\r
169                         // user_stats table\r
170                         LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_UNCONFIRMED_STATS_MISSING_1.$ID.ADMIN_UNCONFIRMED_STATS_MISSING_2);\r
171                 }\r
172                  else\r
173                 {\r
174                         // both or link is invalid\r
175                         LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_UNCONFIRMED_INVALID_LINK);\r
176                 }\r
177 \r
178                 // Free memory\r
179                 SQL_FREERESULT($result1);\r
180                 SQL_FREERESULT($result2);\r
181         }\r
182          elseif (!empty($_GET['bid']))\r
183         {\r
184                 // Data in bonus table not found\r
185                 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_UNCONFIRMED_INVALID_LINK);\r
186         }\r
187 }\r
188 //\r
189 ?>\r