Protocols chez lost-oasis

Par Julien Wajsberg, mardi 21 février 2006. Lien permanent Informatique

Globalement, je suis content de mon hébergeur lost-oasis. Mais là, ils ont été bien mauvais !

Le problème: mon aggrégateur RSS ne marchait plus.
erreur retournée par la bibliothèque Perl: Bad protocole: 'tcp'.

D'après Google, le problème viendrait du fichier /etc/protocols non trouvé... Manquerait-il dans le chroot de mon environnement ?

En tout cas, après 1 mois d'attente, j'ai finalement patché complètement à la salaud le fichier INET.pm, et je l'ai placé manuellement dans mon include_path Perl du serveur. Et depuis, ça remarche...

Voici mes changements, vous m'en direz des nouvelles.

Oui, c'est très sale. Mes ajouts sont en gras.

Dans la fonction _sock_info

if(@proto = getprotobyname($proto)) {
  $proto = $proto[2] || undef;
} elsif ($proto == 'tcp') {
  $proto = 6;
} else {
  $@ = "Bad protocol '$proto'";
  return;
}

$proto = (getprotobyname($serv[3]))[2] || undef
    if @serv && !$proto;
$proto = 6 if (! $proto && $serv[3] == 'tcp');

Et dans la fonction configure...

$proto ||= (getprotobyname('tcp'))[2];
$proto ||= 6;

Mon préféré :-)

my $pname = (getprotobynumber($proto))[0];
$pname = 'tcp';
$type = $arg->{Type} || $socket_type{lc $pname};

Geekeries et d'autres choses