Overview
| Comment: | Changed ready to merge to just ready in setcicd. Changed load tolerance from 4 to 10 in server start. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | v1.81-journal-based-throttling |
| Files: | files | file ages | folders |
| SHA1: |
3fd515775a881051b747a58d6cdee838 |
| User & Date: | mrwellan on 2024-07-11 15:29:45 |
| Other Links: | branch diff | manifest | tags |
Context
|
2024-07-11
| ||
| 15:29 | Changed ready to merge to just ready in setcicd. Changed load tolerance from 4 to 10 in server start. Leaf check-in: 3fd515775a user: mrwellan tags: v1.81-journal-based-throttling | |
| 14:40 | Improve message for journal load check-in: f5a00d621d user: mrwellan tags: v1.81-journal-based-throttling | |
Changes
Modified tcp-transportmod.scm from [d0258d10eb] to [b9c6fed28d].
| ︙ | ︙ | |||
919 920 921 922 923 924 925 | #f (let* ((load (get-normalized-cpu-load)) (srvrs (tt:find-server areapath dbfname)) (trying (length srvrs)) (nrun (number-of-processes-running (conc "mtest.*server.*"testsuite".*"dbfname)))) (set! *last-server-start-request-time* (current-seconds)) (cond | | | | 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 | #f (let* ((load (get-normalized-cpu-load)) (srvrs (tt:find-server areapath dbfname)) (trying (length srvrs)) (nrun (number-of-processes-running (conc "mtest.*server.*"testsuite".*"dbfname)))) (set! *last-server-start-request-time* (current-seconds)) (cond ((> load 10.0) (debug:print 0 *default-log-port* "Normalized load " load " over 10, (load: " (commonmod:get-cpu-load) " cores: " (get-current-host-cores) " exiting...") (thread-sleep! 1) ;; I'm not convinced that a delay here is helpful. -mrw- #f) ((> nrun 100) (debug:print 0 *default-log-port* nrun" servers running on " (get-host-name) ", not starting another.") (thread-sleep! 1) #f) ((> trying 3) |
| ︙ | ︙ |
Modified utils/setcicd from [bb9f0e8cef] to [5cf60422ad].
1 2 3 4 |
#!/bin/bash
branch=$(fossil branch current)
wikiname=${branch}_cicd
| | | 1 2 3 4 5 6 7 8 9 10 |
#!/bin/bash
branch=$(fossil branch current)
wikiname=${branch}_cicd
echo "ready" > $wikiname
if fossil wiki export $wikiname;then
fossil wiki commit $wikiname $wikiname
else
fossil wiki create $wikiname $wikiname
fi
|