(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>
             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"
       "a9d94cabd56c75dc4fe834fbb2498db0235b86c1"
       "1lwf71mzhwk5z4r43ppw5a6d5p2asgdbrr3yg97cdkpp8i829xzw"))
    (native-inputs
      (append
       (pkg:format-inputs (list pkg:mkwb))
       (pkg:normalize-inputs '(gnupg jq rsync))))))

(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:pds
     pkg:stm
     pkg:golite q:sqlitex
     pkg:scrypt q:scryptkdf
     pkg:fiinha
     pkg:cracha
     pkg:eut))
   "65de65ce1e34efeb421974bcb5ddd85fb53253bb"
   "051m0rhxlhlzm8qriaixj0j3h65vslzvfbv65xgszkjri3iwg578"))



(define-record-type* <papod-configuration>
  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>
                        (papod-configuration)
                        '()))



(list
      papo.im
 chat.papo.im
 papod)