(define-module (xyz euandreh packages)
  #:use-module (json)
  #:use-module ((ice-9 textual-ports) #:prefix textual-ports:)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (gnu packages)
  #:use-module (guix transformations)
  #:use-module (guix gexp)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix git-download)
  #:use-module (guix utils)
  #:use-module (guix store)
  #:use-module (guix build-system gnu))

(define-public td-latest
  (package
    (name "td-latest")
    (version "707bb2080c35944b14da57f13310c4bad61259fe")
    (source (origin
              (method url-fetch)
              (uri (string-append
                    "https://euandreh.xyz/td.git/snapshot/td-"
                    version
                    ".tar.gz"))
              (sha256
               (base32
                "0qz037cx50zkfjlwk0f9n16ni3j5q328xydml4dw01l6nv9p4pnj"))))
    (build-system gnu-build-system)
    (arguments `(#:make-flags
                 (list (string-append "CC=" ,(cc-for-target))
                       (string-append "PREFIX=" %output))
                 #:phases
                 (modify-phases %standard-phases
                   (delete 'configure))))
    (synopsis (file-append source "/description"))
    (description (file-append source "/long-description"))
    (home-page (string-append "https://" name ".euandreh.xyz"))
    (license license:agpl3+)))

(define-public remembering
  (package
    (name "remembering")
    (version "0.2.1")
    (source (origin
              (method url-fetch)
              (uri (string-append
                    "https://euandreh.xyz/remembering.git/snapshot/remembering-"
                    version
                    ".tar.gz"))
              (sha256
               (base32
                "07q38ld6xy7qsz29crp2lpg695xpiz2ravmz0crlmy4iq1l4138f"))))
    (build-system gnu-build-system)
    (arguments `(#:make-flags
                 (list (string-append "CC=" ,(cc-for-target))
                       (string-append "PREFIX=" %output))
                 #:phases
                 (modify-phases %standard-phases
                   (delete 'configure))))
    (synopsis (file-append source "/description"))
    (description (file-append source "/long-description"))
    (home-page (string-append "https://" name ".euandreh.xyz"))
    (license license:agpl3+)))

(define-public git-permalink-latest
  (package
    (name "git-permalink-latest")
    (version "7f0c97b64bcccbdcd1667f2c2ca8f1face9ca027")
    (source (origin
              (method url-fetch)
              (uri (string-append
                    "https://euandreh.xyz/git-permalink.git/snapshot/git-permalink-"
                    version
                    ".tar.gz"))
              (sha256
               (base32
                "0cchnh5czfrsxvqh50v5jv7z2ggn1515h4g7n7aviin4lcrxmahj"))))
    (build-system gnu-build-system)
    (arguments `(#:make-flags
                 (list (string-append "CC=" ,(cc-for-target))
                       (string-append "PREFIX=" %output))
                 #:phases
                 (modify-phases %standard-phases
                   (delete 'configure))))
    (synopsis (file-append source "/description"))
    (description (file-append source "/long-description"))
    (home-page (string-append "https://" name ".euandreh.xyz"))
    (license license:agpl3+)))

(define-public git-permalink
  (package
    (name "git-permalink")
    (version "0.3.1")
    (source (origin
              (method url-fetch)
              (uri (string-append
                    "https://euandreh.xyz/git-permalink.git/snapshot/git-permalink-"
                    version
                    ".tar.gz"))
              (sha256
               (base32
                "07db7i3rjfcl30bbbg5as8jckh1fi76kr27641bhj58f2xh249g1"))))
    (build-system gnu-build-system)
    (arguments `(#:make-flags
                 (list (string-append "CC=" ,(cc-for-target))
                       (string-append "PREFIX=" %output))
                 #:phases
                 (modify-phases %standard-phases
                   (delete 'configure))))
    (synopsis (file-append source "/description"))
    (description (file-append source "/long-description"))
    (home-page (string-append "https://" name ".euandreh.xyz"))
    (license license:agpl3+)))

(list
 td-latest
 remembering
 git-permalink-latest
 git-permalink)