2022-03-23 22:58:00 +00:00
|
|
|
# Blinkenlicht
|
|
|
|
|
|
|
|
|
|
Yet another "bar" program for wlroots-basd Wayland compositors, but
|
|
|
|
|
this one is written in [Fennel](https://fennel-lang.org/) and
|
|
|
|
|
therefore better than all the others because it is more niche.
|
|
|
|
|
|
|
|
|
|
More seriously: you might prefer this over another status bar program
|
|
|
|
|
if you want fine-grained control over what is shown in your bar and
|
|
|
|
|
you are happy to exert that control in a Lua-based Lisp language.
|
|
|
|
|
|
2022-03-24 23:01:07 +00:00
|
|
|
## Current status and usage
|
|
|
|
|
|
|
|
|
|
Not quite dogfood-ready yet, but fast approaching.
|
|
|
|
|
|
|
|
|
|
* bl.fnl is an example
|
|
|
|
|
|
|
|
|
|
* blinkenlicht.fnl is the module that parses `bar` and `indicator`
|
|
|
|
|
forms and does all the UI
|
|
|
|
|
|
|
|
|
|
* also in bl.fnl but needs extracting to a home of its own, all the
|
|
|
|
|
glue that looks up load average, wifi signal strength, time of day
|
|
|
|
|
etc for indicators to use
|
|
|
|
|
|
|
|
|
|
Use the `default.nix` for guidance as to libraries and other setup
|
|
|
|
|
required - or just use it, of course.
|
|
|
|
|
|
|
|
|
|
nix-shell
|
|
|
|
|
lua $fennel bl.fnl
|
|
|
|
|
|
|
|
|
|
|
2022-03-23 23:20:53 +00:00
|
|
|
## Plan
|
|
|
|
|
|
|
|
|
|
* [X] use gtk-layer-shell to put it in a layer
|
2022-03-24 12:14:08 +00:00
|
|
|
* [X] update only at relevant intervals
|
|
|
|
|
* [X] cache icon pixbufs
|
2022-03-24 23:02:24 +00:00
|
|
|
* [ ] update image/label widget instead of destroying
|
|
|
|
|
* [ ] allow height customisation
|
|
|
|
|
* [ ] add some mechanism for indicators that wait for events instead of polling
|
|
|
|
|
* [ ] set poll interval based on indicators' requested intervals
|
|
|
|
|
* [ ] set indicator background colour (use css for this?)
|
2022-03-23 23:20:53 +00:00
|
|
|
|
2022-03-23 22:58:00 +00:00
|
|
|
```fennel
|
2022-03-24 23:01:07 +00:00
|
|
|
|
|
|
|
|
;; your status bar specification might look something like this
|
|
|
|
|
|
2022-03-23 22:58:00 +00:00
|
|
|
(bar
|
|
|
|
|
{
|
|
|
|
|
:anchor [:top :right]
|
|
|
|
|
:orientation :horizontal
|
|
|
|
|
:indicators
|
|
|
|
|
[
|
|
|
|
|
(indicator {
|
|
|
|
|
:interval 200
|
|
|
|
|
:icon #(if (> loadavg 2) "sad-face" "happy-face")
|
|
|
|
|
})
|
|
|
|
|
(let [f (io.open "/tmp/statuspipe" "r")]
|
|
|
|
|
(indicator {
|
|
|
|
|
:poll [f]
|
|
|
|
|
:text #(f:read:sub 1 10)
|
|
|
|
|
}))
|
|
|
|
|
(indicator {
|
|
|
|
|
:interval 5000
|
|
|
|
|
:text #(.. (disk-free-percent "/") "%")
|
|
|
|
|
:on-click #(spawn "baobab")
|
|
|
|
|
})
|
|
|
|
|
(indicator {
|
|
|
|
|
:interval 1000
|
|
|
|
|
:text #(os.date "%X")
|
|
|
|
|
})
|
|
|
|
|
]})
|
|
|
|
|
```
|
