0) {
// Test if the refid is valid
$result = SQL_QUERY_ESC("SELECT userid FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s LIMIT 1",
array(bigintval($GLOBALS['refid'])), __FILE__, __LINE__);
// Userid found?
//* DEBUG: */ die("refid={$GLOBALS['refid']}/numRows=".SQL_NUMROWS($result)."");
if (SQL_NUMROWS($result) == 0) {
// Not found so we set your refid!
REQUEST_SET_POST('refid', getConfig('def_refid'));
set_session('refid', getConfig('def_refid'));
} else {
// Use the refid here
REQUEST_SET_POST('refid', $GLOBALS['refid']);
}
} // END - if
if (IS_FORM_SENT()) {
// First we only check the submitted data then we continue... :)
//
// Did he agree to our Terms Of Usage?
if (REQUEST_POST('agree') != "Y") {
REQUEST_SET_POST('agree', "!");
$FAILED = true;
} // END - if
// Did he enter a valid email address? (we really don't care about
// that, he has to click on a confirmation link :P )
if ((!REQUEST_ISSET_POST(('addy'))) || (!VALIDATE_EMAIL(REQUEST_POST('addy')))) {
REQUEST_SET_POST('addy', "!");
$FAILED = true;
} // END - if
// And what about surname and family's name?
if (!REQUEST_ISSET_POST(('surname'))) {
REQUEST_SET_POST('surname', "!");
$FAILED = true;
} // END - if
if (!REQUEST_ISSET_POST(('family'))) {
REQUEST_SET_POST('family', "!");
$FAILED = true;
} // END - if
// Check for required fields
if (!$FAILED) $FAILED = REGISTER_CHECK_REQUIRED_FIELDS(REQUEST_POST_ARRAY());
// Did he enter his password twice?
if (((!REQUEST_ISSET_POST(('pass1'))) || (!REQUEST_ISSET_POST(('pass2')))) || ((REQUEST_POST('pass1') != REQUEST_POST('pass2')) && (REQUEST_ISSET_POST(('pass1'))) && (REQUEST_ISSET_POST(('pass2'))))) {
if ((REQUEST_POST('pass1') != REQUEST_POST('pass2')) && (REQUEST_ISSET_POST(('pass1'))) && (REQUEST_ISSET_POST(('pass2')))) {
REQUEST_SET_POST('pass1', "!");
REQUEST_SET_POST('pass2', "!");
} else {
if (!REQUEST_ISSET_POST(('pass1'))) { REQUEST_SET_POST('pass1', "!"); } else { REQUEST_SET_POST('pass1', ""); }
if (!REQUEST_ISSET_POST(('pass2'))) { REQUEST_SET_POST('pass2', "!"); } else { REQUEST_SET_POST('pass2', ""); }
}
$FAILED = true;
} // END - if
// Is the password long enouth?
if ((strlen(REQUEST_POST('pass1')) < getConfig('pass_len')) && (!$FAILED)) {
$SHORT_PASS = true;
$FAILED = true;
} // END - if
// No admin? Admins can always register!
if (!IS_ADMIN()) {
// Do this check only when no admin is logged in
foreach (REQUEST_POST('cat') as $id => $answer) {
if ($answer == "Y") $cats++;
} // END - foreach
if ($cats < getConfig('least_cats')) {
// ... nope!
$FAILED = true;
} // END - if
} // END - if
if ((REQUEST_POST('addy') != "!") && (getConfig('check_double_email') == "Y")) {
// Does the email address already exists in our database?
$CHK = SEARCH_EMAIL_USERTAB(REQUEST_POST('addy'));
if ($CHK) { REQUEST_SET_POST('addy', "?"); $FAILED = true; }
} // END - if
// Check for IP timeout?
if (getConfig('ip_timeout') > 0) {
// Check his IP number
$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",
array(GET_REMOTE_ADDR(), getConfig('ip_timeout'), getConfig('ip_timeout')), __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 1) {
// Same IP in timeout range and different email address entered... Eat this, faker! ;-)
// But admins are allowed to fake their own exchange service.
$IP_TIMEOUT = true;
$FAILED = true;
} // END - if
} // END - if
// Free memory
SQL_FREERESULT($result);
}
if ((IS_FORM_SENT()) && ((!$FAILED) || (IS_ADMIN()))) {
// Prepapre month and day of birth
if (strlen(REQUEST_POST('day')) == 1) REQUEST_SET_POST('day' , "0".REQUEST_POST('day'));
if (strlen(REQUEST_POST('month')) == 1) REQUEST_SET_POST('month', "0".REQUEST_POST('month'));
// Get total ...
// ... confirmed, ...
$confirmedUsers = GET_TOTAL_DATA("CONFIRMED", "user_data", "userid", "status", true);
// ... unconfirmed ...
$unconfirmedUsers = GET_TOTAL_DATA("UNCONFIRMED", "user_data", "userid", "status", true);
// ... and locked users!
$lockedUsers = GET_TOTAL_DATA("LOCKED", "user_data", "userid", "status", true);
// Generate hash which will be inserted into confirmation mail
$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')));
// Add design when extension sql_patches is v0.2.7 or greater
$ADD1 = ""; $ADD2 = "";
if (GET_EXT_VERSION("sql_patches") >= "0.2.7") {
// Okay, add design here
$ADD1 = ", curr_theme";
$ADD2 = ", '".GET_CURR_THEME()."'";
} // END - if
// Check if I shall disable sending mail to newly registered members out about active/begging rallye
// @TODO Rewrite this to a single filter
//
// First comes first: begging rallye
if (GET_EXT_VERSION("beg") >= "0.1.7") {
// Okay, shall I disable now?
if (getConfig('beg_new_mem_notify') != "Y") {
$ADD1 .= ", beg_ral_notify, beg_ral_en_notify";
$ADD2 .= ", UNIX_TIMESTAMP(), UNIX_TIMESTAMP()";
} // END - if
} // END - if
// Second: active rallye
if (GET_EXT_VERSION("bonus") >= "0.7.7") {
// Okay, shall I disable now?
if (getConfig('bonus_new_mem_notify') != "Y") {
$ADD1 .= ", bonus_ral_notify, bonus_ral_en_notify";
$ADD2 .= ", UNIX_TIMESTAMP(), UNIX_TIMESTAMP()";
} // END - if
} // END - if
// Write user data to table
if (EXT_IS_ACTIVE("country")) {
// Save with new selectable country code
$countryRow = "country_code";
$countryData = bigintval(REQUEST_POST('country_code'));
} else {
// Old way with enterable two-char-code
$countryRow = "country";
$countryData = substr(REQUEST_POST('cntry'), 0, 2);
}
//////////////////////////////
// Create user's account... //
//////////////////////////////
//
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.")
VALUES ('%s','%s','%s','%s','%s',%s,'%s','%s',%s, %s,%s,'%s',%s, %s,'%s','UNCONFIRMED','%s','%s', UNIX_TIMESTAMP(), UNIX_TIMESTAMP()".$ADD2.")",
array(
$countryRow,
substr(REQUEST_POST('gender'), 0, 1),
REQUEST_POST('surname'),
REQUEST_POST('family'),
REQUEST_POST('street_nr'),
$countryData,
bigintval(REQUEST_POST('zip')),
REQUEST_POST('city'),
REQUEST_POST('addy'),
bigintval(REQUEST_POST('day')),
bigintval(REQUEST_POST('month')),
bigintval(REQUEST_POST('year')),
generateHash(REQUEST_POST('pass1')),
bigintval(REQUEST_POST('max_mails')),
bigintval(REQUEST_POST('max_mails')),
bigintval(REQUEST_POST('refid')),
$hash,
GET_REMOTE_ADDR(),
), __FILE__, __LINE__);
// Get his userid
$userid = SQL_INSERTID();
// Did this work?
if ($userid == 0) {
// Something bad happened!
LOAD_TEMPLATE("admin_settings_saved", false, getMessage('USER_NOT_REGISTERED'));
return;
} // END - if
// Is the refback extension there?
if (EXT_IS_ACTIVE("refback")) {
// Update refback table
UPDATE_REFBACK_TABLE($userid);
} // END - if
// Write his welcome-points
$result = SQL_QUERY_ESC("SELECT id FROM `{!_MYSQL_PREFIX!}_user_points` WHERE userid=%s AND ref_depth=0 LIMIT 1",
array(bigintval($userid)), __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 0) {
// Add only when the line was not found (maybe some more secure?)
$locked = "points";
if (getConfig('ref_payout') > 0) $locked = "locked_points"; // Pay him later. First he has to confirm some mails!
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_points` (userid, ref_depth, ".$locked.") VALUES (%s,0,'%s')",
array(bigintval($userid), getConfig('points_register')), __FILE__, __LINE__);
// Update mediadata as well
if ((GET_EXT_VERSION("mediadata") >= "0.0.4") && ($locked == "points")) {
// Update database
MEDIA_UPDATE_ENTRY(array("total_points"), "add", getConfig('points_register'));
} // END - if
} // END - if
// Write catgories
if ((is_array(REQUEST_POST('cat'))) && (count(REQUEST_POST('cat')))) {
foreach (REQUEST_POST('cat') as $cat => $joined) {
if ($joined == "Y") {
// Insert category entry
SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_user_cats` (userid, cat_id) VALUES (%s, %s)",
array(bigintval($userid), bigintval($cat)), __FILE__, __LINE__);
} // END - if
} // END - foreach
} // END - if
// Rewrite gender
$gender = TRANSLATE_GENDER(REQUEST_POST('gender'));
// ... rewrite a zero referal ID to the main title
if (REQUEST_POST('refid') == "0") REQUEST_SET_POST('refid', constant('MAIN_TITLE'));
// Is ZIP code set?
if (REQUEST_ISSET_POST(('zip'))) {
// Prepare data array for the email template
// Start with the gender...
$DATA = array(
'hash' => $hash,
'uid' => $userid,
'gender' => $gender,
'surname' => SQL_ESCAPE(REQUEST_POST('surname')),
'family' => SQL_ESCAPE(REQUEST_POST('family')),
'email' => SQL_ESCAPE(REQUEST_POST('addy')),
'street' => SQL_ESCAPE(REQUEST_POST('street_nr')),
'city' => SQL_ESCAPE(REQUEST_POST('city')),
'zip' => bigintval(REQUEST_POST('zip')),
'country' => $countryData,
'refid' => SQL_ESCAPE(REQUEST_POST('refid')),
'pass' => SQL_ESCAPE(REQUEST_POST('pass1')),
);
} else {
// No ZIP code entered
$DATA = array(
'hash' => $hash,
'uid' => $userid,
'gender' => $gender,
'surname' => SQL_ESCAPE(REQUEST_POST('surname')),
'family' => SQL_ESCAPE(REQUEST_POST('family')),
'email' => SQL_ESCAPE(REQUEST_POST('addy')),
'street' => SQL_ESCAPE(REQUEST_POST('street_nr')),
'city' => SQL_ESCAPE(REQUEST_POST('city')),
'zip' => "",
'country' => $countryData,
'refid' => SQL_ESCAPE(REQUEST_POST('refid')),
'pass' => SQL_ESCAPE(REQUEST_POST('pass1')),
);
}
// Continue with birthday...
switch (GET_LANGUAGE())
{
case "de":
$DATA['birthday'] = bigintval(REQUEST_POST('day')).".".bigintval(REQUEST_POST('month')).".".bigintval(REQUEST_POST('year'));
break;
default:
$DATA['birthday'] = bigintval(REQUEST_POST('month'))."/".bigintval(REQUEST_POST('day'))."/".bigintval(REQUEST_POST('year'));
break;
}
// Display information to the user that he got mail and send it away
$msg_guest = LOAD_EMAIL_TEMPLATE("register-member", $DATA, $userid);
// Send mail to user (confirmation link!)
$EMAIL = $DATA['email'];
SEND_EMAIL ($DATA['email'], getMessage('GUEST_CONFIRM_LINK'), $msg_guest);
$DATA['email'] = $EMAIL;
// Send mail to admin
SEND_ADMIN_NOTIFICATION(getMessage('ADMIN_NEW_ACCOUNT'), "register-admin", $DATA, $userid);
// Output success registration
LOAD_TEMPLATE("admin_settings_saved", false, getMessage('REGISTRATION_DONE'));
} else {
if (REQUEST_POST('agree') == "!") {
OUTPUT_HTML("
{--HAVE_TO_AGREE--}
");
} // END - if
if (REQUEST_POST('addy') == "!") {
OUTPUT_HTML("
");
} // END - if
if ($IP_TIMEOUT === true) {
OUTPUT_HTML("
{--REMOTE_ADDR_TIMEOUT--}
");
} // END - if
if ((!empty($cats)) && ($cats < getConfig('least_cats'))) {
OUTPUT_HTML("
{--CATS_LEAST--}: ".getConfig('least_cats')."
");
} // END - if
// Generate birthday selection
switch (GET_LANGUAGE())
{
case "de": // German date format
define('BIRTHDAY_SELECTION', ADD_SELECTION("day", REQUEST_POST('day')).ADD_SELECTION("month", REQUEST_POST('month')).ADD_SELECTION("year", REQUEST_POST('year')));
break;
default: // Default is the US date format... :)
define('BIRTHDAY_SELECTION', ADD_SELECTION("month", REQUEST_POST('month')).ADD_SELECTION("day", REQUEST_POST('day')).ADD_SELECTION("year", REQUEST_POST('year')));
break;
}
// Adds a table for the guests with all visible categories
define('CATEGORY_SELECTION', REGISTER_ADD_CATEGORY_TABLE("guest", true));
// Adds maximum receiveable mails list... :)
define('MAX_RECEIVE_LIST', ADD_MAX_RECEIVE_LIST("guest", "", true));
// Shall I display the refid or shall I make it editable?
if (getConfig('display_refid') == "Y") {
// Load "hide" form template
define('REFID_CONTENT', LOAD_TEMPLATE("guest_register_refid_hide", true, $GLOBALS['refid']));
} else {
// Load template to enter it
define('REFID_CONTENT', LOAD_TEMPLATE("guest_register_refid", true, $GLOBALS['refid']));
}
// You may want to modify the register_header.tpl.xx file and not this script when you add your scripts etc. :-)
define('REGISTER_HEADER_CONTENT', LOAD_TEMPLATE("register_header", true));
// Please select at least x categories
define('LEAST_CATS_VALUE', getConfig('least_cats'));
// Other values
define('__SURNAME', SQL_ESCAPE(REQUEST_POST('surname')));
define('__FAMILY', SQL_ESCAPE(REQUEST_POST('family')));
define('__STREET', SQL_ESCAPE(REQUEST_POST('street_nr')));
define('__COUNTRY', SQL_ESCAPE(REQUEST_POST('cntry')));
if (REQUEST_ISSET_POST(('zip'))) {
define('__ZIP', bigintval(REQUEST_POST('zip')));
} else {
define('__ZIP', "");
}
define('__CITY', SQL_ESCAPE(REQUEST_POST('city')));
define('__ADDY', SQL_ESCAPE(REQUEST_POST('addy')));
// Shall I add a counrty selection box or the old input box?
if (EXT_IS_ACTIVE("country")) {
// New variant, good!
$OUT = "";
define('__COUNTRY_CONTENT', $OUT);
} else {
// Old out-dated variant
define('__COUNTRY_CONTENT', "");
}
// Set MUST_??? constants
if ((EXT_IS_ACTIVE("register")) && (GET_EXT_VERSION("register") > "0.0")) REGISTER_FILL_MUST_CONSTANTS();
// Display registration form
LOAD_TEMPLATE("guest_register");
}
//
?>