Commit | Line | Data |
---|---|---|
0b0e11a9 AE |
1 | ;;; GNU Guix --- Functional package management for GNU |
2 | ;;; Copyright © 2015 Andreas Enge <andreas@enge.fr> | |
dac354fe | 3 | ;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com> |
366553e4 | 4 | ;;; Copyright © 2015 Andy Wingo <wingo@pobox.com> |
956ad60c | 5 | ;;; Copyright © 2015, 2016 Ludovic Courtès <ludo@gnu.org> |
366553e4 | 6 | ;;; Copyright © 2015 Ricardo Wurmus <rekado@elephly.net> |
177b4255 | 7 | ;;; Copyright © 2015 David Hashe <david.hashe@dhashe.com> |
55ba649d | 8 | ;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il> |
0b0e11a9 AE |
9 | ;;; |
10 | ;;; This file is part of GNU Guix. | |
11 | ;;; | |
12 | ;;; GNU Guix is free software; you can redistribute it and/or modify it | |
13 | ;;; under the terms of the GNU General Public License as published by | |
14 | ;;; the Free Software Foundation; either version 3 of the License, or (at | |
15 | ;;; your option) any later version. | |
16 | ;;; | |
17 | ;;; GNU Guix is distributed in the hope that it will be useful, but | |
18 | ;;; WITHOUT ANY WARRANTY; without even the implied warranty of | |
19 | ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
20 | ;;; GNU General Public License for more details. | |
21 | ;;; | |
22 | ;;; You should have received a copy of the GNU General Public License | |
23 | ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. | |
24 | ||
25 | (define-module (gnu packages freedesktop) | |
366553e4 | 26 | #:use-module ((guix licenses) #:prefix license:) |
0b0e11a9 AE |
27 | #:use-module (guix packages) |
28 | #:use-module (guix download) | |
366553e4 | 29 | #:use-module (guix git-download) |
dac354fe | 30 | #:use-module (guix build-system gnu) |
e8444b26 RW |
31 | #:use-module (guix build-system python) |
32 | #:use-module (gnu packages gnome) | |
33 | #:use-module (gnu packages python) | |
dac354fe SB |
34 | #:use-module (gnu packages linux) |
35 | #:use-module (gnu packages pkg-config) | |
366553e4 RW |
36 | #:use-module (gnu packages autotools) |
37 | #:use-module (gnu packages gettext) | |
38 | #:use-module (gnu packages gperf) | |
55ba649d | 39 | #:use-module (gnu packages graphviz) |
e6823279 | 40 | #:use-module (gnu packages gtk) |
366553e4 RW |
41 | #:use-module (gnu packages xml) |
42 | #:use-module (gnu packages docbook) | |
43 | #:use-module (gnu packages glib) ;intltool | |
dac354fe | 44 | #:use-module (gnu packages xdisorg) |
6178d947 | 45 | #:use-module (gnu packages xorg) |
177b4255 | 46 | #:use-module (gnu packages boost) |
5c91962a | 47 | #:use-module (gnu packages m4) |
177b4255 | 48 | #:use-module (gnu packages compression) |
99828fa7 | 49 | #:use-module (gnu packages documentation) |
171ae35c SB |
50 | #:use-module (gnu packages libffi) |
51 | #:use-module (gnu packages acl) | |
1d19bc11 | 52 | #:use-module (gnu packages admin) |
6976e7d2 SB |
53 | #:use-module (gnu packages polkit) |
54 | #:use-module (gnu packages databases)) | |
0b0e11a9 AE |
55 | |
56 | (define-public xdg-utils | |
57 | (package | |
58 | (name "xdg-utils") | |
59 | (version "1.0.2") | |
60 | (source | |
61 | (origin | |
62 | (method url-fetch) | |
63 | (uri (string-append | |
5cc3096c | 64 | "https://portland.freedesktop.org/download/xdg-utils-" |
0b0e11a9 AE |
65 | version ".tgz")) |
66 | (sha256 | |
67 | (base32 | |
68 | "1b019d3r1379b60p33d6z44kx589xjgga62ijz9vha95dg8vgbi1")))) | |
69 | (build-system gnu-build-system) | |
f072e9ad SB |
70 | (propagated-inputs |
71 | `(("xprop" ,xprop) ; for Xfce detecting | |
b3546174 | 72 | ("xset" ,xset))) ; for xdg-screensaver |
0b0e11a9 AE |
73 | (arguments |
74 | `(#:tests? #f)) ; no check target | |
75 | (home-page "http://portland.freedesktop.org/") | |
76 | (synopsis "Freedesktop.org scripts for desktop integration") | |
77 | (description "The xdg-utils package is a set of simple scripts that | |
78 | provide basic desktop integration functions in the framework of the | |
79 | freedesktop.org project.") | |
366553e4 | 80 | (license license:expat))) |
dac354fe SB |
81 | |
82 | (define-public libinput | |
83 | (package | |
84 | (name "libinput") | |
3f61f926 | 85 | (version "1.3.0") |
dac354fe SB |
86 | (source (origin |
87 | (method url-fetch) | |
521b1d88 | 88 | (uri (string-append "https://freedesktop.org/software/libinput/" |
dac354fe SB |
89 | name "-" version ".tar.xz")) |
90 | (sha256 | |
91 | (base32 | |
3f61f926 | 92 | "1sn1s1bz06fa49izqkqf519sjclsvhf42i6slzx1w5hx4vxpb2lr")))) |
dac354fe SB |
93 | (build-system gnu-build-system) |
94 | (native-inputs | |
95 | `(("pkg-config" ,pkg-config))) | |
96 | (propagated-inputs | |
97 | `(("libudev" ,eudev))) ; required by libinput.pc | |
98 | (inputs | |
99 | `(("libevdev" ,libevdev) | |
521b1d88 AW |
100 | ("mtdev" ,mtdev) |
101 | ("libwacom" ,libwacom))) | |
dac354fe SB |
102 | (home-page "http://www.freedesktop.org/wiki/Software/libinput/") |
103 | (synopsis "Input devices handling library") | |
104 | (description | |
105 | "Libinput is a library to handle input devices for display servers and | |
106 | other applications that need to directly deal with input devices.") | |
366553e4 RW |
107 | (license license:x11))) |
108 | ||
60a5617b AK |
109 | (define-public libxdg-basedir |
110 | (package | |
111 | (name "libxdg-basedir") | |
112 | (version "1.2.0") | |
113 | (source (origin | |
114 | (method url-fetch) | |
115 | (uri (string-append | |
116 | "https://github.com/devnev/libxdg-basedir/archive/" | |
117 | name "-" version ".tar.gz")) | |
118 | (sha256 | |
119 | (base32 | |
120 | "0s28c7sfwqimsmb3kn91mx7wi55fs3flhbmynl9k60rrllr00aqw")))) | |
121 | (build-system gnu-build-system) | |
122 | (arguments | |
123 | '(#:phases | |
124 | (modify-phases %standard-phases | |
125 | (add-after 'unpack 'autogen | |
126 | (lambda _ | |
127 | ;; Run 'configure' in its own phase, not now. | |
128 | (substitute* "autogen.sh" | |
129 | (("^.*\\./configure.*") "")) | |
130 | (zero? (system* "sh" "autogen.sh"))))))) | |
131 | (native-inputs | |
132 | `(("autoconf" ,autoconf) | |
133 | ("automake" ,automake) | |
134 | ("libtool" ,libtool))) | |
135 | (home-page "https://github.com/devnev/libxdg-basedir") | |
136 | (synopsis "Implementation of the XDG Base Directory specification") | |
137 | (description | |
138 | "libxdg-basedir is a C library providing some functions to use with | |
139 | the freedesktop.org XDG Base Directory specification.") | |
140 | (license license:expat))) | |
141 | ||
366553e4 | 142 | (define-public elogind |
5c91962a AW |
143 | (package |
144 | (name "elogind") | |
fa4b8bad | 145 | (version "219.14") |
5c91962a AW |
146 | (source (origin |
147 | (method url-fetch) | |
148 | (uri (string-append "https://wingolog.org/pub/" name "/" | |
149 | name "-" version ".tar.xz")) | |
150 | (sha256 | |
151 | (base32 | |
fa4b8bad | 152 | "1jckc4wx199n1q4r4fv43ibjs6nlq91s39w9r78ilk1z383m1hcx")) |
5c91962a AW |
153 | (modules '((guix build utils))) |
154 | (snippet | |
155 | '(begin | |
156 | (use-modules (guix build utils)) | |
157 | (substitute* "Makefile.am" | |
158 | ;; Avoid validation against DTD because the DTDs for | |
159 | ;; both doctype 4.2 and 4.5 are needed. | |
160 | (("XSLTPROC_FLAGS = ") "XSLTPROC_FLAGS = --novalid")))))) | |
161 | (build-system gnu-build-system) | |
162 | (arguments | |
163 | `(#:configure-flags | |
164 | (list (string-append "--with-libcap=" | |
165 | (assoc-ref %build-inputs "libcap")) | |
166 | (string-append "--with-udevrulesdir=" | |
167 | (assoc-ref %outputs "out") | |
c42602b5 | 168 | "/lib/udev/rules.d")) |
956ad60c | 169 | #:make-flags '("PKTTYAGENT=/run/current-system/profile/bin/pkttyagent") |
956ad60c LC |
170 | #:phases (modify-phases %standard-phases |
171 | (add-before 'build 'fix-service-file | |
172 | (lambda* (#:key outputs #:allow-other-keys) | |
173 | ;; Fix the file name of the 'elogind' binary in the D-Bus | |
174 | ;; '.service' file. | |
175 | (substitute* "src/login/org.freedesktop.login1.service" | |
176 | (("^Exec=.*") | |
177 | (string-append "Exec=" (assoc-ref %outputs "out") | |
178 | "/libexec/elogind/elogind\n")))))))) | |
5c91962a AW |
179 | (native-inputs |
180 | `(("intltool" ,intltool) | |
181 | ("gettext" ,gnu-gettext) | |
182 | ("docbook-xsl" ,docbook-xsl) | |
183 | ("docbook-xml" ,docbook-xml) | |
184 | ("xsltproc" ,libxslt) | |
185 | ("m4" ,m4) | |
186 | ("libxml2" ,libxml2) ;for XML_CATALOG_FILES | |
b3546174 | 187 | ("pkg-config" ,pkg-config) |
5c91962a AW |
188 | ("gperf" ,gperf))) |
189 | (inputs | |
190 | `(("linux-pam" ,linux-pam) | |
191 | ("linux-libre-headers" ,linux-libre-headers) | |
192 | ("libcap" ,libcap) | |
d312a832 | 193 | ("shepherd" ,shepherd) ;for 'halt' and 'reboot', invoked |
1d19bc11 | 194 | ;when pressing the power button |
5c91962a AW |
195 | ("dbus" ,dbus) |
196 | ("eudev" ,eudev))) | |
c42602b5 | 197 | (home-page "https://github.com/wingo/elogind") |
5c91962a AW |
198 | (synopsis "User, seat, and session management service") |
199 | (description "Elogind is the systemd project's \"logind\" service, | |
366553e4 RW |
200 | extracted out as a separate project. Elogind integrates with PAM to provide |
201 | the org.freedesktop.login1 interface over the system bus, allowing other parts | |
202 | of a the system to know what users are logged in, and where.") | |
5c91962a | 203 | (license license:lgpl2.1+))) |
e8444b26 RW |
204 | |
205 | (define-public python-pyxdg | |
206 | (package | |
207 | (name "python-pyxdg") | |
208 | (version "0.25") | |
209 | (source | |
210 | (origin | |
211 | (method url-fetch) | |
212 | (uri (string-append | |
213 | "https://pypi.python.org/packages/source/p/pyxdg/pyxdg-" | |
214 | version ".tar.gz")) | |
215 | (sha256 | |
216 | (base32 | |
217 | "179767h8m634ydlm4v8lnz01ba42gckfp684id764zaip7h87s41")))) | |
218 | (build-system python-build-system) | |
219 | (arguments | |
220 | '(#:phases | |
221 | (alist-replace | |
222 | 'check | |
223 | (lambda* (#:key inputs #:allow-other-keys) | |
224 | (setenv "XDG_DATA_DIRS" | |
225 | (string-append (assoc-ref inputs "shared-mime-info") | |
226 | "/share/")) | |
227 | (substitute* "test/test-icon.py" | |
228 | (("/usr/share/icons/hicolor/index.theme") | |
229 | (string-append (assoc-ref inputs "hicolor-icon-theme") | |
230 | "/share/icons/hicolor/index.theme"))) | |
231 | ||
232 | ;; One test fails with: | |
233 | ;; AssertionError: 'x-apple-ios-png' != 'png' | |
234 | (substitute* "test/test-mime.py" | |
235 | (("self.check_mimetype\\(imgpng, 'image', 'png'\\)") "#")) | |
236 | (zero? (system* "nosetests" "-v"))) | |
237 | %standard-phases))) | |
238 | (native-inputs | |
239 | `(("shared-mime-info" ,shared-mime-info) ;for tests | |
240 | ("hicolor-icon-theme" ,hicolor-icon-theme) ;for tests | |
241 | ("python-nose" ,python-nose) | |
242 | ("python-setuptools" ,python-setuptools))) | |
243 | (home-page "http://freedesktop.org/wiki/Software/pyxdg") | |
244 | (synopsis "Implementations of freedesktop.org standards in Python") | |
245 | (description | |
246 | "PyXDG is a collection of implementations of freedesktop.org standards in | |
e881752c | 247 | Python.") |
e8444b26 RW |
248 | (license license:lgpl2.0))) |
249 | ||
250 | (define-public python2-pyxdg | |
251 | (package-with-python2 python-pyxdg)) | |
6178d947 SB |
252 | |
253 | (define-public wayland | |
254 | (package | |
255 | (name "wayland") | |
9012e118 | 256 | (version "1.10.0") |
6178d947 SB |
257 | (source (origin |
258 | (method url-fetch) | |
5cc3096c | 259 | (uri (string-append "https://wayland.freedesktop.org/releases/" |
6178d947 SB |
260 | name "-" version ".tar.xz")) |
261 | (sha256 | |
262 | (base32 | |
9012e118 | 263 | "1p307ly1yyqjnzn9dbv78yffql2qszn84qk74lwanl3gma8fgxjb")))) |
6178d947 | 264 | (build-system gnu-build-system) |
9012e118 | 265 | (arguments `(#:parallel-tests? #f)) |
6178d947 SB |
266 | (native-inputs |
267 | `(("doxygen" ,doxygen) | |
55ba649d | 268 | ("graphviz" ,graphviz) |
6178d947 SB |
269 | ("pkg-config" ,pkg-config) |
270 | ("xmlto" ,xmlto) | |
271 | ("xsltproc" ,libxslt))) | |
272 | (inputs | |
273 | `(("docbook-xml" ,docbook-xml) | |
274 | ("docbook-xsl" ,docbook-xsl) | |
275 | ("expat" ,expat) | |
276 | ("libffi" ,libffi) | |
277 | ("libxml2" ,libxml2))) ; for XML_CATALOG_FILES | |
9012e118 | 278 | (home-page "https://wayland.freedesktop.org/") |
6178d947 SB |
279 | (synopsis "Display server protocol") |
280 | (description | |
281 | "Wayland is a protocol for a compositor to talk to its clients as well as | |
282 | a C library implementation of that protocol. The compositor can be a standalone | |
283 | display server running on Linux kernel modesetting and evdev input devices, an X | |
284 | application, or a wayland client itself. The clients can be traditional | |
285 | applications, X servers (rootless or fullscreen) or other display servers.") | |
286 | (license license:x11))) | |
177b4255 DH |
287 | |
288 | (define-public exempi | |
289 | (package | |
290 | (name "exempi") | |
5c6fdaa9 | 291 | (version "2.3.0") |
177b4255 DH |
292 | (source (origin |
293 | (method url-fetch) | |
294 | (uri (string-append | |
5cc3096c | 295 | "https://libopenraw.freedesktop.org/download/" |
177b4255 DH |
296 | name "-" version ".tar.bz2")) |
297 | (sha256 | |
298 | (base32 | |
5c6fdaa9 | 299 | "0jcrv3w8m415cq8xi886hcxfqbrn5dczxbzybx9bhf3dbqsyv6nq")))) |
177b4255 DH |
300 | (build-system gnu-build-system) |
301 | (arguments | |
302 | `(#:configure-flags (list (string-append "--with-boost=" | |
303 | (assoc-ref %build-inputs "boost"))))) | |
304 | (native-inputs | |
305 | `(("boost" ,boost))) ; tests | |
306 | (inputs | |
307 | `(("expat" ,expat) | |
308 | ("zlib" ,zlib))) | |
309 | (home-page "https://wiki.freedesktop.org/libopenraw/Exempi") | |
310 | (synopsis "XMP metadata handling library") | |
311 | (description "Exempi is an implementation of the Extensible Metadata | |
312 | Platform (XMP), which enables embedding metadata in PDF and image formats.") | |
313 | (license license:bsd-3))) | |
cfbbff31 SB |
314 | |
315 | (define-public libatasmart | |
316 | (package | |
317 | (name "libatasmart") | |
318 | (version "0.19") | |
319 | (source (origin | |
320 | (method url-fetch) | |
321 | (uri (string-append "http://0pointer.de/public/" | |
322 | name "-" version ".tar.xz")) | |
323 | (sha256 | |
324 | (base32 | |
325 | "138gvgdwk6h4ljrjsr09pxk1nrki4b155hqdzyr8mlk3bwsfmw31")))) | |
326 | (build-system gnu-build-system) | |
327 | (native-inputs | |
328 | `(("pkg-config" ,pkg-config))) | |
329 | (inputs | |
330 | `(("udev" ,eudev))) | |
331 | (home-page "http://0pointer.de/blog/projects/being-smart.html") | |
332 | (synopsis "ATA S.M.A.R.T. reading and parsing library") | |
333 | (description | |
334 | "This library supports a subset of the ATA S.M.A.R.T. (Self-Monitoring, | |
335 | Analysis and Reporting Technology) functionality.") | |
336 | (license license:lgpl2.1+))) | |
171ae35c SB |
337 | |
338 | (define-public udisks | |
339 | (package | |
340 | (name "udisks") | |
fc185ca6 | 341 | (version "2.1.7") |
171ae35c SB |
342 | (source (origin |
343 | (method url-fetch) | |
5cc3096c | 344 | (uri (string-append "https://udisks.freedesktop.org/releases/" |
171ae35c SB |
345 | name "-" version ".tar.bz2")) |
346 | (sha256 | |
347 | (base32 | |
fc185ca6 | 348 | "119pr2zbff8vkwlhghim7d7ir24c1dil9hp4q49wm4f6pnrjpbmb")))) |
171ae35c SB |
349 | (build-system gnu-build-system) |
350 | (native-inputs | |
351 | `(("glib:bin" ,glib "bin") ; for glib-mkenums | |
352 | ("gobject-introspection" ,gobject-introspection) | |
353 | ("intltool" ,intltool) | |
354 | ("pkg-config" ,pkg-config) | |
355 | ("xsltproc" ,libxslt))) | |
356 | (propagated-inputs | |
357 | `(("glib" ,glib))) ; required by udisks2.pc | |
358 | (inputs | |
359 | `(("acl" ,acl) | |
360 | ("libatasmart" ,libatasmart) | |
361 | ("libgudev" ,libgudev) | |
5905114a LC |
362 | ("polkit" ,polkit) |
363 | ("util-linux" ,util-linux))) | |
daa3b04c LC |
364 | (outputs '("out" |
365 | "doc")) ;5 MiB of gtk-doc HTML | |
171ae35c SB |
366 | (arguments |
367 | `(#:tests? #f ; requiring system message dbus | |
c0351459 | 368 | #:disallowed-references ("doc") ;enforce separation of "doc" |
171ae35c SB |
369 | #:configure-flags |
370 | (list "--disable-man" | |
371 | "--localstatedir=/var" | |
35263cd8 | 372 | "--enable-fhs-media" ;mount devices in /media, not /run/media |
daa3b04c LC |
373 | (string-append "--with-html-dir=" |
374 | (assoc-ref %outputs "doc") | |
375 | "/share/doc/udisks/html") | |
171ae35c SB |
376 | (string-append "--with-udevdir=" %output "/lib/udev")) |
377 | #:phases | |
378 | (modify-phases %standard-phases | |
379 | (add-before | |
380 | 'configure 'fix-girdir | |
381 | (lambda _ | |
382 | ;; Install introspection data to its own output. | |
383 | (substitute* "udisks/Makefile.in" | |
384 | (("girdir = .*") | |
385 | "girdir = $(datadir)/gir-1.0\n") | |
386 | (("typelibsdir = .*") | |
5905114a LC |
387 | "typelibsdir = $(libdir)/girepository-1.0\n")))) |
388 | (add-after 'install 'set-mount-file-name | |
389 | (lambda* (#:key outputs inputs #:allow-other-keys) | |
390 | ;; Tell 'udisksd' where to find the 'mount' command. | |
391 | (let ((out (assoc-ref outputs "out")) | |
392 | (utils (assoc-ref inputs "util-linux"))) | |
393 | (wrap-program (string-append out "/libexec/udisks2/udisksd") | |
394 | `("PATH" ":" prefix | |
395 | (,(string-append utils "/bin") ;for 'mount' | |
396 | "/run/current-system/profile/bin" | |
397 | "/run/current-system/profile/sbin"))) | |
398 | #t)))))) | |
171ae35c SB |
399 | (home-page "http://www.freedesktop.org/wiki/Software/udisks/") |
400 | (synopsis "Disk manager service") | |
401 | (description | |
402 | "UDisks provides interfaces to enumerate and perform operations on disks | |
403 | and storage devices. Any application (including unprivileged ones) can access | |
404 | the udisksd(8) daemon via the name org.freedesktop.UDisks2 on the system | |
405 | message bus.") | |
406 | ;; The dynamic library are under LGPLv2+, others are GPLv2+. | |
407 | (license (list license:gpl2+ license:lgpl2.0+)))) | |
83a2e492 SB |
408 | |
409 | (define-public accountsservice | |
410 | (package | |
411 | (name "accountsservice") | |
412 | (version "0.6.40") | |
413 | (source (origin | |
414 | (method url-fetch) | |
e1c644a0 | 415 | (uri (string-append "https://www.freedesktop.org/software/" |
83a2e492 SB |
416 | name "/" name "-" version ".tar.xz")) |
417 | (sha256 | |
418 | (base32 | |
419 | "0ayb3y3l25dmwxlh9g071h02mphjfbkvi2k5f635bayb01k7akzh")))) | |
420 | (build-system gnu-build-system) | |
421 | (arguments | |
422 | '(#:tests? #f ; XXX: tests require DocBook 4.1.2 | |
423 | #:configure-flags | |
424 | '("--localstatedir=/var") | |
425 | #:phases | |
426 | (modify-phases %standard-phases | |
427 | (add-before | |
428 | 'configure 'pre-configure | |
429 | (lambda _ | |
430 | ;; Don't try to create /var/lib/AccoutsService. | |
431 | (substitute* "src/Makefile.in" | |
432 | (("\\$\\(MKDIR_P\\).*/lib/AccountsService.*") "true"))))))) | |
433 | (native-inputs | |
434 | `(("glib:bin" ,glib "bin") ; for gdbus-codegen, etc. | |
435 | ("gobject-introspection" ,gobject-introspection) | |
436 | ("intltool" ,intltool) | |
437 | ("pkg-config" ,pkg-config))) | |
438 | (inputs | |
439 | `(("polkit" ,polkit))) | |
440 | (home-page "http://www.freedesktop.org/wiki/Software/AccountsService/") | |
441 | (synopsis "D-Bus interface for user account query and manipulation") | |
442 | (description | |
443 | "The AccountService project provides a set of D-Bus interfaces for querying | |
444 | and manipulating user account information and an implementation of these | |
445 | interfaces, based on the useradd, usermod and userdel commands.") | |
446 | (license license:gpl3+))) | |
f3ad1490 SB |
447 | |
448 | (define-public libmbim | |
449 | (package | |
450 | (name "libmbim") | |
66056126 | 451 | (version "1.12.4") |
f3ad1490 SB |
452 | (source (origin |
453 | (method url-fetch) | |
454 | (uri (string-append | |
03422bf8 | 455 | "https://www.freedesktop.org/software/" name "/" |
f3ad1490 SB |
456 | name "-" version ".tar.xz")) |
457 | (sha256 | |
458 | (base32 | |
66056126 | 459 | "0flpgzsqpjgybjkx4smbb4rjxf2w1xgd1v9gmz61rvl89qasznbv")))) |
f3ad1490 SB |
460 | (build-system gnu-build-system) |
461 | (native-inputs | |
462 | `(("glib:bin" ,glib "bin") ; for glib-mkenums | |
463 | ("pkg-config" ,pkg-config) | |
464 | ("python" ,python-wrapper))) | |
465 | (propagated-inputs | |
466 | `(("glib" ,glib))) ; required by mbim-glib.pc | |
467 | (inputs | |
468 | `(("libgudev" ,libgudev))) | |
469 | (synopsis "Library to communicate with MBIM-powered modems") | |
66056126 | 470 | (home-page "https://www.freedesktop.org/wiki/Software/libmbim/") |
f3ad1490 SB |
471 | (description |
472 | "Libmbim is a GLib-based library for talking to WWAN modems and devices | |
473 | which speak the Mobile Interface Broadband Model (MBIM) protocol.") | |
474 | (license | |
475 | ;; The libmbim-glib library is released under the LGPLv2+ license. | |
476 | ;; The mbimcli tool is released under the GPLv2+ license. | |
477 | (list license:lgpl2.0+ license:gpl2+)))) | |
5302c5ff SB |
478 | |
479 | (define-public libqmi | |
480 | (package | |
481 | (name "libqmi") | |
1fb8e074 | 482 | (version "1.14.2") |
5302c5ff SB |
483 | (source (origin |
484 | (method url-fetch) | |
485 | (uri (string-append | |
97a08595 | 486 | "https://www.freedesktop.org/software/" name "/" |
5302c5ff SB |
487 | name "-" version ".tar.xz")) |
488 | (sha256 | |
489 | (base32 | |
1fb8e074 | 490 | "0h009bzss4bal47nk21lyp4s3mmlcivhhaaj7r9229qvx85bi0v2")))) |
5302c5ff SB |
491 | (build-system gnu-build-system) |
492 | (native-inputs | |
493 | `(("glib:bin" ,glib "bin") ; for glib-mkenums | |
494 | ("pkg-config" ,pkg-config) | |
495 | ("python" ,python-wrapper))) | |
496 | (propagated-inputs | |
497 | `(("glib" ,glib))) ; required by qmi-glib.pc | |
498 | (synopsis "Library to communicate with QMI-powered modems") | |
97a08595 | 499 | (home-page "https://www.freedesktop.org/wiki/Software/libqmi/") |
5302c5ff SB |
500 | (description |
501 | "Libqmi is a GLib-based library for talking to WWAN modems and devices | |
502 | which speak the Qualcomm MSM Interface (QMI) protocol.") | |
503 | (license | |
504 | ;; The libqmi-glib library is released under the LGPLv2+ license. | |
505 | ;; The qmicli tool is released under the GPLv2+ license. | |
506 | (list license:lgpl2.0+ license:gpl2+)))) | |
1509a1dc SB |
507 | |
508 | (define-public modem-manager | |
509 | (package | |
510 | (name "modem-manager") | |
473dbe9b | 511 | (version "1.4.14") |
1509a1dc SB |
512 | (source (origin |
513 | (method url-fetch) | |
514 | (uri (string-append | |
e9f68a64 | 515 | "https://www.freedesktop.org/software/ModemManager/" |
1509a1dc SB |
516 | "ModemManager-" version ".tar.xz")) |
517 | (sha256 | |
518 | (base32 | |
473dbe9b | 519 | "18hvffwcncwz14kdzk42jbkh362n0kjv3kgx7axbqx572pawvrmb")))) |
1509a1dc SB |
520 | (build-system gnu-build-system) |
521 | (arguments | |
522 | '(#:configure-flags | |
523 | `(,(string-append "--with-udev-base-dir=" %output "/lib/udev")))) | |
524 | (native-inputs | |
525 | `(("glib:bin" ,glib "bin") ; for glib-mkenums | |
526 | ("gobject-introspection" ,gobject-introspection) | |
527 | ("intltool" ,intltool) | |
528 | ("pkg-config" ,pkg-config) | |
529 | ("vala" ,vala) | |
530 | ;; For testing. | |
531 | ("dbus" ,dbus))) | |
532 | (propagated-inputs | |
533 | `(("glib" ,glib))) ; required by mm-glib.pc | |
534 | (inputs | |
535 | `(("libgudev" ,libgudev) | |
536 | ("libmbim" ,libmbim) | |
537 | ("libqmi" ,libqmi) | |
538 | ("polkit" ,polkit))) | |
539 | (synopsis "Mobile broadband modems manager") | |
540 | (home-page "http://www.freedesktop.org/wiki/Software/ModemManager/") | |
541 | (description | |
542 | "ModemManager is a DBus-activated daemon which controls mobile | |
543 | broadband (2G/3G/4G) devices and connections. Whether built-in devices, USB | |
544 | dongles, bluetooth-paired telephones, or professional RS232/USB devices with | |
545 | external power supplies, ModemManager is able to prepare and configure the | |
546 | modems and setup connections with them.") | |
547 | (license license:gpl2+))) | |
6976e7d2 SB |
548 | |
549 | (define-public telepathy-logger | |
550 | (package | |
551 | (name "telepathy-logger") | |
552 | (version "0.8.2") | |
553 | (source (origin | |
554 | (method url-fetch) | |
5cc3096c | 555 | (uri (string-append "https://telepathy.freedesktop.org/releases/" |
6976e7d2 SB |
556 | name "/" name "-" version ".tar.bz2")) |
557 | (sha256 | |
558 | (base32 | |
559 | "1bjx85k7jyfi5pvl765fzc7q2iz9va51anrc2djv7caksqsdbjlg")))) | |
560 | (build-system gnu-build-system) | |
561 | (arguments | |
8758efe0 LF |
562 | '(#:parallel-tests? #f |
563 | #:phases | |
6976e7d2 SB |
564 | (modify-phases %standard-phases |
565 | (add-before 'check 'pre-check | |
566 | (lambda _ | |
567 | (setenv "HOME" (getenv "TMPDIR")) | |
568 | #t))))) | |
569 | (native-inputs | |
570 | `(("glib:bin" ,glib "bin") ; for glib-genmarshal, etc. | |
571 | ("gobject-introspection" ,gobject-introspection) | |
572 | ("intltool" ,intltool) | |
573 | ("pkg-config" ,pkg-config) | |
574 | ("python" ,python-2) | |
575 | ("xsltproc" ,libxslt))) | |
576 | (propagated-inputs | |
577 | ;; telepathy-logger-0.2.pc refers to all these. | |
578 | `(("libxml2" ,libxml2) | |
579 | ("sqlite" ,sqlite) | |
580 | ("telepathy-glib" ,telepathy-glib))) | |
581 | (synopsis "Telepathy logger library") | |
582 | (home-page "http://telepathy.freedesktop.org/") | |
583 | (description | |
584 | "Telepathy logger is a headless observer client that logs information | |
585 | received by the Telepathy framework. It features pluggable backends to log | |
586 | different sorts of messages in different formats.") | |
587 | (license license:lgpl2.1+))) | |
e6823279 SB |
588 | |
589 | (define-public colord-gtk | |
590 | (package | |
591 | (name "colord-gtk") | |
592 | (version "0.1.26") | |
593 | (source (origin | |
594 | (method url-fetch) | |
5cc3096c | 595 | (uri (string-append "https://www.freedesktop.org/software/colord" |
e6823279 SB |
596 | "/releases/" name "-" version ".tar.xz")) |
597 | (sha256 | |
598 | (base32 | |
599 | "0i9y3bb5apj6a0f8cx36l6mjzs7xc0k7nf0magmf58vy2mzhpl18")))) | |
600 | (build-system gnu-build-system) | |
601 | (arguments '(#:tests? #f)) ; require the colord system service | |
602 | (native-inputs | |
603 | `(("gobject-introspection" ,gobject-introspection) | |
604 | ("intltool" ,intltool) | |
605 | ("pkg-config" ,pkg-config) | |
606 | ("vala" ,vala))) | |
607 | (propagated-inputs | |
608 | ;; colord-gtk.pc refers to all these. | |
609 | `(("colord" ,colord) | |
610 | ("gtk+" ,gtk+))) | |
611 | (synopsis "GTK integration for libcolord") | |
612 | (home-page "http://www.freedesktop.org/software/colord/") | |
613 | (description | |
614 | "This is a GTK+ convenience library for interacting with colord. It is | |
615 | useful for both applications which need colour management and applications that | |
616 | wish to perform colour calibration.") | |
617 | (license license:lgpl2.1+))) |