(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-extra-mappings
             papod-configuration-options
             papod-configuration-listen-socket
             papod-configuration-upstream-socket))



(define-public papo.im
  (package
    (inherit
      (pkg:pkg
       "papo.im"
       "7ea56ccb35372d6f86565f231e728fdc6a50a9d1"
       "0szq66d81swmswhdnzfxh29cysb9fx62p9ffhjav379i9gwgr38a"))
    (native-inputs
      (pkg:format-inputs
       (list
        pkg:mkwb)))))

(define-public status.papo.im
  (package
    (inherit
      (pkg:pkg
       "status.papo.im"
       "b52cf8d1ecc17a0c85309f77cdbceb3f234f3819"
       "0dd28r83763kvig5s12c51dplmk4pai3v8s09yinjh0bpckwg2bd"))
    (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))
   "1feab2105ac464747b231232f53f4ac335f4467f"
   "1hsvca9ns30gynxp0irh9208hg7sbfxp2ynlz8kwj5d5cmbvdzr4"))



(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"))
  (extra-mappings    papod-configuration-extra-mappings
                     (default '()))
  (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
 status.papo.im
   chat.papo.im
 papod)