memex/notes/org-skill-provider-openai.org

SKILL: OpenAI Provider Agent (Universal Literate Note)

• Overview
• Phase A: Demand (PRD)
  • 1. Purpose
  • 2. User Needs
  • 3. Success Criteria
    • API Authentication via Bearer Token
    • Chat Payload Construction
    • Choice Extraction Verification
• Phase B: Blueprint (PROTOCOL)
• Phase B: Blueprint (PROTOCOL)
  • 1. Architectural Intent
  • 2. Semantic Interfaces
    • `execute-openai-request`
• Phase D: Build (Implementation)
• Registration

Overview

The OpenAI Provider Agent integrates OpenAI's GPT models as a pluggable System 1 (neural) backend. It provides industry-standard processing capabilities for reasoning and content generation.

Phase A: Demand (PRD)

1. Purpose

Define the interface for reliable communication with the OpenAI Chat Completions API.

2. User Needs

• Compatibility: Full implementation of the Chat Completions protocol.
• Reliability: Secure management of `$OPENAI_API_KEY`.
• Optimized Inference: Configurable temperature and model selection (GPT-4o, etc.).
• Resilience: Graceful handling of timeouts and errors.

3. Success Criteria

TODO API Authentication via Bearer Token

TODO Chat Payload Construction

TODO Choice Extraction Verification

Phase B: Blueprint (PROTOCOL)

Phase B: Blueprint (PROTOCOL)

1. Architectural Intent

The OpenAI Provider Agent will act as a translator and executor for requests targeting OpenAI's Chat Completions API. It will abstract away the complexities of API authentication, payload construction, and response parsing, providing a clean and consistent interface for System 1 agents within the Lisp Machine. It prioritizes secure API key management using environment variables and offers configurable parameters for inference. The architecture focuses on resilience, managing potential API errors (timeouts, rate limits) through robust error handling.

2. Semantic Interfaces

`execute-openai-request`

:signature `(execute-openai-request prompt system-prompt &key model) :string` :description "Direct call to the OpenAI Chat Completions API."

Phase D: Build (Implementation)

(in-package :org-agent)

(defun execute-openai-request (prompt system-prompt &key model)
  (let ((api-key (uiop:getenv "OPENAI_API_KEY"))
        (endpoint "https://api.openai.com/v1/chat/completions")
        (model-id (or model "gpt-4o")))
    (unless api-key (return-from execute-openai-request "(:type :LOG :payload (:text \"OpenAI API Key missing\"))"))
    (let* ((headers `(("Content-Type" . "application/json")
                      ("Authorization" . ,(format nil "Bearer ~a" api-key))))
           (body (cl-json:encode-json-to-string
                  `((model . ,model-id)
                    (messages . (( (role . "system") (content . ,system-prompt) )
                                 ( (role . "user") (content . ,prompt) )))))))
      (handler-case (let* ((response (dex:post endpoint :headers headers :content body :connect-timeout 10 :read-timeout 30))
                           (json (cl-json:decode-json-from-string response)))
                      (cdr (assoc :content (cdr (assoc :message (car (cdr (assoc :choices json))))))))
        (error (c) (format nil "(:type :LOG :payload (:text \"OpenAI Failure: ~a\"))" c))))))

Registration

(progn
  (org-agent:register-neuro-backend :openai #'execute-openai-request)
  
  (defskill :skill-provider-openai
    :priority 100
    :trigger (lambda (context) nil)
    :neuro (lambda (context) nil)
    :symbolic (lambda (action context) action)))