<!--				

/*	Remarques quand à l'utilisation du script
		La fonction initialisation() doit impérativement être appelée après la création
		du formulaire html. Elle prend en parametre le nom du formulaire.
		
		Par ailleurs les noms de chaque bouton de balise doivent être différents, ils doivent
		impérativement commencer par "btn" et comporter	comme code javascript
		=> onClick="add_balise(this,numéro de la balise d'ouverture dans RM_tags,nom du textarea associé au bouton)"

	Dernière chose : on peut implémenter de nouvelles balises en les ajoutant simplement par paires
	dans le tableau RM_tags, avec pour conditions qu'elles souvrent avec [balise] et se ferment comme [/balise]
*/

	function initialisation(formulaire)
	{
	formu = formulaire;
	RM_tags = new Array("[b]","[/b]","[i]","[/i]","[u]","[/u]","[url]","[/url]","[img]","[/img]","[com]","[/com]");
	indics = new Array();    
	var j =0;
	var nb_buttons = 0;
	var nbelements = document.forms[formu].elements.length;
	while(j < nbelements)
		{
		var elem = document.forms[formu].elements[j];
		var finalname = elem.form.name + elem.name;
		if (elem.type == "textarea")
			{
			indics[finalname+"Stack"] = new Array();
			}
		else if(elem.type == "button" && elem.name.substr(0,3) == "btn")
			{
			indics[finalname]= new Boolean(false);
			}
		j++;
		}
	}
	
Array.prototype.recherche = function(valeur)
	{
	var i = 0; var g = this.length;
	while (i < g)
		{
		if (this[i] == valeur) break;
		else i++;
		}
		return i;
	}

function recupcode(ch)
	{
		ch = ch.substring(ch.indexOf(',')+1,ch.length-1);
		ch = ch.substring(0,ch.indexOf(','));
		return parseInt(ch);
	}

function add_balise(bou,btn,te)
//(this,3,'TEXTE')
{
	
	var clientPC = navigator.userAgent.toLowerCase(); // Get client info
	var clientVer = parseInt(navigator.appVersion); // Get browser version
	
	var is_ie = ((clientPC.indexOf("msie") != -1) && (clientPC.indexOf("opera") == -1));
	var is_nav = ((clientPC.indexOf('mozilla')!=-1) && (clientPC.indexOf('spoofer')==-1)
	&& (clientPC.indexOf('compatible') == -1) && (clientPC.indexOf('opera')==-1)
	&& (clientPC.indexOf('webtv')==-1) && (clientPC.indexOf('hotjava')==-1));
	var is_moz = 0;
	
	var is_win = ((clientPC.indexOf("win")!=-1) || (clientPC.indexOf("16bit") != -1));
	var is_mac = (clientPC.indexOf("mac")!=-1);

	
	var fo = bou.form.name;
	var nbtn = bou.name;
	var txtarea = document.forms[fo].elements[te];
	var tmpch = document.forms[fo].elements[nbtn];
	
	
if ((clientVer >= 4) && is_ie && is_win)
{
	
	theSelection = document.selection.createRange().text; // Get text selection
	
	if (theSelection)
	{
		// Add tags around selection
		document.selection.createRange().text = RM_tags[btn*2] + theSelection + RM_tags[btn*2+1];
		txtarea.focus();
		theSelection = '';
		return;
	}
}
else if (txtarea.selectionEnd && (txtarea.selectionEnd - txtarea.selectionStart > 0))
{
	mozWrap(txtarea, RM_tags[btn*2], RM_tags[btn*2+1]);
	return;
}
	
	if(indics[fo+nbtn])
	{
		txtarea.value += RM_tags[btn*2];
		txtarea.focus();

		indics[fo+nbtn]=false;
		indics[fo+te+"Stack"].push(nbtn);
	}else{
		while (indics[fo+te+"Stack"].length > 0)
		{
			var btn_crt = indics[fo+te+"Stack"].pop();
			var code = recupcode(new String(bou.form.elements[btn_crt].onclick));
			txtarea.value = txtarea.value + RM_tags[code*2+1];
			indics[fo+btn_crt] = true;
			tmpch2 = document.forms[fo].elements[btn_crt];
			//tmpch2.value = tmpch2.value.substring(0,(tmpch2.value.length)-2);
				if(btn_crt == nbtn)
				{
				break;
				}//if	
		}//while
	}//if
}

