var base_url="http://www.";
//var base_url="http://localhost/";
var local_id_page="";
var local_op="";
var lock_var=false;
var search_elt_name="";
var backup_search_code=new Array();
var tab_url_search=new Array();
tab_url_search["campusvert"]=base_url+"campusvert.org/index.php";
tab_url_search["cyberads"]=base_url+"cyber-ads.net/search.php";
tab_url_search["ducamer"]=base_url+"ducamer.com/search.php";
tab_url_search["anuel_actu"]=base_url+"anuel.cm/actu/search/index.php";
tab_url_search["anuel_search"]=base_url+"anuel.cm/search/index.php";


function is_empty(elt,default_value)
{

if( (elt==null) || (elt==undefined)	|| (elt.value=="") || (elt.value=="000_000") )
{
	return true;
}
else
{

 if( (default_value!=undefined)&&(default_value!=null) )
 {
	

	cond1=(elt.value==default_value); 

 }
   else cond1=false;
  
	return cond1;

}

}

function is_null(elt)
{

if( (elt==null) || (elt==undefined)	)
{
	return true;
}
else
{

  cond1=false;
  
	return cond1;

}

}



function fncouriel(classe,user,host,cuser,chost,sbj,tag) {
eml= "<a  class=" + classe +" href=mailto:" + user +"@" + host;
if ((cuser!=="")||(sbj!=="")) eml=eml + "?";
if (cuser!=="") eml=eml + "CC=" + cuser + "@" + chost;
if ((cuser!=="")&&(sbj!=="")) eml=eml + "&";
if (sbj!=="") eml=eml + "Subject=" + sbj;
eml=eml + ">";
(tag=="")? eml=eml + user +"@" + host: eml=eml + " " + tag;
eml=eml + "</a>";
document.write(eml);
}


function set_local_id_page(id_page,op)
{
	local_id_page=id_page;
	local_op=op;
}

function get_objet(var_name)
{
	if(document.all)
{
var elt    = document.all[var_name];
}
else
{
var elt    = document.getElementById(var_name);
}

return elt;

}
function Demarrage(url,Quid){
  Quid.style.behavior='url(#default#homepage)';
  Quid.setHomePage(url);
}

function getRadioVal(rb)
{
	var L=rb.length;var ret="";
for (var i = 0 ; i< L ; i++)
{if(rb[i].checked) {ret=rb[i].value;break;}}
if(i== L)ret=rb[0].value;
return(ret);
}

//text, password, hidden, textarea, file
function getTextVal(tf)
{var ret=tf.value;
return(ret);
}

//checkbox
function getCheckboxVal(cb)
{var L=cb.length;var ret='';
for (i = 0; i < L; i++)
{if (cb[i].checked==true) {ret += cb[i].value + '\n';}}
return(ret);
}

//select
function getSelectVal(sel)
{var ret='';
ret=sel.options[sel.selectedIndex].text;
return(ret);
}

function IsDate(JJ, MM, AAAA)
{if(JJ<1||JJ>31||MM<1||MM>12) return false;
if(MM==2)
{if(JJ==30||JJ==31) return false;
  if(JJ==29) return ((AAAA%4==0&&AAAA%100!=0)||AAAA%400==0);
}
else if(JJ==31) return !(MM==4||MM==6||MM==9||MM==11);
return true;
}

function Format_Tel(NumTel){
  var Tel;
  var i = 0;
  var space=" ";
  while (i < NumTel.length-1)
    {
    if ((NumTel.charAt(i) == ".")||(NumTel.charAt(i) == ",")||(NumTel.charAt(i) == "/")||(NumTel.charAt(i) == "-") || (NumTel.charAt(i) == "(") || (NumTel.charAt(i) == ")") )
      {
		  if(NumTel.charAt(i) == "(") space="";else space=" ";
      Tel = NumTel.substring(0,i) + space+ NumTel.substring(i+1,NumTel.length);
          NumTel = Tel; 
      }
      else
	  {
      i++;
	  }
	  
      
    }
  return (NumTel);
}   


