[Xen-changelog] [xen-unstable] oxenstored: when reading / read automatically the root node.

[Xen patchbot-unstable <patchbot-unstable@xxxxxxxxxxxxxxxxxxx>]

# HG changeset patch
# User Vincent Hanquez <vincent.hanquez@xxxxxxxxxxxxx>
# Date 1284141691 -3600
# Node ID f694fdd471ec51e7e3b1422d3617848d70ac2832
# Parent  862a07d67ea3a589da79a418941347c62a8aa604
oxenstored: when reading / read automatically the root node.

Signed-off-by: Vincent Hanquez <vincent.hanquez@xxxxxxxxxxxxx>
---
 tools/ocaml/xenstored/store.ml |    7 ++++++-
 1 files changed, 6 insertions(+), 1 deletion(-)

diff -r 862a07d67ea3 -r f694fdd471ec tools/ocaml/xenstored/store.ml
--- a/tools/ocaml/xenstored/store.ml    Fri Sep 10 18:57:47 2010 +0100
+++ b/tools/ocaml/xenstored/store.ml    Fri Sep 10 19:01:31 2010 +0100
@@ -300,7 +300,12 @@ let read store perm path =
                Node.check_perm ent perm Perms.READ;
                ent.Node.value
        in
-       Path.apply store.root path do_read
+       if path = [] then (
+               let ent = store.root in
+               Node.check_perm ent perm Perms.READ;
+               ent.Node.value
+       ) else
+               Path.apply store.root path do_read
 
 let ls store perm path =
        let children =

_______________________________________________
Xen-changelog mailing list
Xen-changelog@xxxxxxxxxxxxxxxxxxx
http://lists.xensource.com/xen-changelog