seasharp/Rosenthal
1
0
Fork 0
mirror of https://codeberg.org/hako/Rosenthal.git synced 2025-11-16 01:14:45 +00:00
Code Issues Packages Projects Releases Wiki Activity

Compare commits

base: seasharp:3386c9a43d37282cc7ee7edd50553acaa6b71651
Branches Tags
seasharp:trunk
seasharp:keyring
...
compare: seasharp:4baff4a83251c816860f4e9e3b2f136d6ad6e9f4
Branches Tags
seasharp:trunk
seasharp:keyring

9 Commits
3386c9a43d ... 4baff4a832

Author SHA1 Message Date
Hilton Chain
4baff4a832
services: greetd-tuigreet-session: Fix tuigreet reference. 
* modules/rosenthal/services/base.scm (<greetd-tuigreet-session>)
(greetd-tuigreet-session-compiler): Fix tuigreet reference.
 2025-08-21 20:09:40 +08:00
Hilton Chain
859be3792b
rosenthal: atuin: Disable tests for now. 
* modules/rosenthal/packages/rust-apps.scm (atuin) [arguments] <#:tests?>:
Disable.
[inputs]: Add sqlite.
 2025-08-21 19:58:33 +08:00
Hilton Chain
b682ecf53f
rosenthal: Remove tree-sitter-yaml. [upstreamed] 
* modules/rosenthal/packages/tree-sitter.scm (tree-sitter-yaml): Delete variable.
 2025-08-21 19:57:39 +08:00
Hilton Chain
78d5d2e8e5
rosenthal: Cleanup crates. 2025-08-21 19:50:38 +08:00
Hilton Chain
3b80e8755e
rosenthal: Remove niri. [upstreamed] 
* modules/rosenthal/packages/wm.scm (niri): Delete variable.
 2025-08-21 19:41:19 +08:00
Hilton Chain
9c49db368f
rosenthal: Remove rust-smithay. [upstreamed] 
* modules/rosenthal/packages/wm.scm (rust-smithay): Delete variable.
 2025-08-21 19:41:19 +08:00
Hilton Chain
bac55adf41
rosenthal: Remove rust-pipewire. [upstreamed] 
* modules/rosenthal/packages/wm.scm (rust-pipewire): Delete variable.
 2025-08-21 19:41:19 +08:00
Hilton Chain
127d1be367
rosenthal: Remove tuigreet. [upstreamed] 
* modules/rosenthal/packages/admin.scm (tuigreet): Delete variable.
 2025-08-21 19:41:19 +08:00
Hilton Chain
f2063dcff2
rosenthal: Remove xwayland-satellite. [upstreamed] 
* modules/rosenthal/packages/xorg.scm (xwayland-satellite): Delete variable.
 2025-08-21 19:41:16 +08:00
7 changed files with 7 additions and 3270 deletions
Show Stats Expand all files Collapse all files

23
modules/rosenthal/packages/admin.scm
View File

