From 65df04bbe57958ecb4b6e7d0cfd7169beb854f6f Mon Sep 17 00:00:00 2001
From: JEAN-FRANCOIS GUILLAUME <mrbear@yam-it.net>
Date: Thu, 12 May 2022 23:04:07 +0200
Subject: [PATCH] updating squid service

---
 glicid/services/networking.scm | 45 ++--------------------------------
 1 file changed, 2 insertions(+), 43 deletions(-)

diff --git a/glicid/services/networking.scm b/glicid/services/networking.scm
index 0074d63..fa61505 100644
--- a/glicid/services/networking.scm
+++ b/glicid/services/networking.scm
@@ -55,53 +55,12 @@
               "-f" #$config-file
             )
             #:pid-file #$pid-file 
-            #:log-file #$log-file
+            ;#:log-file #$log-file
             #:user (passwd:uid (getpwnam "squid"))
             #:group (passwd:gid (getpwnam "squid"))
+            #:resource-limits '((nofile 16384 16384))
           ))
           (stop #~(make-kill-destructor))
-          ; TODO: find out why actions are not working
-;          (actions (list
-;            (shepherd-action
-;              (name 'reload)
-;              (documentation "Reload the settings file from disk.")
-;              (procedure #~(lambda _ (exec-command
-;                (list
-;                  #$(file-append squid "/sbin/squid")
-;                  "-d" #$loglevel
-;                  "-N"
-;                  "-k" "reconfigure"
-;                  "-f" #$config-file
-;                )
-;              )#t))
-;            )
-;            (shepherd-action
-;              (name 'check-config)
-;              (documentation "Check the settings file from disk.")
-;              (procedure #~(lambda _ (exec-command
-;                (list
-;                  #$(file-append squid "/sbin/squid")
-;                  "-d" #$loglevel
-;                  "-N"
-;                  "-k" "parse"
-;                  "-f" #$config-file
-;                )
-;              )#t))
-;            )
-;            (shepherd-action
-;              (name 'kill)
-;              (documentation "Ultimatly kill the squid process.")
-;              (procedure #~(lambda _ (exec-command
-;                (list
-;                  #$(file-append squid "/sbin/squid")
-;                  "-d" #$loglevel
-;                  "-N"
-;                  "-k" "kill"
-;                  "-f" #$config-file
-;                )
-;              )#t))
-;            )
-;          ))
         )
       )
     )