[Secure-testing-commits] r572 - in sarge-checks: . CAN

[Joey Hess]

Author: joeyh
Date: 2005-03-17 16:54:49 +0100 (Thu, 17 Mar 2005)
New Revision: 572

Modified:
   sarge-checks/CAN/list
   sarge-checks/updatelist
Log:
allow CAN names to contain uppercase letters to allow for placeholders for
unknown CANs


Modified: sarge-checks/CAN/list
===================================================================
--- sarge-checks/CAN/list	2005-03-17 11:07:19 UTC (rev 571)
+++ sarge-checks/CAN/list	2005-03-17 15:54:49 UTC (rev 572)
@@ -1,4 +1,4 @@
-CAN-2005- XXXX
+CAN-2005-XXXX
 	- openslp (unfixed; bug #299846)
 CAN-2005-0748 (PHP remote code injection vulnerability in initdb.php for WEBInsta ...)
 	NOTE: not-for-us (WEBInsta)

Modified: sarge-checks/updatelist
===================================================================
--- sarge-checks/updatelist	2005-03-17 11:07:19 UTC (rev 571)
+++ sarge-checks/updatelist	2005-03-17 15:54:49 UTC (rev 572)
@@ -31,7 +31,7 @@
 open (FULL_CAN, "<$full_can_html") || die "$full_can_html: $!\n";
 my $can;
 while (<FULL_CAN>) {
-	if (m!<b>(CAN-\d+-\d+)</b>!) {
+	if (m!<b>(CAN-(?:\d+|[A-Z]+)-(?:\d+|[A-Z]+)</b>!) {
 		$can=$1;
 		$cans{$can}{can}=$can;
 		$listedcans{$can}=1;