Utilisateur:Automatik/Utilisateurs-a-bienvenuter.js

/* Script qui permet de faire fonctionner la page [[Spécial:Utilisateurs à bienvenuter]]
Auteur : Quentinv57
Date de création : 2011-10-20
Dernière modification : 2011-10-21
*/
 
function loadPage() {
    var url = '//fr.wiktionary.org/w/index.php?title=Spécial:Utilisateurs_actifs&limit=5000&hidebots=1&hidesysops=1';
    var request = sajax_init_object() ;
    if (request == null) {
        return null;
    }  
    request.open('GET', url, true);
    request.onreadystatechange = function () {
        if(request.readyState==4) {
            parsePage(request);
        }
    };
    request.setRequestHeader('Pragma', 'cache=yes');
    request.setRequestHeader('Cache-Control', 'no-transform');
    request.send(null);
}
 
function parsePage(request) {
    var xml = request.responseText;
    var tmp = null;
    var text = '';
    if ( xml != null ) {
                if (m = xml.match(/Discussion utilisateur:([^"]+?) \(page inexistante\).*?<\/li>/g))
                {
                            var nb_users = 0;
                            for (var i=0; i < m.length; i++) {
                                tmp = m[i].match(/Discussion utilisateur:([^"]+?) \(page inexistante\).*?<\/li>/);
                                if (m[i].indexOf('bloqué') != -1) {
                                	continue;
                                } else {
                                	nb_users++;
                                	text += '<li>'+tmp[1]+' <span class="mw-usertoollinks">(<a href="/wiki/Discussion_utilisateur:'+tmp[1]+'" title="Discussion utilisateur:'+tmp[1]+'" class="new">discuter</a> | <a href="/wiki/Sp%C3%A9cial:Contributions/'+tmp[1]+'" title="Spécial:Contributions/'+tmp[1]+'">contributions</a> | <a href="/wiki/Sp%C3%A9cial:Bloquer/'+tmp[1]+'" title="Spécial:Bloquer/'+tmp[1]+'">bloquer</a>)</span></li>';
                                }
                            }
 
                            document.getElementById('bodyContent').innerHTML = '<br /><p>Cette page spéciale fournit une liste des utilisateurs qui ont fait au moins une contribution durant le dernier mois, et à qui il faut donc réserver un accueil chaleureux et proposer son aide, en fonction des contributions déjà faites.</p><p>La liste contient <strong>' + nb_users + '</strong> nouveaux utilisateurs : </p><ul>'+text+'</ul>';
                } else {
                            document.getElementById('bodyContent').innerHTML = '<br /><p>Cette page spéciale fournit une liste des utilisateurs qui ont fait au moins une contribution durant le dernier mois, et à qui il faut donc réserver un accueil chaleureux et proposer son aide, en fonction des contributions déjà faites.</p><p>La liste est actuellement <em>vide</em>.</p>';
                }
    }
}
 
if (wgPageName=="Spécial:Utilisateurs_à_accueillir")
{
    document.title = 'Liste des utilisateurs à bienvenuter - Wiktionnaire';
    document.getElementById('firstHeading').innerHTML = 'Liste des utilisateurs à bienvenuter';
    document.getElementById('bodyContent').innerHTML = '<br />Page en cours de chargement... Veuillez patienter...';
    loadPage();
}