me/guix
Archived
1
0
Fork 0
Code Activity

services: urandom-seed: Deprecate the 'urandom-seed-service' procedure.

Browse source 
* gnu/services/base.scm (urandom-seed-service-type)[default-value]: New
field.
(urandom-seed-service): Mark as deprecated.
(%base-services): Use URANDOM-SEED-SERVICE-TYPE directly.
* gnu/services/base.scm (%base-services):
* doc/guix.texi (Base Services): Document 'urandom-seed-service-type'
instead of 'urandom-seed-service'.
This commit is contained in:
Ludovic Courtès 2017-12-20 11:13:54 +01:00
parent 4e9fd50857
commit 8faaf8d7cc
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
2 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
doc/guix.texi
View file

@ -10031,12 +10031,12 @@ well as in the @var{groups} field of the @var{operating-system} record.
@end example @end example
@end deffn @end deffn
@deffn {Scheme Procedure} urandom-seed-service @defvr {Scheme Variable} urandom-seed-service-type
Save some entropy in @var{%random-seed-file} to seed @file{/dev/urandom} Save some entropy in @var{%random-seed-file} to seed @file{/dev/urandom}
when rebooting. It also tries to seed @file{/dev/urandom} from when rebooting. It also tries to seed @file{/dev/urandom} from
@file{/dev/hwrng} while booting, if @file{/dev/hwrng} exists and is @file{/dev/hwrng} while booting, if @file{/dev/hwrng} exists and is
readable. readable.
@end deffn @end defvr
@defvr {Scheme Variable} %random-seed-file @defvr {Scheme Variable} %random-seed-file
This is the name of the file where some random bytes are saved by This is the name of the file where some random bytes are saved by

5
gnu/services/base.scm
View file

@ -597,12 +597,13 @@ in KNOWN-MOUNT-POINTS when it is stopped."
;; start until we have seeded the PRNG. ;; start until we have seeded the PRNG.
(service-extension user-processes-service-type (service-extension user-processes-service-type
(const '(urandom-seed))))) (const '(urandom-seed)))))
(default-value #f)
(description (description
"Seed the @file{/dev/urandom} pseudo-random number "Seed the @file{/dev/urandom} pseudo-random number
generator (RNG) with the value recorded when the system was last shut generator (RNG) with the value recorded when the system was last shut
down."))) down.")))
(define (urandom-seed-service) (define (urandom-seed-service) ;deprecated
(service urandom-seed-service-type #f)) (service urandom-seed-service-type #f))
@ -1984,7 +1985,7 @@ This service is not part of @var{%base-services}."
(ip "127.0.0.1") (ip "127.0.0.1")
(provision '(loopback))))) (provision '(loopback)))))
(syslog-service) (syslog-service)
(urandom-seed-service) (service urandom-seed-service-type)
(guix-service) (guix-service)
(nscd-service) (nscd-service)