Packages
caffeine_lang
5.5.0
6.3.1
6.3.0
6.2.2
6.2.1
6.2.0
6.1.2
6.1.1
6.1.0
6.0.0
5.6.0
5.5.0
5.4.4
5.4.3
5.4.2
5.4.1
5.4.0
5.3.0
5.2.0
5.1.1
5.1.0
5.0.12
5.0.11
5.0.10
5.0.8
5.0.7
5.0.6
5.0.5
5.0.4
5.0.1
5.0.0
4.10.0
4.9.0
4.8.3
4.8.2
4.8.1
4.8.0
4.7.9
4.7.8
4.7.7
4.7.6
4.7.5
4.6.7
4.6.6
4.6.5
4.6.4
4.6.3
4.6.2
4.6.0
4.5.1
4.5.0
4.4.4
4.4.3
4.4.1
4.4.0
4.3.7
4.3.6
3.0.6
3.0.5
3.0.4
3.0.3
3.0.2
3.0.1
3.0.0
2.0.5
2.0.4
2.0.3
2.0.2
2.0.1
2.0.0
1.0.2
1.0.1
0.1.0
0.0.24
0.0.23
0.0.22
0.0.21
0.0.20
0.0.19
0.0.18
0.0.17
0.0.16
0.0.15
0.0.14
0.0.13
0.0.12
0.0.11
0.0.10
0.0.9
0.0.8
0.0.7
0.0.6
0.0.5
0.0.4
0.0.2
0.0.1
A compiler for generating reliability artifacts from service expectation definitions.
Current section
Files
Jump to
Current section
Files
src/caffeine_lang/codegen/platforms.gleam
import caffeine_lang/analysis/vendor
import caffeine_lang/codegen/datadog
import caffeine_lang/codegen/generator_utils
import caffeine_lang/constants
import caffeine_lang/errors.{type CompilationError}
import caffeine_lang/linker/ir.{type IntermediateRepresentation, type Resolved}
import gleam/dict
import gleam/option
import gleam/result
import terra_madre/hcl
import terra_madre/terraform
/// Declarative configuration for a vendor's Terraform output:
/// the provider block, required-providers metadata, input variables,
/// and the function that turns IRs into Terraform resources.
pub type Platform {
Platform(
vendor: vendor.Vendor,
provider_name: String,
provider_source: String,
provider_version: String,
provider_attributes: List(#(String, hcl.Expr)),
variables: List(terraform.Variable),
generate_resources: fn(List(IntermediateRepresentation(Resolved))) ->
Result(#(List(terraform.Resource), List(String)), CompilationError),
)
}
/// Derive the TerraformSettings block for a platform.
pub fn terraform_settings(p: Platform) -> terraform.TerraformSettings {
terraform.TerraformSettings(
required_version: option.None,
required_providers: dict.from_list([
#(
p.provider_name,
terraform.ProviderRequirement(
p.provider_source,
option.Some(p.provider_version),
),
),
]),
backend: option.None,
cloud: option.None,
)
}
/// Derive the Provider block for a platform.
pub fn provider(p: Platform) -> terraform.Provider {
terraform.Provider(
name: p.provider_name,
alias: option.None,
attributes: dict.from_list(p.provider_attributes),
blocks: [],
)
}
/// Generate complete Terraform output (boilerplate + resources) for a platform.
/// Used in tests to produce full HCL for a single vendor in isolation.
pub fn generate_terraform(
p: Platform,
irs: List(IntermediateRepresentation(Resolved)),
) -> Result(#(String, List(String)), CompilationError) {
use #(resources, warnings) <- result.try(p.generate_resources(irs))
Ok(#(
generator_utils.render_terraform_config(
resources: resources,
settings: terraform_settings(p),
providers: [provider(p)],
variables: p.variables,
),
warnings,
))
}
// ==== Per-vendor platform definitions ====
pub fn datadog_platform() -> Platform {
Platform(
vendor: vendor.Datadog,
provider_name: constants.provider_datadog,
provider_source: "DataDog/datadog",
provider_version: "~> 3.0",
provider_attributes: [
#("api_key", hcl.ref("var.datadog_api_key")),
#("app_key", hcl.ref("var.datadog_app_key")),
],
variables: [
sensitive_string("datadog_api_key", "Datadog API key"),
sensitive_string("datadog_app_key", "Datadog Application key"),
],
generate_resources: datadog.generate_resources,
)
}
// ==== Variable constructors ====
fn typed_var(
name: String,
type_: String,
description: String,
sensitive: Bool,
) -> terraform.Variable {
terraform.Variable(
name: name,
type_constraint: option.Some(hcl.Identifier(type_)),
default: option.None,
description: option.Some(description),
sensitive: case sensitive {
True -> option.Some(True)
False -> option.None
},
nullable: option.None,
validation: [],
)
}
fn sensitive_string(name: String, description: String) -> terraform.Variable {
typed_var(name, "string", description, True)
}