NiceGUI umožňuje používat webový prohlížeč jako frontend pro kód v Pythonu. Zdrojové kódy jsou k dispozici na GitHubu pod licencí MIT.
Open source platforma Home Assistant (Demo, GitHub, Wikipedie) pro monitorování a řízení inteligentní domácnosti byla vydána ve verzi 2024.6. Z novinek lze vypíchnout lepší integraci LLM (OpenAI, Google AI, Ollama) nebo podporu Matter 1.3.
IKEA ve Spojeném království hledá zaměstnance do své nové pobočky. Do pobočky v počítačové hře Roblox. Nástupní mzda je 13,15 liber na hodinu.
Alyssa Rosenzweig se v příspěvku na svém blogu Vulkan 1.3 na M1 za 1 měsíc rozepsala o novém Vulkan 1.3 ovladači Honeykrisp pro Apple M1 splňujícím specifikaci Khronosu. Vychází z ovladače NVK pro GPU od Nvidie. V plánu je dále rozchodit DXVK a vkd3d-proton a tím pádem Direct3D, aby na Apple M1 s Asahi Linuxem běžely hry pro Microsoft Windows.
Byla vydána (𝕏) květnová aktualizace aneb nová verze 1.90 editoru zdrojových kódů Visual Studio Code (Wikipedie). Přehled novinek i s náhledy a animovanými gify v poznámkách k vydání. Ve verzi 1.90 vyjde také VSCodium, tj. komunitní sestavení Visual Studia Code bez telemetrie a licenčních podmínek Microsoftu.
Byla vydána (Mastodon, 𝕏) nová verze 2024.2 linuxové distribuce navržené pro digitální forenzní analýzu a penetrační testování Kali Linux (Wikipedie). Přehled novinek se seznamem nových nástrojů v oficiálním oznámení.
Počítačová hra Tetris slaví 40 let. Alexej Pažitnov dokončil první hratelnou verzi 6. června 1984. Mezitím vznikla celá řada variant. Například Peklo nebo Nebe. Loni měl premiéru film Tetris.
MicroPython (Wikipedie), tj. implementace Pythonu 3 optimalizovaná pro jednočipové počítače, byl vydán ve verzi 1.23.0. V přehledu novinek je vypíchnuta podpora dynamických USB zařízení nebo nové moduly openamp, tls a vfs.
Canonical vydal Ubuntu Core 24. Představení na YouTube. Nová verze Ubuntu Core vychází z Ubuntu 24.04 LTS a podporována bude 12 let. Ubuntu Core je určeno pro IoT (internet věcí) a vestavěné systémy.
Databáze DuckDB (Wikipedie) dospěla po 6 letech do verze 1.0.0.
Adresa tématu či pozadí: http://interfacelift.com/wallpaper/downloads/date/widescreen/
Pozadí je ve skutečnosti generováno dynamicky (Perl + ImageMagic) každých pět minut náhodným výběrem dvou širokoúhlých obrázků z databáze vytvořené z InterfaceLift.com.
Gnome Shell rozšíření:
Tiskni Sdílej:
Je to starý kód, šlo by to napsat lépe, ale funguje to.
#!/usr/bin/env perl use strict; use warnings; use utf8; use File::Copy; use File::Temp qw/ tempfile /; binmode(STDIN, "utf8"); binmode(STDOUT, "utf8"); binmode(STDERR, "utf8"); use File::Spec; # Výpis informací o použití programu. sub print_help { my $exit_code = shift @_; $exit_code = 1 unless $exit_code; print STDERR "Použití:\n"; print STDERR " $0 <adresář_s_obrázky> <cílový_soubor_s_tapetou>\n"; exit $exit_code; } sub get_full_path { my $arg = shift @_; return File::Spec->canonpath(File::Spec->rel2abs($arg)); } # # Main # my ($wdir, $wfilelink, $wfile, $wfileold) = (undef, undef, undef, undef); unless (($#ARGV + 1) == 2 and -d $ARGV[0] and -l $ARGV[1]) { print_help; } else { $wdir = get_full_path($ARGV[0]); $wfilelink = get_full_path($ARGV[1]); } if (-f "$wfilelink.1") { $wfileold = "$wfilelink.1"; $wfile = "$wfilelink.2"; } else { $wfileold = "$wfilelink.2"; $wfile = "$wfilelink.1"; } my $pid = `pgrep gnome-session`; chomp $pid; my $dbus = `grep -z "DBUS_SESSION_BUS_ADDRESS" "/proc/$pid/environ" 2>/dev/null`; chomp $dbus; $dbus =~ s/^DBUS_SESSION_BUS_ADDRESS=//g; exit if ($dbus =~ /^\s*$/); opendir(WDIR, $wdir) || die("Nezdrařilo se čtení obsahu adresáře $wdir: $!"); my @wdircontent = grep { $_ !~ /^(\.|\.\.)$/ && -f "$wdir/$_" } readdir(WDIR); closedir(WDIR); my $randomwfile1 = get_full_path(File::Spec->join($wdir, $wdircontent[int(rand($#wdircontent + 1))])); my $randomwfile2 = get_full_path(File::Spec->join($wdir, $wdircontent[int(rand($#wdircontent + 1))])); my ($tmpfile1, $tmpfilename1) = tempfile(UNLINK => 1, SUFFIX => '.png') or die "$!"; my ($tmpfile2, $tmpfilename2) = tempfile(UNLINK => 1, SUFFIX => '.png') or die "$!"; #system('convert', "$randomwfile1", '-quality', '100', '-resize', 'x1200', '-gravity', 'center', '-crop', '1920x1200+0+0', "$tmpfilename1") == 0 system('convert', "$randomwfile1", '-quality', '100', '-resize', 'x1600', '-gravity', 'center', '-crop', '2560x1440+0+0', "$tmpfilename1") == 0 or die "Convert 1 failed: $!"; system('convert', "$randomwfile2", '-quality', '100', '-resize', 'x1200', '-gravity', 'center', '-crop', '1600x1200+0+0', "$tmpfilename2") == 0 or die "Convert 2 failed: $!"; system('montage', "$tmpfilename1", "$tmpfilename2", '-quality', '100', '-background', 'black', '-mode', 'Concatenate', '-gravity', 'SouthWest', '-tile', 'x1', "$wfile") == 0 or die "Montage failed: $!"; open(INFO, ">:encoding(UTF-8)", "/tmp/wallpaper-info.txt") or die("open() failed: $!"); print INFO "left picture: $randomwfile1\n" ."right picture: $randomwfile2\n"; close(INFO); unlink "$wfileold" if (-f "$wfileold"); unlink "$wfilelink" if (-l "$wfilelink"); symlink("$wfile", "$wfilelink"); $wfile =~ s/'/'\\''/g; # Aby to prošlo v následujícím příkazu, pokud je ve jméně souboru apostrof. #system('export DBUS_SESSION_BUS_ADDRESS='."'$dbus'".'; gsettings set org.gnome.desktop.background picture-uri '."'$wfile'"); system('export DBUS_SESSION_BUS_ADDRESS=$(grep -z "DBUS_SESSION_BUS_ADDRESS" "/proc/$(pgrep gnome-session)/environ" | cut -d= -f2-); gsettings set org.gnome.desktop.background picture-uri '."'$wfile'");
Je to nastaveno na dvoumonitorovou konfiguraci: vlevo 2560×1440 a vpravo 1600×1200 zarovnaný na spodní okraj levého monitoru.
V noci jsem si ještě vzpomněl, že vlastně ten skript nepůjde spustit na místě, kde to ještě není nachystaný ten symlink (kvůli prodlevě při generování nového obrázku, kdy by nebyl soubor s tapetou dobře vytvořený, se obrázek střídavě generuje do dvou souborů a po vygenerování se jen přesměruje symlink, aby se plynule bez prodlev zobrazila nová tapeta), takže před případným použitím doporučuji aplikovat tenhle patch:
--- a/wallpaper-random-change.pl 2016-01-14 09:37:20.597823140 +0100 +++ b/wallpaper-random-change.pl 2016-01-14 09:37:32.513515615 +0100 @@ -38,7 +38,7 @@ my ($wdir, $wfilelink, $wfile, $wfileold) = (undef, undef, undef, undef); -unless (($#ARGV + 1) == 2 and -d $ARGV[0] and -l $ARGV[1]) { +unless (($#ARGV + 1) == 2 and -d $ARGV[0] and (-l $ARGV[1] or not -e $ARGV[1])) { print_help; } else { $wdir = get_full_path($ARGV[0]);