Developers of Sympa

[Fil <address@concealed>]

Hi everybody,

Could we plug-in another password generator? These INITe0dbcff2 are just
plain horrible. I fancy this one for instance : gabozu12 (see procedure
below)

The file to modify is wwsympa/wws-lib.pl ; the sub new_passwd() part.

(By the way, moderators: I'd like to modify my email address on
listes.cru.fr/wws/ but the password reminder won't send me my password.)


###########################################################################
# Generates a random 8 char password, that hopefully will be pronouncable
#
sub selectRandomChar()
{
        local ($string) = @_;

        return substr($string, (int rand(32767)) % length($string), 1);
}
sub new_password()
{
        local $consonants = "bcdfghjklmnprstvwxyz";
        local $vowels = "aeiou";

        local $result;
        $result .= selectRandomChar($consonants);
        $result .= selectRandomChar($vowels);
        $result .= selectRandomChar($consonants);
        $result .= selectRandomChar($vowels);
        $result .= selectRandomChar($consonants);
        $result .= selectRandomChar($vowels);
        $result .= int rand(10);
        $result .= int rand(10);

        return $result;
}

-- Fil