#+TITLE: SKILL: Environment Config Agent (Homoiconic Configuration)
#+ID: skill-environment-config-agent
#+STARTUP: content

* Overview
The **Environment Config Agent** implements the "Homoiconic Configuration" pattern for the Memex. It provides a centralized API for retrieving system settings directly from Org-mode properties, ensuring that the user's environment is defined and managed within their own notes rather than opaque dotfiles.

* The Configuration Mandate
1. **Single Source of Truth:** All system configuration should be discoverable within the Memex notes.
2. **Centralization:** Provide a unified interface for other skills to query global state.
3. **Hierarchy:** Support tiered model selection (Fast vs. Powerful) based on user-defined properties.

* Symbolic Implementation (The Logic)
The implementation focuses on high-performance hash-map lookups against the global object store.

** Architectural Intent: Attribute Retrieval
This function scans the headline properties across the entire Memex to find specific configuration keys, enabling a truly decentralized yet queryable state.

#+begin_src lisp
(defun get-config-attribute (property-key &optional default)
  "Searches the global *object-store* for any headline containing PROPERTY-KEY."
  (let ((store org-agent:*object-store*))
    (maphash (lambda (id obj)
               (declare (ignore id))
               (when (eq (org-agent:org-object-type obj) :HEADLINE)
                 (let ((val (getf (org-agent:org-object-attributes obj) property-key)))
                   (when val
                     (return-from get-config-attribute val)))))
             store)
    default))
#+end_src

** Architectural Intent: Tiered Model Selection
Abstracts the complexity of model selection by allowing other skills to request a "Tier" (e.g., :POWERFUL) which is then resolved to a specific model ID based on the user's environment.

#+begin_src lisp
(defun get-tiered-model (tier default-model)
  "Retrieves a model ID based on a tier keyword (:POWERFUL, :FAST, :FREE)."
  (let ((prop (case tier
                (:powerful :LLM_MODEL_POWERFUL)
                (:fast     :LLM_MODEL_FAST)
                (:free     :LLM_MODEL_FREE)
                (t         :LLM_MODEL_TEXT))))
    (get-config-attribute prop default-model)))
#+end_src

* Registration
#+begin_src lisp
(defskill :skill-environment-config
  :priority 100 ; Foundational skill
  :trigger (lambda (context) nil) ; No cognitive trigger
  :neuro (lambda (context) nil)
  :symbolic (lambda (action context) action))
#+end_src