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