function IsEMail(emailStr,model)
{
	
	switch(model)
	{
		case 2 :
	  var verif   = /^[a-zA-Z0-9_-]+@[a-zA-Z0-9-]{2,}[.][a-zA-Z]{2,3}$/;
        return (verif.exec(email) != null);
		case 1 :
	 var reg = /^[a-zA-Z0-9._-]+@[a-zA-Z0-9._-]{2,}[.][a-zA-Z0-9]{2,4}$/;
     var reg2 = /[.@]{2,}/;
     return ((reg.exec(email)!=null) && (reg2.exec(email)==null));
	 default :
	var validDomain=false;
var AtPos = emailStr.lastIndexOf("@");
var DotPos= emailStr.lastIndexOf(".");
if((AtPos>0)&&(DotPos>0)&&(AtPos<DotPos))
{var domainExtList='ac.ad.ae.af.ag.ai.al.am.an.ao.aq.ar.as.at.au.aw.az.ba.bb.bd.be.bf.bg.bh.bi.bj.bm.bn.bo.br.bs.bt.bv.bw.by.bz.ca.cc.cd.cf.cg.ch.ci.ck.cl.cm.cn.co.cr.cs.cu.cv.cx.cy.cz.de.dj.dk.dm.do.dz.ec.ee.eg.eh.er.es.et.fi.fj.fk.fm.fo.fr.fx.ga.gb.gd.ge.gf.gg.gh.gi.gl.gm.gn.gp.gq.gr.gs.gt.gu.gw.gy.hk.hm.hn.hr.ht.hu.id.ie.il.im.in.io.iq.ir.is.it.je.jm.jo.jp.ke.kg.kh.ki.km.kn.kp.kr.kw.ky.kz.la.lb.lc.li.lk.lr.ls.lt.lu.lv.ly.ma.mc.md.mg.mh.mk.ml.mm.mn.mo.mp.mq.mr.ms.mt.mu.mv.mw.mx.my.mz.na.nc.ne.nf.ng.ni.nl.no.np.nr.nt.nu.nz.om.pa.pe.pf.pg.ph.pk.pl.pm.pn.pr.ps.pt.pw.py.qa.re.ro.ru.rw.sa.sb.sc.sd.se.sg.sh.si.sj.sk.sl.sm.sn.so.sr.st.su.sv.sy.sz.tc.td.tf.tg.th.tj.tk.tm.tn.to.tp.tr.tt.tv.tw.tz.ua.ug.uk.um.us.uy.uz.va.vc.ve.vg.vi.vn.vu.wf.ws.ye.yt.yu.za.zm.zr.zw.com.edu.gov.int.mil.net.org.biz.pro.info.aero.name.coop.arpa.nato.museum.mobil.EoF';
  var domainExt=domainExtList.split(".");
  var emailExt=emailStr.substr(DotPos+1);
  emailExt=emailExt.toLowerCase();
  for(i=0;domainExt.length;i++)
  {if (domainExt[i]=='EoF')  break; //infinite loop else
   if (emailExt==domainExt[i])  {validDomain=true;break;}
  }
}
return(validDomain);

	}
	
	
}

function IsNumberString(NumStr)
{var regEx=/^[0-9]+$/;
var ret=false;
if (regEx.test(NumStr)) ret=true;
return ret;
}



function IsAlphaNumString(NumStr)
{var regEx=/^[A-Za-z0-9]+$/;
var ret=false;
if (regEx.test(NumStr)) ret=true;
return ret;
}

function IsAlphaString(NumStr)
{var regEx=/^[A-Za-z]+$/;
var ret=false;
if (regEx.test(NumStr)) ret=true;
return ret;
}

function isCreditCard(st) {
  // Encoding only works on cards with less than 19 digits with Luhn mod-10
  if (st.length > 19) return (false);
  sum=0;mul=1;l=st.length;
  for(i=0;i<l;i++)
  {digit = st.substring(l-i-1,l-i);
   tproduct = parseInt(digit ,10)*mul;
   if (tproduct >= 10)
    sum += (tproduct % 10) + 1;
   else
    sum += tproduct;
   if (mul == 1)
    mul++;
   else
    mul--;
  }
  if ((sum % 10) == 0)
   return (true);
  else
   return (false);
}

function isVisa(cc)
{if(((cc.length==16)||(cc.length==13))&&(cc.substring(0,1)==4)) return isCreditCard(cc);
return false;
}

