ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-09-17 13:37:20 +03:00
Code Issues Packages Projects Releases Wiki Activity

ames: consolidate dead flows to a single behn timer

Browse Source
This commit is contained in:
pkova 2023-07-25 02:22:19 +03:00 committed by Pyry Kovanen
parent c35aabcebf
commit d2956a3233
1 changed files with 21 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
pkg/arvo/sys/vane/ames.hoon
View File

@ -1756,7 +1756,10 @@
14+(state-13-to-14:load:adult-core +.u.cached-state)
=? u.cached-state ?=(%14 -.u.cached-state)
15+(state-14-to-15:load:adult-core +.u.cached-state)
=? u.cached-state ?=(%15 -.u.cached-state)
=^ moz u.cached-state
?. ?=(%15 -.u.cached-state) [~ u.cached-state]
~> %slog.0^leaf/"ames: init dead flow consolidation timer"
:- [[/ames]~ %pass /dead-flow %b %wait `@da`(add now ~m2)]~
16+(state-15-to-16:load:adult-core +.u.cached-state)
?> ?=(%16 -.u.cached-state)
=. ames-state.adult-gate +.u.cached-state
@ -2396,6 +2399,20 @@
event-core
(request-attestation u.ship)
::
?: ?=([%dead-flow ~] wire)
=; cor=event-core
(emit:cor duct %pass /dead-flow %b %wait `@da`(add now ~m2))
%- ~(rep by peers.ames-state)
|= [[=ship =ship-state] core=_event-core]
^+ event-core
=/ peer-state=(unit peer-state) (get-peer-state:core ship)
?~ peer-state core
%- ~(rep by snd.u.peer-state)
|= [[=bone =message-pump-state] cor=_core]
?. =(~m2 rto.metrics.packet-pump-state.message-pump-state)
cor
abet:(on-wake:(abed-peer:pe:cor ship u.peer-state) bone error)
::
?. ?=([%recork ~] wire)
=/ res=(unit ?([%fine her=ship =^wire] [%pump her=ship =bone]))
?+ wire ~
@ -3976,9 +3993,11 @@
::
=? peer-core !=(~ next-wake.state)
(pu-emit %b %rest (need next-wake.state))
:: set new timer if non-null
:: set new timer if non-null and not at max-backoff
::
=? peer-core ?=(^ new-wake)
?: =(~m2 rto.metrics.state)
peer-core
(pu-emit %b %wait u.new-wake)
::
=? next-wake.state !=(~ next-wake.state) ~ :: unset