From 93070458212a9b506949b4c12a6d7e1b5b8b693b Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Fri, 17 Oct 2025 07:28:32 +0200 Subject: systems: rename ayase to asakura --- deployment/systems/ayase.scm | 136 ------------------------------------------- 1 file changed, 136 deletions(-) delete mode 100644 deployment/systems/ayase.scm (limited to 'deployment/systems/ayase.scm') diff --git a/deployment/systems/ayase.scm b/deployment/systems/ayase.scm deleted file mode 100644 index 63cd191..0000000 --- a/deployment/systems/ayase.scm +++ /dev/null @@ -1,136 +0,0 @@ -;;; SPDX-License-Identifier: GPL-3.0-or-later -;;; SPDX-FileCopyrightText: 2024-2025 Marek Paśnikowski - -(define-module (deployment systems ayase) - #:use-module ((gnu system) #:prefix gnu:system:) - #:use-module ((gnu system file-systems) #:prefix gnu:system:file-systems:) - #:use-module ((gnu system uuid) #:prefix gnu:system:uuid:) - #:use-module ((nongnu packages linux) #:prefix nongnu:packages:linux:) - #:use-module ((nongnu system linux-initrd) #:prefix nongnu:system:linux-initrd:) - #:use-module ((sovereign devices amd64) #:prefix sovereign:devices:amd64:) - #:use-module ((sovereign packages protonmail) #:prefix sovereign:packages:protonmail:) - #:use-module ((sovereign systems) #:prefix sovereign:systems:) - #:use-module ((users id1000) #:prefix users:id1000:)) - -(define efi-filesystem-uuid - (gnu:system:uuid:uuid - "B4FB-CBD9" - 'fat32)) - -(define host-name - "ayase") - -(define (label number) - (gnu:system:file-systems:file-system-label - (string-append host-name - "-swap" - number))) - -(define root-filesystem-uuid - (gnu:system:uuid:uuid - "615a98cd-a632-4ee5-a6f4-e5ebcaa6fb8c")) - -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - -(define efi-partition - (gnu:system:file-systems:file-system - (mount-point "/boot") - (device efi-filesystem-uuid) - (type "vfat"))) - -(define keyboard-layout - ((@ (gnu system keyboard) keyboard-layout) - "pl")) - -(define (libvirt-service) - (use-modules (gnu services virtualization)) - ((@ (gnu services) service) - libvirt-service-type)) - -(define (virtlog-service) - (use-modules (gnu services virtualization)) - ((@ (gnu services) service) - virtlog-service-type)) - -(define (openssh-service) - (use-modules (gnu services ssh)) - ((@ (gnu services) service) - openssh-service-type)) - -(define root-partition - (gnu:system:file-systems:file-system - (mount-point "/") - (device root-filesystem-uuid) - (type "ext4"))) - -(define (swap-label number) - (let ((target-label (label number))) - (gnu:system:file-systems:swap-space - (target target-label)))) - -(define (system-packages-service) - (use-modules (gnu packages gnupg) - (gnu packages kde-pim) - (gnu services)) - (simple-service 'system-packages - profile-service-type - (list kgpg - pinentry-qt - pinentry-tty))) - -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - -(define (bootloader) - (use-modules (gnu bootloader grub)) - ((@ (gnu bootloader) bootloader-configuration) - (bootloader grub-efi-bootloader) - (targets (list "/boot")) - (keyboard-layout keyboard-layout))) - -(define (file-systems) - (append gnu:system:file-systems:%base-file-systems - (list root-partition - efi-partition))) - -(define services - (let* - ( (l-guix-homes (list users:id1000:name/home-environment)) - (l-guix-home-service (sovereign:systems:guix-home-service l-guix-homes))) - (append sovereign:systems:%sovereign-services - (list sovereign:packages:protonmail:nogui-profile - l-guix-home-service - (openssh-service) - (system-packages-service))))) - -(define swap-device-1 - (swap-label "-1")) - -(define swap-device-2 - (swap-label "-2")) - -(define (users) - (use-modules (gnu system accounts)) - (append (@ (gnu system shadow) %base-user-accounts) - (list users:id1000:uid1000-account))) - -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; - -(define-public operating-system* - (gnu:system:operating-system - (kernel nongnu:packages:linux:linux) - (bootloader (bootloader)) - (label (sovereign:systems:operating-system-label* host-name - (gnu:system:operating-system-default-label gnu:system:this-operating-system))) - (keyboard-layout keyboard-layout) - (initrd nongnu:system:linux-initrd:microcode-initrd) - (firmware (list nongnu:packages:linux:linux-firmware)) - (host-name host-name) - (file-systems (file-systems)) - (swap-devices (list swap-device-1 - swap-device-2)) - (users (users)) - (timezone "Europe/Warsaw") - (locale sovereign:systems:pl-locale) - (locale-definitions sovereign:systems:%sovereign-locale-definitions) - (services services) - (sudoers-file sovereign:systems:%sovereign-sudoers-specification))) -- cgit v1.2.3