[mrtg-developers] Re: fork problem with 2.10.8 and perl 5.6.0

[Larry Fahnoe]

Tobi,

That check clears up the warnings on both perl 5.6 and 5.8.2.

So rather than just clearing the $vin bits after the child has been
read, maybe it needs to be removed from the vector entirely.

--Larry

On Wed, Dec 03, 2003 at 07:45:05PM +0100, Tobias Oetiker commenced mumbling:
> Today Larry Fahnoe wrote:
> 
> > Nope, some jobs run with 2, most with 8.
> 
> Larry,
> 
> can you try this:
> 
> +++ mrtg        Wed Dec  3 19:43:28 2003
> @@ -2037,6 +2037,7 @@
>                 die sprintf("ERROR: select returned %d: $!\n", $nfound);
>              }
>             for (my $i = 0; $i < $forks; $i++) {
> +                next unless defined $hand[$i] and defined fileno($hand[$i]);
>                  if (vec($eout, fileno($hand[$i]), 1)) {
>                    die "ERROR: fork $i has died ahead of time?\n";
>                  }
> 
> my guess is that once the filehandle has been closed it will become
> undefined ... I have not tested this patch ...
> 
> cheers
> tobi

-- 
Larry Fahnoe, Fahnoe Technology Consulting, fahnoe at FahnoeTech.com
952/925-0744      Minneapolis, Minnesota       www.FahnoeTech.com 

--
Unsubscribe mailto:mrtg-developers-request at list.ee.ethz.ch?subject=unsubscribe
Help        mailto:mrtg-developers-request at list.ee.ethz.ch?subject=help
Archive     http://www.ee.ethz.ch/~slist/mrtg-developers