summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJohn Estabrook <jestabro@vyos.io>2024-10-24 11:04:39 -0500
committerJohn Estabrook <jestabro@vyos.io>2024-10-24 11:04:39 -0500
commitd3ad1f32a18b9c3bb1ed6cd580af2b699b80fab3 (patch)
tree1527e9a3b9a0daaec77dc070a75175c22958f2b8 /src
parentd32815b2182a14b1a56466cded912ff009bf0ebc (diff)
downloadvyos1x-config-d3ad1f32a18b9c3bb1ed6cd580af2b699b80fab3.tar.gz
vyos1x-config-d3ad1f32a18b9c3bb1ed6cd580af2b699b80fab3.zip
T6718: add simplified render_at_level
Diffstat (limited to 'src')
-rw-r--r--src/config_tree.ml8
-rw-r--r--src/config_tree.mli2
2 files changed, 10 insertions, 0 deletions
diff --git a/src/config_tree.ml b/src/config_tree.ml
index b725f2d..f12461c 100644
--- a/src/config_tree.ml
+++ b/src/config_tree.ml
@@ -287,6 +287,14 @@ let render_commands ?(op=Set) node path =
let render_config ?(ord_val=false) = Renderer.render_config ~ord_val:ord_val
+let render_at_level node path =
+ let node =
+ match path with
+ | [] -> node
+ | _ -> Vytree.get node path
+ in
+ render_config node
+
let render_json = JSONRenderer.render_json
let render_json_ast c = to_yojson c |> Yojson.Safe.to_string
diff --git a/src/config_tree.mli b/src/config_tree.mli
index 749a416..001c607 100644
--- a/src/config_tree.mli
+++ b/src/config_tree.mli
@@ -50,3 +50,5 @@ val render_config : ?ord_val:bool -> t -> string
val render_json : t -> string
val render_json_ast : t -> string
+
+val render_at_level : t -> string list -> string