@ -116,26 +116,3 @@ exists and is only writable by root.")
(list "-Dlibseat-logind=disabled")))))
(propagated-inputs '())
(properties '((disable-updater? . #t))))))
(define-public tuigreet
(package
(name "tuigreet")
(version "0.9.1")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/apognu/tuigreet")
(commit version)))
(file-name (git-file-name name version))
(sha256
(base32
"15h2b97clllbhlw5jc4lwkmir18njnyk56zghafsas84m6jjsikv"))))
(build-system cargo-build-system)
(arguments (list #:install-source? #f))
(inputs (rosenthal-cargo-inputs 'tuigreet))
(home-page "https://github.com/apognu/tuigreet")
(synopsis "Graphical console greeter for @code{greetd}")
(description
"This package provides a graphical console greeter for @code{greetd}. It
doesn't need a Wayland compositor to be used.")
(license license:gpl3+)))

6
modules/rosenthal/packages/rust-apps.scm
View File

@ -8,7 +8,8 @@
#:use-module (guix packages)
#:use-module (guix git-download)
#:use-module (guix build-system cargo)
#:use-module (rosenthal utils cargo))
#:use-module (rosenthal utils cargo)
#:use-module (gnu packages sqlite))
(define-public atuin
(package
@ -26,6 +27,7 @@
(build-system cargo-build-system)
(arguments
(list
#:tests? #f ;TODO.
#:install-source? #f
#:features
''("client" "sync" "server" "clipboard" "daemon")
@ -67,7 +69,7 @@
;; otherwise cargo will raise an error.
(invoke "cargo" "install" "--no-track" "--path" "crates/atuin"
"--root" out "--features" (string-join features))))))))
(inputs (rosenthal-cargo-inputs 'atuin))
(inputs (cons sqlite (rosenthal-cargo-inputs 'atuin)))
(home-page "https://atuin.sh/")
(synopsis "Sync, search and backup shell history")
(description

2989
modules/rosenthal/packages/rust-crates.scm
View File

File diff suppressed because it is too large Load Diff

33
modules/rosenthal/packages/tree-sitter.scm
View File

@ -5,36 +5,3 @@
(define-module (rosenthal packages tree-sitter)
#:use-module (guix gexp)
#:use-module (guix packages))
(define tree-sitter-grammar
(@@ (gnu packages tree-sitter) tree-sitter-grammar))
(define-public tree-sitter-yaml
(let ((base
(tree-sitter-grammar
"yaml" "YAML"
"1bimf5fq85wn8dwlk665w15n2bj37fma5rsfxrph3i9yb0lvzi3q"
"0.5.0"
#:repository-url "https://github.com/ikatyang/tree-sitter-yaml"
#:get-cleanup-snippet
(lambda (grammar-directories)
#~(begin
(use-modules (guix build utils))
(delete-file-recursively "docs")
(delete-file "binding.gyp")
(delete-file-recursively "bindings")
(for-each
(lambda (lang)
(with-directory-excursion lang
(delete-file "src/grammar.json")
(delete-file "src/node-types.json")
(delete-file "src/parser.c")
(delete-file-recursively "src/tree_sitter")))
'#$grammar-directories))))))
(package
(inherit base)
(arguments
(append '(#:tests? #f) ;FIXME
(package-arguments base)))
(properties
'((disable-updater? . #t))))))

180
modules/rosenthal/packages/wm.scm
View File

@ -19,183 +19,3 @@
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages wm)
#:use-module (gnu packages xdisorg))
(define-public rust-pipewire
(let ((commit "fd3d8f7861a29c2eeaa4c393402e013578bb36d9")
(revision "0"))
(package
(name "rust-pipewire")
(version (git-version "0.8.0" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://gitlab.freedesktop.org/pipewire/pipewire-rs.git")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "1hzyhz7xg0mz8a5y9j6yil513p1m610q3j9pzf6q55vdh5mcn79v"))))
(build-system cargo-build-system)
(arguments
(list #:skip-build? #t
#:phases
#~(modify-phases %standard-phases
;; Avoid circular dependency.
(add-after 'unpack 'remove-dev-dependencies
(lambda _
(substitute* "libspa/Cargo.toml"
(("^pipewire.*") ""))))
(replace 'package
(lambda* (#:key cargo-package-flags vendor-dir #:allow-other-keys)
(begin
;;error: invalid inclusion of reserved file name Cargo.toml.orig in package source
(when (file-exists? "Cargo.toml.orig")
(delete-file "Cargo.toml.orig"))
(for-each
(lambda (pkg)
(apply invoke "cargo" "package" "--offline" "--package" pkg
cargo-package-flags)
(for-each
(lambda (crate)
(invoke "tar" "xzf" crate "-C" vendor-dir))
(find-files "target/package" "\\.crate$"))
((assoc-ref %standard-phases 'patch-cargo-checksums)))
'("libspa-sys" "libspa" "pipewire-sys" "pipewire"))))))))
(inputs (rosenthal-cargo-inputs 'rust-pipewire))
(home-page "https://pipewire.org/")
(synopsis "Rust bindings for PipeWire")
(description "This package provides Rust bindings for PipeWire.")
(license license:expat)
(properties
'((hidden? . #t)
(disable-updater? . #t))))))
(define-public rust-smithay
(let ((commit "0cd3345c59f7cb139521f267956a1a4e33248393")
(revision "0"))
(package
(name "rust-smithay")
(version (git-version "0.4.0" revision commit))
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Smithay/smithay")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"191h87bpzg0l1ihfb4hmx00b86pfb5mwwc6s8i49al0vigc14l37"))))
(build-system cargo-build-system)
(arguments
(list #:skip-build? #t
#:phases
#~(modify-phases %standard-phases
(replace 'package
(lambda* (#:key cargo-package-flags vendor-dir #:allow-other-keys)
(begin
;;error: invalid inclusion of reserved file name Cargo.toml.orig in package source
(when (file-exists? "Cargo.toml.orig")
(delete-file "Cargo.toml.orig"))
(for-each
(lambda (pkg)
(apply invoke "cargo" "package" "--offline" "--package" pkg
cargo-package-flags)
(for-each
(lambda (crate)
(invoke "tar" "xzf" crate "-C" vendor-dir))
(find-files "target/package" "\\.crate$"))
((assoc-ref %standard-phases 'patch-cargo-checksums)))
'("smithay" "smithay-drm-extras"))))))))
(inputs (rosenthal-cargo-inputs 'rust-smithay))
(home-page "https://github.com/Smithay/smithay")
(synopsis "Smithy for Rust Wayland compositors")
(description
"Smithay aims to provide building blocks to create wayland compositors in
Rust. While not being a full-blown compositor, it'll provide objects and
interfaces implementing common functionalities that pretty much any compositor
will need, in a generic fashion.
It supports the @code{wayland}, @code{wayland-protocols}, and some external
extensions, such as @code{wlr-protocols} and @code{plasma-wayland-protocols}.")
(license license:expat)
(properties
'((hidden? . #t)
(disable-updater? . #t))))))
(define-public niri
(package
(name "niri")
(version "25.02")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/YaLTeR/niri")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"0vzskaalcz6pcml687n54adjddzgf5r07gggc4fhfsa08h1wfd4r"))))
(build-system cargo-build-system)
(arguments
(list #:install-source? #f
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'use-guix-vendored-dependencies
(lambda _
(substitute* "Cargo.toml"
(("# version =.*")
"version = \"*\"")
(("git.*optional")
"version = \"*\", optional")
(("^git = .*")
""))))
(add-after 'unpack 'set-environment
(lambda _
(setenv "RUSTFLAGS"
(string-join
'("-C" "link-arg=-lEGL"
"-C" "link-arg=-lwayland-client")
" "))
(setenv "NIRI_BUILD_VERSION_STRING"
#$(package-version this-package))
;; For tests.
(setenv "XDG_RUNTIME_DIR" "/tmp")))
(add-after 'install 'install-extras
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "resources/niri.desktop"
(("niri-session")
(format #f "~a --dbus-daemon=~a ~a/bin/niri --session"
(search-input-file inputs "bin/dbus-run-session")
(search-input-file inputs "bin/dbus-daemon")
#$output)))
(install-file
"resources/niri.desktop"
(in-vicinity #$output "share/wayland-sessions"))
(install-file
"resources/niri-portals.conf"
(in-vicinity #$output "share/xdg-desktop-portal")))))))
(native-inputs
(list pkg-config))
(inputs
(cons* clang
dbus
libdisplay-info
libinput-minimal
libseat
libxkbcommon
mesa
pango
pipewire
wayland
(rosenthal-cargo-inputs 'niri)))
(home-page "https://github.com/YaLTeR/niri")
(synopsis "Scrollable-tiling Wayland compositor")
(description
"Niri is a scrollable-tiling Wayland compositor which arranges windows in a
scrollable format. It is considered stable for daily use and performs most
functions expected of a Wayland compositor.")
(license license:gpl3)
(properties
'((disable-updater? . #t)))))

42
modules/rosenthal/packages/xorg.scm
View File

@ -12,45 +12,3 @@
#:use-module (gnu packages llvm)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages xorg))
(define-public xwayland-satellite
(package
(name "xwayland-satellite")
(version "0.5.1")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Supreeeme/xwayland-satellite")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"1r99qfbmc67202pcs4kiw94hiql0aqcsx877bgnlyxy6gzilq47y"))))
(build-system cargo-build-system)
(arguments
(list #:install-source? #f
#:tests? #f ;Requires running display server.
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'fix-paths
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "src/lib.rs"
(("\"Xwayland\"")
(format #f "\"~a\""
(search-input-file inputs "bin/Xwayland")))))))))
(native-inputs (list pkg-config))
(inputs
(cons* clang
xcb-util-cursor
xorg-server-xwayland
(rosenthal-cargo-inputs 'xwayland-satellite)))
(home-page "https://github.com/Supreeeme/xwayland-satellite")
(synopsis "Xwayland outside your Wayland")
(description
"@command{xwayland-satellite} grants rootless Xwayland integration to any
Wayland compositor implementing @code{xdg_wm_base} interface. This is
particularly useful for compositors that (understandably) do not want to go
through implementing support for rootless Xwayland themselves.")
(license license:mpl2.0)
(properties
'((disable-updater? . #t)))))

4
modules/rosenthal/services/base.scm
View File

@ -18,13 +18,13 @@
greetd-tuigreet-session?
this-greetd-tuigreet-session
(tuigreet greetd-tuigreet-session-tuigreet
(default tuigreet)))
(default (spec->pkg "tuigreet"))))
(define-gexp-compiler (greetd-tuigreet-session-compiler
(session <greetd-tuigreet-session>)
system target)
(match-record session <greetd-tuigreet-session> (tuigreet)
(let ((tuigreet (file-append tuigreet "/bin/tuigreet")))
(let ((tuigreet (file-append (spec->pkg "tuigreet") "/bin/tuigreet")))
(lower-object
(program-file "tuigreet-wrapper"
#~(execl #$tuigreet #$tuigreet