function isMasterCard(cc)
{firstdig = cc.substring(0,1);
seconddig = cc.substring(1,2);
if((cc.length==16)&&(firstdig==5)&&((seconddig>=1)&&(seconddig<=5))) return isCreditCard(cc);
  return false;
}

function isAmericanExpress(cc)
{firstdig = cc.substring(0,1);
seconddig = cc.substring(1,2);
if((cc.length==15)&&(firstdig==3)&&((seconddig==4)||(seconddig==7))) return isCreditCard(cc);
  return false;
}

function isAnyCard(cc)
{if(!isCreditCard(cc)) return false;
if(!isMasterCard(cc) && !isVisa(cc) && !isAmericanExpress(cc)) return false;
return true;
}


function url_correct(url)
{
return format_url(url)	;
}

function submit_page(action_page,id_page,target)
{
	if((action_page!="")&&(action_page!="anuel.cm")&&(action_page!="anuelcm"))
{
	document.f.action=action_page;
}
	document.f.target=target;	
	document.f.submit();
           
init_page();

/*
for(i=0;i<document.forms.length;i++)
{

//alert(document.forms[i].name);
for(j=0;j<document.forms[i].elements.length;j++)
{
//alert(document.forms[i].elements[j].name)
}

}
*/
	
}

function init_page(id_page,op)
{
/*document.f.target="_self";	
document.f.action="";
alert('init page ');
*/

set_var('id_page',local_id_page);
set_var('op',local_op);
lock_var=false;
if(get_element('syno_search')!=null )
{
	//set_var('syno_search',backup_search_code[search_elt_name]);
}

}


function set_var_page(page_name,op)
{
}

function set_var(var_name,valeur)
{

elt=get_objet(var_name);
if(!is_null(elt) ) elt.value=valeur;	

}
function get_var(elt_var)
{
	elt=get_element(elt_var);
	if(!is_empty(elt_var))return elt.value;
	else return "";
}

function sf(var_name)
{
	elt=get_objet(var_name);
	elt.focus();
}




function set_option_search()
{

var find_mode    =get_objet('find_mode');
var meta    = get_objet('format_search');


var valeur_default = '';
var nbre_elt = 0;

if(is_empty(find_mode))
{


if(!is_null(meta))
{
nbre_elt = meta.length;
valeur_default= getRadioVal(meta);

}

else
{
var tmp;
var counter = 0;
var default_value = '';

for(i=1;i<=5;i++)
{

tmp = document.getElementById("format_search"+i);
if(!is_null(tmp))
{
if(tmp.checked) valeur_default= tmp.value;
counter ++ ;

if(counter==1) default_value = tmp.value;
}

}

if(valeur_default=='')valeur_default = default_value;

nbre_elt = counter;

}



set_var('find_mode',valeur_default);


}

//alert('find option search ==='+get_var('find_mode'));

}


//alert(' file only godd ');

function site_search(on_error_message,target,site_of_search)
{
	



	if(tab_url_search[site_of_search]!=undefined)
{
	site_of_search=tab_url_search[site_of_search];
}
else
{
	site_of_search="anuel_search";
        site_of_search=tab_url_search[site_of_search];
}


var text_search    = get_objet('text_search');


set_option_search();


condition=((text_search.value!="")&&(text_search.value.length>1));
if(condition)
  {
 

   affiche_page(site_of_search,'search','op','',target);

  }
  else
  {
   alert(on_error_message);
  }; 
 
}

function stripOutChars (InString) {
	RefString="1234567890x_"
	OutString=""
	for (Count = 0; Count < InString.length; Count++) {
		TestChar = InString.substring (Count, Count+1)
		if (RefString.indexOf(TestChar )!= -1)
			OutString = OutString + TestChar
	}
	return (OutString)
}

function format_url(url)
{
url=url.toLowerCase();
re=/^((http|ftp|https):\/\/)?([0-9a-z_\/]+[\.\-])+[0-9a-z]+(\/[0-9a-z_]+)*(\/[0-9a-z_]+\.[0-9a-z]+)?$/;
cond1= (re.exec(url)!=null);

if(cond1)
{
re=/^((http|ftp):\/\/)/;
cond2= (re.exec(url)!=null);
if(cond2)return url;
else return "http://"+url;
	
}
else
{
	return "#";
}

}

