Commit | Line | Data |
---|---|---|
9478c9d8 EF |
1 | ;;; GNU Guix --- Functional package management for GNU |
2 | ;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il> | |
5819431c | 3 | ;;; Copyright © 2017 Mathieu OTHACEHE <m.othacehe@gmail.com> |
261f5691 | 4 | ;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org> |
9478c9d8 EF |
5 | ;;; |
6 | ;;; This file is part of GNU Guix. | |
7 | ;;; | |
8 | ;;; GNU Guix is free software; you can redistribute it and/or modify it | |
9 | ;;; under the terms of the GNU General Public License as published by | |
10 | ;;; the Free Software Foundation; either version 3 of the License, or (at | |
11 | ;;; your option) any later version. | |
12 | ;;; | |
13 | ;;; GNU Guix is distributed in the hope that it will be useful, but | |
14 | ;;; WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 | ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 | ;;; GNU General Public License for more details. | |
17 | ;;; | |
18 | ;;; You should have received a copy of the GNU General Public License | |
19 | ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. | |
20 | ||
21 | (define-module (gnu packages connman) | |
22 | #:use-module (guix packages) | |
23 | #:use-module (guix download) | |
24 | #:use-module (guix build-system gnu) | |
25 | #:use-module (guix licenses) | |
26 | #:use-module (guix utils) | |
27 | #:use-module (gnu packages) | |
28 | #:use-module (gnu packages admin) | |
8c158517 | 29 | #:use-module (gnu packages enlightenment) |
9478c9d8 EF |
30 | #:use-module (gnu packages glib) |
31 | #:use-module (gnu packages linux) | |
32 | #:use-module (gnu packages pkg-config) | |
125e3cde | 33 | #:use-module (gnu packages polkit) |
9478c9d8 | 34 | #:use-module (gnu packages python) |
5819431c | 35 | #:use-module (gnu packages qt) |
9478c9d8 EF |
36 | #:use-module (gnu packages readline) |
37 | #:use-module (gnu packages samba) | |
38 | #:use-module (gnu packages tls) | |
39 | #:use-module (gnu packages vpn)) | |
40 | ||
41 | (define-public connman | |
42 | (package | |
43 | (name "connman") | |
dd3f8fe6 | 44 | (version "1.33") |
9478c9d8 EF |
45 | (source |
46 | (origin | |
47 | (method url-fetch) | |
f2bca8db | 48 | (uri (string-append "mirror://kernel.org/linux/network/connman/" |
9478c9d8 EF |
49 | name "-" version ".tar.xz")) |
50 | (sha256 | |
51 | (base32 | |
dd3f8fe6 | 52 | "187mknq2i907gf8dz0i79359gn1qc9mryvqkcgb280d7dw1ld2dw")))) |
9478c9d8 EF |
53 | (build-system gnu-build-system) |
54 | (arguments | |
55 | `(#:configure-flags | |
56 | (list "--enable-nmcompat" | |
125e3cde | 57 | "--enable-polkit" |
9478c9d8 EF |
58 | "--enable-openconnect" |
59 | "--enable-openvpn" | |
60 | "--enable-vpnc" | |
61 | "--enable-pptp" | |
62 | "--enable-l2tp" | |
028bf3c0 TČ |
63 | ;; location for daemon state files and internal configuration |
64 | ;; needs to be writeable | |
65 | "--localstatedir=/var" | |
9478c9d8 EF |
66 | (string-append |
67 | "--with-dbusconfdir=" (assoc-ref %outputs "out") "/etc") | |
68 | (string-append | |
69 | "--with-dbusdatadir=" (assoc-ref %outputs "out") "/share")))) | |
70 | (native-inputs | |
71 | `(("pkg-config", pkg-config) | |
72 | ("python" ,python-2))) | |
73 | (inputs | |
74 | `(("dbus" ,dbus) | |
75 | ("glib" ,glib) | |
76 | ("gnutls" ,gnutls) | |
77 | ("iptables" ,iptables) | |
125e3cde | 78 | ("polkit" ,polkit) ;so connman can be used by unprivileged users |
9478c9d8 EF |
79 | ("readline" ,readline) |
80 | ;; These inputs are needed for connman to include the interface to | |
81 | ;; these technologies so IF they are installed they can be used. | |
82 | ;; TODO: add neard, ofono | |
83 | ("openconnect" ,openconnect) | |
84 | ("openvpn" ,openvpn) | |
85 | ("ppp", ppp) | |
86 | ("vpnc" ,vpnc) | |
87 | ("wpa-supplicant" ,wpa-supplicant))) | |
88 | (home-page "https://01.org/connman") | |
89 | (synopsis "Connection management daemon") | |
90 | (description "Connman provides a daemon for managing Internet connections. | |
91 | The Connection Manager is designed to be slim and to use as few resources as | |
92 | possible. It is fully modular system that can be extended through plug-ins. | |
93 | The plug-in approach allows for easy adaption and modification for various use | |
94 | cases. Connman implements DNS resolving and caching, DHCP clients for both | |
95 | IPv4 and IPv6, link-local IPv4 address handling and tethering (IP connection | |
96 | sharing) to clients via USB, ethernet, WiFi, cellular and Bluetooth.") | |
97 | (license gpl2))) | |
8c158517 EF |
98 | |
99 | (define-public econnman | |
100 | (package | |
101 | (name "econnman") | |
102 | (version "1.1") | |
103 | (source | |
104 | (origin | |
105 | (method url-fetch) | |
106 | (uri (string-append "https://download.enlightenment.org/rel/apps/" | |
107 | "econnman/econnman-" version ".tar.gz")) | |
108 | (sha256 | |
109 | (base32 | |
110 | "057pwwavlvrrq26bncqnfrf449zzaim0zq717xv86av4n940gwv0")))) | |
111 | (build-system gnu-build-system) | |
112 | (arguments | |
113 | `(#:configure-flags '("--localstatedir=/var") | |
114 | #:phases | |
115 | (modify-phases %standard-phases | |
116 | (add-after 'install 'wrap-binary | |
117 | (lambda* (#:key outputs #:allow-other-keys) | |
118 | (let* ((out (assoc-ref outputs "out")) | |
119 | (bin (string-append out "/bin/econnman-bin"))) | |
120 | (wrap-program bin | |
121 | `("PYTHONPATH" ":" prefix (,(getenv "PYTHONPATH")))) | |
122 | #t)))))) | |
123 | (native-inputs `(("pkg-config" ,pkg-config))) | |
124 | (inputs | |
125 | `(("efl" ,efl) | |
126 | ("python-2" ,python-2) | |
261f5691 | 127 | ("python2-dbus" ,python2-dbus) |
8c158517 EF |
128 | ("python2-efl" ,python2-efl))) |
129 | (home-page "https://www.enlightenment.org") | |
130 | (synopsis "Connman User Interface written using the EFL") | |
131 | (description | |
132 | "An EFL user interface for the @code{connman} connection manager.") | |
133 | (license lgpl3))) | |
5819431c MO |
134 | |
135 | (define-public cmst | |
136 | (package | |
137 | (name "cmst") | |
138 | (version "2016.10.03") | |
139 | (source | |
140 | (origin | |
141 | (method url-fetch) | |
142 | (uri (string-append | |
143 | "https://github.com/andrew-bibb/cmst/releases/download/cmst-" | |
144 | version "/cmst-" version ".tar.gz")) | |
145 | (sha256 | |
146 | (base32 "1xpn4sqnxzpsjjwh9hva9sn55xlryiz2f2mwpyj2l31janj7a082")))) | |
147 | (inputs | |
148 | `(("qt" ,qt))) | |
149 | (native-inputs | |
150 | `(("qmake" ,qt))) | |
151 | (build-system gnu-build-system) | |
152 | (arguments | |
153 | '(#:phases | |
154 | (modify-phases %standard-phases | |
155 | (replace 'configure | |
156 | (lambda* (#:key outputs #:allow-other-keys) | |
157 | (zero? | |
158 | (system* "qmake" | |
159 | (string-append "PREFIX=" | |
160 | (assoc-ref outputs "out")))))) | |
161 | (add-before 'install 'fix-Makefiles | |
162 | (lambda* (#:key inputs outputs #:allow-other-keys) | |
163 | (let ((out (assoc-ref outputs "out"))) | |
164 | (substitute* (find-files "." "Makefile") | |
165 | (("INSTALL_ROOT)") | |
166 | (string-append "INSTALL_ROOT)" out)) | |
167 | (("/usr/bin") "/bin")))))))) | |
168 | (home-page "https://github.com/andrew-bibb/cmst") | |
169 | (synopsis "Qt frontend for Connman") | |
170 | (description | |
171 | "Cmst is a Qt based frontend for the @code{connman} connection manager. | |
172 | This package also provides a systemtray icon.") | |
173 | (license x11))) |