#include "libvirt_c_oneoffs.c"
/* Automatically generated binding for virConnectClose.
- * Function signature in generator.pl is "conn : free"
+ * In generator.pl this function has signature "conn : free".
*/
CAMLprim value
}
/* Automatically generated binding for virConnectGetHostname.
- * Function signature in generator.pl is "conn : string"
+ * In generator.pl this function has signature "conn : string".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virConnectGetURI.
- * Function signature in generator.pl is "conn : string"
+ * In generator.pl this function has signature "conn : string".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virConnectGetType.
- * Function signature in generator.pl is "conn : static string"
+ * In generator.pl this function has signature "conn : static string".
*/
CAMLprim value
}
/* Automatically generated binding for virConnectNumOfDomains.
- * Function signature in generator.pl is "conn : int"
+ * In generator.pl this function has signature "conn : int".
*/
CAMLprim value
}
/* Automatically generated binding for virConnectListDomains.
- * Function signature in generator.pl is "conn, int : int array"
+ * In generator.pl this function has signature "conn, int : int array".
*/
CAMLprim value
}
/* Automatically generated binding for virConnectNumOfDefinedDomains.
- * Function signature in generator.pl is "conn : int"
+ * In generator.pl this function has signature "conn : int".
*/
CAMLprim value
}
/* Automatically generated binding for virConnectListDefinedDomains.
- * Function signature in generator.pl is "conn, int : string array"
+ * In generator.pl this function has signature "conn, int : string array".
*/
CAMLprim value
}
/* Automatically generated binding for virConnectNumOfNetworks.
- * Function signature in generator.pl is "conn : int"
+ * In generator.pl this function has signature "conn : int".
*/
CAMLprim value
}
/* Automatically generated binding for virConnectListNetworks.
- * Function signature in generator.pl is "conn, int : string array"
+ * In generator.pl this function has signature "conn, int : string array".
*/
CAMLprim value
}
/* Automatically generated binding for virConnectNumOfDefinedNetworks.
- * Function signature in generator.pl is "conn : int"
+ * In generator.pl this function has signature "conn : int".
*/
CAMLprim value
}
/* Automatically generated binding for virConnectListDefinedNetworks.
- * Function signature in generator.pl is "conn, int : string array"
+ * In generator.pl this function has signature "conn, int : string array".
*/
CAMLprim value
}
/* Automatically generated binding for virConnectNumOfStoragePools.
- * Function signature in generator.pl is "conn : int"
+ * In generator.pl this function has signature "conn : int".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virConnectListStoragePools.
- * Function signature in generator.pl is "conn, int : string array"
+ * In generator.pl this function has signature "conn, int : string array".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virConnectNumOfDefinedStoragePools.
- * Function signature in generator.pl is "conn : int"
+ * In generator.pl this function has signature "conn : int".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virConnectListDefinedStoragePools.
- * Function signature in generator.pl is "conn, int : string array"
+ * In generator.pl this function has signature "conn, int : string array".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virConnectGetCapabilities.
- * Function signature in generator.pl is "conn : string"
+ * In generator.pl this function has signature "conn : string".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainCreateLinux.
- * Function signature in generator.pl is "conn, string, 0U : dom"
+ * In generator.pl this function has signature "conn, string, 0U : dom".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainCreateLinuxJob.
- * Function signature in generator.pl is "conn, string, 0U : job"
+ * In generator.pl this function has signature "conn, string, 0U : job".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virDomainFree.
- * Function signature in generator.pl is "dom : free"
+ * In generator.pl this function has signature "dom : free".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainDestroy.
- * Function signature in generator.pl is "dom : free"
+ * In generator.pl this function has signature "dom : free".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainLookupByName.
- * Function signature in generator.pl is "conn, string : dom"
+ * In generator.pl this function has signature "conn, string : dom".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainLookupByID.
- * Function signature in generator.pl is "conn, int : dom"
+ * In generator.pl this function has signature "conn, int : dom".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainLookupByUUID.
- * Function signature in generator.pl is "conn, uuid : dom"
+ * In generator.pl this function has signature "conn, uuid : dom".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainLookupByUUIDString.
- * Function signature in generator.pl is "conn, string : dom"
+ * In generator.pl this function has signature "conn, string : dom".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainGetName.
- * Function signature in generator.pl is "dom : static string"
+ * In generator.pl this function has signature "dom : static string".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainGetOSType.
- * Function signature in generator.pl is "dom : string"
+ * In generator.pl this function has signature "dom : string".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainGetXMLDesc.
- * Function signature in generator.pl is "dom, 0 : string"
+ * In generator.pl this function has signature "dom, 0 : string".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainGetUUID.
- * Function signature in generator.pl is "dom : uuid"
+ * In generator.pl this function has signature "dom : uuid".
*/
CAMLprim value
NONBLOCKING (r = virDomainGetUUID (dom, uuid));
CHECK_ERROR (r == -1, conn, "virDomainGetUUID");
- rv = caml_copy_string ((char *) uuid);
+ /* UUIDs are byte arrays with a fixed length. */
+ rv = caml_alloc_string (VIR_UUID_BUFLEN);
+ memcpy (String_val (rv), uuid, VIR_UUID_BUFLEN);
CAMLreturn (rv);
}
/* Automatically generated binding for virDomainGetUUIDString.
- * Function signature in generator.pl is "dom : uuid string"
+ * In generator.pl this function has signature "dom : uuid string".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainGetMaxVcpus.
- * Function signature in generator.pl is "dom : int"
+ * In generator.pl this function has signature "dom : int".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainSave.
- * Function signature in generator.pl is "dom, string : unit"
+ * In generator.pl this function has signature "dom, string : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainSaveJob.
- * Function signature in generator.pl is "dom, string : job from dom"
+ * In generator.pl this function has signature "dom, string : job from dom".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virDomainRestore.
- * Function signature in generator.pl is "conn, string : unit"
+ * In generator.pl this function has signature "conn, string : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainRestoreJob.
- * Function signature in generator.pl is "conn, string : job"
+ * In generator.pl this function has signature "conn, string : job".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virDomainCoreDump.
- * Function signature in generator.pl is "dom, string, 0 : unit"
+ * In generator.pl this function has signature "dom, string, 0 : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainCoreDumpJob.
- * Function signature in generator.pl is "dom, string, 0 : job from dom"
+ * In generator.pl this function has signature "dom, string, 0 : job from dom".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virDomainSuspend.
- * Function signature in generator.pl is "dom : unit"
+ * In generator.pl this function has signature "dom : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainResume.
- * Function signature in generator.pl is "dom : unit"
+ * In generator.pl this function has signature "dom : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainShutdown.
- * Function signature in generator.pl is "dom : unit"
+ * In generator.pl this function has signature "dom : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainReboot.
- * Function signature in generator.pl is "dom, 0 : unit"
+ * In generator.pl this function has signature "dom, 0 : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainDefineXML.
- * Function signature in generator.pl is "conn, string : dom"
+ * In generator.pl this function has signature "conn, string : dom".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainUndefine.
- * Function signature in generator.pl is "dom : unit"
+ * In generator.pl this function has signature "dom : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainCreate.
- * Function signature in generator.pl is "dom : unit"
+ * In generator.pl this function has signature "dom : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainCreateJob.
- * Function signature in generator.pl is "dom, 0U : job from dom"
+ * In generator.pl this function has signature "dom, 0U : job from dom".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virDomainAttachDevice.
- * Function signature in generator.pl is "dom, string : unit"
+ * In generator.pl this function has signature "dom, string : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainDetachDevice.
- * Function signature in generator.pl is "dom, string : unit"
+ * In generator.pl this function has signature "dom, string : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainGetAutostart.
- * Function signature in generator.pl is "dom : bool"
+ * In generator.pl this function has signature "dom : bool".
*/
CAMLprim value
}
/* Automatically generated binding for virDomainSetAutostart.
- * Function signature in generator.pl is "dom, bool : unit"
+ * In generator.pl this function has signature "dom, bool : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkFree.
- * Function signature in generator.pl is "net : free"
+ * In generator.pl this function has signature "net : free".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkDestroy.
- * Function signature in generator.pl is "net : free"
+ * In generator.pl this function has signature "net : free".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkLookupByName.
- * Function signature in generator.pl is "conn, string : net"
+ * In generator.pl this function has signature "conn, string : net".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkLookupByUUID.
- * Function signature in generator.pl is "conn, uuid : net"
+ * In generator.pl this function has signature "conn, uuid : net".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkLookupByUUIDString.
- * Function signature in generator.pl is "conn, string : net"
+ * In generator.pl this function has signature "conn, string : net".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkGetName.
- * Function signature in generator.pl is "net : static string"
+ * In generator.pl this function has signature "net : static string".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkGetXMLDesc.
- * Function signature in generator.pl is "net, 0 : string"
+ * In generator.pl this function has signature "net, 0 : string".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkGetBridgeName.
- * Function signature in generator.pl is "net : string"
+ * In generator.pl this function has signature "net : string".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkGetUUID.
- * Function signature in generator.pl is "net : uuid"
+ * In generator.pl this function has signature "net : uuid".
*/
CAMLprim value
NONBLOCKING (r = virNetworkGetUUID (net, uuid));
CHECK_ERROR (r == -1, conn, "virNetworkGetUUID");
- rv = caml_copy_string ((char *) uuid);
+ /* UUIDs are byte arrays with a fixed length. */
+ rv = caml_alloc_string (VIR_UUID_BUFLEN);
+ memcpy (String_val (rv), uuid, VIR_UUID_BUFLEN);
CAMLreturn (rv);
}
/* Automatically generated binding for virNetworkGetUUIDString.
- * Function signature in generator.pl is "net : uuid string"
+ * In generator.pl this function has signature "net : uuid string".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkUndefine.
- * Function signature in generator.pl is "net : unit"
+ * In generator.pl this function has signature "net : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkCreateXML.
- * Function signature in generator.pl is "conn, string : net"
+ * In generator.pl this function has signature "conn, string : net".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkCreateXMLJob.
- * Function signature in generator.pl is "conn, string : job"
+ * In generator.pl this function has signature "conn, string : job".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virNetworkDefineXML.
- * Function signature in generator.pl is "conn, string : net"
+ * In generator.pl this function has signature "conn, string : net".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkCreate.
- * Function signature in generator.pl is "net : unit"
+ * In generator.pl this function has signature "net : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkCreateJob.
- * Function signature in generator.pl is "net : job from net"
+ * In generator.pl this function has signature "net : job from net".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virNetworkGetAutostart.
- * Function signature in generator.pl is "net : bool"
+ * In generator.pl this function has signature "net : bool".
*/
CAMLprim value
}
/* Automatically generated binding for virNetworkSetAutostart.
- * Function signature in generator.pl is "net, bool : unit"
+ * In generator.pl this function has signature "net, bool : unit".
*/
CAMLprim value
}
/* Automatically generated binding for virStoragePoolFree.
- * Function signature in generator.pl is "pool : free"
+ * In generator.pl this function has signature "pool : free".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolDestroy.
- * Function signature in generator.pl is "pool : free"
+ * In generator.pl this function has signature "pool : free".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolLookupByName.
- * Function signature in generator.pl is "conn, string : pool"
+ * In generator.pl this function has signature "conn, string : pool".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolLookupByUUID.
- * Function signature in generator.pl is "conn, uuid : pool"
+ * In generator.pl this function has signature "conn, uuid : pool".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolLookupByUUIDString.
- * Function signature in generator.pl is "conn, string : pool"
+ * In generator.pl this function has signature "conn, string : pool".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolGetName.
- * Function signature in generator.pl is "pool : static string"
+ * In generator.pl this function has signature "pool : static string".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolGetXMLDesc.
- * Function signature in generator.pl is "pool, 0 : string"
+ * In generator.pl this function has signature "pool, 0 : string".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolGetUUID.
- * Function signature in generator.pl is "pool : uuid"
+ * In generator.pl this function has signature "pool : uuid".
*/
#ifdef HAVE_WEAK_SYMBOLS
NONBLOCKING (r = virStoragePoolGetUUID (pool, uuid));
CHECK_ERROR (r == -1, conn, "virStoragePoolGetUUID");
- rv = caml_copy_string ((char *) uuid);
+ /* UUIDs are byte arrays with a fixed length. */
+ rv = caml_alloc_string (VIR_UUID_BUFLEN);
+ memcpy (String_val (rv), uuid, VIR_UUID_BUFLEN);
CAMLreturn (rv);
#endif
}
/* Automatically generated binding for virStoragePoolGetUUIDString.
- * Function signature in generator.pl is "pool : uuid string"
+ * In generator.pl this function has signature "pool : uuid string".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolCreateXML.
- * Function signature in generator.pl is "conn, string : pool"
+ * In generator.pl this function has signature "conn, string : pool".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolDefineXML.
- * Function signature in generator.pl is "conn, string : pool"
+ * In generator.pl this function has signature "conn, string : pool".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolUndefine.
- * Function signature in generator.pl is "pool : unit"
+ * In generator.pl this function has signature "pool : unit".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolCreate.
- * Function signature in generator.pl is "pool : unit"
+ * In generator.pl this function has signature "pool : unit".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolShutdown.
- * Function signature in generator.pl is "pool : unit"
+ * In generator.pl this function has signature "pool : unit".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolRefresh.
- * Function signature in generator.pl is "pool, 0U : unit"
+ * In generator.pl this function has signature "pool, 0U : unit".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolGetAutostart.
- * Function signature in generator.pl is "pool : bool"
+ * In generator.pl this function has signature "pool : bool".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolSetAutostart.
- * Function signature in generator.pl is "pool, bool : unit"
+ * In generator.pl this function has signature "pool, bool : unit".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStorageVolFree.
- * Function signature in generator.pl is "vol : free"
+ * In generator.pl this function has signature "vol : free".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStorageVolDestroy.
- * Function signature in generator.pl is "vol : free"
+ * In generator.pl this function has signature "vol : free".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStorageVolLookupByKey.
- * Function signature in generator.pl is "conn, string : vol"
+ * In generator.pl this function has signature "conn, string : vol".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStorageVolLookupByPath.
- * Function signature in generator.pl is "conn, string : vol"
+ * In generator.pl this function has signature "conn, string : vol".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStorageVolGetXMLDesc.
- * Function signature in generator.pl is "vol, 0 : string"
+ * In generator.pl this function has signature "vol, 0 : string".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStorageVolGetPath.
- * Function signature in generator.pl is "vol : string"
+ * In generator.pl this function has signature "vol : string".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStorageVolGetKey.
- * Function signature in generator.pl is "vol : static string"
+ * In generator.pl this function has signature "vol : static string".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStorageVolGetName.
- * Function signature in generator.pl is "vol : static string"
+ * In generator.pl this function has signature "vol : static string".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virStoragePoolLookupByVolume.
- * Function signature in generator.pl is "vol : pool from vol"
+ * In generator.pl this function has signature "vol : pool from vol".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virJobFree.
- * Function signature in generator.pl is "job : free"
+ * In generator.pl this function has signature "job : free".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virJobCancel.
- * Function signature in generator.pl is "job : unit"
+ * In generator.pl this function has signature "job : unit".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virJobGetNetwork.
- * Function signature in generator.pl is "job : net from job"
+ * In generator.pl this function has signature "job : net from job".
*/
#ifdef HAVE_WEAK_SYMBOLS
}
/* Automatically generated binding for virJobGetDomain.
- * Function signature in generator.pl is "job : dom from job"
+ * In generator.pl this function has signature "job : dom from job".
*/
#ifdef HAVE_WEAK_SYMBOLS