//alert('new change');

function is_an_code_id(value)
{

var cond1=false;
var len=0;
var reg='';

if(value=="")return false;
check_in_order=true;

elt=get_objet(search_elt_name);
if(is_null(elt))return false;

if((backup_search_code[search_elt_name]=="")||(backup_search_code[search_elt_name]==undefined) || (elt.value != backup_search_code[search_elt_name] ) )
{

backup_search_code[search_elt_name]=elt.value;
if(is_empty(elt))return false;

}
else
{
	set_var(search_elt_name,backup_search_code[search_elt_name]);

}


	val=elt.value.split("###");
backup_search_code["syno_search"]=get_var("syno_search");

//alert('syno val==='+val[0])




if( (elt.selectedIndex==undefined) || (elt.selectedIndex==null) )
{
	if( (val[1]!=undefined) && (val[1]!="") )
	{
		syno=val[1].toLowerCase();

		

		//set_var("syno_search",val[0]);
	}
	else
	{
		return false;
	}
}
else
{
syno=elt.options[elt.selectedIndex].text.toLowerCase();
}

//alert(syno)
maxlen=0;
minlen=2;



switch(syno)
{
case "" : return false;
case "design" : 
case "pays" : 
case "b.p" : 
minlen=2;

check_in_order=false;

reg= /(.)\1{3,}/;
cond1=(reg.exec(value)==null);

alert('cond1=='+cond1);
break;

case "tel" : 
case "telex" : 
case "fax" :
maxlen=20;
minlen=7;
reg= /^[\d|\s|\-|\.|\(|\)]+$/;
//reg= /\(?\d{3}\)?([-\/\.])\d{3}\1\d{4}/;
value=Format_Tel(value);
set_var("anuel_code_id",value);
cond1= (reg.exec(value)!=null);
break;

case "email" :
cond1=IsEMail(value,0);
break;

case "url" :
case "siteweb" :
re=/^((http|ftp):\/\/)?([0-9a-z_]+[\.\-])+[0-9a-z]+(\/[0-9a-z_]+)*(\/[0-9a-z_]+\.[0-9a-z]+)?$/;

cond1= (re.exec(value)!=null);


break;
case "anuel idn": 
{
code_pays=237;
if(value.indexOf(code_pays+"_")==-1)value=code_pays+"_"+value;
set_var('text_search',value);

	cond1= (value==stripOutChars (value))
	if(!cond1)alert("Code ID Incorrecte");
}
break;

case "anuel ida": 
{
code_pays="cm";
if(value=="")return false;
if(value.indexOf(code_pays+"_")==-1)value=code_pays.toUpperCase()+"_"+value;
set_var('text_search',value);
reg= /(.)\1{3,}/;
cond1=(reg.exec(value)==null);

}
break;

default : return false;
}


//value==stripOutChars (value)

len=value.length;

//alert('long == '+len);

if(maxlen>0)cond1=(cond1 && (len<maxlen) );

//alert('cond 1 == ' +cond1);

cond1=(cond1 &&	(value!="")&&(len>=minlen) );

//alert('cond 1 == ' +cond1);

//alert('retour codeid==== ' + get_var('syno_search'));

//alert('cond 1 == ' +cond1);

return (cond1);

}

function site_search_id(on_error_message,target,site_of_search)
{


if(tab_url_search[site_of_search]!=undefined)
{
	site_of_search=tab_url_search[site_of_search];
}
else
{
	site_of_search="anuel_search";
        site_of_search=tab_url_search[site_of_search];
}

var text_search    = get_objet('text_search');

set_option_search();	

var condition = false;

condition=(is_an_code_id(text_search.value));

//alert('condition==' + condition );
if(condition)
  {


   affiche_page(site_of_search,'search','op','',target);

  }
  else
  {
   alert(on_error_message);
  }; 
 
}


function process_keypress(objet,type,valeur,error_message,site_of_search) { 
if (window.event.type == "keypress" && window.event.keyCode == 13)
{
 set_domain_search(objet,type,valeur,error_message,site_of_search)
 return false;
}

} 


