name"; $body = "Welcome to ".PROJECT.". This email confirms your account with ".PROJECT.": Project URL: ".MASTER_URL." Account Key: $user->authenticator User name: $user->name E-mail: $user->email_addr "; if (!$is_validated) { $body .= " To activate your account, copy and paste your Account Key in the 'Activate account' page at ".URL_BASE."account_created.php "; } } else { $subject = PROJECT." information for $user->name"; $body = "Your ".PROJECT." account information is: Project URL: ".MASTER_URL." Account Key: $auth User name: $user->name E-mail: $user->email_addr "; } $body .= " Save this email. You'll need the Project URL and Account Key when you run the client software and to log in to the ".PROJECT." web site. For further information and assistance with ".PROJECT." go to ".MASTER_URL." "; return mail($user->email_addr, $subject, $body, $headers); } function email_sent_message($email_addr) { if (defined('EMAIL_FROM')) { $email_from = EMAIL_FROM; } else { $email_from = URL_BASE; } echo " Your Account Key has been emailed to $email_addr.
If the email doesn't arrive in a few minutes, your ISP may be blocking it as spam. In this case please contact your ISP and ask them to not block email from $email_from. "; } // a valid email address is of the form A@B.C // where A, B, C are nonempty, // A and B don't contain @ or ., // and C doesn't contain @ // function is_valid_email_addr($addr) { $x = strstr($addr, "@"); if (!$x) return false; if (strlen($x) == strlen($addr)) return false; $x = substr($x, 1); if (strstr($x, "@")) return false; $y = strstr($x, "."); if (!$y) return false; if (strlen($y) == strlen($x)) return false; if (strlen($y) == 1) return false; return true; } // A few functions relating to email-address munging // A "munged" email address is of the form @X_Y, // where X is a valid email address // and Y is a random string not containing _. // When an email address hasn't been validated yet, it's munged. // (Used during account creation and email address changes) function munge_email_addr($email, $string) { return "@".$email."_".$string; } // if email_addr is of the form @X_Y, split out the X and return true. // otherwise return false // function split_munged_email_addr($addr, $auth, &$email) { if (substr($addr, 0, 1) != "@") return false; $x = strrchr($addr, "_"); if (!$x) return false; $y = substr($x, 1); if ($auth && $y != $auth) return false; $email = substr($addr, 1, strlen($addr)-strlen($x)-1); return true; } ?>