Overview
| Comment: | Switch back (again) to servers required and increase total possible random delay before starting a server to 2 seconds |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | multi-transport |
| Files: | files | file ages | folders |
| SHA1: |
2b7b75cf87b546d691a72b4972c34e40 |
| User & Date: | matt on 2014-12-02 05:05:58 |
| Other Links: | branch diff | manifest | tags |
Context
|
2014-12-02
| ||
| 21:10 | Merged in multi-transport changes check-in: b85b307ce3 user: matt tags: archiving | |
| 05:05 | Switch back (again) to servers required and increase total possible random delay before starting a server to 2 seconds Closed-Leaf check-in: 2b7b75cf87 user: matt tags: multi-transport | |
| 05:02 | Add jitter to start time on servers and when starting bunch of servers rapidly do so in bunches of no more than five. check-in: 7e1b097420 user: matt tags: multi-transport | |
Changes
Modified tasks.scm from [079d38ec4c] to [b8966e83f8].
| ︙ | ︙ | |||
380 381 382 383 384 385 386 |
(let loop ((server-dat (tasks:get-server (db:delay-if-busy tdbdat) run-id))
(delay-time 0))
(if (and (not server-dat)
(< delay-time delay-max-tries))
(begin
(if (common:low-noise-print 60 "tasks:start-and-wait-for-server" run-id)
(debug:print 0 "Try starting server for run-id " run-id))
| | | 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 |
(let loop ((server-dat (tasks:get-server (db:delay-if-busy tdbdat) run-id))
(delay-time 0))
(if (and (not server-dat)
(< delay-time delay-max-tries))
(begin
(if (common:low-noise-print 60 "tasks:start-and-wait-for-server" run-id)
(debug:print 0 "Try starting server for run-id " run-id))
(thread-sleep! (/ (random 2000) 1000))
(server:kind-run run-id)
(thread-sleep! (min delay-time 1))
(loop (tasks:get-server (db:delay-if-busy tdbdat) run-id)(+ delay-time 1))))))
(define (tasks:get-all-servers mdb)
(let ((res '()))
(sqlite3:for-each-row
|
| ︙ | ︙ |
Modified tests/fullrun/megatest.config from [0e8e9bc7a7] to [73a88c14a3].
| ︙ | ︙ | |||
137 138 139 140 141 142 143 | # This server will keep running this number of hours after last access. # Three minutes is 0.05 hours # timeout 0.025 timeout 0.061 # Server is required - slower but more resistant to Sqlite issues. | | | 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 |
# This server will keep running this number of hours after last access.
# Three minutes is 0.05 hours
# timeout 0.025
timeout 0.061
# Server is required - slower but more resistant to Sqlite issues.
required yes
# Start server when average query takes longer than this
# server-query-threshold 55500
server-query-threshold 100
# daemonize yes
# hostname #{scheme (get-host-name)}
|
| ︙ | ︙ |