;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2016, 2019 Efraim Flashner ;;; Copyright © 2016 Ricardo Wurmus ;;; Copyright © 2017 Marius Bakke ;;; Copyright © 2017 Ludovic Courtès ;;; Copyright © 2017, 2018, 2019, 2020 Tobias Geerinckx-Rice ;;; Copyright © 2019 Meiyo Peng ;;; Copyright © 2020 Paul Garlick ;;; Copyright © 2020 Vincent Legoll ;;; ;;; This file is part of GNU Guix. ;;; ;;; GNU Guix is free software; you can redistribute it and/or modify it ;;; under the terms of the GNU General Public License as published by ;;; the Free Software Foundation; either version 3 of the License, or (at ;;; your option) any later version. ;;; ;;; GNU Guix is distributed in the hope that it will be useful, but ;;; WITHOUT ANY WARRANTY; without even the implied warranty of ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;;; GNU General Public License for more details. ;;; ;;; You should have received a copy of the GNU General Public License ;;; along with GNU Guix. If not, see . (define-module (gnu packages pretty-print) #:use-module (guix packages) #:use-module (guix licenses) #:use-module (guix git-download) #:use-module (guix download) #:use-module (guix build-system cmake) #:use-module (guix build-system gnu) #:use-module (guix utils) #:use-module (gnu packages) #:use-module (gnu packages ghostscript) #:use-module (gnu packages groff) #:use-module (gnu packages imagemagick) #:use-module (gnu packages gv) #:use-module (gnu packages boost) #:use-module (gnu packages bison) #:use-module (gnu packages flex) #:use-module (gnu packages gperf) #:use-module (gnu packages lua) #:use-module (gnu packages perl) #:use-module (gnu packages pkg-co;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2013, 2014, 2015, 2017, 2018 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2014 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com> ;;; Copyright © 2021 Maxime Devos <maximedevos@telenet.be> ;;; Copyright © 2023 Janneke Nieuwenhuizen <janneke@gnu.org> ;;; ;;; This file is part of GNU Guix. ;;; ;;; GNU Guix is free software; you can redistribute it and/or modify it ;;; under the terms of the GNU General Public License as published by ;;; the Free Software Foundation; either version 3 of the License, or (at ;;; your option) any later version. ;;; ;;; GNU Guix is distributed in the hope that it will be useful, but ;;; WITHOUT ANY WARRANTY; without even the implied warranty of ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;;; GNU General Public License for more details. ;;; ;;; You should have received a copy of the GNU General Public License ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. (define-module (gnu packages avahi) #:use-module ((guix licenses) #:select (lgpl2.1+)) #:use-module (guix packages) #:use-module (guix gexp) #:use-module (guix download) #:use-module (guix build-system gnu) #:use-module (gnu packages) #:use-module (gnu packages bash) #:use-module (gnu packages dbm) #:use-module (gnu packages gettext) #:use-module (gnu packages glib) #:use-module (gnu packages libdaemon) #:use-module (gnu packages libevent) #:use-module (gnu packages linux) #:use-module (gnu packages pkg-config) #:use-module (gnu packages xml)) (define-public avahi (package (name "avahi") (version "0.8") (home-page "https://avahi.org") (source (origin (method url-fetch) (uri (string-append home-page "/download/avahi-" version ".tar.gz")) (sha256 (base32 "1npdixwxxn3s9q1f365x9n9rc5xgfz39hxf23faqvlrklgbhj0q6")) (patches (search-patches "avahi-localstatedir.patch")) (modules '((guix build utils))) (snippet '(begin ;; Fix version constraint in the avahi-libevent pkg-config file. ;; This can be removed for Avahi versions > 0.8. (substitute* "avahi-libevent.pc.in" (("libevent-2\\.1\\.5") "libevent >= 2.1.5")))))) (build-system gnu-build-system) (arguments `(#:configure-flags '("--with-distro=none" "--disable-static" "--localstatedir=/var" ; for the DBus socket "--disable-python" "--disable-mono" "--disable-doxygen-doc" "--disable-xmltoman" "--enable-tests" "--disable-qt4" "--disable-qt5" "--disable-gtk" "--disable-gtk3" "--enable-compat-libdns_sd" ,@(if (%current-target-system) '("ac_cv_prog_have_pkg_config=yes") '()) ,@(if (or (%current-target-system) (not (member (%current-system) (package-supported-systems libcap)))) '("--disable-autoipd") '())) #:modules ((srfi srfi-26) (guix build utils) (guix build gnu-build-system)) #:phases ,#~(modify-phases %standard-phases (add-after 'patch-shebangs 'patch-more-shebangs (lambda* (#:key inputs #:allow-other-keys) (define path `(,(dirname (search-input-file inputs "bin/sh")))) (for-each (cut patch-shebang <> path) (find-files (string-append #$output "/etc/avahi")))))))) (inputs `(("bash-minimal" ,bash-minimal) ("dbus" ,dbus) ("expat" ,expat) ("gdbm" ,gdbm) ("glib" ,glib) ;; Do not use libcap when cross-compiling since it's not quite ;; cross-compilable; and use it only for supported systems. ,@(if (and (not (%current-target-system)) (member (%current-system) (package-supported-systems libcap))) `(("libcap" ,libcap)) ;to enable chroot support in avahi-daemon '()) ("libdaemon" ,libdaemon) ("libevent" ,libevent))) (native-inputs `(("gettext" ,gettext-minimal) ("glib" ,glib "bin") ("pkg-config" ,pkg-config))) (synopsis "Implementation of mDNS/DNS-SD protocols") (description "Avahi is a system which facilitates service discovery on a local network. It is an implementation of the mDNS (for \"Multicast DNS\") and DNS-SD (for \"DNS-Based Service Discovery\") protocols.") (license lgpl2.1+))) (define-public nss-mdns (package (name "nss-mdns") (version "0.14.1") (home-page "https://github.com/lathiat/nss-mdns") (source (origin (method url-fetch) (uri (string-append home-page "/releases/download/v" version "/" name "-" version ".tar.gz")) (sha256 (base32 "134wdr0n9cm5ab4g6dwq76lvzqns9dcylr470i2xxjimnw0l22d2")))) (build-system gnu-build-system) (arguments ;; The Avahi daemon socket is expected by 'configure.ac' to be at ;; "$(localstatedir)/run/avahi-daemon/socket", but nowadays it lives in ;; /run/avahi-daemon/socket. Remove the "$(localstatedir)" bit. '(#:configure-flags '("AVAHI_SOCKET=/run/avahi-daemon/socket"))) (synopsis "Multicast DNS Name Service Switch (@dfn{NSS}) plug-in") (description "Nss-mdns is a plug-in for the GNU C Library's Name Service Switch (@dfn{NSS}) that resolves host names via multicast DNS (@dfn{mDNS}). It is most often used in home and other small networks without a local name server, to resolve host names in the @samp{.local} top-level domain.") (license lgpl2.1+)))
generated by cgit
Produce a document with syntax highlighting from a source file") (description "GNU source-highlight reads in a source code file and produces an output file in which the keywords are highlighted in different colors to designate their syntactic role. It supports over 150 different languages and it can output to 8 different formats, including HTML, LaTeX and ODF. It can also output to ANSI color escape sequences, so that highlighted source code can be seen in a terminal.") (license gpl3+) (properties '((ftp-directory . "/gnu/src-highlite"))))) (define-public highlight (package (name "highlight") (version "3.54") (source (origin (method url-fetch) (uri (string-append "http://www.andre-simon.de/zip/highlight-" version ".tar.bz2")) (sha256 (base32 "1l6nxk3vwd7rkxpq9aqisjyps89r008wzn3abh4566q6jigahl4a")))) (build-system gnu-build-system) (arguments `(#:tests? #f ; no tests #:make-flags (let ((confdir (string-append %output "/share/highlight/config/"))) (list (string-append "PREFIX=" %output) (string-append "HL_CONFIG_DIR=" confdir) (string-append "conf_dir=" confdir))) #:phases (modify-phases %standard-phases (delete 'configure) ; no configure script (add-after 'unpack 'fix-search-for-lua (lambda _ (substitute* "src/makefile" (("(LUA_PKG_NAME=).*" _ assignment) (string-append assignment "lua-" ,(version-major+minor (package-version lua)) "\n"))) (substitute* "extras/swig/makefile" (("lua") (string-append "lua-" ,(version-major+minor (package-version lua))))) #t)) (add-after 'install 'install-perl-bindings (lambda* (#:key outputs #:allow-other-keys) (let* ((perldir (string-append (assoc-ref outputs "out") "/lib/perl5/site_perl/" ,(package-version perl))) (autodir (string-append perldir "/auto/highlight"))) (with-directory-excursion "extras/swig" (invoke "make" "perl") (invoke "perl" "-I" "." "testmod.pl") (install-file "highlight.pm" perldir) (install-file "highlight.so" autodir)) #t)))))) (inputs `(("lua" ,lua) ("boost" ,boost) ("perl" ,perl))) (native-inputs `(("pkg-config" ,pkg-config) ("swig" ,swig))) (home-page "http://www.andre-simon.de/doku/highlight/en/highlight.php") (synopsis "Convert code to documents with syntax highlighting") (description "Highlight converts source code to HTML, XHTML, RTF, LaTeX, TeX, SVG, BBCode and terminal escape sequences with colored syntax highlighting. Language definitions and color themes are customizable.") (license gpl3+)))