$answer)
{
if ($answer == "Y") $cats++;
}
if ($cats < $_CONFIG['least_cats'])
{
// ... nope!
$FAILED = true;
}
}
if (($_POST['addy'] != "!") && ($_CONFIG['check_double_email'] == "Y") && (!IS_ADMIN()))
{
// Does the email address already exists in our database?
$CHK = SEARCH_EMAIL_USERTAB($_POST['addy']);
if ($CHK) { $_POST['addy'] = "?"; $FAILED = true; }
}
// Check his IP number
$to = bigintval(time() - $_CONFIG['ip_timeout']);
$result = SQL_QUERY_ESC("SELECT joined, last_update FROM "._MYSQL_PREFIX."_user_data WHERE REMOTE_ADDR='%s' AND (joined > %s OR last_update > %s) LIMIT 1",
array(getenv('REMOTE_ADDR'), $to, $to), __FILE__, __LINE__);
if ((SQL_NUMROWS($result) == 1) && (!IS_ADMIN()))
{
// 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;
}
// Test the refid (because some strange hackers... :-P)
$result = SQL_QUERY_ESC("SELECT userid FROM "._MYSQL_PREFIX."_user_data WHERE userid=%s LIMIT 1",
array(bigintval($GLOBALS['refid'])), __FILE__, __LINE__);
if (SQL_NUMROWS($result) == 0)
{
// Not found so we set your refid!
$_POST['refid'] = $_CONFIG['def_refid'];
set_session("refid", $_CONFIG['def_refid']);
}
// Free memory
SQL_FREERESULT($result);
}
if ((isset($_POST['ok'])) && (!$FAILED))
{
// Save the registration
if (strlen($_POST['day']) == 1) $_POST['day'] = "0".$_POST['day'];
if (strlen($_POST['month']) == 1) $_POST['month'] = "0".$_POST['month'];
// Hash = MM-DD-YYYY:IP:USER_AGENT:TIMEMARK
$hash = generateHash($_POST['month']."-".$_POST['day']."-".$_POST['year'].":".getenv('SERVER_NAME').":".getenv('REMOTE_ADDR').":".getenv('HTTP_USER_AGENT').":".time());
// 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()."'";
}
// Check if I shall disable sending mail to newly registered members out about active/begging rallye
//
// First comes first: begging rallye
if (GET_EXT_VERSION("beg") >= "0.1.7")
{
// Okay, shall I disable now?
if ($_CONFIG['beg_new_mem_notify'] == "N")
{
$ADD1 .= ", beg_ral_notify, beg_ral_en_notify";
$ADD2 .= ", UNIX_TIMESTAMP(), UNIX_TIMESTAMP()";
}
}
// Second: active rallye
if (GET_EXT_VERSION("bonus") >= "0.7.7")
{
// Okay, shall I disable now?
if ($_CONFIG['bonus_new_mem_notify'] == "N")
{
$ADD1 .= ", bonus_ral_notify, bonus_ral_en_notify";
$ADD2 .= ", UNIX_TIMESTAMP(), UNIX_TIMESTAMP()";
}
}
// Write user data to table
if (EXT_IS_ACTIVE("country"))
{
// Save with new selectable country code
$countryRow = "country_code";
$countryData = bigintval($_POST['country_code']);
}
else
{
// Old way with enterable two-char-code
$countryRow = "country";
$countryData = addslashes(substr($_POST['cntry'], 0, 2));
}
//////////////////////////////
// Create user's account... //
//////////////////////////////
//
$result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_user_data (sex, 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,
SQL_ESCAPE(substr($_POST['sex'], 0, 1)),
SQL_ESCAPE($_POST['surname']),
SQL_ESCAPE($_POST['family_name']),
SQL_ESCAPE($_POST['street_nr']),
$countryData,
bigintval($_POST['zip']),
SQL_ESCAPE($_POST['city']),
SQL_ESCAPE($_POST['addy']),
bigintval($_POST['day']),
bigintval($_POST['month']),
bigintval($_POST['year']),
generateHash($_POST['pass1']),
bigintval($_POST['max_mails']),
bigintval($_POST['max_mails']),
bigintval($_POST['refid']),
$hash,
getenv('REMOTE_ADDR'),
), __FILE__, __LINE__);
// Get his userid
$result = SQL_QUERY_ESC("SELECT userid FROM "._MYSQL_PREFIX."_user_data WHERE user_hash='%s' LIMIT 1",
array($hash), __FILE__, __LINE__);
list($userid) = SQL_FETCHROW($result);
// Secure userid (we have a little paranoia ;-) )
$userid = bigintval($userid);
// 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 ($_CONFIG['ref_payout'] > 0) $locked = "locked_points"; // Pay him later. First he has to confirm some mails!
$result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_user_points (userid, ref_depth, ".$locked.") VALUES(%s, 0, '%s')",
array(bigintval($userid), $_CONFIG['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", $_CONFIG['points_register']);
}
}
// Write catgories
if ((is_array($_POST['cat'])) && (count($_POST['cat']))) {
foreach ($_POST['cat'] as $cat=>$joined) {
if ($joined == "Y") {
// Insert category entry
$result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_user_cats (userid, cat_id) VALUES (%s, %s)",
array(bigintval($userid), bigintval($cat)), __FILE__, __LINE__);
}
}
}
// Rewrite sex
$sex = TRANSLATE_SEX($_POST['sex']);
// ... rewrite a zero referral ID to the main title
if ($_POST['refid'] == "0") $_POST['refid'] = MAIN_TITLE;
// Prepare data array for the email template
// Start with the salutation...
$DATA = array(
'hash' => $hash,
'uid' => $userid,
'salut' => $sex,
'surname' => SQL_ESCAPE($_POST['surname']),
'family' => SQL_ESCAPE($_POST['family_name']),
'email' => SQL_ESCAPE($_POST['addy']),
'street' => SQL_ESCAPE($_POST['street_nr']),
'city' => SQL_ESCAPE($_POST['city']),
'zip' => bigintval($_POST['zip']),
'country' => $countryData,
'refid' => SQL_ESCAPE($_POST['refid']),
'pass' => SQL_ESCAPE($_POST['pass1']),
);
// Continue with birthday...
switch (GET_LANGUAGE())
{
case "de":
$DATA['birthday'] = bigintval($_POST['day']).".".bigintval($_POST['month']).".".bigintval($_POST['year']);
break;
default:
$DATA['birthday'] = bigintval($_POST['month'])."/".bigintval($_POST['day'])."/".bigintval($_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'], GUEST_CONFIRM_LINK, $msg_guest);
$DATA['email'] = $EMAIL;
// Send mail to admin
SEND_ADMIN_NOTIFICATION(ADMIN_NEW_ACCOUNT, "register-admin", $DATA, $userid);
// Output success registration
LOAD_TEMPLATE("admin_settings_saved", false, REGISTRATION_DONE);
}
else
{
if ($_POST['agree'] == "!")
{
OUTPUT_HTML("".HAVE_TO_AGREE." ");
}
if ($_POST['addy'] == "!")
{
OUTPUT_HTML("".ENTER_EMAIL." ");
$_POST['addy'] = "";
}
elseif ($_POST['addy'] == "?")
{
OUTPUT_HTML("".EMAIL_ALREADY_DB." ");
$_POST['addy'] = "";
}
if ($_POST['surname'] == "!")
{
OUTPUT_HTML("".ENTER_SURNAME." ");
$_POST['surname'] = "";
}
if ($_POST['family_name'] == "!")
{
OUTPUT_HTML("".ENTER_FAMILY." ");
$_POST['family_name'] = "";
}
if (($_POST['pass1'] == "!") && ($_POST['pass2'] == "!"))
{
OUTPUT_HTML("".ENTER_BOTH_PASSWORDS." ");
}
elseif ($_POST['pass1'] == "!")
{
OUTPUT_HTML("".ENTER_PASS1." ");
}
elseif ($_POST['pass2'] == "!")
{
OUTPUT_HTML("".ENTER_PASS2." ");
}
if ($SHORT_PASS)
{
OUTPUT_HTML("".SHORT_PASS.": ".$_CONFIG['pass_len']." ");
}
if ($IP_TIMEOUT)
{
OUTPUT_HTML("".REMOTE_ADDR_TIMEOUT." ");
}
if ((!empty($cats)) && ($cats < $_CONFIG['least_cats']))
{
OUTPUT_HTML("".CATS_LEAST.": ".$_CONFIG['least_cats']." ");
}
// Generate birthday selection
switch (GET_LANGUAGE())
{
case "de": // German date format
define('BIRTHDAY_SELECTION', ADD_SELECTION("day", $_POST['day']).ADD_SELECTION("month", $_POST['month']).ADD_SELECTION("year", $_POST['year']));
break;
default: // Default is the US date format... :)
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));
// Check if nickname extension is active and get state if nickname is selected or userid
$nick = false;
if (EXT_IS_ACTIVE("nickname")) $nick = NICKNAME_IS_ACTIVE($GLOBALS['refid']);
// Is the nickname valid?
if (!$nick) {
// Nope, disable it
if (GET_EXT_VERSION("sql_patches") != '') {
// Use default refid
$GLOBALS['refid'] = $_CONFIG['def_refid'];
} else {
// Set zero
$GLOBALS['refid'] = 0;
}
}
// Shall I display the refid or shall I make it editable?
if ($_CONFIG['display_refid'] == "Y") {
// Load template to enter it
define('REFID_CONTENT', LOAD_TEMPLATE("guest_register_refid", true, $GLOBALS['refid']));
} else {
// Load "hide" form template
define('REFID_CONTENT', LOAD_TEMPLATE("guest_register_refid_hide", 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', $_CONFIG['least_cats']);
// Other values
define('__SURNAME', $_POST['surname']); define('__FAMILY', $_POST['family_name']);
define('__STREET', $_POST['street_nr']); define('__COUNTRY', $_POST['cntry']);
define('__ZIP', $_POST['zip']); define('__CITY', $_POST['city']);
define('__ADDY', $_POST['addy']);
// Shall I add a counrty selection box or the old input box?
if (EXT_IS_ACTIVE("country"))
{
// New variant, good!
$OUT = "\n";
$whereStatement = "WHERE is_active='Y'";
if (IS_ADMIN()) $whereStatement = "";
$OUT .= ADD_OPTION_LINES("countries", "id", "descr", $_POST['country_code'], "code", $whereStatement);
$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");
}
CLOSE_TABLE();
//
?>