passepartout/literate/setup.org

Setup & Onboarding (setup.org)

• Overview: The Zero-to-One Experience
• 1. The Unified Entrypoint (opencortex.sh)
• 2. The Baremetal Path (onboard-baremetal.sh)

Overview: The Zero-to-One Experience

The Setup & Onboarding process ensures that users can boot the opencortex Lisp Machine with zero friction.

1. The Unified Entrypoint (opencortex.sh)

set -e

PORT=9105
HOST=${1:-localhost}

RED='\033[0;31m'
GREEN='\033[0;32m'
BLUE='\033[0;34m'
YELLOW='\033[0;33m'
NC='\033[0m'

command_exists() { command -v "$1" >/dev/null 2>&1; }

# --- Bootstrap Mode ---
bootstrap_opencortex() {
    echo -e "${BLUE}=== OpenCortex: Zero-to-One Bootstrapper ===${NC}"
    if [ -d ".git" ]; then
        return
    fi

    TARGET_DIR="opencortex"
    if [ ! -d "$TARGET_DIR" ]; then
        echo -e "${BLUE}Cloning repository into $TARGET_DIR...${NC}"
        git clone http://10.10.10.201:3001/amr/opencortex.git "$TARGET_DIR"
    fi
    
    cd "$TARGET_DIR"
    git submodule update --init --recursive
    
    echo -e "${GREEN}✓ Repository prepared.${NC}"
    
    if [ -t 0 ]; then
        ./scripts/onboard-baremetal.sh
    else
        ./scripts/onboard-baremetal.sh < /dev/tty 2>/dev/null || ./scripts/onboard-baremetal.sh < /dev/null
    fi
    
    echo -e "${GREEN}✓ Setup phase complete.${NC}"
    exit 0
}

if [ ! -d ".git" ]; then
    bootstrap_opencortex
fi

# ... (Local Mode)
if [ -f "opencortex.asd" ] || [ -d "literate" ]; then
    if [ ! -f .env ]; then ./scripts/onboard-baremetal.sh; fi
    echo -e "${BLUE}Starting OpenCortex via SBCL...${NC}"
    sbcl --non-interactive \
         --eval "(load \"~/quicklisp/setup.lisp\")" \
         --eval "(ql:quickload :opencortex)" \
         --eval "(opencortex:main)"
fi

2. The Baremetal Path (onboard-baremetal.sh)

# OpenCortex Final-Mile Installer (Bulletproof Edition)
RED='\033[0;31m'; GREEN='\033[0;32m'; BLUE='\033[0;34m'; YELLOW='\033[0;33m'; NC='\033[0m'

echo -e "${BLUE}=== OpenCortex: Baremetal Power-User Setup ===${NC}"

prompt_user() {
    local prompt="$1"
    local default="$2"
    local var_name="$3"
    local result=""
    echo -n -e "${YELLOW}$prompt (default: $default): ${NC}" >&2
    if read -t 5 result; then :; else result="$default"; echo -e "${BLUE} [Auto-Selected: $default]${NC}" >&2; fi
    val=${result:-$default}
    eval "$var_name=\"$val\""
}

# 1. Dependencies
if ! command -v sbcl >/dev/null 2>&1; then
    echo -e "${BLUE}Installing dependencies...${NC}"
    sudo apt-get update && sudo apt-get install -y sbcl emacs git curl socat || true
fi

# 2. Quicklisp
if [ ! -d "$HOME/quicklisp" ]; then
    curl -O https://beta.quicklisp.org/quicklisp.lisp
    sbcl --non-interactive --load quicklisp.lisp --eval "(quicklisp-quickstart:install)" --eval "(ql-util:without-prompting (ql:add-to-init-file))"
    rm quicklisp.lisp
fi

# 3. Tangling
echo -e "${BLUE}Tangling source files...${NC}"
mkdir -p src
for f in literate/*.org; do
    echo "  - Tangling $f"
    emacs --batch --eval "(require 'org)" --eval "(org-babel-tangle-file \"$f\")" >/dev/null 2>&1
done

if [ -f "src/package.lisp" ]; then
    echo -e "${GREEN}✓ Core tangled successfully.${NC}"
else
    echo -e "${RED}✗ Tangle failed!${NC}"
fi

# 4. Config
if [ ! -f .env ]; then cp .env.example .env; fi
prompt_user "What is your name?" "User" "USER_NAME"
prompt_user "What shall we name your Assistant?" "OpenCortex" "AGENT_NAME"
prompt_user "Select provider (1:Gemini, 2:OpenRouter)" "1" "LLM_CHOICE"

sed -i "s/MEMEX_USER=.*/MEMEX_USER=\"$USER_NAME\"/g" .env
sed -i "s/MEMEX_ASSISTANT=.*/MEMEX_ASSISTANT=\"$AGENT_NAME\"/g" .env

# Path Alignment
ROOT_DIR=$(pwd)
sed -i "s|MEMEX_DIR=.*|MEMEX_DIR=\"$(dirname $ROOT_DIR)\"|g" .env
sed -i "s|SKILLS_DIR=.*|SKILLS_DIR=\"$ROOT_DIR/skills\"|g" .env

echo -e "\n${GREEN}==============================================${NC}"
echo -e "${GREEN}    OpenCortex Installation Complete!        ${NC}"
echo -e "${GREEN}==============================================${NC}"
echo -e "To start: ./opencortex.sh"