MSG/msg-cli
1
0
Fork 0
Code Issues 3 Pull requests Projects 1 Releases 2 Packages Wiki Activity Actions

updated source code to include config files from installer/msg image

Browse source
This commit is contained in:
Chad Nelson 2025-03-16 12:41:03 -06:00
parent cc478d4d72
commit 400cc82679
6 changed files with 204 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

BIN
.DS_Store vendored Normal file
View file

Binary file not shown.

4
Makefile.am
View file

@ -53,7 +53,9 @@ EXTRA_DIST = README.org \
HACKING \
LICENSE \
COPYING \
doc/config.scm \
doc/installer-config.scm \
doc/qemu-config.scm \
doc/msg-config.scm \
NEWS \
AUTHORS \
ChangeLog \

101
doc/installer-config.scm Normal file
View file

@ -0,0 +1,101 @@
(use-modules (gnu)
(gnu packages)
(guix)
(guix download))
(use-service-modules avahi networking ssh shepherd)
;;(use-package-modules certs
;; screen
;; ssh
;; tmux
;; vim
;; wget)
(define this-file
(local-file
"/etc/config.scm"))
(define installer-file
(local-file
"/etc/installer-config.scm"))
(define pub-file
(local-file
"/etc/msg_rsa.pub"))
(operating-system
(host-name "msg")
(timezone "America/Denver")
(locale "en_US.utf8")
(bootloader (bootloader-configuration
(bootloader grub-efi-bootloader)
(targets '("/boot/efi"))
(terminal-outputs '(console))))
(file-systems (append
(list (file-system
(device "/dev/vda2")
(mount-point "/")
(type "ext4"))
(file-system
(device "/dev/vda1")
(create-mount-point? #t)
(mount-point "/boot/efi")
(type "vfat")))
%base-file-systems))
(users (cons (user-account
(name "admin")
(group "users")
(supplementary-groups '("wheel" "audio" "video")))
%base-user-accounts))
(sudoers-file (plain-file "sudoers"
"root ALL=(ALL) ALL\n%wheel ALL=NOPASSWD: ALL\n"))
(packages (append (map specification->package
'("tmux" "nss-certs" "vim" "wget" "cmake" "make" "gcc-toolchain")) %base-packages))
(services
(append
(list (service openssh-service-type
(openssh-configuration
(password-authentication? #f)
(permit-root-login 'prohibit-password)
(x11-forwarding? #t)
(authorized-keys
`(("root" ,(local-file "/etc/msg_rsa.pub"))))
))
(service network-manager-service-type)
(service wpa-supplicant-service-type)
(simple-service 'config-file etc-service-type
`(("config.scm" ,this-file)))
(simple-service 'pub-file etc-service-type
`(("msg_rsa.pub" , pub-file)))
(simple-service 'install-config-file etc-service-type
`(("installer-config.scm" , installer-file)))
(service avahi-service-type)
(simple-service
'mount-macos-overlayfs
shepherd-root-service-type
(list
(shepherd-service
(provision '(virtiofs-macos))
(documentation "Mount macos 9p")
(one-shot? #t)
(start (let ((util-linux (@ (gnu packages linux) util-linux)))
#~(lambda _
(system*
#$(file-append util-linux "/bin/mount")
"-t" "9p"
"-o" "trans=virtio"
"macos" "/mnt/macos"
"-oversion=9p2000.L")
#f)))
)))
(service ntp-service-type))
%base-services))
(name-service-switch %mdns-host-lookup-nss))

94
doc/msg-config.scm Normal file
View file

@ -0,0 +1,94 @@
(use-modules (gnu)
(gnu packages)
(guix)
(guix download))
(use-service-modules avahi networking ssh shepherd)
;;(use-package-modules certs
;; screen
;; ssh
;; tmux
;; vim
;; wget)
(define this-file
(local-file
"/etc/config.scm"))
(define pub-file
(local-file
"/etc/msg_rsa.pub"))
(operating-system
(host-name "msg")
(timezone "America/Denver")
(locale "en_US.utf8")
(bootloader (bootloader-configuration
(bootloader grub-efi-bootloader)
(targets '("/boot/efi"))
(terminal-outputs '(console))))
(file-systems (append
(list (file-system
(device "/dev/vda2")
(mount-point "/")
(type "ext4"))
(file-system
(device "/dev/vda1")
(create-mount-point? #t)
(mount-point "/boot/efi")
(type "vfat")))
%base-file-systems))
(users (cons (user-account
(name "admin")
(group "users")
(supplementary-groups '("wheel" "audio" "video")))
%base-user-accounts))
(sudoers-file (plain-file "sudoers"
"root ALL=(ALL) ALL\n%wheel ALL=NOPASSWD: ALL\n"))
(packages (append (map specification->package
'("tmux" "nss-certs" "vim" "wget" "cmake" "make" "gcc-toolchain")) %base-packages))
(services
(append
(list (service openssh-service-type
(openssh-configuration
(password-authentication? #f)
(x11-forwarding? #t)
(authorized-keys
`(("admin" ,(local-file "/etc/msg_rsa.pub"))))
))
(service network-manager-service-type)
(service wpa-supplicant-service-type)
(simple-service 'config-file etc-service-type
`(("config.scm" ,this-file)))
(simple-service 'pub-file etc-service-type
`(("msg_rsa.pub" , pub-file)))
(service avahi-service-type)
(simple-service
'mount-macos-overlayfs
shepherd-root-service-type
(list
(shepherd-service
(provision '(virtiofs-macos))
(documentation "Mount macos 9p")
(one-shot? #t)
(start (let ((util-linux (@ (gnu packages linux) util-linux)))
#~(lambda _
(system*
#$(file-append util-linux "/bin/mount")
"-t" "9p"
"-o" "trans=virtio"
"macos" "/mnt/macos"
"-oversion=9p2000.L")
#f)))
)))
(service ntp-service-type))
%base-services))
(name-service-switch %mdns-host-lookup-nss))

0
doc/config.scm → doc/qemu-config.scm
View file

7
hall.scm
View file

@ -33,7 +33,12 @@
(text-file "HACKING")
(text-file "LICENSE")
(text-file "COPYING")
(directory "doc" ((texi-file "msg") (scheme-file "config")))
(directory
"doc"
((texi-file "msg")
(scheme-file "installer-config")
(scheme-file "qemu-config")
(scheme-file "msg-config")))
(text-file "NEWS")
(text-file "AUTHORS")
(text-file "ChangeLog")))