mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-26 14:28:15 -05:00
203 lines
7.8 KiB
Scheme
203 lines
7.8 KiB
Scheme
;;; GNU Guix --- Functional package management for GNU
|
||
;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
|
||
;;; Copyright © 2015 Ricardo Wurmus <rekado@elephly.net>
|
||
;;; Copyright © 2015 Ben Woodcroft <donttrustben@gmail.com>
|
||
;;; Copyright © 2015 Roel Janssen <roel@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 textutils)
|
||
#:use-module ((guix licenses) #:prefix license:)
|
||
#:use-module (guix packages)
|
||
#:use-module (guix download)
|
||
#:use-module (guix git-download)
|
||
#:use-module (guix build-system gnu)
|
||
#:use-module (gnu packages autotools)
|
||
#:use-module (gnu packages python))
|
||
|
||
(define-public recode
|
||
(package
|
||
(name "recode")
|
||
;; Last beta release (3.7-beta2) is from 2008; last commit from Feb 2014.
|
||
;; So we use that commit instead.
|
||
(version "3.7.0.201402")
|
||
(source
|
||
(origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/pinard/Recode.git")
|
||
(commit "2d7092a9999194fc0e9449717a8048c8d8e26c18")))
|
||
(sha256
|
||
(base32 "1wssv8z6g3ryrw33sksz4rjhlnhgvvdqszw1ggl4rcwks34n86zm"))
|
||
(file-name (string-append name "-" version "-checkout"))))
|
||
(build-system gnu-build-system)
|
||
(native-inputs `(("python" ,python-2)))
|
||
(arguments
|
||
'(#:phases
|
||
(alist-cons-before
|
||
'check 'pre-check
|
||
(lambda _
|
||
(substitute* "tests/setup.py"
|
||
(("([[:space:]]*)include_dirs=.*" all space)
|
||
(string-append all space "library_dirs=['../src/.libs'],\n")))
|
||
;; The test extension 'Recode.so' lacks RUNPATH for 'librecode.so'.
|
||
(setenv "LD_LIBRARY_PATH" (string-append (getcwd) "/src/.libs")))
|
||
%standard-phases)))
|
||
(home-page "https://github.com/pinard/Recode")
|
||
(synopsis "Text encoding converter")
|
||
(description "The Recode library converts files between character sets and
|
||
usages. It recognises or produces over 200 different character sets (or about
|
||
300 if combined with an iconv library) and transliterates files between almost
|
||
any pair. When exact transliteration are not possible, it gets rid of
|
||
offending characters or falls back on approximations. The recode program is a
|
||
handy front-end to the library.")
|
||
(license license:gpl2+)))
|
||
|
||
(define-public enca
|
||
(package
|
||
(name "enca")
|
||
(version "1.16")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://github.com/nijel/enca/archive/" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "1xik00x0yvhswsw2isnclabhv536xk1s42cf5z54gfbpbhc7ni8l"))
|
||
(file-name (string-append name "-" version ".tar.gz"))))
|
||
(build-system gnu-build-system)
|
||
(inputs `(("recode" ,recode)))
|
||
|
||
;; Both 'test-convert-64.sh' and 'test-convert-filter.sh' manipulate a
|
||
;; 'test.tmp' file, so they have to run in sequence.
|
||
(arguments '(#:parallel-tests? #f))
|
||
|
||
(home-page "https://github.com/nijel/enca")
|
||
(synopsis "Text encoding detection tool")
|
||
(description "Enca (Extremely Naive Charset Analyser) consists of libenca,
|
||
an encoding detection library, and enca, a command line frontend, integrating
|
||
libenca and several charset conversion libraries and tools.")
|
||
(license license:gpl2)))
|
||
|
||
(define-public utf8proc
|
||
(package
|
||
(name "utf8proc")
|
||
(version "1.1.6")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://github.com/JuliaLang/utf8proc/archive/v"
|
||
version ".tar.gz"))
|
||
(file-name (string-append name "-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0wmsi672knii0q70wh6a3ll0gv7qk33c50zbpzasrs3b16bqy659"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
'(#:tests? #f ;no "check" target
|
||
#:make-flags '("CC=gcc")
|
||
#:phases
|
||
(alist-replace
|
||
'install
|
||
(lambda* (#:key outputs #:allow-other-keys)
|
||
(let ((lib (string-append (assoc-ref outputs "out") "/lib/"))
|
||
(include (string-append (assoc-ref outputs "out") "/include/")))
|
||
(install-file "utf8proc.h" include)
|
||
(for-each (lambda (file)
|
||
(install-file file lib))
|
||
'("libutf8proc.a" "libutf8proc.so"))))
|
||
;; no configure script
|
||
(alist-delete 'configure %standard-phases))))
|
||
(home-page "http://julialang.org/utf8proc/")
|
||
(synopsis "C library for processing UTF-8 Unicode data")
|
||
(description "utf8proc is a small C library that provides Unicode
|
||
normalization, case-folding, and other operations for data in the UTF-8
|
||
encoding, supporting Unicode version 7.0.")
|
||
(license license:expat)))
|
||
|
||
(define-public libgtextutils
|
||
(package
|
||
(name "libgtextutils")
|
||
(version "0.7")
|
||
(source
|
||
(origin
|
||
(method url-fetch)
|
||
(uri (string-append
|
||
"https://github.com/agordon/libgtextutils/releases/download/"
|
||
version "/libgtextutils-" version ".tar.gz"))
|
||
(sha256
|
||
(base32 "0jiybkb2z58wa2msvllnphr4js2hvjvh988pavb3mzkgr6ihwbkr"))))
|
||
(build-system gnu-build-system)
|
||
(arguments
|
||
'(#:phases
|
||
(alist-cons-after
|
||
'unpack 'autoreconf
|
||
(lambda _ (zero? (system* "autoreconf" "-vif")))
|
||
%standard-phases)))
|
||
(native-inputs
|
||
`(("autoconf" ,autoconf)
|
||
("automake" ,automake)
|
||
("libtool" ,libtool)))
|
||
(home-page "https://github.com/agordon/libgtextutils")
|
||
(synopsis "Gordon's text utils library")
|
||
(description
|
||
"libgtextutils is a text utilities library used by the fastx toolkit from
|
||
the Hannon Lab.")
|
||
(license license:agpl3+)))
|
||
|
||
(define-public cityhash
|
||
(let ((commit "8af9b8c")
|
||
(revision "1"))
|
||
(package
|
||
(name "cityhash")
|
||
(version (string-append "1.1." revision "." commit))
|
||
(source (origin
|
||
(method git-fetch)
|
||
(uri (git-reference
|
||
(url "https://github.com/google/cityhash.git")
|
||
(commit commit)))
|
||
(file-name (string-append name "-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"0n6skf5dv8yfl1ckax8dqhvsbslkwc9158zf2ims0xqdvzsahbi6"))))
|
||
(build-system gnu-build-system)
|
||
(home-page "https://github.com/google/cityhash")
|
||
(synopsis "C++ hash functions for strings")
|
||
(description
|
||
"CityHash provides hash functions for strings. The functions mix the
|
||
input bits thoroughly but are not suitable for cryptography.")
|
||
(license license:expat))))
|
||
|
||
(define-public libconfig
|
||
(package
|
||
(name "libconfig")
|
||
(version "1.5")
|
||
(source (origin
|
||
(method url-fetch)
|
||
(uri (string-append "http://www.hyperrealm.com/libconfig/"
|
||
"libconfig-" version ".tar.gz"))
|
||
(sha256
|
||
(base32
|
||
"1xh3hzk63v4y8815lc5209m3s6ms2cpgw4h5hg462i4f1lwsl7g3"))))
|
||
(build-system gnu-build-system)
|
||
(home-page "http://www.hyperrealm.com/libconfig/")
|
||
(synopsis "C/C++ configuration file library")
|
||
(description
|
||
"Libconfig is a simple library for manipulating structured configuration
|
||
files. This file format is more compact and more readable than XML. And
|
||
unlike XML, it is type-aware, so it is not necessary to do string parsing in
|
||
application code.")
|
||
(license license:lgpl2.1+)))
|