//= 0) { // différentes.
resultat += s.substring(i1+1,i2) + remplace_point();
i1 = i2;
i2 = s.indexOf('.', i2+1);
}
resultat += s.substr(i1+1);
return resultat;
} else {
i = invalides.charAt(h(invalides.length));
while (s.indexOf(i) >= 0) i = invalides.charAt(h(invalides.length));
return s.replace(/\./g,i) + ".replace(/\\"+i+"/g,\".\")";
}
}
// L'entrée dans cette fonction doit être une expression JavaScript valide, donc si c'est une simple
// chaîne elle doit avoir des apostrophes.
function code_arrobas_point_JS(s) {
var s = code_point_JS(s);
var po = '', pf = '', i;
if (h(7) < 6) { // remplacement de l'arrobas sans replace
var liste = s.split('@'); // Détour nécessaire pour que les @
s = liste[0]; // ne soient pas tous remplacés pareil.
for (i = 1; i < liste.length; i++) s += remplace_arrobas() + liste[i]; // Avec replace et join ça va pas.
if (s.indexOf('.replace') >= 0) s = '(' + s + ')';
} else {
i = invalides.charAt(h(invalides.length)); // avec replace
while (s.indexOf(i) >= 0) i = invalides.charAt(h(invalides.length));
if (s.indexOf('+') >= 0) { po = '('; pf = ')' };
return po + s.replace(/@/g,i) + pf + ".replace(/\\"+i+"/g,\"@\")";
}
return s;
}
function code_arrobas_point_HTML(s) {
var zero = '00000'; // Quelques zéros
switch(h(2)) {
case 0 : s = s.replace(/@/g,'&#'+zero.substr(h(6))+'64;'); break;// On ajoute des 0, 5 maximum à cause d'IE.
case 1 : s = s.replace(/@/g,'&#x'+zero.substr(h(5)+1)+'40;'); break; // Ici 4 zéros maxi. ( 0 <= h(5) <= 4 )
}
switch(h(2)) {
case 0 : return s.replace(/\./g,'&#'+zero.substr(h(6))+'46;');
case 1 : return s.replace(/\./g,'&#x'+zero.substr(h(5)+1)+'2e;');
}
}
//-------- bug d'Opera 6 sur les RegExp avec des anti-slashes ; corrigé dans Opera 7 -----------
// Cette RegExp détecte si une chaîne se termine par un nombre impair d'anti-slashes et une apostrophe.
if ((navigator.appName == 'Opera') && (parseFloat(navigator.appVersion) <= 6.05)) {
re_apostrophe = new RegExp("([^\\\\\\])(\\\\\\\\)*\\\\'", 'g');
} else {
re_apostrophe = /([^\\])(\\\\)*\\'/g;
}
// Prend une chaîne contenant une chaine JS, genre "'coucou l\\'artiste'", et la convertit en chaîne
// normale, ici "coucou l'artiste" -> suppression des apostrophes de début et de fin, des doubles-anti-slashes
// et des \'.
function decortique(s) {
return s.substr(1,s.length-2).replace(/\\\\/g,'\\').replace(re_apostrophe,"$1'");
}
// Codage d'une chaîne (courte) avec String.fromCharCode. La chaîne attendue est entre apostrophes.
function fromcharcode(s) {
s = decortique(s);
var c, n, m, p;
var liste = [];
for (var i = 0; i < s.length; i++) {
c = s.charCodeAt(i);
switch (h(5)) {
case 0 : liste[i] = c; break; // Code ASCII tel quel.
case 1 : liste[i] = '0x'+c.toString(16); // Code ASCII en hexa.
break;
case 2 : n = Math.floor(Math.random()*100); // Exprime le code ASCII sous forme d'une addition.
liste[i] = (c-n) + '+' + n;
break;
case 3 : n = Math.floor(Math.random()*100); // Exprime le code ASCII sous forme d'une soustraction.
liste[i] = (c+n) + '-' + n;
break;
case 4 : n = Math.floor(Math.random()*10); // Exprime le code ASCII sous la forme n*m+p.
m = Math.floor(Math.random()*10);
p = c - n*m;
liste[i] = n + '*' + m + ((p > 0) ? '+'+p : '-'+(-p));
break;
}
}
return 'String.fromCharCode('+liste.join(',')+')';
}
// Liste de caractères qu'on peut ajouter au hasard. Ils ne doivent pas être des caractères spéciaux des
// expressions régulières.
liste = ' !#%&,-0123456789:<=>ABCDEFGHIJKLMNOPQRSTUVWXYZ_abcdefghijklmnopqrstuvwxyz~';
function brouille_chaine(s) { // Chaîne JS avec des guillemets
var nb = 0;
var codage_special = []; // Cas spécial : les caractères codés genre \x40.
var i = 0;
var j;
while ((j = s.indexOf('\\',i)) >= 0) { // Il ne faut pas insérer de caractères entre
if (s.charAt(j+1) == 'u') { // le \ et le 0. Donc on remplace ces caractères
codage_special[nb] = '\\u'+s.substr(j+2, 4); // temporairement par \u, et on mémorise
s = s.substr(0,j+2) + s.substr(j+6); // leur code.
nb++;
i = j + 2;
}
else if (s.charAt(j+1) == 'x') {
codage_special[nb] = '\\x'+s.substr(j+2, 2);
s = s.substr(0,j+1) + 'u' + s.substr(j+4);
nb++;
i = j + 2;
}
else i = j + 1;
}
var cs = codage_special.join();
if (s.length < 5) return fromcharcode(s); // au moins 3 caractères + les guillemets
var j = liste.charAt(h(liste.length));
while ((s.indexOf(j) >= 0) // Choisit un caractère inutilisé dans s
|| (cs.indexOf(j) >= 0)) j = liste.charAt(h(liste.length)); // et dans codage_special.
var n = Math.min(2+h(4), s.length-2); // On insère 2 à 5 fois ce caractère.
var p;
for (var k=0; k 0) { // On recode les caractères spéciaux.
nb--;
k = s.lastIndexOf('\\u', k-1);
s = s.substr(0,k) + codage_special[nb] + s.substr(k+2);
}
// On choisit une façon d'exprimer la chaîne nulle (sans apostrophes, c'est important).
var nulle;
switch(h(3)) {
case 0 : nulle = '""'; break;
case 1 : nulle = '[""][0]'; break;
case 2 : nulle = '"'+String.fromCharCode(65+Math.random()*26)+'".substr(1)'; break;
}
return s+".replace(/"+j+'/g,'+nulle+')';
}
//-------- bug d'Opera sur les RegExp avec des anti-slashes -----------
// Cette RegExp détecte si une chaîne se termine par un nombre impair d'anti-slashes et une apostrophe.
if ((navigator.appName == 'Opera') && (parseFloat(navigator.appVersion) <= 6.05)) {
re_chaine = new RegExp("[^\\\\\\](\\\\\\\\)*\\\\$");
} else {
re_chaine = /[^\\](\\\\)*\\$/;
}
// La chaîne d'entrée s représente une expression JavaScript valide, en principe composée de plusieurs
// chaînes entre apostrophes, séparées par des instructions.
// Appelle la fonction "brouille_chaine", qui insère des caractères aléatoires.
function brouille_JS(s) {
var liste = s.split("'"); // On sépare au niveau des apostrophes.
var ch;
var brouillee = '';
var i = 0;
while (i < liste.length-1) {
ch = "'";
brouillee += liste[i]; // On ne code pas ce qu'il y a entre les chaînes.
i++;
while ((' '+liste[i]).search(re_chaine) >= 0) ch += liste[i++]+"'"; // On raboute quand une ' est précédée d'un
ch += liste[i++] + "'"; // nombre impair d'anti-slashes.
brouillee += brouille_chaine(ch);
}
return brouillee + liste[liste.length-1]; // On ne code pas ce qu'il y a après les chaînes.
}
//========== Transforme du texte en une chaîne JavaScript. =========
function to_JS_string(s) {
return "'" + s.replace(/\\/g, '\\\\').replace(/[\n\r]/g,' ').replace(/'/g,"\\'") + "'";
}
//========== Mélange les caractères d'une chaîne ==========
function scramble(s) {
var t = s.split('');
var r = '';
var c;
while(t.length) {
c = Math.floor(Math.random() * t.length);
r += t.splice(c, 1);
}
return r;
}
//========== Différentes fonctions de chiffrement du code JavaScript
// table normale base64 = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/';
var base64 = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789*-';
var nb_retournements = 0;
var nb_base64 = 0;
function chiffre(s, force) {
// Cas du ROT-n : on teste la présence de caractères > 126 ou < 32, qui ne passent pas.
var num_chiffre;
if(typeof(force) == 'undefined') {
do (num_chiffre = h(5));
while (((nb_retournements > 0) && (num_chiffre == 0)) || // 1 retournement maximum (ça refait du clair)
((passes <= 2) && (num_chiffre == 4)) || // hexa seulement pour les fous
((nb_base64 > 0) && (num_chiffre == 3))); // et 1 base64 maximum (question de longueur)
} else {
num_chiffre = force;
}
switch(num_chiffre) {
// Retournement par blocs de longueur aléatoire. (97 octets + la chaîne codée)
case 0 : nb_retournements++;
var taille = 20 + h(31); // blocs de 20 à 50 caractères.
var code = '';
for(i = 0; i < s.length; i += taille) code += s.substr(i,taille).split("").reverse().join("");
return 'var s="' + code.replace(/\\/g,'\\\\').replace(/"/g,'\\"') +'";d="";'
+ 'for(var i=0;i 126 ou < 32
if ((s.charCodeAt(i) > 126) || (s.charCodeAt(i) < 32)) {
s2 += '\\x' + s.charCodeAt(i).toString(16);
} else s2 += s.charAt(i);
s = s2;
var co = '';
for (var i=0; i>> 18) & 63) + base64.charAt((bits >>> 12) & 63) +
base64.charAt((bits >>> 6) & 63) + base64.charAt((bits >>> 0) & 63);
}
if (padding) txt = txt.substr(0, txt.length-padding) + (base64.charAt(0)+base64.charAt(0)).substr(0,padding); // Complète avec des #
return 'var t="'+base64+'",d="",b,s="'+txt+'";'
+ 'for(var i=0;i<'+txt.length+';i+=4){b=(t.indexOf(s.charAt(i))<<18)|'
+ '(t.indexOf(s.charAt(i+1))<<12)|(t.indexOf(s.charAt(i+2))<<6)|t.indexOf(s.charAt(i+3));'
+ 'd+=String.fromCharCode(b>>>16,(b>>>8)&255,b&255)};eval(d.substr(0,'+l+'))';
// Hexadécimal
// Codage +/- abandonné car trop long : il multiplie au moins par 2 la taille du code entré.
case 4 : var c, co = '';
for (var i=0; i ';
}
//============ Différentes façons de créér un lien en JavaScript
function cree_lien_JS(a, t) {
// éventuellement, dans le sujet on filtre les apostrophes, les guillemets et les antislashes.
// Les guillemets sont interdits à cause qu'ils sont utilisés dans la balise href="", quant à
// l'apostrophe c'est parce qu'après ça complique sévèrement le brouillage (l'apostrophe sert
// de délimiteur de chaînes, et c'est plus chiant s'il y en a aussi dans les chaînes).
var sujet = (document.forms['frm'].sujet.value) ? '?Subject='+document.forms['frm'].sujet.value.replace(/'/g,'%27').replace(/"/g,'%22').replace(/\\/g, '%5c') : '';
var css = (document.forms['frm'].css.value) ? ' class="'+document.forms['frm'].css.value+'"' : '';
var adresse = code_arrobas_point_JS("'"+a+"'");
return '\'' + code_arrobas_point_HTML(t) + '\'';
/*
return '\'' + code_arrobas_point_HTML(t) + "<"+"/a>'";
*/
}
//=========== Affiche l'aperçu dans une petite fenêtre
var fenetre;
function apercu(area) {
fenetre = window.open ('','','width=200,height=100,resizable=yes,'
+ 'scrollbars=yes,toolbar=no,directories=no,location=no,status=no,menubar=no');
fenetre.document.write('