summaryrefslogtreecommitdiff
path: root/guix/vkraus/modules/web.scm
blob: 500fd64ebccd318a503e3129089a87a45a4cd2c6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
(define-module (vkraus modules web)
  #:use-module (gnu services)
  #:use-module (gnu services admin)
  #:use-module (gnu services web)
  #:use-module (guix gexp)
  #:use-module (guix modules)
  #:use-module (guix records)
  #:use-module (ice-9 match)
  #:use-module (ice-9 optargs))

(define-public nginx-rotate-log-service-type
  (service-type
   (name 'nginx-rotate-log)
   (description
    "Manage the nginx log files with rottlog.")
   (default-value #f)
   (extensions
    (list
     (service-extension
      rottlog-service-type
      (const
       (list
        (log-rotation
         (frequency 'daily)
         (files '("/var/log/nginx/access.log"
                  "/var/log/nginx/error.log"))
         (options '("sharedscripts"
                    "storedir /var/log/nginx"))
         (post-rotate
          #~(let ((pid (call-with-input-file "/var/run/nginx/pid" read)))
	      (kill pid SIGUSR1)))))))))))