Skip to content

Commit

Permalink
Merge pull request #5228 from lindig/private/christianlin/CP-46045
Browse files Browse the repository at this point in the history
CP-46045 define VTPM feature
  • Loading branch information
lindig authored Nov 6, 2023
2 parents 4f449c5 + 101c3d6 commit d6b912c
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 0 deletions.
2 changes: 2 additions & 0 deletions ocaml/xapi-types/features.ml
Original file line number Diff line number Diff line change
Expand Up @@ -63,6 +63,7 @@ type feature =
| Certificate_verification
| Updates
| Internal_repo_access
| VTPM
[@@deriving rpc]

type orientation = Positive | Negative
Expand Down Expand Up @@ -130,6 +131,7 @@ let keys_of_features =
; ( Internal_repo_access
, ("restrict_internal_repo_access", Negative, "Internal_repo_access")
)
; (VTPM, ("restrict_vtpm", Negative, "VTPM"))
]

(* A list of features that must be considered "enabled" by `of_assoc_list`
Expand Down
1 change: 1 addition & 0 deletions ocaml/xapi-types/features.mli
Original file line number Diff line number Diff line change
Expand Up @@ -71,6 +71,7 @@ type feature =
| Updates (** Enable host updates from a repository *)
| Internal_repo_access
(** Enable restriction on repository access to pool members only *)
| VTPM (** Support VTPM device required by Win11 guests *)

val feature_of_rpc : Rpc.t -> feature
(** Convert RPC into {!feature}s *)
Expand Down

0 comments on commit d6b912c

Please sign in to comment.