diff options
| author | Richard Jones <rjones@trick.home.annexia.org> | 2009-10-02 15:42:14 +0100 |
|---|---|---|
| committer | Richard Jones <rjones@redhat.com> | 2009-10-13 17:53:20 +0100 |
| commit | d37f69795396ec2354eb2d8480d64b9e5bdafacc (patch) | |
| tree | 0685bb56dd3032d4e413930f23f93aac323b4cd9 /.gitignore | |
| parent | c6b8db6493dd633bf48b13daf72cdc9c078b5f9a (diff) | |
| download | libguestfs-d37f69795396ec2354eb2d8480d64b9e5bdafacc.tar.gz libguestfs-d37f69795396ec2354eb2d8480d64b9e5bdafacc.tar.xz libguestfs-d37f69795396ec2354eb2d8480d64b9e5bdafacc.zip | |
inspector: Generate language bindings for OCaml.
This commit adds a generic mechanism for deriving language bindings
for virt-inspector, and implements one concrete binding, for OCaml.
The bindings are generated from the RELAX NG schema (virt-inspector.rng)
which is supposed to be a correct and always up to date description
of the XML that the virt-inspector program can generate.
From the RNG we generate a set of types to describe the output of
virt-inspector for the language, plus an XML parser, plus some
glue code to actually run an external instance of virt-inspector
and parse the resulting XML.
At runtime, an external 'virt-inspector --xml <name>' command runs
and the XML is parsed into language-specific structures.
This has been tested on the four example files (inspector/example?.xml)
The only particular difficulty about the OCaml binding is the use of
Obj.magic, which is naughty but works because of the isomorphism
between the representation of tuples and records in OCaml. This
seems to cause no problems in my test program. Apart from this, the
OCaml binding is straightforward and could be adapted easily for any
other languages that want type-safe virt-inspector bindings.
It's important to keep virt-inspector.rng up to date with changes
to virt-inspector's XML output format.
Diffstat (limited to '.gitignore')
| -rw-r--r-- | .gitignore | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -90,6 +90,7 @@ images/test-grep.txt.gz initramfs initramfs.timestamp inspector/virt-inspector.1 +inspector/stamp-inspector-generator install-sh *.jar java/api @@ -136,6 +137,8 @@ ocaml/examples/lvs ocaml/examples/throbber.ml ocaml/examples/viewer ocaml/guestfs_c_actions.c +ocaml/guestfs_inspector.ml +ocaml/guestfs_inspector.mli ocaml/guestfs.ml ocaml/guestfs.mli ocaml/META @@ -143,6 +146,7 @@ ocaml/t/guestfs_005_load ocaml/t/guestfs_010_launch ocaml/t/guestfs_050_lvcreate ocaml/t/guestfs_060_readdir +ocaml/t/guestfs_500_inspect perl/bindtests.pl perl/blib perl/Guestfs.bs |