// BIBLIO JAVASCRIPT GENERALE - SITE EUREGIDE
// 22/09/2001 - Web Project (www.w-project.com)

function active(nom,t) {
	var n = self.document.images[nom],x='';
	if (n) {
		var img = n.src;
		if(t.charAt(0) == '=') t=t.substring(1);
		else {
			x=get(img,'name');
			var i=x.lastIndexOf('_');
			if(i>-1) x=x.substring(0, i+1);
		}
		n.src=get(img,'path') + x + t + '.' + get(img,'ext');
	}
}


var imgload=0;
var image=new Array;
function img_load(nom,t) {
	var n=self.document.images[nom],x='';
	if(n) {
		image[imgload]= new Image;
		var img = n.src;
		if(t.charAt(0) == '=') t=t.substring(1);
		else {
			x=get(img,'name');
			var i=x.lastIndexOf('_');
			if(i>-1) x=x.substring(0, i+1);
		}
		image[imgload].src= get(img,"path") + x + t + '.' + get(img,'ext');
		imgload++;
	}
}


function get(nom,t) {
	var n="", i=nom.lastIndexOf("."), j=nom.lastIndexOf("/");
	if(i==-1) i=nom.length;
	if (t=='path') n=nom.substring(0,j) + '/';
	else if(t=='fullname') n=nom.substring(j+1);
	else if(t=='name') n=nom.substring(j+1,i);
	else if(t=='ext') n=nom.substring(i+1);
	// -- élimine ? éventuel
	i=n.indexOf('?');
	if(i>-1) n=n.substring(0,i);
	return n;
}


function aff_date(t,l,ret) {
	var retdate="";
	var date=new Date();
	FixDate(date);	//fix a Mac OS bug
	a= date.getYear();
	if(a<1900) a+=1900;	//Netscape 4.06 bug
	a=a.toString();
	if(t==0) {
		var j,m,a;
		j= '0' + date.getDate().toString();
		j= j.substring(j.length-2);
		m= '0' + (date.getMonth()+1).toString();
		m= m.substring(m.length-2);
		a= a.substring(a.length-2);
		if(l=='fr') retdate= j + "/" + m + "/" + a;
		else if (l=='uk') retdate = m + "/" + j + "/" + a;
	}
	else if(t==1) {
		if(l=='fr') {
			var mois= new Array("Janvier", "Février", "Mars", "Avril", "Mai", "Juin", "Juillet", "Août", "Septembre", "Octobre", "Novembre", "Décembre");
			retdate= date.getDate() + " " + mois[date.getMonth()] + " " + a;
		}
		else if(l=='uk') {
			var mois= new Array("January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December");
			retdate= mois[date.getMonth()] + " " + date.getDate() + ", " + a;
		}
	}
	if(!ret) {
		document.write(retdate);
		retdate="";
	}
	return(retdate);
}

// -- Function to correct for 2.x Mac date bug.
function FixDate(date) {
	var base = new Date(0);
	var skew = base.getTime();	// dawn of (Unix) time - should be 0
	if (skew > 0)				// Except on the Mac - ahead of its time
	date.setTime(date.getTime() - skew);
}


function get_rpath(l,s) {
	var lf='';	//final relative path
	var j=s.indexOf('//');
	if(j>-1) s=s.substring(j+2);			//extract the initial http://

	//-- calculates relative address
	var i=0, j=0;
	var tadd=get_path(l,i),sadd;
	if(tadd) {	//target has an absolute path
		sadd=' ';
		while(sadd && tadd != sadd) {
			sadd=get_path(s,j);
			j+= sadd.length + 1
		}

		if(!sadd) j=0; else i+= tadd.length + 1;

		// -- extract common part of paths
		while(tadd && tadd==sadd) {
			tadd=get_path(l,i)
			sadd=get_path(s,j)
			if(tadd && tadd==sadd) {
				i+= tadd.length + 1;
				j+= sadd.length + 1;
			}
		}

		// -- add any required "../"
		while(sadd) {
			j+= sadd.length + 1;
			lf+= '../'
			sadd=get_path(s,j);
		}

	}
	lf+= l.substring(i);
	return lf;
}

//- get next path
function get_path(x,p) {
	var r='', i;
	while(x.charAt(p)=="/") p++;		//del. initial "/" or "//" (ex. : path from hdu)
	i=x.indexOf('/',p);
	if(i>-1) r=x.substring(p,i);
	return r;
}


var posit_pt=0;
function posit(name,x,y,txt) {
	if(!name) {
		name='xxx' + posit_pt.toString();
		posit_pt++;
	}
	if (document.all) {		//-- Explorer
		var t='<style type="text/css">\n';
		t+= '#' + name + ' {position:absolute;left:' + x + '; top:' + y;
		t+= ';margin:0;display:block}\n';
		t+= '</style>\n<table id="' + name + '" border="0" cellpadding="0" cellspacing="0">\n'
		t+= '<tr><td>' + txt + '</td>\n</tr></table>\n';
	}
	else if (document.layers) {	//-- Netscape
		var t='<layer name="' + name + '" left=' + x + ' top=' + y + ' visibility=show">\n';
		t+= txt + '\n</layer>\n';
	}
	document.write(t);
}