aboutsummaryrefslogtreecommitdiff
path: root/gnu/installer/aux-files
diff options
context:
space:
mode:
authorJelle Licht <jlicht@fsfe.org>2023-10-29 15:40:27 +0100
committerAndrew Tropin <andrew@trop.in>2023-11-02 10:01:20 +0400
commit7c2d36d014394f435cea4a04d0e7d8bdd21fa14d (patch)
tree91db5b6f485404f2341fadce6705a969f902088b /gnu/installer/aux-files
parent1ebc1651a6cdbafc6277adebb6e47d417fc8a2c0 (diff)
downloadguix-7c2d36d014394f435cea4a04d0e7d8bdd21fa14d.tar.gz
guix-7c2d36d014394f435cea4a04d0e7d8bdd21fa14d.zip
gnu: emacs-clj-refactor: Update to 3.10.0.
* gnu/packages/emacs-xyz.scm (emacs-clj-refactor): Update to 3.10.0. Change-Id: Idef5f44e2e3a8ed149d46ba2307184ffee21de4b Signed-off-by: Andrew Tropin <andrew@trop.in>
Diffstat (limited to 'gnu/installer/aux-files')
0 files changed, 0 insertions, 0 deletions
ot; "su" "slim" "gdm-password" "sddm")) (pam-service (inherit pam) (auth (append (pam-service-auth pam) (list optional-pam-mount))) (session (append (pam-service-session pam) (list optional-pam-mount)))) pam)))))) (define (extend-pam-mount-configuration initial extensions) "Extends INITIAL with EXTENSIONS." (pam-mount-configuration (rules (append (pam-mount-configuration-rules initial) extensions)))) (define pam-mount-service-type (service-type (name 'pam-mount) (extensions (list (service-extension etc-service-type pam-mount-etc-service) (service-extension pam-root-service-type pam-mount-pam-service))) (compose concatenate) (extend extend-pam-mount-configuration) (default-value (pam-mount-configuration)) (description "Activate PAM-Mount support. It allows mounting volumes for specific users when they log in."))) (define (field-name->tag field-name) "Convert FIELD-NAME to its tag used by the configuration XML." (match field-name ('user-name 'user) ('user-id 'uid) ('primary-group 'pgrp) ('group-id 'gid) ('secondary-group 'sgrp) ('file-system-type 'fstype) ('no-mount-as-root? 'noroot) ('file-name 'path) ('mount-point 'mountpoint) ('ssh? 'ssh) ('file-system-key-cipher 'fskeycipher) ('file-system-key-hash 'fskeyhash) ('file-system-key-file-name 'fskeypath) (_ field-name))) (define-maybe string) (define (serialize-string field-name value) (list (field-name->tag field-name) value)) (define (integer-or-range? value) (match value ((start . end) (and (integer? start) (integer? end))) (_ (number? value)))) (define-maybe integer-or-range) (define (serialize-integer-or-range field-name value) (let ((value-string (match value ((start . end) (format #f "~a-~a" start end)) (_ (number->string value))))) (list (field-name->tag field-name) value-string))) (define-maybe boolean) (define (serialize-boolean field-name value) (let ((value-string (if value "1" "0"))) (list (field-name->tag field-name) value-string))) (define-configuration pam-mount-volume (user-name maybe-string "User name to match.") (user-id maybe-integer-or-range "User ID, or range of user IDs, in the form of @code{(start . end)} to\nmatch.") (primary-group maybe-string "Primary group name to match.") (group-id maybe-integer-or-range "Group ID, or range of group IDs, in the form of @code{(start . end)} to\nmatch.") (secondary-group maybe-string "Match users who belong to this group name as either a primary or secondary\ngroup.") (file-system-type maybe-string "File system type of volume being mounted.") (no-mount-as-root? maybe-boolean "Do not use super user privileges to mount this volume.") (server maybe-string "Remote server this volume resides on.") (file-name maybe-string "Location of the volume to be mounted.") (mount-point maybe-string "Where to mount the volume in the local file system.") (options maybe-string "Options to pass to the underlying mount program.") (ssh? maybe-boolean "Whether to pass the login password to SSH.") (cipher maybe-string "Cryptsetup cipher named used by volume.") (file-system-key-cipher maybe-string "Cipher name used by the target volume.") (file-system-key-hash maybe-string "SSL hash name used by the target volume.") (file-system-key-file-name maybe-string "File name for the file system key used by the target volume.")) (define (pam-mount-volume->sxml volume) ;; Convert a list of configuration fields into an SXML-compatible attribute ;; list. (define xml-attrs (filter-map (lambda (field) (let* ((accessor (configuration-field-getter field)) (value (accessor volume))) (and (not (eq? value %unset-value)) (list (field-name->tag (configuration-field-name field)) value)))) pam-mount-volume-fields)) `(volume (@ ,@xml-attrs))) (define (pam-mount-volume-rules volumes) (map pam-mount-volume->sxml volumes)) (define pam-mount-volume-service-type (service-type (name 'pam-mount-volume) (extensions (list (service-extension pam-mount-service-type pam-mount-volume-rules))) (compose concatenate) (extend append) (default-value '()) (description "Mount remote volumes such as CIFS shares @i{via} @acronym{PAM, Pluggable Authentication Modules} when logging in, using login credentials."))) ?id=2bfb27af56e2e1ef1699c8ec63d3badeb211b58e'>installer: user: Forbid root user creation....Forbid root user creation as it could lead to a system without any non-priviledged user accouts. Fixes: <https://issues.guix.gnu.org/54666>. * gnu/installer/newt/user.scm (run-user-add-page): Forbid it. Mathieu Othacehe 2022-02-02installer: Make dump archive creation optional and selective....* gnu/installer.scm (installer-program): Let the installer customize the dump archive. * gnu/installer/dump.scm (prepare-dump, make-dump): Split make-dump in prepare-dump, which copies the files necessary for the dump, and make-dump which creates the archive. * gnu/installer/record.scm (installer): Add report-page field. Change documented return value of exit-error. * gnu/installer/newt.scm (exit-error): Change arguments to be a string containing the error. Let the user choose between exiting and initiating a dump. (report-page): Add new variable. * gnu/installer/newt/page.scm (run-dump-page): New variable. * gnu/installer/newt/dump.scm: Delete it. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org> Josselin Poiret 2022-02-02installer: Turn passwords into opaque records....* gnu/installer/user.scm (<secret>, secret?, make-secret, secret-content): Add opaque <secret> record that boxes its contents, with a custom printer that doesn't display anything. * gnu/installer/newt/user.scm (run-user-add-page, run-user-page): Box it. * gnu/installer/final.scm (create-user-database): Unbox it. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org> Josselin Poiret 2022-02-02installer: Add error page when running external commands....* gnu/installer/newt.scm (newt-run-command): Add it. * gnu/installer/newt/page.scm (%ok-button, %exit-button, %default-buttons, make-newt-buttons, run-textbox-page): Add them. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org> Josselin Poiret 2022-02-02installer: Use named prompt to abort or break installer steps....* gnu/installer/steps.scm (run-installer-steps): Set up 'installer-step prompt. * gnu/installer/newt/ethernet.scm (run-ethernet-page) * gnu/installer/newt/final.scm (run-config-display-page, run-install-failed-page) * gnu/installer/newt/keymap.scm (run-layout-page, run-variant-page) * gnu/installer/newt/locale.scm (run-language-page, run-territory-page, run-codeset-page, run-modifier-page, run-locale-page) * gnu/installer/newt/network.scm (run-technology-page, wait-service-online) * gnu/installer/newt/page.scm (run-listbox-selection-page, run-checkbox-tree-page) * gnu/installer/newt/partition.scm (button-exit-action) * gnu/installer/newt/services.scm (run-desktop-environments-cbt-page, run-networking-cbt-page, run-other-services-cbt-page, run-network-management-page) * gnu/installer/newt/timezone.scm (run-timezone-page) * gnu/installer/newt/user.scm (run-user-page) * gnu/installer/newt/welcome.scm (run-menu-page) * gnu/installer/newt/wifi.scm (run-wifi-page): Use the 'installer-step prompt to abort. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org> Josselin Poiret 2022-02-02installer: Replace run-command by invoke in newt/page.scm....* gnu/installer/newt/page.scm (edit-file): Replace it. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org> Josselin Poiret 2022-02-02installer: Fix run-file-textbox-page when edit-button is #f....* gnu/installer/newt/page.scm (run-file-textbox-page): Check if edit-button is #f. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org> Josselin Poiret 2022-02-02installer: Use new installer-log-line everywhere....* gnu/installer.scm (installer-program) * gnu/installer/final.scm (install-locale) * gnu/installer/newt.scm (init) * gnu/installer/newt/final.scm (run-final-page) * gnu/installer/newt/page.scm (run-form-with-clients) * gnu/installer/newt/partition.scm (run-partitioning-page) * gnu/installer/parted.scm (eligible-devices, mkpart, luks-format-and-open, luks-close, mount-user-partitions, umount-user-partitions, free-parted): * gnu/installer/steps.scm (run-installer-steps): * gnu/installer/utils.scm (run-command, send-to-clients): Use it. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org> Josselin Poiret 2022-02-02installer: Add crash dump upload support....Suggested-by: Josselin Poiret <dev@jpoiret.xyz> * gnu/installer/dump.scm: New file. * gnu/installer/newt/dump.scm: New file. * gnu/local.mk (INSTALLER_MODULES): Add them. * gnu/installer/record.scm (<installer>)[dump-page]: New field. * gnu/installer/steps.scm (%current-result): New variable. (run-installer-steps): Update it. * gnu/installer.scm (installer-program): Add tar and gip to the installer path. Add guile-webutils and gnutls to the Guile extensions. Generate and send the crash dump report. * gnu/installer/newt.scm (exit-error): Add a report argument. Display the report id. (dump-page): New procedure. (newt-installer): Update it. Mathieu Othacehe 2022-01-14installer: Check if ci.guix.gnu.org can be reached....* gnu/installer.scm (installer-program): Add gnutls extension. * gnu/installer/newt/network.scm (wait-service-online): Check if the CI server can be reached. Mathieu Othacehe 2022-01-14installer: Ignore small devices....Filter the devices that are smaller than 2GiB in the device selection list. * gnu/installer/parted.scm (%min-device-size): New variable. (non-install-devices): Rename it ... (eligible-devices): ... this way. Filter the install device as well as the small devices. * gnu/installer/newt/partition.scm (run-partitioning-page): Adapt it. Mathieu Othacehe 2021-12-28installer: Recommend 'ntp-service-type' for non-graphical systems....We had several bug reports with a root cause of "the clock was incorrect" from users who used the installer to install a non-graphical Guix System. * gnu/installer/services.scm (%system-services): Add the ntp-service-type. * gnu/installer/newt/services.scm (run-system-administration-cbt-page): New variable. (run-services-page): Use run-system-administration-cbt-page when not installing a desktop. * gnu/installer/tests.scm (choose-services): Add and use a choose-misc-service? procedure. * gnu/tests/install.scm (installation-target-os-for-gui-tests)<services>: Add ntp-service-type. Leo Famulari 2021-12-28installer: Offer the CUPS printing service on a dedicated page....Currently, the installer page RUN-OTHER-SERVICES-CBT-PAGE offers to the user all installer services that are not of the types 'desktop', 'network-management', or 'networking'. Concretely, this means that it offers the CUPS printing service, because that is the only service of a different type defined in the installer. In later commits, we will add some services of a new type, and we only want them to be offered when the user is installing a non-graphical system. At least one of these new services (NTP) is part of %DESKTOP-SERVICES. If it was also offered on RUN-OTHER-SERVICES-CBT-PAGE, and the user had configured a system using %DESKTOP-SERVICES, the user could accidentally add NTP to their services twice, which is an error and would break installation. So, this commit makes the RUN-OTHER-SERVICES-CBT-PAGE be more specific about what services to offer. This makes it easier to discriminate between desktop and non-desktop installations, in terms of when a given service is offered. * gnu/installer/newt/services.scm (RUN-OTHER-SERVICES-CBT-PAGE): Rename to ... (RUN-PRINTING-SERVICES-CBT-PAGE): ... new variable, and select only 'document' services. (RUN-SERVICES-PAGE): Adjust accordingly. * gnu/installer/tests.scm (CHOOSE-SERVICES): Adjust accordingly. Leo Famulari 2021-10-21installer: Reorder file system type listbox....Recommending ext4 over btrfs is probably ill-advised nowadays. See the regular bug reports about running out of /gnu/store directory entries, for which the documented fix then breaks booting with GRUB. Instead, just list regular file systems alphabetically. We can bikeshed bcachefs later ;-) Move second-class file systems like NTFS to their own section at the end of the list. * gnu/packages/package-management.scm (run-fs-type-page): Reorder the LISTBOX-ITEMS. Tobias Geerinckx-Rice 2021-09-23installer: Support XFS....* gnu/installer/newt/partition.scm (run-fs-type-page): Add ‘xfs’ to the list box. * gnu/installer/parted.scm (user-fs-type-name, user-fs-type->mount-type) (partition-filesystem-user-type): Add ‘xfs’ mapping. (create-xfs-file-system): New procedure. (format-user-partitions): Use it. * gnu/installer.scm (set-installer-path): Add xfsprogs. Tobias Geerinckx-Rice