[Libguestfs] [PATCH v4 6/9] v2v: -o glance: Add virtio-rng to output properties (RHBZ#1438794).

[Richard W.M. Jones]

Only virtio-rng is supported at the time.
---
 v2v/output_glance.ml | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/v2v/output_glance.ml b/v2v/output_glance.ml
index 04a284337..b712d6801 100644
--- a/v2v/output_glance.ml
+++ b/v2v/output_glance.ml
@@ -138,6 +138,11 @@ object
          | x, 0 -> push_back properties ("os_version", string_of_int x)
          | x, y -> push_back properties ("os_version", sprintf "%d.%d" x y)
         );
+        if guestcaps.gcaps_virtio_rng then
+          push_back properties ("hw_rng_model", "virtio");
+        (* XXX Neither memory balloon nor pvpanic are supported by
+         * Glance at this time.
+         *)
 
         let properties =
           List.flatten (
-- 
2.12.0