passepartout/skills/org-skill-tool-permissions.org

SKILL: Tool Permissions (org-skill-tool-permissions.org)

• Overview
• Implementation
  • Package Context
  • Permission Registry
  • Skill Registration

Overview

The Tool Permissions skill manages the authorization levels for different cognitive tools.

Implementation

Package Context

(in-package :opencortex)

Permission Registry

(defvar *tool-permissions* (make-hash-table :test 'equal))

(defun set-tool-permission (tool-name level)
  "Sets the permission level for a tool."
  (setf (gethash (string-downcase (string tool-name)) *tool-permissions*) level))

(defun get-tool-permission (tool-name)
  "Retrieves the permission level for a tool."
  (gethash (string-downcase (string tool-name)) *tool-permissions* :ask))

Skill Registration

(defskill :skill-tool-permissions
  :priority 600
  :trigger (lambda (ctx) (declare (ignore ctx)) nil))