Orkuncakilkaya
71735b10a2
ludic.base's Queue<T> carries a QueueTag (its name and pending count): queue_new(name), q_push(q, v), q_drain(q), q_clear(q) take no BaseState, and core_undrained(tags) names the given queues still holding facts. A reducer on a package's state can now call that package's verbs (wallet_earn(wallet_st, n)). ludic migrate state --prune (ludicc --migrate-prune) takes out each state parameter a function no longer uses, nor anything it calls, and the argument that fills it - including an argument for a parameter the callee has dropped, which is taken out before the call is checked, so a generic's T is told by the argument that says it. A reducer keeps its state. --dry-run now counts the edits it would make. Every package was moved with it: 608 base_st parameters and their arguments, 1889 edits. Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
69 lines
3.1 KiB
Text
69 lines
3.1 KiB
Text
# send.ludic - every frame: a batch when one is due, its answer when it lands, the wait doubled
|
|
# when it failed, the queue on disk every few seconds. One request at a time; nothing waits on it.
|
|
|
|
export function telemetry_tick(telemetry_st: mut TelemetryState) -> void {
|
|
if not telemetry_st.telemetry__ready { return }
|
|
telemetry__id_tick(telemetry_st)
|
|
if not telemetry__enabled() {
|
|
if len(telemetry_st.telemetry__q) > 0 or telemetry_st.telemetry__h >= 0 { telemetry_forget(telemetry_st) }
|
|
return
|
|
}
|
|
if not telemetry__can_send(telemetry_st) { return }
|
|
let now = telemetry__now()
|
|
let c = telemetry__conf(telemetry_st)
|
|
if not telemetry_st.telemetry__clock_on {
|
|
telemetry_st.telemetry__clock_on = true
|
|
telemetry_st.telemetry__next_ms = now + c.flush_ms
|
|
telemetry_st.telemetry__saved_ms = now
|
|
}
|
|
if now - telemetry_st.telemetry__saved_ms >= c.save_ms {
|
|
telemetry_save(telemetry_st)
|
|
telemetry_st.telemetry__saved_ms = now
|
|
}
|
|
if telemetry_st.telemetry__h >= 0 {
|
|
telemetry__answer(telemetry_st, now)
|
|
return
|
|
}
|
|
if len(telemetry_st.telemetry__q) == 0 { return }
|
|
let early = telemetry_st.telemetry__fails == 0 and len(telemetry_st.telemetry__q) >= c.flush_at
|
|
if early or now >= telemetry_st.telemetry__next_ms {
|
|
telemetry_save(telemetry_st)
|
|
telemetry__flush(telemetry_st, now)
|
|
if telemetry_st.telemetry__fails == 0 { telemetry_st.telemetry__next_ms = now + c.flush_ms }
|
|
}
|
|
}
|
|
|
|
function telemetry__answer(telemetry_st: mut TelemetryState, now: int) -> void {
|
|
let st = telemetry__poll(telemetry_st.telemetry__h)
|
|
if st < 0 { return }
|
|
telemetry_st.telemetry__h = -1
|
|
if st > 0 {
|
|
telemetry__queue_drop(telemetry_st, telemetry_st.telemetry__sent_n)
|
|
telemetry_st.telemetry__fails = 0
|
|
telemetry_st.telemetry__next_ms = now + telemetry__conf(telemetry_st).flush_ms
|
|
telemetry__fact(telemetry_st, TELEMETRY_SENT, telemetry_st.telemetry__sent_n, st, 0)
|
|
} else {
|
|
telemetry__backoff(telemetry_st, now)
|
|
telemetry__fact(telemetry_st, TELEMETRY_FAILED, telemetry_st.telemetry__sent_n, st, telemetry_st.telemetry__next_ms - now)
|
|
}
|
|
telemetry_save(telemetry_st)
|
|
}
|
|
|
|
function telemetry__flush(telemetry_st: mut TelemetryState, now: int) -> void {
|
|
if telemetry_st.telemetry__h >= 0 or len(telemetry_st.telemetry__id) == 0 or len(telemetry_st.telemetry__q) == 0 { return }
|
|
let n = min(telemetry__conf(telemetry_st).batch, len(telemetry_st.telemetry__q))
|
|
let h = telemetry__send(telemetry_st, telemetry_batch_body(telemetry_st, n))
|
|
if h < 0 {
|
|
telemetry__backoff(telemetry_st, now)
|
|
telemetry__fact(telemetry_st, TELEMETRY_FAILED, n, 0, telemetry_st.telemetry__next_ms - now)
|
|
return
|
|
}
|
|
telemetry_st.telemetry__h = h
|
|
telemetry_st.telemetry__sent_n = n
|
|
}
|
|
|
|
# a failed send: wait twice as long next time, up to backoff_max doublings
|
|
function telemetry__backoff(telemetry_st: mut TelemetryState, now: int) -> void {
|
|
if telemetry_st.telemetry__fails < telemetry__conf(telemetry_st).backoff_max { telemetry_st.telemetry__fails += 1 }
|
|
telemetry_st.telemetry__next_ms = now + (telemetry__conf(telemetry_st).flush_ms << telemetry_st.telemetry__fails)
|
|
}
|