CA-213035: feature-flag for ssl_legacy control switch

Add a feature to indicate the availability of this functionality. Signed-off-by: Thomas Sanders <thomas.sanders@citrix.com>
xapi-project · Jun 15, 2016 · faf9340 · faf9340
1 parent 8c108e2
commit faf9340
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 0 deletions.
diff --git a/ocaml/xapi/features.ml b/ocaml/xapi/features.ml
@@ -49,6 +49,7 @@ type feature =
 	| Xen_motion
 	| Guest_ip_setting
 	| AD
+	| Ssl_legacy_switch
 	with rpc
 
 type orientation = Positive | Negative
@@ -87,6 +88,7 @@ let keys_of_features =
 		Xen_motion, ("restrict_xen_motion", Negative, "XenMotion");
 		Guest_ip_setting, ("restrict_guest_ip_setting", Negative, "GuestIP");
 		AD, ("restrict_ad", Negative, "AD");
+		Ssl_legacy_switch, ("disable_ssl_legacy_switch", Negative, "Ssl_legacy_switch");
 	]
 
 let name_of_feature f =

diff --git a/ocaml/xapi/features.mli b/ocaml/xapi/features.mli
@@ -49,6 +49,7 @@ type feature =
 	| Xen_motion                   (** Enable XenMotion feature *)
 	| Guest_ip_setting             (** Enable use of Guest ip seting *)
 	| AD                           (** Enable use of Active Directory *)
+	| Ssl_legacy_switch            (** Enable the control switch for SSL/TLS legacy-mode. *)
 
 (** Convert RPC into {!feature}s *)
 val feature_of_rpc : Rpc.t -> feature