Pipe bidirectionnel

Bonjour à tous,

Petite question du soir... Je sèche lamentablement sur les pipes
bidirectionnels et sur ce coup, google n'a pas été mon ami...

J'ai un programme qui fait un fork, mais j'aimerais que le père puisse
écrire sur l'entrée standard du fils et récupérer ses sorties standard et
d'erreur.

Première question, la plus simple : est-ce que tous mes descripteurs sont
bien refermés ?

J'arrive très bien à récupérer stderr et stdout dans le père, mais lorsque
je tente d'écrire depuis le père, mon truc bloque (le processus détaché par
l'appel execvp du fils prend tout le CPU). Je sèche. Voici mon code :

int pipes[2];

...

if (pipe(pipes) != 0)
{
(*s_etat_processus).erreur_systeme = d_es_processus;
return;
}

if ((pid = fork()) < 0)
{
/*
* Le fork échoue
*/

if (close(pipes[0]) != 0)
{
(*s_etat_processus).erreur_systeme = d_es_processus;
return;
}

if (close(pipes[1]) != 0)
{
(*s_etat_processus).erreur_systeme = d_es_processus;
return;
}

(*s_etat_processus).erreur_systeme = d_es_processus;
return;
}
else if (pid == 0)
{
#undef test
#define test
// En ôtant cette dernière ligne, on ne tient pas compte de stdin et
// ça fonctionne bien.
#ifndef test
if (close(pipes[0]) != 0)
{
(*s_etat_processus).erreur_systeme = d_es_processus;
return;
}
#else
if (pipes[0] != STDIN_FILENO)
{
if (dup2(pipes[0], STDIN_FILENO) == -1)
{
(*s_etat_processus).erreur_systeme = d_es_processus;
return;
}
}
#endif

if (pipes[1] != STDOUT_FILENO)
{
if (dup2(pipes[1], STDOUT_FILENO) == -1)
{
(*s_etat_processus).erreur_systeme = d_es_processus;
return;
}
}

if (pipes[1] != STDERR_FILENO)
{
if (dup2(pipes[1], STDERR_FILENO) == -1)
{
(*s_etat_processus).erreur_systeme = d_es_processus;
return;
}
}

if (nombre_arguments != 0)
{
execvp(arguments[0], arguments);
}
else
{
exit(EXIT_SUCCESS);
}

exit(EXIT_FAILURE);
}
else
{
#ifndef test
if (close(pipes[1]) != 0)
{
(*s_etat_processus).erreur_systeme = d_es_processus;
return;
}
#else
if (write(pipes[1], "1\n", 2) != 2)
{
(*s_etat_processus).erreur_systeme = d_es_processus;
return;
}
#endif

if (waitpid(pid, &status, 0) == -1)
{
(*s_etat_processus).erreur_systeme = d_es_processus;
return;
}

longueur_lecture = 256;
pointeur = 0;
nombre_iterations = 1;

if ((tampon = malloc((longueur_lecture + 1) *
sizeof(unsigned char))) == NULL)
{
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
return;
}
...

Une idée ? Parce que franchement, je ne vois pas pourquoi cela ne fonctionne
pas...

Cordialement,

JKB

--
En plus c'est simple, je fais ce genre de trucs en g77 depuis des années :
il suffit d'écrire un wrapper en C. Et comme ça, j'ai le meilleur des deux
mondes : la rigueur quasi-monacale du Fortran, et l'exubérance pétulante du C.