//--------------------------------------------------- // E-mail check: return 0 (not correct) or 1 (valid). //--------------------------------------------------- bool e_mail_check(XString email) { // athena limits if (email.size() < 3 || email.size() > 39) return 0; // part of RFC limits (official reference of e-mail description) XString::iterator at = std::find(email.begin(), email.end(), '@'); if (at == email.end()) return 0; XString username = email.xislice_h(at); XString hostname = email.xislice_t(at + 1); if (!username || !hostname) return 0; if (hostname.contains('@')) return 0; if (hostname.front() == '.' || hostname.back() == '.') return 0; if (hostname.contains_seq("..")) return 0; if (email.contains_any(" ;")) return 0; return email.is_print(); }