Taffybar 开源项目教程-优快云博客

本文链接：https://blog.youkuaiyun.com/gitblog_00781/article/details/142014351

Taffybar 开源项目教程

taffybarA gtk based status bar for tiling window managers such as XMonad项目地址:https://gitcode.com/gh_mirrors/ta/taffybar

1. 项目介绍

Taffybar 是一个基于 GTK+ 的系统状态栏，主要用于与窗口管理器如 XMonad 和 i3wm 配合使用。它类似于 xmobar，但采用了更重的 GUI 形式，而不是 xmobar 所偏好的纯文本方式。Taffybar 提供了丰富的 GUI 元素，使得系统状态的展示更加直观和美观。

Taffybar 的主要特点包括：

支持多种窗口管理器，如 XMonad 和 i3wm。
提供了丰富的 GUI 元素，如图形化展示 CPU 和内存使用情况。
支持自定义配置，用户可以根据需求添加或修改状态栏的组件。

2. 项目快速启动

安装依赖

在开始之前，请确保系统中已经安装了以下依赖：

GTK+
Haskell 编译器（如 GHC）
Cabal 或 Stack

安装 Taffybar

你可以通过以下命令使用 Stack 安装 Taffybar：

git clone https://github.com/taffybar/taffybar.git
cd taffybar
stack install

配置 Taffybar

创建一个名为 taffybar.hs 的配置文件，内容如下：

{-# LANGUAGE OverloadedStrings #-}
import Data.Default (def)
import System.Taffybar
import System.Taffybar.Information.CPU
import System.Taffybar.SimpleConfig
import System.Taffybar.Widget
import System.Taffybar.Widget.Generic.Graph

cpuCallback = do
  (_systemLoad, totalLoad) <- cpuLoad
  return [totalLoad]

main = do
  let cpuCfg = def
        { graphDataColors = [(0, 1, 0, 1), (1, 0, 1, 0.5)]
        , graphLabel = Just "cpu"
        }
      clock = textClockNew Nothing "<span fgcolor='orange'>%a %b %_d %H:%M</span>" 1
      workspaces = workspacesNew defaultWorkspacesConfig
      layout = layoutNew defaultLayoutConfig
      mpris = mprisNew defaultMPRISConfig
      sni = sniTrayNew
      battery = batteryNew defaultBatteryConfig
      windows = windowsNew defaultWindowsConfig
      cpus = pollingGraphNew cpuCfg 0.5 cpuCallback
      mem = memoryNew defaultMemoryConfig
      net = networkNew defaultNetworkConfig
      config = defaultSimpleTaffyConfig
        { startWidgets =
            map (>>= buildContentsBox)
              [ workspaces, layout, windows, mpris, sni, battery, cpus, mem, net, clock ]
        }
  startTaffybar config

启动 Taffybar

在终端中运行以下命令启动 Taffybar：

taffybar

3. 应用案例和最佳实践

自定义状态栏

Taffybar 允许用户根据需求自定义状态栏的组件。例如，你可以添加一个显示天气信息的组件，或者修改 CPU 和内存的显示方式。以下是一个简单的自定义示例：

weatherCallback = do
  -- 获取天气信息并返回
  return [("晴", "25°C")]

weatherWidget = pollingLabelNew weatherCallback 60

与 XMonad 集成

Taffybar 通常与 XMonad 窗口管理器一起使用。你可以在 XMonad 的配置文件中添加以下代码，以便在启动 XMonad 时自动启动 Taffybar：

import XMonad
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageDocks

main = xmonad $ docks def
  { manageHook = manageDocks <+> manageHook def
  , layoutHook = avoidStruts $ layoutHook def
  , logHook = dynamicLog
  , startupHook = spawn "taffybar"
  }