// JavaScript Document
function Controle()
{
	with(document.forms['inscription'])
	{
		if(nom.value=="")
		{
			texte_erreur.value='Saisissez votre nom, svp';
			montre('erreur');
			nom.focus();
			return(false);
		}
		if(prenom.value=="")
		{
			texte_erreur.value='Saisissez votre prénom, svp';
			montre('erreur');
			prenom.focus();
			return(false);
		}
		if(email.value=="")
		{
			texte_erreur.value='Saisissez votre email, svp';
			montre('erreur');
			email.focus();
			return(false);
		}
		else
		{
			if(!verifEmail(email.value))
			{
				texte_erreur.value='Email incorrect';
				montre('erreur');
				email.focus();
				return(false);
			}
		}
		if(telephone.value=="")
		{
			texte_erreur.value='Saisissez votre numéro de téléphone, svp';
			montre('erreur');
			telephone.focus();
			return(false);
		}
		if(message.value=="")
		{
			texte_erreur.value='Saisissez vos motivations, svp';
			montre('erreur');
			message.focus();
			return(false);
		}
		if((victime.checked==false) && (proche.checked==false) && (professionnel.checked==false))
		{
			texte_erreur.value='Précisez "en tant que", svp';
			montre('erreur');
			victime.focus();
			return(false);
		}
		if(majeur.checked==false)
		{
			texte_erreur.value='Vous devez certifier que vous êtes majeur(e), svp';
			montre('erreur');
			majeur.focus();
			return(false);
		}
		action='inceste-groupe-inscription.php';
		CHOIX.value='envoi';
		cache('erreur');
		return(true);
	}
}

function verifEmail(mail) {
  var ret = true;
  var car = "";
  var carAfter = "";
  var carBefore = "";
  var nbrcar = mail.length;
  var nbrarobase = 0;
  var nbrpoint = 0;
  var goodcar = "@0123456789.-_abcdefghijklmnopqrstuvwxyz";
  for(cnt=0;cnt<nbrcar;cnt++) {
    var car = mail.substr(cnt,1);
    if(goodcar.indexOf(car) >= 0) {
      if(car == "@") {
        carAfter = "";
        carBefore = "";
        if((cnt-1) >= 0) {
          carBefore = mail.substr((cnt-1),1);
        }
        if((cnt+1)<nbrcar) {
         carAfter = mail.substr((cnt+1),1);
        }
        if(cnt>0 && nbrarobase==0 && cnt<(nbrcar-4) && !(carBefore==".") && ! (carAfter==".")) {
          nbrarobase++;
        } else {
         ret = false;
         break;
        }
      }
      if(car == ".") {
        if(cnt>0 && cnt<(nbrcar-2)) {
          nbrpoint++;
        } else {
          ret = false;
          break;
        }
      }
    } else {
      ret = false;
      break;
    }
  }
  if(nbrarobase == 0 || nbrpoint == 0) {
    ret = false;
  }
  return ret;
}