Files
passepartout/skills/org-skill-credentials-vault.org
Amr Gharbeia 1eb8a3db92 refactor(skills): use %%SKILLS_DIR%% placeholder for portable tangling
- Updated 22 skill org files to use %%SKILLS_DIR%% placeholder
- Modified opencortex.sh setup to replace placeholder with XDG path
- Modified doctor_repair to handle placeholder replacement
- Removed hardcoded absolute path
2026-04-30 11:14:31 -04:00

1.4 KiB

SKILL: Credentials Vault (org-skill-credentials-vault.org)

Overview

The Credentials Vault provides secure in-memory storage for sensitive API keys and session tokens.

Implementation

Vault Storage

(defvar *vault-memory* (make-hash-table :test 'equal)
  "In-memory cache of sensitive credentials.")

Secret Management

(defun vault-get-secret (provider &key (type :api-key))
  "Retrieves a credential from the vault or environment."
  (let* ((key (format nil "~a-~a" provider type))
         (val (gethash key *vault-memory*)))
    (if val
        val
        (let ((env-var (case provider
                          (:gemini "GEMINI_API_KEY")
                          (:openai "OPENAI_API_KEY")
                          (:anthropic "ANTHROPIC_API_KEY")
                          (:openrouter "OPENROUTER_API_KEY")
                          (otherwise nil))))
          (when env-var (uiop:getenv env-var))))))

(defun vault-set-secret (provider secret &key (type :api-key))
  "Stores a secret in the vault."
  (let ((key (format nil "~a-~a" provider type)))
    (setf (gethash key *vault-memory*) secret)))

Skill Registration

(defskill :skill-credentials-vault
  :priority 600
  :trigger (lambda (ctx) (declare (ignore ctx)) nil))