Merge pull request #159 from minglumlu/private/mingl/CA-320563

CA-320563: xcp-networkd: fix the regex match for PCI BDF string

Author: lindig

lib/network_utils.ml

@@ -246,7 +246,7 @@ module Sysfs = struct
     try
       Sys.readdir ("/sys/bus/pci/drivers/" ^ driver)
       |> Array.to_list
-      |> List.filter (Re.execp (Re.Perl.compile_pat "\\d+:\\d+:\\d+\\.\\d+"))
+      |> List.filter (Re.execp (Re.Perl.compile_pat "\\d+:[a-f\\d]+:[a-f\\d]+\\.\\d+"))
       |> List.length
     with _ -> 0