search for: create_xml

On Tuesday 10 March 2015 18:31:41 Richard W.M. Jones wrote: > + (* Boot the guest. *) > + let conn = C.connect () in > + let dom = D.create_xml conn boot_xml [D.START_AUTODESTROY] in When using ocaml-libvirt 0.6.1.2 (as shipped in f21), this results in: File "v2v_test_harness.ml", line 174, characters 14-26: Error: Unbound value D.create_xml Indeed, the ocaml-libvirt in that version has no Domain.create_xml, nor Domain fla...

On Wed, Mar 11, 2015 at 11:02:44AM +0100, Pino Toscano wrote: > On Tuesday 10 March 2015 18:31:41 Richard W.M. Jones wrote: > > + (* Boot the guest. *) > > + let conn = C.connect () in > > + let dom = D.create_xml conn boot_xml [D.START_AUTODESTROY] in > > When using ocaml-libvirt 0.6.1.2 (as shipped in f21), this results in: > > File "v2v_test_harness.ml", line 174, characters 14-26: > Error: Unbound value D.create_xml > > Indeed, the ocaml-libvirt in that version has n...

As I'm now working through the enormous virt-v2v/virt-p2v bug list, we need a high quality set of tests to ensure that we don't accidentally regress some old OS/hypervisor combination while making changes. The test cases are going to be huge, so we cannot possibly distribute them in libguestfs. Furthermore many of them have licensing problems which means we cannot redistribute them at

...FLMPSUVYZX-3 -package str,unix,libvirt -I ../../src/.libs -I ../../gnulib/lib/.libs -I ../../ocaml -I ../../mllib -I ../../v2v -c v2v_test_harness.ml -o v2v_test_harness.cmx > AR libv2vth.a > File "v2v_test_harness.ml", line 205, characters 14-26: > Error: Unbound value D.create_xml > make[2]: *** [v2v_test_harness.cmx] Error 2 > make[2]: Leaving directory `/root/rpmbuild_oldlib/BUILD/libguestfs-1.30.3/v2v/test-harness' > make[1]: *** [all-recursive] Error 1 > make[1]: Leaving directory `/root/rpmbuild_oldlib/BUILD/libguestfs-1.30.3' > make: *** [all] Er...

...ock_peek + * supported by libvirt. This may change with different versions + * of libvirt in the future, hence it's a function. + *) + let max_peek _ = 65536 + + external create_linux : [>`W] Connect.t -> xml -> rw t = "ocaml_libvirt_domain_create_linux" + external _create_xml : [>`W] Connect.t -> xml -> int -> rw t = "ocaml_libvirt_domain_create_xml" + let create_xml conn xml flags = + _create_xml conn xml (int_of_domain_create_flags flags) + external lookup_by_id : 'a Connect.t -> int -> 'a t = "ocaml_libvirt_domain_lookup_...

libvirt-ocaml is used only by virt-v2v, so move it to this repository, instead of having it around in the common submodule. The removal from common will happen later. Pino Toscano (2): common: Bundle the libvirt-ocaml library for use by virt-v2v build: switch embedded copy of libvirt-ocaml .gitignore | 2 + 3rdparty/libvirt-ocaml/Makefile.am |

Hi, this is a mostly done attempt to switch to ocaml-libvirt, embedding the latest version of it from git. This way, it is possible to improve the way v2v connects to libvirt for both input, and output modules, and interacts with libvirt (e.g. no more virsh calls needed in virt-v2v). As side effect, virt-v2v now requires libvirt, as keeping it optional would create too much burden. I could not

Hi, this is a mostly done attempt to switch to ocaml-libvirt, embedding the latest version of it from git. This way, it is possible to improve the way v2v connects to libvirt for both input, and output modules, and interacts with libvirt (e.g. no more virsh calls needed in virt-v2v). As side effect, virt-v2v now requires libvirt, as keeping it optional would create too much burden. I could not

Hi, this is a mostly done attempt to switch to ocaml-libvirt, embedding the latest version of it from git. This way, it is possible to improve the way v2v connects to libvirt for both input, and output modules, and interacts with libvirt (e.g. no more virsh calls needed in virt-v2v). As side effect, virt-v2v now requires libvirt, as keeping it optional would create too much burden. I could not

Hi, this series switches virt-2v to ocaml-libvirt, embedding the latest version of it from git. This way, it is possible to improve the way v2v connects to libvirt for both input, and output modules, and interacts with libvirt (e.g. no more virsh calls needed in virt-v2v). As side effect, virt-v2v now requires libvirt, as keeping it optional would create too much burden. I could not test all

Hi, this series switches virt-2v to ocaml-libvirt, embedding the latest version of it from git. This way, it is possible to improve the way v2v connects to libvirt for both input, and output modules, and interacts with libvirt (e.g. no more virsh calls needed in virt-v2v). As side effect, virt-v2v now requires libvirt, as keeping it optional would create too much burden. I could not test all

...| _ -> assert false in + + let boot_xml = Xml.to_string boot_xml_doc ~format:true in + + (* Dump out the XML as debug information before running the guest. *) + printf "boot XML:\n%s\n" boot_xml; + + (* Boot the guest. *) + let conn = C.connect () in + let dom = D.create_xml conn boot_xml [D.START_AUTODESTROY] in + + let timestamp t = + let tm = localtime t in + let y = 1900+tm.tm_year and mo = 1+tm.tm_mon and d = tm.tm_mday + and h = tm.tm_hour and m = tm.tm_min and s = tm.tm_sec in + sprintf "%04d%02d%02d-%02d%02d%02d" y mo d h m s +...