Previous fix fixed, a lot constants rewritten (unfinished)
[mailer.git] / inc / modules / guest / what-register.php
1 <?php
2 /************************************************************************
3  * MXChange v0.2.1                                    Start: 10/10/2003 *
4  * ===============                              Last change: 11/26/2004 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : what-register.php                                *
8  * -------------------------------------------------------------------- *
9  * Short description : Registration form                                *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Anmeldeformular                                  *
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 (!defined('__SECURITY')) {
36         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
37         require($INC);
38 } elseif ((!EXT_IS_ACTIVE("register"))) {
39         if (IS_ADMIN()) {
40                 addFatalMessage(sprintf(EXTENSION_PROBLEM_NOT_INSTALLED, "register"));
41         } else {
42                 addFatalMessage(EXTENSION_PROBLEM_EXT_INACTIVE, "register");
43         }
44         return;
45 }
46
47 // Add description as navigation point
48 ADD_DESCR("guest", __FILE__);
49
50 global $_CONFIG, $DATA;
51
52 // Initialize variables
53 $FAILED = false; $SHORT_PASS = false; $cats = 0; $IP_TIMEOUT = false;
54 if (!isset($_POST['ok']))          unset($_POST['ok']);
55 if (empty($_POST['agree']))        $_POST['agree']        = "";
56 if (empty($_POST['addy']))         $_POST['addy']         = "";
57 if (empty($_POST['surname']))      $_POST['surname']      = "";
58 if (empty($_POST['family_name']))  $_POST['family_name']  = "";
59 if (empty($_POST['pass1']))        $_POST['pass1']        = "";
60 if (empty($_POST['pass2']))        $_POST['pass2']        = "";
61 if (empty($_POST['day']))          $_POST['day']          = "";
62 if (empty($_POST['month']))        $_POST['month']        = "";
63 if (empty($_POST['year']))         $_POST['year']         = "";
64 if (empty($_POST['max_mails']))    $_POST['max_mails']    = "";
65 if (empty($_POST['street_nr']))    $_POST['street_nr']    = "";
66 if (empty($_POST['zip']))          $_POST['zip']          = "";
67 if (empty($_POST['city']))         $_POST['city']         = "";
68 if (empty($_POST['cntry']))        $_POST['cntry']        = "";
69 if (empty($_POST['country_code'])) $_POST['country_code'] = "1";
70
71 // Default refid is zero
72 $_POST['refid'] = 0;
73 if ($GLOBALS['refid'] > 0) {
74         // Test if the refid is valid
75         $result = SQL_QUERY_ESC("SELECT userid FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s LIMIT 1",
76                 array(bigintval($GLOBALS['refid'])), __FILE__, __LINE__);
77
78         // Userid found?
79         //* DEBUG: */ die("refid={$GLOBALS['refid']}/numRows=".SQL_NUMROWS($result)."");
80         if (SQL_NUMROWS($result) == 0) {
81                 // Not found so we set your refid!
82                 $_POST['refid'] = getConfig('def_refid');
83                 set_session('refid', getConfig('def_refid'));
84         } else {
85                 // Use the refid here
86                 $_POST['refid'] = $GLOBALS['refid'];
87         }
88 } // END - if
89
90 if (isset($_POST['ok'])) {
91         // First we only check the submitted data then we continue... :)
92         //
93         // Did he agree to our Terms Of Usage?
94         if ($_POST['agree'] != "Y") {
95                 $_POST['agree'] = "!";
96                 $FAILED = true;
97         } // END - if
98
99         // Did he enter a valid email address? (we really don't care about
100         // that, he has to click on a confirmation link :P )
101         if ((empty($_POST['addy'])) || (!VALIDATE_EMAIL($_POST['addy']))) {
102                 $_POST['addy'] = "!";
103                 $FAILED = true;
104         } // END - if
105
106         // And what about surname and family's name?
107         if (empty($_POST['surname'])) {
108                 $_POST['surname'] = "!";
109                 $FAILED = true;
110         } // END - if
111         if (empty($_POST['family_name'])) {
112                 $_POST['family_name'] = "!";
113                 $FAILED = true;
114         } // END - if
115
116         // Check for required fields
117         if (!$FAILED) $FAILED = REGISTER_CHECK_REQUIRED_FIELDS($_POST);
118
119         // Did he enter his password twice?
120         if (((empty($_POST['pass1'])) || (empty($_POST['pass2']))) || (($_POST['pass1'] != $_POST['pass2']) && (!empty($_POST['pass1'])) && (!empty($_POST['pass2'])))) {
121                 if (($_POST['pass1'] != $_POST['pass2']) && (!empty($_POST['pass1'])) && (!empty($_POST['pass2']))) {
122                         $_POST['pass1'] = "!";
123                         $_POST['pass2'] = "!";
124                 } else {
125                         if (empty($_POST['pass1'])) { $_POST['pass1'] = "!"; } else { $_POST['pass1'] = ""; }
126                         if (empty($_POST['pass2'])) { $_POST['pass2'] = "!"; } else { $_POST['pass2'] = ""; }
127                 }
128                 $FAILED = true;
129         } // END - if
130
131         // Is the password long enouth?
132         if ((strlen($_POST['pass1']) < getConfig('pass_len')) && (!$FAILED)) {
133                 $SHORT_PASS = true;
134                 $FAILED = true;
135         } // END - if
136
137         // No admin? Admins can always register!
138         if (!IS_ADMIN()) {
139                 // Do this check only when no admin is logged in
140                 foreach ($_POST['cat'] as $id => $answer) {
141                         if ($answer == "Y") $cats++;
142                 } // END - foreach
143
144                 if ($cats < getConfig('least_cats')) {
145                         // ... nope!
146                         $FAILED = true;
147                 } // END - if
148         } // END - if
149
150         if (($_POST['addy'] != "!") && (getConfig('check_double_email') == "Y")) {
151                 // Does the email address already exists in our database?
152                 $CHK = SEARCH_EMAIL_USERTAB($_POST['addy']);
153                 if ($CHK) { $_POST['addy'] = "?"; $FAILED = true; }
154         } // END - if
155
156         // Check for IP timeout?
157         if (getConfig('ip_timeout') > 0) {
158                 // Check his IP number
159                 $result = SQL_QUERY_ESC("SELECT joined, last_update FROM `{!_MYSQL_PREFIX!}_user_data` WHERE REMOTE_ADDR='%s' AND (joined > (UNIX_TIMESTAMP() - %s) OR last_update > (UNIX_TIMESTAMP() - %s)) LIMIT 1",
160                         array(GET_REMOTE_ADDR(), getConfig('ip_timeout'), getConfig('ip_timeout')), __FILE__, __LINE__);
161                 if (SQL_NUMROWS($result) == 1) {
162                         // Same IP in timeout range and different email address entered... Eat this, faker! ;-)
163                         // But admins are allowed to fake their own exchange service.
164                         $IP_TIMEOUT = true;
165                         $FAILED = true;
166                 } // END - if
167         } // END - if
168
169         // Free memory
170         SQL_FREERESULT($result);
171 }
172
173 if ((isset($_POST['ok'])) && ((!$FAILED) || (IS_ADMIN()))) {
174         // Prepapre month and day of birth
175         if (strlen($_POST['day'])   == 1) $_POST['day']   = "0".$_POST['day'];
176         if (strlen($_POST['month']) == 1) $_POST['month'] = "0".$_POST['month'];
177
178         // Get total ...
179         // ... confirmed, ...
180         $confirmedUsers   = GET_TOTAL_DATA("CONFIRMED", "user_data", "userid", "status", true);
181         // ... unconfirmed ...
182         $unconfirmedUsers = GET_TOTAL_DATA("UNCONFIRMED", "user_data", "userid", "status", true);
183         // ... and locked users!
184         $lockedUsers      = GET_TOTAL_DATA("LOCKED", "user_data", "userid", "status", true);
185
186         // Generate hash which will be inserted into confirmation mail
187         $hash = generateHash(sha1($confirmedUsers.":".$unconfirmedUsers.":".$lockedUsers.":".$_POST['month']."-".$_POST['day']."-".$_POST['year'].":".getenv('SERVER_NAME').":".GET_REMOTE_ADDR().":".GET_USER_AGENT()."/".SITE_KEY."/".DATE_KEY."/".RAND_NUMBER));
188
189         // Add design when extension sql_patches is v0.2.7 or greater
190         $ADD1 = ""; $ADD2 = "";
191         if (GET_EXT_VERSION("sql_patches") >= "0.2.7") {
192                 // Okay, add design here
193                 $ADD1 = ", curr_theme";
194                 $ADD2 = ", '".GET_CURR_THEME()."'";
195         } // END - if
196
197         // Check if I shall disable sending mail to newly registered members out about active/begging rallye
198         //
199         // First comes first: begging rallye
200         if (GET_EXT_VERSION("beg") >= "0.1.7") {
201                 // Okay, shall I disable now?
202                 if (getConfig('beg_new_mem_notify') == "N") {
203                         $ADD1 .= ", beg_ral_notify, beg_ral_en_notify";
204                         $ADD2 .= ", UNIX_TIMESTAMP(), UNIX_TIMESTAMP()";
205                 } // END - if
206         } // END - if
207
208         // Second: active rallye
209         if (GET_EXT_VERSION("bonus") >= "0.7.7") {
210                 // Okay, shall I disable now?
211                 if (getConfig('bonus_new_mem_notify') == "N") {
212                         $ADD1 .= ", bonus_ral_notify, bonus_ral_en_notify";
213                         $ADD2 .= ", UNIX_TIMESTAMP(), UNIX_TIMESTAMP()";
214                 } // END - if
215         } // END - if
216
217         // Write user data to table
218         if (EXT_IS_ACTIVE("country")) {
219                 // Save with new selectable country code
220                 $countryRow = "country_code";
221                 $countryData = bigintval($_POST['country_code']);
222         } else {
223                 // Old way with enterable two-char-code
224                 $countryRow = "country";
225                 $countryData = substr($_POST['cntry'], 0, 2);
226         }
227
228         //////////////////////////////
229         // Create user's account... //
230         //////////////////////////////
231         //
232         SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_data` (gender, surname, family, street_nr,%s, zip, city, email, birth_day, birth_month, birth_year, password, max_mails, receive_mails, refid, status, user_hash, REMOTE_ADDR, joined, last_update".$ADD1.")
233 VALUES ('%s','%s','%s','%s','%s',%s,'%s','%s',%s, %s,%s,'%s',%s, %s,'%s','UNCONFIRMED','%s','%s', UNIX_TIMESTAMP(), UNIX_TIMESTAMP()".$ADD2.")",
234         array(
235                 $countryRow,
236                 substr($_POST['gender'], 0, 1),
237                 $_POST['surname'],
238                 $_POST['family_name'],
239                 $_POST['street_nr'],
240                 $countryData,
241                 bigintval($_POST['zip']),
242                 $_POST['city'],
243                 $_POST['addy'],
244                 bigintval($_POST['day']),
245                 bigintval($_POST['month']),
246                 bigintval($_POST['year']),
247                 generateHash($_POST['pass1']),
248                 bigintval($_POST['max_mails']),
249                 bigintval($_POST['max_mails']),
250                 bigintval($_POST['refid']),
251                 $hash,
252                 GET_REMOTE_ADDR(),
253         ), __FILE__, __LINE__);
254
255         // Get his userid
256         $userid = SQL_INSERTID();
257
258         // Did this work?
259         if ($userid == 0) {
260                 // Something bad happened!
261                 LOAD_TEMPLATE("admin_settings_saved", false, USER_NOT_REGISTERED);
262                 return;
263         } // END - if
264
265         // Is the refback extension there?
266         if (EXT_IS_ACTIVE("refback")) {
267                 // Update refback table
268                 UPDATE_REFBACK_TABLE($userid);
269         } // END - if
270
271         // Write his welcome-points
272         $result = SQL_QUERY_ESC("SELECT id FROM `{!_MYSQL_PREFIX!}_user_points` WHERE userid=%s AND ref_depth=0 LIMIT 1",
273          array(bigintval($userid)), __FILE__, __LINE__);
274         if (SQL_NUMROWS($result) == 0) {
275                 // Add only when the line was not found (maybe some more secure?)
276                 $locked = "points";
277                 if (getConfig('ref_payout') > 0) $locked = "locked_points"; // Pay him later. First he has to confirm some mails!
278                 SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_points` (userid, ref_depth, ".$locked.") VALUES (%s,0,'%s')",
279                  array(bigintval($userid), getConfig('points_register')), __FILE__, __LINE__);
280
281                 // Update mediadata as well
282                 if ((GET_EXT_VERSION("mediadata") >= "0.0.4") && ($locked == "points")) {
283                         // Update database
284                         MEDIA_UPDATE_ENTRY(array("total_points"), "add", getConfig('points_register'));
285                 } // END - if
286         } // END - if
287
288         // Write catgories
289         if ((is_array($_POST['cat'])) && (count($_POST['cat']))) {
290                 foreach ($_POST['cat'] as $cat => $joined) {
291                         if ($joined == "Y") {
292                                 // Insert category entry
293                                 SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_cats` (userid, cat_id) VALUES (%s, %s)",
294                                  array(bigintval($userid), bigintval($cat)), __FILE__, __LINE__);
295                         } // END - if
296                 } // END - foreach
297         } // END - if
298
299         // Rewrite gender
300         $gender = TRANSLATE_GENDER($_POST['gender']);
301
302         // ... rewrite a zero referal ID to the main title
303         if ($_POST['refid'] == "0") $_POST['refid'] = MAIN_TITLE;
304
305         // Is ZIP code set?
306         if (!empty($_POST['zip'])) {
307                 // Prepare data array for the email template
308                 // Start with the gender...
309                 $DATA = array(
310                         'hash'    => $hash,
311                         'uid'     => $userid,
312                         'gender'  => $gender,
313                         'surname' => SQL_ESCAPE($_POST['surname']),
314                         'family'  => SQL_ESCAPE($_POST['family_name']),
315                         'email'   => SQL_ESCAPE($_POST['addy']),
316                         'street'  => SQL_ESCAPE($_POST['street_nr']),
317                         'city'    => SQL_ESCAPE($_POST['city']),
318                         'zip'     => bigintval($_POST['zip']),
319                         'country' => $countryData,
320                         'refid'   => SQL_ESCAPE($_POST['refid']),
321                         'pass'    => SQL_ESCAPE($_POST['pass1']),
322                 );
323         } else {
324                 // No ZIP code entered
325                 $DATA = array(
326                         'hash'    => $hash,
327                         'uid'     => $userid,
328                         'gender'  => $gender,
329                         'surname' => SQL_ESCAPE($_POST['surname']),
330                         'family'  => SQL_ESCAPE($_POST['family_name']),
331                         'email'   => SQL_ESCAPE($_POST['addy']),
332                         'street'  => SQL_ESCAPE($_POST['street_nr']),
333                         'city'    => SQL_ESCAPE($_POST['city']),
334                         'zip'     => "",
335                         'country' => $countryData,
336                         'refid'   => SQL_ESCAPE($_POST['refid']),
337                         'pass'    => SQL_ESCAPE($_POST['pass1']),
338                 );
339         }
340
341         // Continue with birthday...
342         switch (GET_LANGUAGE())
343         {
344         case "de":
345                 $DATA['birthday'] = bigintval($_POST['day']).".".bigintval($_POST['month']).".".bigintval($_POST['year']);
346                 break;
347
348         default:
349                 $DATA['birthday'] = bigintval($_POST['month'])."/".bigintval($_POST['day'])."/".bigintval($_POST['year']);
350                 break;
351         }
352
353         // Display information to the user that he got mail and send it away
354         $msg_guest = LOAD_EMAIL_TEMPLATE("register-member", $DATA, $userid);
355
356         // Send mail to user (confirmation link!)
357         $EMAIL = $DATA['email'];
358         SEND_EMAIL ($DATA['email'], getMessage('GUEST_CONFIRM_LINK'), $msg_guest);
359         $DATA['email'] = $EMAIL;
360
361         // Send mail to admin
362         SEND_ADMIN_NOTIFICATION(getMessage('ADMIN_NEW_ACCOUNT'), "register-admin", $DATA, $userid);
363
364         // Output success registration
365         LOAD_TEMPLATE("admin_settings_saved", false, REGISTRATION_DONE);
366 } else {
367         if ($_POST['agree'] == "!") {
368                 OUTPUT_HTML("<div class=\"register_failed\">".HAVE_TO_AGREE."</div>");
369         } // END - if
370
371         if ($_POST['addy'] == "!") {
372                 OUTPUT_HTML("<div class=\"register_failed\">".ENTER_EMAIL."</div>");
373                 $_POST['addy'] = "";
374         } elseif ($_POST['addy'] == "?") {
375                 OUTPUT_HTML("<div class=\"register_failed\">".EMAIL_ALREADY_DB."</div>");
376                 $_POST['addy'] = "";
377         }
378
379         if ($_POST['surname'] == "!") {
380                 OUTPUT_HTML("<div class=\"register_failed\">".ENTER_SURNAME."</div>");
381                 $_POST['surname'] = "";
382         } // END - if
383
384         if ($_POST['family_name'] == "!") {
385                 OUTPUT_HTML("<div class=\"register_failed\">".ENTER_FAMILY."</div>");
386                 $_POST['family_name'] = "";
387         } // END - if
388
389         if (($_POST['pass1'] == "!") && ($_POST['pass2'] == "!")) {
390                 OUTPUT_HTML("<div class=\"register_failed\">".ENTER_BOTH_PASSWORDS."</div>");
391         } elseif ($_POST['pass1'] == "!") {
392                 OUTPUT_HTML("<div class=\"register_failed\">".ENTER_PASS1."</div>");
393         } elseif ($_POST['pass2'] == "!") {
394                 OUTPUT_HTML("<div class=\"register_failed\">".ENTER_PASS2."</div>");
395         }
396
397         if ($SHORT_PASS) {
398                 OUTPUT_HTML("<div class=\"register_failed\">{!SHORT_PASS!}: ".getConfig('pass_len')."</div>");
399         } // END - if
400
401         if ($IP_TIMEOUT) {
402                 OUTPUT_HTML("<div class=\"register_failed\">{!REMOTE_ADDR_TIMEOUT!}</div>");
403         } // END - if
404
405         if ((!empty($cats)) && ($cats < getConfig('least_cats'))) {
406                 OUTPUT_HTML("<div class=\"register_failed\">{!CATS_LEAST!}: ".getConfig('least_cats')."</div>");
407         } // END - if
408
409         // Generate birthday selection
410         switch (GET_LANGUAGE())
411         {
412         case "de": // German date format
413                 define('BIRTHDAY_SELECTION', ADD_SELECTION("day", $_POST['day']).ADD_SELECTION("month", $_POST['month']).ADD_SELECTION("year", $_POST['year']));
414                 break;
415
416         default: // Default is the US date format... :)
417                 define('BIRTHDAY_SELECTION', ADD_SELECTION("month", $_POST['month']).ADD_SELECTION("day", $_POST['day']).ADD_SELECTION("year", $_POST['year']));
418                 break;
419         }
420
421         // Adds a table for the guests with all visible categories
422         define('CATEGORY_SELECTION', REGISTER_ADD_CATEGORY_TABLE("guest", true));
423
424         // Adds maximum receiveable mails list... :)
425         define('MAX_RECEIVE_LIST', ADD_MAX_RECEIVE_LIST("guest", "", true));
426
427         // Shall I display the refid or shall I make it editable?
428         if (getConfig('display_refid') == "Y") {
429                 // Load "hide" form template
430                 define('REFID_CONTENT', LOAD_TEMPLATE("guest_register_refid_hide", true, $GLOBALS['refid']));
431         } else {
432                 // Load template to enter it
433                 define('REFID_CONTENT', LOAD_TEMPLATE("guest_register_refid", true, $GLOBALS['refid']));
434         }
435
436         // You may want to modify the register_header.tpl.xx file and not this script when you add your scripts etc. :-)
437         define('REGISTER_HEADER_CONTENT', LOAD_TEMPLATE("register_header", true));
438
439         // Please select at least x categories
440         define('LEAST_CATS_VALUE', getConfig('least_cats'));
441
442         // Other values
443         define('__SURNAME', SQL_ESCAPE($_POST['surname']));
444         define('__FAMILY',  SQL_ESCAPE($_POST['family_name']));
445         define('__STREET',  SQL_ESCAPE($_POST['street_nr']));
446         define('__COUNTRY', SQL_ESCAPE($_POST['cntry']));
447         if (!empty($_POST['zip'])) {
448                 define('__ZIP', bigintval($_POST['zip']));
449         } else {
450                 define('__ZIP', "");
451         }
452         define('__CITY',    SQL_ESCAPE($_POST['city']));
453         define('__ADDY',    SQL_ESCAPE($_POST['addy']));
454
455         // Shall I add a counrty selection box or the old input box?
456         if (EXT_IS_ACTIVE("country")) {
457                 // New variant, good!
458                 $OUT  = "<select name=\"country_code\" class=\"guest_select\" size=\"1\">\n";
459                 $whereStatement = "WHERE is_active='Y'";
460                 if (IS_ADMIN()) $whereStatement = "";
461                 $OUT .= ADD_OPTION_LINES("countries", "id", "descr", $_POST['country_code'], "code", $whereStatement);
462                 $OUT .= "</select>";
463                 define('__COUNTRY_CONTENT', $OUT);
464         } else {
465                 // Old out-dated variant
466                 define('__COUNTRY_CONTENT', "<input type=\"text\" name=\"cntry\" class=\"guest_normal\" size=\"2\" maxlength=\"3\" value=\"{!__COUNTRY!}\" />");
467         }
468
469         // Set MUST_??? constants
470         if ((EXT_IS_ACTIVE("register")) && (GET_EXT_VERSION("register") > "0.0")) REGISTER_FILL_MUST_CONSTANTS();
471
472         // Display registration form
473         LOAD_TEMPLATE("guest_register");
474 }
475
476 //
477 ?>