summaryrefslogtreecommitdiffstats
path: root/libvirt/libvirt_c_oneoffs.c
diff options
context:
space:
mode:
authorRichard W.M. Jones <rjones@redhat.com>2008-01-19 14:14:02 +0000
committerRichard W.M. Jones <rjones@redhat.com>2008-01-19 14:14:02 +0000
commitb6098f4c7419486227cbe2112904cbc9d58ed787 (patch)
treee0baeed5847d2e0b23648042275db41d8ab844df /libvirt/libvirt_c_oneoffs.c
parent8a8008134e997330d61e0b9736e9067b5689b531 (diff)
downloadvirt-top-b6098f4c7419486227cbe2112904cbc9d58ed787.tar.gz
virt-top-b6098f4c7419486227cbe2112904cbc9d58ed787.tar.xz
virt-top-b6098f4c7419486227cbe2112904cbc9d58ed787.zip
Autogenerate all GetUUID and GetUUIDString functions.
Diffstat (limited to 'libvirt/libvirt_c_oneoffs.c')
-rw-r--r--libvirt/libvirt_c_oneoffs.c68
1 files changed, 0 insertions, 68 deletions
diff --git a/libvirt/libvirt_c_oneoffs.c b/libvirt/libvirt_c_oneoffs.c
index ecfdf9d..27f917d 100644
--- a/libvirt/libvirt_c_oneoffs.c
+++ b/libvirt/libvirt_c_oneoffs.c
@@ -371,40 +371,6 @@ ocaml_libvirt_domain_core_dump (value domv, value pathv)
}
CAMLprim value
-ocaml_libvirt_domain_get_uuid (value domv)
-{
- CAMLparam1 (domv);
- CAMLlocal1 (rv);
- virDomainPtr dom = Domain_val (domv);
- virConnectPtr conn = Connect_domv (domv);
- unsigned char uuid[VIR_UUID_BUFLEN];
- int r;
-
- NONBLOCKING (r = virDomainGetUUID (dom, uuid));
- CHECK_ERROR (r == -1, conn, "virDomainGetUUID");
-
- rv = caml_copy_string ((char *) uuid);
- CAMLreturn (rv);
-}
-
-CAMLprim value
-ocaml_libvirt_domain_get_uuid_string (value domv)
-{
- CAMLparam1 (domv);
- CAMLlocal1 (rv);
- virDomainPtr dom = Domain_val (domv);
- virConnectPtr conn = Connect_domv (domv);
- char uuid[VIR_UUID_STRING_BUFLEN];
- int r;
-
- NONBLOCKING (r = virDomainGetUUIDString (dom, uuid));
- CHECK_ERROR (r == -1, conn, "virDomainGetUUIDString");
-
- rv = caml_copy_string (uuid);
- CAMLreturn (rv);
-}
-
-CAMLprim value
ocaml_libvirt_domain_get_id (value domv)
{
CAMLparam1 (domv);
@@ -957,40 +923,6 @@ ocaml_libvirt_network_free (value netv)
CAMLreturn (Val_unit);
}
-CAMLprim value
-ocaml_libvirt_network_get_uuid (value netv)
-{
- CAMLparam1 (netv);
- CAMLlocal1 (rv);
- virNetworkPtr net = Network_val (netv);
- virConnectPtr conn = Connect_netv (netv);
- unsigned char uuid[VIR_UUID_BUFLEN];
- int r;
-
- NONBLOCKING (r = virNetworkGetUUID (net, uuid));
- CHECK_ERROR (r == -1, conn, "virNetworkGetUUID");
-
- rv = caml_copy_string ((char *) uuid);
- CAMLreturn (rv);
-}
-
-CAMLprim value
-ocaml_libvirt_network_get_uuid_string (value netv)
-{
- CAMLparam1 (netv);
- CAMLlocal1 (rv);
- virNetworkPtr net = Network_val (netv);
- virConnectPtr conn = Connect_netv (netv);
- char uuid[VIR_UUID_STRING_BUFLEN];
- int r;
-
- NONBLOCKING (r = virNetworkGetUUIDString (net, uuid));
- CHECK_ERROR (r == -1, conn, "virNetworkGetUUIDString");
-
- rv = caml_copy_string (uuid);
- CAMLreturn (rv);
-}
-
/*----------------------------------------------------------------------*/
CAMLprim value