liustsim: adjust colours

As well as disabling the field altogether.

.clang-format

@@ -0,0 +1,32 @@
+# clang-format is fairly limited, and these rules are approximate:
+#  - array initializers can get terribly mangled with clang-format 12.0,
+#  - sometimes it still aligns with space characters,
+#  - struct name NL { NL ... NL } NL name; is unachievable.
+BasedOnStyle: GNU
+ColumnLimit: 80
+IndentWidth: 4
+TabWidth: 4
+UseTab: ForContinuationAndIndentation
+BreakBeforeBraces: Allman
+SpaceAfterCStyleCast: true
+AlignAfterOpenBracket: DontAlign
+AlignOperands: DontAlign
+AlignConsecutiveMacros: Consecutive
+AllowAllArgumentsOnNextLine: false
+AllowAllParametersOfDeclarationOnNextLine: false
+IndentGotoLabels: false
+
+# IncludeCategories has some potential, but it may also break the build.
+# Note that the documentation says the value should be "Never".
+SortIncludes: false
+
+# This is a compromise, it generally works out aesthetically better.
+BinPackArguments: false
+
+# Unfortunately, this can't be told to align to column 40 or so.
+SpacesBeforeTrailingComments: 2
+
+# liberty-specific macro body wrappers.
+MacroBlockBegin: "BLOCK_START"
+MacroBlockEnd: "BLOCK_END"
+ForEachMacros: ["LIST_FOR_EACH"]

.gitignore

@@ -7,3 +7,5 @@
 /desktop-tools.files
 /desktop-tools.creator*
 /desktop-tools.includes
+/desktop-tools.cflags
+/desktop-tools.cxxflags

CMakeLists.txt

@@ -1,70 +1,69 @@
-project (desktop-tools C)
-cmake_minimum_required (VERSION 2.8.11)
+cmake_minimum_required (VERSION 3.10)
+project (desktop-tools VERSION 0.1.0 DESCRIPTION "Desktop tools" LANGUAGES C)
 
 # Moar warnings
+set (CMAKE_C_STANDARD 99)
+set (CMAKE_C_STANDARD_REQUIRED ON)
+set (CMAKE_C_EXTENSIONS OFF)
+
 if ("${CMAKE_C_COMPILER_ID}" MATCHES "GNU" OR CMAKE_COMPILER_IS_GNUCC)
 	# -Wunused-function is pretty annoying here, as everything is static
-	set (wdisabled "-Wno-unused-function")
-	set (CMAKE_C_FLAGS "${CMAKE_C_FLAGS} -std=c99 -Wall -Wextra ${wdisabled}")
-endif ("${CMAKE_C_COMPILER_ID}" MATCHES "GNU" OR CMAKE_COMPILER_IS_GNUCC)
-
-# Version
-set (project_VERSION_MAJOR "0")
-set (project_VERSION_MINOR "1")
-set (project_VERSION_PATCH "0")
-
-set (project_VERSION "${project_VERSION_MAJOR}")
-set (project_VERSION "${project_VERSION}.${project_VERSION_MINOR}")
-set (project_VERSION "${project_VERSION}.${project_VERSION_PATCH}")
+	set (CMAKE_C_FLAGS "${CMAKE_C_FLAGS} -Wall -Wextra -Wno-unused-function")
+endif ()
 
 # Dependencies
 set (CMAKE_MODULE_PATH ${PROJECT_SOURCE_DIR}/liberty/cmake)
 include (AddThreads)
 
 find_package (PkgConfig REQUIRED)
-pkg_check_modules (dependencies REQUIRED libpulse x11 xext xextproto dbus-1)
+pkg_check_modules (x REQUIRED x11 xext xextproto)
+pkg_check_modules (pulse REQUIRED libpulse)
+pkg_check_modules (dbus REQUIRED dbus-1)
 pkg_check_modules (gdm gdm glib-2.0 gio-2.0)
+include_directories (
+	${x_INCLUDE_DIRS} ${pulse_INCLUDE_DIRS} ${dbus_INCLUDE_DIRS})
+link_directories (
+	${x_LIBRARY_DIRS} ${pulse_LIBRARY_DIRS} ${dbus_LIBRARY_DIRS})
 
-option (WITH_GDM "Compile with GDM support" ${gdm_FOUND})
-
-set (project_libraries ${dependencies_LIBRARIES})
-include_directories (${dependencies_INCLUDE_DIRS})
+option (WITH_GDM "Compile with GDM utilities" ${gdm_FOUND})
 
 # Generate a configuration file
-configure_file (${PROJECT_SOURCE_DIR}/config.h.in ${PROJECT_BINARY_DIR}/config.h)
+configure_file (${PROJECT_SOURCE_DIR}/config.h.in
+	${PROJECT_BINARY_DIR}/config.h)
 include_directories (${PROJECT_BINARY_DIR})
 
 # Build
-add_executable (wmstatus wmstatus.c)
-target_link_libraries (wmstatus ${project_libraries})
+set (targets wmstatus paswitch siprandom genpass)
+if ("${CMAKE_SYSTEM_NAME}" STREQUAL Linux)
+	# These use Linux i2c APIs, but can be made to work on macOS
+	list (APPEND targets brightness input-switch)
+	# Only iexec could be made to use kqueue
+	list (APPEND targets fancontrol-ng priod iexec)
+elseif ("${CMAKE_SYSTEM_NAME}" MATCHES BSD)
+	# Need this for SIGWINCH in FreeBSD and OpenBSD respectively;
+	# our POSIX version macros make it undefined
+	add_definitions (-D__BSD_VISIBLE=1 -D_BSD_SOURCE=1)
+elseif (APPLE)
+	add_definitions (-D_DARWIN_C_SOURCE)
+endif ()
+
+foreach (name big-brother ${targets})
+	add_executable (${name} ${name}.c)
+endforeach ()
+
+target_link_libraries (big-brother ${x_LIBRARIES})
+target_link_libraries (paswitch ${pulse_LIBRARIES})
+target_link_libraries (wmstatus
+	${x_LIBRARIES} ${pulse_LIBRARIES} ${dbus_LIBRARIES})
 add_threads (wmstatus)
 
-add_executable (brightness brightness.c)
-target_link_libraries (brightness ${project_libraries})
-
-add_executable (input-switch input-switch.c)
-target_link_libraries (input-switch ${project_libraries})
-
-add_executable (fancontrol-ng fancontrol-ng.c)
-target_link_libraries (fancontrol-ng ${project_libraries})
-
-add_executable (priod priod.c)
-target_link_libraries (priod ${project_libraries})
-
-add_executable (iexec iexec.c)
-target_link_libraries (iexec)
-
 if (WITH_GDM)
-	include_directories (${gdm_INCLUDE_DIRS})
+	list (APPEND targets gdm-switch-user)
 	add_executable (gdm-switch-user gdm-switch-user.c)
+	target_include_directories (gdm-switch-user PUBLIC ${gdm_INCLUDE_DIRS})
+	target_link_directories (gdm-switch-user PUBLIC ${gdm_LIBRARY_DIRS})
 	target_link_libraries (gdm-switch-user ${gdm_LIBRARIES})
-endif (WITH_GDM)
-
-add_executable (siprandom siprandom.c)
-target_link_libraries (siprandom ${project_libraries})
-
-add_executable (big-brother big-brother.c)
-target_link_libraries (big-brother ${project_libraries})
+endif ()
 
 # The files to be installed
 include (GNUInstallDirs)
@@ -73,46 +72,58 @@ include (GNUInstallDirs)
 set (SYSTEMD_UNITDIR /lib/systemd/system
 	CACHE PATH "Base directory for systemd unit files")
 
-configure_file (${PROJECT_SOURCE_DIR}/fancontrol-ng.service.in
-	${PROJECT_BINARY_DIR}/fancontrol-ng.service @ONLY)
-install (FILES fancontrol-ng.conf.example
-	DESTINATION ${CMAKE_INSTALL_DATADIR}/fancontrol-ng)
+if ("${CMAKE_SYSTEM_NAME}" STREQUAL Linux)
+	configure_file (${PROJECT_SOURCE_DIR}/fancontrol-ng.service.in
+		${PROJECT_BINARY_DIR}/fancontrol-ng.service @ONLY)
+	install (FILES fancontrol-ng.conf.example
+		DESTINATION ${CMAKE_INSTALL_DATADIR}/fancontrol-ng)
 
-configure_file (${PROJECT_SOURCE_DIR}/priod.service.in
-	${PROJECT_BINARY_DIR}/priod.service @ONLY)
-install (FILES priod.conf.example
-	DESTINATION ${CMAKE_INSTALL_DATADIR}/priod)
+	configure_file (${PROJECT_SOURCE_DIR}/priod.service.in
+		${PROJECT_BINARY_DIR}/priod.service @ONLY)
+	install (FILES priod.conf.example
+		DESTINATION ${CMAKE_INSTALL_DATADIR}/priod)
 
-# System-wide unit files should be installed under /lib and not /usr/lib
-install (FILES
-	${PROJECT_BINARY_DIR}/fancontrol-ng.service
-	${PROJECT_BINARY_DIR}/priod.service
-	DESTINATION "${SYSTEMD_UNITDIR}")
+	# System-wide unit files should be installed under /lib and not /usr/lib
+	install (FILES
+		${PROJECT_BINARY_DIR}/fancontrol-ng.service
+		${PROJECT_BINARY_DIR}/priod.service
+		DESTINATION "${SYSTEMD_UNITDIR}")
+endif ()
 
 if (WITH_GDM)
 	install (TARGETS gdm-switch-user DESTINATION ${CMAKE_INSTALL_BINDIR})
-endif (WITH_GDM)
+endif ()
 
-install (TARGETS wmstatus brightness input-switch fancontrol-ng priod iexec
-	siprandom DESTINATION ${CMAKE_INSTALL_BINDIR})
+# These should be accessible by users, but need to touch system devices.
+# Use the setuid bit, for simplicity.
+set (SETUID "SETUID" CACHE STRING "Set this empty on permission issues")
+foreach (target brightness input-switch)
+	if (${target} IN_LIST targets)
+		list (REMOVE_ITEM targets ${target})
+		install (TARGETS ${target} DESTINATION ${CMAKE_INSTALL_BINDIR}
+			PERMISSIONS
+				OWNER_WRITE OWNER_READ OWNER_EXECUTE
+				GROUP_READ GROUP_EXECUTE
+				WORLD_READ WORLD_EXECUTE
+				${SETUID})
+	endif ()
+endforeach ()
+
+install (TARGETS ${targets} DESTINATION ${CMAKE_INSTALL_BINDIR})
 install (PROGRAMS shellify DESTINATION ${CMAKE_INSTALL_BINDIR})
 install (FILES LICENSE DESTINATION ${CMAKE_INSTALL_DOCDIR})
 
 # CPack
-set (CPACK_PACKAGE_DESCRIPTION_SUMMARY "Desktop tools")
-set (CPACK_PACKAGE_VENDOR "Premysl Janouch")
-set (CPACK_PACKAGE_CONTACT "Přemysl Janouch <p@janouch.name>")
+set (CPACK_PACKAGE_VENDOR "Premysl Eric Janouch")
+set (CPACK_PACKAGE_CONTACT "Přemysl Eric Janouch <p@janouch.name>")
 set (CPACK_RESOURCE_FILE_LICENSE "${PROJECT_SOURCE_DIR}/LICENSE")
-set (CPACK_PACKAGE_VERSION_MAJOR ${project_VERSION_MAJOR})
-set (CPACK_PACKAGE_VERSION_MINOR ${project_VERSION_MINOR})
-set (CPACK_PACKAGE_VERSION_PATCH ${project_VERSION_PATCH})
 set (CPACK_GENERATOR "TGZ;ZIP")
 set (CPACK_PACKAGE_FILE_NAME
-	"${PROJECT_NAME}-${project_VERSION}-${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}")
-set (CPACK_PACKAGE_INSTALL_DIRECTORY "${PROJECT_NAME}-${project_VERSION}")
+	"${PROJECT_NAME}-${PROJECT_VERSION}-${CMAKE_SYSTEM_NAME}-${CMAKE_SYSTEM_PROCESSOR}")
+set (CPACK_PACKAGE_INSTALL_DIRECTORY "${PROJECT_NAME}-${PROJECT_VERSION}")
 set (CPACK_SOURCE_GENERATOR "TGZ;ZIP")
 set (CPACK_SOURCE_IGNORE_FILES "/\\\\.git;/build;/CMakeLists.txt.user")
-set (CPACK_SOURCE_PACKAGE_FILE_NAME "${PROJECT_NAME}-${project_VERSION}")
+set (CPACK_SOURCE_PACKAGE_FILE_NAME "${PROJECT_NAME}-${PROJECT_VERSION}")
 
 set (CPACK_SET_DESTDIR TRUE)
 include (CPack)

