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