/[secure-testing]/bin/updatelist
ViewVC logotype

Diff of /bin/updatelist

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 199 by joeyh, Fri Dec 3 20:25:41 2004 UTC revision 200 by joeyh, Wed Dec 15 20:38:57 2004 UTC
# Line 48  while (<FULL_CAN>) { Line 48  while (<FULL_CAN>) {
48          if (m!\*\*\s+REJECT\s+\*\*!) {          if (m!\*\*\s+REJECT\s+\*\*!) {
49                  $cans{$can}{rejected}=1;                  $cans{$can}{rejected}=1;
50          }          }
51            if (m!Description:\s*</b><br>\s*(.*)! &&
52                    ! m!\*\*\s+RESERVED\s+\*\*! && ! m!\*\*\s+REJECT\s+\*\*!) {
53                    $cans{$can}{description}="($1 ...)";
54            }
55  }  }
56  close FULL_CAN;  close FULL_CAN;
57    
# Line 86  my $can; Line 90  my $can;
90  while (<IN>) {  while (<IN>) {
91          chomp;          chomp;
92          if (/^((?:CAN|CVE)-[-0-9]*)\s*(.*)/) {          if (/^((?:CAN|CVE)-[-0-9]*)\s*(.*)/) {
93                    my $desc=$2;
94                  docan($can) if $can;                  docan($can) if $can;
95                  $can=$1;                  $can=$1;
96                  $cans{$can}{description}=$2 if length $2;                  $cans{$can}{description}=$desc if length $desc && $desc !~ /^\(.*\)$/;
97          }          }
98          elsif (/^\s+NOTE:\s*(reserved|rejected)\s*$/) {          elsif (/^\s+NOTE:\s*(reserved|rejected)\s*$/) {
99                  # skip it                  # skip it
Legend:
Removed from v.199  
changed lines
  Added in v.200
  ViewVC Help
Powered by ViewVC 1.1.5