Commit | Line | Data |
---|---|---|
a40f1543 | 1 | ;;; GNU Guix --- Functional package management for GNU |
602db62c | 2 | ;;; Copyright © 2013, 2015, 2017 Ludovic Courtès <ludo@gnu.org> |
baece08a | 3 | ;;; Copyright © 2015 Mark H Weaver <mhw@netris.org> |
d177ac2d | 4 | ;;; Copyright © 2016, 2017, 2019 Efraim Flashner <efraim@flashner.co.il> |
c4514744 | 5 | ;;; Copyright © 2016 Adonay "adfeno" Felipe Nogueira <https://libreplanet.org/wiki/User:Adfeno> <adfeno@openmailbox.org> |
b4dcfce5 | 6 | ;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be> |
dfe5beb2 | 7 | ;;; Copyright © 2017, 2018, 2020 Marius Bakke <mbakke@fastmail.com> |
62881ad6 | 8 | ;;; Copyright © 2018, 2019, 2020 Tobias Geerinckx-Rice <me@tobias.gr> |
2b61cd37 | 9 | ;;; Copyright © 2018 Ricardo Wurmus <rekado@elephly.net> |
bcf66fc2 | 10 | ;;; Copyright © 2019 Rutger Helling <rhelling@mykolab.com> |
a2b25890 | 11 | ;;; Copyright © 2020 Pierre Langlois <pierre.langlois@gmx.com> |
a40f1543 LC |
12 | ;;; |
13 | ;;; This file is part of GNU Guix. | |
14 | ;;; | |
15 | ;;; GNU Guix is free software; you can redistribute it and/or modify it | |
16 | ;;; under the terms of the GNU General Public License as published by | |
17 | ;;; the Free Software Foundation; either version 3 of the License, or (at | |
18 | ;;; your option) any later version. | |
19 | ;;; | |
20 | ;;; GNU Guix is distributed in the hope that it will be useful, but | |
21 | ;;; WITHOUT ANY WARRANTY; without even the implied warranty of | |
22 | ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
23 | ;;; GNU General Public License for more details. | |
24 | ;;; | |
25 | ;;; You should have received a copy of the GNU General Public License | |
26 | ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. | |
27 | ||
28 | (define-module (gnu packages samba) | |
29 | #:use-module (guix packages) | |
30 | #:use-module (guix download) | |
d177ac2d | 31 | #:use-module (guix git-download) |
a40f1543 LC |
32 | #:use-module (guix build-system gnu) |
33 | #:use-module (guix licenses) | |
602db62c | 34 | #:use-module (guix utils) |
d3456739 | 35 | #:use-module (gnu packages) |
a40f1543 | 36 | #:use-module (gnu packages acl) |
ae916e02 | 37 | #:use-module (gnu packages admin) |
b4dcfce5 | 38 | #:use-module (gnu packages autotools) |
44eff75e | 39 | #:use-module (gnu packages backup) |
966c56f8 | 40 | #:use-module (gnu packages base) |
fbed1501 | 41 | #:use-module (gnu packages check) |
b4dcfce5 | 42 | #:use-module (gnu packages crypto) |
710964d1 | 43 | #:use-module (gnu packages cups) |
52513595 | 44 | #:use-module (gnu packages databases) |
cb1e0cfc | 45 | #:use-module (gnu packages docbook) |
44eff75e | 46 | #:use-module (gnu packages gnupg) |
b4dcfce5 | 47 | #:use-module (gnu packages kerberos) |
a40f1543 | 48 | #:use-module (gnu packages linux) |
2f15e0a1 | 49 | #:use-module (gnu packages onc-rpc) |
17074cae | 50 | #:use-module (gnu packages openldap) |
a40f1543 | 51 | #:use-module (gnu packages perl) |
17074cae MB |
52 | #:use-module (gnu packages pkg-config) |
53 | #:use-module (gnu packages popt) | |
cb1e0cfc | 54 | #:use-module (gnu packages python) |
17074cae | 55 | #:use-module (gnu packages readline) |
2760d104 | 56 | #:use-module (gnu packages time) |
17074cae | 57 | #:use-module (gnu packages tls) |
44eff75e | 58 | #:use-module (gnu packages web) |
cb1e0cfc | 59 | #:use-module (gnu packages xml)) |
a40f1543 | 60 | |
b4dcfce5 TD |
61 | (define-public cifs-utils |
62 | (package | |
63 | (name "cifs-utils") | |
b1e5eb31 | 64 | (version "6.11") |
b4dcfce5 TD |
65 | (source |
66 | (origin | |
67 | (method url-fetch) | |
68 | (uri (string-append "https://download.samba.org/pub/linux-cifs/" | |
1a0a4a69 | 69 | "cifs-utils/cifs-utils-" version ".tar.bz2")) |
b4dcfce5 | 70 | (sha256 (base32 |
b1e5eb31 | 71 | "1n98hy3zi4klm1xxhb840br1x7hhz0xx8kp5sch84kr07yd26ndq")))) |
b4dcfce5 TD |
72 | (build-system gnu-build-system) |
73 | (native-inputs | |
74 | `(("autoconf" ,autoconf) | |
75 | ("automake" ,automake) | |
76 | ("pkg-config" ,pkg-config))) | |
77 | (inputs | |
78 | `(("keytuils" ,keyutils) | |
79 | ("linux-pam" ,linux-pam) | |
80 | ("libcap-ng" ,libcap-ng) | |
81 | ("mit-krb5" ,mit-krb5) | |
82 | ("samba" ,samba) | |
83 | ("talloc" ,talloc))) | |
84 | (arguments | |
85 | `(#:phases | |
86 | (modify-phases %standard-phases | |
b0a46bcc TGR |
87 | (replace 'bootstrap |
88 | ;; Force a bootstrap to fix a ‘cannot find install-sh, install.sh, | |
89 | ;; or shtool’ error since version 6.10. | |
90 | (lambda _ | |
91 | (invoke "autoreconf" "-vfi") | |
92 | #t)) | |
b4dcfce5 | 93 | (add-before 'configure 'set-root-sbin |
7927a0d9 | 94 | (lambda* (#:key outputs #:allow-other-keys) |
89ab360e | 95 | ;; Don't try to install into "/sbin". |
b4dcfce5 | 96 | (setenv "ROOTSBINDIR" |
7927a0d9 | 97 | (string-append (assoc-ref outputs "out") "/sbin")) |
b0a46bcc TGR |
98 | #t)) |
99 | (add-before 'install 'create-man8dir | |
100 | ;; Create a directory that isn't created since version 6.10. | |
101 | (lambda* (#:key outputs #:allow-other-keys) | |
102 | (let ((out (assoc-ref outputs "out"))) | |
103 | (mkdir-p (string-append out "/share/man/man8")) | |
104 | #t)))))) | |
b4dcfce5 TD |
105 | (synopsis "User-space utilities for Linux CIFS (Samba) mounts") |
106 | (description "@code{cifs-utils} is a set of user-space utilities for | |
107 | mounting and managing @dfn{Common Internet File System} (CIFS) shares using | |
108 | the Linux kernel CIFS client.") | |
109 | (home-page "https://wiki.samba.org/index.php/LinuxCIFS_utils") | |
110 | ;; cifs-utils is licensed as GPL3 or later, but 3 files contain LGPL code. | |
111 | (license gpl3+))) | |
112 | ||
a40f1543 LC |
113 | (define-public iniparser |
114 | (package | |
115 | (name "iniparser") | |
a9691718 | 116 | (version "4.1") |
a40f1543 | 117 | (source (origin |
d177ac2d EF |
118 | (method git-fetch) |
119 | (uri (git-reference | |
120 | (url "https://github.com/ndevilla/iniparser") | |
121 | (commit (string-append "v" version)))) | |
122 | (file-name (git-file-name name version)) | |
a40f1543 LC |
123 | (sha256 |
124 | (base32 | |
d177ac2d | 125 | "0dhab6pad6wh816lr7r3jb6z273njlgw2vpw8kcfnmi7ijaqhnr5")))) |
a40f1543 LC |
126 | (build-system gnu-build-system) |
127 | (arguments | |
cf52c925 | 128 | `(#:make-flags |
ebde5cfd | 129 | (list ,(string-append "CC=" (cc-for-target))) |
cf52c925 | 130 | #:phases |
2af56bfa EF |
131 | (modify-phases %standard-phases |
132 | (replace 'configure | |
133 | (lambda* (#:key outputs #:allow-other-keys) | |
134 | (substitute* '("Makefile" "test/Makefile") | |
135 | (("/usr/lib") | |
444173f2 MW |
136 | (string-append (assoc-ref outputs "out") "/lib"))) |
137 | #t)) | |
2af56bfa | 138 | (replace 'build |
cf52c925 | 139 | (lambda* (#:key make-flags #:allow-other-keys) |
a9691718 | 140 | (apply invoke "make" "libiniparser.so.1" |
cf52c925 | 141 | make-flags))) |
2af56bfa EF |
142 | (replace 'install |
143 | (lambda* (#:key outputs #:allow-other-keys) | |
144 | (let* ((out (assoc-ref outputs "out")) | |
145 | (lib (string-append out "/lib")) | |
146 | (inc (string-append out "/include")) | |
33fa13ea | 147 | (doc (string-append out "/share/doc/" ,name)) |
2af56bfa | 148 | (html (string-append doc "/html"))) |
fa5e6618 | 149 | (define (install dir) |
2af56bfa | 150 | (lambda (file) |
fa5e6618 TGR |
151 | (install-file file dir))) |
152 | (for-each (install lib) | |
153 | (find-files "." "^lib.*\\.so")) | |
2af56bfa | 154 | (with-directory-excursion lib |
a9691718 | 155 | (symlink "libiniparser.so.1" "libiniparser.so")) |
fa5e6618 | 156 | (for-each (install inc) |
2af56bfa | 157 | (find-files "src" "\\.h$")) |
fa5e6618 | 158 | (for-each (install html) |
2af56bfa | 159 | (find-files "html" ".*")) |
fa5e6618 | 160 | (for-each (install doc) |
444173f2 MW |
161 | '("AUTHORS" "INSTALL" "LICENSE" "README.md")) |
162 | #t)))))) | |
a9691718 | 163 | (home-page "https://github.com/ndevilla/iniparser") |
ae05ac8f | 164 | (synopsis "Simple @file{.ini} configuration file parsing library") |
a40f1543 | 165 | (description |
ae05ac8f TGR |
166 | "The iniParser C library reads and writes Windows-style @file{.ini} |
167 | configuration files. These are simple text files with a basic structure | |
168 | composed of sections, properties, and values. While not expressive, they | |
169 | are easy to read, write, and modify. | |
170 | ||
171 | The library is small, thread safe, and written in portable ANSI C with no | |
172 | external dependencies.") | |
a40f1543 LC |
173 | (license x11))) |
174 | ||
175 | (define-public samba | |
176 | (package | |
177 | (name "samba") | |
a2b25890 | 178 | (version "4.12.7") |
2f26e2d6 TGR |
179 | (source |
180 | (origin | |
181 | (method url-fetch) | |
182 | (uri (string-append "https://download.samba.org/pub/samba/stable/" | |
183 | "samba-" version ".tar.gz")) | |
184 | (sha256 | |
a2b25890 | 185 | (base32 "1lkgih0vrarf5zy6chspkwarqdylzwr63nxr3qjkpazrs86nlm9h")) |
d3456739 | 186 | (patches (search-patches "samba-fix-fcntl-hint-detection.patch")) |
2f26e2d6 | 187 | (modules '((guix build utils))) |
2760d104 TGR |
188 | (snippet |
189 | '(begin | |
190 | ;; TODO: also remove the bundled ‘third_party/popt’. | |
191 | (delete-file-recursively "third_party/pyiso8601") | |
192 | #t)))) | |
a40f1543 LC |
193 | (build-system gnu-build-system) |
194 | (arguments | |
cb1e0cfc | 195 | `(#:phases |
710964d1 | 196 | (modify-phases %standard-phases |
cb1e0cfc MB |
197 | (add-before 'configure 'locate-docbook-stylesheets |
198 | (lambda* (#:key inputs #:allow-other-keys) | |
199 | ;; XXX for some reason XML_CATALOG_FILES is not respected. | |
200 | (substitute* '("buildtools/wafsamba/samba_conftests.py" | |
201 | "buildtools/wafsamba/wafsamba.py" | |
202 | "docs-xml/xslt/man.xsl") | |
203 | (("http://docbook.sourceforge.net/release/xsl/current/") | |
204 | (string-append (assoc-ref inputs "docbook-xsl") | |
205 | "/xml/xsl/docbook-xsl-" | |
206 | ,(package-version docbook-xsl) "/"))) | |
207 | #t)) | |
710964d1 SB |
208 | (replace 'configure |
209 | ;; samba uses a custom configuration script that runs waf. | |
210 | (lambda* (#:key outputs #:allow-other-keys) | |
211 | (let* ((out (assoc-ref outputs "out")) | |
212 | (libdir (string-append out "/lib"))) | |
6ac59f45 | 213 | (invoke "./configure" |
710964d1 SB |
214 | "--enable-fhs" |
215 | ;; XXX: heimdal not packaged. | |
216 | "--bundled-libraries=com_err" | |
217 | (string-append "--prefix=" out) | |
c8c14704 | 218 | "--sysconfdir=/etc" |
710964d1 SB |
219 | ;; Install public and private libraries into |
220 | ;; a single directory to avoid RPATH issues. | |
221 | (string-append "--libdir=" libdir) | |
6ac59f45 | 222 | (string-append "--with-privatelibdir=" libdir))))) |
c8c14704 | 223 | (add-before 'install 'disable-etc-samba-directory-creation |
c4514744 AFN |
224 | (lambda _ |
225 | (substitute* "dynconfig/wscript" | |
2ea806f0 MB |
226 | (("bld\\.INSTALL_DIR\\(\"\\$\\{CONFIGDIR\\}\"\\)") |
227 | "")) | |
c8c14704 | 228 | #t))) |
a40f1543 LC |
229 | ;; XXX: The test infrastructure attempts to set password with |
230 | ;; smbpasswd, which fails with "smbpasswd -L can only be used by root." | |
231 | ;; So disable tests until there's a workaround. | |
232 | #:tests? #f)) | |
233 | (inputs ; TODO: Add missing dependencies | |
710964d1 SB |
234 | `(("acl" ,acl) |
235 | ("cups" ,cups) | |
a40f1543 | 236 | ;; ("gamin" ,gamin) |
44eff75e | 237 | ("gpgme" ,gpgme) |
710964d1 | 238 | ("gnutls" ,gnutls) |
44eff75e | 239 | ("jansson" ,jansson) |
44eff75e | 240 | ("libarchive" ,libarchive) |
a40f1543 | 241 | ("linux-pam" ,linux-pam) |
44eff75e | 242 | ("lmdb" ,lmdb) |
710964d1 | 243 | ("openldap" ,openldap) |
2760d104 TGR |
244 | ("perl" ,perl) |
245 | ("python" ,python) | |
710964d1 | 246 | ("popt" ,popt) |
3665b4dc | 247 | ("readline" ,readline) |
710964d1 | 248 | ("tdb" ,tdb))) |
470771c5 MB |
249 | (propagated-inputs |
250 | ;; In Requires or Requires.private of pkg-config files. | |
251 | `(("ldb" ,ldb) | |
252 | ("talloc" ,talloc) | |
253 | ("tevent" ,tevent))) | |
710964d1 | 254 | (native-inputs |
2760d104 | 255 | `(("perl-parse-yapp" ,perl-parse-yapp) |
710964d1 | 256 | ("pkg-config" ,pkg-config) |
2760d104 TGR |
257 | ("python-iso8601" ,python-iso8601) |
258 | ("rpcsvc-proto" ,rpcsvc-proto) ; for 'rpcgen' | |
259 | ||
260 | ;; For generating man pages. | |
261 | ("docbook-xml" ,docbook-xml-4.2) | |
262 | ("docbook-xsl" ,docbook-xsl) | |
263 | ("xsltproc" ,libxslt))) | |
8b21d22d | 264 | (home-page "https://www.samba.org/") |
a40f1543 LC |
265 | (synopsis |
266 | "The standard Windows interoperability suite of programs for GNU and Unix") | |
267 | (description | |
268 | "Since 1992, Samba has provided secure, stable and fast file and print | |
269 | services for all clients using the SMB/CIFS protocol, such as all versions of | |
270 | DOS and Windows, OS/2, GNU/Linux and many others. | |
271 | ||
272 | Samba is an important component to seamlessly integrate Linux/Unix Servers and | |
273 | Desktops into Active Directory environments using the winbind daemon.") | |
274 | (license gpl3+))) | |
1790739c DT |
275 | |
276 | (define-public talloc | |
277 | (package | |
278 | (name "talloc") | |
e2263e31 | 279 | (version "2.3.1") |
1790739c DT |
280 | (source (origin |
281 | (method url-fetch) | |
01e64ef5 | 282 | (uri (string-append "https://www.samba.org/ftp/talloc/talloc-" |
1790739c DT |
283 | version ".tar.gz")) |
284 | (sha256 | |
285 | (base32 | |
e2263e31 | 286 | "0xwzgzrqamfdlklwacp9d219pqkah0yfrhxb1j7bxlmgzp924j7g")))) |
1790739c DT |
287 | (build-system gnu-build-system) |
288 | (arguments | |
960ae0cd SB |
289 | '(#:phases |
290 | (modify-phases %standard-phases | |
291 | (replace 'configure | |
292 | (lambda* (#:key outputs #:allow-other-keys) | |
adbfc6b9 TGR |
293 | ;; talloc uses a custom configuration script that runs a Python |
294 | ;; script called 'waf', and doesn't tolerate unknown options. | |
960ae0cd SB |
295 | (setenv "CONFIG_SHELL" (which "sh")) |
296 | (let ((out (assoc-ref outputs "out"))) | |
adbfc6b9 TGR |
297 | (invoke "./configure" |
298 | (string-append "--prefix=" out)))))))) | |
966c56f8 MB |
299 | (native-inputs |
300 | `(("which" ,which))) | |
1790739c | 301 | (inputs |
966c56f8 | 302 | `(("python" ,python))) |
2e200ee8 | 303 | (home-page "https://talloc.samba.org") |
1790739c DT |
304 | (synopsis "Hierarchical, reference counted memory pool system") |
305 | (description | |
306 | "Talloc is a hierarchical, reference counted memory pool system with | |
307 | destructors. It is the core memory allocator used in Samba.") | |
308 | (license gpl3+))) ;; The bundled "replace" library uses LGPL3. | |
ae916e02 | 309 | |
602db62c LC |
310 | (define-public talloc/static |
311 | (package | |
312 | (inherit talloc) | |
313 | (name "talloc-static") | |
314 | (synopsis | |
315 | "Hierarchical, reference counted memory pool system (static library)") | |
316 | (arguments | |
317 | (substitute-keyword-arguments (package-arguments talloc) | |
318 | ((#:phases phases) | |
319 | ;; Since Waf, the build system talloc uses, apparently does not | |
320 | ;; support building static libraries from a ./configure flag, roll our | |
321 | ;; own build process. No need to be ashamed, we're not the only ones | |
322 | ;; doing that: | |
323 | ;; <https://github.com/proot-me/proot-static-build/blob/master/GNUmakefile>. | |
324 | ;; :-) | |
325 | `(modify-phases ,phases | |
326 | (replace 'build | |
327 | (lambda _ | |
d83c52c6 | 328 | (invoke "gcc" "-c" "-Ibin/default" "-I" "lib/replace" |
966c56f8 MB |
329 | "-I." "-Wall" "-g" "-D__STDC_WANT_LIB_EXT1__=1" |
330 | "talloc.c") | |
d83c52c6 | 331 | (invoke "ar" "rc" "libtalloc.a" "talloc.o"))) |
602db62c LC |
332 | (replace 'install |
333 | (lambda* (#:key outputs #:allow-other-keys) | |
334 | (let* ((out (assoc-ref outputs "out")) | |
335 | (lib (string-append out "/lib")) | |
336 | (include (string-append out "/include"))) | |
337 | (mkdir-p lib) | |
338 | (install-file "libtalloc.a" lib) | |
339 | (install-file "talloc.h" include) | |
340 | #t))) | |
341 | (delete 'check))))))) ;XXX: tests rely on Python modules | |
342 | ||
0674b3c9 SB |
343 | (define-public tevent |
344 | (package | |
345 | (name "tevent") | |
293454f2 | 346 | (version "0.10.2") |
0674b3c9 SB |
347 | (source (origin |
348 | (method url-fetch) | |
349 | (uri (string-append "https://www.samba.org/ftp/tevent/tevent-" | |
350 | version ".tar.gz")) | |
351 | (sha256 | |
352 | (base32 | |
293454f2 | 353 | "15k6i8ad5lpxfjsjyq9h64zlyws8d3cm0vwdnaw8z1xjwli7hhpq")))) |
0674b3c9 SB |
354 | (build-system gnu-build-system) |
355 | (arguments | |
356 | '(#:phases | |
357 | (modify-phases %standard-phases | |
358 | (replace 'configure | |
359 | ;; tevent uses a custom configuration script that runs waf. | |
360 | (lambda* (#:key outputs #:allow-other-keys) | |
361 | (let ((out (assoc-ref outputs "out"))) | |
ed0d6ed9 RW |
362 | (invoke "./configure" |
363 | (string-append "--prefix=" out) | |
364 | "--bundled-libraries=NONE"))))))) | |
0674b3c9 SB |
365 | (native-inputs |
366 | `(("pkg-config" ,pkg-config) | |
1ca20daa MB |
367 | ("python" ,python) |
368 | ("which" ,which))) | |
0674b3c9 SB |
369 | (propagated-inputs |
370 | `(("talloc" ,talloc))) ; required by tevent.pc | |
371 | (synopsis "Event system library") | |
372 | (home-page "https://tevent.samba.org/") | |
373 | (description | |
374 | "Tevent is an event system based on the talloc memory management library. | |
375 | It is the core event system used in Samba. The low level tevent has support for | |
376 | many event types, including timers, signals, and the classic file descriptor events.") | |
377 | (license lgpl3+))) | |
378 | ||
52513595 SB |
379 | (define-public ldb |
380 | (package | |
381 | (name "ldb") | |
7152a714 | 382 | (version "1.5.6") |
52513595 SB |
383 | (source (origin |
384 | (method url-fetch) | |
385 | (uri (string-append "https://www.samba.org/ftp/ldb/ldb-" | |
386 | version ".tar.gz")) | |
387 | (sha256 | |
388 | (base32 | |
7152a714 | 389 | "0nwpkqidsna4yz3vhjzzadm4hpviwnyk80yml8ay82gi1d6lg0pz")) |
21a21c20 MB |
390 | (modules '((guix build utils))) |
391 | (snippet | |
392 | '(begin | |
393 | (for-each (lambda (file) | |
394 | ;; Delete everything except the build tools. | |
395 | (unless (or (string-prefix? "third_party/waf" file) | |
396 | (string-suffix? "wscript" file)) | |
397 | (delete-file file))) | |
398 | (find-files "third_party")) | |
399 | #t)))) | |
52513595 SB |
400 | (build-system gnu-build-system) |
401 | (arguments | |
3d53869e MB |
402 | '(;; LMDB is only supported on 64-bit systems, yet the test suite |
403 | ;; requires it. | |
404 | #:tests? (assoc-ref %build-inputs "lmdb") | |
405 | #:phases | |
52513595 SB |
406 | (modify-phases %standard-phases |
407 | (replace 'configure | |
408 | ;; ldb use a custom configuration script that runs waf. | |
409 | (lambda* (#:key outputs #:allow-other-keys) | |
410 | (let ((out (assoc-ref outputs "out"))) | |
5b848463 RW |
411 | (invoke "./configure" |
412 | (string-append "--prefix=" out) | |
413 | (string-append "--with-modulesdir=" out | |
414 | "/lib/ldb/modules") | |
415 | "--bundled-libraries=NONE"))))))) | |
52513595 | 416 | (native-inputs |
fbed1501 MB |
417 | `(("cmocka" ,cmocka) |
418 | ("pkg-config" ,pkg-config) | |
4422a8c6 MB |
419 | ("python" ,python) |
420 | ("which" ,which))) | |
52513595 SB |
421 | (propagated-inputs |
422 | ;; ldb.pc refers to all these. | |
423 | `(("talloc" ,talloc) | |
424 | ("tdb" ,tdb))) | |
425 | (inputs | |
3d53869e MB |
426 | `(,@(if (target-64bit?) |
427 | `(("lmdb" ,lmdb)) | |
428 | '()) | |
bdf16125 | 429 | ("popt" ,popt) |
52513595 SB |
430 | ("tevent" ,tevent))) |
431 | (synopsis "LDAP-like embedded database") | |
432 | (home-page "https://ldb.samba.org/") | |
433 | (description | |
434 | "Ldb is a LDAP-like embedded database built on top of TDB. What ldb does | |
435 | is provide a fast database with an LDAP-like API designed to be used within an | |
436 | application. In some ways it can be seen as a intermediate solution between | |
437 | key-value pair databases and a real LDAP database.") | |
438 | (license lgpl3+))) | |
439 | ||
ae916e02 | 440 | (define-public ppp |
4c8b874f VL |
441 | ;; This git commit contains unreleased fixes for CVE-2020-8597. |
442 | (let ((revision "1") | |
443 | (commit "8d45443bb5c9372b4c6a362ba2f443d41c5636af")) | |
444 | (package | |
445 | (name "ppp") | |
446 | (version (git-version "2.4.8" revision commit)) | |
447 | (source (origin | |
448 | (method git-fetch) | |
449 | (uri (git-reference | |
450 | (url "https://github.com/paulusmack/ppp") | |
451 | (commit commit))) | |
452 | (file-name (git-file-name name version)) | |
453 | (sha256 | |
454 | (base32 | |
455 | "06cf8fb84l3h2zy5da4j7k2j1qjv2gfqn986sf43xgj75605aks2")))) | |
456 | (build-system gnu-build-system) | |
457 | (arguments | |
458 | '(#:tests? #f ; no check target | |
459 | #:make-flags '("CC=gcc") | |
460 | #:phases | |
461 | (modify-phases %standard-phases | |
462 | (add-before 'configure 'patch-Makefile | |
463 | (lambda* (#:key inputs #:allow-other-keys) | |
464 | (let ((libc (assoc-ref inputs "libc")) | |
465 | (openssl (assoc-ref inputs "openssl")) | |
466 | (libpcap (assoc-ref inputs "libpcap"))) | |
467 | (substitute* "pppd/Makefile.linux" | |
468 | (("/usr/include/crypt\\.h") | |
469 | (string-append libc "/include/crypt.h")) | |
470 | (("/usr/include/openssl") | |
471 | (string-append openssl "/include/openssl")) | |
472 | (("/usr/include/pcap-bpf.h") | |
473 | (string-append libpcap "/include/pcap-bpf.h"))) | |
474 | #t)))))) | |
475 | (inputs | |
476 | `(("libpcap" ,libpcap) | |
477 | ("openssl" ,(@ (gnu packages tls) openssl)))) | |
478 | (synopsis "Implementation of the Point-to-Point Protocol") | |
479 | (home-page "https://ppp.samba.org/") | |
480 | (description | |
481 | "The Point-to-Point Protocol (PPP) provides a standard way to establish | |
ae916e02 SB |
482 | a network connection over a serial link. At present, this package supports IP |
483 | and IPV6 and the protocols layered above them, such as TCP and UDP.") | |
4c8b874f VL |
484 | ;; pppd, pppstats and pppdump are under BSD-style notices. |
485 | ;; some of the pppd plugins are GPL'd. | |
486 | ;; chat is public domain. | |
487 | (license (list bsd-3 bsd-4 gpl2+ public-domain))))) | |
488 |