lib/secrets.nom


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

require "lib/core.nom"

compile [with secrets %block] to code: ".."
    do
        local secrets = {};
        \(%block as lua statements)
    end

# Access the lua variable that should be within scope
compile [secrets] to: "secrets"

compile [secret %key, secret value of %key, secret value for %key] to:
    assert ((%key's "type") == "Var") ".."
        |Wrong type, expected Var, but got: \(%key's "type")
    "secrets[\(repr (%key's "value"))]"

compile [secret %key = %new_value] to code:
    assert ((%key's "type") == "Var") ".."
        |Wrong type, expected Var, but got: \(%key's "type")
    "secrets[\(repr (%key's "value"))] = \(%new_value as lua);"

rule [rules about secrecy] =: ["with secrets %"]