Merge pull request #35 from simonjbeaumont/api-digest

Update to latest XenAPI
xapi-project · Dec 18, 2015 · 1322bd2 · 1322bd2
2 parents 9d3d793 + 1711feb
commit 1322bd2
Show file tree

Hide file tree

Showing 6 changed files with 282 additions and 61 deletions.
diff --git a/CHANGES b/CHANGES
@@ -1,3 +1,6 @@
+0.9.11 (18-Dec-2015)
+* Update to latest XenAPI from xen-api.git#098c548
+
 0.9.10 (27-Oct-2015)
 * use non-blocking Async print functions
 

diff --git a/_oasis b/_oasis
@@ -1,6 +1,6 @@
 OASISFormat: 0.3
 Name:        xen-api-client
-Version:     0.9.10
+Version:     0.9.11
 Synopsis:    Xen API client
 Authors:     Jonathan Ludlam, Anil Madhavapeddy, David Scott
 License:     LGPL-2.0 with OCaml linking exception

diff --git a/lib/aPI.ml b/lib/aPI.ml
diff --git a/lib/api_errors.ml b/lib/api_errors.ml
@@ -215,6 +215,7 @@ let vbd_cds_must_be_readonly = "VBD_CDS_MUST_BE_READONLY"
 let disk_vbd_must_be_readwrite_for_hvm = "DISK_VBD_MUST_BE_READWRITE_FOR_HVM"
 let host_cd_drive_empty = "HOST_CD_DRIVE_EMPTY"
 let vdi_not_available = "VDI_NOT_AVAILABLE"
+let vdi_has_rrds = "VDI_HAS_RRDS"
 let vdi_location_missing = "VDI_LOCATION_MISSING"
 let vdi_content_id_missing = "VDI_CONTENT_ID_MISSING"
 let vdi_missing = "VDI_MISSING"
@@ -238,7 +239,10 @@ let sr_device_in_use = "SR_DEVICE_IN_USE"
 let sr_operation_not_supported = "SR_OPERATION_NOT_SUPPORTED"
 let sr_not_sharable = "SR_NOT_SHARABLE"
 let sr_indestructible = "SR_INDESTRUCTIBLE"
-
+let sr_detached_on_master = "SR_DETACHED_ON_MASTER"
+let sr_attached_on_slave = "SR_ATTACHED_ON_SLAVE"
+let clustered_sr_degraded = "CLUSTERED_SR_DEGRADED"
+
 let sm_plugin_communication_failure = "SM_PLUGIN_COMMUNICATION_FAILURE"
 
 let pbd_exists = "PBD_EXISTS"
@@ -501,4 +505,7 @@ let vm_has_checkpoint = "VM_HAS_CHECKPOINT"
 
 let mirror_failed = "MIRROR_FAILED"
 let too_many_storage_migrates = "TOO_MANY_STORAGE_MIGRATES"
+let sr_does_not_support_migration = "SR_DOES_NOT_SUPPORT_MIGRATION"
 let unimplemented_in_sm_backend = "UNIMPLEMENTED_IN_SM_BACKEND"
+
+let vm_call_plugin_rate_limit = "VM_CALL_PLUGIN_RATE_LIMIT"
diff --git a/lib/api_messages.ml b/lib/api_messages.ml
@@ -108,3 +108,8 @@ let vmpp_archive_missed_event = addMessage "VMPP_ARCHIVE_MISSED_EVENT" 3L (*'A s
 let vmpp_snapshot_archive_already_exists = addMessage "VMPP_SNAPSHOT_ARCHIVE_ALREADY_EXISTS" 3L (*'Failed to archive the snapshot, it has already been archived on the specified target'*)
 
 let bond_status_changed = addMessage "BOND_STATUS_CHANGED" 3L (* A link in a bond went down or came back up *) (* Previously missing from table *)
+
+let host_cpu_features_down = addMessage "HOST_CPU_FEATURES_DOWN" 3L
+let host_cpu_features_up = addMessage "HOST_CPU_FEATURES_UP" 5L
+let pool_cpu_features_down = addMessage "POOL_CPU_FEATURES_DOWN" 5L
+let pool_cpu_features_up = addMessage "POOL_CPU_FEATURES_UP" 5L