summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarek Paśnikowski <marek@marekpasnikowski.pl>2026-06-08 10:09:03 +0200
committerMarek Paśnikowski <marek@marekpasnikowski.pl>2026-06-08 18:23:15 +0200
commit5fbd05821d6c7b0b3fbc484a55b4d1f3100cbd73 (patch)
tree293d8c9782c9cac6cd33dd7e099d669bf149b179
parent2c012ff863476d011389e3d8c922be3a0be99aeb (diff)
(system): mount shared NFS of Szablony
-rw-r--r--deployment/services/nfs.scm9
-rw-r--r--deployment/system/akashi.scm4
-rw-r--r--deployment/system/file-systems.scm39
-rw-r--r--deployment/system/rakan.scm4
4 files changed, 53 insertions, 3 deletions
diff --git a/deployment/services/nfs.scm b/deployment/services/nfs.scm
index 2384352..fc4838e 100644
--- a/deployment/services/nfs.scm
+++ b/deployment/services/nfs.scm
@@ -25,11 +25,14 @@
(define nfs-server-aisaka
(let
- ((Export-Szablony (list "/home/marek/Szablony"
- "10.0.0.0/24(rw)")))
+ ((Export-Dokumenty (list "/home/marek/Dokumenty"
+ "10.0.0.0/24(rw)"))
+ (Export-Szablony (list "/home/marek/Szablony"
+ "10.0.0.0/24(rw)")))
(nfs-configuration
(inherit %nfs-configuration)
- (exports (list Export-Szablony)))))
+ (exports (list Export-Dokumenty
+ Export-Szablony)))))
(define service-nfs-aisaka
(service-nfs nfs-server-aisaka))
diff --git a/deployment/system/akashi.scm b/deployment/system/akashi.scm
index 4c2fe77..c7a2fe2 100644
--- a/deployment/system/akashi.scm
+++ b/deployment/system/akashi.scm
@@ -28,6 +28,8 @@
#:prefix deployment:gexp:)
#:use-module ((deployment services vpn)
#:prefix deployment:services:vpn:)
+ #:use-module ((deployment system file-systems)
+ #:prefix deployment:system:file-systems:)
#:use-module ((gnu packages linux)
#:prefix gnu:packages:linux:)
#:use-module ((gnu services)
@@ -122,6 +124,8 @@
(mapped-devices (list))
(file-systems (cons* root-partition
file-system-boot
+ deployment:system:file-systems:file-system-dokumenty
+ deployment:system:file-systems:file-system-szablony
gnu:system:file-systems:%base-file-systems))
(swap-devices (list))
(users (list uid1000-account))
diff --git a/deployment/system/file-systems.scm b/deployment/system/file-systems.scm
new file mode 100644
index 0000000..2c36849
--- /dev/null
+++ b/deployment/system/file-systems.scm
@@ -0,0 +1,39 @@
+;;; SPDX-License-Identifier: GPL-3.0-or-later
+;;; SPDX-FileCopyrightText: 2026 Marek Paśnikowski <marek@marekpasnikowski.pl>
+
+;;; COPYRIGHT NOTICE
+;;;
+;;; Copyright 2026, Marek Paśnikowski <marek@marekpasnikowski.pl>
+
+;;; LICENSE NOTICE
+;;;
+;;; This library is free software: you can redistribute it and/or modify it under the terms of
+;;; the GNU General Public License as published by the Free Software Foundation,
+;;; either version 3 of the License, or (at your option) any later version.
+;;;
+;;; This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
+;;; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+;;; See the GNU General Public License for more details.
+;;;
+;;; You should have received a copy of the GNU General Public License along with this library.
+;;; If not, see <https://www.gnu.org/licenses/>.
+
+(define-module (deployment system file-systems)
+ #:export (file-system-dokumenty
+ file-system-szablony)
+ #:use-module (gnu system file-systems)
+ #:use-module (sovereign system file-systems))
+
+(define file-system-dokumenty
+ (file-system
+ (inherit %file-system-nfs)
+ (mount-point "/mnt/dokumenty")
+ (device "10.0.0.1:/home/marek/Dokumenty")))
+
+(define file-system-szablony
+ (file-system
+ (inherit %file-system-nfs)
+ (mount-point "/mnt/szablony")
+ (device "10.0.0.1:/home/marek/Szablony")))
+
+;;; EOF
diff --git a/deployment/system/rakan.scm b/deployment/system/rakan.scm
index 0f9b8d5..0bbcb1d 100644
--- a/deployment/system/rakan.scm
+++ b/deployment/system/rakan.scm
@@ -26,6 +26,8 @@
#:prefix deployment:gexp:)
#:use-module ( (deployment services vpn)
#:prefix deployment:services:vpn:)
+ #:use-module ( (deployment system file-systems)
+ #:prefix deployment:system:file-systems:)
#:use-module ( (gnu home)
#:prefix gnu:home:)
#:use-module ( (gnu home services)
@@ -255,6 +257,8 @@
(mapped-devices (list))
(file-systems (cons* file-system/root-btrfs
file-system-efi
+ deployment:system:file-systems:file-system-dokumenty
+ deployment:system:file-systems:file-system-szablony
gnu:system:file-systems:%base-file-systems))
(swap-devices (list swap))
(users (cons* users:id1000:uid1000-account