/*
******************************************************************************

	Criado para validar campos de e-mail nos formulários dos JSPs
	Autor: Sandro Benigno

******************************************************************************
*/

// validar e-mail
function validaEmail(campoMail) {
   var email = campoMail.toLowerCase();
   var valido = "y";

   var mensagem = "";

   if (email != "") {
      if (email.length<7 ||
        email.indexOf("@.") != -1 ||
        email.indexOf("-.") != -1 ||
        email.indexOf("_.") != -1 ||
        email.indexOf("..") != -1 ||
        email.indexOf("._") != -1 ||
        email.indexOf(".-") != -1 ||
        email.indexOf(".@") != -1 ||
        email.indexOf("@-") != -1 ||
        email.indexOf("@_") != -1 ||
        email.indexOf("@") == 0 ||
        email.indexOf("@") != email.lastIndexOf("@") ||
        email.indexOf("@") == -1 ||
        email.indexOf(".") == -1 ||
        (email.length - (email.lastIndexOf(".") + 1)) < 2) {
        valido = "n";
        mensagem = "E-mail inválido.\n";
      }
      else {
        a = "abcdefghijklmnopqrstuvwxyz0123456789@-_.";
        b = 0;
        while (b < email.length) {
           if (a.indexOf(email.charAt(b)) == -1) {
              valido = "n";
              mensagem = "E-mail inválido.\n";
              b = email.length;
           }
          b = b + 1;
        }
      }
   }
/*
    if (valido == "y") {
      rx = /^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.[a-z][a-z]$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.aero$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.biz$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.coop$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.com$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.edu$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.gov$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.info$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.int$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.mil$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.museum$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.name$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.net$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.org$|^[a-z0-9\._]*[a-z0-9_]@[a-z0-9][a-z0-9\-\.]*[a-z0-9]\.pro$/i;
      if (rx.test(email)) {
         rx = /^[a-z0-9_]/i;
         if(!(rx.test(email))) {
           valido = "n";
           mensagem = "E-mail inválido.\n";
         }
      }
      else {
        valido = "n";
        mensagem = "E-mail inválido.\n";
      }
    }
*/
    return mensagem;
}