mirror of
https://codeberg.org/guix/guix.git
synced 2026-01-25 03:55:08 -06:00
gnu: home: Add himitsu-secret-service service.
* gnu/home/services/secrets.scm (home-himitsu-secret-service-configuration): New configuration. (himitsu-secret-service-shepherd-service): New procedure. (home-himitsu-secret-service-type): New service. Change-Id: Ifb05edce06dbe6a24282701c94007a95dcda1313 Signed-off-by: jgart <jgart@dismail.de>
This commit is contained in:
parent
26cb836c4e
commit
f0d971ee1b
1 changed files with 33 additions and 1 deletions
|
|
@ -30,7 +30,10 @@
|
|||
home-himitsu-service-type
|
||||
|
||||
home-himitsu-ssh-configuration
|
||||
home-himitsu-ssh-service-type))
|
||||
home-himitsu-ssh-service-type
|
||||
|
||||
home-himitsu-secret-service-configuration
|
||||
home-himitsu-secret-service-type))
|
||||
|
||||
;;
|
||||
;; himitsu
|
||||
|
|
@ -187,3 +190,32 @@ same has persist.")
|
|||
(const (list himitsu-ssh)))))
|
||||
(default-value (home-himitsu-ssh-configuration))
|
||||
(description "Add support for ssh to store keys in Himitsu.")))
|
||||
|
||||
;;
|
||||
;; himitsu-secret-service
|
||||
;;
|
||||
|
||||
(define-configuration home-himitsu-secret-service-configuration
|
||||
(package (file-like himitsu-secret-service) "himitsu-secret-service package to
|
||||
use." empty-serializer)
|
||||
(prefix himitsu-))
|
||||
|
||||
(define (himitsu-secret-service-shepherd-service config)
|
||||
(let* ((package (home-himitsu-secret-service-configuration-package config))
|
||||
(binary (file-append package "/bin/hisecrets-agent")))
|
||||
(list (shepherd-service
|
||||
(documentation "Start the Himitsu secret-service implementation.")
|
||||
(provision '(himitsu-secret-service secret-service))
|
||||
(requirement '(himitsud dbus))
|
||||
(start #~(make-forkexec-constructor (list #$binary)))
|
||||
(stop #~(make-kill-destructor))))))
|
||||
|
||||
(define home-himitsu-secret-service-type
|
||||
(service-type
|
||||
(name 'himitsu-secret-service)
|
||||
(extensions
|
||||
(list (service-extension home-shepherd-service-type
|
||||
himitsu-secret-service-shepherd-service)))
|
||||
(default-value (home-himitsu-secret-service-configuration))
|
||||
(description "Add support to Himitsu for the freedesktop.org
|
||||
secret-service protocol.")))
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue