[jackhill/guix/guix.git] / gnu / packages / gnuzilla.scm

;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2013, 2014 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com>
;;;
;;; 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 gnuzilla)
  #:use-module (gnu packages)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix build-system gnu)
  #:use-module (gnu packages databases)
  #:use-module (gnu packages glib)
  #:use-module (gnu packages gstreamer)
  #:use-module (gnu packages gtk)
  #:use-module (gnu packages linux)
  #:use-module (gnu packages perl)
  #:use-module (gnu packages pkg-config)
  #:use-module (gnu packages compression)
  #:use-module (gnu packages fontutils)
  #:use-module (gnu packages libevent)
  #:use-module (gnu packages image)
  #:use-module (gnu packages libffi)
  #:use-module (gnu packages pulseaudio)
  #:use-module (gnu packages python)
  #:use-module (gnu packages xorg)
  #:use-module (gnu packages gl)
  #:use-module (gnu packages yasm)
  #:use-module (gnu packages icu4c)
  #:use-module (gnu packages video)
  #:use-module (gnu packages xdisorg)
  #:use-module (gnu packages zip))

(define-public mozjs
  (package
    (name "mozjs")
    (version "17.0.0")
    (source (origin
             (method url-fetch)
             (uri (string-append
                   "https://ftp.mozilla.org/pub/mozilla.org/js/"
                   name version ".tar.gz"))
             (sha256
              (base32
               "1fig2wf4f10v43mqx67y68z6h77sy900d1w0pz9qarrqx57rc7ij"))))
    (build-system gnu-build-system)
    (native-inputs
      `(("perl", perl)
        ("python" ,python-2)))
    (arguments
      `(#:phases
          (alist-cons-before
           'configure 'chdir
           (lambda _
             (chdir "js/src"))
           (alist-replace
            'configure
            ;; configure fails if it is followed by SHELL and CONFIG_SHELL
            (lambda* (#:key outputs #:allow-other-keys)
              (let ((out (assoc-ref outputs "out")))
                (setenv "SHELL" (which "sh"))
                (setenv "CONFIG_SHELL" (which "sh"))
                (zero? (system*
                        "./configure" (string-append "--prefix=" out)))))
            %standard-phases))))
    (home-page
     "https://developer.mozilla.org/en-US/docs/Mozilla/Projects/SpiderMonkey")
    (synopsis "Mozilla javascript engine")
    (description "SpiderMonkey is Mozilla's JavaScript engine written
in C/C++.")
    (license license:mpl2.0))) ; and others for some files

(define-public nspr
  (package
    (name "nspr")
    (version "4.10.8")
    (source (origin
             (method url-fetch)
             (uri (string-append
                   "https://ftp.mozilla.org/pub/mozilla.org/nspr/releases/v"
                   version "/src/nspr-" version ".tar.gz"))
             (sha256
              (base32
               "05aaakz24ba2hdzlqx8qamwrsp7gni1acms8mr6m432wa9yaazjh"))))
    (build-system gnu-build-system)
    (native-inputs
      `(("perl", perl)))
    (arguments
      `(#:tests? #f ; no check target
        #:configure-flags
        `("--enable-64bit")
        #:phases
          (alist-cons-before
           'configure 'chdir
           (lambda _
             (chdir "nspr"))
            %standard-phases)))
    (home-page
     "https://developer.mozilla.org/en-US/docs/Mozilla/Projects/NSPR")
    (synopsis "Netscape API for system level and libc-like functions")
    (description "Netscape Portable Runtime (NSPR) provides a
platform-neutral API for system level and libc-like functions.  It is used
in the Mozilla clients.")
    (license license:mpl2.0)))

(define-public nss
  (package
    (name "nss")
    (version "3.17.4")
    (source (origin
              (method url-fetch)
              (uri (string-append
                    "ftp://ftp.mozilla.org/pub/mozilla.org/security/nss/"
                    "releases/NSS_3_17_4_RTM/src/nss-3.17.4.tar.gz"))
              (sha256
               (base32
                "0ycxzybgn4bq0i6j5zjdjl70n3s8a742yixyik4pw8x4h4cav60x"))
              ;; Create nss.pc and nss-config.
              (patches (list (search-patch "nss-pkgconfig.patch")))))
    (build-system gnu-build-system)
    (outputs '("out" "bin"))
    (arguments
     '(#:parallel-build? #f ; failed
       #:make-flags
       (let* ((out (assoc-ref %outputs "out"))
              (nspr (string-append (assoc-ref %build-inputs "nspr")))
              (rpath (string-append "-Wl,-rpath=" out "/lib/nss")))
         (list "-C" "nss" (string-append "PREFIX=" out)
               "NSDISTMODE=copy"
               "NSS_USE_SYSTEM_SQLITE=1"
               (string-append "NSPR_INCLUDE_DIR=" nspr "/include/nspr")
               ;; Add $out/lib/nss to RPATH.
               (string-append "RPATH=" rpath)
               (string-append "LDFLAGS=" rpath)))
       #:modules ((guix build gnu-build-system)
                  (guix build utils)
                  (ice-9 ftw)
                  (ice-9 match)
                  (srfi srfi-26))
       #:imported-modules ((guix build gnu-build-system)
                           (guix build utils))
       #:phases
       (alist-replace
        'configure
        (lambda* (#:key system inputs #:allow-other-keys)
          ;; Tells NSS to build for the 64-bit ABI if we are 64-bit system.
          (when (string-prefix? "x86_64" system)
            (setenv "USE_64" "1"))
          #t)
        (alist-replace
         'check
         (lambda _
           ;; Use 127.0.0.1 instead of $HOST.$DOMSUF as HOSTADDR for testing.
           ;; The later requires a working DNS or /etc/hosts.
           (setenv "DOMSUF" "(none)")
           (setenv "USE_IP" "TRUE")
           (setenv "IP_ADDRESS" "127.0.0.1")
           (zero? (system* "./nss/tests/all.sh")))
         (alist-replace
          'install
          (lambda* (#:key outputs #:allow-other-keys)
            (let* ((out (assoc-ref outputs "out"))
                   (bin (string-append (assoc-ref outputs "bin") "/bin"))
                   (inc (string-append out "/include/nss"))
                   (lib (string-append out "/lib/nss"))
                   (obj (match (scandir "dist" (cut string-suffix? "OBJ" <>))
                          ((obj) (string-append "dist/" obj)))))
              ;; Install nss-config to $out/bin.
              (mkdir-p (string-append out "/bin"))
              (copy-file (string-append obj "/bin/nss-config")
                         (string-append out "/bin/nss-config"))
              (delete-file (string-append obj "/bin/nss-config"))
              ;; Install nss.pc to $out/lib/pkgconfig.
              (mkdir-p (string-append out "/lib/pkgconfig"))
              (copy-file (string-append obj "/lib/pkgconfig/nss.pc")
                         (string-append out "/lib/pkgconfig/nss.pc"))
              (delete-file (string-append obj "/lib/pkgconfig/nss.pc"))
              (rmdir (string-append obj "/lib/pkgconfig"))
              ;; Install other files.
              (copy-recursively "dist/public/nss" inc)
              (copy-recursively (string-append obj "/bin") bin)
              (copy-recursively (string-append obj "/lib") lib)))
          %standard-phases)))))
    (inputs
     `(("sqlite" ,sqlite)
       ("zlib" ,zlib)))
    (propagated-inputs `(("nspr" ,nspr))) ; required by nss.pc.
    (native-inputs `(("perl" ,perl)))
    (home-page
     "https://developer.mozilla.org/en-US/docs/Mozilla/Projects/NSS")
    (synopsis "Network Security Services")
    (description
     "Network Security Services (NSS) is a set of libraries designed to support
cross-platform development of security-enabled client and server applications.
Applications built with NSS can support SSL v2 and v3, TLS, PKCS #5, PKCS #7,
PKCS #11, PKCS #12, S/MIME, X.509 v3 certificates, and other security
standards.")
    (license license:mpl2.0)))

(define-public icecat
  (package
    (name "icecat")
    (version "31.5.0")
    (source
     (origin
      (method url-fetch)
      (uri (string-append "mirror://gnu/gnuzilla/"
                          version "/" name "-" version ".tar.bz2"))
      (sha256
       (base32
        "1rr4axghaypdkrf60i1qp6dz4cd29ya02fs3vyffvp4x9kgcq2dd"))))
    (build-system gnu-build-system)
    (inputs
     `(("alsa-lib" ,alsa-lib)
       ("bzip2" ,bzip2)
       ("cairo" ,cairo)
       ("dbus" ,dbus)
       ("dbus-glib" ,dbus-glib)
       ("glib" ,glib)
       ("gstreamer" ,gstreamer)
       ("gst-plugins-base" ,gst-plugins-base)
       ("gtk+" ,gtk+-2)
       ("pango" ,pango)
       ("freetype" ,freetype)
       ("libxft" ,libxft)
       ("libevent" ,libevent)
       ("libxt" ,libxt)
       ("libffi" ,libffi)
       ("libvpx" ,libvpx)
       ("icu4c" ,icu4c)
       ("pixman" ,pixman)
       ("pulseaudio" ,pulseaudio)
       ("mesa" ,mesa)
       ("nspr" ,nspr)
       ("nss" ,nss)
       ("unzip" ,unzip)
       ("yasm" ,yasm)
       ("zip" ,zip)
       ("zlib" ,zlib)))
    (native-inputs
     `(("perl" ,perl)
       ("python" ,python-2) ; Python 3 not supported
       ("python2-pysqlite" ,python2-pysqlite)
       ("pkg-config" ,pkg-config)))
    (arguments
     `(#:tests? #f          ; no check target
       #:out-of-source? #t  ; must be built outside of the source directory

       #:configure-flags '(;; Building with debugging symbols takes ~5GiB, so
                           ;; disable it.
                           "--disable-debug"
                           "--disable-debug-symbols"

                           "--enable-pulseaudio"
                           "--enable-gstreamer=1.0"

                           "--with-system-zlib"
                           "--with-system-bz2"    ; FIXME: not used
                           "--with-system-libevent"
                           "--with-system-libvpx"
                           "--with-system-icu"
                           "--with-system-nspr"
                           "--with-system-nss"
                           "--enable-system-pixman"
                           "--enable-system-cairo"
                           "--enable-system-ffi"

                           ;; Fails with "configure: error: System
                           ;; SQLite library is not compiled with
                           ;; SQLITE_ENABLE_UNLOCK_NOTIFY."
                           ;; "--enable-system-sqlite"

                           ;; Fails with "--with-system-png won't work because
                           ;; the system's libpng doesn't have APNG support".
                           ;; According to
                           ;; http://sourceforge.net/projects/libpng-apng/ ,
                           ;; "the Animated Portable Network Graphics (APNG)
                           ;; is an unofficial extension of the Portable
                           ;; Network Graphics (PNG) format";
                           ;; we probably do not wish to support it.
                           ;; "--with-system-png"

                           ;; Fails with "libjpeg-turbo JCS_EXTENSIONS
                           ;; required".
                           ;; According to
                           ;; http://sourceforge.net/projects/libjpeg-turbo/ ,
                           ;; "libjpeg-turbo is a derivative of libjpeg that
                           ;; uses MMX, SSE, SSE2, and NEON SIMD instructions
                           ;; to accelerate baseline JPEG compression/
                           ;; decompression", so we had better not use it
                           ;; "--with-system-jpeg"
                           )

       #:phases
       (alist-replace
        'configure
        ;; configure does not work followed by both "SHELL=..." and
        ;; "CONFIG_SHELL=..."; set environment variables instead
        (lambda* (#:key outputs configure-flags #:allow-other-keys)
          (let* ((out (assoc-ref outputs "out"))
                 (bash (which "bash"))
                 (abs-srcdir (getcwd))
                 (srcdir (string-append "../" (basename abs-srcdir)))
                 (flags `(,(string-append "--prefix=" out)
                          ,(string-append "--with-l10n-base="
                                          abs-srcdir "/l10n")
                          ,@configure-flags)))
            (setenv "SHELL" bash)
            (setenv "CONFIG_SHELL" bash)
            (mkdir "../build")
            (chdir "../build")
            (format #t "build directory: ~s~%" (getcwd))
            (format #t "configure flags: ~s~%" flags)
            (zero? (apply system* bash
                          (string-append srcdir "/configure")
                          flags))))
        %standard-phases)))
    (home-page "http://www.gnu.org/software/gnuzilla/")
    (synopsis "Entirely free browser derived from Mozilla Firefox")
    (description
     "IceCat is the GNU version of the Firefox browser.  It is entirely free
software, which does not recommend non-free plugins and addons.  It also
features built-in privacy-protecting features.")
    (license license:mpl2.0))) ; and others, see toolkit/content/license.html
Commit	Line	Data
be0f6112	1	;;; GNU Guix --- Functional package management for GNU
5deea4fc	2	;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr>
46a3e00b	3	;;; Copyright © 2013, 2014 Ludovic Courtès <ludo@gnu.org>
2a666e9c	4	;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org>
1aaaff1a	5	;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com>
be0f6112 AE	6	;;;
	7	;;; This file is part of GNU Guix.
	8	;;;
	9	;;; GNU Guix is free software; you can redistribute it and/or modify it
	10	;;; under the terms of the GNU General Public License as published by
	11	;;; the Free Software Foundation; either version 3 of the License, or (at
	12	;;; your option) any later version.
	13	;;;
	14	;;; GNU Guix is distributed in the hope that it will be useful, but
	15	;;; WITHOUT ANY WARRANTY; without even the implied warranty of
	16	;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	17	;;; GNU General Public License for more details.
	18	;;;
	19	;;; You should have received a copy of the GNU General Public License
	20	;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
	21
	22	(define-module (gnu packages gnuzilla)
	23	#:use-module (gnu packages)
b5b73a82	24	#:use-module ((guix licenses) #:prefix license:)
be0f6112 AE	25	#:use-module (guix packages)
	26	#:use-module (guix download)
	27	#:use-module (guix build-system gnu)
1aaaff1a	28	#:use-module (gnu packages databases)
be0f6112 AE	29	#:use-module (gnu packages glib)
	30	#:use-module (gnu packages gstreamer)
	31	#:use-module (gnu packages gtk)
	32	#:use-module (gnu packages linux)
	33	#:use-module (gnu packages perl)
	34	#:use-module (gnu packages pkg-config)
1ae6df81	35	#:use-module (gnu packages compression)
74c7af9f	36	#:use-module (gnu packages fontutils)
1ae6df81	37	#:use-module (gnu packages libevent)
e55354b8	38	#:use-module (gnu packages image)
1ae6df81	39	#:use-module (gnu packages libffi)
74c7af9f	40	#:use-module (gnu packages pulseaudio)
be0f6112 AE	41	#:use-module (gnu packages python)
be0f6112 AE	42	#:use-module (gnu packages xorg)
200726ed	43	#:use-module (gnu packages gl)
be0f6112	44	#:use-module (gnu packages yasm)
13b284d9 MW	45	#:use-module (gnu packages icu4c)
	46	#:use-module (gnu packages video)
	47	#:use-module (gnu packages xdisorg)
be0f6112 AE	48	#:use-module (gnu packages zip))
be0f6112 AE	49
4923e06f SB	50	(define-public mozjs
	51	(package
	52	(name "mozjs")
	53	(version "17.0.0")
	54	(source (origin
	55	(method url-fetch)
	56	(uri (string-append
	57	"https://ftp.mozilla.org/pub/mozilla.org/js/"
	58	name version ".tar.gz"))
	59	(sha256
	60	(base32
	61	"1fig2wf4f10v43mqx67y68z6h77sy900d1w0pz9qarrqx57rc7ij"))))
	62	(build-system gnu-build-system)
	63	(native-inputs
	64	`(("perl", perl)
	65	("python" ,python-2)))
	66	(arguments
	67	`(#:phases
	68	(alist-cons-before
	69	'configure 'chdir
	70	(lambda _
	71	(chdir "js/src"))
	72	(alist-replace
	73	'configure
	74	;; configure fails if it is followed by SHELL and CONFIG_SHELL
	75	(lambda* (#:key outputs #:allow-other-keys)
	76	(let ((out (assoc-ref outputs "out")))
	77	(setenv "SHELL" (which "sh"))
	78	(setenv "CONFIG_SHELL" (which "sh"))
	79	(zero? (system*
	80	"./configure" (string-append "--prefix=" out)))))
	81	%standard-phases))))
	82	(home-page
	83	"https://developer.mozilla.org/en-US/docs/Mozilla/Projects/SpiderMonkey")
	84	(synopsis "Mozilla javascript engine")
	85	(description "SpiderMonkey is Mozilla's JavaScript engine written
	86	in C/C++.")
	87	(license license:mpl2.0))) ; and others for some files
	88
	89	(define-public nspr
	90	(package
	91	(name "nspr")
61427c8d	92	(version "4.10.8")
4923e06f SB	93	(source (origin
	94	(method url-fetch)
	95	(uri (string-append
	96	"https://ftp.mozilla.org/pub/mozilla.org/nspr/releases/v"
	97	version "/src/nspr-" version ".tar.gz"))
	98	(sha256
	99	(base32
61427c8d	100	"05aaakz24ba2hdzlqx8qamwrsp7gni1acms8mr6m432wa9yaazjh"))))
4923e06f SB	101	(build-system gnu-build-system)
	102	(native-inputs
	103	`(("perl", perl)))
	104	(arguments
	105	`(#:tests? #f ; no check target
	106	#:configure-flags
	107	`("--enable-64bit")
	108	#:phases
	109	(alist-cons-before
	110	'configure 'chdir
	111	(lambda _
	112	(chdir "nspr"))
	113	%standard-phases)))
	114	(home-page
	115	"https://developer.mozilla.org/en-US/docs/Mozilla/Projects/NSPR")
	116	(synopsis "Netscape API for system level and libc-like functions")
	117	(description "Netscape Portable Runtime (NSPR) provides a
	118	platform-neutral API for system level and libc-like functions. It is used
	119	in the Mozilla clients.")
	120	(license license:mpl2.0)))
	121
1aaaff1a SB	122	(define-public nss
	123	(package
	124	(name "nss")
5deea4fc	125	(version "3.17.4")
1aaaff1a SB	126	(source (origin
	127	(method url-fetch)
	128	(uri (string-append
	129	"ftp://ftp.mozilla.org/pub/mozilla.org/security/nss/"
5deea4fc	130	"releases/NSS_3_17_4_RTM/src/nss-3.17.4.tar.gz"))
1aaaff1a SB	131	(sha256
1aaaff1a SB	132	(base32
5deea4fc	133	"0ycxzybgn4bq0i6j5zjdjl70n3s8a742yixyik4pw8x4h4cav60x"))
1aaaff1a SB	134	;; Create nss.pc and nss-config.
	135	(patches (list (search-patch "nss-pkgconfig.patch")))))
	136	(build-system gnu-build-system)
	137	(outputs '("out" "bin"))
	138	(arguments
	139	'(#:parallel-build? #f ; failed
	140	#:make-flags
	141	(let* ((out (assoc-ref %outputs "out"))
	142	(nspr (string-append (assoc-ref %build-inputs "nspr")))
	143	(rpath (string-append "-Wl,-rpath=" out "/lib/nss")))
	144	(list "-C" "nss" (string-append "PREFIX=" out)
	145	"NSDISTMODE=copy"
	146	"NSS_USE_SYSTEM_SQLITE=1"
	147	(string-append "NSPR_INCLUDE_DIR=" nspr "/include/nspr")
	148	;; Add $out/lib/nss to RPATH.
	149	(string-append "RPATH=" rpath)
	150	(string-append "LDFLAGS=" rpath)))
	151	#:modules ((guix build gnu-build-system)
	152	(guix build utils)
	153	(ice-9 ftw)
	154	(ice-9 match)
	155	(srfi srfi-26))
	156	#:imported-modules ((guix build gnu-build-system)
	157	(guix build utils))
	158	#:phases
	159	(alist-replace
	160	'configure
	161	(lambda* (#:key system inputs #:allow-other-keys)
	162	;; Tells NSS to build for the 64-bit ABI if we are 64-bit system.
	163	(when (string-prefix? "x86_64" system)
	164	(setenv "USE_64" "1"))
	165	#t)
	166	(alist-replace
	167	'check
	168	(lambda _
	169	;; Use 127.0.0.1 instead of $HOST.$DOMSUF as HOSTADDR for testing.
	170	;; The later requires a working DNS or /etc/hosts.
	171	(setenv "DOMSUF" "(none)")
	172	(setenv "USE_IP" "TRUE")
	173	(setenv "IP_ADDRESS" "127.0.0.1")
	174	(zero? (system* "./nss/tests/all.sh")))
	175	(alist-replace
	176	'install
	177	(lambda* (#:key outputs #:allow-other-keys)
	178	(let* ((out (assoc-ref outputs "out"))
	179	(bin (string-append (assoc-ref outputs "bin") "/bin"))
	180	(inc (string-append out "/include/nss"))
	181	(lib (string-append out "/lib/nss"))
	182	(obj (match (scandir "dist" (cut string-suffix? "OBJ" <>))
	183	((obj) (string-append "dist/" obj)))))
	184	;; Install nss-config to $out/bin.
	185	(mkdir-p (string-append out "/bin"))
	186	(copy-file (string-append obj "/bin/nss-config")
	187	(string-append out "/bin/nss-config"))
	188	(delete-file (string-append obj "/bin/nss-config"))
	189	;; Install nss.pc to $out/lib/pkgconfig.
	190	(mkdir-p (string-append out "/lib/pkgconfig"))
	191	(copy-file (string-append obj "/lib/pkgconfig/nss.pc")
	192	(string-append out "/lib/pkgconfig/nss.pc"))
	193	(delete-file (string-append obj "/lib/pkgconfig/nss.pc"))
	194	(rmdir (string-append obj "/lib/pkgconfig"))
	195	;; Install other files.
	196	(copy-recursively "dist/public/nss" inc)
	197	(copy-recursively (string-append obj "/bin") bin)
198	(copy-recursively (string-append obj "/lib") lib)))
199	%standard-phases)))))
200	(inputs
201	`(("sqlite" ,sqlite)
202	("zlib" ,zlib)))
203	(propagated-inputs `(("nspr" ,nspr))) ; required by nss.pc.
204	(native-inputs `(("perl" ,perl)))
205	(home-page
206	"https://developer.mozilla.org/en-US/docs/Mozilla/Projects/NSS")
207	(synopsis "Network Security Services")
208	(description
209	"Network Security Services (NSS) is a set of libraries designed to support
210	cross-platform development of security-enabled client and server applications.
211	Applications built with NSS can support SSL v2 and v3, TLS, PKCS #5, PKCS #7,
212	PKCS #11, PKCS #12, S/MIME, X.509 v3 certificates, and other security
213	standards.")
214	(license license:mpl2.0)))
215
be0f6112 AE	216	(define-public icecat
	217	(package
	218	(name "icecat")
5b17fabc	219	(version "31.5.0")
be0f6112 AE	220	(source
	221	(origin
	222	(method url-fetch)
47bc885c	223	(uri (string-append "mirror://gnu/gnuzilla/"
582100a0	224	version "/" name "-" version ".tar.bz2"))
be0f6112 AE	225	(sha256
be0f6112 AE	226	(base32
5b17fabc	227	"1rr4axghaypdkrf60i1qp6dz4cd29ya02fs3vyffvp4x9kgcq2dd"))))
be0f6112 AE	228	(build-system gnu-build-system)
	229	(inputs
	230	`(("alsa-lib" ,alsa-lib)
1ae6df81	231	("bzip2" ,bzip2)
5b17fabc	232	("cairo" ,cairo)
be0f6112 AE	233	("dbus" ,dbus)
	234	("dbus-glib" ,dbus-glib)
	235	("glib" ,glib)
43cc5c5e MW	236	("gstreamer" ,gstreamer)
43cc5c5e MW	237	("gst-plugins-base" ,gst-plugins-base)
be0f6112	238	("gtk+" ,gtk+-2)
74c7af9f MW	239	("pango" ,pango)
	240	("freetype" ,freetype)
	241	("libxft" ,libxft)
1ae6df81	242	("libevent" ,libevent)
be0f6112	243	("libxt" ,libxt)
1ae6df81	244	("libffi" ,libffi)
13b284d9 MW	245	("libvpx" ,libvpx)
	246	("icu4c" ,icu4c)
	247	("pixman" ,pixman)
74c7af9f	248	("pulseaudio" ,pulseaudio)
be0f6112	249	("mesa" ,mesa)
5b17fabc MW	250	("nspr" ,nspr)
5b17fabc MW	251	("nss" ,nss)
be0f6112 AE	252	("unzip" ,unzip)
be0f6112 AE	253	("yasm" ,yasm)
1ae6df81 LC	254	("zip" ,zip)
1ae6df81 LC	255	("zlib" ,zlib)))
c4c4cc05 JD	256	(native-inputs
	257	`(("perl" ,perl)
	258	("python" ,python-2) ; Python 3 not supported
	259	("python2-pysqlite" ,python2-pysqlite)
030daf71	260	("pkg-config" ,pkg-config)))
be0f6112	261	(arguments
74c7af9f MW	262	`(#:tests? #f ; no check target
74c7af9f MW	263	#:out-of-source? #t ; must be built outside of the source directory
1ae6df81 LC	264
	265	#:configure-flags '(;; Building with debugging symbols takes ~5GiB, so
	266	;; disable it.
	267	"--disable-debug"
	268	"--disable-debug-symbols"
	269
46a3e00b	270	"--enable-pulseaudio"
43cc5c5e	271	"--enable-gstreamer=1.0"
1ae6df81 LC	272
	273	"--with-system-zlib"
	274	"--with-system-bz2" ; FIXME: not used
	275	"--with-system-libevent"
13b284d9 MW	276	"--with-system-libvpx"
13b284d9 MW	277	"--with-system-icu"
5b17fabc MW	278	"--with-system-nspr"
5b17fabc MW	279	"--with-system-nss"
13b284d9	280	"--enable-system-pixman"
5b17fabc MW	281	"--enable-system-cairo"
5b17fabc MW	282	"--enable-system-ffi"
13b284d9 MW	283
	284	;; Fails with "configure: error: System
	285	;; SQLite library is not compiled with
5b17fabc	286	;; SQLITE_ENABLE_UNLOCK_NOTIFY."
13b284d9	287	;; "--enable-system-sqlite"
1ae6df81	288
98a046cd AE	289	;; Fails with "--with-system-png won't work because
	290	;; the system's libpng doesn't have APNG support".
	291	;; According to
	292	;; http://sourceforge.net/projects/libpng-apng/ ,
	293	;; "the Animated Portable Network Graphics (APNG)
	294	;; is an unofficial extension of the Portable
	295	;; Network Graphics (PNG) format";
	296	;; we probably do not wish to support it.
1ae6df81 LC	297	;; "--with-system-png"
1ae6df81 LC	298
98a046cd AE	299	;; Fails with "libjpeg-turbo JCS_EXTENSIONS
	300	;; required".
	301	;; According to
	302	;; http://sourceforge.net/projects/libjpeg-turbo/ ,
	303	;; "libjpeg-turbo is a derivative of libjpeg that
	304	;; uses MMX, SSE, SSE2, and NEON SIMD instructions
	305	;; to accelerate baseline JPEG compression/
	306	;; decompression", so we had better not use it
1ae6df81	307	;; "--with-system-jpeg"
5b17fabc	308	)
1ae6df81	309
be0f6112	310	#:phases
74c7af9f MW	311	(alist-replace
	312	'configure
	313	;; configure does not work followed by both "SHELL=..." and
	314	;; "CONFIG_SHELL=..."; set environment variables instead
	315	(lambda* (#:key outputs configure-flags #:allow-other-keys)
	316	(let* ((out (assoc-ref outputs "out"))
	317	(bash (which "bash"))
	318	(abs-srcdir (getcwd))
	319	(srcdir (string-append "../" (basename abs-srcdir)))
	320	(flags `(,(string-append "--prefix=" out)
	321	,(string-append "--with-l10n-base="
	322	abs-srcdir "/l10n")
	323	,@configure-flags)))
	324	(setenv "SHELL" bash)
	325	(setenv "CONFIG_SHELL" bash)
	326	(mkdir "../build")
	327	(chdir "../build")
	328	(format #t "build directory: ~s~%" (getcwd))
	329	(format #t "configure flags: ~s~%" flags)
	330	(zero? (apply system* bash
	331	(string-append srcdir "/configure")
	332	flags))))
	333	%standard-phases)))
be0f6112 AE	334	(home-page "http://www.gnu.org/software/gnuzilla/")
	335	(synopsis "Entirely free browser derived from Mozilla Firefox")
	336	(description
	337	"IceCat is the GNU version of the Firefox browser. It is entirely free
c5779c93	338	software, which does not recommend non-free plugins and addons. It also
79c311b8	339	features built-in privacy-protecting features.")
be0f6112	340	(license license:mpl2.0))) ; and others, see toolkit/content/license.html