2 /************************************************************************
3 * MXChange v0.2.1 Start: 10/10/2003 *
4 * =============== Last change: 11/26/2004 *
6 * -------------------------------------------------------------------- *
7 * File : what-register.php *
8 * -------------------------------------------------------------------- *
9 * Short description : Registration form *
10 * -------------------------------------------------------------------- *
11 * Kurzbeschreibung : Anmeldeformular *
12 * -------------------------------------------------------------------- *
15 * $Tag:: 0.2.1-FINAL $ *
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 *
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. *
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. *
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, *
37 ************************************************************************/
39 // Some security stuff...
40 if (!defined('__SECURITY')) {
41 $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
43 } elseif ((!EXT_IS_ACTIVE("register"))) {
44 addFatalMessage(__FILE__, __LINE__, getMessage('EXTENSION_PROBLEM_EXT_INACTIVE'), "register");
48 // Add description as navigation point
49 ADD_DESCR("guest", __FILE__);
53 // Initialize variables
54 $FAILED = false; $SHORT_PASS = false; $cats = 0; $IP_TIMEOUT = false;
56 if (!IS_FORM_SENT()) REQUEST_UNSET_POST('ok');
58 if (!REQUEST_ISSET_POST(('agree'))) REQUEST_SET_POST('agree' , "");
59 if (!REQUEST_ISSET_POST(('addy'))) REQUEST_SET_POST('addy' , "");
60 if (!REQUEST_ISSET_POST(('surname'))) REQUEST_SET_POST('surname' , "");
61 if (!REQUEST_ISSET_POST(('family'))) REQUEST_SET_POST('family' , "");
62 if (!REQUEST_ISSET_POST(('pass1'))) REQUEST_SET_POST('pass1' , "");
63 if (!REQUEST_ISSET_POST(('pass2'))) REQUEST_SET_POST('pass2' , "");
64 if (!REQUEST_ISSET_POST(('day'))) REQUEST_SET_POST('day' , "");
65 if (!REQUEST_ISSET_POST(('month'))) REQUEST_SET_POST('month' , "");
66 if (!REQUEST_ISSET_POST(('year'))) REQUEST_SET_POST('year' , "");
67 if (!REQUEST_ISSET_POST(('max_mails'))) REQUEST_SET_POST('max_mails' , "");
68 if (!REQUEST_ISSET_POST(('street_nr'))) REQUEST_SET_POST('street_nr' , "");
69 if (!REQUEST_ISSET_POST(('zip'))) REQUEST_SET_POST('zip' , "");
70 if (!REQUEST_ISSET_POST(('city'))) REQUEST_SET_POST('city' , "");
71 if (!REQUEST_ISSET_POST(('cntry'))) REQUEST_SET_POST('cntry' , "");
72 if (!REQUEST_ISSET_POST(('country_code'))) REQUEST_SET_POST('country_code', "1");
74 // Default refid is zero
75 REQUEST_SET_POST('refid', 0);
76 if ($GLOBALS['refid'] > 0) {
77 // Test if the refid is valid
78 $result = SQL_QUERY_ESC("SELECT userid FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s LIMIT 1",
79 array(bigintval($GLOBALS['refid'])), __FILE__, __LINE__);
82 //* DEBUG: */ die("refid={$GLOBALS['refid']}/numRows=".SQL_NUMROWS($result)."");
83 if (SQL_NUMROWS($result) == 0) {
84 // Not found so we set your refid!
85 REQUEST_SET_POST('refid', getConfig('def_refid'));
86 set_session('refid', getConfig('def_refid'));
89 REQUEST_SET_POST('refid', $GLOBALS['refid']);
94 // First we only check the submitted data then we continue... :)
96 // Did he agree to our Terms Of Usage?
97 if (REQUEST_POST('agree') != "Y") {
98 REQUEST_SET_POST('agree', "!");
102 // Did he enter a valid email address? (we really don't care about
103 // that, he has to click on a confirmation link :P )
104 if ((!REQUEST_ISSET_POST(('addy'))) || (!VALIDATE_EMAIL(REQUEST_POST('addy')))) {
105 REQUEST_SET_POST('addy', "!");
109 // And what about surname and family's name?
110 if (!REQUEST_ISSET_POST(('surname'))) {
111 REQUEST_SET_POST('surname', "!");
114 if (!REQUEST_ISSET_POST(('family'))) {
115 REQUEST_SET_POST('family', "!");
119 // Check for required fields
120 if (!$FAILED) $FAILED = REGISTER_CHECK_REQUIRED_FIELDS(REQUEST_POST_ARRAY());
122 // Did he enter his password twice?
123 if (((!REQUEST_ISSET_POST(('pass1'))) || (!REQUEST_ISSET_POST(('pass2')))) || ((REQUEST_POST('pass1') != REQUEST_POST('pass2')) && (REQUEST_ISSET_POST(('pass1'))) && (REQUEST_ISSET_POST(('pass2'))))) {
124 if ((REQUEST_POST('pass1') != REQUEST_POST('pass2')) && (REQUEST_ISSET_POST(('pass1'))) && (REQUEST_ISSET_POST(('pass2')))) {
125 REQUEST_SET_POST('pass1', "!");
126 REQUEST_SET_POST('pass2', "!");
128 if (!REQUEST_ISSET_POST(('pass1'))) { REQUEST_SET_POST('pass1', "!"); } else { REQUEST_SET_POST('pass1', ""); }
129 if (!REQUEST_ISSET_POST(('pass2'))) { REQUEST_SET_POST('pass2', "!"); } else { REQUEST_SET_POST('pass2', ""); }
134 // Is the password long enouth?
135 if ((strlen(REQUEST_POST('pass1')) < getConfig('pass_len')) && (!$FAILED)) {
140 // No admin? Admins can always register!
142 // Do this check only when no admin is logged in
143 foreach (REQUEST_POST('cat') as $id => $answer) {
144 if ($answer == "Y") $cats++;
147 if ($cats < getConfig('least_cats')) {
153 if ((REQUEST_POST('addy') != "!") && (getConfig('check_double_email') == "Y")) {
154 // Does the email address already exists in our database?
155 $CHK = SEARCH_EMAIL_USERTAB(REQUEST_POST('addy'));
156 if ($CHK) { REQUEST_SET_POST('addy', "?"); $FAILED = true; }
159 // Check for IP timeout?
160 if (getConfig('ip_timeout') > 0) {
161 // Check his IP number
162 $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",
163 array(GET_REMOTE_ADDR(), getConfig('ip_timeout'), getConfig('ip_timeout')), __FILE__, __LINE__);
164 if (SQL_NUMROWS($result) == 1) {
165 // Same IP in timeout range and different email address entered... Eat this, faker! ;-)
166 // But admins are allowed to fake their own exchange service.
173 SQL_FREERESULT($result);
176 if ((IS_FORM_SENT()) && ((!$FAILED) || (IS_ADMIN()))) {
177 // Prepapre month and day of birth
178 if (strlen(REQUEST_POST('day')) == 1) REQUEST_SET_POST('day' , "0".REQUEST_POST('day'));
179 if (strlen(REQUEST_POST('month')) == 1) REQUEST_SET_POST('month', "0".REQUEST_POST('month'));
182 // ... confirmed, ...
183 $confirmedUsers = GET_TOTAL_DATA("CONFIRMED", "user_data", "userid", "status", true);
184 // ... unconfirmed ...
185 $unconfirmedUsers = GET_TOTAL_DATA("UNCONFIRMED", "user_data", "userid", "status", true);
186 // ... and locked users!
187 $lockedUsers = GET_TOTAL_DATA("LOCKED", "user_data", "userid", "status", true);
189 // Generate hash which will be inserted into confirmation mail
190 $hash = generateHash(sha1($confirmedUsers.":".$unconfirmedUsers.":".$lockedUsers.":".REQUEST_POST('month')."-".REQUEST_POST('day')."-".REQUEST_POST('year').":".getenv('SERVER_NAME').":".GET_REMOTE_ADDR().":".GET_USER_AGENT()."/".constant('SITE_KEY')."/".constant('DATE_KEY')."/".constant('RAND_NUMBER')));
192 // Add design when extension sql_patches is v0.2.7 or greater
193 $ADD1 = ""; $ADD2 = "";
194 if (GET_EXT_VERSION("sql_patches") >= "0.2.7") {
195 // Okay, add design here
196 $ADD1 = ", curr_theme";
197 $ADD2 = ", '".GET_CURR_THEME()."'";
200 // Check if I shall disable sending mail to newly registered members out about active/begging rallye
201 // @TODO Rewrite this to a single filter
203 // First comes first: begging rallye
204 if (GET_EXT_VERSION("beg") >= "0.1.7") {
205 // Okay, shall I disable now?
206 if (getConfig('beg_new_mem_notify') != "Y") {
207 $ADD1 .= ", beg_ral_notify, beg_ral_en_notify";
208 $ADD2 .= ", UNIX_TIMESTAMP(), UNIX_TIMESTAMP()";
212 // Second: active rallye
213 if (GET_EXT_VERSION("bonus") >= "0.7.7") {
214 // Okay, shall I disable now?
215 if (getConfig('bonus_new_mem_notify') != "Y") {
216 $ADD1 .= ", bonus_ral_notify, bonus_ral_en_notify";
217 $ADD2 .= ", UNIX_TIMESTAMP(), UNIX_TIMESTAMP()";
221 // Write user data to table
222 if (EXT_IS_ACTIVE("country")) {
223 // Save with new selectable country code
224 $countryRow = "country_code";
225 $countryData = bigintval(REQUEST_POST('country_code'));
227 // Old way with enterable two-char-code
228 $countryRow = "country";
229 $countryData = substr(REQUEST_POST('cntry'), 0, 2);
232 //////////////////////////////
233 // Create user's account... //
234 //////////////////////////////
236 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.")
237 VALUES ('%s','%s','%s','%s','%s',%s,'%s','%s',%s, %s,%s,'%s',%s, %s,'%s','UNCONFIRMED','%s','%s', UNIX_TIMESTAMP(), UNIX_TIMESTAMP()".$ADD2.")",
240 substr(REQUEST_POST('gender'), 0, 1),
241 REQUEST_POST('surname'),
242 REQUEST_POST('family'),
243 REQUEST_POST('street_nr'),
245 bigintval(REQUEST_POST('zip')),
246 REQUEST_POST('city'),
247 REQUEST_POST('addy'),
248 bigintval(REQUEST_POST('day')),
249 bigintval(REQUEST_POST('month')),
250 bigintval(REQUEST_POST('year')),
251 generateHash(REQUEST_POST('pass1')),
252 bigintval(REQUEST_POST('max_mails')),
253 bigintval(REQUEST_POST('max_mails')),
254 bigintval(REQUEST_POST('refid')),
257 ), __FILE__, __LINE__);
260 $userid = SQL_INSERTID();
264 // Something bad happened!
265 LOAD_TEMPLATE("admin_settings_saved", false, getMessage('USER_NOT_REGISTERED'));
269 // Is the refback extension there?
270 if (EXT_IS_ACTIVE("refback")) {
271 // Update refback table
272 UPDATE_REFBACK_TABLE($userid);
275 // Write his welcome-points
276 $result = SQL_QUERY_ESC("SELECT id FROM `{!_MYSQL_PREFIX!}_user_points` WHERE userid=%s AND ref_depth=0 LIMIT 1",
277 array(bigintval($userid)), __FILE__, __LINE__);
278 if (SQL_NUMROWS($result) == 0) {
279 // Add only when the line was not found (maybe some more secure?)
281 if (getConfig('ref_payout') > 0) $locked = "locked_points"; // Pay him later. First he has to confirm some mails!
282 SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_points` (userid, ref_depth, ".$locked.") VALUES (%s,0,'%s')",
283 array(bigintval($userid), getConfig('points_register')), __FILE__, __LINE__);
285 // Update mediadata as well
286 if ((GET_EXT_VERSION("mediadata") >= "0.0.4") && ($locked == "points")) {
288 MEDIA_UPDATE_ENTRY(array("total_points"), "add", getConfig('points_register'));
293 if ((is_array(REQUEST_POST('cat'))) && (count(REQUEST_POST('cat')))) {
294 foreach (REQUEST_POST('cat') as $cat => $joined) {
295 if ($joined == "Y") {
296 // Insert category entry
297 SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_cats` (userid, cat_id) VALUES (%s, %s)",
298 array(bigintval($userid), bigintval($cat)), __FILE__, __LINE__);
304 $gender = TRANSLATE_GENDER(REQUEST_POST('gender'));
306 // ... rewrite a zero referal ID to the main title
307 if (REQUEST_POST('refid') == "0") REQUEST_SET_POST('refid', constant('MAIN_TITLE'));
310 if (REQUEST_ISSET_POST(('zip'))) {
311 // Prepare data array for the email template
312 // Start with the gender...
317 'surname' => SQL_ESCAPE(REQUEST_POST('surname')),
318 'family' => SQL_ESCAPE(REQUEST_POST('family')),
319 'email' => SQL_ESCAPE(REQUEST_POST('addy')),
320 'street' => SQL_ESCAPE(REQUEST_POST('street_nr')),
321 'city' => SQL_ESCAPE(REQUEST_POST('city')),
322 'zip' => bigintval(REQUEST_POST('zip')),
323 'country' => $countryData,
324 'refid' => SQL_ESCAPE(REQUEST_POST('refid')),
325 'pass' => SQL_ESCAPE(REQUEST_POST('pass1')),
328 // No ZIP code entered
333 'surname' => SQL_ESCAPE(REQUEST_POST('surname')),
334 'family' => SQL_ESCAPE(REQUEST_POST('family')),
335 'email' => SQL_ESCAPE(REQUEST_POST('addy')),
336 'street' => SQL_ESCAPE(REQUEST_POST('street_nr')),
337 'city' => SQL_ESCAPE(REQUEST_POST('city')),
339 'country' => $countryData,
340 'refid' => SQL_ESCAPE(REQUEST_POST('refid')),
341 'pass' => SQL_ESCAPE(REQUEST_POST('pass1')),
345 // Continue with birthday...
346 switch (GET_LANGUAGE())
349 $DATA['birthday'] = bigintval(REQUEST_POST('day')).".".bigintval(REQUEST_POST('month')).".".bigintval(REQUEST_POST('year'));
353 $DATA['birthday'] = bigintval(REQUEST_POST('month'))."/".bigintval(REQUEST_POST('day'))."/".bigintval(REQUEST_POST('year'));
357 // Display information to the user that he got mail and send it away
358 $msg_guest = LOAD_EMAIL_TEMPLATE("register-member", $DATA, $userid);
360 // Send mail to user (confirmation link!)
361 $EMAIL = $DATA['email'];
362 SEND_EMAIL ($DATA['email'], getMessage('GUEST_CONFIRM_LINK'), $msg_guest);
363 $DATA['email'] = $EMAIL;
365 // Send mail to admin
366 SEND_ADMIN_NOTIFICATION(getMessage('ADMIN_NEW_ACCOUNT'), "register-admin", $DATA, $userid);
368 // Output success registration
369 LOAD_TEMPLATE("admin_settings_saved", false, getMessage('REGISTRATION_DONE'));
371 if (REQUEST_POST('agree') == "!") {
372 OUTPUT_HTML("<div class=\"register_failed\">{--HAVE_TO_AGREE--}</div>");
375 if (REQUEST_POST('addy') == "!") {
376 OUTPUT_HTML("<div class=\"register_failed\">{--ENTER_EMAIL--}</div>");
377 REQUEST_SET_POST('addy', "");
378 } elseif (REQUEST_POST('addy') == "?") {
379 OUTPUT_HTML("<div class=\"register_failed\">{--EMAIL_ALREADY_DB--}</div>");
380 REQUEST_SET_POST('addy', "");
383 if (REQUEST_POST('surname') == "!") {
384 OUTPUT_HTML("<div class=\"register_failed\">{--ENTER_SURNAME--}</div>");
385 REQUEST_SET_POST('surname', "");
388 if (REQUEST_POST('family') == "!") {
389 OUTPUT_HTML("<div class=\"register_failed\">{--ENTER_FAMILY--}</div>");
390 REQUEST_SET_POST('family', "");
393 if ((REQUEST_POST('pass1') == "!") && (REQUEST_POST('pass2') == "!")) {
394 OUTPUT_HTML("<div class=\"register_failed\">{--ENTER_BOTH_PASSWORDS--}</div>");
395 } elseif (REQUEST_POST('pass1') == "!") {
396 OUTPUT_HTML("<div class=\"register_failed\">{--ENTER_PASS1--}</div>");
397 } elseif (REQUEST_POST('pass2') == "!") {
398 OUTPUT_HTML("<div class=\"register_failed\">{--ENTER_PASS2--}</div>");
401 if ($SHORT_PASS === true) {
402 OUTPUT_HTML("<div class=\"register_failed\">{--SHORT_PASS--}: ".getConfig('pass_len')."</div>");
405 if ($IP_TIMEOUT === true) {
406 OUTPUT_HTML("<div class=\"register_failed\">{--REMOTE_ADDR_TIMEOUT--}</div>");
409 if ((!empty($cats)) && ($cats < getConfig('least_cats'))) {
410 OUTPUT_HTML("<div class=\"register_failed\">".sprintf(getMessage('CATS_LEAST'), getConfig('least_cats'))."</div>");
413 // Generate birthday selection
414 switch (GET_LANGUAGE())
416 case "de": // German date format
417 define('BIRTHDAY_SELECTION', ADD_SELECTION("day", REQUEST_POST('day')).ADD_SELECTION("month", REQUEST_POST('month')).ADD_SELECTION("year", REQUEST_POST('year')));
420 default: // Default is the US date format... :)
421 define('BIRTHDAY_SELECTION', ADD_SELECTION("month", REQUEST_POST('month')).ADD_SELECTION("day", REQUEST_POST('day')).ADD_SELECTION("year", REQUEST_POST('year')));
425 // Adds a table for the guests with all visible categories
426 define('CATEGORY_SELECTION', REGISTER_ADD_CATEGORY_TABLE("guest", true));
428 // Adds maximum receiveable mails list... :)
429 define('MAX_RECEIVE_LIST', ADD_MAX_RECEIVE_LIST("guest", "", true));
431 // Shall I display the refid or shall I make it editable?
432 if (getConfig('display_refid') == "Y") {
433 // Load "hide" form template
434 define('REFID_CONTENT', LOAD_TEMPLATE("guest_register_refid_hide", true, $GLOBALS['refid']));
436 // Load template to enter it
437 define('REFID_CONTENT', LOAD_TEMPLATE("guest_register_refid", true, $GLOBALS['refid']));
440 // You may want to modify the register_header.tpl.xx file and not this script when you add your scripts etc. :-)
441 define('REGISTER_HEADER_CONTENT', LOAD_TEMPLATE("register_header", true));
443 // Please select at least x categories
444 define('LEAST_CATS_VALUE', getConfig('least_cats'));
447 define('__SURNAME', SQL_ESCAPE(REQUEST_POST('surname')));
448 define('__FAMILY', SQL_ESCAPE(REQUEST_POST('family')));
449 define('__STREET', SQL_ESCAPE(REQUEST_POST('street_nr')));
450 define('__COUNTRY', SQL_ESCAPE(REQUEST_POST('cntry')));
451 if (REQUEST_ISSET_POST(('zip'))) {
452 define('__ZIP', bigintval(REQUEST_POST('zip')));
456 define('__CITY', SQL_ESCAPE(REQUEST_POST('city')));
457 define('__ADDY', SQL_ESCAPE(REQUEST_POST('addy')));
459 // Shall I add a counrty selection box or the old input box?
460 if (EXT_IS_ACTIVE("country")) {
461 // New variant, good!
462 $OUT = "<select name=\"country_code\" class=\"guest_select\" size=\"1\">\n";
463 $whereStatement = "WHERE is_active='Y'";
464 if (IS_ADMIN()) $whereStatement = "";
465 $OUT .= ADD_OPTION_LINES("countries", "id", "descr", REQUEST_POST('country_code'), "code", $whereStatement);
467 define('__COUNTRY_CONTENT', $OUT);
469 // Old out-dated variant
470 define('__COUNTRY_CONTENT', "<input type=\"text\" name=\"cntry\" class=\"guest_normal\" size=\"2\" maxlength=\"3\" value=\"{!__COUNTRY!}\" />");
473 // Set MUST_??? constants
474 if ((EXT_IS_ACTIVE("register")) && (GET_EXT_VERSION("register") > "0.0")) REGISTER_FILL_MUST_CONSTANTS();
476 // Display registration form
477 LOAD_TEMPLATE("guest_register");