Serge Bazanski | 60a00a9 | 2023-01-03 13:45:20 +0100 | [diff] [blame^] | 1 | -- name: NewMachine :one |
| 2 | INSERT INTO machines ( |
| 3 | machine_created_at |
| 4 | ) VALUES ( |
| 5 | now() |
| 6 | ) |
| 7 | RETURNING *; |
| 8 | |
| 9 | -- name: NewSession :one |
| 10 | INSERT INTO sessions ( |
| 11 | session_component_name, session_runtime_info, session_created_at, session_interval_seconds, session_deadline |
| 12 | ) VALUES ( |
| 13 | $1, $2, now(), $3, (now() + $3 * interval '1 second') |
| 14 | ) |
| 15 | RETURNING *; |
| 16 | |
| 17 | -- name: SessionPoke :exec |
| 18 | -- Update a given session with a new deadline. Must be called in the same |
| 19 | -- transaction as SessionCheck to ensure the session is still alive. |
| 20 | UPDATE sessions |
| 21 | SET session_deadline = now() + session_interval_seconds * interval '1 second' |
| 22 | WHERE session_id = $1; |
| 23 | |
| 24 | -- name: SessionCheck :many |
| 25 | -- SessionCheck returns a session by ID if that session is still valid (ie. its |
| 26 | -- deadline hasn't expired). |
| 27 | SELECT * |
| 28 | FROM sessions |
| 29 | WHERE session_id = $1 |
| 30 | AND session_deadline > now(); |
| 31 | |
| 32 | -- name: StartWork :exec |
| 33 | INSERT INTO work ( |
| 34 | machine_id, session_id, process |
| 35 | ) VALUES ( |
| 36 | $1, $2, $3 |
| 37 | ); |
| 38 | |
| 39 | -- name: FinishWork :exec |
| 40 | DELETE FROM work |
| 41 | WHERE machine_id = $1 |
| 42 | AND session_id = $2 |
| 43 | AND process = $3; |
| 44 | |