gnu/packages/fonts.scm

   1 ;;; GNU Guix --- Functional package management for GNU
   2 ;;; Copyright © 2013, 2014, 2015, 2016, 2018, 2019 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 Nikita <nikita@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, 2020 Efraim Flashner <efraim@flashner.co.il>
  15 ;;; Copyright © 2016, 2020 Marius Bakke <mbakke@fastmail.com>
  16 ;;; Copyright © 2016 Toni Reina <areina@riseup.net>
  17 ;;; Copyright © 2017, 2018, 2019, 2020 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 <mail@brendan.scot>
  22 ;;; Copyright © 2017, 2018, 2019, 2020 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 ;;; Copyright © 2019 Nicolas Goaziou <mail@nicolasgoaziou.fr>
  28 ;;; Copyright © 2019 Baptiste Strazzulla <bstrazzull@hotmail.fr>
  29 ;;; Copyright © 2019 Alva <alva@skogen.is>
  30 ;;; Copyright © 2019 Alexandros Theodotou <alex@zrythm.org>
  31 ;;; Copyright © 2020 Damien Cassou <damien@cassou.me>
  32 ;;; Copyright © 2020 Amin Bandali <bandali@gnu.org>
  33 ;;; Copyright © 2020 Michael Rohleder <mike@rohleder.de>
  34 ;;; Copyright © 2020 John Soo <jsoo1@asu.edu>
  35 ;;; Copyright © 2020 Raghav Gururajan <raghavgururajan@disroot.org>
  36 ;;; Copyright © 2020 Julien Lepiller <julien@lepiller.eu>
  37 ;;; Copyright © 2020 Zhu Zihao <all_but_last@163.com>
  38 ;;; Copyright © 2020 Simen Endsjø <simendsjo@gmail.com>
  39 ;;; Copyright © 2020 Tim Van den Langenbergh <tmt_vdl@gmx.com>
  40 ;;;
  41 ;;; This file is part of GNU Guix.
  42 ;;;
  43 ;;; GNU Guix is free software; you can redistribute it and/or modify it
  44 ;;; under the terms of the GNU General Public License as published by
  45 ;;; the Free Software Foundation; either version 3 of the License, or (at
  46 ;;; your option) any later version.
  47 ;;;
  48 ;;; GNU Guix is distributed in the hope that it will be useful, but
  49 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
  50 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  51 ;;; GNU General Public License for more details.
  52 ;;;
  53 ;;; You should have received a copy of the GNU General Public License
  54 ;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
  55
  56 (define-module (gnu packages fonts)
  57   #:use-module (ice-9 regex)
  58   #:use-module (guix utils)
  59   #:use-module ((guix licenses) #:prefix license:)
  60   #:use-module (guix packages)
  61   #:use-module (guix download)
  62   #:use-module (guix git-download)
  63   #:use-module (guix build-system font)
  64   #:use-module (guix build-system gnu)
  65   #:use-module (guix build-system meson)
  66   #:use-module (guix build-system trivial)
  67   #:use-module (gnu packages base)
  68   #:use-module (gnu packages bash)
  69   #:use-module (gnu packages compression)
  70   #:use-module (gnu packages fontutils)
  71   #:use-module (gnu packages gettext)
  72   #:use-module (gnu packages glib)
  73   #:use-module (gnu packages gtk)
  74   #:use-module (gnu packages perl)
  75   #:use-module (gnu packages pkg-config)
  76   #:use-module (gnu packages python)
  77   #:use-module (gnu packages python-xyz)
  78   #:use-module (gnu packages xorg))
  79
  80 (define-public font-ibm-plex
  81   (package
  82     (name "font-ibm-plex")
  83     (version "4.0.2")
  84     (source (origin
  85               (method url-fetch)
  86               (uri (string-append
  87                     "https://github.com/IBM/plex/releases/download/"
  88                     "v" version "/OpenType.zip"))
  89               (sha256
  90                (base32
  91                 "17bd84ic7z9hkcjy4bwnh4z51bnkh2vrjzwvs9g6lwzmxjswa5b6"))))
  92     (build-system font-build-system)
  93     (home-page "https://github.com/IBM/plex")
  94     (synopsis "IBM Plex typeface")
  95     (description "This package provides the Plex font family.  It comes in a
  96 Sans, Serif, Mono and Sans Condensed, all with roman and true italics.  The
  97 fonts have been designed to work well in user interface (UI) environments as
  98 well as other mediums.")
  99     (license license:silofl1.1)))
 100
 101 (define-public font-inconsolata
 102   (package
 103     (name "font-inconsolata")
 104     (version "3.000")
 105     (source
 106      (origin
 107        (method url-fetch)
 108        (uri (string-append "https://github.com/googlefonts/Inconsolata/"
 109                            "releases/download/v" version "/fonts_otf.zip"))
 110        (sha256
 111         (base32 "1wavvv86nwsqm5sbmnkv1bprj7l7zdrkxpvjy6w8yag93k6hrlx1"))))
 112     (build-system font-build-system)
 113     (home-page "https://levien.com/type/myfonts/inconsolata.html")
 114     (synopsis "Monospace font")
 115     (description "A monospace font, designed for code listings and the like,
 116 in print.  With attention to detail for high resolution rendering.")
 117     (license license:silofl1.1)))
 118
 119 (define-public font-ubuntu
 120   (package
 121     (name "font-ubuntu")
 122     (version "0.83")
 123     (source (origin
 124               (method git-fetch)
 125               (uri (git-reference
 126                     (url "https://salsa.debian.org/fonts-team/fonts-ubuntu")
 127                     (commit (string-append "upstream/" version))))
 128               (file-name (git-file-name name version))
 129               (sha256
 130                (base32
 131                 "1d2xrjpxy70f3nsgqiggwv6pj06qglf5vj2847pqx60w3ygi903g"))))
 132     (build-system font-build-system)
 133     (home-page "http://font.ubuntu.com/")
 134     (synopsis "The Ubuntu Font Family")
 135     (description "The Ubuntu Font Family is a unique, custom designed font
 136 that has a very distinctive look and feel.  This package provides the
 137 TrueType (TTF) files.")
 138     (license
 139      (license:non-copyleft
 140       "http://font.ubuntu.com/ufl/ubuntu-font-licence-1.0.txt"
 141       "Ubuntu Font License v1.0"))))
 142
 143 (define-public font-dejavu
 144   (package
 145     (name "font-dejavu")
 146     (version "2.37")
 147     (source (origin
 148              (method url-fetch)
 149              (uri (string-append "mirror://sourceforge/dejavu/dejavu/"
 150                                  version "/dejavu-fonts-ttf-"
 151                                  version ".tar.bz2"))
 152              (sha256
 153               (base32
 154                "1mqpds24wfs5cmfhj57fsfs07mji2z8812i5c4pi5pbi738s977s"))))
 155     (build-system font-build-system)
 156     (arguments
 157      `(#:phases
 158        (modify-phases %standard-phases
 159          (add-after 'install 'install-conf
 160            (lambda* (#:key outputs #:allow-other-keys)
 161              (let ((conf-dir (string-append (assoc-ref outputs "out")
 162                                             "/share/fontconfig/conf.avail")))
 163                (copy-recursively "fontconfig" conf-dir)
 164                #t))))))
 165     (home-page "https://dejavu-fonts.github.io/")
 166     (synopsis "Vera font family derivate with additional characters")
 167     (description "DejaVu provides an expanded version of the Vera font family
 168 aiming for quality and broader Unicode coverage while retaining the original
 169 Vera style.  DejaVu currently works towards conformance to the Multilingual
 170 European Standards (MES-1 and MES-2) for Unicode coverage.  The DejaVu fonts
 171 provide serif, sans and monospaced variants.")
 172     (license
 173      (license:x11-style
 174       "http://dejavu-fonts.org/"))))
 175
 176 (define-public font-bitstream-vera
 177   (package
 178     (name "font-bitstream-vera")
 179     (version "1.10")
 180     (source (origin
 181              (method url-fetch)
 182              (uri (string-append "mirror://gnome/sources/ttf-bitstream-vera/"
 183                                  version "/ttf-bitstream-vera-"
 184                                  version ".tar.bz2"))
 185              (sha256
 186               (base32
 187                "1p3qs51x5327gnk71yq8cvmxc6wgx79sqxfvxcv80cdvgggjfnyv"))))
 188     (build-system font-build-system)
 189     (home-page "https://www.gnome.org/fonts/")
 190     (synopsis "Bitstream Vera sans-serif typeface")
 191     (description "Vera is a sans-serif typeface from Bitstream, Inc.  This
 192 package provides the TrueType (TTF) files.")
 193     (license
 194      (license:fsdg-compatible
 195       "https://www.gnome.org/fonts/#Final_Bitstream_Vera_Fonts"
 196       "The Font Software may be sold as part of a larger software package but
 197 no copy of one or more of the Font Software typefaces may be sold by
 198 itself."))))
 199
 200 (define-public font-cantarell
 201   (package
 202     (name "font-abattis-cantarell")
 203     (version "0.201")
 204     (source (origin
 205               (method url-fetch)
 206               (uri (string-append "mirror://gnome/sources/cantarell-fonts/"
 207                                   (version-major+minor version)
 208                                   "/cantarell-fonts-" version ".tar.xz"))
 209               (sha256
 210                (base32
 211                 "0qwqmkczqy09fdj8l11nr841ks0dwsydqg55qyms12m4yvjn87xn"))))
 212     (build-system meson-build-system)
 213     (native-inputs
 214      `(("gettext" ,gettext-minimal)))   ; for msgfmt
 215     (home-page "https://wiki.gnome.org/Projects/CantarellFonts")
 216     (synopsis "Cantarell sans-serif typeface")
 217     (description "The Cantarell font family is a contemporary Humanist
 218 sans-serif designed for on-screen reading.  It is used by GNOME@tie{}3.")
 219     (license license:silofl1.1)))
 220
 221 (define-public font-lato
 222   (package
 223     (name "font-lato")
 224     (version "2.015")                   ; also update description
 225     (source (origin
 226               (method url-fetch/zipbomb)
 227               (uri (string-append "https://www.latofonts.com/download/Lato2OFL.zip"))
 228               (sha256
 229                (base32
 230                 "1f5540g0ja1nx3ddd3ywn77xc81ssrxpq8n3gyb9sabyq2b4xda2"))))
 231     (build-system font-build-system)
 232     (home-page "https://www.latofonts.com/lato-free-fonts/")
 233     (synopsis "Lato sans-serif typeface")
 234     (description
 235      "Lato is a sanserif typeface family.  It covers over 3000 glyphs per style.
 236 The Lato 2.010 family supports more than 100 Latin-based languages, over
 237 50 Cyrillic-based languages as well as Greek and IPA phonetics.")
 238     (license license:silofl1.1)))
 239
 240 (define-public font-gnu-freefont
 241   (package
 242     (name "font-gnu-freefont")
 243     ;; Note: Remove the special FontForge input and package once the 2020
 244     ;; release is out.
 245     (version "20120503")
 246     (source (origin
 247              (method url-fetch)
 248              (uri (string-append "mirror://gnu/freefont/freefont-src-"
 249                                  version ".tar.gz"))
 250              (sha256
 251               (base32
 252                "0yk58blhcd4hm7nyincmqq4jrzjjk82wif2zmk1l3y2m4vif4qhd"))))
 253     (build-system gnu-build-system)
 254     (arguments
 255      `(#:phases (modify-phases %standard-phases
 256                   (delete 'configure)
 257                   (replace 'install
 258                    (lambda _
 259                      (let ((doc-dir  (string-append %output "/share/doc/"
 260                                                     ,name "-" ,version))
 261                            (ttf-font-dir (string-append %output
 262                                                         "/share/fonts/truetype"))
 263                            (otf-font-dir (string-append %output
 264                                                         "/share/fonts/opentype"))
 265                            (woff-font-dir (string-append %output
 266                                                          "/share/fonts/webfonts")))
 267                        (mkdir-p doc-dir)
 268                        (substitute* "Makefile"
 269                          (("\\$\\(TMPDIR\\)") doc-dir)
 270                          (("sfd/\\*.ttf") "")
 271                          (("sfd/\\*.otf") "")
 272                          (("sfd/\\*.woff") ""))
 273                        ;; XXX The FreeFont Makefile tries to use the current
 274                        ;; time and date as names for generated files, and fails
 275                        ;; silently. But the fonts are still installed, so we
 276                        ;; leave the issue alone for now.
 277                        ;; See <https://bugs.gnu.org/40783>
 278                        (system* "make" "ttftar" "otftar" "wofftar")
 279                        (mkdir-p ttf-font-dir)
 280                        (mkdir-p otf-font-dir)
 281                        (mkdir-p woff-font-dir)
 282                        (for-each (lambda (file)
 283                                    (install-file file ttf-font-dir))
 284                                  (filter
 285                                    (lambda (file) (string-suffix? "ttf" file))
 286                                    (find-files "." "")))
 287                        (for-each (lambda (file)
 288                                    (install-file file otf-font-dir))
 289                                  (filter
 290                                    (lambda (file) (string-suffix? "otf" file))
 291                                    (find-files "." "")))
 292                        (for-each (lambda (file)
 293                                    (install-file file woff-font-dir))
 294                                  (filter
 295                                    (lambda (file) (string-suffix? "woff" file))
 296                                    (find-files "." "")))))))
 297        #:test-target "tests"))
 298     ;; FreeFont anno 2012 requires a FontForge built with Python 2.
 299     (native-inputs `(("fontforge" ,fontforge-20190801)))
 300     (home-page "https://www.gnu.org/software/freefont/")
 301     (synopsis "Unicode-encoded outline fonts")
 302     (description
 303      "The GNU Freefont project aims to provide a set of free outline
 304  (PostScript Type0, TrueType, OpenType...) fonts covering the ISO
 305 10646/Unicode UCS (Universal Character Set).")
 306     (license license:gpl3+)
 307     (properties '((upstream-name . "freefont")
 308                   (ftp-directory . "/gnu/freefont")))))
 309
 310 (define-public font-gnu-freefont-ttf
 311   (deprecated-package "font-gnu-freefont-ttf" font-gnu-freefont))
 312
 313 (define-public font-liberation
 314   (package
 315     (name "font-liberation")
 316     (version "2.1.1")
 317     (source
 318      (origin
 319        (method url-fetch)
 320        (uri (string-append "https://github.com/liberationfonts/liberation-fonts/"
 321                            "files/4743886/liberation-fonts-ttf-" version ".tar.gz"))
 322        (sha256
 323         (base32 "1jkg8j8jx7ffj13z5ilw7dids99dyypljm1pv06ycmghw1pw3qlf"))))
 324     (build-system font-build-system)
 325     (home-page "https://github.com/liberationfonts")
 326     (synopsis "Fonts compatible with Arial, Times New Roman, and Courier New")
 327     (description
 328      "The Liberation font family aims at metric compatibility with
 329 Arial, Times New Roman, and Courier New.
 330 There are three sets:
 331
 332 @enumerate
 333 @item Sans (a substitute for Arial, Albany, Helvetica, Nimbus Sans L, and
 334 Bitstream Vera Sans);
 335 @item Serif (a substitute for Times New Roman, Thorndale, Nimbus Roman, and
 336 Bitstream Vera Serif);
 337 @item Mono (a substitute for Courier New, Cumberland, Courier, Nimbus Mono L,
 338 and Bitstream Vera Sans Mono).
 339 @end enumerate
 340
 341 The Liberation Fonts are sponsored by Red Hat.")
 342     (license license:silofl1.1)))
 343
 344 (define-public font-linuxlibertine
 345   (package
 346     (name "font-linuxlibertine")
 347     (version "5.3.0")
 348     (source (origin
 349               (method url-fetch/tarbomb)
 350               (uri (string-append "mirror://sourceforge/linuxlibertine/"
 351                                   "linuxlibertine/" version
 352                                   "/LinLibertineSRC_" version "_2012_07_02.tgz"))
 353               (sha256
 354                (base32
 355                 "0x7cz6hvhpil1rh03rax9zsfzm54bh7r4bbrq8rz673gl9h47v0v"))))
 356     (build-system font-build-system)
 357     (arguments
 358      `(#:phases
 359        (modify-phases %standard-phases
 360          (add-before 'install 'build
 361            (lambda _
 362              (let ((compile
 363                     (lambda (name ext)
 364                       (invoke
 365                        "fontforge" "-lang=ff"
 366                        "-c" (string-append "Open('" name "');"
 367                                            "Generate('"
 368                                            (basename name "sfd") ext
 369                                            "')")))))
 370                (for-each (lambda (name)
 371                            (and (compile name "ttf")
 372                                 (compile name "otf")))
 373                          (find-files "." "\\.sfd$"))
 374                #t))))))
 375     (native-inputs
 376      `(("fontforge" ,fontforge)))
 377     (home-page "http://www.linuxlibertine.org/")
 378     (synopsis "Serif and sans serif typefaces")
 379     (description "The Linux Libertine fonts is a set of typefaces containing
 380 both a Serif version (\"Linux Libertine\") and a Sans Serif (\"Linux
 381 Biolinum\") designed to be used together as an alternative for Times/Times New
 382 Roman and Helvetica/Arial.  The Serif typeface comes in two shapes and two
 383 weights, and with a Small Capitals version of the regular typeface.  Linux
 384 Biolinum is available in both Regular and Bold weights.")
 385     ;; The fonts are released under either of these licenses.
 386     (license (list license:gpl2+ license:silofl1.1))))
 387
 388 (define-public font-libertinus
 389   (package
 390     (name "font-libertinus")
 391     (version "6.12")
 392     (source
 393      (origin
 394        (method url-fetch)
 395        (uri (string-append "https://github.com/alerque/libertinus/releases"
 396                            "/download/v" version "/libertinus-" version
 397                            ".zip"))
 398        (sha256
 399         (base32 "06pcsd5pijjid7xjxak35jla089krm5hqnbglv8ldncq475q7kb2"))))
 400     (build-system font-build-system)
 401     (home-page "https://github.com/alerque/libertinus")
 402     (synopsis "Font family based on Linux Libertine")
 403     (description
 404      "The Libertinus font family is a fork of Linux Libertine that addresses
 405 many bugs in the unmaintained original and adds a new mathematical companion
 406 font for use with OpenType math-capable applications like LuaTex or XeTeX.
 407
 408 The unified Libertinus family consists of:
 409 @enumerate
 410 @item Libertinus Serif, forked from Linux Libertine;
 411 @item Libertinus Sans Serif, forked from Linux Biolinum;
 412 @item Libertinus Mono, forked from Linux Libertine Mono; and
 413 @item Libertinus Math, an original matching OpenType math font.
 414 @end enumerate\n")
 415     (license license:silofl1.1)))
 416
 417 (define-public font-terminus
 418   (package
 419     (name "font-terminus")
 420     (version "4.48")
 421     (source
 422      (origin
 423        (method url-fetch)
 424        (uri (string-append "mirror://sourceforge/terminus-font/terminus-font-"
 425                            version "/terminus-font-" version ".tar.gz"))
 426        (sha256
 427         (base32 "1bwlkj39rqbyq57v5yssayav6hzv1n11b9ml2s0dpiyfsn6rqy9l"))))
 428     (build-system gnu-build-system)
 429     (outputs (list "out" "pcf-8bit"))
 430     (arguments
 431      `(#:tests? #f                      ; no test target in tarball
 432        #:phases
 433        (modify-phases %standard-phases
 434          (add-after 'build 'build-more-bits
 435            ;; X11 8-bit code pages aren't installed by default (they were
 436            ;; until version 4.46).  Build and install them separately.
 437            (lambda* (#:key make-flags #:allow-other-keys)
 438              (apply invoke "make" "pcf-8bit" make-flags)))
 439          (add-after 'install 'install-more-bits
 440            (lambda* (#:key make-flags outputs #:allow-other-keys)
 441              (let ((pcf-8bit (assoc-ref outputs "pcf-8bit")))
 442                (apply invoke "make" "install-pcf-8bit" (string-append "prefix="
 443                                                                       pcf-8bit)
 444                       make-flags)))))))
 445     (native-inputs
 446      `(("bdftopcf" ,bdftopcf)
 447        ("font-util" ,font-util)
 448        ("mkfontdir" ,mkfontdir)
 449        ("pkg-config" ,pkg-config)
 450        ("python" ,python)))
 451     (home-page "http://terminus-font.sourceforge.net/")
 452     (synopsis "Simple bitmap programming font")
 453     (description "Terminus Font is a clean, fixed-width bitmap font, designed
 454 for long periods of working with computers (8 or more hours per day).")
 455     (license license:silofl1.1)))
 456
 457 (define-public font-adobe-source-han-sans
 458   (package
 459     (name "font-adobe-source-han-sans")
 460     (version "1.004")
 461     (source (origin
 462               (method git-fetch)
 463               (uri (git-reference
 464                      (url "https://github.com/adobe-fonts/source-han-sans")
 465                      (commit (string-append version "R"))))
 466               (file-name (git-file-name name version))
 467               (sha256
 468                (base32
 469                 "0zm884d8fp5gvirq324050kqv7am9khyqhs9kk4r4rr3jzn61jpk"))))
 470     (outputs '("out"                 ; OpenType/CFF Collection (OTC), 121 MiB.
 471                "cn" "jp" "kr" "tw")) ; Region-specific Subset OpenType/CFF.
 472     (build-system trivial-build-system)
 473     (arguments
 474      `(#:modules ((guix build utils))
 475        #:builder
 476        (begin
 477          (use-modules (guix build utils))
 478          (let ((install-opentype-fonts
 479                 (lambda (fonts-dir out)
 480                   (copy-recursively fonts-dir
 481                                     (string-append (assoc-ref %outputs out)
 482                                                    "/share/fonts/opentype")))))
 483            (chdir (assoc-ref %build-inputs "source"))
 484            (install-opentype-fonts "OTC" "out")
 485            (install-opentype-fonts "SubsetOTF/CN" "cn")
 486            (install-opentype-fonts "SubsetOTF/JP" "jp")
 487            (install-opentype-fonts "SubsetOTF/KR" "kr")
 488            (install-opentype-fonts "SubsetOTF/TW" "tw")
 489            (for-each delete-file (find-files %output "\\.zip$"))
 490            #t))))
 491     (home-page "https://github.com/adobe-fonts/source-han-sans")
 492     (synopsis "Pan-CJK fonts")
 493     (description
 494      "Source Han Sans is a sans serif Pan-CJK font family that is offered in
 495 seven weights: ExtraLight, Light, Normal, Regular, Medium, Bold, and Heavy.
 496 And in several OpenType/CFF-based deployment configurations to accommodate
 497 various system requirements or limitations.  As the name suggests, Pan-CJK
 498 fonts are intended to support the characters necessary to render or display
 499 text in Simplified Chinese, Traditional Chinese, Japanese, and Korean.")
 500     (license license:silofl1.1)))
 501
 502 (define-public font-cns11643
 503   ;; Since upstream doesn't provide any version numbers, the date of the last
 504   ;; edit is used, taken from https://data.gov.tw/dataset/5961
 505   ;; XXX: The source is also updated in-place, so it may be desirable to mirror
 506   ;; it elsewhere to avoid suddenly losing the current source file.
 507   (package
 508     (name "font-cns11643")
 509     (version "98.1.20180605")
 510     (source (origin
 511               (method url-fetch)
 512               (uri "http://www.cns11643.gov.tw/AIDB/Open_Data.zip")
 513               (sha256
 514                (base32
 515                 "000a9whrjr1cd4pjc23pbl60zwkq3wcb5g61p9qi7fn3hwkp0kyw"))))
 516     (build-system font-build-system)
 517     (home-page "http://www.cns11643.gov.tw/AIDB/welcome.do")
 518     (synopsis "CJK TrueType fonts, TW-Kai and TW-Sung")
 519     (description
 520      "@code{CNS 11643} character set (Chinese National Standard, or Chinese
 521 Standard Interchange Code) is the standard character set of the Republic of
 522 China (Taiwan) for Chinese Characters and other Unicode symbols.  Contained
 523 are six TrueType fonts based on two script styles, Regular script (Kai), and
 524 Sung/Ming script, each with three variants:
 525
 526 @itemize
 527 @item @code{CNS 11643} (@code{TW-Kai} and @code{TW-Sung}): Tens of thousands
 528 of CJK characters from frequency tables published by the Taiwanese
 529 Ministry of Education.  ISO 10646 and Unicode compatible encoding.
 530 @item @code{Big-5 Plus}: Several thousand frequently used CJK characters
 531 encoded in the user defined area of the Big-5 code.
 532 @item @code{Big-5 Extended}: A Big-5 character set based on the
 533 @code{Big-5 Plus} and @code{CNS 11643} character sets.
 534 @end itemize\n")
 535     (license (license:non-copyleft
 536               "http://data.gov.tw/license")))) ; CC-BY 4.0 compatible
 537
 538 (define-public font-cns11643-swjz
 539   (package
 540     (name "font-cns11643-swjz")
 541     (version "1")
 542     (source
 543      (origin
 544        (method url-fetch)
 545        (uri "https://www.moedict.tw/fonts/truetype/cns11643/ebas927.ttf")
 546        (sha256
 547         (base32
 548          "1qkljldbmb53zp1rcmpsb8rzy67rnsqcjxi549m9743ifk4isl78"))))
 549     (build-system font-build-system)
 550     (home-page
 551      (string-append "http://www.cns11643.gov.tw/AIDB/download.do"
 552                     "?name=%E5%AD%97%E5%9E%8B%E4%B8%8B%E8%BC%89"))
 553     (synopsis "TrueType seal script font")
 554     (description
 555      "@code{Shuowen Jiezi} is a TrueType seal script font based on the ancient
 556 text of the same name published by the Executive Yuan of Taiwan.  6721 glyphs
 557 are included, at Unicode compatible code points corresponding to their modern
 558 variants.")
 559     ;; Original text only available in Chinese. More info at
 560     ;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=26703#11
 561     (license (license:non-copyleft
 562               "http://www.cns11643.gov.tw/AIDB/copyright.do"))))
 563
 564 (define-public font-wqy-zenhei
 565   (package
 566     (name "font-wqy-zenhei")
 567     (version "0.9.45")
 568     (source (origin
 569               (method url-fetch)
 570               (uri (string-append
 571                     "mirror://sourceforge/wqy/wqy-zenhei/" version
 572                     "%20%28Fighting-state%20RC1%29/wqy-zenhei-"
 573                     version ".tar.gz"))
 574               (sha256
 575                (base32
 576                 "1mkmxq8g2hjcglb3zajfqj20r4r88l78ymsp2xyl5yav8w3f7dz4"))))
 577     (build-system font-build-system)
 578     (home-page "http://wenq.org/wqy2/")
 579     (synopsis "CJK font")
 580     (description
 581      "WenQuanYi Zen Hei is a Hei-Ti style (sans-serif type) Chinese outline
 582 font.  It is designed for general purpose text formatting and on-screen
 583 display of Chinese characters and symbols from many other languages.
 584 WenQuanYi Zen Hei provides a rather complete coverage of Chinese Hanzi glyphs,
 585 including both simplified and traditional forms.  The total glyph number in
 586 this font is over 35,000, including over 21,000 Chinese Hanzi.  This font has
 587 full coverage of the GBK (CP936) charset, CJK Unified Ideographs, as well as
 588 the code-points needed for zh_cn, zh_sg, zh_tw, zh_hk, zh_mo, ja (Japanese) and
 589 ko (Korean) locales for @code{fontconfig}.")
 590     ;; GPLv2 with font embedding exception.
 591     (license license:gpl2)))
 592
 593 (define-public font-wqy-microhei
 594   (package
 595     (name "font-wqy-microhei")
 596     (version "0.2.0-beta")
 597     (source (origin
 598               (method url-fetch)
 599               (uri (string-append "mirror://sourceforge/wqy/wqy-microhei/"
 600                                   version "/wqy-microhei-" version ".tar.gz"))
 601               (sha256
 602                (base32
 603                 "0gi1yxqph8xx869ichpzzxvx6y50wda5hi77lrpacdma4f0aq0i8"))))
 604     (build-system font-build-system)
 605     (home-page "http://wenq.org/wqy2/")
 606     (synopsis "CJK font")
 607     (description
 608      "WenQuanYi Micro Hei is a Sans-Serif style (also known as Hei, Gothic or
 609 Dotum among the Chinese/Japanese/Korean users) high quality CJK outline font.
 610 It was derived from \"Droid Sans Fallback\" and \"Droid Sans\" released by
 611 Google Inc.  This font contains all the unified CJK Han glyphs in the range of
 612 U+4E00-U+9FC3 defined in Unicode Standard 5.1, together with many other
 613 languages unicode blocks, including Latins, Extended Latins, Hanguls and
 614 Kanas.  The font file is extremely compact (~4M) compared with most known CJK
 615 fonts.")
 616     ;; This font is licensed under Apache2.0 or GPLv3 with font embedding
 617     ;; exceptions.
 618     (license license:gpl3)))
 619
 620 (define-public font-rachana
 621   (package
 622     (name "font-rachana")
 623     (version "7.0.3")
 624     (source
 625      (origin
 626        (method git-fetch)
 627        (uri (git-reference
 628              (url "https://gitlab.com/smc/fonts/rachana")
 629              (commit (string-append "Version" version))))
 630        (sha256
 631         (base32 "0r100pvk56y1s38nbv24d78s8nd7dkblgasbn8s887dzj6dps23d"))
 632        (file-name (git-file-name name version))))
 633     (build-system font-build-system)
 634     (home-page "https://smc.org.in")
 635     (synopsis "Malayalam font")
 636     (description
 637      "Rachana is a Malayalam font designed by Hussain K H.  The project was
 638 part of Rachana Aksharavedi for the original script of Malayalam in computing.
 639 Rachana has about 1,200+ glyphs for Malayalam and contains glyphs required for
 640 printing old Malayalam books without compromising the writing style.")
 641     ;; This font is licensed under SIL 1.1 or GPLv3+ with font embedding
 642     ;; exceptions.
 643     (license (list license:silofl1.1 license:gpl3+))))
 644
 645 (define-public font-tex-gyre
 646   (package
 647     (name "font-tex-gyre")
 648     (version "2.005")
 649     (source
 650      (origin
 651        (method url-fetch/zipbomb)
 652        (uri (string-append "http://www.gust.org.pl/projects/e-foundry/"
 653                            "tex-gyre/whole/tg-" version "otf.zip"))
 654        (sha256
 655         (base32
 656          "0kph9l3g7jb2bpmxdbdg5zl56wacmnvdvsdn7is1gc750sqvsn31"))))
 657     (build-system font-build-system)
 658     (home-page "http://www.gust.org.pl/projects/e-foundry/tex-gyre/")
 659     (synopsis "Remake of Ghostscript fonts")
 660     (description "The TeX Gyre collection of fonts is the result of an
 661 extensive remake and extension of the freely available base PostScript fonts
 662 distributed with Ghostscript version 4.00.  The collection contains the
 663 following fonts in the OpenType format: Adventor, Bonum, Chorus, Cursor,
 664 Heros, Pagella, Schola, Termes.")
 665     (license license:gfl1.0)))
 666
 667 (define-public font-anonymous-pro
 668   (package
 669     (name "font-anonymous-pro")
 670     (version "1.002")
 671     (source (origin
 672               (method url-fetch)
 673               (uri (string-append
 674                     "https://www.marksimonson.com/assets/content/fonts/"
 675                     "AnonymousPro-" version ".zip"))
 676               (sha256
 677                (base32
 678                 "1asj6lykvxh46czbal7ymy2k861zlcdqpz8x3s5bbpqwlm3mhrl6"))))
 679     (build-system font-build-system)
 680     (home-page "https://www.marksimonson.com/fonts/view/anonymous-pro")
 681     (synopsis "Fixed-width fonts designed with coding in mind")
 682     (description "Anonymous Pro is a family of four fixed-width fonts designed
 683 with coding in mind.  Anonymous Pro features an international, Unicode-based
 684 character set, with support for most Western and Central European Latin-based
 685 languages, plus Greek and Cyrillic.")
 686     (license license:silofl1.1)))
 687
 688 (define-public font-anonymous-pro-minus
 689   (package
 690     (inherit font-anonymous-pro)
 691     (name "font-anonymous-pro-minus")
 692     ;; The -Minus variant doesn't necessarily track the regular version above.
 693     (version "1.003")
 694     (source
 695      (origin
 696        (method url-fetch)
 697        (uri (string-append "https://www.marksimonson.com/assets/content/fonts/"
 698                            "AnonymousProMinus-" version ".zip"))
 699        (sha256
 700         (base32 "1p2n91jja37d2cshp5pjwld9lq0v7gnpk7ywwn2blq7k46q6vq38"))))
 701     (synopsis "Fixed-width fonts designed with coding in mind, without bitmaps")
 702     (description "Anonymous Pro is a family of four fixed-width fonts designed
 703 with coding in mind.  Anonymous Pro features an international, Unicode-based
 704 character set, with support for most Western and Central European Latin-based
 705 languages, plus Greek and Cyrillic.
 706
 707 Anonymous Pro Minus is identical to Anonymous Pro, minus its embedded bitmaps
 708 for use at smaller text sizes")))
 709
 710 (define-public font-gnu-unifont
 711   (package
 712     (name "font-gnu-unifont")
 713     (version "13.0.03")
 714     (source
 715      (origin
 716        (method url-fetch)
 717        (uri (list
 718              (string-append "http://unifoundry.com/pub/unifont/unifont-"
 719                             version "/unifont-" version ".tar.gz")
 720              (string-append "mirror://gnu/unifont/unifont-"
 721                             version "/unifont-" version ".tar.gz")))
 722        (sha256
 723         (base32 "04l2sbg6il78qsj3jxqfbz5k1xzihvw8vdlckgkp4zfr0nh2q7h7"))))
 724     (build-system gnu-build-system)
 725     (outputs '("out"   ; TrueType version
 726                "pcf"   ; PCF (bitmap) version
 727                "psf"   ; PSF (console) version
 728                "bin")) ; Utilities to manipulate '.hex' format
 729     (arguments
 730      '(#:tests? #f          ; no check target
 731        #:phases
 732        (modify-phases %standard-phases
 733          (replace
 734           'configure
 735           (lambda _ (setenv "CC" "gcc") #t))
 736          (replace
 737           'install
 738           (lambda* (#:key outputs #:allow-other-keys)
 739             (let* ((ttf (string-append (assoc-ref outputs "out")
 740                                        "/share/fonts/truetype"))
 741                    (pcf (string-append (assoc-ref outputs "pcf")
 742                                        "/share/fonts/misc"))
 743                    (psf (string-append (assoc-ref outputs "psf")
 744                                        "/share/consolefonts"))
 745                    (bin (assoc-ref outputs "bin")))
 746               (invoke "make"
 747                       (string-append "PREFIX=" bin)
 748                       (string-append "TTFDEST=" ttf)
 749                       (string-append "PCFDEST=" pcf)
 750                       (string-append "CONSOLEDEST=" psf)
 751                       "install")
 752               ;; Move Texinfo file to the right place.
 753               (mkdir (string-append bin "/share/info"))
 754               (invoke "gzip" "-9n" "doc/unifont.info")
 755               (install-file "doc/unifont.info.gz"
 756                             (string-append bin "/share/info"))
 757               #t))))))
 758     (inputs
 759      `(("perl" ,perl))) ; for utilities
 760     (synopsis
 761      "Large bitmap font covering Unicode's Basic Multilingual Plane")
 762     (description
 763      "GNU Unifont is a bitmap font covering essentially all of
 764 Unicode's Basic Multilingual Plane.  The package also includes
 765 utilities to ease adding new glyphs to the font.")
 766     (home-page "http://unifoundry.com/unifont/index.html")
 767     (properties '((upstream-name . "unifont")))
 768     (license license:gpl2+)))
 769
 770 (define-public font-google-noto
 771   (package
 772     (name "font-google-noto")
 773     (version "20171025")
 774     (source
 775      (origin
 776        (method url-fetch/zipbomb)
 777        (uri (string-append "https://noto-website-2.storage.googleapis.com/"
 778                            "pkgs/Noto-hinted.zip"))
 779        (file-name (string-append name "-" version ".zip"))
 780        (sha256
 781         (base32 "1bp42whyin7xcgmrbnfvz3rvd98xmxaz3ywqybbjmqzwaa9llyw3"))))
 782     (build-system font-build-system)
 783     (home-page "https://www.google.com/get/noto/")
 784     (synopsis "Fonts to cover all languages")
 785     (description "Google Noto Fonts is a family of fonts designed to support
 786 all languages with a consistent look and aesthetic.  Its goal is to properly
 787 display all Unicode symbols.")
 788     (license license:silofl1.1)))
 789
 790 (define-public font-google-roboto
 791   (package
 792     (name "font-google-roboto")
 793     (version "2.136")
 794     (source
 795      (origin
 796        (method url-fetch)
 797        (uri (string-append "https://github.com/google/roboto/releases/download/"
 798                            "v" version "/roboto-hinted.zip"))
 799        (file-name (string-append name "-" version ".zip"))
 800        (sha256
 801         (base32
 802          "0spscx08fad7i8qs7icns96iwcapniq8lwwqqvbf7bamvs8qfln4"))))
 803     (build-system font-build-system)
 804     (home-page "https://github.com/google/roboto")
 805     (synopsis "The Roboto family of fonts")
 806     (description
 807      "Roboto is Google’s signature family of fonts, the default font on Android
 808 and Chrome OS, and the recommended font for the
 809 visual language \"Material Design\".")
 810     (license license:asl2.0)))
 811
 812 (define-public font-un
 813   (package
 814     (name "font-un")
 815     (version "1.0.2-080608")
 816     (source (origin
 817               (method url-fetch)
 818               (uri (string-append
 819                     "https://kldp.net/unfonts/release/2607-"
 820                     "un-fonts-core-" version ".tar.gz"))
 821               (file-name (string-append name "-" version ".tar.gz"))
 822               (sha256
 823                (base32
 824                 "13liaz2pmww3aqabm55la5npd08m1skh334ky7qfidxaz5s742iv"))))
 825     (build-system font-build-system)
 826     (home-page "https://kldp.net/projects/unfonts/")
 827     (synopsis "Collection of Korean fonts")
 828     (description
 829      "Un-fonts is a family of mainly Korean fonts.
 830 It contains the following fonts and styles:
 831
 832 @enumerate
 833 @item UnBatang, UnBatangBold: serif;
 834 @item UnDotum, UnDotumBold: sans-serif;
 835 @item UnGraphic, UnGraphicBold: sans-serif style;
 836 @item UnDinaru, UnDinaruBold, UnDinaruLight;
 837 @item UnPilgi, UnPilgiBold: script;
 838 @item UnGungseo: cursive, brush-stroke.
 839 @end enumerate\n")
 840     (license license:gpl2+)))
 841
 842 (define-public font-fantasque-sans
 843   (package
 844     (name "font-fantasque-sans")
 845     (version "1.8.0")
 846     (source
 847      (origin
 848        (method git-fetch)
 849        (uri (git-reference
 850              (url "https://github.com/belluzj/fantasque-sans")
 851              (commit (string-append "v" version))))
 852        (file-name (git-file-name name version))
 853        (sha256
 854         (base32 "17l18488qyl9gdj80r8pcym3gp3jkgsdikwalnrp5rgvwidqx507"))))
 855     (build-system gnu-build-system)
 856     (native-inputs
 857      `(("ttfautohint" ,ttfautohint)
 858        ("woff-tools" ,woff-tools)
 859        ("fontforge" ,fontforge)
 860        ("woff2" ,woff2)
 861        ("woff2:bin" ,woff2 "bin")
 862        ("zip" ,zip)))
 863     (arguments
 864      `(#:tests? #f                 ;test target intended for visual inspection
 865        #:phases (modify-phases %standard-phases
 866                   (delete 'configure)   ;no configuration
 867                   (add-before 'build 'support-python@3
 868                     ;; Rather than use a Python 2 fontforge, replace Python-2-
 869                     ;; specific code with a passable Python 3 equivalent.
 870                     (lambda _
 871                       (substitute* "Scripts/fontbuilder.py"
 872                         (("xrange") "range"))
 873                       (substitute* "Scripts/features.py"
 874                         (("f\\.write\\(fea_code\\)")
 875                          "f.write(str.encode(fea_code))"))
 876                       #t))
 877                   (replace 'install
 878                     ;; 'make install' wants to install to ~/.fonts, install to
 879                     ;; output instead.  Install only the "Normal" variant.
 880                     (lambda* (#:key outputs #:allow-other-keys)
 881                       (let* ((out (assoc-ref outputs "out"))
 882                              (font-dir (string-append out "/share/fonts"))
 883                              (truetype-dir (string-append font-dir "/truetype"))
 884                              (opentype-dir (string-append font-dir "/opentype"))
 885                              (webfonts-dir (string-append font-dir "/webfonts")))
 886                         (with-directory-excursion "Variants/Normal"
 887                           (copy-recursively "OTF" opentype-dir)
 888                           (for-each (lambda (f) (install-file f truetype-dir))
 889                                     (find-files "." "\\.ttf$"))
 890                           (copy-recursively "Webfonts" webfonts-dir)
 891                           #t)))))))
 892     (synopsis "Font family with a monospaced variant for programmers")
 893     (description
 894      "Fantasque Sans Mono is a programming font designed with functionality in
 895 mind.  The font includes a bold version and a good italic version with new
 896 glyph designs, not just an added slant.")
 897     (home-page "https://fontlibrary.org/en/font/fantasque-sans-mono")
 898     (license license:silofl1.1)))
 899
 900 (define-public font-hack
 901   (package
 902     (name "font-hack")
 903     (version "3.003")
 904     (source (origin
 905               (method url-fetch/zipbomb)
 906               (uri (string-append
 907                     "https://github.com/source-foundry/Hack/releases/download/v"
 908                     version "/Hack-v" version "-ttf.zip"))
 909               (sha256
 910                (base32
 911                 "1b4hh8zkrx92m2v2vfkja1napb0192p0j3laqr0m018z3dih89hc"))))
 912     (build-system font-build-system)
 913     (home-page "https://sourcefoundry.org/hack/")
 914     (synopsis "Typeface designed for source code")
 915     (description
 916      "Hack is designed to be a workhorse typeface for code.  It expands upon
 917 the Bitstream Vera & DejaVu projects, provides over 1,500 glyphs, and includes
 918 Powerline support.")
 919     (license
 920      ;; See https://github.com/source-foundry/Hack/issues/271 for details.
 921      (list license:expat                ; the Hack modifications to...
 922            license:public-domain        ; ...the DejaVu modifications to...
 923            (license:x11-style           ; ...the Bitstream Vera typeface
 924             "file://LICENSE.md" "Bitstream Vera License")))))
 925
 926 (define-public font-adobe-source-code-pro
 927   (package
 928     (name "font-adobe-source-code-pro")
 929     (version "2.030R-ro-1.050R-it")
 930     (source
 931      (origin
 932        (method git-fetch)
 933        (uri (git-reference
 934              (url "https://github.com/adobe-fonts/source-code-pro")
 935              (commit (regexp-substitute/global
 936                       ;; The upstream tag uses "/" between the roman and italic
 937                       ;; versions, so substitute our "-" separator here.
 938                       #f "R-ro-" version 'pre "R-ro/" 'post))))
 939        (file-name (git-file-name name version))
 940        (sha256
 941         (base32 "0hc5kflr8xzqgdm0c3gbgb1paygznxmnivkylid69ipc7wnicx1n"))))
 942     (build-system font-build-system)
 943     (home-page "https://github.com/adobe-fonts/source-code-pro")
 944     (synopsis
 945      "Monospaced font family for user interface and coding environments")
 946     (description
 947      "Source Code Pro is a set of monospaced OpenType fonts that have been
 948 designed to work well in user interface environments.")
 949     (license license:silofl1.1)))
 950
 951 (define-public font-adobe-source-sans-pro
 952   (package
 953     (name "font-adobe-source-sans-pro")
 954     (version "2.040R-ro-1.090R-it")
 955     (source
 956      (origin
 957        (method git-fetch)
 958        (uri (git-reference
 959              (url "https://github.com/adobe-fonts/source-sans-pro")
 960              (commit (regexp-substitute/global
 961                       ;; The upstream tag uses "/" between the roman and italic
 962                       ;; versions, so substitute our "-" separator here.
 963                       #f "R-ro-" version 'pre "R-ro/" 'post))))
 964        (file-name (git-file-name name version))
 965        (sha256
 966         (base32 "1lzin2hfwidbvhps7shs201p1bpxy6220xmhhprv9fc8bknd4c45"))))
 967     (build-system font-build-system)
 968     (home-page "https://github.com/adobe-fonts/source-sans-pro")
 969     (synopsis
 970      "Sans serif font family for user interface environments")
 971     (description
 972      "Source Sans Pro is a set of OpenType fonts that have been designed to
 973 work well in user interface (UI) environments.")
 974     (license license:silofl1.1)))
 975
 976 (define-public font-adobe-source-serif-pro
 977   (package
 978     (name "font-adobe-source-serif-pro")
 979     (version "2.007R-ro-1.007R-it")
 980     (source
 981      (origin
 982        (method git-fetch)
 983        (uri (git-reference
 984              (url "https://github.com/adobe-fonts/source-serif-pro")
 985              (commit (regexp-substitute/global
 986                       ;; The upstream tag uses "/" between the roman and italic
 987                       ;; versions, so substitute our "-" separator here.
 988                       #f "R-ro-" version 'pre "R-ro/" 'post))))
 989        (file-name (git-file-name name version))
 990        (sha256
 991         (base32 "1vvzfhjpi47m84bzkapylkd5fri8bdm8qng2hiylmmlw0wk4gpas"))))
 992     (build-system font-build-system)
 993     (home-page "https://github.com/adobe-fonts/source-serif-pro")
 994     (synopsis
 995      "Serif typeface to complement Source Sans Pro for setting text")
 996     (description
 997      "Source Serif Pro is a set of OpenType fonts to complement the Source
 998 Sans Pro family.")
 999     (license license:silofl1.1)))
1000
1001 (define-public font-fira-mono
1002   (package
1003     (name "font-fira-mono")
1004     (version "3.206")
1005     (source (origin
1006               (method url-fetch)
1007               (uri (string-append "https://carrois.com/downloads/fira_mono_3_2/"
1008                                   "FiraMonoFonts"
1009                                   (string-replace-substring version "." "")
1010                                   ".zip"))
1011               (sha256
1012                (base32
1013                 "1z65x0dw5dq6rs6p9wyfrir50rlh95vgzsxr8jcd40nqazw4jhpi"))))
1014     (build-system font-build-system)
1015     (home-page "https://mozilla.github.io/Fira/")
1016     (synopsis "Mozilla's monospace font")
1017     (description "This is the typeface used by Mozilla in Firefox OS.")
1018     (license license:silofl1.1)))
1019
1020 (define-public font-fira-sans
1021   (package
1022     (name "font-fira-sans")
1023     (version "4.202")
1024     (source (origin
1025               (method git-fetch)
1026               (uri (git-reference
1027                      (url "https://github.com/mozilla/Fira")
1028                      (commit version)))
1029               (file-name (git-file-name name version))
1030               (sha256
1031                (base32
1032                 "116j26gdj5g1r124b4669372f7490vfjqw7apiwp2ggl0am5xd0w"))))
1033     (build-system font-build-system)
1034     (home-page "https://mozilla.github.io/Fira/")
1035     (synopsis "Mozilla's Fira Sans Font")
1036     (description "This is the typeface used by Mozilla in Firefox OS.")
1037     (license license:silofl1.1)))
1038
1039 (define-public font-fira-code
1040   (package
1041     (name "font-fira-code")
1042     (version "1.206")
1043     (source (origin
1044               (method url-fetch/zipbomb)
1045               (uri (string-append "https://github.com/tonsky/FiraCode/releases/"
1046                                   "download/" version
1047                                   "/FiraCode_" version ".zip"))
1048               (sha256
1049                (base32
1050                 "02r1lcp0c9135ps71v66wdvbsrcxwirrp0blqsa1xbjkkq2rwgj3"))))
1051     (build-system font-build-system)
1052     (home-page "https://mozilla.github.io/Fira/")
1053     (synopsis "Monospaced font with programming ligatures")
1054     (description
1055      "Fira Code is an extension of the Fira Mono font containing a set of ligatures
1056 for common programming multi-character combinations.  This is just a font rendering
1057 feature: underlying code remains ASCII-compatible.  This helps to read and understand
1058 code faster.  For some frequent sequences like .. or //, ligatures allow us to
1059 correct spacing.")
1060     (license license:silofl1.1)))
1061
1062 (define-public font-awesome
1063   (package
1064    (name "font-awesome")
1065    ;; XXX The build scripts of version 5 are not freely licensed and
1066    ;; so we have to stick with version 4 for now:
1067    ;; <https://bugs.gnu.org/32916>
1068    (version "4.7.0")
1069    (source (origin
1070             (method git-fetch)
1071             (uri (git-reference
1072                    (url "https://github.com/FortAwesome/Font-Awesome")
1073                    (commit (string-append "v" version))))
1074             (file-name (git-file-name name version))
1075             (sha256
1076              (base32
1077               "0w30y26jp8nvxa3iiw7ayl6rkza1rz62msl9xw3srvxya1c77grc"))))
1078    (build-system font-build-system)
1079    (arguments
1080     '(#:phases
1081       (modify-phases %standard-phases
1082         (replace 'install
1083           (lambda* (#:key outputs #:allow-other-keys)
1084             (let* ((out (assoc-ref outputs "out"))
1085                    (source (string-append (getcwd) "/fonts"))
1086                    (fonts (string-append out "/share/fonts")))
1087               (for-each (lambda (file)
1088                           (install-file file (string-append fonts "/truetype")))
1089                         (find-files source "\\.(ttf|ttc)$"))
1090               (for-each (lambda (file)
1091                           (install-file file (string-append fonts "/opentype")))
1092                         (find-files source "\\.(otf|otc)$"))
1093               #t))))))
1094    (home-page "https://fontawesome.com/")
1095    (synopsis "Font that contains a rich iconset")
1096    (description
1097     "Font Awesome is a full suite of pictographic icons for easy scalable
1098 vector graphics.")
1099    (license license:silofl1.1)))
1100
1101 (define-public font-tamzen
1102   (package
1103     (name "font-tamzen")
1104     (version "1.11.5")
1105     (source
1106      (origin
1107        (method git-fetch)
1108        (uri (git-reference
1109               (url "https://github.com/sunaku/tamzen-font")
1110               (commit (string-append "Tamzen-" version))))
1111        (file-name (git-file-name name version))
1112        (sha256
1113         (base32 "00x5fipzqimglvshhqwycdhaqslbvn3rl06jnswhyxfvz16ymj7s"))))
1114     (build-system trivial-build-system)
1115     (arguments
1116      `(#:modules ((guix build utils))
1117        #:builder
1118        (begin
1119          (use-modules (guix build utils))
1120
1121          (let* ((out      (assoc-ref %outputs "out"))
1122                 (font-dir (string-append out "/share/fonts/misc"))
1123                 (psf-dir  (string-append out "/share/kbd/consolefonts")))
1124            (chdir (assoc-ref %build-inputs "source"))
1125            (mkdir-p font-dir)
1126            (mkdir-p psf-dir)
1127            (for-each (lambda (pcf)
1128                        (install-file pcf font-dir))
1129                      (find-files "pcf" "\\.pcf$"))
1130            (for-each (lambda (psf)
1131                        (install-file psf psf-dir))
1132                      (find-files "psf" "\\.psf$"))
1133            #t))))
1134     (home-page "https://github.com/sunaku/tamzen-font")
1135     (synopsis "Monospaced bitmap font for console and X11")
1136     (description
1137      "Tamzen is a fork of the @code{Tamsyn} font.  It is programmatically forked
1138 from @code{Tamsyn} version 1.11, backporting glyphs from older versions while
1139 deleting deliberately empty glyphs (which are marked as unimplemented) to
1140 allow secondary/fallback fonts to provide real glyphs at those codepoints.
1141
1142 The @code{TamzenForPowerline} fonts provide additional @code{Powerline} symbols,
1143 which are programmatically injected with @code{bitmap-font-patcher} and
1144 later hand-tweaked with the gbdfed(1) editor:
1145
1146 @enumerate
1147 @item all icons are expanded to occupy the maximum available space
1148 @item the branch of the fork icon ( U+E0A0) was made larger than the trunk
1149 @item for the newline icon ( U+E0A1), the @emph{N} was made larger at the bottom
1150 @item the keyhole in the padlock icon ( U+E0A2) was replaced with @emph{//} lines.
1151 @end enumerate\n")
1152     (license (license:non-copyleft "file://LICENSE"))))
1153
1154 (define-public font-comic-neue
1155   (package
1156     (name "font-comic-neue")
1157     (version "2.5")
1158     (source (origin
1159               (method url-fetch/zipbomb)
1160               (uri (string-append
1161                     "http://www.comicneue.com/comic-neue-" version ".zip"))
1162               (sha256
1163                (base32
1164                 "1ng0m0zs7qr91qy5ff0l01l27npr76961c6zfkxnhxf68zpwz5k4"))))
1165     (build-system font-build-system)
1166     (arguments
1167      `(#:phases
1168        (modify-phases %standard-phases
1169          ;; Delete Mac OS X specific files. If not deleted, these cause
1170          ;; several hidden files to be installed.
1171          (add-before 'install 'delete-macosx-files
1172            (lambda _
1173              (delete-file-recursively "__MACOSX")
1174              #t))
1175          (add-after 'install 'install-conf
1176            (lambda* (#:key outputs #:allow-other-keys)
1177              (let ((conf-dir (string-append (assoc-ref outputs "out")
1178                                             "/share/fontconfig/conf.avail")))
1179                (mkdir-p conf-dir)
1180                (call-with-output-file
1181                    (string-append conf-dir "/30-comic-neue.conf")
1182                  (lambda (port)
1183                    (format port "<?xml version=\"1.0\"?>
1184 <!DOCTYPE fontconfig SYSTEM \"fonts.dtd\">
1185 <fontconfig>
1186   <!-- If Comic Sans is missing, use Comic Neue instead. -->
1187   <alias>
1188     <family>Comic Sans MS</family>
1189     <prefer>
1190       <family>Comic Neue</family>
1191     </prefer>
1192   </alias>
1193 </fontconfig>\n"))))
1194              #t)))))
1195     (home-page "http://www.comicneue.com/")
1196     (synopsis "Font that fixes the shortcomings of Comic Sans")
1197     (description
1198      "Comic Neue is a font that attempts to create a respectable casual
1199 typeface, by mimicking Comic Sans while fixing its most obvious shortcomings.")
1200     (license license:silofl1.1)))
1201
1202 (define-public font-iosevka
1203   (package
1204     (name "font-iosevka")
1205     ;; When updating, also update the hash of the Iosevka variant(s) below.
1206     (version "3.4.7")
1207     (source
1208      (origin
1209        (method url-fetch/zipbomb)
1210        (uri (string-append "https://github.com/be5invis/Iosevka"
1211                            "/releases/download/v" version
1212                            "/ttc-iosevka-" version ".zip"))
1213        (sha256
1214         (base32 "178xyxz57ncigv715db0898d5arcx1l7qi73a8prb2fdlb7x2yx6"))))
1215     (build-system font-build-system)
1216     (home-page "https://be5invis.github.io/Iosevka/")
1217     (synopsis "Coders' typeface, built from code")
1218     (description
1219      "Iosevka is a slender monospace sans-serif or slab-serif typeface inspired
1220 by Pragmata Pro, M+, and PF DIN Mono, designed to be the ideal font for
1221 programming.  Iosevka is completely generated from its source code.")
1222     (license (list license:silofl1.1 ; build artifacts (i.e. the fonts)
1223                    license:bsd-3)))) ; supporting code
1224
1225 (define-public font-iosevka-slab
1226   (package
1227     (inherit font-iosevka)
1228     (name "font-iosevka-slab")
1229     (version (package-version font-iosevka))
1230     (source
1231      (origin
1232        (method url-fetch/zipbomb)
1233        (uri (string-append "https://github.com/be5invis/Iosevka"
1234                            "/releases/download/v" version
1235                            "/ttc-iosevka-slab-" version ".zip"))
1236        (sha256
1237         (base32 "1zqgly4ymmmz3ckfsc2vdxw6d62axcyl79fq3gi630c4951nfikz"))))))
1238
1239 (define-public font-iosevka-term
1240   (package
1241     (inherit font-iosevka)
1242     (name "font-iosevka-term")
1243     (version (package-version font-iosevka))
1244     (source
1245      (origin
1246        (method url-fetch/zipbomb)
1247        (uri (string-append "https://github.com/be5invis/Iosevka"
1248                            "/releases/download/v" version
1249                            "/ttf-iosevka-term-" version ".zip"))
1250        (sha256
1251         (base32
1252          "0nfwxhxgrgz3hhhrvr759263bm88zbh0zsavpnmphxwg9kykjq39"))))
1253     (arguments
1254      `(#:phases
1255        (modify-phases %standard-phases
1256          (add-before 'install 'make-files-writable
1257            (lambda _
1258              (for-each make-file-writable (find-files "." ".*"))
1259              #t)))))))
1260
1261 (define-public font-iosevka-term-slab
1262   (package
1263     (inherit font-iosevka)
1264     (name "font-iosevka-term-slab")
1265     (version (package-version font-iosevka))
1266     (source
1267      (origin
1268        (method url-fetch/zipbomb)
1269        (uri (string-append "https://github.com/be5invis/Iosevka"
1270                            "/releases/download/v" version
1271                            "/ttf-iosevka-term-slab-" version ".zip"))
1272        (sha256
1273         (base32
1274          "01ynnwlfq3294p8v0656xw6wcfmqklf0yqwkqh3sh2wmj7rrs7wi"))))
1275     (arguments
1276      `(#:phases
1277        (modify-phases %standard-phases
1278          (add-before 'install 'make-files-writable
1279            (lambda _
1280              (for-each make-file-writable (find-files "." ".*"))
1281              #t)))))))
1282
1283 (define-public font-iosevka-aile
1284   (package
1285     (inherit font-iosevka)
1286     (name "font-iosevka-aile")
1287     (version (package-version font-iosevka))
1288     (source
1289      (origin
1290        (method url-fetch/zipbomb)
1291        (uri (string-append "https://github.com/be5invis/Iosevka"
1292                            "/releases/download/v" version
1293                            "/ttc-iosevka-aile-" version ".zip"))
1294        (sha256
1295         (base32 "0h4wzjyw3h5zbxzfb71z7aj5xwp8r1hd93qim6zicxfk9dgczgw5"))))))
1296
1297 (define-public font-iosevka-etoile
1298   (package
1299     (inherit font-iosevka)
1300     (name "font-iosevka-etoile")
1301     (version (package-version font-iosevka))
1302     (source
1303      (origin
1304        (method url-fetch/zipbomb)
1305        (uri (string-append "https://github.com/be5invis/Iosevka"
1306                            "/releases/download/v" version
1307                            "/ttc-iosevka-etoile-" version ".zip"))
1308        (sha256
1309         (base32 "1n1jy7g0q0kd4ihsyka1v02s7xgpg80rf9sml1yhxkqw5pq62972"))))))
1310
1311 (define-public font-iosevka-sparkle
1312   (package
1313     (inherit font-iosevka)
1314     (name "font-iosevka-sparkle")
1315     (version (package-version font-iosevka))
1316     (source
1317      (origin
1318        (method url-fetch/zipbomb)
1319        (uri (string-append "https://github.com/be5invis/Iosevka"
1320                            "/releases/download/v" version
1321                            "/ttc-iosevka-sparkle-" version ".zip"))
1322        (sha256
1323         (base32 "0chl6x3xy6alq64sax71psvpq6f6fgw6pbn04f5j5skgrbqkk292"))))))
1324
1325 (define-public font-sarasa-gothic
1326   (package
1327     (name "font-sarasa-gothic")
1328     (version "0.12.7")
1329     (source
1330      (origin
1331        (method url-fetch)
1332        (uri (string-append "https://github.com/be5invis/Sarasa-Gothic"
1333                            "/releases/download/v" version
1334                            "/sarasa-gothic-ttc-" version ".7z"))
1335        (sha256
1336         (base32 "09v65k00g8m953s6riz9xjzb2jgr6v5pdhcllalzzl7c1cn2xl3k"))))
1337     (build-system font-build-system)
1338     (arguments
1339      `(#:phases (modify-phases %standard-phases
1340                   (replace 'unpack
1341                     (lambda* (#:key source #:allow-other-keys)
1342                       (mkdir "source")
1343                       (chdir "source")
1344                       (invoke "7z" "x" source))))))
1345     (native-inputs `(("p7zip" ,p7zip)))
1346     (home-page "https://github.com/be5invis/Sarasa-Gothic")
1347     (license license:silofl1.1)
1348     (synopsis "Sarasa Gothic / 更纱黑体 / 更紗黑體 / 更紗ゴシック / 사라사 고딕")
1349     (description
1350      "Sarasa Gothic is a programming font based on Iosevka and Source Han Sans,
1351 most CJK characters are same height, and double width as ASCII characters.")))
1352
1353 (define-public font-go
1354   (let ((commit "f03a046406d4d7fbfd4ed29f554da8f6114049fc")
1355         (revision "1"))
1356     (package
1357       (name "font-go")
1358       (version (string-append "20170330-" revision "." (string-take commit 7)))
1359       (source (origin
1360                 (file-name (string-append "go-image-" version "-checkout"))
1361                 (method git-fetch)
1362                 (uri (git-reference
1363                       (url "https://go.googlesource.com/image")
1364                       (commit commit)))
1365                 (sha256
1366                  (base32
1367                   "1aq6mnjayks55gd9ahavk6jfydlq5lm4xm0xk4pd5sqa74p5p74d"))))
1368       (build-system font-build-system)
1369       (arguments
1370        `(#:phases
1371          (modify-phases %standard-phases
1372            (add-before 'install 'chdir
1373              (lambda _
1374                (chdir "font/gofont/ttfs")
1375                #t)))))
1376       (home-page "https://blog.golang.org/go-fonts")
1377       (synopsis "The Go font family")
1378       (description
1379        "The Go font family is a set of WGL4 TrueType fonts from the Bigelow &
1380 Holmes type foundry, released under the same license as the Go programming
1381 language.  It includes a set of proportional, sans-serif fonts, and a set of
1382 monospace, slab-serif fonts.")
1383       (license license:bsd-3))))
1384
1385 (define-public font-google-material-design-icons
1386   (package
1387     (name "font-google-material-design-icons")
1388     (version "3.0.1")
1389     (source (origin
1390               (method git-fetch)
1391               (uri (git-reference
1392                      (url "https://github.com/google/material-design-icons")
1393                      (commit version)))
1394               (file-name (git-file-name name version))
1395               (sha256
1396                (base32
1397                 "17q5brcqyyc8gbjdgpv38p89s60cwxjlwy2ljnrvas5cj0s62np0"))))
1398     (build-system font-build-system)
1399     (home-page "https://google.github.io/material-design-icons")
1400     (synopsis "Icon font of Google Material Design icons")
1401     (description
1402      "Material design system icons are simple, modern, friendly, and sometimes
1403 quirky.  Each icon is created using our design guidelines to depict in simple
1404 and minimal forms the universal concepts used commonly throughout a UI.
1405 Ensuring readability and clarity at both large and small sizes, these icons
1406 have been optimized for beautiful display on all common platforms and display
1407 resolutions.")
1408     (license license:asl2.0)))
1409
1410 (define-public font-opendyslexic
1411   (package
1412     (name "font-opendyslexic")
1413     (version "0.91.12")
1414     (source
1415       (origin
1416         (method url-fetch/zipbomb)
1417         (uri (string-append "https://github.com/antijingoist/opendyslexic/"
1418                             "releases/download/v" version
1419                             "/opendyslexic-0.910.12-rc2-2019.10.17.zip"))
1420         (sha256
1421          (base32
1422           "11ml7v4iyf3hr0fbnkwz8afb8vi58wbcfnmn4gyvrwh9jk5pybdr"))))
1423     (build-system font-build-system)
1424     (native-inputs `(("unzip" ,unzip)))
1425     (home-page "https://opendyslexic.org/")
1426     (synopsis "Font for dyslexics and high readability")
1427     (description "OpenDyslexic is a font designed to help readability for some
1428 of the symptoms of dyslexia.  Letters have heavy weighted bottoms to provide
1429 an indication of orientation to make it more difficult to confuse with other
1430 similar letters.  Consistently weighted bottoms can also help reinforce the
1431 line of text.  The unique shapes of each letter can help prevent flipping and
1432 swapping.  The italic style for OpenDyslexic has been crafted to be used for
1433 emphasis while still being readable.")
1434     (license license:silofl1.1)))
1435
1436 (define-public font-open-dyslexic
1437   (deprecated-package "font-open-dyslexic" font-opendyslexic))
1438
1439 (define-public font-dosis
1440   (package
1441     (name "font-dosis")
1442     (version "1.7")
1443     (source
1444      (origin
1445        (method url-fetch/zipbomb)
1446        (uri (string-append "https://web.archive.org/web/20180228233737/"
1447                            "https://www.impallari.com/media/releases/dosis-"
1448                            "v" version ".zip"))
1449        (sha256
1450         (base32 "1qhci68f68mf87jd69vjf9qjq3wydgw1q7ivn3amjb65ls1s0c4s"))))
1451     (build-system font-build-system)
1452     (home-page (string-append "https://web.archive.org/web/20180228233737/"
1453                               "https://www.impallari.com/dosis"))
1454     (synopsis "Very simple, rounded, sans serif family")
1455     (description
1456      "Dosis is a very simple, rounded, sans serif family.
1457 The lighter weights are minimalist.  The bolder weights have more personality.
1458 The medium weight is nice and balanced.  The overall result is a family
1459 that's clean and modern, and can express a wide range of voices & feelings.
1460 It comes in 7 incremental weights:
1461 ExtraLight, Light, Book, Medium, Semibold, Bold & ExtraBold")
1462     (license license:silofl1.1)))
1463
1464 (define-public font-culmus
1465   (package
1466     (name "font-culmus")
1467     (version "0.133")
1468     (source
1469      (origin
1470        (method url-fetch)
1471        (uri (string-append "https://sourceforge.net/projects/"
1472                            "culmus/files/culmus/" version "/culmus-src-"
1473                            version ".tar.gz"))
1474        (sha256
1475         (base32
1476          "02akysgsqhi15cck54xcacm16q5raf4l7shgb8fnj7xr3c1pbfyp"))))
1477     (build-system font-build-system)
1478     (arguments
1479      `(#:phases
1480        (modify-phases %standard-phases
1481          (add-before 'install 'build
1482            (lambda _
1483              (let ((compile
1484                     (lambda (name ext)
1485                       (invoke
1486                        "fontforge" "-lang=ff"
1487                        "-c" (string-append "Open('" name "');"
1488                                            "Generate('"
1489                                            (basename name "sfd") ext
1490                                            "')")))))
1491                ;; This part based on the fonts shipped in the non-source package.
1492                (for-each (lambda (name)
1493                            (compile name "ttf"))
1494                          (find-files "." "^[^Nachlieli].*\\.sfd$"))
1495                (for-each (lambda (name)
1496                            (compile name "otf"))
1497                          (find-files "." "^Nachlieli.*\\.sfd$"))
1498                #t))))))
1499     (native-inputs
1500      `(("fontforge" ,fontforge)))
1501     (home-page "http://culmus.sourceforge.net/")
1502     (synopsis "TrueType Hebrew Fonts for X11")
1503     (description "14 Hebrew trivial families.  Contain ASCII glyphs from various
1504 sources.  Those families provide a basic set of a serif (Frank Ruehl), sans
1505 serif (Nachlieli) and monospaced (Miriam Mono) trivials.  Also included Miriam,
1506 Drugulin, Aharoni, David, Hadasim etc.  Cantillation marks support is
1507 available in Keter YG.")
1508     (license license:gpl2))) ; consult the LICENSE file included
1509
1510 (define-public font-lohit
1511   (package
1512     (name "font-lohit")
1513     (version "20140220")
1514     (source
1515      (origin
1516        (method url-fetch)
1517        (uri (string-append "https://releases.pagure.org/lohit/lohit-ttf-"
1518                            version ".tar.gz"))
1519        (sha256
1520         (base32
1521          "1rmgr445hw1n851ywy28csfvswz1i6hnc8mzp88qw2xk9j4dn32d"))))
1522     (build-system font-build-system)
1523     (home-page "https://pagure.io/lohit")
1524     (synopsis "Lohit TrueType Indic fonts")
1525     (description "Lohit is a font family designed to cover Indic scripts.
1526 Lohit supports the Assamese, Bengali, Devanagari (Hindi, Kashmiri, Konkani,
1527 Maithili, Marathi, Nepali, Sindhi, Santali, Bodo, Dogri languages), Gujarati,
1528 Kannada, Malayalam, Manipuri, Oriya, Punjabi, Tamil and Telugu scripts.")
1529     (license license:silofl1.1)))
1530
1531 (define-public font-blackfoundry-inria
1532   (package
1533     (name "font-blackfoundry-inria")
1534     (version "1.200")
1535     (home-page "https://github.com/BlackFoundry/InriaFonts")
1536     (source (origin
1537               (method git-fetch)
1538               (uri (git-reference
1539                     (url home-page)
1540                     (commit (string-append "v" version))))
1541               (sha256
1542                (base32
1543                 "06775y99lyh6hj5hzvrx56iybdck8a8xfqkipqd5c4cldg0a9hh8"))
1544               (file-name (string-append name "-" version "-checkout"))))
1545     ;; XXX: There are .ufo directories (the "source") so in theory we should
1546     ;; be able to rebuild TTF and OTF files with FontForge.  Unfortunately a
1547     ;; command like:
1548     ;;
1549     ;;  fontforge -lang=ff -c "Open('InriaSans-Regular.ufo'); Generate('foo.ttf');"
1550     ;;
1551     ;; segfaults in '_UFOLoadGlyph', which calls out to libpython.  :-/
1552     ;; In the meantime we ship the precompiled OTF and TTF files.
1553     (build-system font-build-system)
1554     (synopsis "Inria Sans and Inria Serif type family")
1555     (description
1556      "Inria Sans and Inria Serif are the two members of a type family designed
1557 for Inria, a public research institute in computer science and mathematics.")
1558     (license license:silofl1.1)))
1559
1560 (define-public font-sil-gentium
1561   (package
1562     (name "font-sil-gentium")
1563     (version "5.000")
1564     (source (origin
1565               (method url-fetch)
1566               (uri (string-append
1567                     "https://software.sil.org/downloads/r/gentium/GentiumPlus-"
1568                     version ".zip"))
1569               (sha256
1570                (base32
1571                 "0m7189870hha217n1vgpmf89mwggrxkh679ffi1lxpnjggqi2n9k"))))
1572     ;; Note: The zip file provides TTF files only, but the developer release,
1573     ;; which contains additional files, has a 'SOURCES.txt' file that says
1574     ;; that "the primary source files for the fonts are the fonts themselves".
1575     ;; Thus it looks like the TTF can be considered source.
1576     (build-system font-build-system)
1577     (synopsis "Serif font for the Cyrillic, Greek, and Latin alphabets")
1578     (description
1579      "Gentium is a typeface family designed to enable the diverse ethnic
1580 groups around the world who use the Latin, Cyrillic and Greek scripts to
1581 produce readable, high-quality publications.  The font comes with regular and
1582 italics shapes.  This package provides only TrueType files (TTF).")
1583     (home-page "https://software.sil.org/gentium/")
1584     (license license:silofl1.1)))
1585
1586 (define-public font-sil-andika
1587   (package
1588     (name "font-sil-andika")
1589     (version "5.000")
1590     (source (origin
1591               (method url-fetch)
1592               (uri (string-append
1593                     "https://software.sil.org/downloads/r/andika/Andika-"
1594                     version ".zip"))
1595               (sha256
1596                (base32
1597                 "01zm7p32gxfwmv7h3cfj2vx59846w2y6rxqy67grn2dyjh8pljv0"))))
1598     ;; As for Gentium (see above), the TTF files are considered source.
1599     (build-system font-build-system)
1600     (synopsis "Sans serif font designed especially for literacy use")
1601     (description
1602      "Andika SIL is a sans serif, Unicode-compliant font designed especially
1603 for literacy use, taking into account the needs of beginning readers.  The
1604 focus is on clear, easy-to-perceive letterforms that will not be readily
1605 confused with one another.  This package provides only TrueType files (TTF).")
1606     (home-page "https://software.sil.org/andika/")
1607     (license license:silofl1.1)))
1608
1609 (define-public font-sil-charis
1610   (package
1611     (name "font-sil-charis")
1612     (version "5.000")
1613     (source (origin
1614               (method url-fetch)
1615               (uri (string-append
1616                     "https://software.sil.org/downloads/r/charis/CharisSIL-"
1617                     version ".zip"))
1618               (sha256
1619                (base32
1620                 "1zcvw37f1a7gkml3yfm6hxh93844llm7xj4w52600qq3ndrm8gjy"))))
1621     ;; As for Gentium (see above), the TTF files are considered source.
1622     (build-system font-build-system)
1623     (synopsis "Serif font for the Cyrillic and Latin alphabets")
1624     (description
1625      "Charis SIL is a Unicode-based font family that supports the wide range
1626 of languages that use the Latin and Cyrillic scripts.  It is specially
1627 designed to make long texts pleasant and easy to read, even in less than ideal
1628 reproduction and display environments.  This package provides only TrueType
1629 files (TTF).")
1630     (home-page "https://software.sil.org/charis/")
1631     (license license:silofl1.1)))
1632
1633 (define-public font-mononoki
1634   (package
1635     (name "font-mononoki")
1636     (version "1.2")
1637     (source (origin
1638               (method git-fetch)
1639               (uri (git-reference
1640                     (url "https://github.com/madmalik/mononoki/")
1641                     (commit version)))
1642               (sha256
1643                (base32
1644                 "1rkzyxn30rn8qv2h2xz324j7q15hzg2lci8790a7cdl1dfgic4xi"))
1645               (file-name (git-file-name name version))))
1646     (build-system font-build-system)
1647     (synopsis "Font for programming and code review")
1648     (description
1649      "Mononoki is a typeface by Matthias Tellen, created to enhance code
1650 formatting.")
1651     (home-page "https://madmalik.github.io/mononoki/")
1652     (license license:silofl1.1)))
1653
1654 (define-public font-public-sans
1655   (package
1656     (name "font-public-sans")
1657     (version "1.008")
1658     (source
1659      (origin
1660        (method git-fetch)
1661        (uri (git-reference
1662              (url "https://github.com/uswds/public-sans")
1663              (commit (string-append "v" version))))
1664        (file-name (git-file-name name version))
1665        (sha256
1666         (base32 "1qhyxbjv1rnydfpqzd18fbiyz75p4sabphy8yj07hyq0hidp5xsf"))))
1667     (build-system font-build-system)
1668     (home-page "https://public-sans.digital.gov/")
1669     (synopsis "Neutral typeface for interfaces, text, and headings")
1670     (description
1671      "Public Sans is a strong, neutral, sans-serif typeface for text or
1672 display based on Libre Franklin.")
1673     (license license:silofl1.1)))
1674
1675 (define-public font-hermit
1676   (package
1677     (name "font-hermit")
1678     (version "2.0")
1679     (source (origin
1680               (method url-fetch/tarbomb)
1681               (uri (string-append "https://pcaro.es/d/otf-hermit-" version
1682                                   ".tar.gz"))
1683               (sha256
1684                (base32
1685                 "09rmy3sbf1j1hr8zidighjgqc8kp0wsra115y27vrnlf10ml6jy0"))))
1686     (build-system font-build-system)
1687     (arguments
1688      `(#:tests? #f))
1689     (home-page "https://pcaro.es/p/hermit/")
1690     (synopsis "Monospace font")
1691     (description
1692      "Hermit is a monospace font designed to be clear, pragmatic and very
1693 readable.  Its creation has been focused on programming.  Every glyph was
1694 carefully planned and calculated, according to defined principles and rules.
1695 For this reason, Hermit is coherent and regular.
1696
1697 Symbols stand out from common text.  Dots and commas are easily seen, and
1698 operators are clear even when not surrounded by spaces.  Similar characters
1699 have been designed to be very distinguishable from each other.")
1700     (license license:silofl1.1)))
1701
1702 (define-public font-dseg
1703   (package
1704     (name "font-dseg")
1705     (version "0.45")
1706     (source
1707       (origin
1708         (method url-fetch/zipbomb)
1709         (uri
1710           (string-append "https://github.com/keshikan/DSEG/"
1711                          "releases/download/v" version
1712                          "/fonts-DSEG_v"
1713                          (string-concatenate (string-split version #\.))
1714                          ".zip"))
1715         (sha256
1716           (base32
1717             "0v8sghh4vl286faf8pvi74znz07pyf0qii8z4wjllisqwc35sx72"))))
1718     (build-system font-build-system)
1719     (arguments
1720      `(#:phases
1721        (modify-phases %standard-phases
1722          (replace 'install
1723            (lambda* (#:key outputs #:allow-other-keys)
1724              (let* ((out (assoc-ref outputs "out"))
1725                     (font-dir (string-append out "/share/fonts"))
1726                     (truetype-dir (string-append font-dir "/truetype")))
1727                (with-directory-excursion
1728                  (string-append "fonts-DSEG_v"
1729                                 (apply string-append (string-split ,version
1730                                                                    #\.)))
1731                  (for-each (lambda (f) (install-file f truetype-dir))
1732                            (find-files "." "\\.ttf$"))
1733                #t)))))))
1734     (home-page "https://www.keshikan.net/fonts-e.html")
1735     (synopsis "DSEG: 7-segment and 14-segment fonts")
1736     (description
1737      "DSEG is a font family that imitates seven- and fourteen-segment LCD
1738 displays (7SEG, 14SEG).  DSEG includes the roman alphabet and symbol glyphs.
1739 This package provides the TrueType fonts.")
1740     (license license:silofl1.1)))
1741
1742 (define-public font-jetbrains-mono
1743   (package
1744     (name "font-jetbrains-mono")
1745     (version "2.001")
1746     (source
1747      (origin
1748        (method url-fetch)
1749        (uri
1750         (string-append "https://download.jetbrains.com/fonts/"
1751                        "JetBrainsMono-" version ".zip"))
1752        (sha256
1753         (base32 "0r3dk3kn536rik4mvpcjin9mwmifl3v8mawvb4a5l59pww0vcxzq"))))
1754     (build-system font-build-system)
1755     (arguments
1756      `(#:phases
1757        (modify-phases %standard-phases
1758          (replace 'install-license-files
1759            (lambda* (#:key outputs #:allow-other-keys)
1760              (let* ((out (assoc-ref outputs "out"))
1761                     (doc (string-append out "/share/doc/" ,name "-" ,version)))
1762                (install-file "../LICENSE" doc)
1763                #t))))))
1764     (home-page "https://www.jetbrains.com/lp/mono/")
1765     (synopsis "Mono typeface for developers")
1766     (description
1767      "JetBrains Mono is a font family dedicated to developers.  JetBrains
1768 Mono’s typeface forms are simple and free from unnecessary details.  Rendered
1769 in small sizes, the text looks crisper.")
1770     (license license:asl2.0)))
1771
1772 (define-public font-vazir
1773   (package
1774     (name "font-vazir")
1775     (version "22.1.0")
1776     (source
1777      (origin
1778        (method url-fetch/zipbomb)
1779        (uri
1780         (string-append "https://github.com/rastikerdar/vazir-font/"
1781                        "releases/download/v" version
1782                        "/vazir-font-v" version ".zip"))
1783        (sha256
1784         (base32
1785          "0w3gwb5q33x5llw7cfs8qhaxr4ssg6rsx4b9day3993zn24xq031"))))
1786     (build-system font-build-system)
1787     (home-page "https://rastikerdar.github.io/vazir-font/")
1788     (synopsis "Vazir Persian typeface")
1789     (description
1790      "Vazir is a beautiful and elegant Persian typeface originally based on
1791 DejaVu, and comes in six variants: Thin, Light, Normal, Medium, Bold, and
1792 Black.  This package provides four versions of Vazir:
1793
1794 @itemize
1795 @item @code{Vazir}: The main version; includes Latin glyphs from Roboto.
1796 @item @code{Vazir-FD}: Like @code{Vazir}, but (always) uses Farsi digit glyphs
1797 instead of Latin ones.
1798 @item @code{Vazir-WOL}: Like @code{Vazir}, but without Roboto's Latin glyphs.
1799 @item @code{Vazir-FD-WOL}: Combination of @code{Vazir-FD} and @code{Vazir-WOL}:
1800 always uses Farsi digits, and does not include Latin glyphs from Roboto.
1801 @end itemize\n")
1802     (license
1803      ;; See https://github.com/rastikerdar/vazir-font/blob/master/LICENSE for
1804      ;; details.
1805      (list license:public-domain        ; the Vazir modifications to DejaVu
1806                                         ; and the DejaVu modifications to...
1807            (license:x11-style           ; ...the Bitstream Vera typeface
1808             "file://LICENSE" "Bitstream Vera License")
1809            license:asl2.0))))           ; Latin glyphs from Roboto
1810
1811 (define-public font-meera-inimai
1812   (package
1813     (name "font-meera-inimai")
1814     (version "2.0")
1815     (source
1816      (origin
1817        (method git-fetch)
1818        (uri (git-reference
1819              (url "https://gitlab.com/smc/meera-inimai")
1820              (commit "0f39cdd7dbf1b6d1bed7df85834d33789dce20a7")))
1821        (file-name (git-file-name name version))
1822        (sha256
1823         (base32
1824          "1x5mhrpx24imh0r4l83mkaiszxgwi1q4ppyyvq63h3ddwk20cwdg"))))
1825     (build-system gnu-build-system)
1826     (native-inputs
1827      `(("fontforge" ,fontforge)
1828        ("harfbuzz" ,harfbuzz "bin")
1829        ("python" ,python-minimal)
1830        ("python-fonttools" ,python-fonttools)
1831        ("python-google-brotli" ,python-google-brotli)))
1832     (arguments
1833      `(#:make-flags (list "PY=python3"
1834                           (string-append "DESTDIR=" %output)
1835                           "fontpath=/share/fonts/truetype")
1836        #:test-target "test"
1837        #:phases
1838        (modify-phases %standard-phases
1839          (delete 'configure))))
1840     (home-page "https://gitlab.com/smc/meera-inimai")
1841     (synopsis "Meera Inimai Tamil font")
1842     (description "Meera Inimai is a Unicode font for the Tamil Script.  Meera
1843 Inimai is a san-serif typeface.  It is best used as a screen font for body
1844 text.  It is also useful for body text of printed pamphlets or single page
1845 designs.  Meera Inimai can be thought of as similar to Helvetica and its
1846 variation Arial.  Tamil characters are inherently vertically-elliptical.  The
1847 orthography of Roman glyphs of Meera Inimai are also based on this
1848 characteristic so that they sit smoothly with the Tamil glyphs.")
1849     (license license:silofl1.1)))
1850
1851 (define-public font-ipa-mj-mincho
1852   (package
1853     (name "font-ipa-mj-mincho")
1854     (version "006.01")
1855     (source (origin
1856               (method url-fetch/zipbomb)
1857               (uri (string-append "https://mojikiban.ipa.go.jp/OSCDL/IPAmjMincho"
1858                                   "/ipamjm" (string-join (string-split version #\.) "")
1859                                   ".zip"))
1860               (sha256
1861                (base32
1862                 "0s2vs9p7vd7ajnn6c2icli069sjwi4d45a39fczqpwwn507lwj9m"))))
1863     (build-system font-build-system)
1864     (arguments
1865      `(#:phases
1866        (modify-phases %standard-phases
1867          (add-after 'install 'install-doc
1868            (lambda* (#:key outputs #:allow-other-keys)
1869              (let ((doc-dir (string-append (assoc-ref outputs "out")
1870                                            "/share/doc/font-ipa-mj-mincho")))
1871                (mkdir-p doc-dir)
1872                (copy-file "Readme.txt" (string-append doc-dir "/README"))
1873                (copy-file "IPA_Font_License_Agreement_v1.0.txt"
1874                           (string-append doc-dir "/LICENSE"))
1875                #t))))))
1876     (home-page "https://mojikiban.ipa.go.jp/1300.html")
1877     (synopsis "Japanese font from the Information-technology Promotion Agency")
1878     (description "MJM Mincho is a font that aims at, for example, allowing you
1879 to write people's name, or for formal business situations where it is necessary
1880 to have a detailed and proper character style.")
1881     (license license:ipa)))
1882
1883 (define-public font-fontna-yasashisa-antique
1884   (package
1885     (name "font-fontna-yasashisa-antique")
1886     (version "0")
1887     (source (origin
1888               (method url-fetch)
1889               (uri (string-append "http://flop.sakura.ne.jp/font/fontna-op/"
1890                                   "YasashisaAntiqueFont.zip"))
1891               (sha256
1892                (base32
1893                 "1hl2qk3lzmh9h2vv5647vhlslkn3vqbq9rqgp4wzybajafx8c6nj"))))
1894     (build-system font-build-system)
1895     (arguments
1896      `(#:phases
1897        (modify-phases %standard-phases
1898          ;; encoding issues cause many phases to fail
1899          (add-after 'unpack 'fix-encoding
1900            (lambda _
1901              ;; This directory, TrueType（サポート外）, is not properly encoded,
1902              ;; which makes rename-file fail. Instead, use shell globbing to
1903              ;; select and rename the directory.
1904              (invoke "sh" "-c" "mv TrueType* TrueType")
1905              #t)))))
1906     (native-inputs
1907      `(("bash" ,bash-minimal)
1908        ("coreutils" ,coreutils)))
1909     (home-page "http://www.fontna.com/blog/1122/")
1910     (synopsis "Mix font of gothic kanji and minchou kana")
1911     (description "Antique is a font that is popular to write manga bubbles,
1912 dictionary headwords and picture books.  This font reduces the thickness
1913 differences in characters compared to other antique fonts.")
1914     (license (list license:ipa
1915                    (license:non-copyleft "mplus-TESTFLIGHT-057/LICENSE_E")))))
1916
1917 (define-public font-mplus-testflight
1918   (package
1919     (name "font-mplus-testflight")
1920     (version "063a")
1921     (source (origin
1922               (method url-fetch)
1923               (uri (string-append "https://osdn.net/frs/redir.php?"
1924                                   "m=gigenet&f=mplus-fonts%2F62344%2Fmplus-TESTFLIGHT-"
1925                                   version ".tar.xz"))
1926               (file-name (string-append name "-" version ".tar.xz"))
1927               (sha256
1928                (base32
1929                 "0yfx9i77638yrgclnwwl4af79ri3vifi1nslwi6mgzva9cxrgss4"))))
1930     (build-system font-build-system)
1931     (home-page "https://mplus-fonts.osdn.jp/index.html")
1932     (synopsis "Japanese font collection")
1933     (description "M+ is a collection of Japanese fonts with all Latin glyph
1934 sets, with Basic Latin, Latin-1 Supplement, Latin Extended-A, and IPA
1935 Extensions.  In addition to European letters used in many Western European
1936 languages, it contains Japanese characters, including Kana glyphs and more
1937 than 5,300 Kanji glyphs, as well major international phonetic symbols,
1938 operators and special symbols.")
1939     (license (license:non-copyleft "file:///LICENSE_E"))))
1940
1941 (define-public font-catamaran
1942   (let ((commit "7559b4906f9c9148fb22c6f89508c3053a78a296")
1943         (revision "1"))
1944     (package
1945       (name "font-catamaran")
1946       (version (git-version "0.0.0" revision commit))
1947       (source
1948        (origin
1949          (method git-fetch)
1950          (uri (git-reference
1951                (url "https://github.com/VanillaandCream/Catamaran-Tamil")
1952                (commit commit)))
1953          (file-name (git-file-name name version))
1954          (sha256
1955           (base32
1956            "1wpp41l7j2kpgnyavhgxcc5wp852a4wqsnwravn39gp980s84yxw"))))
1957       (build-system font-build-system)
1958       (home-page "https://github.com/VanillaandCream/Catamaran-Tamil")
1959       (synopsis "9 weight Tamil and Latin type")
1960       (description "Catamaran is a 9 weight Tamil and Latin type.  Catamaran
1961 is a stylish type with a polished yet relaxed feel.  Its versatility makes it
1962 suitable for a wide range of uses.")
1963       (license license:silofl1.1))))