(define-module (org euandre papo) #:use-module ((org euandre packages) #:prefix pkg:) #:use-module ((org euandre queue) #:prefix q:) #:use-module (guix packages) #:use-module (guix records) #:export ( papod-configuration make-papod-configuration papod-configuration? papod-configuration-name papod-configuration-package papod-configuration-user papod-configuration-group papod-configuration-log-file papod-configuration-data-directory papod-configuration-run-directory papod-configuration-run-in-container? papod-configuration-container-name papod-configuration-options papod-configuration-listen-socket papod-configuration-upstream-socket)) (define-public papo.im (package (inherit (pkg:pkg "papo.im" "3c0a1c8f7b706da50eedf62591b064986f01e21b" "0hgpj0ys2802f4w2m08xl2sscldl9l2rd4sq0np6msfzxsw3lxy4")) (native-inputs (pkg:format-inputs (list pkg:mkwb))))) (define-public chat.papo.im (package (inherit (pkg:pkg "chat.papo.im" "f9c959b2d8e36460395a425a51d480fac635c5ec" "0h2y0kdfzpsgi64zi7brnj1p0dqz0fx4ksvy57wakr7pvv6rpf64")) (native-inputs (pkg:normalize-inputs '(node))))) (define-public papod (pkg:gopkg "papod" (pkg:format-inputs (list pkg:guuid pkg:gobang pkg:golite q:sqlitex pkg:scrypt q:scryptkdf pkg:fiinha pkg:cracha pkg:eut)) "65de65ce1e34efeb421974bcb5ddd85fb53253bb" "051m0rhxlhlzm8qriaixj0j3h65vslzvfbv65xgszkjri3iwg578")) (define-record-type* papod-configuration make-papod-configuration papod-configuration? (name papod-configuration-name (default "papod")) (package papod-configuration-package (default papod)) (user papod-configuration-user (default "papod")) (group papod-configuration-group (default "papod")) (log-file papod-configuration-log-file (default "/var/log/papod/papod.log")) (data-directory papod-configuration-data-directory (default "/var/lib/papod")) (run-directory papod-configuration-run-directory (default "/var/run/papod")) (run-in-container? papod-configuration-run-in-container? (default #t)) (container-name papod-configuration-container-name (default "papod-container")) (options papod-configuration-options (default '())) (listen-socket papod-configuration-listen-socket (default "/var/run/papod/papod.socket")) (upstream-socket papod-configuration-upstream-socket (default #f))) #; (define-public papod-service-type (pkg:service-type-for 'papod (papod-configuration) '())) (list papo.im chat.papo.im papod)