mirrors/libguestfs
1
0
Fork 0
mirror of https://github.com/libguestfs/libguestfs.git synced 2026-03-22 07:03:38 +00:00
Code Issues Packages Projects Releases Wiki Activity

v2v: -o libvirt: Use PCRE to verify arch is sane.

Browse Source
This commit is contained in:
Richard W.M. Jones
2017-09-21 14:46:09 +01:00
parent 9c191bb15f
commit d0c8f0ffe1
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
v2v/output_libvirt.ml
View File

@@ -28,8 +28,8 @@ open Xpath_helpers
open Create_libvirt_xml
let arch_is_sane_or_die =
let rex = Str.regexp "^[-_A-Za-z0-9]+$" in
fun arch -> assert (Str.string_match rex arch 0)
let rex = PCRE.compile ~caseless:true "^[-_a-z0-9]+$" in
fun arch -> assert (PCRE.matches rex arch)
let target_features_of_capabilities_doc doc arch =
let xpathctx = Xml.xpath_new_context doc in