From 124ffd468c3a6f2875275ea898e960c3f90e7efd Mon Sep 17 00:00:00 2001 From: JEAN-FRANCOIS GUILLAUME Date: Tue, 20 Jun 2023 11:43:34 +0200 Subject: [PATCH] sssd service --- glicid/services/authentication.scm | 24 ++++++++++++++---------- 1 file changed, 14 insertions(+), 10 deletions(-) diff --git a/glicid/services/authentication.scm b/glicid/services/authentication.scm index 993e703..a37246b 100644 --- a/glicid/services/authentication.scm +++ b/glicid/services/authentication.scm @@ -16,21 +16,25 @@ (define-record-type* - sssd-configuration make-sssd-configuration sssd-configuration? - (pkg pkg (default sssd)) - (config-file config-file (default "/etc/sssd/sssd.conf")) + sssd-configuration make-sssd-configuration + sssd-configuration? + (sssd-pkg sssd-pkg (default sssd)) + (pid-file pid-file (default "/var/run/sssd/sssd.pid")) + (config-file config-file (default (file-append sssd "/etc/sssd/sssd.conf"))) (logger logger (default "stderr")) (debug-level debug-level (default "3")) - (log-file log-file (default "/var/log/sssd/sssd.log"))) + (log-file log-file (default "/var/log/sssd.log"))) -(define sssd-service +(define sssd-shepherd-service (match-lambda - (($ pkg config-file logger debug-level log-file) + (($ + pkg pid-file config-file logger debug-level log-file + ) (list (shepherd-service - (provision '(sssd)) + (provision '(slapd)) (documentation "Run sssd.") - (requirement '( user-processes )) + (requirement '(user-processes)) (respawn? #t) (start #~(make-forkexec-constructor (list @@ -40,8 +44,8 @@ "--logger" #$logger "-d" #$debug-level ) - #:log-file #$log-file - )) + #:pid-file #$pid-file + #:log-file #$log-file )) (stop #~(make-kill-destructor))))))) (define %sssd-activation