memex/notes/org-skill-memex.org

SKILL: Memex Manager (Universal Literate Note)

• Overview
• Phase A: Demand (PRD)
  • 1. Purpose
  • 2. User Needs
  • 3. Success Criteria
    • Metadata Audit Accuracy
    • Task Promotion Verification
    • Note Distillation Provenance
• Phase B: Blueprint (PROTOCOL)
  • 1. Architectural Intent
  • 2. Semantic Interfaces
• Phase D: Build (Implementation)
  • Metadata Audit
  • Task Promotion
• Registration

Overview

The Memex Manager is the primary automation engine for the Personal Knowledge Management system. It enforces metadata standards, automates task lifecycles, and distills ephemeral daily logs into timeless knowledge.

Phase A: Demand (PRD)

1. Purpose

Define automated behaviors for knowledge and task management integrity.

2. User Needs

• Unified Capture: Landing all new information in `inbox.org`.
• Metadata Compliance: Mandatory `:CREATED:` and `:LOGBOOK:` drawers.
• Automated Task Lifecycle: `NEXT` promotion logic for GTD.
• Mobile Sovereignty: Compatibility with Markor and Orgzly.
• Agentic Distillation: Extracting evergreen concepts from daily logs.

3. Success Criteria

TODO Metadata Audit Accuracy

TODO Task Promotion Verification

TODO Note Distillation Provenance

Phase B: Blueprint (PROTOCOL)

1. Architectural Intent

Interfaces for AST-driven task and note manipulation. Source of truth is the Org-mode filesystem.

2. Semantic Interfaces

(defun memex-audit-metadata (file-path)
  "Parses an Org file to ensure standards compliance.")

(defun memex-promote-next-task (project-id)
  "Triggered when a task is marked DONE; promotes the successor.")

(defun memex-distill-atomic-note (daily-file-path concept-query)
  "Extracts a concept and creates a permanent note.")

Phase D: Build (Implementation)

Metadata Audit

(defun memex-audit-metadata (file-path)
  (let ((content (uiop:read-file-string file-path))
        (errors '()))
    (with-input-from-string (s content)
      (loop for line = (read-line s nil)
            while line
            do (when (cl-ppcre:scan "^\\*+ " line)
                 (let ((next (read-line s nil)))
                   (unless (and next (cl-ppcre:scan ":PROPERTIES:" next))
                     (push line errors))))))
    errors))

Task Promotion

(defun memex-promote-next-task (project-id)
  (let ((gtd-file (or (uiop:getenv "GTD_FILE") "gtd.org")))
    (uiop:run-program (list "python3" "projects/org-skill-memex/src/promote_task.py" gtd-file project-id))))

Registration

(defskill :skill-memex
  :priority 80
  :trigger #'trigger-skill-memex
  :neuro #'neuro-skill-memex
  :symbolic #'memex-audit-metadata)