Span.pm: Process the /proc/dahdi/<x> files atomically.
authorShaun Ruffell <sruffell@digium.com>
Tue, 12 Jul 2011 23:01:02 +0000 (23:01 +0000)
committerShaun Ruffell <sruffell@digium.com>
Tue, 12 Jul 2011 23:01:02 +0000 (23:01 +0000)
It is possible that the contents of the proc files can change while the
perl modules are in the processing of processing them.

Specifically, if lsdahdi is called on boot before the channels are
configured, the channel will be "probed" to determine if it's an FXO or
FXS channel and that can result in the output of proc changing. When the
size of proc changes, the script can get confused about where the
beginning of the next line is.

This patch reads in the proc file completely into memory first, and then
starts processing each of the lines.

This resolves the "Unrecognized garbage 'INACTIVE)' in -" that is
displayed on boot with the recent trunk of DAHDI.

Signed-off-by: Shaun Ruffell <sruffell@digium.com>
Signed-off-by: Tzafrir Cohen <tzafrir.cohen@xorcom.com>

git-svn-id: http://svn.astersk.org/svn/dahdi/tools/trunk@10040 17933a7a-c749-41c5-a318-cba88f637d49

xpp/perl_modules/Dahdi/Span.pm

index 367ca08..4e63af4 100644 (file)
@@ -236,7 +236,8 @@ sub new($$) {
        $self->{CHANS} = [];
        my @channels;
        my $index = 0;
-       while(<F>) {
+       my @channel_lines = <F>;
+       foreach (@channel_lines) {
                chomp;
                s/^\s*//;
                s/\s*$//;