Utilisateur:Quentinv57/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&username=&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\)/g))
                {
                            for (var i=0; i < m.length; i++) {
                                tmp = m[i].match(/Discussion utilisateur:([^"]+?) \(page inexistante\)/)
                                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>' +m.length+ '</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_à_bienvenuter")
{
    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();
}