mirror of
https://github.com/MeshCore-Beacon/beacon-server.git
synced 2026-11-13 23:17:40 +00:00
MrAlders0n
94b4b40f9b
* feat(planguard): read sqlc statement text and load a strict plan corpus * fix(planguard): fail on unextracted statements, keep fragments mode-neutral * feat(planguard): plan assertions, scoped sort exemptions and narrow retired-index verdicts * fix(planguard): an errored run always fails * fix(planguard): keep subplan conds off their parent scan; fail on unanalyzed budgets * feat(planguard): read-only plan runner, reports and the run command * fix(planguard): validate identifiers in emitted scripts; prove read-only runs * feat(planguard): end-state corpus, planted regressions and the generated cached-plan policy * fix(planguard): derive observer cases from data; mark legacy generic plans * fix(planguard): bound the dense-region route resolvers; test policy refusals * fix(planguard): re-measure the dense-region route cases; cover every policy refusal * feat(planguard): synthetic fixture built through the migrations, checked in CI * ci(planguard): build the fixture once; guard fixture data for identifiers * fix(planguard): hash every fixture generator input; harden the fixture guard * feat(planguard): snapshot diff over every column, named result classes and cursor walks * fix(planguard): bound the relaxed diff classes; derive the cursor tie from data * fix(planguard): refuse multi-statement text in the corpus runner * feat: read-only server mode and an HTTP page diff between two builds * fix(planguard): refuse escape strings and psql meta-commands in corpus text * fix: storediff follows each build's own cursor; prove read-only gates via the log * fix(planguard): match the PostgreSQL lexer on high-bit bytes; check every emitted line * feat(admin): daily read-only plan check on the maintenance pool, its metric and report * feat(planguard): daily prod check behind planguard.daily_check * fix(planguard): cancel fresh runs at shutdown; expose a never-ran check * ci(planguard): pin the fixture server and collation; refresh baselines * fix(planguard): calibrate route budgets on one dataset; skip entries whose index is absent
54 lines
2.7 KiB
SQL
54 lines
2.7 KiB
SQL
-- Copyright 2026 Beacon Contributors
|
|
-- SPDX-License-Identifier: AGPL-3.0-or-later
|
|
|
|
-- name: ListPacketsBySitesSinceFirst :many
|
|
-- params: $1 iatas, $2 cursor_ts, $3 cursor_hash, $4 limit, $5 since (-infinity), $6 until (infinity), $7 payload_types int[], $8 route_types int[]
|
|
WITH page AS MATERIALIZED (
|
|
SELECT s.packet_hash, max(s.site_heard_at) AS k
|
|
FROM unnest($1::bpchar[]) AS req(iata)
|
|
CROSS JOIN LATERAL (
|
|
SELECT ps.packet_hash, ps.site_heard_at
|
|
FROM packet_sites ps
|
|
WHERE ps.iata = req.iata
|
|
AND (ps.site_heard_at, ps.packet_hash) < ($2::timestamptz, $3::bytea)
|
|
AND ps.first_heard_at >= $5::timestamptz AND ps.first_heard_at <= $6::timestamptz
|
|
AND (ps.payload_type + 0) = ANY($7::int[]) AND (ps.route_type + 0) = ANY($8::int[])
|
|
ORDER BY ps.site_heard_at DESC, ps.packet_hash DESC
|
|
LIMIT $4) s
|
|
GROUP BY s.packet_hash
|
|
ORDER BY max(s.site_heard_at) DESC, s.packet_hash DESC
|
|
LIMIT $4)
|
|
SELECT p.packet_hash, p.payload_type,
|
|
COALESCE(CASE
|
|
WHEN p.payload_type = 4 AND jsonb_typeof(p.parsed_payload #> '{appData,name}') = 'string'
|
|
THEN p.parsed_payload #>> '{appData,name}'
|
|
WHEN p.payload_type = 3 AND p.parsed_payload ->> 'type' = 'ACK'
|
|
AND jsonb_typeof(p.parsed_payload -> 'checksum') = 'string'
|
|
AND p.parsed_payload ->> 'checksum' ~ '^[0-9a-fA-F]{8}$'
|
|
THEN 'ACK ' || lower(p.parsed_payload ->> 'checksum')
|
|
WHEN p.payload_type = 9 AND p.parsed_payload ->> 'type' IN ('TRACE', 'PING')
|
|
AND jsonb_typeof(p.parsed_payload -> 'traceTag') = 'string'
|
|
AND p.parsed_payload ->> 'traceTag' ~ '^[0-9a-fA-F]{8}$'
|
|
THEN (p.parsed_payload ->> 'type') || ' ' || lower(p.parsed_payload ->> 'traceTag')
|
|
END, '')::text AS summary,
|
|
p.route_type,
|
|
p.first_heard_at, p.last_heard_at, p.scope_id, ts.name AS scope_name,
|
|
pg.k AS site_heard_at,
|
|
p.observation_count AS observation_count,
|
|
po.observer_id AS latest_observer_id, o.display_name AS latest_observer_name,
|
|
COALESCE(po.iata, ''::bpchar) AS latest_observer_iata,
|
|
COALESCE(po.path_length_byte, 0::smallint) AS latest_observer_path_length_byte,
|
|
COALESCE(po.hash_size, 0::smallint) AS latest_observer_hash_size,
|
|
COALESCE(po.hop_count, 0::smallint) AS latest_observer_hop_count,
|
|
po.path_bytes AS latest_observer_path_bytes, p.raw_payload, p.origin_pubkey
|
|
FROM page pg
|
|
JOIN packets p ON p.packet_hash = pg.packet_hash
|
|
LEFT JOIN LATERAL (
|
|
SELECT observer_id, iata, path_length_byte, hash_size, hop_count, path_bytes
|
|
FROM packet_observations WHERE packet_hash = p.packet_hash
|
|
ORDER BY heard_at DESC, id DESC
|
|
LIMIT 1) po ON true
|
|
LEFT JOIN observers o ON o.id = po.observer_id
|
|
LEFT JOIN transport_scopes ts ON ts.id = p.scope_id
|
|
ORDER BY pg.k DESC, pg.packet_hash DESC
|