#+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 "Executes a completion request via the Google Gemini API." * 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