gnu/packages/fonts.scm

   1 ;;; GNU Guix --- Functional package management for GNU
   2 ;;; Copyright © 2013, 2014, 2015, 2016, 2018 Ludovic Courtès <ludo@gnu.org>
   3 ;;; Copyright © 2014, 2017 Mark H Weaver <mhw@netris.org>
   4 ;;; Copyright © 2014 Joshua Grant <tadni@riseup.net>
   5 ;;; Copyright © 2014 Alex Kost <alezost@gmail.com>
   6 ;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com>
   7 ;;; Copyright © 2015 Eric Dvorsak <eric@dvorsak.fr>
   8 ;;; Copyright © 2015, 2017 Ricardo Wurmus <rekado@elephly.net>
   9 ;;; Copyright © 2015, 2016 Leo Famulari <leo@famulari.name>
  10 ;;; Copyright © 2016, 2017, 2018 Nils Gillmann <ng0@n0.is>
  11 ;;; Copyright © 2016 Jookia <166291@gmail.com>
  12 ;;; Copyright © 2016 Eric Bavier <bavier@member.fsf.org>
  13 ;;; Copyright © 2016 Dmitry Nikolaev <cameltheman@gmail.com>
  14 ;;; Copyright © 2016, 2017, 2018, 2019 Efraim Flashner <efraim@flashner.co.il>
  15 ;;; Copyright © 2016 Marius Bakke <mbakke@fastmail.com>
  16 ;;; Copyright © 2016 Toni Reina <areina@riseup.net>
  17 ;;; Copyright © 2017, 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
  18 ;;; Copyright © 2017 José Miguel Sánchez García <jmi2k@openmailbox.com>
  19 ;;; Copyright © 2017 Alex Griffin <a@ajgrf.com>
  20 ;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org>
  21 ;;; Copyright © 2017 Brendan Tildesley <brendan.tildesley@openmailbox.org>
  22 ;;; Copyright © 2017, 2018, 2019 Arun Isaac <arunisaac@systemreboot.net>
  23 ;;; Copyright © 2017 Mohammed Sadiq <sadiq@sadiqpk.org>
  24 ;;; Copyright © 2018 Charlie Ritter <chewzerita@posteo.net>
  25 ;;; Copyright © 2018 Gabriel Hondet <gabrielhondet@gmail.com>
  26 ;;; Copyright © 2019 Jens Mølgaard <jens@zete.tk>
  27 ;;;
  28 ;;; This file is part of GNU Guix.
  29 ;;;
  30 ;;; GNU Guix is free software; you can redistribute it and/or modify it
  31 ;;; under the terms of the GNU General Public License as published by
  32 ;;; the Free Software Foundation; either version 3 of the License, or (at
  33 ;;; your option) any later version.
  34 ;;;
  35 ;;; GNU Guix is distributed in the hope that it will be useful, but
  36 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
  37 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  38 ;;; GNU General Public License for more details.
  39 ;;;
  40 ;;; You should have received a copy of the GNU General Public License
  41 ;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
  42
  43 (define-module (gnu packages fonts)
  44   #:use-module (ice-9 regex)
  45   #:use-module (guix utils)
  46   #:use-module ((guix licenses) #:prefix license:)
  47   #:use-module (guix packages)
  48   #:use-module (guix download)
  49   #:use-module (guix git-download)
  50   #:use-module (guix build-system font)
  51   #:use-module (guix build-system gnu)
  52   #:use-module (guix build-system trivial)
  53   #:use-module (gnu packages base)
  54   #:use-module (gnu packages compression)
  55   #:use-module (gnu packages fontutils)
  56   #:use-module (gnu packages perl)
  57   #:use-module (gnu packages pkg-config)
  58   #:use-module (gnu packages python)
  59   #:use-module (gnu packages xorg))
  60
  61 (define-public font-ibm-plex
  62   (package
  63     (name "font-ibm-plex")
  64     (version "1.0.1")
  65     (source (origin
  66               (method url-fetch)
  67               (uri (string-append
  68                     "https://github.com/IBM/plex/releases/download/"
  69                     "v" version "/OpenType.zip"))
  70               (sha256
  71                (base32
  72                 "0nzxw9z6waixslam248yr26ci3fbk83c7jf6m90hncnaj6zxx795"))))
  73     (build-system font-build-system)
  74     (home-page "https://github.com/IBM/plex")
  75     (synopsis "IBM Plex typeface")
  76     (description "This package provides the Plex font family.  It comes in a
  77 Sans, Serif, Mono and Sans Condensed, all with roman and true italics.  The
  78 fonts have been designed to work well in user interface (UI) environments as
  79 well as other mediums.")
  80     (license license:silofl1.1)))
  81
  82 (define-public font-inconsolata
  83   (package
  84     (name "font-inconsolata")
  85     (version "0.80")
  86     (source (origin
  87               (method url-fetch)
  88               (uri "http://www.levien.com/type/myfonts/Inconsolata.otf")
  89               (sha256
  90                (base32
  91                 "06js6znbcf7swn8y3b8ki416bz96ay7d3yvddqnvi88lqhbfcq8m"))))
  92     (build-system font-build-system)
  93     (home-page "http://levien.com/type/myfonts/inconsolata.html")
  94     (synopsis "Monospace font")
  95     (description "A monospace font, designed for code listings and the like,
  96 in print.  With attention to detail for high resolution rendering.")
  97     (license license:silofl1.1)))
  98
  99 (define-public font-ubuntu
 100   (package
 101     (name "font-ubuntu")
 102     (version "0.83")
 103     (source (origin
 104               (method git-fetch)
 105               (uri (git-reference
 106                     (url "https://salsa.debian.org/fonts-team/fonts-ubuntu")
 107                     (commit (string-append "upstream/" version))))
 108               (file-name (git-file-name name version))
 109               (sha256
 110                (base32
 111                 "1d2xrjpxy70f3nsgqiggwv6pj06qglf5vj2847pqx60w3ygi903g"))))
 112     (build-system font-build-system)
 113     (home-page "http://font.ubuntu.com/")
 114     (synopsis "The Ubuntu Font Family")
 115     (description "The Ubuntu Font Family is a unique, custom designed font
 116 that has a very distinctive look and feel.  This package provides the
 117 TrueType (TTF) files.")
 118     (license
 119      (license:non-copyleft
 120       "http://font.ubuntu.com/ufl/ubuntu-font-licence-1.0.txt"
 121       "Ubuntu Font License v1.0"))))
 122
 123 (define-public font-dejavu
 124   (package
 125     (name "font-dejavu")
 126     (version "2.37")
 127     (source (origin
 128              (method url-fetch)
 129              (uri (string-append "mirror://sourceforge/dejavu/dejavu/"
 130                                  version "/dejavu-fonts-ttf-"
 131                                  version ".tar.bz2"))
 132              (sha256
 133               (base32
 134                "1mqpds24wfs5cmfhj57fsfs07mji2z8812i5c4pi5pbi738s977s"))))
 135     (build-system font-build-system)
 136     (arguments
 137      `(#:phases
 138        (modify-phases %standard-phases
 139          (add-after 'install 'install-conf
 140            (lambda* (#:key outputs #:allow-other-keys)
 141              (let ((conf-dir (string-append (assoc-ref outputs "out")
 142                                             "/share/fontconfig/conf.avail")))
 143                (copy-recursively "fontconfig" conf-dir)
 144                #t))))))
 145     (home-page "https://dejavu-fonts.github.io/")
 146     (synopsis "Vera font family derivate with additional characters")
 147     (description "DejaVu provides an expanded version of the Vera font family
 148 aiming for quality and broader Unicode coverage while retaining the original
 149 Vera style.  DejaVu currently works towards conformance to the Multilingual
 150 European Standards (MES-1 and MES-2) for Unicode coverage.  The DejaVu fonts
 151 provide serif, sans and monospaced variants.")
 152     (license
 153      (license:x11-style
 154       "http://dejavu-fonts.org/"))))
 155
 156 (define-public font-bitstream-vera
 157   (package
 158     (name "font-bitstream-vera")
 159     (version "1.10")
 160     (source (origin
 161              (method url-fetch)
 162              (uri (string-append "mirror://gnome/sources/ttf-bitstream-vera/"
 163                                  version "/ttf-bitstream-vera-"
 164                                  version ".tar.bz2"))
 165              (sha256
 166               (base32
 167                "1p3qs51x5327gnk71yq8cvmxc6wgx79sqxfvxcv80cdvgggjfnyv"))))
 168     (build-system font-build-system)
 169     (home-page "https://www.gnome.org/fonts/")
 170     (synopsis "Bitstream Vera sans-serif typeface")
 171     (description "Vera is a sans-serif typeface from Bitstream, Inc.  This
 172 package provides the TrueType (TTF) files.")
 173     (license
 174      (license:fsdg-compatible
 175       "https://www.gnome.org/fonts/#Final_Bitstream_Vera_Fonts"
 176       "The Font Software may be sold as part of a larger software package but
 177 no copy of one or more of the Font Software typefaces may be sold by
 178 itself."))))
 179
 180 (define-public font-cantarell
 181   (package
 182     (name "font-abattis-cantarell")
 183     (version "0.0.25")
 184     (source (origin
 185               (method url-fetch)
 186               (uri (string-append "mirror://gnome/sources/cantarell-fonts/"
 187                                   (version-major+minor version)
 188                                   "/cantarell-fonts-" version ".tar.xz"))
 189               (sha256
 190                (base32
 191                 "0zvkd8cm1cg2919v1js9qmzwa02sjl7qajj3gcvgqvai1fm2i8hl"))))
 192     (build-system gnu-build-system)
 193     (home-page "https://wiki.gnome.org/Projects/CantarellFonts")
 194     (synopsis "Cantarell sans-serif typeface")
 195     (description "The Cantarell font family is a contemporary Humanist
 196 sans-serif designed for on-screen reading.  It is used by GNOME@tie{}3.")
 197     (license license:silofl1.1)))
 198
 199 (define-public font-lato
 200   (package
 201     (name "font-lato")
 202     (version "2.010")                   ; also update description
 203     (source (origin
 204               (method url-fetch/zipbomb)
 205               (uri (string-append "https://www.latofonts.com/download/Lato2OFL.zip"))
 206               (sha256
 207                (base32
 208                 "1f5540g0ja1nx3ddd3ywn77xc81ssrxpq8n3gyb9sabyq2b4xda2"))))
 209     (build-system font-build-system)
 210     (home-page "https://www.latofonts.com/lato-free-fonts/")
 211     (synopsis "Lato sans-serif typeface")
 212     (description
 213      "Lato is a sanserif typeface family.  It covers over 3000 glyphs per style.
 214 The Lato 2.010 family supports more than 100 Latin-based languages, over
 215 50 Cyrillic-based languages as well as Greek and IPA phonetics.")
 216     (license license:silofl1.1)))
 217
 218 (define-public font-gnu-freefont-ttf
 219   (package
 220     (name "font-gnu-freefont-ttf")
 221     (version "20120503")
 222     (source (origin
 223              (method url-fetch)
 224              (uri (string-append "mirror://gnu/freefont/freefont-src-"
 225                                  version ".tar.gz"))
 226              (sha256
 227               (base32
 228                "0yk58blhcd4hm7nyincmqq4jrzjjk82wif2zmk1l3y2m4vif4qhd"))))
 229     (build-system gnu-build-system)
 230     (arguments
 231      `(#:phases (modify-phases %standard-phases
 232                   (delete 'configure)
 233                   (replace 'install
 234                    (lambda _
 235                      (let ((doc-dir  (string-append %output "/share/doc/"
 236                                                     ,name "-" ,version))
 237                            (font-dir (string-append %output
 238                                                     "/share/fonts/truetype")))
 239                        (mkdir-p doc-dir)
 240                        (substitute* "Makefile"
 241                          (("\\$\\(TMPDIR\\)") doc-dir)
 242                          (("sfd/\\*.ttf") ""))
 243                        (system* "make" "ttftar")
 244                        (mkdir-p font-dir)
 245                        (for-each (lambda (file)
 246                                    (install-file file font-dir))
 247                                  (filter
 248                                    (lambda (file) (string-suffix? "ttf" file))
 249                                    (find-files "." "")))))))
 250        #:test-target "tests"))
 251     ;; replace python 3 with python 2
 252     ;; python 3 support commits aren't yet released in 20120503
 253     ;; so freefont needs python 2 support in fontforge
 254     (native-inputs `(("fontforge" ,(package (inherit fontforge)
 255                                      (inputs `(("python-2" ,python-2)
 256                                      ,@(package-inputs fontforge)))))))
 257     (home-page "https://www.gnu.org/software/freefont/")
 258     (synopsis "Unicode-encoded outline fonts")
 259     (description
 260      "The GNU Freefont project aims to provide a set of free outline
 261  (PostScript Type0, TrueType, OpenType...) fonts covering the ISO
 262 10646/Unicode UCS (Universal Character Set).")
 263     (license license:gpl3+)
 264     (properties '((upstream-name . "freefont")
 265                   (ftp-directory . "/gnu/freefont")))))
 266
 267 (define-public font-liberation
 268   (package
 269     (name "font-liberation")
 270     (version "2.00.1")
 271     (source (origin
 272               (method url-fetch)
 273               (uri (string-append "https://releases.pagure.org/"
 274                                   "liberation-fonts/liberation-fonts-ttf-"
 275                                   version ".tar.gz"))
 276               (sha256
 277                (base32
 278                 "010m4zfqan4w04b6bs9pm3gapn9hsb18bmwwgp2p6y6idj52g43q"))))
 279     (build-system font-build-system)
 280     (home-page "https://pagure.io/liberation-fonts/")
 281     (synopsis
 282      "Fonts compatible with Arial, Times New Roman, and Courier New")
 283     (description
 284      "The Liberation font family aims at metric compatibility with
 285 Arial, Times New Roman, and Courier New.
 286 There are three sets:
 287
 288 @enumerate
 289 @item Sans (a substitute for Arial, Albany, Helvetica, Nimbus Sans L, and
 290 Bitstream Vera Sans);
 291 @item Serif (a substitute for Times New Roman, Thorndale, Nimbus Roman, and
 292 Bitstream Vera Serif);
 293 @item Mono (a substitute for Courier New, Cumberland, Courier, Nimbus Mono L,
 294 and Bitstream Vera Sans Mono).
 295 @end enumerate
 296
 297 The Liberation Fonts are sponsored by Red Hat.")
 298     (license license:silofl1.1)))
 299
 300 (define-public font-linuxlibertine
 301   (package
 302     (name "font-linuxlibertine")
 303     (version "5.3.0")
 304     (source (origin
 305               (method url-fetch/tarbomb)
 306               (uri (string-append "mirror://sourceforge/linuxlibertine/"
 307                                   "linuxlibertine/" version
 308                                   "/LinLibertineSRC_" version "_2012_07_02.tgz"))
 309               (sha256
 310                (base32
 311                 "0x7cz6hvhpil1rh03rax9zsfzm54bh7r4bbrq8rz673gl9h47v0v"))))
 312     (build-system font-build-system)
 313     (arguments
 314      `(#:phases
 315        (modify-phases %standard-phases
 316          (add-before 'install 'build
 317            (lambda _
 318              (let ((compile
 319                     (lambda (name ext)
 320                       (invoke
 321                        "fontforge" "-lang=ff"
 322                        "-c" (string-append "Open('" name "');"
 323                                            "Generate('"
 324                                            (basename name "sfd") ext
 325                                            "')")))))
 326                (for-each (lambda (name)
 327                            (and (compile name "ttf")
 328                                 (compile name "otf")))
 329                          (find-files "." "\\.sfd$"))
 330                #t))))))
 331     (native-inputs
 332      `(("fontforge" ,fontforge)))
 333     (home-page "http://www.linuxlibertine.org/")
 334     (synopsis "Serif and sans serif typefaces")
 335     (description "The Linux Libertine fonts is a set of typefaces containing
 336 both a Serif version (\"Linux Libertine\") and a Sans Serif (\"Linux
 337 Biolinum\") designed to be used together as an alternative for Times/Times New
 338 Roman and Helvetica/Arial.  The Serif typeface comes in two shapes and two
 339 weights, and with a Small Capitals version of the regular typeface.  Linux
 340 Biolinum is available in both Regular and Bold weights.")
 341     ;; The fonts are released under either of these licenses.
 342     (license (list license:gpl2+ license:silofl1.1))))
 343
 344 (define-public font-terminus
 345   (package
 346     (name "font-terminus")
 347     (version "4.47")
 348     (source
 349      (origin
 350        (method url-fetch)
 351        (uri (string-append "mirror://sourceforge/terminus-font/terminus-font-"
 352                            version "/terminus-font-" version ".tar.gz"))
 353        (sha256
 354         (base32 "15qjcpalcxjiwsjgjg5k88vkwp56cs2nnx4ghya6mqp4i1c206qg"))))
 355     (build-system gnu-build-system)
 356     (native-inputs
 357      `(("bdftopcf" ,bdftopcf)
 358        ("font-util" ,font-util)
 359        ("mkfontdir" ,mkfontdir)
 360        ("pkg-config" ,pkg-config)
 361        ("python" ,python)))
 362     (arguments
 363      `(#:tests? #f))                    ; no test target in tarball
 364     (home-page "http://terminus-font.sourceforge.net/")
 365     (synopsis "Simple bitmap programming font")
 366     (description "Terminus Font is a clean, fixed-width bitmap font, designed
 367 for long periods of working with computers (8 or more hours per day).")
 368     (license license:silofl1.1)))
 369
 370 (define-public font-adobe-source-han-sans
 371   (package
 372     (name "font-adobe-source-han-sans")
 373     (version "1.004")
 374     (source (origin
 375               (method url-fetch)
 376               (uri (string-append
 377                     "https://github.com/adobe-fonts/source-han-sans/archive/"
 378                     version "R.tar.gz"))
 379               (file-name (string-append "source-han-sans-" version "R.tar.gz"))
 380               (sha256
 381                (base32
 382                 "1ssx0fw90sy6mj8fv8fv4dgzszpqwbmwpjnlx16g4pvaqzdmybbz"))))
 383     (outputs '("out"                 ; OpenType/CFF Collection (OTC), 121 MiB.
 384                "cn" "jp" "kr" "tw")) ; Region-specific Subset OpenType/CFF.
 385     (build-system trivial-build-system)
 386     (arguments
 387      `(#:modules ((guix build utils))
 388        #:builder
 389        (begin
 390          (use-modules (guix build utils))
 391          (let ((tar  (string-append (assoc-ref %build-inputs
 392                                                "tar")
 393                                     "/bin/tar"))
 394                (PATH (string-append (assoc-ref %build-inputs
 395                                                "gzip")
 396                                     "/bin"))
 397                (install-opentype-fonts
 398                 (lambda (fonts-dir out)
 399                   (copy-recursively fonts-dir
 400                                     (string-append (assoc-ref %outputs out)
 401                                                    "/share/fonts/opentype")))))
 402            (setenv "PATH" PATH)
 403            (invoke tar "xvf" (assoc-ref %build-inputs "source"))
 404            (chdir (string-append "source-han-sans-" ,version "R"))
 405            (install-opentype-fonts "OTC" "out")
 406            (install-opentype-fonts "SubsetOTF/CN" "cn")
 407            (install-opentype-fonts "SubsetOTF/JP" "jp")
 408            (install-opentype-fonts "SubsetOTF/KR" "kr")
 409            (install-opentype-fonts "SubsetOTF/TW" "tw")
 410            (for-each delete-file (find-files %output "\\.zip$"))
 411            #t))))
 412     (native-inputs
 413      `(("gzip" ,gzip)
 414        ("tar" ,tar)))
 415     (home-page "https://github.com/adobe-fonts/source-han-sans")
 416     (synopsis "Pan-CJK fonts")
 417     (description
 418      "Source Han Sans is a sans serif Pan-CJK font family that is offered in
 419 seven weights: ExtraLight, Light, Normal, Regular, Medium, Bold, and Heavy.
 420 And in several OpenType/CFF-based deployment configurations to accommodate
 421 various system requirements or limitations.  As the name suggests, Pan-CJK
 422 fonts are intended to support the characters necessary to render or display
 423 text in Simplified Chinese, Traditional Chinese, Japanese, and Korean.")
 424     (license license:silofl1.1)))
 425
 426 (define-public font-cns11643
 427   ;; Since upstream doesn't provide any version numbers, the date of the last
 428   ;; edit is used, taken from https://data.gov.tw/dataset/5961
 429   ;; XXX: The source is also updated in-place, so it may be desirable to mirror
 430   ;; it elsewhere to avoid suddenly losing the current source file.
 431   (package
 432     (name "font-cns11643")
 433     (version "98.1.20180605")
 434     (source (origin
 435               (method url-fetch)
 436               (uri "http://www.cns11643.gov.tw/AIDB/Open_Data.zip")
 437               (sha256
 438                (base32
 439                 "000a9whrjr1cd4pjc23pbl60zwkq3wcb5g61p9qi7fn3hwkp0kyw"))))
 440     (build-system font-build-system)
 441     (home-page "http://www.cns11643.gov.tw/AIDB/welcome.do")
 442     (synopsis "CJK TrueType fonts, TW-Kai and TW-Sung")
 443     (description
 444      "@code{CNS 11643} character set (Chinese National Standard, or Chinese
 445 Standard Interchange Code) is the standard character set of the Republic of
 446 China (Taiwan) for Chinese Characters and other Unicode symbols.  Contained
 447 are six TrueType fonts based on two script styles, Regular script (Kai), and
 448 Sung/Ming script, each with three variants:
 449
 450 @itemize
 451 @item @code{CNS 11643} (@code{TW-Kai} and @code{TW-Sung}): Tens of thousands
 452 of CJK characters from frequency tables published by the Taiwanese
 453 Ministry of Education.  ISO 10646 and Unicode compatible encoding.
 454 @item @code{Big-5 Plus}: Several thousand frequently used CJK characters
 455 encoded in the user defined area of the Big-5 code.
 456 @item @code{Big-5 Extended}: A Big-5 character set based on the
 457 @code{Big-5 Plus} and @code{CNS 11643} character sets.
 458 @end itemize\n")
 459     (license (license:non-copyleft
 460               "http://data.gov.tw/license")))) ; CC-BY 4.0 compatible
 461
 462 (define-public font-cns11643-swjz
 463   (package
 464     (name "font-cns11643-swjz")
 465     (version "1")
 466     (source
 467      (origin
 468        (method url-fetch)
 469        (uri "https://www.moedict.tw/fonts/truetype/cns11643/ebas927.ttf")
 470        (sha256
 471         (base32
 472          "1qkljldbmb53zp1rcmpsb8rzy67rnsqcjxi549m9743ifk4isl78"))))
 473     (build-system font-build-system)
 474     (home-page
 475      (string-append "http://www.cns11643.gov.tw/AIDB/download.do"
 476                     "?name=%E5%AD%97%E5%9E%8B%E4%B8%8B%E8%BC%89"))
 477     (synopsis "TrueType seal script font")
 478     (description
 479      "@code{Shuowen Jiezi} is a TrueType seal script font based on the ancient
 480 text of the same name published by the Executive Yuan of Taiwan.  6721 glyphs
 481 are included, at Unicode compatible code points corresponding to their modern
 482 variants.")
 483     ;; Original text only available in Chinese. More info at
 484     ;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=26703#11
 485     (license (license:non-copyleft
 486               "http://www.cns11643.gov.tw/AIDB/copyright.do"))))
 487
 488 (define-public font-wqy-zenhei
 489   (package
 490     (name "font-wqy-zenhei")
 491     (version "0.9.45")
 492     (source (origin
 493               (method url-fetch)
 494               (uri (string-append
 495                     "mirror://sourceforge/wqy/wqy-zenhei/" version
 496                     "%20%28Fighting-state%20RC1%29/wqy-zenhei-"
 497                     version ".tar.gz"))
 498               (sha256
 499                (base32
 500                 "1mkmxq8g2hjcglb3zajfqj20r4r88l78ymsp2xyl5yav8w3f7dz4"))))
 501     (build-system font-build-system)
 502     (home-page "https://wenq.org/wqy2/")
 503     (synopsis "CJK font")
 504     (description
 505      "WenQuanYi Zen Hei is a Hei-Ti style (sans-serif type) Chinese outline
 506 font.  It is designed for general purpose text formatting and on-screen
 507 display of Chinese characters and symbols from many other languages.
 508 WenQuanYi Zen Hei provides a rather complete coverage of Chinese Hanzi glyphs,
 509 including both simplified and traditional forms.  The total glyph number in
 510 this font is over 35,000, including over 21,000 Chinese Hanzi.  This font has
 511 full coverage of the GBK (CP936) charset, CJK Unified Ideographs, as well as
 512 the code-points needed for zh_cn, zh_sg, zh_tw, zh_hk, zh_mo, ja (Japanese) and
 513 ko (Korean) locales for @code{fontconfig}.")
 514     ;; GPLv2 with font embedding exception.
 515     (license license:gpl2)))
 516
 517 (define-public font-wqy-microhei
 518   (package
 519     (name "font-wqy-microhei")
 520     (version "0.2.0-beta")
 521     (source (origin
 522               (method url-fetch)
 523               (uri (string-append "mirror://sourceforge/wqy/wqy-microhei/"
 524                                   version "/wqy-microhei-" version ".tar.gz"))
 525               (sha256
 526                (base32
 527                 "0gi1yxqph8xx869ichpzzxvx6y50wda5hi77lrpacdma4f0aq0i8"))))
 528     (build-system font-build-system)
 529     (home-page "http://wenq.org/wqy2/")
 530     (synopsis "CJK font")
 531     (description
 532      "WenQuanYi Micro Hei is a Sans-Serif style (also known as Hei, Gothic or
 533 Dotum among the Chinese/Japanese/Korean users) high quality CJK outline font.
 534 It was derived from \"Droid Sans Fallback\" and \"Droid Sans\" released by
 535 Google Inc.  This font contains all the unified CJK Han glyphs in the range of
 536 U+4E00-U+9FC3 defined in Unicode Standard 5.1, together with many other
 537 languages unicode blocks, including Latins, Extended Latins, Hanguls and
 538 Kanas.  The font file is extremely compact (~4M) compared with most known CJK
 539 fonts.")
 540     ;; This font is licensed under Apache2.0 or GPLv3 with font embedding
 541     ;; exceptions.
 542     (license license:gpl3)))
 543
 544 (define-public font-rachana
 545   (package
 546     (name "font-rachana")
 547     (version "7.0")
 548     (source
 549      (origin
 550        (method url-fetch)
 551        (uri (string-append
 552              "https://gitlab.com/smc/rachana/repository/archive.tar.gz?ref=Version"
 553              version))
 554        (file-name (string-append name "-" version ".tar.gz"))
 555        (sha256
 556         (base32
 557          "0jc091gshna6p1dd6lf507jxkgk6rsja835fc9dm71mcplq53bm1"))))
 558     (build-system font-build-system)
 559     (home-page "https://smc.org.in")
 560     (synopsis "Malayalam font")
 561     (description
 562      "Rachana is a Malayalam font designed by Hussain K H.  The project was
 563 part of Rachana Aksharavedi for the original script of Malayalam in computing.
 564 Rachana has about 1,200+ glyphs for Malayalam and contains glyphs required for
 565 printing old Malayalam books without compromising the writing style.")
 566     ;; This font is licensed under SIL 1.1 or GPLv3+ with font embedding
 567     ;; exceptions.
 568     (license (list license:silofl1.1 license:gpl3+))))
 569
 570 (define-public font-tex-gyre
 571   (package
 572     (name "font-tex-gyre")
 573     (version "2.005")
 574     (source
 575      (origin
 576        (method url-fetch/zipbomb)
 577        (uri (string-append "http://www.gust.org.pl/projects/e-foundry/"
 578                            "tex-gyre/whole/tg-" version "otf.zip"))
 579        (sha256
 580         (base32
 581          "0kph9l3g7jb2bpmxdbdg5zl56wacmnvdvsdn7is1gc750sqvsn31"))))
 582     (build-system font-build-system)
 583     (home-page "http://www.gust.org.pl/projects/e-foundry/tex-gyre/")
 584     (synopsis "Remake of Ghostscript fonts")
 585     (description "The TeX Gyre collection of fonts is the result of an
 586 extensive remake and extension of the freely available base PostScript fonts
 587 distributed with Ghostscript version 4.00.  The collection contains the
 588 following fonts in the OpenType format: Adventor, Bonum, Chorus, Cursor,
 589 Heros, Pagella, Schola, Termes.")
 590     (license license:gfl1.0)))
 591
 592 (define-public font-anonymous-pro
 593   (package
 594     (name "font-anonymous-pro")
 595     (version "1.002")
 596     (source (origin
 597               (method url-fetch)
 598               (uri (string-append
 599                     "https://www.marksimonson.com/assets/content/fonts/"
 600                     "AnonymousPro-" version ".zip"))
 601               (sha256
 602                (base32
 603                 "1asj6lykvxh46czbal7ymy2k861zlcdqpz8x3s5bbpqwlm3mhrl6"))))
 604     (build-system font-build-system)
 605     (home-page "https://www.marksimonson.com/fonts/view/anonymous-pro")
 606     (synopsis "Fixed-width fonts designed with coding in mind")
 607     (description "Anonymous Pro is a family of four fixed-width fonts designed
 608 with coding in mind.  Anonymous Pro features an international, Unicode-based
 609 character set, with support for most Western and Central European Latin-based
 610 languages, plus Greek and Cyrillic.")
 611     (license license:silofl1.1)))
 612
 613 (define-public font-gnu-unifont
 614   (package
 615     (name "font-gnu-unifont")
 616     (version "12.0.01")
 617     (source (origin
 618               (method url-fetch)
 619               (uri (string-append
 620                     "mirror://gnu/unifont/unifont-" version "/unifont-"
 621                     version ".tar.gz"))
 622               (sha256
 623                (base32
 624                 "059j82z6z4wqyy3261ns0zg2b2vh2wvxxfbsa9hra9xasism49vb"))))
 625     (build-system gnu-build-system)
 626     (outputs '("out"   ; TrueType version
 627                "pcf"   ; PCF (bitmap) version
 628                "psf"   ; PSF (console) version
 629                "bin")) ; Utilities to manipulate '.hex' format
 630     (arguments
 631      '(#:tests? #f          ; no check target
 632        #:phases
 633        (modify-phases %standard-phases
 634          (replace
 635           'configure
 636           (lambda _ (setenv "CC" "gcc") #t))
 637          (replace
 638           'install
 639           (lambda* (#:key outputs #:allow-other-keys)
 640             (let* ((ttf (string-append (assoc-ref outputs "out")
 641                                        "/share/fonts/truetype"))
 642                    (pcf (string-append (assoc-ref outputs "pcf")
 643                                        "/share/fonts/misc"))
 644                    (psf (string-append (assoc-ref outputs "psf")
 645                                        "/share/consolefonts"))
 646                    (bin (assoc-ref outputs "bin")))
 647               (invoke "make"
 648                       (string-append "PREFIX=" bin)
 649                       (string-append "TTFDEST=" ttf)
 650                       (string-append "PCFDEST=" pcf)
 651                       (string-append "CONSOLEDEST=" psf)
 652                       "install")
 653               ;; Move Texinfo file to the right place.
 654               (mkdir (string-append bin "/share/info"))
 655               (invoke "gzip" "-9n" "doc/unifont.info")
 656               (install-file "doc/unifont.info.gz"
 657                             (string-append bin "/share/info"))
 658               #t))))))
 659     (inputs
 660      `(("perl" ,perl))) ; for utilities
 661     (synopsis
 662      "Large bitmap font covering Unicode's Basic Multilingual Plane")
 663     (description
 664      "GNU Unifont is a bitmap font covering essentially all of
 665 Unicode's Basic Multilingual Plane.  The package also includes
 666 utilities to ease adding new glyphs to the font.")
 667     (home-page "http://unifoundry.com/unifont.html")
 668     (properties '((upstream-name . "unifont")))
 669     (license license:gpl2+)))
 670
 671 (define-public font-google-noto
 672   (package
 673     (name "font-google-noto")
 674     (version "20170403")
 675     (source (origin
 676               (method url-fetch/zipbomb)
 677               (uri (string-append "https://noto-website.storage.googleapis.com/"
 678                                   "pkgs/Noto-hinted.zip"))
 679               (file-name (string-append name "-" version ".zip"))
 680               (sha256
 681                (base32
 682                 "1p92a6dvs7wqwjfpp1ahr9z1wz35am0l8r78521383spd77bmrfm"))))
 683     (build-system font-build-system)
 684     (home-page "https://www.google.com/get/noto/")
 685     (synopsis "Fonts to cover all languages")
 686     (description "Google Noto Fonts is a family of fonts designed to support
 687 all languages with a consistent look and aesthetic.  Its goal is to properly
 688 display all Unicode symbols.")
 689     (license license:silofl1.1)))
 690
 691 (define-public font-google-roboto
 692   (package
 693     (name "font-google-roboto")
 694     (version "2.136")
 695     (source
 696      (origin
 697        (method url-fetch)
 698        (uri (string-append "https://github.com/google/roboto/releases/download/"
 699                            "v" version "/roboto-hinted.zip"))
 700        (file-name (string-append name "-" version ".zip"))
 701        (sha256
 702         (base32
 703          "0spscx08fad7i8qs7icns96iwcapniq8lwwqqvbf7bamvs8qfln4"))))
 704     (build-system font-build-system)
 705     (home-page "https://github.com/google/roboto")
 706     (synopsis "The Roboto family of fonts")
 707     (description
 708      "Roboto is Google’s signature family of fonts, the default font on Android
 709 and Chrome OS, and the recommended font for the
 710 visual language \"Material Design\".")
 711     (license license:asl2.0)))
 712
 713 (define-public font-un
 714   (package
 715     (name "font-un")
 716     (version "1.0.2-080608")
 717     (source (origin
 718               (method url-fetch)
 719               (uri (string-append
 720                     "https://kldp.net/unfonts/release/2607-"
 721                     "un-fonts-core-" version ".tar.gz"))
 722               (file-name (string-append name "-" version ".tar.gz"))
 723               (sha256
 724                (base32
 725                 "13liaz2pmww3aqabm55la5npd08m1skh334ky7qfidxaz5s742iv"))))
 726     (build-system font-build-system)
 727     (home-page "https://kldp.net/projects/unfonts/")
 728     (synopsis "Collection of Korean fonts")
 729     (description
 730      "Un-fonts is a family of mainly Korean fonts.
 731 It contains the following fonts and styles:
 732
 733 @enumerate
 734 @item UnBatang, UnBatangBold: serif;
 735 @item UnDotum, UnDotumBold: sans-serif;
 736 @item UnGraphic, UnGraphicBold: sans-serif style;
 737 @item UnDinaru, UnDinaruBold, UnDinaruLight;
 738 @item UnPilgi, UnPilgiBold: script;
 739 @item UnGungseo: cursive, brush-stroke.
 740 @end enumerate\n")
 741     (license license:gpl2+)))
 742
 743 (define-public font-fantasque-sans
 744   (package
 745     (name "font-fantasque-sans")
 746     (version "1.7.2")
 747     (source
 748      (origin
 749        (method git-fetch)
 750        (uri (git-reference
 751              (url "https://github.com/belluzj/fantasque-sans.git")
 752              (commit (string-append "v" version))))
 753        (file-name (git-file-name name version))
 754        (sha256
 755         (base32
 756          "1gjranq7qf20rfxnpxsckv1hl35nzsal0rjs475nhfbpqy5wmly6"))))
 757     (build-system gnu-build-system)
 758     (native-inputs
 759      `(("ttfautohint" ,ttfautohint)
 760        ("woff-tools" ,woff-tools)
 761        ("fontforge" ,fontforge)
 762        ("woff2" ,woff2)
 763        ("ttf2eot" ,ttf2eot)
 764        ("zip" ,zip)))
 765     (arguments
 766      `(#:tests? #f                 ;test target intended for visual inspection
 767        #:phases (modify-phases %standard-phases
 768                   (delete 'configure)   ;no configuration
 769                   (add-before 'build 'xrange->range
 770                     ;; Rather than use a python2 fontforge, just replace the
 771                     ;; offending function.
 772                     (lambda _
 773                       (substitute* "Scripts/fontbuilder.py"
 774                         (("xrange") "range"))
 775                       #t))
 776                   (replace 'install
 777                     ;; 'make install' wants to install to ~/.fonts, install to
 778                     ;; output instead.  Install only the "Normal" variant.
 779                     (lambda* (#:key outputs #:allow-other-keys)
 780                       (let* ((out (assoc-ref outputs "out"))
 781                              (font-dir (string-append out "/share/fonts"))
 782                              (truetype-dir (string-append font-dir "/truetype"))
 783                              (opentype-dir (string-append font-dir "/opentype"))
 784                              (webfonts-dir (string-append font-dir "/webfonts")))
 785                         (with-directory-excursion "Variants/Normal"
 786                           (copy-recursively "OTF" opentype-dir)
 787                           (for-each (lambda (f) (install-file f truetype-dir))
 788                                     (find-files "." "\\.ttf$"))
 789                           (copy-recursively "Webfonts" webfonts-dir)
 790                           #t)))))))
 791     (synopsis "Font family with a monospaced variant for programmers")
 792     (description
 793      "Fantasque Sans Mono is a programming font designed with functionality in
 794 mind.  The font includes a bold version and a good italic version with new
 795 glyph designs, not just an added slant.")
 796     (home-page "https://fontlibrary.org/en/font/fantasque-sans-mono")
 797     (license license:silofl1.1)))
 798
 799 (define-public font-hack
 800   (package
 801     (name "font-hack")
 802     (version "3.003")
 803     (source (origin
 804               (method url-fetch/zipbomb)
 805               (uri (string-append
 806                     "https://github.com/source-foundry/Hack/releases/download/v"
 807                     version "/Hack-v" version "-ttf.zip"))
 808               (sha256
 809                (base32
 810                 "1b4hh8zkrx92m2v2vfkja1napb0192p0j3laqr0m018z3dih89hc"))))
 811     (build-system font-build-system)
 812     (home-page "https://sourcefoundry.org/hack/")
 813     (synopsis "Typeface designed for source code")
 814     (description
 815      "Hack is designed to be a workhorse typeface for code.  It expands upon
 816 the Bitstream Vera & DejaVu projects, provides over 1,500 glyphs, and includes
 817 Powerline support.")
 818     (license
 819      ;; See https://github.com/source-foundry/Hack/issues/271 for details.
 820      (list license:expat                ; the Hack modifications to...
 821            license:public-domain        ; ...the DejaVu modifications to...
 822            (license:x11-style           ; ...the Bitstream Vera typeface
 823             "file://LICENSE.md" "Bitstream Vera License")))))
 824
 825 (define-public font-adobe-source-code-pro
 826   (package
 827     (name "font-adobe-source-code-pro")
 828     (version "2.030R-ro-1.050R-it")
 829     (source (origin
 830               (method url-fetch)
 831               (uri (string-append
 832                     "https://github.com/adobe-fonts/source-code-pro/archive/"
 833                     (regexp-substitute/global
 834                      ;; The upstream tag uses "/" between the roman and italic
 835                      ;; versions, so substitute our "-" separator here.
 836                      #f "R-ro-" version 'pre "R-ro/" 'post) ".tar.gz"))
 837               (file-name (string-append name "-" version ".tar.gz"))
 838               (sha256
 839                (base32
 840                 "0arhhsf3i7ss39ykn73d1j8k4n8vx7115xph6jwkd970p1cxvr54"))))
 841     (build-system font-build-system)
 842     (home-page "https://github.com/adobe-fonts/source-code-pro")
 843     (synopsis
 844      "Monospaced font family for user interface and coding environments")
 845     (description
 846      "Source Code Pro is a set of monospaced OpenType fonts that have been
 847 designed to work well in user interface environments.")
 848     (license license:silofl1.1)))
 849
 850 (define-public font-adobe-source-sans-pro
 851   (package
 852     (name "font-adobe-source-sans-pro")
 853     (version "2.040R-ro-1.090R-it")
 854     (source (origin
 855               (method url-fetch)
 856               (uri (string-append
 857                     "https://github.com/adobe-fonts/source-sans-pro/archive/"
 858                     (regexp-substitute/global
 859                      ;; The upstream tag uses "/" between the roman and italic
 860                      ;; versions, so substitute our "-" separator here.
 861                      #f "R-ro-" version 'pre "R-ro/" 'post) ".tar.gz"))
 862               (file-name (string-append name "-" version ".tar.gz"))
 863               (sha256
 864                (base32
 865                 "1wpbhd2idps53ph8rg1mhr3vz4lsgbpjprcq10nliwcxdz9d8lv0"))))
 866     (build-system font-build-system)
 867     (home-page "https://github.com/adobe-fonts/source-sans-pro")
 868     (synopsis
 869      "Sans serif font family for user interface environments")
 870     (description
 871      "Source Sans Pro is a set of OpenType fonts that have been designed to
 872 work well in user interface (UI) environments.")
 873     (license license:silofl1.1)))
 874
 875 (define-public font-adobe-source-serif-pro
 876   (package
 877     (name "font-adobe-source-serif-pro")
 878     (version "2.007R-ro-1.007R-it")
 879     (source (origin
 880               (method url-fetch)
 881               (uri (string-append
 882                     "https://github.com/adobe-fonts/source-serif-pro/archive/"
 883                     (regexp-substitute/global
 884                      ;; The upstream tag uses "/" between the roman and italic
 885                      ;; versions, so substitute our "-" separator here.
 886                      #f "R-ro-" version 'pre "R-ro/" 'post) ".tar.gz"))
 887               (file-name (string-append name "-" version ".tar.gz"))
 888               (sha256
 889                (base32
 890                 "1sws9k26ldqk375qsigk1zv8cq1xlvadjwvv3dqrcc3qzm1c7hwc"))))
 891     (build-system font-build-system)
 892     (home-page "https://github.com/adobe-fonts/source-serif-pro")
 893     (synopsis
 894      "Serif typeface to complement Source Sans Pro for setting text")
 895     (description
 896      "Source Serif Pro is a set of OpenType fonts to complement the Source
 897 Sans Pro family.")
 898     (license license:silofl1.1)))
 899
 900 (define-public font-fira-mono
 901   (package
 902     (name "font-fira-mono")
 903     (version "3.206")
 904     (source (origin
 905               (method url-fetch)
 906               (uri (string-append "https://carrois.com/downloads/fira_mono_3_2/"
 907                                   "FiraMonoFonts"
 908                                   (string-replace-substring version "." "")
 909                                   ".zip"))
 910               (sha256
 911                (base32
 912                 "1z65x0dw5dq6rs6p9wyfrir50rlh95vgzsxr8jcd40nqazw4jhpi"))))
 913     (build-system font-build-system)
 914     (home-page "https://mozilla.github.io/Fira/")
 915     (synopsis "Mozilla's monospace font")
 916     (description "This is the typeface used by Mozilla in Firefox OS.")
 917     (license license:silofl1.1)))
 918
 919 (define-public font-fira-sans
 920   (package
 921     (name "font-fira-sans")
 922     (version "4.202")
 923     (source (origin
 924               (method url-fetch)
 925               (uri (string-append "https://github.com/mozilla/Fira/archive/"
 926                                   version ".tar.gz"))
 927               (file-name (string-append name "-" version ".tar.gz"))
 928               (sha256
 929                (base32
 930                 "1r6zdnqqp4bgq5nmgqbj0vvj7x1h9w912851ggbl9wc7fdjnjqnq"))))
 931     (build-system font-build-system)
 932     (home-page "https://mozilla.github.io/Fira/")
 933     (synopsis "Mozilla's Fira Sans Font")
 934     (description "This is the typeface used by Mozilla in Firefox OS.")
 935     (license license:silofl1.1)))
 936
 937 (define-public font-fira-code
 938   (package
 939     (name "font-fira-code")
 940     (version "1.206")
 941     (source (origin
 942               (method url-fetch/zipbomb)
 943               (uri (string-append "https://github.com/tonsky/FiraCode/releases/"
 944                                   "download/" version
 945                                   "/FiraCode_" version ".zip"))
 946               (sha256
 947                (base32
 948                 "02r1lcp0c9135ps71v66wdvbsrcxwirrp0blqsa1xbjkkq2rwgj3"))))
 949     (build-system font-build-system)
 950     (home-page "https://mozilla.github.io/Fira/")
 951     (synopsis "Monospaced font with programming ligatures")
 952     (description
 953      "Fira Code is an extension of the Fira Mono font containing a set of ligatures
 954 for common programming multi-character combinations.  This is just a font rendering
 955 feature: underlying code remains ASCII-compatible.  This helps to read and understand
 956 code faster.  For some frequent sequences like .. or //, ligatures allow us to
 957 correct spacing.")
 958     (license license:silofl1.1)))
 959
 960 (define-public font-awesome
 961   (package
 962    (name "font-awesome")
 963    ;; XXX The build scripts of version 5 are not freely licensed and
 964    ;; so we have to stick with version 4 for now:
 965    ;; <https://bugs.gnu.org/32916>
 966    (version "4.7.0")
 967    (source (origin
 968             (method url-fetch)
 969             (uri (string-append "http://fontawesome.io/assets/"
 970                                 name "-" version ".zip"))
 971             (sha256
 972              (base32
 973               "1m1rfwm4sjkv10j3xd2dhwk286a5912b2zgvc692cmxi5gxs68jf"))))
 974    (build-system font-build-system)
 975    (home-page "http://fontawesome.io")
 976    (synopsis "Font that contains a rich iconset")
 977    (description
 978     "Font Awesome is a full suite of pictographic icons for easy scalable
 979 vector graphics.")
 980    (license license:silofl1.1)))
 981
 982 (define-public font-tamzen
 983   (package
 984     (name "font-tamzen")
 985     (version "1.11.4")
 986     (source
 987      (origin
 988        (method url-fetch)
 989        (uri (string-append "https://github.com/sunaku/tamzen-font/archive/"
 990                            "Tamzen-" version ".tar.gz"))
 991        (file-name (string-append name "-" version ".tar.gz"))
 992        (sha256
 993         (base32
 994          "1ryd7gp6qiwaqw73jqbmh4kwlriyd8xykh4j7z90z8xp9fm7lrys"))))
 995     (build-system trivial-build-system)
 996     (arguments
 997      `(#:modules ((guix build utils))
 998        #:builder
 999        (begin
1000          (use-modules (guix build utils))
1001
1002          (let ((tar      (string-append (assoc-ref %build-inputs "tar")
1003                                         "/bin/tar"))
1004                (PATH     (string-append (assoc-ref %build-inputs "gzip")
1005                                         "/bin"))
1006                (font-dir (string-append %output "/share/fonts/misc"))
1007                (psf-dir (string-append %output "/share/kbd/consolefonts"))
1008                (src-pcf-dir (string-append "tamzen-font-Tamzen-"
1009                                             ,version "/pcf")))
1010            (setenv "PATH" PATH)
1011            (invoke tar "xvf" (assoc-ref %build-inputs "source"))
1012            (mkdir-p font-dir)
1013            (mkdir-p psf-dir)
1014            (chdir src-pcf-dir)
1015            (for-each (lambda (pcf)
1016                        (install-file pcf font-dir))
1017                      (find-files "." "\\.pcf$"))
1018            (chdir "../psf")
1019            (for-each (lambda (psf)
1020                        (install-file psf psf-dir))
1021                      (find-files "." "\\.psf$"))
1022            #t))))
1023     (native-inputs
1024      `(("tar" ,tar)
1025        ("gzip" ,gzip)))
1026     (home-page "https://github.com/sunaku/tamzen-font")
1027     (synopsis "Monospaced bitmap font for console and X11")
1028     (description
1029      "Tamzen is a fork of the @code{Tamsyn} font.  It is programatically forked
1030 from @code{Tamsyn} version 1.11, backporting glyphs from older versions while
1031 deleting deliberately empty glyphs (which are marked as unimplemented) to
1032 allow secondary/fallback fonts to provide real glyphs at those codepoints.
1033
1034 The @code{TamzenForPowerline} fonts provide additional @code{Powerline} symbols,
1035 which are programatically injected with @code{bitmap-font-patcher} and
1036 later hand-tweaked with the gbdfed(1) editor:
1037
1038 @enumerate
1039 @item all icons are expanded to occupy the maximum available space
1040 @item the branch of the fork icon ( U+E0A0) was made larger than the trunk
1041 @item for the newline icon ( U+E0A1), the @emph{N} was made larger at the bottom
1042 @item the keyhole in the padlock icon ( U+E0A2) was replaced with @emph{//} lines.
1043 @end enumerate\n")
1044     (license (license:non-copyleft "file://LICENSE"))))
1045
1046 (define-public font-comic-neue
1047   (package
1048     (name "font-comic-neue")
1049     (version "2.3")
1050     (source (origin
1051               (method url-fetch/zipbomb)
1052               (uri (string-append
1053                     "http://www.comicneue.com/comic-neue-" version ".zip"))
1054               (sha256
1055                (base32
1056                 "1695hkpd8kqnr2a88p8xs496slgzxjjkzpa9aa33ml3pnh7519zk"))))
1057     (build-system font-build-system)
1058     (arguments
1059      `(#:phases
1060        (modify-phases %standard-phases
1061          ;; Delete Mac OS X specific files. If not deleted, these cause
1062          ;; several hidden files to be installed.
1063          (add-before 'install 'delete-macosx-files
1064            (lambda _
1065              (delete-file-recursively "__MACOSX")
1066              #t))
1067          (add-after 'install 'install-conf
1068            (lambda* (#:key outputs #:allow-other-keys)
1069              (let ((conf-dir (string-append (assoc-ref outputs "out")
1070                                             "/share/fontconfig/conf.avail")))
1071                (mkdir-p conf-dir)
1072                (call-with-output-file
1073                    (string-append conf-dir "/30-comic-neue.conf")
1074                  (lambda (port)
1075                    (format port "<?xml version=\"1.0\"?>
1076 <!DOCTYPE fontconfig SYSTEM \"fonts.dtd\">
1077 <fontconfig>
1078   <!-- If Comic Sans is missing, use Comic Neue instead. -->
1079   <alias>
1080     <family>Comic Sans MS</family>
1081     <prefer>
1082       <family>Comic Neue</family>
1083     </prefer>
1084   </alias>
1085 </fontconfig>\n"))))
1086              #t)))))
1087     (home-page "http://www.comicneue.com/")
1088     (synopsis "Font that fixes the shortcomings of Comic Sans")
1089     (description
1090      "Comic Neue is a font that attempts to create a respectable casual
1091 typeface, by mimicking Comic Sans while fixing its most obvious shortcomings.")
1092     (license license:silofl1.1)))
1093
1094 (define-public font-iosevka
1095   (package
1096     (name "font-iosevka")
1097     (version "1.12.5")
1098     (source (origin
1099               (method url-fetch/zipbomb)
1100               (uri (string-append
1101                     "https://github.com/be5invis/Iosevka/releases/download/v"
1102                     version "/iosevka-pack-" version ".zip"))
1103               (sha256
1104                (base32
1105                 "0s3g6mk0ngwsrw9h9dqinb50cd9i8zhqdcmmh93fhyf4d87yfwyi"))))
1106     (build-system font-build-system)
1107     (home-page "https://be5invis.github.io/Iosevka/")
1108     (synopsis "Coders' typeface, built from code")
1109     (description
1110      "Iosevka is a slender monospace sans-serif or slab-serif typeface inspired
1111 by Pragmata Pro, M+, and PF DIN Mono, designed to be the ideal font for
1112 programming.  Iosevka is completely generated from its source code.")
1113     (license (list license:silofl1.1 ; build artifacts (i.e. the fonts)
1114                    license:bsd-3)))) ; supporting code
1115
1116 (define-public font-go
1117   (let ((commit "f03a046406d4d7fbfd4ed29f554da8f6114049fc")
1118         (revision "1"))
1119     (package
1120       (name "font-go")
1121       (version (string-append "20170330-" revision "." (string-take commit 7)))
1122       (source (origin
1123                 (file-name (string-append "go-image-" version "-checkout"))
1124                 (method git-fetch)
1125                 (uri (git-reference
1126                       (url "https://go.googlesource.com/image")
1127                       (commit commit)))
1128                 (sha256
1129                  (base32
1130                   "1aq6mnjayks55gd9ahavk6jfydlq5lm4xm0xk4pd5sqa74p5p74d"))))
1131       (build-system font-build-system)
1132       (arguments
1133        `(#:phases
1134          (modify-phases %standard-phases
1135            (add-before 'install 'chdir
1136              (lambda _
1137                (chdir "font/gofont/ttfs")
1138                #t)))))
1139       (home-page "https://blog.golang.org/go-fonts")
1140       (synopsis "The Go font family")
1141       (description
1142        "The Go font family is a set of WGL4 TrueType fonts from the Bigelow &
1143 Holmes type foundry, released under the same license as the Go programming
1144 language.  It includes a set of proportional, sans-serif fonts, and a set of
1145 monospace, slab-serif fonts.")
1146       (license license:bsd-3))))
1147
1148 (define-public font-google-material-design-icons
1149   (package
1150     (name "font-google-material-design-icons")
1151     (version "3.0.1")
1152     (source (origin
1153               (method url-fetch)
1154               (uri (string-append
1155                     "https://github.com/google/material-design-icons/archive/"
1156                     version ".tar.gz"))
1157               (sha256
1158                (base32
1159                 "018i3za9r6kf6svci33z09lc5pr5yz4164m8gzzwjzzqcrng0p5j"))
1160               (file-name (string-append name "-" version ".tar.gz"))))
1161     (build-system font-build-system)
1162     (home-page "http://google.github.io/material-design-icons")
1163     (synopsis "Icon font of Google Material Design icons")
1164     (description
1165      "Material design system icons are simple, modern, friendly, and sometimes
1166 quirky.  Each icon is created using our design guidelines to depict in simple
1167 and minimal forms the universal concepts used commonly throughout a UI.
1168 Ensuring readability and clarity at both large and small sizes, these icons
1169 have been optimized for beautiful display on all common platforms and display
1170 resolutions.")
1171     (license license:asl2.0)))
1172
1173 (define-public font-open-dyslexic
1174   (package
1175     (name "font-open-dyslexic")
1176     (version "20160623")
1177     (source
1178      (origin
1179        (method url-fetch)
1180        (uri (string-append "https://github.com/antijingoist/open-dyslexic/"
1181                            "archive/" version "-Stable.tar.gz"))
1182        (file-name (string-append name "-" version ".tar.gz"))
1183        (sha256
1184         (base32
1185          "0al0j9kb32kfavcpq1kigsd36yzvf5yhzqhds0jkh7ngbxyxwkx4"))))
1186     (build-system font-build-system)
1187     (home-page "https://opendyslexic.org")
1188     (synopsis "Font for dyslexics and high readability")
1189     (description "OpenDyslexic is a font designed to help readability for some
1190 of the symptoms of dyslexia.  Letters have heavy weighted bottoms to provide
1191 an indication of orientation to make it more difficult to confuse with other
1192 similar letters.  Consistently weighted bottoms can also help reinforce the
1193 line of text.  The unique shapes of each letter can help prevent flipping and
1194 swapping.  The italic style for OpenDyslexic has been crafted to be used for
1195 emphasis while still being readable.")
1196     (license
1197      (license:fsdg-compatible
1198       "https://www.gnome.org/fonts/#Final_Bitstream_Vera_Fonts"
1199       "The Font Software may be sold as part of a larger software package but
1200 no copy of one or more of the Font Software typefaces may be sold by
1201 itself."))))
1202
1203 (define-public font-dosis
1204   (package
1205     (name "font-dosis")
1206     (version "1.7")
1207     (source
1208      (origin
1209        (method url-fetch/zipbomb)
1210        (uri (string-append "http://www.impallari.com/media/releases/dosis-"
1211                            "v" version ".zip"))
1212        (sha256
1213         (base32
1214          "1qhci68f68mf87jd69vjf9qjq3wydgw1q7ivn3amjb65ls1s0c4s"))))
1215     (build-system font-build-system)
1216     (home-page "http://www.impallari.com/dosis")
1217     (synopsis "Very simple, rounded, sans serif family")
1218     (description
1219      "Dosis is a very simple, rounded, sans serif family.
1220 The lighter weights are minimalist.  The bolder weights have more personality.
1221 The medium weight is nice and balanced.  The overall result is a family
1222 that's clean and modern, and can express a wide range of voices & feelings.
1223 It comes in 7 incremental weights:
1224 ExtraLight, Light, Book, Medium, Semibold, Bold & ExtraBold")
1225     (license license:silofl1.1)))
1226
1227 (define-public font-culmus
1228   (package
1229     (name "font-culmus")
1230     (version "0.133")
1231     (source
1232      (origin
1233        (method url-fetch)
1234        (uri (string-append "https://sourceforge.net/projects/"
1235                            "culmus/files/culmus/" version "/culmus-src-"
1236                            version ".tar.gz"))
1237        (sha256
1238         (base32
1239          "02akysgsqhi15cck54xcacm16q5raf4l7shgb8fnj7xr3c1pbfyp"))))
1240     (build-system font-build-system)
1241     (arguments
1242      `(#:phases
1243        (modify-phases %standard-phases
1244          (add-before 'install 'build
1245            (lambda _
1246              (let ((compile
1247                     (lambda (name ext)
1248                       (invoke
1249                        "fontforge" "-lang=ff"
1250                        "-c" (string-append "Open('" name "');"
1251                                            "Generate('"
1252                                            (basename name "sfd") ext
1253                                            "')")))))
1254                ;; This part based on the fonts shipped in the non-source package.
1255                (for-each (lambda (name)
1256                            (compile name "ttf"))
1257                          (find-files "." "^[^Nachlieli].*\\.sfd$"))
1258                (for-each (lambda (name)
1259                            (compile name "otf"))
1260                          (find-files "." "^Nachlieli.*\\.sfd$"))
1261                #t))))))
1262     (native-inputs
1263      `(("fontforge" ,fontforge)))
1264     (home-page "http://culmus.sourceforge.net/")
1265     (synopsis "TrueType Hebrew Fonts for X11")
1266     (description "14 Hebrew trivial families.  Contain ASCII glyphs from various
1267 sources.  Those families provide a basic set of a serif (Frank Ruehl), sans
1268 serif (Nachlieli) and monospaced (Miriam Mono) trivials.  Also included Miriam,
1269 Drugulin, Aharoni, David, Hadasim etc.  Cantillation marks support is
1270 available in Keter YG.")
1271     (license license:gpl2))) ; consult the LICENSE file included
1272
1273 (define-public font-lohit
1274   (package
1275     (name "font-lohit")
1276     (version "20140220")
1277     (source
1278      (origin
1279        (method url-fetch)
1280        (uri (string-append "https://releases.pagure.org/lohit/lohit-ttf-"
1281                            version ".tar.gz"))
1282        (sha256
1283         (base32
1284          "1rmgr445hw1n851ywy28csfvswz1i6hnc8mzp88qw2xk9j4dn32d"))))
1285     (build-system font-build-system)
1286     (home-page "https://pagure.io/lohit")
1287     (synopsis "Lohit TrueType Indic fonts")
1288     (description "Lohit is a font family designed to cover Indic scripts.
1289 Lohit supports the Assamese, Bengali, Devanagari (Hindi, Kashmiri, Konkani,
1290 Maithili, Marathi, Nepali, Sindhi, Santali, Bodo, Dogri languages), Gujarati,
1291 Kannada, Malayalam, Manipuri, Oriya, Punjabi, Tamil and Telugu scripts.")
1292     (license license:silofl1.1)))
1293
1294 (define-public font-blackfoundry-inria
1295   (package
1296     (name "font-blackfoundry-inria")
1297     (version "1.200")
1298     (home-page "https://github.com/BlackFoundry/InriaFonts")
1299     (source (origin
1300               (method git-fetch)
1301               (uri (git-reference
1302                     (url home-page)
1303                     (commit (string-append "v" version))))
1304               (sha256
1305                (base32
1306                 "06775y99lyh6hj5hzvrx56iybdck8a8xfqkipqd5c4cldg0a9hh8"))
1307               (file-name (string-append name "-" version "-checkout"))))
1308     ;; XXX: There are .ufo directories (the "source") so in theory we should
1309     ;; be able to rebuild TTF and OTF files with FontForge.  Unfortunately a
1310     ;; command like:
1311     ;;
1312     ;;  fontforge -lang=ff -c "Open('InriaSans-Regular.ufo'); Generate('foo.ttf');"
1313     ;;
1314     ;; segfaults in '_UFOLoadGlyph', which calls out to libpython.  :-/
1315     ;; In the meantime we ship the precompiled OTF and TTF files.
1316     (build-system font-build-system)
1317     (synopsis "Inria Sans and Inria Serif type family")
1318     (description
1319      "Inria Sans and Inria Serif are the two members of a type family designed
1320 for Inria, a public research institute in computer science and mathematics.")
1321     (license license:silofl1.1)))
1322
1323 (define-public font-sil-gentium
1324   (package
1325     (name "font-sil-gentium")
1326     (version "5.000")
1327     (source (origin
1328               (method url-fetch)
1329               (uri (string-append
1330                     "https://software.sil.org/downloads/r/gentium/GentiumPlus-"
1331                     version ".zip"))
1332               (sha256
1333                (base32
1334                 "0m7189870hha217n1vgpmf89mwggrxkh679ffi1lxpnjggqi2n9k"))))
1335     ;; Note: The zip file provides TTF files only, but the developer release,
1336     ;; which contains additional files, has a 'SOURCES.txt' file that says
1337     ;; that "the primary source files for the fonts are the fonts themselves".
1338     ;; Thus it looks like the TTF can be considered source.
1339     (build-system font-build-system)
1340     (synopsis "Serif font for the Cyrillic, Greek, and Latin alphabets")
1341     (description
1342      "Gentium is a typeface family designed to enable the diverse ethnic
1343 groups around the world who use the Latin, Cyrillic and Greek scripts to
1344 produce readable, high-quality publications.  The font comes with regular and
1345 italics shapes.  This package provides only TrueType files (TTF).")
1346     (home-page "https://software.sil.org/gentium/")
1347     (license license:silofl1.1)))
1348
1349 (define-public font-sil-charis
1350   (package
1351     (name "font-sil-charis")
1352     (version "5.000")
1353     (source (origin
1354               (method url-fetch)
1355               (uri (string-append
1356                     "https://software.sil.org/downloads/r/charis/CharisSIL-"
1357                     version ".zip"))
1358               (sha256
1359                (base32
1360                 "1zcvw37f1a7gkml3yfm6hxh93844llm7xj4w52600qq3ndrm8gjy"))))
1361     ;; As for Gentium (see above), the TTF files are considered source.
1362     (build-system font-build-system)
1363     (synopsis "Serif font for the Cyrillic and Latin alphabets")
1364     (description
1365      "Charis SIL is a Unicode-based font family that supports the wide range
1366 of languages that use the Latin and Cyrillic scripts.  It is specially
1367 designed to make long texts pleasant and easy to read, even in less than ideal
1368 reproduction and display environments.  This package provides only TrueType
1369 files (TTF).")
1370     (home-page "https://software.sil.org/charis/")
1371     (license license:silofl1.1)))
1372
1373 (define-public font-mononoki
1374   (package
1375     (name "font-mononoki")
1376     (version "1.2")
1377     (source (origin
1378               (method git-fetch)
1379               (uri (git-reference
1380                     (url "https://github.com/madmalik/mononoki/")
1381                     (commit version)))
1382               (sha256
1383                (base32
1384                 "1rkzyxn30rn8qv2h2xz324j7q15hzg2lci8790a7cdl1dfgic4xi"))
1385               (file-name (git-file-name name version))))
1386     (build-system font-build-system)
1387     (synopsis "Font for programming and code review")
1388     (description
1389      "Mononoki is a typeface by Matthias Tellen, created to enhance code
1390 formatting.")
1391     (home-page "https://madmalik.github.io/mononoki/")
1392     (license license:silofl1.1)))