58 lines
2.3 KiB
Org Mode
58 lines
2.3 KiB
Org Mode
#+TITLE: SKILL: Gemini Provider Agent (Universal Literate Note)
|
|
#+ID: skill-provider-gemini
|
|
#+STARTUP: content
|
|
#+FILETAGS: :llm:provider:gemini:google:psf:
|
|
|
|
* Overview
|
|
The *Gemini Provider Agent* integrates Google's Gemini API as a pluggable System 1 (neural) backend.
|
|
|
|
* Phase B: Blueprint (PROTOCOL)
|
|
:PROPERTIES:
|
|
:STATUS: SIGNED
|
|
:END:
|
|
|
|
** 2. Semantic Interfaces
|
|
#+begin_src lisp
|
|
(defun execute-gemini-request (prompt system-prompt)
|
|
"Executes a completion request via the Google Gemini API.")
|
|
#+end_src
|
|
|
|
* Phase D: Build (Implementation)
|
|
|
|
** Request Execution
|
|
#+begin_src lisp :tangle ../projects/org-skill-provider-gemini/src/provider-logic.lisp
|
|
(defun execute-gemini-request (prompt system-prompt)
|
|
(let* ((auth (org-agent:get-provider-auth :gemini))
|
|
(api-key (getf auth :api-key))
|
|
(bearer-token (getf auth :bearer-token))
|
|
(endpoint (or (getf auth :endpoint)
|
|
"https://generativelanguage.googleapis.com/v1beta/models/gemini-pro:generateContent")))
|
|
|
|
(unless (or api-key bearer-token)
|
|
(return-from execute-gemini-request "(:type :LOG :payload (:text \"Authentication missing for Gemini\"))"))
|
|
|
|
(let* ((url (if api-key (format nil "~a?key=~a" endpoint api-key) endpoint))
|
|
(headers `(("Content-Type" . "application/json")
|
|
,@(when bearer-token `(("Authorization" . ,(format nil "Bearer ~a" bearer-token))))))
|
|
(body (cl-json:encode-json-to-string
|
|
`((contents . ((parts . ((text . ,(format nil "~a~%~%Prompt: ~a" system-prompt prompt))))))))))
|
|
(handler-case
|
|
(let* ((response (dex:post url :headers headers :content body :connect-timeout 10 :read-timeout 30))
|
|
(json (cl-json:decode-json-from-string response)))
|
|
(cdr (assoc :text (cdr (assoc :parts (car (cdr (assoc :parts (car (cdr (assoc :candidates json)))))))))))
|
|
(error (c)
|
|
(format nil "(:type :LOG :payload (:text \"Neural Engine Failure: ~a\"))" c))))))
|
|
#+end_src
|
|
|
|
* Registration
|
|
#+begin_src lisp
|
|
;; Register with the kernel
|
|
(org-agent:register-neuro-backend :gemini #'execute-gemini-request)
|
|
|
|
(defskill :skill-provider-gemini
|
|
:priority 90
|
|
:trigger (lambda (context) nil)
|
|
:neuro (lambda (context) nil)
|
|
:symbolic (lambda (action context) action))
|
|
#+end_src
|