LICENSE

@@ -1,4 +1,4 @@
-Copyright (c) 2015 - 2016, Přemysl Janouch <p@janouch.name>
+Copyright (c) 2015 - 2025, Přemysl Eric Janouch <p@janouch.name>
 
 Permission to use, copy, modify, and/or distribute this software for any
 purpose with or without fee is hereby granted.

README.adoc

@@ -5,9 +5,11 @@ desktop-tools
 'desktop-tools' is a collection of tools to run my desktop that might be useful
 to other people as well:
 
- - 'wmstatus' does literally everything my i3 doesn't but I'd like it to. It
-   includes PulseAudio volume management and hand-written NUT and MPD clients,
-   all in the name of liberation from GPL-licensed software of course
+ - 'wmstatus' does literally everything i3/sway don't but I'd like them to.
+   It includes PulseAudio volume management and custom-made NUT and MPD clients,
+   all in the name of liberation from GPL-licensed software, of course
+ - 'paswitch' displays a list of all PulseAudio sinks and ports and allows
+   switching between them, moving all playing inputs
  - 'brightness' allows me to change the brightness of w/e display device I have
  - 'input-switch' likewise switches the input source of external displays
  - 'fancontrol-ng' is a clone of fancontrol that can handle errors on resume
@@ -26,17 +28,17 @@ to other people as well:
  - 'big-brother' tracks the title of the active window and the idle state of
    the user and writes these events to standard output.
 
-Don't expect them to work under any OS that isn't Linux.
+Few of them are useful outside of Linux.
 
 Packages
 --------
-Regular releases are sporadic.  git master should be stable enough.  You can get
-a package with the latest development version from Archlinux's AUR.
+Regular releases are sporadic.  git master should be stable enough.
 
 Building
 --------
 Build dependencies: CMake, pkg-config, liberty (included) +
-Runtime dependencies: libpulse, libx11, dbus-1, libgdm (optional)
+Runtime dependencies: libpulse, libx11, dbus-1 +
+Optional runtime dependencies: libgdm (gdm-switch-user)
 
  $ git clone --recursive https://git.janouch.name/p/desktop-tools.git
  $ mkdir desktop-tools/build

big-brother.c

@@ -1,7 +1,7 @@
 /*
  * big-brother.c: activity tracker
  *
- * Copyright (c) 2016, Přemysl Janouch <p@janouch.name>
+ * Copyright (c) 2016, Přemysl Eric Janouch <p@janouch.name>
  *
  * Permission to use, copy, modify, and/or distribute this software for any
  * purpose with or without fee is hereby granted.
@@ -149,7 +149,7 @@ static void
 app_context_free (struct app_context *self)
 {
 	str_map_free (&self->config);
-	free (self->current_title);
+	cstr_set (&self->current_title, NULL);
 	poller_fd_reset (&self->x_event);
 	XCloseDisplay (self->dpy);
 	poller_free (&self->poller);
@@ -207,8 +207,7 @@ update_window_title (struct app_context *ctx, char *new_title)
 {
 	bool changed = !ctx->current_title != !new_title
 		|| (new_title && strcmp (ctx->current_title, new_title));
-	free (ctx->current_title);
-	ctx->current_title = new_title;
+	cstr_set (&ctx->current_title, new_title);
 	return changed;
 }
 

brightness.c

@@ -1,7 +1,7 @@
 /*
  * brightness.c: set display brightness via DDC/CI - Linux only
  *
- * Copyright (c) 2015, Přemysl Janouch <p@janouch.name>
+ * Copyright (c) 2015, Přemysl Eric Janouch <p@janouch.name>
  *
  * Permission to use, copy, modify, and/or distribute this software for any
  * purpose with or without fee is hereby granted.

config.h.in

@@ -2,7 +2,7 @@
 #define CONFIG_H
 
 #define PROGRAM_NAME "${PROJECT_NAME}"
-#define PROGRAM_VERSION "${project_VERSION}"
+#define PROGRAM_VERSION "${PROJECT_VERSION}"
 
 #endif  // ! CONFIG_H
 

ddc-ci.c

@@ -1,7 +1,7 @@
 /*
  * ddc-ci.c: DDC-CI utilities, Linux-only
  *
- * Copyright (c) 2015 - 2017, Přemysl Janouch <p@janouch.name>
+ * Copyright (c) 2015 - 2017, Přemysl Eric Janouch <p@janouch.name>
  *
  * Permission to use, copy, modify, and/or distribute this software for any
  * purpose with or without fee is hereby granted.
@@ -46,7 +46,7 @@ log_message_custom (void *user_data, const char *quote, const char *fmt,
 static void
 wait_ms (long ms)
 {
-	struct timespec ts = { 0, ms * 1000 * 1000 };
+	struct timespec ts = { ms / 1000, (ms % 1000) * 1000 * 1000 };
 	nanosleep (&ts, NULL);
 }
 

fancontrol-ng.c

@@ -1,7 +1,7 @@
 /*
  * fancontrol-ng.c: clone of fancontrol from lm_sensors
  *
- * Copyright (c) 2016, Přemysl Janouch <p@janouch.name>
+ * Copyright (c) 2016, Přemysl Eric Janouch <p@janouch.name>
  *
  * Permission to use, copy, modify, and/or distribute this software for any
  * purpose with or without fee is hereby granted.
@@ -124,7 +124,7 @@ config_validate_nonnegative (const struct config_item *item, struct error **e)
 	return error_set (e, "must be non-negative");
 }
 
-static struct config_schema g_config_device[] =
+static const struct config_schema g_config_device[] =
 {
 	{ .name      = "name",
 	  .comment   = "Device identifier",
@@ -137,7 +137,7 @@ static struct config_schema g_config_device[] =
 	{}
 };
 
-static struct config_schema g_config_pwm[] =
+static const struct config_schema g_config_pwm[] =
 {
 	{ .name      = "temp",
 	  .comment   = "Path to temperature sensor output",
@@ -225,12 +225,12 @@ paths_new (const char *device_path, const char *path, struct config_item *pwm)
 static void
 paths_destroy (struct paths *self)
 {
-	free (self->temp);
+	cstr_set (&self->temp, NULL);
 
-	free (self->pwm);
-	free (self->pwm_enable);
-	free (self->pwm_min);
-	free (self->pwm_max);
+	cstr_set (&self->pwm, NULL);
+	cstr_set (&self->pwm_enable, NULL);
+	cstr_set (&self->pwm_min, NULL);
+	cstr_set (&self->pwm_max, NULL);
 }
 
 // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
@@ -415,7 +415,7 @@ device_create (struct app_context *ctx, const char *path,
 // There is no room for errors in the configuration, everything must be valid.
 // Thus the reset to defaults on invalid values is effectively disabled here.
 static bool
-apply_schema (struct config_schema *schema, struct config_item *object,
+apply_schema (const struct config_schema *schema, struct config_item *object,
 	struct error **e)
 {
 	struct error *warning = NULL, *error = NULL;
@@ -445,7 +445,7 @@ static bool
 check_device_configuration (struct config_item *subtree, struct error **e)
 {
 	// Check regular fields in the device object
-	for (struct config_schema *s = g_config_device; s->name; s++)
+	for (const struct config_schema *s = g_config_device; s->name; s++)
 		if (!apply_schema (s, subtree, e))
 			return false;
 
@@ -465,7 +465,7 @@ check_device_configuration (struct config_item *subtree, struct error **e)
 	while ((pwm = str_map_iter_next (&iter)))
 	{
 		const char *subpath = iter.link->key;
-		for (struct config_schema *s = g_config_pwm; s->name; s++)
+		for (const struct config_schema *s = g_config_pwm; s->name; s++)
 			if (!apply_schema (s, pwm, &error))
 			{
 				error_set (e, "PWM `%s': %s", subpath, error->message);

gdm-switch-user.c

@@ -1,5 +1,5 @@
 // Public domain
-#include <gdm-user-switching.h>
+#include <gdm/gdm-user-switching.h>
 
 int
 main (int argc, char *argv[])

genpass.c

@@ -0,0 +1,151 @@
+/*
+ * genpass.c: password generator
+ *
+ * Copyright (c) 2025, Přemysl Eric Janouch <p@janouch.name>
+ *
+ * Permission to use, copy, modify, and/or distribute this software for any
+ * purpose with or without fee is hereby granted.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+ * SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
+ * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
+ * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ *
+ */
+
+#include "config.h"
+#undef PROGRAM_NAME
+#define PROGRAM_NAME "genpass"
+#include "liberty/liberty.c"
+
+static struct str
+parse_group (const char *group)
+{
+	bool present[0x100] = {};
+	for (size_t i = 0; group[i]; i++)
+	{
+		unsigned char c = group[i];
+		if (!i || c != '-' || !group[i + 1])
+			present[c] = true;
+		else if (group[i + 1] < group[i - 1])
+			exit_fatal ("character ranges must be increasing");
+		else
+			for (c = group[i - 1]; ++c <= group[i + 1]; )
+				present[c] = true;
+	}
+
+	struct str alphabet = str_make ();
+	for (size_t i = 1; i < N_ELEMENTS (present); i++)
+		if (present[i])
+			str_append_c (&alphabet, i);
+	if (!alphabet.len)
+		exit_fatal ("empty group");
+	return alphabet;
+}
+
+static void
+parse_program_arguments (int argc, char **argv,
+	unsigned long *length, struct strv *groups, struct str *alphabet)
+{
+	static const struct opt opts[] =
+	{
+		{ 'l', "length", "CHARACTERS", 0, "set password length" },
+		{ 'd', "debug", NULL, 0, "run in debug mode" },
+		{ 'h', "help", NULL, 0, "display this help and exit" },
+		{ 'V', "version", NULL, 0, "output version information and exit" },
+		{ 0, NULL, NULL, 0, NULL }
+	};
+
+	struct opt_handler oh =
+		opt_handler_make (argc, argv, opts, "GROUP...", "Password generator.");
+
+	int c;
+	while ((c = opt_handler_get (&oh)) != -1)
+	switch (c)
+	{
+	case 'l':
+		if (!xstrtoul (length, optarg, 10) || *length <= 0)
+			print_fatal ("invalid length argument");
+		break;
+	case 'd':
+		g_debug_mode = true;
+		break;
+	case 'h':
+		opt_handler_usage (&oh, stdout);
+		exit (EXIT_SUCCESS);
+	case 'V':
+		printf (PROGRAM_NAME " " PROGRAM_VERSION "\n");
+		exit (EXIT_SUCCESS);
+	default:
+		print_error ("wrong options");
+		opt_handler_usage (&oh, stderr);
+		exit (EXIT_FAILURE);
+	}
+
+	argc -= optind;
+	argv += optind;
+
+	for (int i = 0; i < argc; i++)
+	{
+		struct str alphabet = parse_group (argv[i]);
+		strv_append_owned (groups, str_steal (&alphabet));
+	}
+
+	bool present[0x100] = {};
+	for (size_t i = 0; i < groups->len; i++)
+		for (size_t k = 0; groups->vector[i][k]; k++)
+		{
+			unsigned char c = groups->vector[i][k];
+			if (present[c])
+				exit_fatal ("groups are not disjunct");
+			present[c] = true;
+		}
+	for (size_t i = 1; i < N_ELEMENTS (present); i++)
+		if (present[i])
+			str_append_c (alphabet, i);
+
+	if (groups->len > *length)
+		exit_fatal ("the requested length is less than the number of groups");
+	if (!groups->len)
+	{
+		opt_handler_usage (&oh, stderr);
+		exit (EXIT_FAILURE);
+	}
+
+	opt_handler_free (&oh);
+}
+
+int
+main (int argc, char *argv[])
+{
+	unsigned long length = 8;
+	struct strv groups = strv_make ();
+	struct str alphabet = str_make ();
+	parse_program_arguments (argc, argv, &length, &groups, &alphabet);
+
+	unsigned seed = 0;
+	if (!random_bytes (&seed, sizeof seed, NULL))
+		exit_fatal ("failed to initialize random numbers");
+	srand (seed);
+
+	// Select from a joined alphabet, but make sure all groups are represented.
+	struct str candidate = str_make ();
+	while (true)
+	{
+restart:
+		for (size_t i = length; i--; )
+			str_append_c (&candidate, alphabet.str[rand () % alphabet.len]);
+		for (size_t i = 0; i < groups.len; i++)
+			if (!strpbrk (candidate.str, groups.vector[i]))
+			{
+				str_reset (&candidate);
+				goto restart;
+			}
+
+		printf ("%s\n", candidate.str);
+		return 0;
+	}
+}

iexec.c