function process_keypress_id(objet,type,valeur,error_message,site_of_search) { 
if (window.event.type == "keypress" & window.event.keyCode == 13)
{
 set_domain_search_id(objet,type,valeur,error_message,site_of_search)
 return false;
}

} 


function test_search(objet,type,error_message,target,site_of_search)
{


set_var('text_search',objet.value);

set_var('type_search',type);

site_search(error_message,target,site_of_search)
}

function test_search_id(objet,type,error_message,target,site_of_search)
{

set_var('text_search',objet.value);

set_var('type_search',type);

site_search_id(error_message,target,site_of_search)
}

//alert(' second new ');
function set_domain_search(objet,type,valeur,error_message,site_of_search)
{
target="Anuel_Search";
temp=type.split("___");
val_text="";

//alert('site of search==='+site_of_search);
if( (type!='') &&(type!="all") && (temp[0]!="in_search")  )
{


var objet1    = get_objet(type);


val_text=objet1[objet1.selectedIndex].value+"___C___"+objet1[objet1.selectedIndex].text;

}

if(temp[0]=="in_search")
{
	type=temp[1];
	target="_self";
	
}
else if(type=='')
{
	type='all';
}
val_op=valeur+val_text;

set_var("table_search",val_op);


test_search(objet,type,error_message,target,site_of_search);

}

function set_domain_search_login(objet,type,valeur,error_message,site_of_search)
{
search_elt_name="syno_search_login";
lock_var=true;
set_domain_search_id(objet,type,valeur,error_message,site_of_search);
}

function set_domain_search_id(objet,type,valeur,error_message,site_of_search)
{
	if(!lock_var)
	{
		search_elt_name="syno_search";
		lock_var=true;
	}
target="Anuel_Search";
temp=type.split("___");
val_text="";


if((type!='') && (type!="all") && (temp[0]!="in_search") )
{


var objet1    = get_objet(type);


val_text=objet1[objet1.selectedIndex].value+"___C___"+objet1[objet1.selectedIndex].text;

}

if(temp[0]=="in_search")
{
	type=temp[1];
	target="_self";
	
}
val_op=valeur+val_text;


set_var("table_search",val_op);


test_search_id(objet,type,error_message,target,site_of_search);

}



function init_search(valeur)
{
set_var("keywords",valeur);
set_var("keywords1",valeur);
}


function research(table_search,type,text_search,debut,fin,error_message)
{

champ_recherche=get_objet("keywords");
set_var("keywords",text_search);
set_var("keywords1",text_search);
set_var("debut",debut);
set_var("fin",fin);
set_var("table_search",table_search);


test_search(champ_recherche,type,error_message,"_self","anuelcm");


}

function view_page(url,code_iso,texte_search,name_table,designant)
{

set_var("table_id",code_iso);

set_var("redirect_url",url);

set_var("table_name",name_table);

set_var("text_search",texte_search);

set_var("designant",designant);



affiche_page('anuel.cm',"view_result_search","op","","view_result");

}

function affiche_url(action_page,path,objet,rubrique)
{

url=path+objet[objet.selectedIndex].value;
set_var('table_search',rubrique);
set_var('info_bar',url);
page_name="";
submit_page(action_page,page_name)

}




function affiche_page(action_page,id_page,vars,value,target)
{
if( (vars!="") && (vars!=undefined) )
	{
temp_var=vars.split("___");
	temp_value=value.split("___");
	len=temp_var.length;
	}
	else
	{
		len=0
	}
	
	for(i=0;i<len;i++)
	{
		
		set_var(temp_var[i],temp_value[i]);
		
	}
if(id_page=="")id_page=local_id_page;

    set_var('id_page',id_page);
	
	if( (id_page=="")||(id_page=="home") )
	{
		if(target!="_self")target="_anuel";
	}
	submit_page(action_page,id_page,target);


}


function open_screen(path,type_screen,groupe_info,designant,code_id)
{
	
var url=path+"screen/view_screen.php?path="+path+"&type_screen="+type_screen+"&id_code="+code_id+" & designant="+designant+" & groupe="+groupe_info;


var taille = new Array(450,300);
window.open(url,"view_screen",'weigth=toolbar=no,scrollbars=no,resizable=no, width='+taille[0]+', height='+taille[1]+''); 

	
}