#+TITLE: System Manifest (manifest.org) #+AUTHOR: Agent #+FILETAGS: :harness:manifest: #+STARTUP: content * Overview The *System Manifest* defines the structural components of the OpenCortex. It serves as the primary system definition for ASDF and the test orchestrator. * Implementation ** Main System #+begin_src lisp :tangle (expand-file-name "../opencortex.asd" (concat (or (getenv "INSTALL_DIR") ".") "/harness")) (defsystem :opencortex :name "opencortex" :author "Amr Gharbeia" :version "0.2.0" :license "AGPLv3" :description "The Probabilistic-Deterministic Lisp Machine" :depends-on (:usocket :bordeaux-threads :dexador :uiop :cl-dotenv :cl-ppcre :hunchentoot :ironclad :str :cl-json :uuid) :serial t :components ((:file "harness/package") (:file "harness/skills") (:file "harness/memory") (:file "harness/communication") (:file "harness/communication-validator") (:file "harness/perceive") (:file "harness/reason") (:file "harness/act") (:file "harness/context") (:file "harness/loop") (:file "skills/org-skill-diagnostics") (:file "skills/org-skill-config-manager") (:file "skills/org-skill-gateway-manager") (:file "skills/org-skill-policy") (:file "skills/org-skill-bouncer") (:file "skills/org-skill-scribe") (:file "skills/org-skill-gardener") (:file "skills/org-skill-llm-gateway") (:file "skills/org-skill-llama-backend") (:file "skills/org-skill-shell-actuator") (:file "skills/org-skill-emacs-edit") (:file "skills/org-skill-self-edit") (:file "skills/org-skill-self-fix") (:file "skills/org-skill-lisp-utils") (:file "skills/org-skill-literate-programming") (:file "skills/org-skill-protocol-validator") (:file "skills/org-skill-tool-permissions") (:file "skills/org-skill-peripheral-vision") (:file "skills/org-skill-cli-gateway") (:file "skills/org-skill-engineering-standards") (:file "skills/org-skill-credentials-vault"))) #+end_src ** Test System #+begin_src lisp :tangle (expand-file-name "../opencortex.asd" (concat (or (getenv "INSTALL_DIR") ".") "/harness")) (defsystem :opencortex/tests :depends-on (:opencortex :fiveam) :components ((:file "tests/pipeline-act-tests") (:file "tests/boot-sequence-tests") (:file "tests/immune-system-tests") (:file "tests/memory-tests") (:file "tests/pipeline-perceive-tests") (:file "tests/pipeline-reason-tests") (:file "tests/peripheral-vision-tests") (:file "tests/emacs-edit-tests") (:file "tests/engineering-standards-tests") (:file "tests/lisp-utils-tests") (:file "tests/literate-programming-tests") (:file "tests/self-edit-tests") (:file "tests/tool-permissions-tests") (:file "tests/diagnostics-tests") (:file "tests/config-manager-tests") (:file "tests/gateway-manager-tests") (:file "tests/tui-tests"))) #+end_src ** TUI System #+begin_src lisp :tangle (expand-file-name "../opencortex.asd" (concat (or (getenv "INSTALL_DIR") ".") "/harness")) (defsystem :opencortex/tui :depends-on (:opencortex :croatoan :usocket :bordeaux-threads) :components ((:file "harness/tui-client"))) #+end_src ** Test Orchestrator #+begin_src lisp :tangle (expand-file-name "run-all-tests.lisp" (concat (or (getenv "INSTALL_DIR") ".") "/harness")) (asdf:load-system :opencortex/tests) (format t "~%=== Running ALL Test Suites ===~%") (dolist (suite-spec '(("OPENCORTEX-BOOT-TESTS" "BOOT-SUITE") ("OPENCORTEX-COMMUNICATION-TESTS" "COMMUNICATION-PROTOCOL-SUITE") ("OPENCORTEX-PIPELINE-ACT-TESTS" "PIPELINE-ACT-SUITE") ("OPENCORTEX-MEMORY-TESTS" "MEMORY-SUITE") ("OPENCORTEX-ENGINEERING-STANDARDS-TESTS" "ENGINEERING-STANDARDS-SUITE") ("OPENCORTEX-DIAGNOSTICS-TESTS" "DIAGNOSTICS-SUITE") ("OPENCORTEX-GATEWAY-MANAGER-TESTS" "GATEWAY-SUITE"))) (let ((pkg (find-package (first suite-spec)))) (when pkg (let ((suite-sym (find-symbol (second suite-spec) pkg))) (when suite-sym (fiveam:run! suite-sym)))))) (format t "~%=== ALL TESTS COMPLETE ===~%") #+end_src