ocaml/xapi/xapi_globs.ml |  7 ++++---
 1 files changed, 4 insertions(+), 3 deletions(-)


# HG changeset patch
# User Marcus Granado <[email protected]>
# Date 1274449016 -3600
# Node ID 2cb0cc2a496431b098d0cd44fbb7c33a9ac82f78
# Parent  73391140afa5c39e819adcac880d385ca7b1a14c
CA-34933: there should be more sessions than tasks

Signed-off-by: Marcus Granado <[email protected]>

diff -r 73391140afa5 -r 2cb0cc2a4964 ocaml/xapi/xapi_globs.ml
--- a/ocaml/xapi/xapi_globs.ml
+++ b/ocaml/xapi/xapi_globs.ml
@@ -217,15 +217,16 @@
    the disk flushing *)
 let migration_extra_paths_key = "migration_extra_paths"
 
-(* After this we start to invalidate older sessions *)
-let max_sessions = 200
-
 (* If a session has a last_active older than this we delete it *)
 let inactive_session_timeout = 24. *. 60. *. 60. (* 24 hrs in seconds *) 
 
 (* After this we start to delete completed tasks (never pending ones) *)
 let max_tasks = 200
 
+(* After this we start to invalidate older sessions *)
+(* We must allow for more sessions than running tasks *)
+let max_sessions = max_tasks * 2
+
 let completed_task_timeout = 65. *. 60. (* 65 mins *)
 
 let pending_task_timeout = 24. *. 60. *. 60. (* 24 hrs in seconds *) 
# HG changeset patch
# User Marcus Granado <[email protected]>
# Date 1274449016 -3600
# Node ID 2cb0cc2a496431b098d0cd44fbb7c33a9ac82f78
# Parent  73391140afa5c39e819adcac880d385ca7b1a14c
CA-34933: there should be more sessions than tasks

Signed-off-by: Marcus Granado <[email protected]>

diff -r 73391140afa5 -r 2cb0cc2a4964 ocaml/xapi/xapi_globs.ml
--- a/ocaml/xapi/xapi_globs.ml
+++ b/ocaml/xapi/xapi_globs.ml
@@ -217,15 +217,16 @@
    the disk flushing *)
 let migration_extra_paths_key = "migration_extra_paths"
 
-(* After this we start to invalidate older sessions *)
-let max_sessions = 200
-
 (* If a session has a last_active older than this we delete it *)
 let inactive_session_timeout = 24. *. 60. *. 60. (* 24 hrs in seconds *) 
 
 (* After this we start to delete completed tasks (never pending ones) *)
 let max_tasks = 200
 
+(* After this we start to invalidate older sessions *)
+(* We must allow for more sessions than running tasks *)
+let max_sessions = max_tasks * 2
+
 let completed_task_timeout = 65. *. 60. (* 65 mins *)
 
 let pending_task_timeout = 24. *. 60. *. 60. (* 24 hrs in seconds *) 
_______________________________________________
xen-api mailing list
[email protected]
http://lists.xensource.com/mailman/listinfo/xen-api

Reply via email to