Merge pull request #1047 from johnelse/sr-scan-logging

Remove some spammy logging associated with SR.scan

Author: zli

ocaml/idl/ocaml_backend/server_helpers.ml

@@ -19,9 +19,6 @@ open Threadext
 module D = Debug.Debugger(struct let name = "dispatcher" end)
 open D
 
-module Real = Debug.Debugger(struct let name = "taskhelper" end)
-module Dummy = Debug.Debugger(struct let name = "dummytaskhelper" end)
-
 exception Dispatcher_FieldNotFound of string
 let my_assoc fld assoc_list =
   try

ocaml/idl/ocaml_backend/taskHelper.ml

@@ -12,7 +12,6 @@
  * GNU Lesser General Public License for more details.
  *)
 module D = Debug.Debugger(struct let name = "taskhelper" end)
-module Dummy = Debug.Debugger(struct let name = "dummytaskhelper" end)
 open D
 
 (*open API*)

ocaml/xapi/xapi_sr_operations.ml

@@ -80,11 +80,6 @@ let valid_operations ~__context record _ref' : table =
   (* First consider the backend SM features *)
   let sm_features = features_of_sr record in
 
-  info "SR %s has features: [ %s ]" _ref (String.concat ", "
-    (List.map
-      (fun f -> Smint.(f |> capability_of_feature |> string_of_capability))
-      sm_features));
-
   (* Then filter out the operations we don't want to see for the magic tools SR *)
   let sm_features =
     if Helpers.is_tools_sr ~__context ~sr:_ref'

scripts/xapi.conf

@@ -1,4 +1,4 @@
 # The xapi config file
 
 use-xenopsd = true
-disable-logging-for = http db_write redo_log
+disable-logging-for = http db_write redo_log api_readonly