WARNING - OLD ARCHIVES

This is an archived copy of the Xen.org mailing list, which we have preserved to ensure that existing links to archives are not broken. The live archive, which contains the latest emails, can be found at http://lists.xen.org/
   
 
 
Xen 
 
Home Products Support Community News
 
   
 

xen-api

[Xen-API] [PATCH] CA-34034: add default_args to audit params

To: xen-api <xen-api@xxxxxxxxxxxxxxxxxxx>
Subject: [Xen-API] [PATCH] CA-34034: add default_args to audit params
From: Marcus Granado <marcus.granado@xxxxxxxxxx>
Date: Fri, 13 Nov 2009 14:02:04 +0000
Delivery-date: Fri, 13 Nov 2009 06:02:16 -0800
Envelope-to: www-data@xxxxxxxxxxxxxxxxxxx
List-help: <mailto:xen-api-request@lists.xensource.com?subject=help>
List-id: Discussion of API issues surrounding Xen <xen-api.lists.xensource.com>
List-post: <mailto:xen-api@lists.xensource.com>
List-subscribe: <http://lists.xensource.com/mailman/listinfo/xen-api>, <mailto:xen-api-request@lists.xensource.com?subject=subscribe>
List-unsubscribe: <http://lists.xensource.com/mailman/listinfo/xen-api>, <mailto:xen-api-request@lists.xensource.com?subject=unsubscribe>
Sender: xen-api-bounces@xxxxxxxxxxxxxxxxxxx
1 file changed, 1 insertion(+), 1 deletion(-)
ocaml/idl/ocaml_backend/gen_server.ml |    2 +-


# HG changeset patch
# User Marcus Granado <marcus.granado@xxxxxxxxxx>
# Date 1258120865 0
# Node ID c2e75d891d3dd4542066384cf07331bf727500ca
# Parent  45ecc8475cf84872bda0571d2d451a6b8a099a2c
CA-34034: add default_args to audit params

Signed-off-by: Marcus Granado <marcus.granado@xxxxxxxxxxxxx>

diff -r 45ecc8475cf8 -r c2e75d891d3d ocaml/idl/ocaml_backend/gen_server.ml
--- a/ocaml/idl/ocaml_backend/gen_server.ml     Thu Nov 12 18:49:52 2009 +0000
+++ b/ocaml/idl/ocaml_backend/gen_server.ml     Fri Nov 13 14:01:05 2009 +0000
@@ -157,7 +157,7 @@
   in
   let rbac_check_begin = if has_session_arg
     then [
-                       "let arg_names = "^(List.fold_right (fun arg args -> 
"\""^arg^"\"::"^args) string_args "[]")^" in";
+                       "let arg_names = "^(List.fold_right (fun arg args -> 
"\""^arg^"\"::"^args) string_args (if is_non_constructor_with_defaults then 
"\"default_args\"::[]" else "[]"))^" in";
                        "Rbac.check session_id __call 
~args:(arg_names,__params) ~__context ~fn:(fun ()-> (*RBAC-BEGIN*)"]
     else []
   in

Attachment: xen-api.hg.patch
Description: Text Data

_______________________________________________
xen-api mailing list
xen-api@xxxxxxxxxxxxxxxxxxx
http://lists.xensource.com/mailman/listinfo/xen-api
<Prev in Thread] Current Thread [Next in Thread>
  • [Xen-API] [PATCH] CA-34034: add default_args to audit params, Marcus Granado <=