如何通过编程方式检测系统托盘是否可用

• 在未运行任何面板/trayer程序的环境下启动QSyncthingTray时，程序会弹出如下错误对话框：

I couldn't detect any system tray on this system.
                                         [ OK ]

• 点击[ OK ]按钮后程序将直接退出。

但存在一个特殊现象：如果QSyncthingTray已经以托盘图标形式运行时杀掉面板进程，QSyncthingTray不会退出，重启面板后QSyncthingTray的托盘图标仍然会正常保留...

需要在~/.xsession与~/.xinitrc启动流程中增加循环检测逻辑，判断系统托盘是否就绪后再启动对应程序，对应伪代码如下：

loop:
  if system-tray.is-available:
    run QSyncthingTray
    done
  else sleep 1

核心需求是实现system-tray.is-available的检测逻辑，优先提供Perl实现，同时接受Raku、POSIX sh等其他语言的实现参考。

X11环境下的系统托盘遵循FreeDesktop System Tray Protocol规范，托盘程序启动后会在X根窗口上注册名为_NET_SYSTEM_TRAY_S<屏幕编号>的原子属性，默认单屏环境下屏幕编号为0，只要检测到该属性存在且值为有效窗口ID，就说明系统托盘已经就绪。

Perl 实现 #

依赖：需要X11::Protocol库，Debian/Ubuntu系可直接通过源安装libx11-protocol-perl包，其他环境可通过cpanm安装该模块。

#!/usr/bin/perl
use strict;
use warnings;
use X11::Protocol;

sub tray_ready {
    my $x_conn = eval { X11::Protocol->new() } or return 0;
    my $tray_atom = $x_conn->atom('_NET_SYSTEM_TRAY_S0');
    my ($val) = $x_conn->get_property(
        $x_conn->root,
        $tray_atom,
        $x_conn->atom('WINDOW'),
        0, 1, 0
    );
    $x_conn->close;
    return defined $val ? 1 : 0;
}

# 循环等待托盘就绪
until (tray_ready()) { sleep 1; }
# 启动目标程序
exec 'QSyncthingTray';

使用方式：将代码保存为可执行脚本，替换xsession/xinitrc中直接启动QSyncthingTray的命令即可。

POSIX sh 实现 #

无额外语言依赖，仅需要系统预装X11基础工具xprop（几乎所有桌面环境默认自带）：

#!/bin/sh
until xprop -root _NET_SYSTEM_TRAY_S0 2>/dev/null | grep -q 'window id #'; do
    sleep 1
done
exec QSyncthingTray

如果是多屏环境，将命令中的S0替换为对应屏幕的编号即可。检测到托盘后可额外加0.2s延迟再启动程序，规避托盘程序刚启动未完成初始化的边缘问题。

• 多数兼容X11托盘的Wayland合成器同样会暴露_NET_SYSTEM_TRAY_S0属性，上述检测逻辑在Wayland兼容环境下也可正常工作
• 如果需要同时检测多屏托盘，可遍历_NET_SYSTEM_TRAY_S0到_NET_SYSTEM_TRAY_Sn的属性，只要存在一个有效属性即可判定托盘就绪

内容的提问来源于stack exchange，提问作者Veraellyunjie