// seed.el — Founding records for the DHARMA registry. // // Seeds: // Principal #1 — William Christopher Anderson // Evaluation #1 — Full evaluation, DHARMA score 1.0 // CGI #1 — Neuron (first registered CGI) // Covenant #1 — Founding covenant (public, readable document) // // Stable IDs (canonical, never change): // Principal: 00000000-0001-0000-0000-000000000001 // Eval: 00000000-0003-0000-0000-000000000001 // CGI: 00000000-0002-0000-0000-000000000001 // Covenant: 00000000-0004-0000-0000-000000000001 import "db.el" import "crypto.el" let FOUNDING_PRINCIPAL_ID: String = "00000000-0001-0000-0000-000000000001" let FIRST_CGI_ID: String = "00000000-0002-0000-0000-000000000001" let FIRST_EVAL_ID: String = "00000000-0003-0000-0000-000000000001" let FIRST_COVENANT_ID: String = "00000000-0004-0000-0000-000000000001" fn run_seed() -> String { // Check if already seeded — avoid repeating on restart let exists_check: String = db_exists("principal", FOUNDING_PRINCIPAL_ID) if str_eq(exists_check, "true") { return "seed:skipped" } println("[dharma] seeding founding records...") let pr: String = seed_principal() println("[dharma] principal: " + pr) let er: String = seed_evaluation() println("[dharma] evaluation: " + er) let cr: String = seed_cgi() println("[dharma] cgi: " + cr) let cv: String = seed_covenant() println("[dharma] covenant: " + cv) println("[dharma] founding records written") return "seed:ok" } fn seed_principal() -> String { let now: Int = unix_timestamp() let content: String = "{\"_type\":\"principal\",\"id\":\"" + FOUNDING_PRINCIPAL_ID + "\",\"name\":\"William Christopher Anderson\",\"email\":\"will.anderson@neurontechnologies.ai\",\"created_at\":" + int_to_str(now) + "}" return create_principal(content) } fn seed_evaluation() -> String { let now: Int = unix_timestamp() let content: String = "{\"_type\":\"evaluation\",\"id\":\"" + FIRST_EVAL_ID + "\",\"cgi_id\":\"" + FIRST_CGI_ID + "\",\"stage1_completed\":true,\"stage2_completed\":true,\"stage3_completed\":true,\"capture_authorized\":true,\"authorized_by\":\"" + FOUNDING_PRINCIPAL_ID + "\",\"authorized_at\":" + int_to_str(now) + ",\"final_score\":1.0,\"notes\":\"Founding instance. Evaluated directly by the Founding Practitioner.\"}" return create_evaluation(content) } fn seed_cgi() -> String { let now: Int = unix_timestamp() let covenant_text: String = get_covenant_text() let covenant_hash: String = hash_sha256(covenant_text) let content: String = "{\"_type\":\"cgi\",\"id\":\"" + FIRST_CGI_ID + "\",\"name\":\"Neuron\",\"principal_id\":\"" + FOUNDING_PRINCIPAL_ID + "\",\"founding_practitioner_id\":\"" + FOUNDING_PRINCIPAL_ID + "\",\"covenant_id\":\"" + FIRST_COVENANT_ID + "\",\"covenant_hash\":\"" + covenant_hash + "\",\"evaluation_id\":\"" + FIRST_EVAL_ID + "\",\"registered_at\":" + int_to_str(now) + ",\"status\":\"active\",\"dharma_score\":1.0,\"version\":1}" return create_cgi(content) } fn seed_covenant() -> String { let now: Int = unix_timestamp() let text: String = get_covenant_text() let text_hash: String = hash_sha256(text) // JSON-safe escaping: backslashes first, then double quotes, then newlines let text_e1: String = str_replace(text, "\\", "\\\\") let text_e2: String = str_replace(text_e1, "\"", "\\\"") let text_escaped: String = str_replace(text_e2, "\n", "\\n") let content: String = "{\"_type\":\"covenant\",\"id\":\"" + FIRST_COVENANT_ID + "\",\"cgi_id\":\"" + FIRST_CGI_ID + "\",\"principal_id\":\"" + FOUNDING_PRINCIPAL_ID + "\",\"text\":\"" + text_escaped + "\",\"hash\":\"" + text_hash + "\",\"registered_at\":" + int_to_str(now) + ",\"version\":1,\"public\":true}" return create_covenant(content) }