claudectl 0.41.0

Auto-pilot for Claude Code — a local model watches every session and decides what to approve
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137

use super::run_osascript;
use crate::session::ClaudeSession;

pub fn switch(session: &ClaudeSession) -> Result<(), String> {
    let search = build_search_term(session);

    let script = format!(
        r#"
        tell application "System Events"
            tell process "stable"
                keystroke "P" using {{command down, shift down}}
                delay 0.15
                keystroke "{search}"
                delay 0.3
                key code 36
            end tell
        end tell
        "#,
        search = search.replace('"', "\\\"")
    );
    run_osascript(&script)?;

    // Cycle split panes to find the Claude session pane.
    // Warp title shows "Claude Code" for claude panes.
    run_osascript(
        r#"
        tell application "System Events"
            tell process "stable"
                set winTitle to name of window 1
                if winTitle contains "Claude" then return "ok"
                repeat 6 times
                    keystroke "]" using {command down}
                    delay 0.05
                    set winTitle to name of window 1
                    if winTitle contains "Claude" then return "ok"
                end repeat
            end tell
        end tell
    "#,
    )?;

    Ok(())
}

/// Send input text to the Claude session's Warp pane.
/// Switches to the pane, ensures terminal focus, types the text, then switches back.
pub fn send_input(session: &ClaudeSession, text: &str) -> Result<(), String> {
    switch(session)?;
    ensure_terminal_focus()?;

    let escaped = text.replace('\\', "\\\\").replace('"', "\\\"");
    let script = format!(
        r#"
        tell application "System Events"
            tell process "stable"
                keystroke "{escaped}"
            end tell
        end tell
        "#,
    );
    run_osascript(&script)
}

/// Approve a permission prompt by sending Enter to the Claude session's Warp pane.
/// Switches to the pane, ensures terminal focus, presses Enter, then switches back.
pub fn approve(session: &ClaudeSession) -> Result<(), String> {
    switch(session)?;
    ensure_terminal_focus()?;

    // Send Enter (key code 36)
    run_osascript(
        r#"
        tell application "System Events"
            tell process "stable"
                key code 36
            end tell
        end tell
        "#,
    )
}

/// After switching tabs via Command Palette, the palette may still have focus.
/// Press Escape to dismiss it, then click the center of the window to ensure
/// keystrokes reach the terminal input area.
fn ensure_terminal_focus() -> Result<(), String> {
    run_osascript(
        r#"
        tell application "System Events"
            tell process "stable"
                -- Dismiss any open palette/dialog
                key code 53
                delay 0.15

                -- Click the center of the frontmost window to focus the terminal
                try
                    set winPos to position of window 1
                    set winSize to size of window 1
                    set clickX to (item 1 of winPos) + ((item 1 of winSize) / 2)
                    set clickY to (item 2 of winPos) + ((item 2 of winSize) / 2)
                    click at {clickX, clickY}
                end try
                delay 0.1
            end tell
        end tell
        "#,
    )
}

pub fn build_search_term(session: &ClaudeSession) -> String {
    // Warp's palette treats `-` as negation and `/` as special.
    // Use resume UUID hex prefix when available (unique, no special chars).
    if session.command_args.contains("--resume") {
        if let Some(id_start) = session.command_args.find("--resume ") {
            let after = &session.command_args[id_start + 9..];
            let hex_prefix: String = after
                .chars()
                .take_while(|c| c.is_ascii_hexdigit())
                .collect();
            if hex_prefix.len() >= 6 {
                return hex_prefix;
            }
            let name: String = after
                .chars()
                .take_while(|c| *c != ' ' && *c != '-')
                .collect();
            if !name.is_empty() {
                return name;
            }
        }
    }

    // Fallback: project name truncated at first dash
    match session.project_name.find('-') {
        Some(pos) => session.project_name[..pos].to_string(),
        None => session.project_name.clone(),
    }
}