blob: 9181c58fb3c8a69b3d323b846695c1cbeacd08cb (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
|
;; These are all the packages that are already sent in the Guix upstream tree and waiting approval.
;; It should take only the next 300 years to merge them all.
(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)))
(define-public sdbus-c++-next
(package
(inherit sdbus-c++)
(name "sdbus-c++")
(version "2.0.0")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/Kistler-Group/sdbus-cpp")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32
"1s6vhzln0rvac2r3v8nq08hsjhyz3y46fsy18i23ppjm30apkiav"))))
(arguments
(list
;; Avoid the integration test, which requires a system bus.
#:test-target "sdbus-c++-unit-tests"
#:configure-flags #~(list "-DSDBUSCPP_BUILD_CODE_GEN=ON"
"-DSDBUSCPP_BUILD_TESTS=ON"
;; Do not install tests.
"-DSDBUSCPP_TESTS_INSTALL_PATH=/tmp"
"-DCMAKE_VERBOSE_MAKEFILE=ON")
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'do-not-install-tests
(lambda _
(substitute* "tests/CMakeLists.txt"
(("/etc/dbus-1/system.d") "/tmp")))))))))
(define-public udis86
(let ((commit "5336633af70f3917760a6d441ff02d93477b0c86")
(revision "1"))
(package
(name "udis86")
(version (git-version "1.7.2" revision commit))
(home-page "http://udis86.sourceforge.net/")
(source (origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/canihavesomecoffee/udis86.git")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32
"0y5z1169wff578jylpafsww4px4y6gickhcs885a9c660d8xs9qy"))))
(build-system gnu-build-system)
(native-inputs (list pkg-config
autoconf
automake
libtool
python))
(arguments
(list #:configure-flags
#~(list "--enable-shared"
(string-append "--with-python="
#$(file-append python "/bin/python3")))))
(synopsis "Disassembler Library for x86 and x86-64")
(description "Udis86 is a disassembler for the x86 and x86-64 class of
instruction set architectures.")
(license license:bsd-2))))
|
