;; These are all the packages that are already sent in the Guix upstream tree
;; and waiting approval.

(define-module (sigils packages upstream)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix git-download)
  #:use-module (guix gexp)
  #:use-module ((guix licenses)
                #:prefix license:)
  ;; lnav
  #:use-module (guix build-system gnu)
  #:use-module (gnu packages autotools)
  #:use-module (gnu packages base)
  #:use-module (gnu packages curl)
  #:use-module (gnu packages sqlite)
  #:use-module (gnu packages compression)
  #:use-module (gnu packages backup)
  #:use-module (gnu packages pcre)
  #:use-module (gnu packages readline)
  #:use-module (gnu packages ncurses)
  #:use-module (gnu packages networking)
  #:use-module (gnu packages rust)
  #:use-module (gnu packages perl)
  ;; ncpamixer
  #:use-module (guix build-system cmake)
  #:use-module (gnu packages pulseaudio)
  ;; mimeo
  #:use-module (guix build-system python)
  #:use-module (gnu packages file)
  #:use-module (gnu packages freedesktop))

(define-public mimeo
  (package
    (name "mimeo")
    (version "2023")
    (source
     (origin
       (method url-fetch)
       (uri (string-append "https://xyne.dev/projects/mimeo/src/mimeo-"
                           version ".tar.xz"))
       (sha256
        (base32 "1459kvnf96bvxxf5r8lg2lldm5ymfbdpdlriaj3mcivh595nza09"))))
    (build-system python-build-system)
    (home-page "https://xyne.dev/projects/mimeo/")
    (synopsis
     "Open files by MIME-type or file name using regular expressions.")
    (description
     "Mimeo uses MIME-type file associations to determine which
application should be used to open a file. It can launch files or print
information such as the command that it would use, the detected MIME-type, etc.")
    (native-inputs (list file python-pyxdg))
    (license license:gpl3)))

(define-public ncpamixer
  (package
   (name "ncpamixer")
   (version "1.3.7")
   (source
    (origin
     (method git-fetch)
     (uri (git-reference
           (url "https://github.com/fulhax/ncpamixer/")
           (commit version)))
     (file-name (git-file-name name version))
     (sha256
      (base32 "1ix4cja3yka8ah5s1ygd0ghf53jllphnjxjnkivvx72jii4b778q"))))
   (build-system cmake-build-system)
   (inputs (list pulseaudio ncurses))
   (arguments
    (list
     #:configure-flags #~'("-DBUILD_MANPAGES=OFF")
     #:tests? #f
     #:phases #~(modify-phases %standard-phases
                               (add-before 'configure 'chdir-to-src
                                           (lambda _
                                             (chdir "src"))))))
   (home-page "https://github.com/fulhax/ncpamixer")
   (synopsis "Ncurses PulseAudio Mixer")
   (description "An ncurses mixer for PulseAudio inspired by pavucontrol.")
   (license license:expat)))

(define-public lnav
  (package
   (name "lnav")
   (version "0.12.3-beta2") ;0.12.2 hardcodes /usr/share/zoneinfo
   (source
    (origin
     (method url-fetch)
     (uri (string-append
           "https://github.com/tstack/lnav/archive/refs/tags/v" version
           ".tar.gz"))
     (sha256
      (base32 "0gmzxxxjz71q7j01j99lnszgilcakwdirh2lb5m9x0f6fz7hb76g"))))
   (build-system gnu-build-system)
   (native-inputs (list autoconf
                        automake
                        pcre2
                        sqlite
                        ncurses
                        readline
                        zlib
                        lbzip2
                        curl
                        libarchive
                        wireshark
                        rust
                        tzdata
                        perl-digest-sha))
   (home-page "https://github.com/tstack/lnav")
   (synopsis "Log file navigator")
   (description
    "The Logfile Navigator is a log file viewer for the terminal.")
   (arguments
    '(#:tests? #f)) ;tests fail on the beta
   (license license:bsd-2)))