function verif()
	{
/*	var j=0;
	while(j < document.forms[formu].elements.length)
		{
			var elem = document.forms[formu].elements[j];
			if (elem.type == "textarea")
				{
				var tmpile = indics[elem.form.name + elem.name + "Stack"];
				while(tmpile.length > 0)
					{
					p = tmpile.pop();
					elem.value += RM_tags[recupcode(new String(elem.form.elements[p].onclick))*2+1];
					indics[elem.form.name+p] = true;
					elem.form.elements[p].value = elem.form.elements[p].value.substring(0,(elem.form.elements[p].value.length)-2);
					}
				elem.value = nettoyage(elem.value);
				}
			j++;
			}
*/	}


// Classe Balise
function Balise(nom,typeb,pos,taille)
	{
	this.nom = nom;						 // son nom
	this.typeb = typeb;					 // son type, ouverture(0) ou fermeture(1)
	this.pos = pos;						 // sa position dans la chaine du textarea
	this.taille = taille;				 // sa longueur
	}
	
Balise.prototype.equals = function(b)
	{
	return this.nom == b.nom && this.typeb == b.typeb;
	}

Balise.prototype.versus = function(b)
	{
	return (this.typeb == 1 && b.typeb == 0 && RM_tags[RM_tags.recherche(this.nom)-1] == b.nom)
	|| (this.typeb == 0 && (b.typeb == 1 || b.typeb == 3 )&& this.nom == RM_tags[RM_tags.recherche(b.nom)-1]);
	}

Balise.prototype.fille = function(b)
	{
	return this.nom != b.nom && this.typeb == b.typeb;
	}

function supp_balise(bal,dech,ch)
	{
	dechet += bal.taille;
	return ch.substr(0,bal.pos-dech) + ch.substring(bal.pos-dech + bal.taille,ch.length);
	}

function nettoyage(chaine)
	{
	if(chaine.length > 0)
		{
	var masque = "/(";
	var i_expreg = 0;
	var tags_taille = (RM_tags.length)/2;
	while(i_expreg < tags_taille)
		{
		masque += '\\' + RM_tags[i_expreg*2].substr(0,RM_tags[i_expreg*2].length-1) + "\\]|"
		+ '\\[\\/'+ RM_tags[i_expreg*2+1].substring(2,RM_tags[i_expreg*2+1].length-1) + "\\]|";
		i_expreg++;
		}
	masque = masque.substr(0,masque.length-1) + ")/g";
	tab = chaine.match(eval(masque));
		baltab = new Array();
		var pos_crt = 0;
		var l = 0;
		var taillet = tab.length;
			while(l < taillet)
			 {
				pos_crt = chaine.indexOf(tab[l],pos_crt);
				var typ = 0;
				if(tab[l].substring(1,2) == "/") {typ = 1;}
				baltab.push(new Balise(tab[l],typ,pos_crt,tab[l].length));
				pos_crt++;
				l++;
			 }
		var tailletab = baltab.length;
		var d = 0;
		dechet = 0;
		while(d < tailletab)
			{
			var found = false;
			var found2 = false;
			if(baltab[d].typeb == 0)
				{
				var dist = baltab[d].pos + baltab[d].taille;
				var f = d+1;
				while(f < tailletab)
					{
					if(baltab[d].versus(baltab[f]))
						{
						if(dist < baltab[f].pos)
							{
							found = true;
							baltab[f].typeb = 3;
							}
						break;
						}
					if(baltab[d].equals(baltab[f]))
						{
						baltab[f].typeb = 2;
						}
					if(baltab[d].fille(baltab[f]))
						{
						var k = f+1;
						if(k < tailletab)
							{
							var dist2 = baltab[f].pos + baltab[f].taille;
							while(k < tailletab && !baltab[d].versus(baltab[k]))
								{
								if(baltab[f].versus(baltab[k]))
									{
									if(dist2 < baltab[k].pos)
										{
										found2 = true;
										baltab[k].typeb = 3;
										}
									break;
									}
								dist2 += baltab[k].taille;
								k++;
								}
							}
						if(!found2)
							{
							baltab[f].typeb = 2;
							}
						}
					dist += baltab[f].taille;
					f++;
					}
				if(!found)
					{
					chaine = supp_balise(baltab[d],dechet,chaine);
					}
				}
			else if(baltab[d].typeb == 1 || baltab[d].typeb == 2 )
				{
				chaine = supp_balise(baltab[d],dechet,chaine);
				}
			d++;
			}
		  }
	return chaine;
	}
	
	
function mozWrap(txtarea, open, close)
{
	var selLength = txtarea.textLength;
	var selStart = txtarea.selectionStart;
	var selEnd = txtarea.selectionEnd;
	if (selEnd == 1 || selEnd == 2) 
	selEnd = selLength;
	
	var s1 = (txtarea.value).substring(0,selStart);
	var s2 = (txtarea.value).substring(selStart, selEnd)
	var s3 = (txtarea.value).substring(selEnd, selLength);
	txtarea.value = s1 + open + s2 + close + s3;
	return;
}