;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012, 2013, 2014, 2015, 2016 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.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 gawk)
  #:use-module (guix licenses)
  #:use-module (gnu packages)
  #:use-module (gnu packages bash)
  #:use-module (gnu packages libsigsegv)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix build-system gnu))

(define-public gawk
  (package
   (name "gawk")
   (version "4.1.3")
   (source (origin
            (method url-fetch)
            (uri (string-append "mirror://gnu/gawk/gawk-" version
                                ".tar.xz"))
            (sha256
             (base32 "09d6pmx6h3i2glafm0jd1v1iyrs03vcyv2rkz12jisii3vlmbkz3"))
            (patches (search-patches "gawk-fts-test.patch"))))
   (build-system gnu-build-system)
   (arguments
    `(#:parallel-tests? #f                ; test suite fails in parallel

      #:phases (alist-cons-before
                'configure 'set-shell-file-name
                (lambda* (#:key inputs #:allow-other-keys)
                  ;; Refer to the right shell.
                  (let ((bash (assoc-ref inputs "bash")))
                    (substitute* "io.c"
                      (("/bin/sh")
                       (string-append bash "/bin/bash")))

                    ;; When cross-compiling, remove dependencies on the
                    ;; `check-for-shared-lib-support' target, which tries to
                    ;; run the cross-built `gawk'.
                    ,@(if (%current-target-system)
                          '((substitute* "extension/Makefile.in"
                              (("^.*: check-for-shared-lib-support" match)
                               (string-append "### " match))))
                          '())))

                %standard-phases)))
   (inputs `(("libsigsegv" ,libsigsegv)

             ,@(if (%current-target-system)
                   `(("bash" ,bash))
                   '())))

   (home-page "http://www.gnu.org/software/gawk/")
   (synopsis "Text scanning and processing language")
   (description
    "Gawk is the GNU implementation of Awk, a specialized programming
language for the easy manipulation of formatted text, such as tables of data.
Gawk features many extensions beyond the traditional implementation,
including network access, sorting, and large libraries.")
   (license gpl3+)))
-tooltip'>* .guix-authorizations: Add jonsger to the committers.
</span></span></td><td>Marius Bakke</td></tr>
<tr><td><span title='2020-10-16 15:00:50 +0200'>2020-10-16</span></td><td><a href='/guix/commit/.guix-authorizations?id=b601aadaf59d25d4dea502f0aab16531038bff91'>.guix-authorizations: Add m1gu3l.</a><span class='msg-avail'>...<span class='msg-tooltip'>* .guix-authorizations: Add m1gu3l to the committers.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-09-04 11:29:51 +0200'>2020-09-04</span></td><td><a href='/guix/commit/.guix-authorizations?id=d60f63a83852685cf439bbb6af678fb2ad93efaa'>.guix-authorizations: Add planglois to the committers.</a><span class='msg-avail'>...<span class='msg-tooltip'>* .guix-authorizations: Add planglois.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-07-18 21:12:38 +0200'>2020-07-18</span></td><td><a href='/guix/commit/.guix-authorizations?id=ba1d9680d61d3b06d9b81a81863448f494d654a7'>.guix-authorizations: Add brettgilio (back) to the committers.</a><span class='msg-avail'>...<span class='msg-tooltip'>* .guix-authorizations: Add fingerprint for brettgilio.
</span></span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2020-07-01 12:50:22 +0200'>2020-07-01</span></td><td><a href='/guix/commit/.guix-authorizations?id=9f5f3932debc72a57a830fc6ca5ab980f6db4941'>.guix-authorizations: Remove keys of two former contributors.</a><span class='msg-avail'>...<span class='msg-tooltip'>* .guix-authorizations: Remove key of David Craven, who left the project
in 2017, and Federico Beffa, whose last commit was in Feb. 2017.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-07-01 12:50:22 +0200'>2020-07-01</span></td><td><a href='/guix/commit/.guix-authorizations?id=5402f3ed05e72f17509e3e732b67488b4643066d'>.guix-authorizations: Remove former keys that are no longer used.</a><span class='msg-avail'>...<span class='msg-tooltip'>* .guix-authorizations: Remove old keys of dvc, efraim, and janneke.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-07-01 12:50:22 +0200'>2020-07-01</span></td><td><a href='/guix/commit/.guix-authorizations?id=eb8a79218d33a513d4673162fd752efb1152a084'>.guix-authorizations: Remove brettgilio's old key.</a><span class='msg-avail'>...<span class='msg-tooltip'>* .guix-authorizations: Remove key "DFC0 C7F7 9EE6 0CA7 AE55  5E19 6722
43C4 A03F 0EEE" (Brett Gilio).  See
&lt;https://lists.gnu.org/archive/html/guix-devel/2020-06/msg00323.html&gt;.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-05-04 10:43:52 +0200'>2020-05-04</span></td><td><a href='/guix/commit/.guix-authorizations?id=d074f73aacc5a39aed0202d6e45721f53f34a8c0'>.guix-authorizations: Add bricewge to the committers.</a><span class='msg-avail'>...<span class='msg-tooltip'>* .guix-authorizations: Add fingerprint for bricewge.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-05-04 09:56:13 +0200'>2020-05-04</span></td><td><a href='/guix/commit/.guix-authorizations?id=bee5b7a0f8547a40f05d0891a71fff1fed4b2b3e'>.guix-authorizations: Augment.</a><span class='msg-avail'>...<span class='msg-tooltip'>* .guix-authorizations: Add all the currently authorized committers.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-05-04 09:56:12 +0200'>2020-05-04</span></td><td><a href='/guix/commit/.guix-authorizations?id=c91e27c60864faa229198f6f0caf620275c429a2'>Add '.guix-authorizations'.</a><span class='msg-avail'>...<span class='msg-tooltip'>* .guix-authorizations: New file.
</span></span></td><td>Ludovic Courtès</td></tr>