如何通过 ScriptingBridge 使用 AppleScript 获取终端窗口的窗口 ID 和选项卡号？

Question

我可以使用以下 AppleScript 打开“终端”选项卡：

tell application "Terminal"
    set myTab to do script "exec sleep 1"
    get myTab
end tell

这会返回一个字符串，例如：应用程序“终端”窗口 id 3263 的 tab 1。这太棒了，我可以看到窗口 ID 3263 和选项卡编号 1 （尽管我不知道如何查询 myTab 来仅获取这些值）。

在 Cocoa ScriptingBridge 中，我可以执行以下操作：

SBApplication  *terminal;
SBObject       *tab;

terminal = [SBApplication applicationWithBundleIdentifier:@"com.apple.terminal"]
tab = [terminal doScript:@"exec sleep 1" in:nil]

如何从选项卡对象获取窗口 id 和选项卡编号？

---

编辑 2009/4/27 - 为什么？

回答为什么我想这样做 - 我在终端窗口中打开一个命令（如上所述），并返回 tab 对象。但是我想移动/调整此窗口的大小，因此我需要访问选项卡的“窗口”对象。

我正在使用 Objective-C （实际上，Objective-C 从 Perl 桥接），并且想要坚持使用标准操作系统组件，所以我相信我只有 NSAppleScript 和 ScriptingBridge 框架可以使用（所有 perl applescript 模块都与 64 位兼容）除碳）。我会尝试 NSAppleScript，但处理返回值似乎是一种魔法。

我当前的解决方案是获取选项卡对象的 TTY（保证唯一）并枚举每个窗口的每个选项卡，直到找到包含该选项卡的窗口。我认为这不是最好的方法（它肯定不快！）。

---

编辑2009/4/30 - 解决方案

根据下面“has”的建议，我勇敢地NSAppleEventDescriptor API。最初，我只能通过 NSAppleScript 的 executeAndReturnError() 调用来实现这一点。然而我发现 NSAppleScript 比 ScriptingBridge 慢得多。

使用 ClassDump 提取更多 SBObject 调用后，我发现了未记录的 specifierDescription() 和 qualifiedSpecifier() 调用。前者给了我漂亮的“tab X of window id Y”字符串。后者返回苹果事件描述符，然后我可以对其进行解码。

我的最终代码（perl）是：

use Foundation;

NSBundle->bundleWithPath_('/System/Library/Frameworks/ScriptingBridge.framework')->load;

# Create an OSType (bid endian long) from a string
sub OSType ($) { return unpack('N', $_[0]) }

my $terminal = SBApplication->applicationWithBundleIdentifier_("com.apple.terminal");

my $tab         = $terminal->doScript_in_("exec sleep 1", undef);
my $tab_ev_desc = $tab->qualifiedSpecifier;
my $tab_id      = $tab_ev_desc->descriptorForKeyword_(OSType 'seld')->int32Value;
my $win_ev_desc = $tab_ev_desc->descriptorForKeyword_(OSType 'from');
my $window_id   = $win_ev_desc->descriptorForKeyword_(OSType 'seld')->int32Value;

print "Window:$window_id Tab:$tab_id\n";

Answer 1

我知道这是一个老问题，但我今天才遇到这个问题，并且在网上找不到好的答案。这对我有用：

tell application "Terminal"
    set newTab to do script "echo hello"
    set theWindow to first window of (every window whose tabs contains newTab)
    set windowId to theWindow's id
    repeat with i from 1 to the count of theWindow's tabs
        if item i of theWindow's tabs is newTab then set tabNumber to i
    end repeat
    get {windowId, tabNumber}
end tell

Answer 2

从技术上讲你不能；更好的问题是为什么要这样做？

（好吧，如果您使用 Apple Event Manager API 或 objc-appscript，则可以，两者都可以给你一个原始的 AEDesc/NSAppleEventDescriptor ，你可以递归地 自己拆开。或者你可以在 SB 中闲逛，看看是否有一个未记录的 API 可以获取底层 AEDesc，但当然要买者自负。或者，可能有更好的方法来实现你的实际目标，无需诉诸黑客手段，但您需要提供更多信息。）

Answer 3

我使用以下技巧：

on getWindow(tab_)
    tell application "Terminal"
        repeat with i in (get windows)
            if tty of tabs of i contains tty of tab_ then return i
        end repeat
    end tell
end getWindow

每个选项卡都应该有一个与其关联的唯一 TTY 设备，以便可以识别包含引用选项卡的窗口。

Answer 4

像这样非常简单的事情怎么样：

tell application "Terminal"
    set new_win to do script ""
    set w_id to id of front window
end tell