var blanks = " \t\n\r";  // caracteres com espaço em branco

// Retorna verdadeiro se a string está vazia

function isEmpty(s)
  {
  return ((s == null) || (s.length == 0));


  }


// Retorrna verdadeiro se a string está vazia ou se todos os caracteres
//são espaços em branco

function isBlank(s) {
  var i;

  // Verifica se a string 's' está vazia
  if (isEmpty(s))
    return true;
  for (i=0; i<s.length; i++)
    {
    // Verifica se o caracter não está em branco
    var c = s.charAt(i);
    if (blanks.indexOf(c) == -1)
      return false;
    }
  // Todos os caracteres estão em branco
  return true;
}

// verifica se o caracter 'c' é uma letra
function isLetter(c)
  {
  return (((c >= "a") && (c <= "z")) || ((c >= "A") && (c <= "Z")));


  }


// Retorna verdadeiro se a string 's' possui algum algarismo (0, 1,... ou 9)

function isDigit(c)
  {
  return ((c >= "0") && (c <= "9"));


  }


// Verifica se a string 's' é alfanumérica
function isAlphanumeric(s)  {
  var i;

  if (isBlank(s))
     return false;
  for (i = 0; i < s.length; i++) {
    var c = s.charAt(i);
    if (! (isLetter(c) || isDigit(c) ) )
    return false;
  }
  // Todos os caracteres são números ou letras
  return true;


}

// Verifica se o número é um valor monetário
function ehValorMonetario(num)  {
  var i;

  if (isBlank(num))
     return false;
  for (i = 0; i < num.length; i++) {
    var c = num.charAt(i);
    if (! (isDigit(c) || c == "." || c == "," ) )
    return false;
  }
  // é um valor monetário
  return true;


}

function eh_email(email) {

  //Verifica se tem arroba no e-mail
  var prim = email.indexOf("@")
  if(prim < 2) {
    return false;
  }
  if(email.indexOf("@",prim + 1) != -1) {
    return false;
  }

  //Verifica se tem ponto(.) no e-mail
  if(email.indexOf(".") < 1) {
    return false;
  }
  
  //Verifica se tem espaço no e-mail
  if(email.indexOf(" ") != -1) {
   return false;
  }
  
  //verifica se tem um ponto seguido de arroba
  if(email.indexOf(".@") > 0) {
    return false;
  }

  //verifica se tem um arroba seguido de ponto
  if(email.indexOf("@.") > 0) {
    return false;
  }

  //verifica se o e-mail termina com ponto(.)
  if(email.indexOf(".com.br.") > 0) {
    return false;
  }

  //as condições a seguir verificam a presença de algum caracter especial no e-mail
  if(email.indexOf("/") > 0) {
    return false;
  }
  if(email.indexOf("[") > 0) {
    return false;
  }
  if(email.indexOf("]") > 0) {
    return false;
  }
  if(email.indexOf("(") > 0) {
    return false;
  }
  if(email.indexOf(")") > 0) {
    return false;
  }
  
  //verifica a presença de dois pontos finais(..) seguidos
  if(email.indexOf("..") > 0) {
    return false;
  }
  return true;
}