Re: et...

je répond un peu aux deux messages ensemble

Pour ce qui est de vérifier les médias présents (ça ne prend pas tous les médias, mais faut juste changer le if et il y a peut-être des choses en trop, je copie ça vite d'un code que j'ai) :

use lib qw(/usr/lib/libDrakX);

use strict;
use common;

use urpm;

my $urpm = new urpm;
$urpm->read_config();
my %medias;
# search all main active media but not update and not removable
foreach(@{$urpm->{media}}) {
$medias{$_->{name}} = ["$_->{name}", "$_->{url}"] if($_->{url} =~ /main\b/ and not $_->{update} and not $_->{ignore} and not $_->{removable});
}


Pour ce qui est de récupérer les autres médias (non installé) je pense qu'il faudrait voir dans la partie de drakconf qui va cherché les médias (et rajouter simplement les plf)

Si je ne me trompe pas la réponse doit probablement être dans /usr/sbin/drakrpm-edit-media

Ca aidera peut-être quelqu'un voulant le faire en perl ;)