aboutsummaryrefslogtreecommitdiff
path: root/gnu/installer/hardware.scm
diff options
context:
space:
mode:
authorSören Tempel <soeren@soeren-tempel.net>2024-09-27 20:35:03 +0200
committerLudovic Courtès <ludo@gnu.org>2024-10-07 12:51:24 +0200
commit923fac07db59eb1d8a5fd2e4c055820c60c7be68 (patch)
treeada8bff83199d529079c5ef93a81d9d3a674b0ce /gnu/installer/hardware.scm
parentc3d21302cbd1118c8ae4fdcf85c055239b1689ab (diff)
downloadguix-923fac07db59eb1d8a5fd2e4c055820c60c7be68.tar.gz
guix-923fac07db59eb1d8a5fd2e4c055820c60c7be68.zip
gnu: python-angr: Update to 9.2.112.
* gnu/packages/python-xyz.scm (python-angr): Update to 9.2.112. [propagated-inputs]: Remove python-progressbar2; add python-pyformlang, add python-rich, add python-unique-log-filter. * gnu/packages/patches/python-angr-addition-type-error.patch: Remove patch (merged upstream and included in new release). * gnu/packages/patches/python-angr-check-exec-deps.patch: Rebase for new release. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'gnu/installer/hardware.scm')
0 files changed, 0 insertions, 0 deletions
ocess-group"))) (stop #~(make-kill-destructor)))))) (define (samba-smbd-shepherd-service config) (let ((package (samba-configuration-package config)) (config-file (samba-configuration-config-file config))) (list (shepherd-service (documentation "Run SMBD") (provision '(samba-smbd)) (requirement '(networking)) (start #~(make-forkexec-constructor (list #$(file-append package "/sbin/smbd") (string-append "--configfile=" #$config-file) "--foreground" "--no-process-group"))) (stop #~(make-kill-destructor)))))) (define (samba-winbindd-shepherd-service config) (let ((package (samba-configuration-package config)) (config-file (samba-configuration-config-file config))) (list (shepherd-service (documentation "Run Winnbindd for Name Service Switch") (provision '(samba-winbindd)) (requirement '(networking)) (start #~(make-forkexec-constructor (list #$(file-append package "/sbin/winbindd") (string-append "--configfile=" #$config-file) "--foreground" "--no-process-group"))) (stop #~(make-kill-destructor)))))) (define (samba-shepherd-services config) (append (if (samba-configuration-enable-samba? config) (samba-samba-shepherd-service config) '()) (if (samba-configuration-enable-nmbd? config) (samba-nmbd-shepherd-service config) '()) (if (samba-configuration-enable-smbd? config) (samba-smbd-shepherd-service config) '()) (if (samba-configuration-enable-winbindd? config) (samba-winbindd-shepherd-service config) '()))) (define samba-service-type (service-type (name 'samba) (description "Run @uref{https://www.samba.org/, Samba}, a network file and print service for all clients using the SMB/CIFS protocol. Samba is an important component to seamlessly integrate Linux/Unix Servers and Desktops into Active Directory environments. It can function both as a domain controller or as a regular domain member.") (extensions (list (service-extension shepherd-root-service-type samba-shepherd-services) (service-extension activation-service-type samba-activation) (service-extension profile-service-type (compose list samba-configuration-package)))) (default-value (samba-configuration)))) ;;; ;;; WSDD ;;; (define-record-type* <wsdd-configuration> wsdd-configuration make-wsdd-configuration wsdd-configuration? (package wsdd-configuration-package (default wsdd)) (ipv4only? wsdd-configuration-ipv4only? (default #f)) (ipv6only? wsdd-configuration-ipv6only? (default #f)) (chroot wsdd-configuration-chroot (default #f)) (hop-limit wsdd-configuration-hop-limit (default 1)) (interfaces wsdd-configuration-interfaces (default '())) (uuid-device wsdd-configuration-uuid-device (default #f)) (domain wsdd-configuration-domain (default #f)) (host-name wsdd-configuration-host-name (default #f)) (preserve-case? wsdd-configuration-preserve-case? (default #f)) (workgroup wsdd-configuration-workgroup (default "WORKGROUP"))) (define wsdd-accounts (list (user-group (name "wsdd")) (user-account (name "wsdd") (group "wsdd") (comment "Web Service Discovery user") (home-directory "/var/empty") (shell (file-append shadow "/sbin/nologin"))))) (define (wsdd-shepherd-service config) (match-record config <wsdd-configuration> (package ipv4only? ipv6only? chroot hop-limit interfaces uuid-device domain host-name preserve-case? workgroup) (list (shepherd-service (documentation "The Web Service Discovery daemon enables (Samba) hosts, like your local NAS device, to be found by Web Service Discovery Clients like Windows.") (provision '(wsdd)) (requirement '(networking)) (start #~(make-forkexec-constructor (list #$(file-append package "/bin/wsdd") #$@(if ipv4only? #~("--ipv4only") '()) #$@(if ipv6only? #~("--ipv6only") '()) #$@(if chroot #~("--chroot" #$chroot) '()) #$@(if hop-limit #~("--hoplimit" #$(number->string hop-limit)) '()) #$@(map (lambda (interfaces) (string-append "--interface=" interfaces)) interfaces) #$@(if uuid-device #~("--uuid" #$uuid-device) '()) #$@(if domain #~("--domain" #$domain) '()) #$@(if host-name #~("--hostname" #$host-name) '()) #$@(if preserve-case? #~("--preserve-case") '()) #$@(if workgroup #~("--workgroup" #$workgroup) '())) #:user "wsdd" #:group "wsdd" #:log-file "/var/log/wsdd.log")) (stop #~(make-kill-destructor)))))) (define wsdd-service-type (service-type (name 'wsdd) (description "Web Service Discovery Daemon") (extensions (list (service-extension shepherd-root-service-type wsdd-shepherd-service) (service-extension account-service-type (const wsdd-accounts)) (service-extension profile-service-type (compose list wsdd-configuration-package)))) (default-value (wsdd-configuration))))