@@ -1,7 +1,7 @@
 /*
  * iexec.c: run a program and restart on file change
  *
- * Copyright (c) 2017, Přemysl Janouch <p@janouch.name>
+ * Copyright (c) 2017 - 2023, Přemysl Eric Janouch <p@janouch.name>
  *
  * Permission to use, copy, modify, and/or distribute this software for any
  * purpose with or without fee is hereby granted.
@@ -24,34 +24,54 @@
 // This can also work on BSD if someone puts in the effort to support kqueue
 #include <sys/inotify.h>
 
-static pid_t g_child;
-static bool g_restarting = false;
-static int g_inotify_fd, g_inotify_wd;
+static struct
+{
+	pid_t child;                        ///< Watched child or 0
+	bool exits;                         ///< Don't restart child when it exits
+	bool respawn;                       ///< Respawn child ASAP
+	bool killing;                       ///< Waiting for child to die
+	int inotify_fd, inotify_wd;
+}
+g;
+
+// Note that this program doesn't queue up file-based restarts
+static void
+handle_inotify_event (const struct inotify_event *e, const char *base)
+{
+	if (e->wd != g.inotify_wd || strcmp (e->name, base))
+		return;
+
+	if (g.child)
+	{
+		print_debug ("file changed, killing child");
+		if (kill (g.child, SIGINT))
+			print_error ("kill: %s", strerror (errno));
+		g.killing = true;
+	}
+	else
+	{
+		print_debug ("file changed, respawning");
+		g.respawn = true;
+	}
+}
 
 static void
 handle_file_change (const char *base)
 {
-	char buf[4096]; ssize_t len; const struct inotify_event *e;
-	while ((len = read (g_inotify_fd, buf, sizeof buf)) > 0)
-	for (char *ptr = buf; ptr < buf + len; ptr += sizeof *e + e->len)
-	{
-		e = (const struct inotify_event *) buf;
-		if (e->wd != g_inotify_wd || strcmp (e->name, base))
-			continue;
-
-		print_debug ("file changed, killing child");
-		g_restarting = true;
-		if (kill (g_child, SIGINT))
-			print_error ("kill: %s", strerror (errno));
-	}
+	char buf[4096];
+	ssize_t len = 0;
+	struct inotify_event *e = NULL;
+	while ((len = read (g.inotify_fd, buf, sizeof buf)) > 0)
+		for (char *ptr = buf; ptr < buf + len; ptr += sizeof *e + e->len)
+			handle_inotify_event ((e = (struct inotify_event *) buf), base);
 }
 
 static void
 spawn (char *argv[])
 {
-	if ((g_child = fork ()) == -1)
+	if ((g.child = fork ()) == -1)
 		exit_fatal ("fork: %s", strerror (errno));
-	else if (g_child)
+	else if (g.child)
 		return;
 
 	// A linker can create spurious CLOSE_WRITEs, wait until it's executable
@@ -64,23 +84,22 @@ spawn (char *argv[])
 }
 
 static bool
-check_child_death (char *argv[])
+check_child_death (void)
 {
-	if (waitpid (g_child, NULL, WNOHANG) != g_child)
+	int status = 0;
+	if (waitpid (g.child, &status, WNOHANG) != g.child)
 		return true;
 
-	if (!g_restarting)
+	g.child = 0;
+	if (!g.killing)
 	{
 		print_debug ("child died on its own, not respawning");
-		return false;
-	}
-	else
-	{
-		print_debug ("child died on request, respawning");
-		spawn (argv);
-		g_restarting = false;
-		return true;
+		return g.exits;
 	}
+
+	g.killing = false;
+	print_debug ("child died on request, respawning");
+	return g.respawn = true;
 }
 
 static void
@@ -93,8 +112,11 @@ sigchld_handler (int signum)
 int
 main (int argc, char *argv[])
 {
+	const char *target = NULL;
 	static const struct opt opts[] =
 	{
+		{ 'f', "file", "PATH", 0, "watch this path rather than the program" },
+		{ 'e', "exits", NULL, 0, "allow the program to exit on its own" },
 		{ 'd', "debug", NULL, 0, "run in debug mode" },
 		{ 'h', "help", NULL, 0, "display this help and exit" },
 		{ 'V', "version", NULL, 0, "output version information and exit" },
@@ -102,17 +124,21 @@ main (int argc, char *argv[])
 	};
 
 	struct opt_handler oh = opt_handler_make (argc, argv, opts,
-		"PROGRAM [ARG...]", "Run a program and restart on file change.");
+		"PROGRAM [ARG...]", "Run a program and restart it when it changes.");
 
 	// We have to turn that off as it causes more trouble than what it's worth
-	char *nonpermuting = xstrdup_printf ("+%s", oh.opt_string);
-	free (oh.opt_string);
-	oh.opt_string = nonpermuting;
+	cstr_set (&oh.opt_string, xstrdup_printf ("+%s", oh.opt_string));
 
 	int c;
 	while ((c = opt_handler_get (&oh)) != -1)
 	switch (c)
 	{
+	case 'f':
+		target = optarg;
+		break;
+	case 'e':
+		g.exits = true;
+		break;
 	case 'd':
 		g_debug_mode = true;
 		break;
@@ -138,6 +164,9 @@ main (int argc, char *argv[])
 	argc -= optind;
 	argv += optind;
 
+	if (!target)
+		target = argv[0];
+
 	(void) signal (SIGPIPE, SIG_IGN);
 	struct sigaction sa = { .sa_handler = sigchld_handler };
 	sigemptyset (&sa.sa_mask);
@@ -150,27 +179,33 @@ main (int argc, char *argv[])
 	if (sigprocmask (SIG_BLOCK, &chld, &orig))
 		exit_fatal ("sigprocmask: %s", strerror (errno));
 
-	char *path = xstrdup (argv[0]);
+	char *path = NULL;
+	char *dir = dirname ((path = xstrdup (target)));
 
-	if ((g_inotify_fd = inotify_init1 (IN_NONBLOCK)) < 0)
+	if ((g.inotify_fd = inotify_init1 (IN_NONBLOCK)) < 0)
 		exit_fatal ("inotify_init1: %s", strerror (errno));
-	if ((g_inotify_wd = inotify_add_watch (g_inotify_fd,
-		dirname (path), IN_MOVED_TO | IN_CLOSE_WRITE)) < 0)
+	if ((g.inotify_wd = inotify_add_watch (g.inotify_fd,
+		dir, IN_MOVED_TO | IN_CLOSE_WRITE)) < 0)
 		exit_fatal ("inotify_add_watch: %s", strerror (errno));
 
 	free (path);
-	char *base = basename ((path = xstrdup (argv[0])));
-	spawn (argv);
-
+	char *base = basename ((path = xstrdup (target)));
+	g.respawn = true;
 	do
 	{
-		fd_set r; FD_SET (g_inotify_fd, &r);
-		(void) pselect (g_inotify_fd + 1, &r, NULL, NULL, NULL, &orig);
+		if (g.respawn)
+		{
+			spawn (argv);
+			g.respawn = false;
+		}
+
+		fd_set r; FD_SET (g.inotify_fd, &r);
+		(void) pselect (g.inotify_fd + 1, &r, NULL, NULL, NULL, &orig);
 		handle_file_change (base);
 	}
-	while (check_child_death (argv));
+	while (check_child_death ());
 
 	free (path);
-	close (g_inotify_fd);
+	xclose (g.inotify_fd);
 	return EXIT_SUCCESS;
 }

input-switch.c

@@ -1,7 +1,7 @@
 /*
  * input-switch.c: switches display input via DDC/CI
  *
- * Copyright (c) 2017, Přemysl Janouch <p@janouch.name>
+ * Copyright (c) 2017 - 2022, Přemysl Eric Janouch <p@janouch.name>
  *
  * Permission to use, copy, modify, and/or distribute this software for any
  * purpose with or without fee is hereby granted.
@@ -28,8 +28,59 @@
 #include "ddc-ci.c"
 #include <dirent.h>
 
+// This list is from the MCCS 2.2a specification
+struct
+{
+	int code;                           ///< Input code
+	const char *name;                   ///< Input name
+	int index;                          ///< Input index
+}
+g_inputs[] =
+{
+	{ 0x01, "VGA",       1, },          // Analog video (R/G/B) 1
+	{ 0x02, "VGA",       2, },          // Analog video (R/G/B) 2
+	{ 0x03, "DVI",       1, },          // Digital video (TMDS) 1 DVI 1
+	{ 0x04, "DVI",       2, },          // Digital video (TMDS) 2 DVI 2
+	{ 0x05, "composite", 1, },          // Composite video 1
+	{ 0x06, "composite", 2, },          // Composite video 2
+	{ 0x07, "S-Video",   1, },          // S-video 1
+	{ 0x08, "S-Video",   2, },          // S-video 2
+	{ 0x09, "tuner",     1, },          // Tuner 1
+	{ 0x0A, "tuner",     2, },          // Tuner 2
+	{ 0x0B, "tuner",     3, },          // Tuner 3
+	{ 0x0C, "component", 1, },          // Component video (YPbPr/YCbCr) 1
+	{ 0x0D, "component", 2, },          // Component video (YPbPr/YCbCr) 2
+	{ 0x0E, "component", 3, },          // Component video (YPbPr/YCbCr) 3
+	{ 0x0F, "DP",        1, },          // DisplayPort 1
+	{ 0x10, "DP",        2, },          // DisplayPort 2
+	{ 0x11, "HDMI",      1, },          // Digital Video (TMDS) 3 HDMI 1
+	{ 0x12, "HDMI",      2, },          // Digital Video (TMDS) 4 HDMI 2
+	{ 0x15, "bnq-tb",    1, },          // Thunderbolt on BenQ PD3220U (no spec)
+};
+
 // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
 
+typedef bool (*ActionFunc) (int fd, int param, struct error **);
+
+static bool
+get_input_source (int fd, int input, struct error **e)
+{
+	struct vcp_feature_readout readout = {};
+	if (!vcp_get_feature (fd, VCP_INPUT_SOURCE, &readout, e))
+		return false;
+
+	(void) input;
+	for (size_t i = 0; i < N_ELEMENTS (g_inputs); i++)
+		if (g_inputs[i].code == readout.cur)
+		{
+			printf ("input is %s %d\n", g_inputs[i].name, g_inputs[i].index);
+			return true;
+		}
+
+	printf ("input is %d\n", readout.cur);
+	return true;
+}
+
 static bool
 set_input_source (int fd, int input, struct error **e)
 {
@@ -49,8 +100,31 @@ set_input_source (int fd, int input, struct error **e)
 	return true;
 }
 
+
+static bool
+set_bnq_kvm (int fd, int kvm, struct error **e)
+{
+	// This function does a leap of faith, should check the actual manufacturer
+	enum { VCP_BNQ_KVM = 0xE4 };
+
+	struct vcp_feature_readout readout = {};
+	if (!vcp_get_feature (fd, VCP_BNQ_KVM, &readout, e))
+		return false;
+	if (kvm < 0 || kvm > readout.max)
+		return error_set (e, "KVM index out of range");
+
+	uint8_t set_req[] = { VCP_BNQ_KVM, kvm >> 8, kvm };
+	if (!ddc_send (fd, DDC_SET_VCP_FEATURE, set_req, sizeof set_req, e))
+		return false;
+
+	wait_ms (50);
+
+	printf ("KVM set from %d to %d of %d\n", readout.cur, kvm, readout.max);
+	return true;
+}
+
 static void
-i2c (int input)
+i2c (ActionFunc action, int param)
 {
 	DIR *dev = opendir ("/dev");
 	if (!dev)
@@ -76,7 +150,7 @@ i2c (int input)
 
 		struct error *e = NULL;
 		if (!is_a_display (fd, &e)
-		 || !set_input_source (fd, input, &e))
+		 || !action (fd, param, &e))
 		{
 			printf ("%s\n", e->message);
 			error_free (e);
@@ -89,35 +163,6 @@ i2c (int input)
 
 // - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
 
-// This list is from the MCCS 2.2a specification
-struct
-{
-	int code;                           ///< Input code
-	const char *name;                   ///< Input name
-	int index;                          ///< Input index
-}
-g_inputs[] =
-{
-	{ 0x01, "vga",       1, },          // Analog video (R/G/B) 1
-	{ 0x02, "vga",       2, },          // Analog video (R/G/B) 2
-	{ 0x03, "dvi",       1, },          // Digital video (TMDS) 1 DVI 1
-	{ 0x04, "dvi",       2, },          // Digital video (TMDS) 2 DVI 2
-	{ 0x05, "composite", 1, },          // Composite video 1
-	{ 0x06, "composite", 2, },          // Composite video 2
-	{ 0x07, "s-video",   1, },          // S-video 1
-	{ 0x08, "s-video",   2, },          // S-video 2
-	{ 0x09, "tuner",     1, },          // Tuner 1
-	{ 0x0A, "tuner",     2, },          // Tuner 2
-	{ 0x0B, "tuner",     3, },          // Tuner 3
-	{ 0x0C, "component", 1, },          // Component video (YPbPr/YCbCr) 1
-	{ 0x0D, "component", 2, },          // Component video (YPbPr/YCbCr) 2
-	{ 0x0E, "component", 3, },          // Component video (YPbPr/YCbCr) 3
-	{ 0x0F, "dp",        1, },          // DisplayPort 1
-	{ 0x10, "dp",        2, },          // DisplayPort 2
-	{ 0x11, "hdmi",      1, },          // Digital Video (TMDS) 3 HDMI 1
-	{ 0x12, "hdmi",      2, },          // Digital Video (TMDS) 4 HDMI 2
-};
-
 int
 main (int argc, char *argv[])
 {
@@ -125,20 +170,33 @@ main (int argc, char *argv[])
 
 	if (argc <= 1)
 	{
-		printf ("Usage: %s <input> [<index>]\n", argv[0]);
+		printf ("Usage: %s {? | INPUT [INDEX]}\n", argv[0]);
 		exit (EXIT_FAILURE);
 	}
+	if (!strcmp (argv[1], "?"))
+	{
+		i2c (get_input_source, -1);
+		exit (EXIT_SUCCESS);
+	}
 
 	unsigned long input_source = 0;
 	if (xstrtoul (&input_source, argv[1], 10))
 	{
-		i2c (input_source);
+		i2c (set_input_source, input_source);
 		exit (EXIT_SUCCESS);
 	}
 
 	unsigned long index = 1;
 	if (argc > 2 && !xstrtoul (&index, argv[2], 10))
 		exit_fatal ("given index is not a number: %s", argv[2]);
+
+	// Manufacturer-specific, argument currently necessary, but we could rotate
+	if (argc > 2 && !strcasecmp (argv[1], "bnq-kvm"))
+	{
+		i2c (set_bnq_kvm, index);
+		exit (EXIT_SUCCESS);
+	}
+
 	for (size_t i = 0; i < N_ELEMENTS (g_inputs); i++)
 		if (!strcasecmp_ascii (g_inputs[i].name, argv[1])
 		 && g_inputs[i].index == (int) index)
@@ -146,7 +204,6 @@ main (int argc, char *argv[])
 	if (!input_source)
 		exit_fatal ("unknown input source: %s %lu", argv[1], index);
 
-	i2c (input_source);
+	i2c (set_input_source, input_source);
 	return 0;
 }
-

liust-50/README.adoc

@@ -0,0 +1,18 @@
+LIUST-50
+========
+
+Included here are a simulator for the Toshiba Tec LIUST-A00 (LIUST-50)
+VFD line display, and a status program sending data to the device.
+
+For device documentation, see https://github.com/boricha/M202MD12D which is
+seemingly a project for the later LIUST-A10.
+
+Device setup
+------------
+ # stty -F /dev/ttyS0 9600 parenb oddp -crtscts -cstopb cs8
+
+Running
+-------
+ # liustatus > /dev/ttyS0
+
+ $ liustatus | liustsim

liust-50/charset/charset.go

@@ -0,0 +1,211 @@
+package charset
+
+import (
+	"bytes"
+	_ "embed"
+	"image"
+	_ "image/png"
+	"log"
+)
+
+// Charsets are loosely based on CP 437 and JIS X 0201.
+
+var runesJapan2 = [256]rune{
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27,
+	0x28, 0x29, 0x2A, 0x2B, 0x2C, 0x2D, 0x2E, 0x2F,
+	0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37,
+	0x38, 0x39, 0x3A, 0x3B, 0x3C, 0x3D, 0x3E, 0x3F,
+	0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47,
+	0x48, 0x49, 0x4A, 0x4B, 0x4C, 0x4D, 0x4E, 0x4F,
+	0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57,
+	0x58, 0x59, 0x5A, 0x5B, '¥', 0x5D, 0x5E, 0x5F,
+	0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67,
+	0x68, 0x69, 0x6A, 0x6B, 0x6C, 0x6D, 0x6E, 0x6F,
+	0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77,
+	0x78, 0x79, 0x7A, 0x7B, 0x7C, 0x7D, 0x7E, '⌂',
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	'▒', '｡', '｢', '｣', '､', '･', 'ｦ', 'ｧ',
+	'ｨ', 'ｩ', 'ｪ', 'ｫ', 'ｬ', 'ｭ', 'ｮ', 'ｯ',
+	'ｰ', 'ｱ', 'ｲ', 'ｳ', 'ｴ', 'ｵ', 'ｶ', 'ｷ',
+	'ｸ', 'ｹ', 'ｺ', 'ｻ', 'ｼ', 'ｽ', 'ｾ', 'ｿ',
+	'ﾀ', 'ﾁ', 'ﾂ', 'ﾃ', 'ﾄ', 'ﾅ', 'ﾆ', 'ﾇ',
+	'ﾈ', 'ﾉ', 'ﾊ', 'ﾋ', 'ﾌ', 'ﾍ', 'ﾎ', 'ﾏ',
+	'ﾐ', 'ﾑ', 'ﾒ', 'ﾓ', 'ﾔ', 'ﾕ', 'ﾖ', 'ﾗ',
+	'ﾘ', 'ﾙ', 'ﾚ', 'ﾛ', 'ﾜ', 'ﾝ', 'ﾞ', 'ﾟ',
+	'α', 'ß', 'Γ', 'π', 'Σ', 'σ', 'µ', 'τ',
+	'Φ', 'Θ', 'Ω', 'δ', '∞', 'φ', 'ε', '∩',
+	'→', '←', '↓', '↑', '½', '¼', '★', '◊',
+	'㎏', '℔', '<27>', '×', '▾', '▴', '日', ' ',
+}
+
+var runesInternational = [256]rune{
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27,
+	0x28, 0x29, 0x2A, 0x2B, 0x2C, 0x2D, 0x2E, 0x2F,
+	0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37,
+	0x38, 0x39, 0x3A, 0x3B, 0x3C, 0x3D, 0x3E, 0x3F,
+	0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47,
+	0x48, 0x49, 0x4A, 0x4B, 0x4C, 0x4D, 0x4E, 0x4F,
+	0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57,
+	0x58, 0x59, 0x5A, 0x5B, 0x5C, 0x5D, 0x5E, 0x5F,
+	0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67,
+	0x68, 0x69, 0x6A, 0x6B, 0x6C, 0x6D, 0x6E, 0x6F,
+	0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77,
+	0x78, 0x79, 0x7A, 0x7B, 0x7C, 0x7D, 0x7E, '⌂',
+	'Ç', 'ü', 'é', 'â', 'ä', 'à', 'å', 'ç',
+	'ê', 'ë', 'è', 'ï', 'î', 'ì', 'Ä', 'Å',
+	'É', 'æ', 'Æ', 'ô', 'ö', 'ò', 'û', 'ù',
+	'ÿ', 'Ö', 'Ü', '¢', '£', '¥', '₧', 'ƒ',
+	'á', 'í', 'ó', 'ú', 'ñ', 'Ñ', 'ª', 'º',
+	'¿', '⌐', '¬', '½', '¼', '¡', '«', '»',
+	'░', '▒', '▓' - 1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, -1, -1, -1, -1, -1,
+	-1, -1, -1, '█', '▄', '▌', '▐', '▀',
+	'α', 'ß', 'Γ', 'π', 'Σ', 'σ', 'µ', 'τ',
+	'Φ', 'Θ', 'Ω', 'δ', '∞', 'φ', 'ε', '∩',
+	'≡', '±', '≥', '≤', '⌠', '⌡', '÷', '≈',
+	'°', '∙', '·', '√', 'ⁿ', '²', '■', ' ',
+}
+
+var runesInternationalVariants = []string{
+	"#$@[\\]^`{|}~", // USA
+	"#$à·ç§^`éùè╍",  // France
+	"#$§ÄÖÜ^`äöüß",  // Germany
+	"£$@[\\]^`{|}~", // UK
+	"#$@ÆØÅ^`æøå~",  // Denmark 1
+	"#¤ÉÄÖÅÜéäöåü",  // Sweden
+	"#$@·\\é^ùàòèì", // Italy
+	"₧$@¡Ñ¿^`╍ñ}~",  // Spain
+	"#$@[¥]^`{|}~",  // Japan
+	"#¤ÉÆØÅÜéæøåü",  // Norway
+	"#$ÉÆØÅÜéæøåü",  // Denmark 2
+	"#$á¡Ñ¿é`íñóú",  // Spain 2
+	"#$á¡Ñ¿éüíñóú",  // Latin America
+}
+
+var internationalVariantsChars = []byte{
+	0x23, 0x24, 0x40, 0x5B, 0x5C, 0x5D, 0x5E, 0x60, 0x7B, 0x7C, 0x7D, 0x7E}
+
+// ResolveCharToRune tries to decode a character into a Unicode rune.
+// It may return rune(-1) if the character is deemed to have no representation.
+func ResolveCharToRune(char, charset uint8) rune {
+	if charset == 0x63 {
+		return runesJapan2[char]
+	}
+	if int(charset) >= len(runesInternationalVariants) {
+		return -1
+	}
+
+	for i, b := range internationalVariantsChars {
+		if char == b {
+			return []rune(runesInternationalVariants[charset])[i]
+		}
+	}
+	return runesInternational[char]
+}
+
+// ResolveRune tries to find a corresponding character for a Unicode rune.
+func ResolveRune(r rune, charset uint8) (uint8, bool) {
+	if charset == 0x63 {
+		for i, ch := range runesJapan2 {
+			if ch == r {
+				return uint8(i), true
+			}
+		}
+		return 0, false
+	}
+	if int(charset) >= len(runesInternationalVariants) {
+		return 0, false
+	}
+
+	variantRunes := []rune(runesInternationalVariants[charset])
+	for i, ch := range variantRunes {
+		if ch == r {
+			return internationalVariantsChars[i], true
+		}
+	}
+	for i, ch := range runesInternational {
+		if ch == r {
+			return uint8(i), true
+		}
+	}
+	return 0, false
+}
+
+//go:embed japan.png
+var pngJapan2 []byte
+var imageJapan2 image.Image
+
+//go:embed germany.png
+var pngGermany []byte
+var imageGermany image.Image
+
+//go:embed international.png
+var pngInternational []byte
+var imageInternational image.Image
+
+func init() {
+	var err error
+	imageJapan2, _, err = image.Decode(bytes.NewReader(pngJapan2))
+	if err != nil {
+		log.Fatalln(err)
+	}
+
+	imageGermany, _, err = image.Decode(bytes.NewReader(pngGermany))
+	if err != nil {
+		log.Fatalln(err)
+	}
+
+	imageInternational, _, err = image.Decode(bytes.NewReader(pngInternational))
+	if err != nil {
+		log.Fatalln(err)
+	}
+}
+
+// ResolveCharToImage tries to decode a character into a 5x7 bitmap image
+// (white on black).
+func ResolveCharToImage(char, charset uint8) image.Image {
+	const (
+		gridWidth  = 6
+		gridHeight = 8
+	)
+
+	var src image.Image
+	var col, row int
+	if charset == 0x63 {
+		src, col, row = imageJapan2, int(char)/16, int(char)%16
+	} else if int(charset) < len(runesInternationalVariants) {
+		src, col, row = imageGermany, int(char)/16, int(char)%16
+		for i, b := range internationalVariantsChars {
+			if char == b {
+				src, col, row = imageInternational, i, int(charset)
+			}
+		}
+	} else {
+		return nil
+	}
+
+	x0 := col * gridWidth
+	y0 := row * gridHeight
+	return src.(interface {
+		SubImage(r image.Rectangle) image.Image
+	}).SubImage(image.Rect(
+		x0,
+		y0,
+		x0+gridWidth-1,
+		y0+gridHeight-1,
+	))
+}

liust-50/cmd/liustatus/kaomoji.go

@@ -0,0 +1,242 @@
+package main
+
+import (
+	"math/rand"
+	"strings"
+	"time"
+)
+
+type kaomojiKind int
+
+const (
+	kaomojiKindAwake kaomojiKind = iota
+	kaomojiKindBlink
+	kaomojiKindFace
+	kaomojiKindChase
+	kaomojiKindHappy
+	kaomojiKindSleep
+	kaomojiKindSnore
+	kaomojiKindPeek
+)
+
+type kaomojiState struct {
+	kind    kaomojiKind
+	face    string
+	message string
+	delay   int
+}
+
+func (ks *kaomojiState) Format() string {
+	line := []rune(strings.Repeat(" ", displayWidth))
+
+	face := []rune(ks.face)
+	if x := (len(line) - len(face) + 1) / 2; x < 0 {
+		copy(line, face)
+	} else {
+		copy(line[x:], face)
+	}
+
+	if ks.message != "" {
+		copy(line[14:], []rune(ks.message))
+	}
+	return string(line)
+}
+
+func (ks *kaomojiState) Duration() time.Duration {
+	return time.Millisecond * time.Duration(ks.delay)
+}
+
+// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+
+func kaomojiNewAwake() kaomojiState {
+	return kaomojiState{
+		kind:    kaomojiKindAwake,
+		face:    "(o_o)",
+		message: "",
+		delay:   2_000 + rand.Intn(4_000),
+	}
+}
+
+func kaomojiNewBlink() kaomojiState {
+	return kaomojiState{
+		kind:    kaomojiKindBlink,
+		face:    "(-_-)",
+		message: "",
+		delay:   100 + rand.Intn(50),
+	}
+}
+
+func kaomojiNewFace() kaomojiState {
+	faces := []struct {
+		face, message string
+	}{
+		{"(x_x)", "ｽﾞｷｽﾞｷ"},
+		{"(T_T)", "ｽﾞｰﾝ"},
+		{"=^.^=", "ﾆｬｰ"},
+		{"(>_<)", "ｹﾞｯﾌﾟ"},
+		{"(O_O)", "ｼﾞｰ"},
+	}
+
+	x := faces[rand.Intn(len(faces))]
+	return kaomojiState{
+		kind:    kaomojiKindFace,
+		face:    x.face,
+		message: x.message,
+		delay:   10_000,
+	}
+}
+
+func kaomojiNewChase() kaomojiState {
+	faces := []string{"(ﾟﾛﾟ)", "(ﾟ∩ﾟ)"}
+	return kaomojiState{
+		kind:    kaomojiKindChase,
+		face:    faces[rand.Intn(len(faces))],
+		message: "",
+		delay:   125,
+	}
+}
+
+func kaomojiNewHappy() kaomojiState {
+	return kaomojiState{
+		kind:    kaomojiKindHappy,
+		face:    "(^_^)",
+		message: "",
+		delay:   500,
+	}
+}
+
+func kaomojiNewSleep() kaomojiState {
+	return kaomojiState{
+		kind:    kaomojiKindSleep,
+		face:    "(-_-)",
+		message: "",
+		delay:   10_000,
+	}
+}
+
+func kaomojiNewSnore() kaomojiState {
+	return kaomojiState{
+		kind:    kaomojiKindSnore,
+		face:    "(-_-)",
+		message: "ｸﾞｰｸﾞｰ",
+		delay:   10_000,
+	}
+}
+
+func kaomojiNewPeek() kaomojiState {
+	faces := []string{"(o_-)", "(-_o)"}
+	return kaomojiState{
+		kind:    kaomojiKindPeek,
+		face:    faces[rand.Intn(len(faces))],
+		message: "",
+		delay:   3_000,
+	}
+}
+
+// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+
+func kaomojiAnimateChase(state kaomojiState) (lines []string) {
+	// The main character is fixed and of fixed width.
+	var (
+		normal    = []rune("(o_o)")
+		alert     = []rune("(O_O)")
+		centre    = (displayWidth - 4) / 2
+		chaserLen = len([]rune(state.face))
+	)
+
+	// For simplicity, let the animation run off-screen.
+	for chaserX := chaserLen + displayWidth; chaserX >= 0; chaserX-- {
+		line := []rune(strings.Repeat(" ", chaserLen+displayWidth))
+
+		chased, chasedX := normal, chaserLen+centre
+		if chasedX > chaserX-7 {
+			chased, chasedX = alert, chaserX-7
+		}
+		if chasedX >= 0 {
+			copy(line[chasedX:], chased)
+		}
+
+		copy(line[chaserX:], []rune(state.face))
+		lines = append(lines, string(line[chaserLen:]))
+	}
+
+	// Return our main character back.
+	for chasedX := displayWidth; chasedX >= centre; chasedX-- {
+		line := []rune(strings.Repeat(" ", displayWidth))
+		copy(line[chasedX:], normal)
+		lines = append(lines, string(line))
+	}
+	return
+}
+
+func kaomojiProducer(lines chan<- string) {
+	state := kaomojiNewAwake()
+	execute := func() {
+		lines <- state.Format()
+		time.Sleep(state.Duration())
+	}
+
+	for {
+		switch state.kind {
+		case kaomojiKindAwake:
+			execute()
+			switch f := rand.Float32(); {
+			case f < 0.025:
+				state = kaomojiNewFace()
+			case f < 0.050:
+				state = kaomojiNewChase()
+			case f < 0.075:
+				state = kaomojiNewHappy()
+			case f < 0.100:
+				state = kaomojiNewSleep()
+			default:
+				state = kaomojiNewBlink()
+			}
+
+		case kaomojiKindBlink, kaomojiKindFace:
+			execute()
+			state = kaomojiNewAwake()
+
+		case kaomojiKindHappy:
+			face := state.face
+			execute()
+			state.face = "  " + face
+			execute()
+			state.face = face
+			execute()
+			state.face = face + "  "
+			execute()
+			state.face = face
+			execute()
+			state = kaomojiNewAwake()
+
+		case kaomojiKindChase:
+			for _, line := range kaomojiAnimateChase(state) {
+				lines <- line
+				time.Sleep(state.Duration())
+			}
+			state = kaomojiNewAwake()
+
+		case kaomojiKindSleep:
+			execute()
+			switch f := rand.Float32(); {
+			case f < 0.10:
+				state = kaomojiNewAwake()
+			case f < 0.20:
+				state = kaomojiNewPeek()
+			case f < 0.60:
+				state = kaomojiNewSnore()
+			default:
+				state = kaomojiNewSleep()
+			}
+
+		case kaomojiKindSnore:
+			execute()
+			state = kaomojiNewSleep()
+
+		case kaomojiKindPeek:
+			execute()
+			state = kaomojiNewSleep()
+		}
+	}
+}

liust-50/cmd/liustatus/status.go

@@ -0,0 +1,146 @@
+package main
+
+import (
+	"fmt"
+	"math/rand"
+	"strings"
+	"time"
+
+	"janouch.name/desktop-tools/liust-50/charset"
+)
+
+const (
+	displayWidth  = 20
+	displayHeight = 2
+	targetCharset = 0x63
+)
+
+type DisplayState struct {
+	Display [displayHeight][displayWidth]uint8
+}
+
+type Display struct {
+	Current, Last DisplayState
+}
+
+func NewDisplay() *Display {
+	t := &Display{}
+	for y := 0; y < displayHeight; y++ {
+		for x := 0; x < displayWidth; x++ {
+			t.Current.Display[y][x] = ' '
+			t.Last.Display[y][x] = ' '
+		}
+	}
+	return t
+}
+
+func (t *Display) SetLine(row int, content string) {
+	if row < 0 || row >= displayHeight {
+		return
+	}
+
+	runes := []rune(content)
+	for x := 0; x < displayWidth; x++ {
+		if x < len(runes) {
+			b, ok := charset.ResolveRune(runes[x], targetCharset)
+			if ok {
+				t.Current.Display[row][x] = b
+			} else {
+				t.Current.Display[row][x] = '?'
+			}
+		} else {
+			t.Current.Display[row][x] = ' '
+		}
+	}
+}
+
+func (t *Display) HasChanges() bool {
+	for y := 0; y < displayHeight; y++ {
+		for x := 0; x < displayWidth; x++ {
+			if t.Current.Display[y][x] != t.Last.Display[y][x] {
+				return true
+			}
+		}
+	}
+	return false
+}
+
+func (t *Display) Update() {
+	for y := 0; y < displayHeight; y++ {
+		start := -1
+		for x := 0; x < displayWidth; x++ {
+			if t.Current.Display[y][x] != t.Last.Display[y][x] {
+				start = x
+				break
+			}
+		}
+		if start >= 0 {
+			fmt.Printf("\x1b[%d;%dH%s",
+				y+1, start+1, []byte(t.Current.Display[y][start:]))
+			copy(t.Last.Display[y][start:], t.Current.Display[y][start:])
+		}
+	}
+}
+
+func statusProducer(lines chan<- string) {
+	ticker := time.NewTicker(1 * time.Second)
+	defer ticker.Stop()
+
+	temperature, fetcher := "", NewWeatherFetcher()
+	temperatureChan := make(chan string)
+	go fetcher.Run(5*time.Minute, temperatureChan)
+
+	for {
+		select {
+		case newTemperature := <-temperatureChan:
+			temperature = newTemperature
+		default:
+		}
+
+		now := time.Now()
+		status := fmt.Sprintf("%s %3s %s",
+			now.Format("Mon _2 Jan"), temperature, now.Format("15:04"))
+
+		// Ensure exactly 20 characters.
+		runes := []rune(status)
+		if len(runes) > displayWidth {
+			status = string(runes[:displayWidth])
+		} else if len(runes) < displayWidth {
+			status = status + strings.Repeat(" ", displayWidth-len(runes))
+		}
+
+		lines <- status
+		<-ticker.C
+	}
+}
+
+func main() {
+	rand.Seed(time.Now().UTC().UnixNano())
+	terminal := NewDisplay()
+
+	kaomojiChan := make(chan string, 1)
+	statusChan := make(chan string, 1)
+	go func() {
+		kaomojiChan <- strings.Repeat(" ", displayWidth)
+		statusChan <- strings.Repeat(" ", displayWidth)
+	}()
+
+	go kaomojiProducer(kaomojiChan)
+	go statusProducer(statusChan)
+
+	// TODO(p): And we might want to disable cursor visibility as well.
+	fmt.Printf("\x1bR%c", targetCharset)
+	fmt.Print("\x1b[2J") // Clear display
+
+	for {
+		select {
+		case line := <-kaomojiChan:
+			terminal.SetLine(0, line)
+		case line := <-statusChan:
+			terminal.SetLine(1, line)
+		}
+		if terminal.HasChanges() {
+			terminal.Update()
+		}
+	}
+}

liust-50/cmd/liustatus/weather.go

@@ -0,0 +1,132 @@
+package main
+
+import (
+	"encoding/xml"
+	"fmt"
+	"io"
+	"log"
+	"net/http"
+	"strconv"
+	"time"
+)
+
+const (
+	baseURL   = "https://api.met.no/weatherapi"
+	userAgent = "liustatus/1.0"
+
+	// Prague coordinates.
+	lat      = 50.08804
+	lon      = 14.42076
+	altitude = 202
+)
+
+// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+
+type Weatherdata struct {
+	XMLName xml.Name `xml:"weatherdata"`
+	Product Product  `xml:"product"`
+}
+
+type Product struct {
+	Times []Time `xml:"time"`
+}
+
+type Time struct {
+	From     string   `xml:"from,attr"`
+	To       string   `xml:"to,attr"`
+	Location Location `xml:"location"`
+}
+
+type Location struct {
+	Temperature *Temperature `xml:"temperature"`
+}
+
+type Temperature struct {
+	Unit  string `xml:"unit,attr"`
+	Value string `xml:"value,attr"`
+}
+
+// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+
+// WeatherFetcher handles weather data retrieval.
+type WeatherFetcher struct {
+	client *http.Client
+}
+
+// NewWeatherFetcher creates a new weather fetcher instance.
+func NewWeatherFetcher() *WeatherFetcher {
+	return &WeatherFetcher{
+		client: &http.Client{Timeout: 30 * time.Second},
+	}
+}
+
+// fetchWeather retrieves the current temperature from the API.
+func (w *WeatherFetcher) fetchWeather() (string, error) {
+	url := fmt.Sprintf(
+		"%s/locationforecast/2.0/classic?lat=%.5f&lon=%.5f&altitude=%d",
+		baseURL, lat, lon, altitude)
+
+	req, err := http.NewRequest("GET", url, nil)
+	if err != nil {
+		return "", err
+	}
+
+	req.Header.Set("User-Agent", userAgent)
+
+	resp, err := w.client.Do(req)
+	if err != nil {
+		return "", err
+	}
+	defer resp.Body.Close()
+
+	if resp.StatusCode != http.StatusOK {
+		return "", fmt.Errorf("API returned status %d", resp.StatusCode)
+	}
+
+	body, err := io.ReadAll(resp.Body)
+	if err != nil {
+		return "", err
+	}
+
+	var weatherData Weatherdata
+	if err := xml.Unmarshal(body, &weatherData); err != nil {
+		return "", err
+	}
+
+	now := time.Now().UTC()
+	for _, t := range weatherData.Product.Times {
+		toTime, err := time.Parse("2006-01-02T15:04:05Z", t.To)
+		if err != nil || toTime.Before(now) {
+			continue
+		}
+		if t.Location.Temperature != nil {
+			temp, err := strconv.ParseFloat(t.Location.Temperature.Value, 64)
+			if err != nil {
+				continue
+			}
+			return fmt.Sprintf("%dﾟ", int(temp)), nil
+		}
+	}
+
+	return "", fmt.Errorf("no usable temperature data found")
+}
+
+// update fetches new weather data and returns it.
+func (w *WeatherFetcher) update() string {
+	temp, err := w.fetchWeather()
+	if err != nil {
+		log.Printf("Error fetching weather: %v", err)
+	}
+	return temp
+}
+
+// Run runs as a goroutine to periodically fetch weather data.
+func (w *WeatherFetcher) Run(interval time.Duration, output chan<- string) {
+	ticker := time.NewTicker(interval)
+	defer ticker.Stop()
+
+	output <- w.update()
+	for range ticker.C {
+		output <- w.update()
+	}
+}

liust-50/cmd/liustsim/simulator.go

@@ -0,0 +1,411 @@
+package main
+
+import (
+	"bufio"
+	"image"
+	"image/color"
+	"log"
+	"os"
+	"strconv"
+	"strings"
+
+	"fyne.io/fyne/v2"
+	"fyne.io/fyne/v2/app"
+	"fyne.io/fyne/v2/canvas"
+	"fyne.io/fyne/v2/theme"
+	"fyne.io/fyne/v2/widget"
+
+	"janouch.name/desktop-tools/liust-50/charset"
+)
+
+// --- Display emulation -------------------------------------------------------
+
+const (
+	displayWidth  = 20
+	displayHeight = 2
+	charWidth     = 5 + 1
+	charHeight    = 7 + 1
+)
+
+// TODO(p): See how this works exactly, and implement it.
+const (
+	cursorModeOff = iota
+	cursorModeBlink
+	cursorModeLightUp
+)
+
+type Display struct {
+	chars      [displayHeight][displayWidth]uint8
+	charset    uint8
+	cursorX    int
+	cursorY    int
+	cursorMode int
+}
+
+func NewDisplay() *Display {
+	return &Display{charset: 2}
+}
+
+func (d *Display) Clear() {
+	for y := 0; y < displayHeight; y++ {
+		for x := 0; x < displayWidth; x++ {
+			d.chars[y][x] = 0x20 // space
+		}
+	}
+}
+
+func (d *Display) ClearToEnd() {
+	for x := d.cursorX; x < displayWidth; x++ {
+		d.chars[d.cursorY][x] = 0x20 // space
+	}
+}
+
+func (d *Display) drawCharacter(
+	img *image.RGBA, character image.Image, cx, cy int) {
+	if character == nil {
+		return
+	}
+
+	bounds := character.Bounds()
+	width, height := bounds.Dx(), bounds.Dy()
+	for dy := 0; dy < height; dy++ {
+		for dx := 0; dx < width; dx++ {
+			var c color.RGBA
+			if r, _, _, _ := character.At(
+				bounds.Min.X+dx, bounds.Min.Y+dy).RGBA(); r >= 0x8000 {
+				c = color.RGBA{0x00, 0xFF, 0xB0, 0xFF}
+			} else {
+				c = color.RGBA{0x18, 0x18, 0x18, 0xFF}
+			}
+			img.SetRGBA(1+cx*charWidth+dx, 1+cy*charHeight+dy, c)
+		}
+	}
+}
+
+func (d *Display) Render() image.Image {
+	width := 1 + displayWidth*charWidth
+	height := 1 + displayHeight*charHeight
+
+	// XXX: Not sure if we rather don't want to provide double buffering,
+	// meaning we would cycle between two internal buffers.
+	img := image.NewRGBA(image.Rect(0, 0, width, height))
+
+	black := [4]uint8{0x00, 0x00, 0x00, 0xFF}
+	for y := 0; y < height; y++ {
+		for x := 0; x < width; x++ {
+			copy(img.Pix[img.PixOffset(x, y):], black[:])
+		}
+	}
+
+	for cy := 0; cy < displayHeight; cy++ {
+		for cx := 0; cx < displayWidth; cx++ {
+			charImg := charset.ResolveCharToImage(d.chars[cy][cx], d.charset)
+			d.drawCharacter(img, charImg, cx, cy)
+		}
+	}
+	return img
+}
+
+func (d *Display) PutChar(ch uint8) {
+	if d.cursorX >= displayWidth || d.cursorY >= displayHeight {
+		return
+	}
+
+	d.chars[d.cursorY][d.cursorX] = ch
+	d.cursorX++
+	if d.cursorX >= displayWidth {
+		d.cursorX = displayWidth - 1
+	}
+}
+
+func (d *Display) LineFeed() {
+	d.cursorY++
+	if d.cursorY >= displayHeight {
+		d.cursorY = displayHeight - 1
+
+		y := 0
+		for ; y < displayHeight-1; y++ {
+			d.chars[y] = d.chars[y+1]
+		}
+		for x := 0; x < displayWidth; x++ {
+			d.chars[y][x] = 0x20
+		}
+	}
+}
+
+func (d *Display) CarriageReturn() {
+	d.cursorX = 0
+}
+
+func (d *Display) Backspace() {
+	if d.cursorX > 0 {
+		d.cursorX--
+	}
+}
+
+func (d *Display) SetCursor(x, y int) {
+	if x >= 0 && x < displayWidth {
+		d.cursorX = x
+	}
+	if y >= 0 && y < displayHeight {
+		d.cursorY = y
+	}
+}
+
+// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+
+func parseANSI(input string) (command string, params []int) {
+	if !strings.HasPrefix(input, "\x1b[") {
+		return "", nil
+	}
+
+	input = input[2:]
+	if len(input) == 0 {
+		return "", nil
+	}
+
+	cmdIdx := len(input) - 1
+	paramStr, command := input[:cmdIdx], input[cmdIdx:]
+	if paramStr != "" {
+		for _, p := range strings.Split(paramStr, ";") {
+			if p = strings.TrimSpace(p); p == "" {
+				params = append(params, 0)
+			} else if value, err := strconv.Atoi(p); err == nil {
+				params = append(params, value)
+			}
+		}
+	}
+	return command, params
+}
+
+// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+
+type protocolParser struct {
+	seq     strings.Builder
+	inEsc   bool
+	inCSI   bool
+	display *Display
+}
+
+func newProtocolParser(d *Display) *protocolParser {
+	return &protocolParser{display: d}
+}
+
+func (pp *protocolParser) reset() {
+	pp.inEsc = false
+	pp.inCSI = false
+	pp.seq.Reset()
+}
+
+func (pp *protocolParser) handleCSICommand() bool {
+	cmd, params := parseANSI(pp.seq.String())
+
+	switch cmd {
+	case "J": // Clear display
+		// XXX: The no params case is unverified.
+		if len(params) == 0 || params[0] == 2 {
+			pp.display.Clear()
+		}
+	case "K": // Delete to end of line
+		// XXX: The no params case is unverified (but it should work).
+		if len(params) == 0 || params[0] == 0 {
+			pp.display.ClearToEnd()
+		}
+	case "H": // Cursor position
+		y, x := 0, 0
+		if len(params) >= 1 {
+			y = params[0] - 1 // 1-indexed to 0-indexed
+		}
+		if len(params) >= 2 {
+			x = params[1] - 1
+		}
+		pp.display.SetCursor(x, y)
+	}
+	return true
+}
+
+func (pp *protocolParser) handleEscapeSequence(b byte) bool {
+	pp.seq.WriteByte(b)
+
+	if pp.seq.Len() == 2 && b == '[' {
+		pp.inCSI = true
+		return false
+	}
+
+	if pp.seq.Len() == 3 && pp.seq.String()[1] == 'R' {
+		pp.display.charset = b
+		pp.reset()
+		return true
+	}
+
+	if pp.inCSI && (b >= 'A' && b <= 'Z' || b >= 'a' && b <= 'z') {
+		refresh := pp.handleCSICommand()
+		pp.reset()
+		return refresh
+	}
+
+	if pp.seq.Len() == 6 && pp.seq.String()[1:5] == "\\?LC" {
+		pp.display.cursorMode = int(pp.seq.String()[5])
+		return true
+	}
+
+	return false
+}
+
+func (pp *protocolParser) handleCharacter(b byte) bool {
+	switch b {
+	case 0x0A: // LF
+		pp.display.LineFeed()
+		return true
+	case 0x0D: // CR
+		pp.display.CarriageReturn()
+		return true
+	case 0x08: // BS
+		pp.display.Backspace()
+		return true
+	default:
+		if b >= 0x20 {
+			pp.display.PutChar(b)
+			return true
+		}
+	}
+	return false
+}
+
+func (pp *protocolParser) handleByte(b byte) (needsRefresh bool) {
+	if b == 0x1b { // ESC
+		pp.reset()
+		pp.inEsc = true
+		pp.seq.WriteByte(b)
+		return false
+	}
+	if pp.inEsc {
+		return pp.handleEscapeSequence(b)
+	}
+
+	return pp.handleCharacter(b)
+}
+
+// --- Display widget ----------------------------------------------------------
+
+type DisplayRenderer struct {
+	image *canvas.Image
+	label *canvas.Text
+
+	objects       []fyne.CanvasObject
+	displayWidget *DisplayWidget
+}
+
+func (r *DisplayRenderer) Destroy() {}
+
+func (r *DisplayRenderer) Layout(size fyne.Size) {
+	minSize := r.MinSize()
+	aspectRatio := minSize.Width / minSize.Height
+
+	var areaX, areaY, areaWidth, areaHeight float32
+	if size.Width/size.Height > aspectRatio {
+		areaHeight = size.Height
+		areaWidth = areaHeight * aspectRatio
+		areaX = (size.Width - areaWidth) / 2
+	} else {
+		areaWidth = size.Width
+		areaHeight = areaWidth / aspectRatio
+		areaY = (size.Height - areaHeight) / 2
+	}
+
+	imageHeight := areaHeight * (minSize.Height - 5) / minSize.Height
+	r.image.Move(fyne.NewPos(areaX, areaY))
+	r.image.Resize(fyne.NewSize(areaWidth, imageHeight))
+
+	// The appropriate TextSize for the desired label height is guesswork.
+	// In theory, we could figure out the relation between TextSize
+	// and measured height in our MinSize.
+	r.label.TextSize = (areaHeight - imageHeight) * 0.75
+	labelSize := r.label.MinSize()
+
+	// The VFD display is not mounted exactly in the centre of the device.
+	r.label.Move(fyne.NewPos(
+		areaX+(areaWidth-labelSize.Width)*0.525,
+		areaY+imageHeight))
+	r.label.Resize(labelSize)
+}
+
+func (r *DisplayRenderer) MinSize() fyne.Size {
+	// The VFD display doesn't have rectangular pixels,
+	// they are rather elongated in a roughly 3:4 ratio.
+	//
+	// Add space for the bottom label.
+	bounds := r.image.Image.Bounds()
+	return fyne.NewSize(float32(bounds.Dx()), float32(bounds.Dy())*1.25).
+		AddWidthHeight(0, 5)
+}
+
+func (r *DisplayRenderer) Objects() []fyne.CanvasObject { return r.objects }
+
+func (r *DisplayRenderer) Refresh() {
+	r.image.Image = r.displayWidget.display.Render()
+	r.image.Refresh()
+	r.label.Refresh()
+}
+
+// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+
+type DisplayWidget struct {
+	widget.BaseWidget
+	display *Display
+}
+
+func NewDisplayWidget(display *Display) *DisplayWidget {
+	dw := &DisplayWidget{display: display}
+	dw.ExtendBaseWidget(dw)
+	return dw
+}
+
+func (dw *DisplayWidget) CreateRenderer() fyne.WidgetRenderer {
+	image := canvas.NewImageFromImage(dw.display.Render())
+	image.ScaleMode = canvas.ImageScalePixels
+
+	label := canvas.NewText("TOSHIBA", color.Gray{0x99})
+	label.TextStyle.Bold = true
+
+	return &DisplayRenderer{
+		image:         image,
+		label:         label,
+		objects:       []fyne.CanvasObject{image, label},
+		displayWidget: dw,
+	}
+}
+
+// --- Main --------------------------------------------------------------------
+
+func main() {
+	a := app.New()
+	a.Settings().SetTheme(theme.DarkTheme())
+	window := a.NewWindow("Toshiba Tec LIUST-50 Simulator")
+
+	display := NewDisplay()
+	display.Clear()
+
+	dw := NewDisplayWidget(display)
+	window.SetContent(dw)
+	window.Resize(fyne.NewSize(600, 150))
+
+	go func() {
+		reader := bufio.NewReader(os.Stdin)
+		parser := newProtocolParser(display)
+
+		for {
+			b, err := reader.ReadByte()
+			if err != nil {
+				log.Println(err)
+				return
+			}
+
+			if parser.handleByte(b) {
+				fyne.DoAndWait(func() { dw.Refresh() })
+			}
+		}
+	}()
+
+	window.ShowAndRun()
+}

liust-50/go.mod

@@ -0,0 +1,40 @@
+module janouch.name/desktop-tools/liust-50
+
+go 1.25.1
+
+require fyne.io/fyne/v2 v2.7.1
+
+require (
+	fyne.io/systray v1.11.1-0.20250603113521-ca66a66d8b58 // indirect
+	github.com/BurntSushi/toml v1.5.0 // indirect
+	github.com/davecgh/go-spew v1.1.1 // indirect
+	github.com/fredbi/uri v1.1.1 // indirect
+	github.com/fsnotify/fsnotify v1.9.0 // indirect
+	github.com/fyne-io/gl-js v0.2.0 // indirect
+	github.com/fyne-io/glfw-js v0.3.0 // indirect
+	github.com/fyne-io/image v0.1.1 // indirect
+	github.com/fyne-io/oksvg v0.2.0 // indirect
+	github.com/go-gl/gl v0.0.0-20231021071112-07e5d0ea2e71 // indirect
+	github.com/go-gl/glfw/v3.3/glfw v0.0.0-20250301202403-da16c1255728 // indirect
+	github.com/go-text/render v0.2.0 // indirect
+	github.com/go-text/typesetting v0.3.0 // indirect
+	github.com/godbus/dbus/v5 v5.2.0 // indirect
+	github.com/hack-pad/go-indexeddb v0.3.2 // indirect
+	github.com/hack-pad/safejs v0.1.1 // indirect
+	github.com/jeandeaual/go-locale v0.0.0-20250612000132-0ef82f21eade // indirect
+	github.com/jsummers/gobmp v0.0.0-20230614200233-a9de23ed2e25 // indirect
+	github.com/kr/text v0.1.0 // indirect
+	github.com/nfnt/resize v0.0.0-20180221191011-83c6a9932646 // indirect
+	github.com/nicksnyder/go-i18n/v2 v2.6.0 // indirect
+	github.com/pmezard/go-difflib v1.0.0 // indirect
+	github.com/rymdport/portal v0.4.2 // indirect
+	github.com/srwiley/oksvg v0.0.0-20221011165216-be6e8873101c // indirect
+	github.com/srwiley/rasterx v0.0.0-20220730225603-2ab79fcdd4ef // indirect
+	github.com/stretchr/testify v1.11.1 // indirect
+	github.com/yuin/goldmark v1.7.13 // indirect
+	golang.org/x/image v0.33.0 // indirect
+	golang.org/x/net v0.47.0 // indirect
+	golang.org/x/sys v0.38.0 // indirect
+	golang.org/x/text v0.31.0 // indirect
+	gopkg.in/yaml.v3 v3.0.1 // indirect
+)

liust-50/go.sum

@@ -0,0 +1,80 @@
+fyne.io/fyne/v2 v2.7.1 h1:ja7rNHWWEooha4XBIZNnPP8tVFwmTfwMJdpZmLxm2Zc=
+fyne.io/fyne/v2 v2.7.1/go.mod h1:xClVlrhxl7D+LT+BWYmcrW4Nf+dJTvkhnPgji7spAwE=
+fyne.io/systray v1.11.1-0.20250603113521-ca66a66d8b58 h1:eA5/u2XRd8OUkoMqEv3IBlFYSruNlXD8bRHDiqm0VNI=
+fyne.io/systray v1.11.1-0.20250603113521-ca66a66d8b58/go.mod h1:RVwqP9nYMo7h5zViCBHri2FgjXF7H2cub7MAq4NSoLs=
+github.com/BurntSushi/toml v1.5.0 h1:W5quZX/G/csjUnuI8SUYlsHs9M38FC7znL0lIO+DvMg=
+github.com/BurntSushi/toml v1.5.0/go.mod h1:ukJfTF/6rtPPRCnwkur4qwRxa8vTRFBF0uk2lLoLwho=
+github.com/davecgh/go-spew v1.1.1 h1:vj9j/u1bqnvCEfJOwUhtlOARqs3+rkHYY13jYWTU97c=
+github.com/davecgh/go-spew v1.1.1/go.mod h1:J7Y8YcW2NihsgmVo/mv3lAwl/skON4iLHjSsI+c5H38=
+github.com/felixge/fgprof v0.9.3 h1:VvyZxILNuCiUCSXtPtYmmtGvb65nqXh2QFWc0Wpf2/g=
+github.com/felixge/fgprof v0.9.3/go.mod h1:RdbpDgzqYVh/T9fPELJyV7EYJuHB55UTEULNun8eiPw=
+github.com/fredbi/uri v1.1.1 h1:xZHJC08GZNIUhbP5ImTHnt5Ya0T8FI2VAwI/37kh2Ko=
+github.com/fredbi/uri v1.1.1/go.mod h1:4+DZQ5zBjEwQCDmXW5JdIjz0PUA+yJbvtBv+u+adr5o=
+github.com/fsnotify/fsnotify v1.9.0 h1:2Ml+OJNzbYCTzsxtv8vKSFD9PbJjmhYF14k/jKC7S9k=
+github.com/fsnotify/fsnotify v1.9.0/go.mod h1:8jBTzvmWwFyi3Pb8djgCCO5IBqzKJ/Jwo8TRcHyHii0=
+github.com/fyne-io/gl-js v0.2.0 h1:+EXMLVEa18EfkXBVKhifYB6OGs3HwKO3lUElA0LlAjs=
+github.com/fyne-io/gl-js v0.2.0/go.mod h1:ZcepK8vmOYLu96JoxbCKJy2ybr+g1pTnaBDdl7c3ajI=
+github.com/fyne-io/glfw-js v0.3.0 h1:d8k2+Y7l+zy2pc7wlGRyPfTgZoqDf3AI4G+2zOWhWUk=
+github.com/fyne-io/glfw-js v0.3.0/go.mod h1:Ri6te7rdZtBgBpxLW19uBpp3Dl6K9K/bRaYdJ22G8Jk=
+github.com/fyne-io/image v0.1.1 h1:WH0z4H7qfvNUw5l4p3bC1q70sa5+YWVt6HCj7y4VNyA=
+github.com/fyne-io/image v0.1.1/go.mod h1:xrfYBh6yspc+KjkgdZU/ifUC9sPA5Iv7WYUBzQKK7JM=
+github.com/fyne-io/oksvg v0.2.0 h1:mxcGU2dx6nwjJsSA9PCYZDuoAcsZ/OuJlvg/Q9Njfo8=
+github.com/fyne-io/oksvg v0.2.0/go.mod h1:dJ9oEkPiWhnTFNCmRgEze+YNprJF7YRbpjgpWS4kzoI=
+github.com/go-gl/gl v0.0.0-20231021071112-07e5d0ea2e71 h1:5BVwOaUSBTlVZowGO6VZGw2H/zl9nrd3eCZfYV+NfQA=
+github.com/go-gl/gl v0.0.0-20231021071112-07e5d0ea2e71/go.mod h1:9YTyiznxEY1fVinfM7RvRcjRHbw2xLBJ3AAGIT0I4Nw=
+github.com/go-gl/glfw/v3.3/glfw v0.0.0-20250301202403-da16c1255728 h1:RkGhqHxEVAvPM0/R+8g7XRwQnHatO0KAuVcwHo8q9W8=
+github.com/go-gl/glfw/v3.3/glfw v0.0.0-20250301202403-da16c1255728/go.mod h1:SyRD8YfuKk+ZXlDqYiqe1qMSqjNgtHzBTG810KUagMc=
+github.com/go-text/render v0.2.0 h1:LBYoTmp5jYiJ4NPqDc2pz17MLmA3wHw1dZSVGcOdeAc=
+github.com/go-text/render v0.2.0/go.mod h1:CkiqfukRGKJA5vZZISkjSYrcdtgKQWRa2HIzvwNN5SU=
+github.com/go-text/typesetting v0.3.0 h1:OWCgYpp8njoxSRpwrdd1bQOxdjOXDj9Rqart9ML4iF4=
+github.com/go-text/typesetting v0.3.0/go.mod h1:qjZLkhRgOEYMhU9eHBr3AR4sfnGJvOXNLt8yRAySFuY=
+github.com/go-text/typesetting-utils v0.0.0-20241103174707-87a29e9e6066 h1:qCuYC+94v2xrb1PoS4NIDe7DGYtLnU2wWiQe9a1B1c0=
+github.com/go-text/typesetting-utils v0.0.0-20241103174707-87a29e9e6066/go.mod h1:DDxDdQEnB70R8owOx3LVpEFvpMK9eeH1o2r0yZhFI9o=
+github.com/godbus/dbus/v5 v5.2.0 h1:3WexO+U+yg9T70v9FdHr9kCxYlazaAXUhx2VMkbfax8=
+github.com/godbus/dbus/v5 v5.2.0/go.mod h1:3AAv2+hPq5rdnr5txxxRwiGjPXamgoIHgz9FPBfOp3c=
+github.com/google/pprof v0.0.0-20211214055906-6f57359322fd h1:1FjCyPC+syAzJ5/2S8fqdZK1R22vvA0J7JZKcuOIQ7Y=
+github.com/google/pprof v0.0.0-20211214055906-6f57359322fd/go.mod h1:KgnwoLYCZ8IQu3XUZ8Nc/bM9CCZFOyjUNOSygVozoDg=
+github.com/hack-pad/go-indexeddb v0.3.2 h1:DTqeJJYc1usa45Q5r52t01KhvlSN02+Oq+tQbSBI91A=
+github.com/hack-pad/go-indexeddb v0.3.2/go.mod h1:QvfTevpDVlkfomY498LhstjwbPW6QC4VC/lxYb0Kom0=
+github.com/hack-pad/safejs v0.1.1 h1:d5qPO0iQ7h2oVtpzGnLExE+Wn9AtytxIfltcS2b9KD8=
+github.com/hack-pad/safejs v0.1.1/go.mod h1:HdS+bKF1NrE72VoXZeWzxFOVQVUSqZJAG0xNCnb+Tio=
+github.com/jeandeaual/go-locale v0.0.0-20250612000132-0ef82f21eade h1:FmusiCI1wHw+XQbvL9M+1r/C3SPqKrmBaIOYwVfQoDE=
+github.com/jeandeaual/go-locale v0.0.0-20250612000132-0ef82f21eade/go.mod h1:ZDXo8KHryOWSIqnsb/CiDq7hQUYryCgdVnxbj8tDG7o=
+github.com/jsummers/gobmp v0.0.0-20230614200233-a9de23ed2e25 h1:YLvr1eE6cdCqjOe972w/cYF+FjW34v27+9Vo5106B4M=
+github.com/jsummers/gobmp v0.0.0-20230614200233-a9de23ed2e25/go.mod h1:kLgvv7o6UM+0QSf0QjAse3wReFDsb9qbZJdfexWlrQw=
+github.com/kr/pty v1.1.1/go.mod h1:pFQYn66WHrOpPYNljwOMqo10TkYh1fy3cYio2l3bCsQ=
+github.com/kr/text v0.1.0 h1:45sCR5RtlFHMR4UwH9sdQ5TC8v0qDQCHnXt+kaKSTVE=
+github.com/kr/text v0.1.0/go.mod h1:4Jbv+DJW3UT/LiOwJeYQe1efqtUx/iVham/4vfdArNI=
+github.com/nfnt/resize v0.0.0-20180221191011-83c6a9932646 h1:zYyBkD/k9seD2A7fsi6Oo2LfFZAehjjQMERAvZLEDnQ=
+github.com/nfnt/resize v0.0.0-20180221191011-83c6a9932646/go.mod h1:jpp1/29i3P1S/RLdc7JQKbRpFeM1dOBd8T9ki5s+AY8=
+github.com/nicksnyder/go-i18n/v2 v2.6.0 h1:C/m2NNWNiTB6SK4Ao8df5EWm3JETSTIGNXBpMJTxzxQ=
+github.com/nicksnyder/go-i18n/v2 v2.6.0/go.mod h1:88sRqr0C6OPyJn0/KRNaEz1uWorjxIKP7rUUcvycecE=
+github.com/niemeyer/pretty v0.0.0-20200227124842-a10e7caefd8e h1:fD57ERR4JtEqsWbfPhv4DMiApHyliiK5xCTNVSPiaAs=
+github.com/niemeyer/pretty v0.0.0-20200227124842-a10e7caefd8e/go.mod h1:zD1mROLANZcx1PVRCS0qkT7pwLkGfwJo4zjcN/Tysno=
+github.com/pkg/profile v1.7.0 h1:hnbDkaNWPCLMO9wGLdBFTIZvzDrDfBM2072E1S9gJkA=
+github.com/pkg/profile v1.7.0/go.mod h1:8Uer0jas47ZQMJ7VD+OHknK4YDY07LPUC6dEvqDjvNo=
+github.com/pmezard/go-difflib v1.0.0 h1:4DBwDE0NGyQoBHbLQYPwSUPoCMWR5BEzIk/f1lZbAQM=
+github.com/pmezard/go-difflib v1.0.0/go.mod h1:iKH77koFhYxTK1pcRnkKkqfTogsbg7gZNVY4sRDYZ/4=
+github.com/rymdport/portal v0.4.2 h1:7jKRSemwlTyVHHrTGgQg7gmNPJs88xkbKcIL3NlcmSU=
+github.com/rymdport/portal v0.4.2/go.mod h1:kFF4jslnJ8pD5uCi17brj/ODlfIidOxlgUDTO5ncnC4=
+github.com/srwiley/oksvg v0.0.0-20221011165216-be6e8873101c h1:km8GpoQut05eY3GiYWEedbTT0qnSxrCjsVbb7yKY1KE=
+github.com/srwiley/oksvg v0.0.0-20221011165216-be6e8873101c/go.mod h1:cNQ3dwVJtS5Hmnjxy6AgTPd0Inb3pW05ftPSX7NZO7Q=
+github.com/srwiley/rasterx v0.0.0-20220730225603-2ab79fcdd4ef h1:Ch6Q+AZUxDBCVqdkI8FSpFyZDtCVBc2VmejdNrm5rRQ=
+github.com/srwiley/rasterx v0.0.0-20220730225603-2ab79fcdd4ef/go.mod h1:nXTWP6+gD5+LUJ8krVhhoeHjvHTutPxMYl5SvkcnJNE=
+github.com/stretchr/testify v1.11.1 h1:7s2iGBzp5EwR7/aIZr8ao5+dra3wiQyKjjFuvgVKu7U=
+github.com/stretchr/testify v1.11.1/go.mod h1:wZwfW3scLgRK+23gO65QZefKpKQRnfz6sD981Nm4B6U=
+github.com/yuin/goldmark v1.7.13 h1:GPddIs617DnBLFFVJFgpo1aBfe/4xcvMc3SB5t/D0pA=
+github.com/yuin/goldmark v1.7.13/go.mod h1:ip/1k0VRfGynBgxOz0yCqHrbZXhcjxyuS66Brc7iBKg=
+golang.org/x/image v0.33.0 h1:LXRZRnv1+zGd5XBUVRFmYEphyyKJjQjCRiOuAP3sZfQ=
+golang.org/x/image v0.33.0/go.mod h1:DD3OsTYT9chzuzTQt+zMcOlBHgfoKQb1gry8p76Y1sc=
+golang.org/x/net v0.47.0 h1:Mx+4dIFzqraBXUugkia1OOvlD6LemFo1ALMHjrXDOhY=
+golang.org/x/net v0.47.0/go.mod h1:/jNxtkgq5yWUGYkaZGqo27cfGZ1c5Nen03aYrrKpVRU=
+golang.org/x/sys v0.38.0 h1:3yZWxaJjBmCWXqhN1qh02AkOnCQ1poK6oF+a7xWL6Gc=
+golang.org/x/sys v0.38.0/go.mod h1:OgkHotnGiDImocRcuBABYBEXf8A9a87e/uXjp9XT3ks=
+golang.org/x/text v0.31.0 h1:aC8ghyu4JhP8VojJ2lEHBnochRno1sgL6nEi9WGFGMM=
+golang.org/x/text v0.31.0/go.mod h1:tKRAlv61yKIjGGHX/4tP1LTbc13YSec1pxVEWXzfoeM=
+gopkg.in/check.v1 v0.0.0-20161208181325-20d25e280405/go.mod h1:Co6ibVJAznAaIkqp8huTwlJQCZ016jof/cbN4VW5Yz0=
+gopkg.in/check.v1 v1.0.0-20200227125254-8fa46927fb4f h1:BLraFXnmrev5lT+xlilqcH8XK9/i0At2xKjWk4p6zsU=
+gopkg.in/check.v1 v1.0.0-20200227125254-8fa46927fb4f/go.mod h1:Co6ibVJAznAaIkqp8huTwlJQCZ016jof/cbN4VW5Yz0=
+gopkg.in/yaml.v3 v3.0.1 h1:fxVm/GzAzEWqLHuvctI91KS9hhNmmWOoWu0XTYJS7CA=
+gopkg.in/yaml.v3 v3.0.1/go.mod h1:K4uyk7z7BCEPqu6E+C64Yfv1cQ7kz7rIZviUmN+EgEM=

priod.c

@@ -4,7 +4,7 @@
  * Thanks to http://netsplit.com/the-proc-connector-and-socket-filters
  * for showing the way around the proc connector and BPF.
  *
- * Copyright (c) 2017, Přemysl Janouch <p@janouch.name>
+ * Copyright (c) 2017, Přemysl Eric Janouch <p@janouch.name>
  *
  * Permission to use, copy, modify, and/or distribute this software for any
  * purpose with or without fee is hereby granted.

siprandom.c

@@ -1,7 +1,7 @@
 /*
  * siprandom.c: relatively fast pseudo-random data generator
  *
- * Copyright (c) 2016, Přemysl Janouch <p@janouch.name>
+ * Copyright (c) 2016, Přemysl Eric Janouch <p@janouch.name>
  *
  * Permission to use, copy, modify, and/or distribute this software for any
  * purpose with or without fee is hereby granted.

wmstatus-weather.pl

@@ -6,45 +6,56 @@
 use strict;
 use warnings;
 use Time::Piece;
-use IO::Socket::INET;
+use File::Basename;
 
-my $host = 'www.yr.no';
-my $path = '/place/Czech_Republic/Prague/Prague/forecast.xml';
+# Retrieve current weather information from the Norwegian weather service,
+# see https://api.met.no/doc/ for its documentation
+my $base = 'https://api.met.no/weatherapi';
+my $agent = basename($0) =~ s/[^-!#$%&'*+.^_`|~[:alnum:]]//gr;
 
-# Retrieve current weather information from the Norwegian weather service
-sub weather {
-	# There are no redirects and it's not exactly confidential either
-	my $sock = IO::Socket::INET->new(
-		PeerAddr => $host,
-		PeerPort => 'http(80)',
-		Proto => 'tcp'
-	) or return '?';
+# https://www.yr.no/storage/lookup/English.csv.zip
+my $where = 'lat=50.08804&lon=14.42076&altitude=202';  # Prague
+my %legends;
 
-	print $sock "GET $path HTTP/1.1\r\n"
-		. "Host: $host\r\n"
-		. "Connection: close\r\n\r\n";
-
-	# Quick and dirty XML parsing is more than fine for our purpose
-	my ($offset, $acceptable, $temp, $symbol) = (0, 0);
-	while (<$sock>) {
-		$offset = $1 * 60 if /utcoffsetMinutes="(.+?)"/;
-		next unless /<time/ .. /<\/time/;
-
-		# It gives forecast, so it doesn't necessarily contain the present;
-		# just pick the first thing that's no longer invalid
-		if (/from="(.+?)" to="(.+?)"/) {
-			$acceptable = Time::Piece->strptime($2, '%Y-%m-%dT%H:%M:%S')
-				- $offset >= gmtime;
-		}
-		if ($acceptable) {
-			$symbol = $1 if /<symbol .* name="(.+?)"/;
-			$temp = "$2 °${\uc $1}"
-				if /<temperature unit="(.).+?" value="(.+?)"/;
-		}
-		return "$temp ($symbol)" if $temp && $symbol;
-	}
-	return 'Weather error';
+sub retrieve_legends {
+	# HTTP/Tiny supports TLS, but with non-core IO::Socket::SSL, so use cURL
+	open(my $sock, '-|', 'curl', '-sSA', $agent,
+		'https://raw.githubusercontent.com/' .
+		'metno/weathericons/main/weather/legend.csv') or return $!;
+	while (local $_ = <$sock>) { $legends{$1} = $2 if /^(.+?),(.+?),/ }
+	close($sock);
 }
 
-# We need to be careful not to overload the service so that they don't ban us
+sub weather {
+	# We might want to rewrite this to use the JSON API (/compact),
+	# see https://developer.yr.no/doc/guides/getting-started-from-forecast-xml
+	open(my $sock, '-|', 'curl', '-sA', $agent,
+		"$base/locationforecast/2.0/classic?$where") or return $!;
+
+	# Quick and dirty XML parsing is more than fine for our purpose
+	my ($acceptable, $temp, $symbol) = (0, undef, undef);
+	while (<$sock>) {
+		next unless m|<time| .. m|</time|;
+
+		# It gives forecast, so it doesn't necessarily contain the present;
+		# just process the earliest entries that aren't yet invalid
+		$acceptable = Time::Piece->strptime($2, '%Y-%m-%dT%H:%M:%SZ') >= gmtime
+			if /from="(.+?)" to="(.+?)"/;
+		next unless $acceptable;
+
+		# Temperature comes from a zero-length time interval, separately
+		$symbol = $1 if /<symbol.*? code="([^_"]+)/;
+		$temp = "$2 °" . uc $1 if /<temperature.*? unit="(.).+?" value="(.+?)"/;
+		if ($temp && $symbol) {
+			retrieve_legends if !%legends;
+
+			close($sock);
+			return "$temp (" . ($legends{$symbol} || $symbol) . ")";
+		}
+	}
+	close($sock);
+	return "No weather ($?)";
+}
+
+# Be careful not to overload the service so that they don't ban us
 binmode STDOUT; $| = 1; while (1) { print weather() . "\n\n"; sleep 3600; }

wmstatus.conf.example

@@ -0,0 +1,63 @@
+# vim: set ft=libertyconf:
+keys = {
+	# This key should be labeled L on normal Qwert[yz] layouts
+	"Mod4 n"                       = "exec dm-tool lock" # gdm-switch-user
+
+	# xmodmap grep -e Alt_R -e Meta_R -e ISO_Level3_Shift -e Mode_switch
+	# can be used to figure out which modifier is AltGr
+
+	"Mod4       Up"                = "mpd-play-toggle"
+	"Mod4       Down"              = "mpd stop"
+	"Mod4       Left"              = "mpd previous"
+	"Mod4       Right"             = "mpd next"
+	"Mod4 Shift Left"              = "mpd seekcur -10"
+	"Mod4 Shift Right"             = "mpd seekcur +10"
+	"XF86AudioPlay"                = "mpd-play-toggle"
+	"XF86AudioPrev"                = "mpd previous"
+	"XF86AudioNext"                = "mpd next"
+
+	"Mod4 F1"                      = "xkb-lock-group 0"
+	"Mod4 F2"                      = "xkb-lock-group 1"
+	"Mod4 F3"                      = "xkb-lock-group 2"
+	"Mod4 F4"                      = "xkb-lock-group 3"
+
+	"Mod4 Control       F1"        = "exec input-switch vga 1"
+	"Mod4 Control Shift F1"        = "exec input-switch vga 2"
+	"Mod4 Control       F2"        = "exec input-switch dvi 1"
+	"Mod4 Control Shift F2"        = "exec input-switch dvi 2"
+	"Mod4 Control       F3"        = "exec input-switch hdmi 1"
+	"Mod4 Control Shift F3"        = "exec input-switch hdmi 2"
+	"Mod4 Control       F4"        = "exec input-switch dp 1"
+	"Mod4 Control Shift F4"        = "exec input-switch dp 2"
+
+	"Mod4 Home"                    = "exec brightness +10"
+	"Mod4 End"                     = "exec brightness -10"
+	"XF86MonBrightnessUp"          = "exec brightness +10"
+	"XF86MonBrightnessDown"        = "exec brightness -10"
+
+	# We need to wait a little while until user releases the key
+	"Mod4       F5"    = "exec sh -c 'sleep 1; xset dpms force standby'"
+	"Mod4 Shift F5"    = "insomnia"
+	"Mod4       Pause" = "exec sh -c 'sleep 1; xset dpms force standby'"
+	"Mod4 Shift Pause" = "insomnia"
+
+	"Mod4       Insert"            = "audio-switch"
+	"Mod4       Delete"            = "audio-mute"
+	"Mod4 Shift Delete"            = "audio-mic-mute"
+	"Mod4       Page_Up"           = "audio-volume +5"
+	"Mod4 Shift Page_Up"           = "audio-volume +1"
+	"Mod4       Page_Down"         = "audio-volume -5"
+	"Mod4 Shift Page_Down"         = "audio-volume -1"
+	"        XF86AudioRaiseVolume" = "audio-volume +5"
+	"Shift   XF86AudioRaiseVolume" = "audio-volume +1"
+	"        XF86AudioLowerVolume" = "audio-volume -5"
+	"Shift   XF86AudioLowerVolume" = "audio-volume -1"
+	"        XF86AudioMute"        = "audio-mute"
+	"        XF86AudioMicMute"     = "audio-mic-mute"
+
+	"Control XF86AudioRaiseVolume" = "noise-adjust +1"
+	"Control XF86AudioLowerVolume" = "noise-adjust -1"
+
+	# Turns on or off Pioneer integrated amplifiers
+	"Mod4 Control Delete" = "exec elksmart-comm --nec A538"
+}