gnu/packages/xorg.scm

   1 ;;; GNU Guix --- Functional package management for GNU
   2 ;;; Copyright © 2013, 2014 Andreas Enge <andreas@enge.fr>
   3 ;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org>
   4 ;;; Copyright © 2014, 2015 Eric Bavier <bavier@member.fsf.org>
   5 ;;; Copyright © 2015, 2016, 2017 Ludovic Courtès <ludo@gnu.org>
   6 ;;; Copyright © 2015 Eric Dvorsak <eric@dvorsak.fr>
   7 ;;; Copyright © 2016 Mathieu Lirzin <mthl@gnu.org>
   8 ;;; Copyright © 2015 Cyrill Schenkel <cyrill.schenkel@gmail.com>
   9 ;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
  10 ;;; Copyright © 2016 ng0 <ng0@we.make.ritual.n0.is>
  11 ;;; Copyright © 2016 Alex Kost <alezost@gmail.com>
  12 ;;; Copyright © 2016 David Craven <david@craven.ch>
  13 ;;; Copyright © 2016, 2017 John Darrington <jmd@gnu.org>
  14 ;;;
  15 ;;; This file is part of GNU Guix.
  16 ;;;
  17 ;;; GNU Guix is free software; you can redistribute it and/or modify it
  18 ;;; under the terms of the GNU General Public License as published by
  19 ;;; the Free Software Foundation; either version 3 of the License, or (at
  20 ;;; your option) any later version.
  21 ;;;
  22 ;;; GNU Guix is distributed in the hope that it will be useful, but
  23 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
  24 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  25 ;;; GNU General Public License for more details.
  26 ;;;
  27 ;;; You should have received a copy of the GNU General Public License
  28 ;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
  29
  30 (define-module (gnu packages xorg)
  31   #:use-module ((guix licenses) #:prefix license:)
  32   #:use-module (guix packages)
  33   #:use-module (guix download)
  34   #:use-module (guix git-download)
  35   #:use-module (guix build-system gnu)
  36   #:use-module (guix build-system perl)
  37   #:use-module (guix utils)
  38   #:use-module (gnu packages)
  39   #:use-module (gnu packages autotools)
  40   #:use-module (gnu packages bison)
  41   #:use-module (gnu packages compression)
  42   #:use-module (gnu packages flex)
  43   #:use-module (gnu packages fontutils)
  44   #:use-module (gnu packages freedesktop)
  45   #:use-module (gnu packages gettext)
  46   #:use-module (gnu packages gl)
  47   #:use-module (gnu packages glib)
  48   #:use-module (gnu packages gnupg)
  49   #:use-module (gnu packages gperf)
  50   #:use-module (gnu packages image)
  51   #:use-module (gnu packages linux)
  52   #:use-module (gnu packages m4)
  53   #:use-module (gnu packages ncurses)
  54   #:use-module (gnu packages perl)
  55   #:use-module (gnu packages pkg-config)
  56   #:use-module (gnu packages python)
  57   #:use-module (gnu packages spice)
  58   #:use-module (gnu packages xml)
  59   #:use-module (gnu packages xdisorg))
  60
  61
  62
  63
  64 ;; packages without propagated input
  65 ;; (rationale for this separation: The packages in PROPAGATED_INPUTS need to
  66 ;; be defined first, the split makes book-keeping easier.)
  67
  68
  69 ;; compiles only on macos
  70 ;; (define-public applewmproto
  71
  72
  73 (define xorg-cf-files
  74   ;; The xorg-cf-files package contains the data files for the imake utility,
  75   ;; defining the known settings for a wide variety of platforms (many of which
  76   ;; have not been verified or tested in over a decade), and for many of the
  77   ;; libraries formerly delivered in the X.Org monolithic releases.
  78   ;;
  79   ;; License: x11, see COPYING
  80   (origin
  81     (method url-fetch)
  82     (uri "mirror://xorg/individual/util/xorg-cf-files-1.0.5.tar.bz2")
  83     (sha256
  84      (base32
  85       "1m3ypq0xcy46ghxc0svl1rbhpy3zvgmy0aa2mn7w7v7d8d8bh8zd"))))
  86
  87 (define-public imake
  88   (package
  89     (name "imake")
  90     (version "1.0.7")
  91     (source
  92      (origin
  93       (method url-fetch)
  94       (uri (string-append "mirror://xorg/individual/util/imake-"
  95                           version ".tar.bz2"))
  96       (sha256
  97        (base32
  98         "0zpk8p044jh14bis838shbf4100bjg7mccd7bq54glpsq552q339"))))
  99     (build-system gnu-build-system)
 100     (native-inputs
 101       `(("pkg-config" ,pkg-config)))
 102     (inputs
 103       `(("xorg-cf-files" ,xorg-cf-files)
 104         ("xproto" ,xproto)))
 105     (arguments
 106      `(#:phases
 107        (alist-cons-after
 108         'install 'install-data
 109         (lambda* (#:key inputs outputs #:allow-other-keys)
 110           (let ((cf-files (assoc-ref inputs "xorg-cf-files"))
 111                 (out (assoc-ref outputs "out"))
 112                 (unpack (assoc-ref %standard-phases 'unpack))
 113                 (patch-source-shebangs
 114                  (assoc-ref %standard-phases 'patch-source-shebangs)))
 115             (mkdir "xorg-cf-files")
 116             (with-directory-excursion "xorg-cf-files"
 117               (apply unpack (list #:source cf-files))
 118               (apply patch-source-shebangs (list #:source cf-files))
 119               (substitute* '("mingw.cf" "Imake.tmpl" "nto.cf" "os2.cf"
 120                              "linux.cf" "Amoeba.cf" "cygwin.cf")
 121                 (("/bin/sh") (which "bash")))
 122               (and (zero? (system* "./configure"
 123                                    (string-append "SHELL=" (which "bash"))
 124                                    (string-append "--prefix=" out)))
 125                    (zero? (system* "make" "install"))))))
 126         %standard-phases)))
 127     (home-page "http://www.x.org")
 128     (synopsis "Source code configuration and build system")
 129     (description
 130      "Imake is a deprecated source code configuration and build system which
 131 has traditionally been supplied by and used to build the X Window System in
 132 X11R6 and previous releases.  As of the X Window System X11R7 release, the X
 133 Window system has switched to using GNU autotools as the primary build system,
 134 and the Imake system is now deprecated, and should not be used by new software
 135 projects.  Software developers are encouraged to migrate software to the GNU
 136 autotools system.")
 137     (license license:x11)))
 138
 139 (define-public lndir
 140   (package
 141     (name "lndir")
 142     (version "1.0.3")
 143     (source (origin
 144               (method url-fetch)
 145               (uri (string-append
 146                     "mirror://xorg/individual/util/"
 147                     "lndir-" version ".tar.bz2"))
 148               (sha256
 149                (base32
 150                 "0pdngiy8zdhsiqx2am75yfcl36l7kd7d7nl0rss8shcdvsqgmx29"))))
 151     (build-system gnu-build-system)
 152     (native-inputs
 153      `(("pkg-config" ,pkg-config)))
 154     (inputs
 155      `(("xproto" ,xproto)))
 156     (home-page "http://www.x.org")
 157     (synopsis "Symlink directory into tree")
 158     (description "Create a shadow directory of symbolic links to another
 159 directory tree.")
 160     (license license:x11)))
 161
 162 (define-public bdftopcf
 163   (package
 164     (name "bdftopcf")
 165     (version "1.0.5")
 166     (source
 167       (origin
 168         (method url-fetch)
 169         (uri (string-append
 170                "mirror://xorg/individual/app/bdftopcf-"
 171                version
 172                ".tar.bz2"))
 173         (sha256
 174           (base32
 175             "09i03sk878cmx2i40lkpsysn7zqcvlczb30j7x3lryb11jz4gx1q"))))
 176     (build-system gnu-build-system)
 177     (inputs
 178       `(("libxfont" ,libxfont)))
 179     (native-inputs
 180        `(("pkg-config" ,pkg-config)))
 181     (home-page "https://www.x.org/wiki/")
 182     (synopsis "Convert X font from BDF to PCF")
 183     (description
 184      "BDFtoPCF is a font compiler for the X server and font server.  It
 185 converts X font from Bitmap Distribution Format to Portable Compiled Format
 186 which can be read by any architecture.")
 187     (license license:x11)))
 188
 189
 190 (define-public bigreqsproto
 191   (package
 192     (name "bigreqsproto")
 193     (version "1.1.2")
 194     (source
 195       (origin
 196         (method url-fetch)
 197         (uri (string-append
 198                "mirror://xorg/individual/proto/bigreqsproto-"
 199                version
 200                ".tar.bz2"))
 201         (sha256
 202           (base32
 203             "07hvfm84scz8zjw14riiln2v4w03jlhp756ypwhq27g48jmic8a6"))))
 204     (build-system gnu-build-system)
 205     (native-inputs `(("pkg-config" ,pkg-config)))
 206     (home-page "https://www.x.org/wiki/")
 207     (synopsis "Xorg BigReqsProto protocol headers")
 208     (description
 209      "Big Requests Extension defines a protocol to enable the use of
 210 requests that exceed 262140 bytes in length.")
 211     (license license:x11)))
 212
 213
 214 (define-public compositeproto
 215   (package
 216     (name "compositeproto")
 217     (version "0.4.2")
 218     (source
 219       (origin
 220         (method url-fetch)
 221         (uri (string-append
 222                "mirror://xorg/individual/proto/compositeproto-"
 223                version
 224                ".tar.bz2"))
 225         (sha256
 226           (base32
 227             "1z0crmf669hirw4s7972mmp8xig80kfndja9h559haqbpvq5k4q4"))))
 228     (build-system gnu-build-system)
 229     (inputs
 230       `(("fixesproto" ,fixesproto)))
 231     (native-inputs
 232       `(("pkg-config" ,pkg-config)))
 233     (home-page "https://www.x.org/wiki/")
 234     (synopsis "Xorg CompositeProto protocol headers")
 235     (description
 236      "Composite Extension contains header files and documentation for
 237 the damage protocol.")
 238     (license license:x11)))
 239
 240
 241 (define-public damageproto
 242   (package
 243     (name "damageproto")
 244     (version "1.2.1")
 245     (source
 246       (origin
 247         (method url-fetch)
 248         (uri (string-append
 249                "mirror://xorg/individual/proto/damageproto-"
 250                version
 251                ".tar.bz2"))
 252         (sha256
 253           (base32
 254             "0nzwr5pv9hg7c21n995pdiv0zqhs91yz3r8rn3aska4ykcp12z2w"))))
 255     (build-system gnu-build-system)
 256     (native-inputs `(("pkg-config" ,pkg-config)))
 257     (home-page "https://www.x.org/wiki/")
 258     (synopsis "Xorg DamageProto protocol headers")
 259     (description
 260      "Damage Extension contains header files and documentation for
 261 the damage protocol.")
 262     (license license:x11)))
 263
 264
 265 (define-public dmxproto
 266   (package
 267     (name "dmxproto")
 268     (version "2.3.1")
 269     (source
 270       (origin
 271         (method url-fetch)
 272         (uri (string-append
 273                "mirror://xorg/individual/proto/dmxproto-"
 274                version
 275                ".tar.bz2"))
 276         (sha256
 277           (base32
 278             "02b5x9dkgajizm8dqyx2w6hmqx3v25l67mgf35nj6sz0lgk52877"))))
 279     (build-system gnu-build-system)
 280     (native-inputs `(("pkg-config" ,pkg-config)))
 281     (home-page "https://www.x.org/wiki/")
 282     (synopsis "Xorg DMXProto protocol headers")
 283     (description
 284      "DMX (Distributed Multihead X) Extension defines a protocol for clients
 285 to access a front-end proxy X server that controls multiple back-end X
 286 servers making up a large display.")
 287     (license license:x11)))
 288
 289
 290 (define-public dri2proto
 291   (package
 292     (name "dri2proto")
 293     (version "2.8")
 294     (source
 295       (origin
 296         (method url-fetch)
 297         (uri (string-append
 298                "mirror://xorg/individual/proto/dri2proto-"
 299                version
 300                ".tar.bz2"))
 301         (sha256
 302           (base32
 303             "015az1vfdqmil1yay5nlsmpf6cf7vcbpslxjb72cfkzlvrv59dgr"))))
 304     (build-system gnu-build-system)
 305     (home-page "https://www.x.org/wiki/")
 306     (synopsis "Xorg DRI2Proto protocol headers")
 307     (description
 308      "Direct Rendering Infrastructure 2 Extension defines a protocol to
 309 securely allow user applications to access the video hardware without
 310 requiring data to be passed through the X server.")
 311     (license license:x11)))
 312
 313 (define-public dri3proto
 314   (package
 315     (name "dri3proto")
 316     (version "1.0")
 317     (source
 318       (origin
 319         (method url-fetch)
 320         (uri (string-append
 321                "mirror://xorg/individual/proto/dri3proto-"
 322                version
 323                ".tar.bz2"))
 324         (sha256
 325           (base32
 326             "0x609xvnl8jky5m8jdklw4nymx3irkv32w99dfd8nl800bblkgh1"))))
 327     (build-system gnu-build-system)
 328     (home-page "https://www.x.org/wiki/")
 329     (synopsis "Xorg DRI3Proto protocol headers")
 330     (description
 331      "Direct Rendering Infrastructure 3 Extension provides mechanisms to
 332 translate between direct rendered buffers and X pixmaps.  When combined with
 333 the Present extension, a complete direct rendering solution for OpenGL is
 334 provided.")
 335     (license (license:x11-style "file://dri3proto.h"
 336                                 "See 'dri3proto.h' in the distribution."))))
 337
 338 (define-public %app-defaults-dir "/lib/X11/app-defaults")
 339
 340 (define-public editres
 341   (package
 342     (name "editres")
 343     (version "1.0.6")
 344     (source
 345       (origin
 346         (method url-fetch)
 347         (uri (string-append
 348                "mirror://xorg/individual/app/" name "-"
 349                version
 350                ".tar.bz2"))
 351         (sha256
 352          (base32
 353           "1w2d5hb5pw9ii2jlf4yjlp899402zfwc8hdkpdr3i1fy1cjd2riv"))))
 354     (build-system gnu-build-system)
 355     (arguments
 356      `(#:configure-flags
 357        (list (string-append "--with-appdefaultdir="
 358                             %output ,%app-defaults-dir))))
 359     (inputs
 360      `(("libxaw" ,libxaw)
 361        ("libxmu" ,libxmu)
 362        ("libxt" ,libxt)))
 363     (native-inputs
 364      `(("pkg-config" ,pkg-config)))
 365     (home-page "https://www.x.org/wiki/")
 366     (synopsis "Tool to browse and edit X Toolkit resource specifications")
 367     (description
 368      "Editres is a tool that allows users and application developers to view
 369 the full widget hierarchy of any X Toolkit application that speaks the Editres
 370 protocol.  In addition, editres will help the user construct resource
 371 specifications, allow the user to apply the resource to the application and
 372 view the results dynamically.  Once the user is happy with a resource
 373 specification editres will append the resource string to the user's X
 374 Resources file.")
 375     (license license:x11)))
 376
 377
 378 (define-public encodings
 379   (package
 380     (name "encodings")
 381     (version "1.0.4")
 382     (source
 383       (origin
 384         (method url-fetch)
 385         (uri (string-append
 386                "mirror://xorg/individual/font/encodings-"
 387                version
 388                ".tar.bz2"))
 389         (sha256
 390           (base32
 391             "0ffmaw80vmfwdgvdkp6495xgsqszb6s0iira5j0j6pd4i0lk3mnf"))))
 392     (build-system gnu-build-system)
 393     (inputs
 394       `(("mkfontscale" ,mkfontscale)))
 395     (native-inputs
 396       `(("pkg-config" ,pkg-config)))
 397     (home-page "https://www.x.org/wiki/")
 398     (synopsis "Xorg font encoding files")
 399     (description "Xorg font encoding files.")
 400     (license license:public-domain)))
 401
 402 (define (%xorg-font-origin font version hash)
 403   (origin
 404     (method url-fetch)
 405     (uri (string-append "mirror://xorg/individual/font/" font "-"
 406                         version ".tar.bz2"))
 407     (sha256 hash)
 408     (modules '((guix build utils)))
 409     (snippet
 410      ;; Do not include timestamps in '.pcf.gz' files.
 411      '(substitute* "Makefile.in"
 412         (("^COMPRESS = (.*)$" _ rest)
 413          (string-append "COMPRESS = " (string-trim-right rest)
 414                         " --no-name\n"))))))
 415
 416 (define-syntax-rule (xorg-font-origin font version hash)
 417   "Expand to the 'origin' form for the given Xorg font package."
 418   (%xorg-font-origin font version (base32 hash)))
 419
 420 (define-public font-adobe100dpi
 421   (package
 422     (name "font-adobe100dpi")
 423     (version "1.0.3")
 424     (source (xorg-font-origin
 425              "font-adobe-100dpi" version
 426              "0m60f5bd0caambrk8ksknb5dks7wzsg7g7xaf0j21jxmx8rq9h5j"))
 427     (build-system gnu-build-system)
 428     (inputs
 429       `(("bdftopcf" ,bdftopcf)
 430         ("font-util" ,font-util)
 431         ("mkfontdir" ,mkfontdir)))
 432     (native-inputs
 433       `(("pkg-config" ,pkg-config)))
 434     (arguments
 435       `(#:configure-flags (list
 436         ;; install fonts into subdirectory of package output instead of
 437         ;; font-util-?.?.?/share/fonts/X11
 438         (string-append "--with-fontrootdir=" %output "/share/fonts/X11"))))
 439     (home-page "https://www.x.org/wiki/")
 440     (synopsis "Xorg adobe-100dpi fonts")
 441     (description "Xorg adobe-100dpi fonts.")
 442     (license license:x11)))
 443
 444
 445 (define-public font-adobe75dpi
 446   (package
 447     (name "font-adobe75dpi")
 448     (version "1.0.3")
 449     (source (xorg-font-origin
 450              "font-adobe-75dpi" version
 451              "02advcv9lyxpvrjv8bjh1b797lzg6jvhipclz49z8r8y98g4l0n6"))
 452     (build-system gnu-build-system)
 453     (inputs
 454       `(("bdftopcf" ,bdftopcf)
 455         ("font-util" ,font-util)
 456         ("mkfontdir" ,mkfontdir)))
 457     (native-inputs
 458       `(("pkg-config" ,pkg-config)))
 459     (arguments
 460       `(#:configure-flags (list
 461         (string-append "--with-fontrootdir=" %output "/share/fonts/X11"))))
 462     (home-page "https://www.x.org/wiki/")
 463     (synopsis "Xorg adobe-75dpi fonts")
 464     (description "Xorg adobe-75dpi fonts.")
 465     (license license:x11)))
 466
 467
 468 ;; non-free license
 469 ;; (define-public font-adobe-utopia100dpi
 470 ;; (define-public font-adobe-utopia75dpi
 471 ;; (define-public font-adobe-utopia-type1
 472
 473
 474 (define-public font-alias
 475   (package
 476     (name "font-alias")
 477     (version "1.0.3")
 478     (source (xorg-font-origin
 479              name version
 480              "16ic8wfwwr3jicaml7b5a0sk6plcgc1kg84w02881yhwmqm3nicb"))
 481     (build-system gnu-build-system)
 482     (native-inputs `(("pkg-config" ,pkg-config)))
 483     (arguments
 484      `(#:phases (modify-phases %standard-phases
 485                   (add-after
 486                    'install 'install-fonts-dir
 487                    ;; The X font server will not add directories to the font
 488                    ;; path unless they contain a "fonts.dir" file, so add some
 489                    ;; dummy files.
 490                    (lambda* (#:key outputs #:allow-other-keys)
 491                      (let ((out (assoc-ref outputs "out")))
 492                        (for-each (lambda (d)
 493                                    (call-with-output-file
 494                                        (string-append out "/share/fonts/X11"
 495                                                       "/" d "/fonts.dir")
 496                                      (lambda (p)
 497                                        (format p "0~%"))))
 498                                  '("75dpi" "100dpi" "misc" "cyrillic"))
 499                        #t))))))
 500     (home-page "https://www.x.org/wiki/")
 501     (synopsis "Xorg font aliases")
 502     (description
 503      "This package provides some common aliases for Xorg fonts.
 504 For example: '6x10', '9x15bold', etc.")
 505     (license license:x11)))
 506
 507
 508 (define-public font-arabic-misc
 509   (package
 510     (name "font-arabic-misc")
 511     (version "1.0.3")
 512     (source (xorg-font-origin
 513              name version
 514              "1x246dfnxnmflzf0qzy62k8jdpkb6jkgspcjgbk8jcq9lw99npah"))
 515     (build-system gnu-build-system)
 516     (inputs
 517       `(("mkfontdir" ,mkfontdir)
 518         ("bdftopcf" ,bdftopcf)))
 519     (native-inputs
 520       `(("pkg-config" ,pkg-config)))
 521     (home-page "https://www.x.org/wiki/")
 522     (synopsis "Xorg arabic-misc font")
 523     (description "Xorg arabic-misc font.")
 524     (license license:x11)))
 525
 526
 527 ;; non-free license
 528 ;; (define-public font-bh100dpi
 529 ;; (define-public font-bh75dpi
 530 ;; (define-public font-bh-lucidatypewriter100dpi
 531 ;; (define-public font-bh-lucidatypewriter75dpi
 532 ;; (define-public font-bh-ttf
 533 ;; (define-public font-bh-type1
 534 ;; (define-public font-bitstream100dpi
 535 ;; (define-public font-bitstream75dpi
 536
 537
 538 (define-public font-cronyx-cyrillic
 539   (package
 540     (name "font-cronyx-cyrillic")
 541     (version "1.0.3")
 542     (source (xorg-font-origin
 543              name version
 544              "0ai1v4n61k8j9x2a1knvfbl2xjxk3xxmqaq3p9vpqrspc69k31kf"))
 545     (build-system gnu-build-system)
 546     (inputs
 547       `(("mkfontdir" ,mkfontdir)
 548         ("bdftopcf" ,bdftopcf)))
 549     (native-inputs
 550       `(("pkg-config" ,pkg-config)))
 551     (home-page "https://www.x.org/wiki/")
 552     (synopsis "Xorg cronyx-cyrillic font")
 553     (description "Xorg cronyx-cyrillic font.")
 554     (license license:x11)))
 555
 556
 557 ;; no license
 558 ;; (define-public font-cursor-misc
 559
 560 ;; non-free license
 561 ;; (define-public font-daewoo-misc
 562
 563
 564 (define-public font-dec-misc
 565   (package
 566     (name "font-dec-misc")
 567     (version "1.0.3")
 568     (source (xorg-font-origin
 569              name version
 570              "0yzza0l4zwyy7accr1s8ab7fjqkpwggqydbm2vc19scdby5xz7g1"))
 571     (build-system gnu-build-system)
 572     (inputs
 573       `(("mkfontdir" ,mkfontdir)
 574         ("bdftopcf" ,bdftopcf)))
 575     (native-inputs
 576       `(("pkg-config" ,pkg-config)))
 577     (home-page "https://www.x.org/wiki/")
 578     (synopsis "Xorg dec-misc font")
 579     (description "Xorg dec-misc font.")
 580     (license license:x11)))
 581
 582
 583 ;; non-free license
 584 ;; (define-public font-ibm-type1
 585
 586 (define-public font-isas-misc
 587   (package
 588     (name "font-isas-misc")
 589     (version "1.0.3")
 590     (source (xorg-font-origin
 591              name version
 592              "0rx8q02rkx673a7skkpnvfkg28i8gmqzgf25s9yi0lar915sn92q"))
 593     (build-system gnu-build-system)
 594     (inputs
 595       `(("mkfontdir" ,mkfontdir)
 596         ("bdftopcf" ,bdftopcf)))
 597     (native-inputs
 598       `(("pkg-config" ,pkg-config)))
 599     (home-page "https://www.x.org/wiki/")
 600     (synopsis "Xorg isas-misc font")
 601     (description "Xorg isas-misc font.")
 602     (license license:x11)))
 603
 604
 605 ;; non-free license
 606 ;; (define-public font-jis-misc
 607
 608
 609 (define-public font-micro-misc
 610   (package
 611     (name "font-micro-misc")
 612     (version "1.0.3")
 613     (source (xorg-font-origin
 614              name version
 615              "1dldxlh54zq1yzfnrh83j5vm0k4ijprrs5yl18gm3n9j1z0q2cws"))
 616     (build-system gnu-build-system)
 617     (inputs
 618       `(("mkfontdir" ,mkfontdir)
 619         ("bdftopcf" ,bdftopcf)))
 620     (native-inputs
 621       `(("pkg-config" ,pkg-config)))
 622     (home-page "https://www.x.org/wiki/")
 623     (synopsis "Xorg micro-misc font")
 624     (description "Xorg micro-misc font.")
 625     (license license:public-domain)))
 626
 627
 628 (define-public font-misc-cyrillic
 629   (package
 630     (name "font-misc-cyrillic")
 631     (version "1.0.3")
 632     (source (xorg-font-origin
 633              name version
 634              "0q2ybxs8wvylvw95j6x9i800rismsmx4b587alwbfqiw6biy63z4"))
 635     (build-system gnu-build-system)
 636     (inputs
 637       `(("mkfontdir" ,mkfontdir)
 638         ("bdftopcf" ,bdftopcf)))
 639     (native-inputs
 640       `(("pkg-config" ,pkg-config)))
 641     (home-page "https://www.x.org/wiki/")
 642     (synopsis "Xorg misc-cyrillic fonts")
 643     (description "Xorg misc-cyrillic fonts.")
 644     (license license:x11)))
 645
 646
 647 (define-public font-misc-ethiopic
 648   (package
 649     (name "font-misc-ethiopic")
 650     (version "1.0.3")
 651     (source (xorg-font-origin
 652              name version
 653              "19cq7iq0pfad0nc2v28n681fdq3fcw1l1hzaq0wpkgpx7bc1zjsk"))
 654     (build-system gnu-build-system)
 655     (inputs
 656       `(("mkfontdir" ,mkfontdir)
 657         ("mkfontscale" ,mkfontscale)))
 658     (native-inputs
 659       `(("pkg-config" ,pkg-config)))
 660     (home-page "https://www.x.org/wiki/")
 661     (synopsis "Xorg misc-ethiopic fonts")
 662     (description "Xorg misc-ethiopic fonts.")
 663     (license license:x11)))
 664
 665
 666 ;; non-free license
 667 ;; (define-public font-misc-meltho
 668
 669
 670 (define-public font-misc-misc
 671   (package
 672     (name "font-misc-misc")
 673     (version "1.1.2")
 674     (source (xorg-font-origin
 675              name version
 676              "150pq6n8n984fah34n3k133kggn9v0c5k07igv29sxp1wi07krxq"))
 677     (build-system gnu-build-system)
 678     (inputs
 679       `(("mkfontdir" ,mkfontdir)
 680         ("font-util" ,font-util)
 681         ("bdftopcf" ,bdftopcf)))
 682     (native-inputs
 683      `(("pkg-config" ,pkg-config)))
 684     (arguments
 685       `(#:configure-flags (list
 686         (string-append "--with-fontrootdir=" %output "/share/fonts/X11"))))
 687     (home-page "https://www.x.org/wiki/")
 688     (synopsis "Xorg misc-misc fonts")
 689     (description "Xorg misc-misc fixed fonts.")
 690     (license license:public-domain)))
 691
 692
 693 (define-public font-mutt-misc
 694   (package
 695     (name "font-mutt-misc")
 696     (version "1.0.3")
 697     (source (xorg-font-origin
 698              name version
 699              "13qghgr1zzpv64m0p42195k1kc77pksiv059fdvijz1n6kdplpxx"))
 700     (build-system gnu-build-system)
 701     (inputs
 702       `(("mkfontdir" ,mkfontdir)
 703         ("bdftopcf" ,bdftopcf)))
 704     (native-inputs
 705       `(("pkg-config" ,pkg-config)))
 706     (home-page "https://www.x.org/wiki/")
 707     (synopsis "Xorg mutt-misc fonts")
 708     (description "Xorg mutt-misc fonts.")
 709     (license license:x11)))
 710
 711
 712 (define-public font-schumacher-misc
 713   (package
 714     (name "font-schumacher-misc")
 715     (version "1.1.2")
 716     (source (xorg-font-origin
 717              name version
 718              "0nkym3n48b4v36y4s927bbkjnsmicajarnf6vlp7wxp0as304i74"))
 719     (build-system gnu-build-system)
 720     (inputs
 721       `(("mkfontdir" ,mkfontdir)
 722         ("font-util" ,font-util)
 723         ("bdftopcf" ,bdftopcf)))
 724     (native-inputs
 725       `(("pkg-config" ,pkg-config)))
 726     (arguments
 727       `(#:configure-flags (list
 728         (string-append "--with-fontrootdir=" %output "/share/fonts/X11"))))
 729     (home-page "https://www.x.org/wiki/")
 730     (synopsis "Xorg schumacher-misc fonts")
 731     (description "Xorg schumacher-misc fonts.")
 732     (license license:x11)))
 733
 734
 735 (define-public font-screen-cyrillic
 736   (package
 737     (name "font-screen-cyrillic")
 738     (version "1.0.4")
 739     (source (xorg-font-origin
 740              name version
 741              "0yayf1qlv7irf58nngddz2f1q04qkpr5jwp4aja2j5gyvzl32hl2"))
 742     (build-system gnu-build-system)
 743     (inputs
 744       `(("mkfontdir" ,mkfontdir)
 745         ("bdftopcf" ,bdftopcf)))
 746     (native-inputs
 747       `(("pkg-config" ,pkg-config)))
 748     (home-page "https://www.x.org/wiki/")
 749     (synopsis "Xorg screen-cyrillic fonts")
 750     (description "Xorg screen-cyrillic fonts.")
 751     (license license:x11)))
 752
 753
 754 (define-public font-sony-misc
 755   (package
 756     (name "font-sony-misc")
 757     (version "1.0.3")
 758     (source (xorg-font-origin
 759              name version
 760              "1xfgcx4gsgik5mkgkca31fj3w72jw9iw76qyrajrsz1lp8ka6hr0"))
 761     (build-system gnu-build-system)
 762     (inputs
 763       `(("mkfontdir" ,mkfontdir)
 764         ("bdftopcf" ,bdftopcf)))
 765     (native-inputs
 766       `(("pkg-config" ,pkg-config)))
 767     (home-page "https://www.x.org/wiki/")
 768     (synopsis "Xorg sony-misc fonts")
 769     (description "Xorg sony-misc fonts.")
 770     (license license:x11)))
 771
 772
 773 (define-public font-sun-misc
 774   (package
 775     (name "font-sun-misc")
 776     (version "1.0.3")
 777     (source (xorg-font-origin
 778              name version
 779              "1q6jcqrffg9q5f5raivzwx9ffvf7r11g6g0b125na1bhpz5ly7s8"))
 780     (build-system gnu-build-system)
 781     (inputs
 782       `(("mkfontdir" ,mkfontdir)
 783         ("bdftopcf" ,bdftopcf)))
 784     (native-inputs
 785      `(("pkg-config" ,pkg-config)))
 786     (home-page "https://www.x.org/wiki/")
 787     (synopsis "Xorg sun-misc fonts")
 788     (description "Xorg sun-misc fonts.")
 789     (license license:x11)))
 790
 791
 792 (define-public font-util
 793   (package
 794     (name "font-util")
 795     (version "1.3.1")
 796     (source
 797       (origin
 798         (method url-fetch)
 799         (uri (string-append
 800                "mirror://xorg/individual/font/font-util-"
 801                version
 802                ".tar.bz2"))
 803         (sha256
 804           (base32
 805             "08drjb6cf84pf5ysghjpb4i7xkd2p86k3wl2a0jxs1jif6qbszma"))))
 806     (build-system gnu-build-system)
 807     (native-inputs `(("pkg-config" ,pkg-config)))
 808     (home-page "https://www.x.org/wiki/")
 809     (synopsis "Xorg font utilities")
 810     (description
 811      "Xorg font package creation/installation utilities.")
 812     (license license:x11)))
 813
 814
 815 (define-public font-winitzki-cyrillic
 816   (package
 817     (name "font-winitzki-cyrillic")
 818     (version "1.0.3")
 819     (source (xorg-font-origin
 820              name version
 821              "181n1bgq8vxfxqicmy1jpm1hnr6gwn1kdhl6hr4frjigs1ikpldb"))
 822     (build-system gnu-build-system)
 823     (inputs
 824       `(("mkfontdir" ,mkfontdir)
 825         ("bdftopcf" ,bdftopcf)))
 826     (native-inputs
 827       `(("pkg-config" ,pkg-config)))
 828     (home-page "https://www.x.org/wiki/")
 829     (synopsis "Xorg winitzki-cyrillic font")
 830     (description "Xorg winitzki-cyrillic font.")
 831     (license license:public-domain)))
 832
 833
 834 (define-public font-xfree86-type1
 835   (package
 836     (name "font-xfree86-type1")
 837     (version "1.0.4")
 838     (source (xorg-font-origin
 839              name version
 840              "0jp3zc0qfdaqfkgzrb44vi9vi0a8ygb35wp082yz7rvvxhmg9sya"))
 841     (build-system gnu-build-system)
 842     (inputs
 843       `(("mkfontdir" ,mkfontdir)
 844         ("mkfontscale" ,mkfontscale)))
 845     (native-inputs
 846       `(("pkg-config" ,pkg-config)))
 847     (home-page "https://www.x.org/wiki/")
 848     (synopsis "Xorg xfree86-type1 font")
 849     (description "Xorg xfree86-type1 font.")
 850     (license license:x11)))
 851
 852
 853 (define-public fontsproto
 854   (package
 855     (name "fontsproto")
 856     (version "2.1.3")
 857     (source
 858       (origin
 859         (method url-fetch)
 860         (uri (string-append
 861                "mirror://xorg/individual/proto/fontsproto-"
 862                version
 863                ".tar.bz2"))
 864         (sha256
 865           (base32
 866             "1f2sdsd74y34nnaf4m1zlcbhyv8xb6irnisc99f84c4ivnq4d415"))))
 867     (build-system gnu-build-system)
 868     (native-inputs `(("pkg-config" ,pkg-config)))
 869     (home-page "https://www.x.org/wiki/")
 870     (synopsis "Xorg FontsProto protocol headers")
 871     (description
 872      "Fonts Extension contains header files and documentation for
 873 the fonts protocol.")
 874     (license license:x11)))
 875
 876
 877 (define-public glproto
 878   (package
 879     (name "glproto")
 880     (version "1.4.17")
 881     (source
 882       (origin
 883         (method url-fetch)
 884         (uri (string-append
 885                "mirror://xorg/individual/proto/glproto-"
 886                version
 887                ".tar.bz2"))
 888         (sha256
 889           (base32
 890             "0h5ykmcddwid5qj6sbrszgkcypwn3mslvswxpgy2n2iixnyr9amd"))))
 891     (build-system gnu-build-system)
 892     (native-inputs `(("pkg-config" ,pkg-config)))
 893     (home-page "https://www.x.org/wiki/")
 894     (synopsis "Xorg GLProto protocol headers")
 895     (description
 896      "OpenGL Extension defines a protocol for the client to send 3D
 897 rendering commands to the X server.")
 898     (license license:x11)))
 899
 900
 901 (define-public iceauth
 902   (package
 903     (name "iceauth")
 904     (version "1.0.7")
 905     (source
 906       (origin
 907         (method url-fetch)
 908         (uri (string-append
 909                "mirror://xorg/individual/app/iceauth-"
 910                version
 911                ".tar.bz2"))
 912         (sha256
 913           (base32
 914             "02izdyzhwpgiyjd8brzilwvwnfr72ncjb6mzz3y1icwrxqnsy5hj"))))
 915     (build-system gnu-build-system)
 916     (inputs
 917       `(("libice" ,libice)))
 918     (native-inputs
 919       `(("pkg-config" ,pkg-config)))
 920     (home-page "https://www.x.org/wiki/")
 921     (synopsis "ICE authority file utility")
 922     (description
 923      "ICEAuth program is used to edit and display the authorization
 924 information used in connecting with ICE (Inter-Client Exchange).  It
 925 operates very much like the xauth program for X11 connection
 926 authentication records.")
 927     (license license:x11)))
 928
 929
 930 (define-public inputproto
 931   (package
 932     (name "inputproto")
 933     (version "2.3.2")
 934     (source
 935       (origin
 936         (method url-fetch)
 937         (uri (string-append
 938                "mirror://xorg/individual/proto/inputproto-"
 939                version
 940                ".tar.bz2"))
 941         (sha256
 942           (base32
 943             "07gk7v006zqn3dcfh16l06gnccy7xnqywf3vl9c209ikazsnlfl9"))))
 944     (build-system gnu-build-system)
 945     (native-inputs `(("pkg-config" ,pkg-config)))
 946     (home-page "https://www.x.org/wiki/")
 947     (synopsis "Xorg InputProto protocol headers")
 948     (description
 949      "Input Extension defines a protocol to provide additional input
 950 devices management such as graphic tablets.")
 951     (license license:x11)))
 952
 953
 954 (define-public kbproto
 955   (package
 956     (name "kbproto")
 957     (version "1.0.7")
 958     (source
 959       (origin
 960         (method url-fetch)
 961         (uri (string-append
 962                "mirror://xorg/individual/proto/kbproto-"
 963                version
 964                ".tar.bz2"))
 965         (sha256
 966           (base32
 967             "0mxqj1pzhjpz9495vrjnpi10kv2n1s4vs7di0sh3yvipfq5j30pq"))))
 968     (build-system gnu-build-system)
 969     (native-inputs `(("pkg-config" ,pkg-config)))
 970     (home-page "https://www.x.org/wiki/")
 971     (synopsis "Xorg KBProto protocol headers")
 972     (description
 973      "X Keyboard (XKB) Extension defines a protocol to provide a number
 974 of new capabilities and controls for text keyboards.")
 975     (license license:x11)))
 976
 977
 978 ;; requires applewmproto, which compiles only on macos
 979 ;; (define-public libapplewm
 980
 981
 982 (define-public libdmx
 983   (package
 984     (name "libdmx")
 985     (version "1.1.3")
 986     (source
 987       (origin
 988         (method url-fetch)
 989         (uri (string-append
 990                "mirror://xorg/individual/lib/libdmx-"
 991                version
 992                ".tar.bz2"))
 993         (sha256
 994           (base32
 995             "00djlxas38kbsrglcmwmxfbmxjdchlbj95pqwjvdg8jn5rns6zf9"))))
 996     (build-system gnu-build-system)
 997     (inputs
 998       `(("xextproto" ,xextproto)
 999         ("libxext" ,libxext)
1000         ("libx11" ,libx11)
1001         ("dmxproto" ,dmxproto)))
1002     (native-inputs
1003       `(("pkg-config" ,pkg-config)))
1004     (home-page "https://www.x.org/wiki/")
1005     (synopsis "Xorg DMX library")
1006     (description
1007      "DMX (Distributed Multihead X) extension library.")
1008     (license license:x11)))
1009
1010
1011 (define-public libxshmfence
1012   (package
1013     (name "libxshmfence")
1014     (version "1.2")
1015     (source (origin
1016               (method url-fetch)
1017               (uri (string-append
1018                     "mirror://xorg/individual/lib/"
1019                     name "-" version ".tar.bz2"))
1020               (sha256
1021                (base32
1022                 "032b0nlkdrpbimdld4gqvhqx53rzn8fawvf1ybhzn7lcswgjs6yj"))))
1023     (build-system gnu-build-system)
1024     (native-inputs `(("pkg-config" ,pkg-config)))
1025     (inputs `(("xproto" ,xproto)))
1026     (home-page "http://xorg.freedesktop.org")
1027     (synopsis "Xorg shared memory fences library")
1028     (description
1029      "This library provides an interface to shared-memory fences for
1030 synchronization between the X server and direct-rendering clients.")
1031
1032     ;; Same license as libevdev.
1033     (license (license:x11-style "file://COPYING"))))
1034
1035
1036 (define-public libfontenc
1037   (package
1038     (name "libfontenc")
1039     (version "1.1.3")
1040     (source
1041       (origin
1042         (method url-fetch)
1043         (uri (string-append
1044                "mirror://xorg/individual/lib/libfontenc-"
1045                version
1046                ".tar.bz2"))
1047         (sha256
1048           (base32
1049             "08gxmrhgw97mv0pvkfmd46zzxrn6zdw4g27073zl55gwwqq8jn3h"))))
1050     (build-system gnu-build-system)
1051     (inputs
1052       `(("zlib" ,zlib)
1053         ("xproto" ,xproto)))
1054     (native-inputs
1055       `(("pkg-config" ,pkg-config)))
1056     (home-page "https://www.x.org/wiki/")
1057     (synopsis "Xorg font encoding library")
1058     (description "Xorg font encoding library.")
1059     (license license:x11)))
1060
1061
1062 (define-public libfs
1063   (package
1064     (name "libfs")
1065     (version "1.0.7")
1066     (source
1067       (origin
1068         (method url-fetch)
1069         (uri (string-append
1070                "mirror://xorg/individual/lib/libFS-"
1071                version
1072                ".tar.bz2"))
1073         (sha256
1074           (base32
1075             "1wy4km3qwwajbyl8y9pka0zwizn7d9pfiyjgzba02x3a083lr79f"))))
1076     (build-system gnu-build-system)
1077     (inputs
1078       `(("xtrans" ,xtrans)
1079         ("xproto" ,xproto)
1080         ("fontsproto" ,fontsproto)))
1081     (native-inputs
1082       `(("pkg-config" ,pkg-config)))
1083     (home-page "https://www.x.org/wiki/")
1084     (synopsis "Xorg Font Service client library")
1085     (description
1086      "Font Service client library is used by clients of X Font
1087 Servers (xfs), such as xfsinfo, fslsfonts, and the X servers
1088 themselves.")
1089     (license license:x11)))
1090
1091
1092 (define-public libpciaccess
1093   (package
1094     (name "libpciaccess")
1095     (version "0.13.4")
1096     (source
1097       (origin
1098         (method url-fetch)
1099         (uri (string-append
1100                "mirror://xorg/individual/lib/libpciaccess-"
1101                version
1102                ".tar.bz2"))
1103         (sha256
1104           (base32
1105             "1krgryi9ngjr66242v0v5mczihgv0y7rrvx0563arr318mjn9y07"))))
1106     (build-system gnu-build-system)
1107     (inputs
1108       `(("zlib" ,zlib)))
1109     (native-inputs
1110        `(("pkg-config" ,pkg-config)))
1111     (home-page "https://www.x.org/wiki/")
1112     (synopsis "Xorg PCI access library")
1113     (description "Xorg Generic PCI access library.")
1114     (license license:x11)))
1115
1116
1117 (define-public libpthread-stubs
1118   (package
1119     (name "libpthread-stubs")
1120     (version "0.3")
1121     (source
1122       (origin
1123         (method url-fetch)
1124         (uri (string-append
1125                "mirror://xorg/individual/xcb/libpthread-stubs-"
1126                version
1127                ".tar.bz2"))
1128         (sha256
1129           (base32
1130             "16bjv3in19l84hbri41iayvvg4ls9gv1ma0x0qlbmwy67i7dbdim"))))
1131     (build-system gnu-build-system)
1132     (native-inputs `(("pkg-config" ,pkg-config)))
1133     (home-page "https://www.x.org/wiki/")
1134     (synopsis "Library with pthread stubs")
1135     (description
1136      "This library provides weak aliases for pthread functions not
1137 provided in libc or otherwise available by default.  Libraries like
1138 libxcb rely on pthread stubs to use pthreads optionally, becoming
1139 thread-safe when linked to libpthread, while avoiding any performance
1140 hit when running single-threaded.")
1141     (license license:x11)))
1142
1143
1144 (define-public libsm
1145   (package
1146     (name "libsm")
1147     (version "1.2.2")
1148     (source
1149       (origin
1150         (method url-fetch)
1151         (uri (string-append
1152                "mirror://xorg/individual/lib/libSM-"
1153                version
1154                ".tar.bz2"))
1155         (sha256
1156           (base32
1157             "1gc7wavgs435g9qkp9jw4lhmaiq6ip9llv49f054ad6ryp4sib0b"))))
1158     (build-system gnu-build-system)
1159     (propagated-inputs
1160       `(("libice" ,libice))) ; SMlib.h includes ICElib.h
1161     (inputs
1162       `(("xtrans" ,xtrans)
1163         ("util-linux" ,util-linux)))
1164     (native-inputs
1165       `(("pkg-config" ,pkg-config)))
1166     (home-page "https://www.x.org/wiki/")
1167     (synopsis "Xorg Session Management library")
1168     (description "Xorg Session Management library.")
1169     (license license:x11)))
1170
1171
1172 (define-public libwindowswm
1173   (package
1174     (name "libwindowswm")
1175     (version "1.0.1")
1176     (source
1177       (origin
1178         (method url-fetch)
1179         (uri (string-append
1180                "mirror://xorg/individual/lib/libWindowsWM-"
1181                version
1182                ".tar.bz2"))
1183         (sha256
1184           (base32
1185             "1p0flwb67xawyv6yhri9w17m1i4lji5qnd0gq8v1vsfb8zw7rw15"))))
1186     (build-system gnu-build-system)
1187     (inputs
1188       `(("xextproto" ,xextproto)
1189         ("libxext" ,libxext)
1190         ("libx11" ,libx11)
1191         ("windowswmproto" ,windowswmproto)))
1192     (native-inputs
1193       `(("pkg-config" ,pkg-config)))
1194     (home-page "https://www.x.org/wiki/")
1195     (synopsis "Xorg WindowsWM library")
1196     (description
1197      "Cygwin/X rootless window management extension.
1198 WindowsWM is a simple library designed to interface with the Windows-WM
1199 extension.  This extension allows X window managers to better interact
1200 with the Cygwin XWin server when running X11 in a rootless mode.")
1201     (license license:x11)))
1202
1203
1204 (define-public libxcomposite
1205   (package
1206     (name "libxcomposite")
1207     (version "0.4.4")
1208     (source
1209       (origin
1210         (method url-fetch)
1211         (uri (string-append
1212                "mirror://xorg/individual/lib/libXcomposite-"
1213                version
1214                ".tar.bz2"))
1215         (sha256
1216           (base32
1217             "0y21nfpa5s8qmx0srdlilyndas3sgl0c6rc26d5fx2vx436m1qpd"))))
1218     (build-system gnu-build-system)
1219     (propagated-inputs
1220      ;; xcomposite.pc refers to all these.
1221       `(("xproto" ,xproto)
1222         ("libxfixes" ,libxfixes)
1223         ("libx11" ,libx11)
1224         ("compositeproto" ,compositeproto)))
1225     (native-inputs
1226       `(("pkg-config" ,pkg-config)))
1227     (home-page "https://www.x.org/wiki/")
1228     (synopsis "Xorg Composite library")
1229     (description
1230      "Client library for the Composite extension to the X11 protocol.")
1231     (license license:x11)))
1232
1233
1234 (define-public libxdmcp
1235   (package
1236     (name "libxdmcp")
1237     (version "1.1.2")
1238     (source
1239       (origin
1240         (method url-fetch)
1241         (uri (string-append
1242                "mirror://xorg/individual/lib/libXdmcp-"
1243                version
1244                ".tar.bz2"))
1245         (sha256
1246           (base32
1247             "1qp4yhxbfnpj34swa0fj635kkihdkwaiw7kf55cg5zqqg630kzl1"))))
1248     (build-system gnu-build-system)
1249     (inputs
1250       `(("xproto" ,xproto)))
1251     (native-inputs
1252        `(("pkg-config" ,pkg-config)))
1253     (home-page "https://www.x.org/wiki/")
1254     (synopsis "Xorg Display Manager Control Protocol library")
1255     (description "Xorg Display Manager Control Protocol library.")
1256     (license license:x11)))
1257
1258
1259 (define-public libxft
1260   (package
1261     (name "libxft")
1262     (version "2.3.2")
1263     (source
1264       (origin
1265         (method url-fetch)
1266         (uri (string-append
1267                "mirror://xorg/individual/lib/libXft-"
1268                version
1269                ".tar.bz2"))
1270         (sha256
1271           (base32
1272             "0k6wzi5rzs0d0n338ms8n8lfyhq914hw4yl2j7553wqxfqjci8zm"))))
1273     (build-system gnu-build-system)
1274     (propagated-inputs
1275      ;; xft.pc refers to all these.
1276       `(("libxrender" ,libxrender)
1277         ("freetype" ,freetype)
1278         ("fontconfig" ,fontconfig)))
1279     (inputs
1280       `(("libx11" ,libx11)
1281         ("xproto" ,xproto)))
1282     (native-inputs
1283       `(("pkg-config" ,pkg-config)))
1284     (home-page "https://www.x.org/wiki/")
1285     (synopsis "Xorg FreeType library")
1286     (description
1287      "Xorg FreeType library connects X applications with the FreeType font
1288 rasterization library.  Xft uses fontconfig to locate fonts so it has no
1289 configuration files.")
1290     (license license:x11)))
1291
1292
1293 (define-public libxkbfile
1294   (package
1295     (name "libxkbfile")
1296     (version "1.0.9")
1297     (source
1298       (origin
1299         (method url-fetch)
1300         (uri (string-append
1301                "mirror://xorg/individual/lib/libxkbfile-"
1302                version
1303                ".tar.bz2"))
1304         (sha256
1305           (base32
1306             "0smimr14zvail7ar68n7spvpblpdnih3jxrva7cpa6cn602px0ai"))))
1307     (build-system gnu-build-system)
1308     (inputs
1309       `(("libx11" ,libx11)))
1310     (native-inputs
1311       `(("pkg-config" ,pkg-config)))
1312     (home-page "https://www.x.org/wiki/")
1313     (synopsis "Xorg XKB file handling library")
1314     (description "Xorg XKB file handling library.")
1315     (license license:x11)))
1316
1317
1318 (define-public libxmu
1319   (package
1320     (name "libxmu")
1321     (version "1.1.2")
1322     (source
1323       (origin
1324         (method url-fetch)
1325         (uri (string-append
1326                "mirror://xorg/individual/lib/libXmu-"
1327                version
1328                ".tar.bz2"))
1329         (sha256
1330           (base32
1331             "02wx6jw7i0q5qwx87yf94fsn3h0xpz1k7dz1nkwfwm1j71ydqvkm"))))
1332     (build-system gnu-build-system)
1333     (inputs
1334       `(("libxt" ,libxt)
1335         ("xproto" ,xproto)
1336         ("libxext" ,libxext)))
1337     (native-inputs
1338       `(("pkg-config" ,pkg-config)))
1339     (home-page "https://www.x.org/wiki/")
1340     (synopsis "Xorg Xmu library")
1341     (description
1342      "Xmu library contains miscellaneous utilities and is not part of the
1343 Xlib standard.  It is intended to support clients in the Xorg distribution;
1344 vendors may choose not to distribute this library if they wish.  Therefore,
1345 applications developers who depend on this library should be prepared to
1346 treat it as part of their software base when porting.")
1347     (license license:x11)))
1348
1349
1350 (define-public libxpm
1351   (package
1352     (name "libxpm")
1353     (version "3.5.12")
1354     (source
1355       (origin
1356         (method url-fetch)
1357         (uri (string-append
1358                "mirror://xorg/individual/lib/libXpm-"
1359                version
1360                ".tar.bz2"))
1361         (sha256
1362           (base32
1363             "1v5xaiw4zlhxspvx76y3hq4wpxv7mpj6parqnwdqvpj8vbinsspx"))))
1364     (build-system gnu-build-system)
1365     (inputs
1366       `(("gettext" ,gettext-minimal)
1367         ("libxt" ,libxt)
1368         ("xproto" ,xproto)
1369         ("libxext" ,libxext)))
1370     (native-inputs
1371       `(("pkg-config" ,pkg-config)))
1372     (home-page "https://www.x.org/wiki/")
1373     (synopsis "Xorg XPM library")
1374     (description "XPM (X Pixmap) image file format library.")
1375     (license license:x11)))
1376
1377
1378 (define-public libxres
1379   (package
1380     (name "libxres")
1381     (version "1.0.7")
1382     (source
1383       (origin
1384         (method url-fetch)
1385         (uri (string-append
1386                "mirror://xorg/individual/lib/libXres-"
1387                version
1388                ".tar.bz2"))
1389         (sha256
1390           (base32
1391             "1rd0bzn67cpb2qkc946gch2183r4bdjfhs6cpqbipy47m9a91296"))))
1392     (build-system gnu-build-system)
1393     (inputs
1394       `(("xproto" ,xproto)
1395         ("libxext" ,libxext)
1396         ("libx11" ,libx11)
1397         ("resourceproto" ,resourceproto)))
1398     (native-inputs
1399       `(("pkg-config" ,pkg-config)))
1400     (home-page "https://www.x.org/wiki/")
1401     (synopsis "Xorg Resource extension library")
1402     (description "X Resource extension library.")
1403     (license license:x11)))
1404
1405
1406 (define-public libxscrnsaver
1407   (package
1408     (name "libxscrnsaver")
1409     (version "1.2.2")
1410     (source
1411       (origin
1412         (method url-fetch)
1413         (uri (string-append
1414                "mirror://xorg/individual/lib/libXScrnSaver-"
1415                version
1416                ".tar.bz2"))
1417         (sha256
1418           (base32
1419             "07ff4r20nkkrj7h08f9fwamds9b3imj8jz5iz6y38zqw6jkyzwcg"))))
1420     (build-system gnu-build-system)
1421     (inputs
1422       `(("libxext" ,libxext)
1423         ("libx11" ,libx11)))
1424     (propagated-inputs
1425       `(("scrnsaverproto" ,scrnsaverproto)))
1426     (native-inputs
1427       `(("pkg-config" ,pkg-config)))
1428     (home-page "https://www.x.org/wiki/")
1429     (synopsis "Xorg Screen Saver library")
1430     (description "X11 Screen Saver extension client library.")
1431     (license license:x11)))
1432
1433
1434 (define-public libxxf86dga
1435   (package
1436     (name "libxxf86dga")
1437     (version "1.1.4")
1438     (source
1439       (origin
1440         (method url-fetch)
1441         (uri (string-append
1442                "mirror://xorg/individual/lib/libXxf86dga-"
1443                version
1444                ".tar.bz2"))
1445         (sha256
1446           (base32
1447             "0zn7aqj8x0951d8zb2h2andldvwkzbsc4cs7q023g6nzq6vd9v4f"))))
1448     (build-system gnu-build-system)
1449     (propagated-inputs
1450       `(("xf86dgaproto" ,xf86dgaproto)))
1451     (inputs
1452       `(("libx11" ,libx11)
1453         ("libxext" ,libxext)))
1454     (native-inputs
1455       `(("pkg-config" ,pkg-config)))
1456     (home-page "https://www.x.org/wiki/")
1457     (synopsis "Xorg XFree86-DGA library")
1458     (description "Client library for the XFree86-DGA extension.")
1459     (license license:x11)))
1460
1461
1462 (define-public luit
1463   (package
1464     (name "luit")
1465     (version "1.1.1")
1466     (source
1467       (origin
1468         (method url-fetch)
1469         (uri (string-append
1470                "mirror://xorg/individual/app/luit-"
1471                version
1472                ".tar.bz2"))
1473         (sha256
1474           (base32
1475             "0dn694mk56x6hdk6y9ylx4f128h5jcin278gnw2gb807rf3ygc1h"))
1476         ;; See https://bugs.freedesktop.org/show_bug.cgi?id=47792;
1477         ;; should become obsolete with the next release.
1478         (patches (search-patches "luit-posix.patch"))))
1479     (build-system gnu-build-system)
1480     (inputs
1481       `(("libfontenc" ,libfontenc)))
1482     (native-inputs
1483        `(("pkg-config" ,pkg-config)))
1484     (home-page "https://www.x.org/wiki/")
1485     (synopsis "Convert terminal I/O from legacy encodings to UTF-8")
1486     (description
1487      "Luit is a filter that can be run between an arbitrary application and
1488 a UTF-8 terminal emulator such as xterm.  It will convert application
1489 output from the locale's encoding into UTF-8, and convert terminal
1490 input from UTF-8 into the locale's encoding.")
1491     (license license:x11)))
1492
1493
1494 (define-public makedepend
1495   (package
1496     (name "makedepend")
1497     (version "1.0.5")
1498     (source
1499       (origin
1500         (method url-fetch)
1501         (uri (string-append
1502                "mirror://xorg/individual/util/makedepend-"
1503                version
1504                ".tar.bz2"))
1505         (sha256
1506           (base32
1507             "09alw99r6y2bbd1dc786n3jfgv4j520apblyn7cw6jkjydshba7p"))))
1508     (build-system gnu-build-system)
1509     (inputs
1510       `(("xproto" ,xproto)))
1511     (native-inputs `(("pkg-config" ,pkg-config)))
1512     (home-page "https://www.x.org/wiki/")
1513     (synopsis "Xorg makedepend utility")
1514     (description
1515      "Makedepend is an utility for creating dependencies in makefiles.")
1516     (license license:x11)))
1517
1518
1519 (define-public mkfontscale
1520   (package
1521     (name "mkfontscale")
1522     (version "1.1.2")
1523     (source
1524       (origin
1525         (method url-fetch)
1526         (uri (string-append
1527                "mirror://xorg/individual/app/mkfontscale-"
1528                version
1529                ".tar.bz2"))
1530         (sha256
1531           (base32
1532             "081z8lwh9c1gyrx3ad12whnpv3jpfbqsc366mswpfm48mwl54vcc"))))
1533     (build-system gnu-build-system)
1534     (inputs
1535       `(("zlib" ,zlib)
1536         ("xproto" ,xproto)
1537         ("freetype" ,freetype)
1538         ("libfontenc" ,libfontenc)))
1539     (native-inputs
1540        `(("pkg-config" ,pkg-config)))
1541     (home-page "https://www.x.org/wiki/")
1542     (synopsis "Create an index of scalable font files for X server")
1543     (description
1544      "MkFontScale creates the 'fonts.scale' and 'fonts.dir' index files used
1545 by the legacy X11 font system.")
1546     (license license:x11)))
1547
1548
1549 (define-public presentproto
1550   (package
1551     (name "presentproto")
1552     (version "1.0")
1553     (source
1554       (origin
1555         (method url-fetch)
1556         (uri (string-append
1557                "mirror://xorg/individual/proto/presentproto-"
1558                version
1559                ".tar.bz2"))
1560         (sha256
1561           (base32
1562             "1kir51aqg9cwazs14ivcldcn3mzadqgykc9cg87rm40zf947sb41"))))
1563     (build-system gnu-build-system)
1564     (home-page "https://www.x.org/wiki/")
1565     (synopsis "Xorg PresentProto protocol headers")
1566     (description
1567      "Present Extension provides a way for applications to update their
1568 window contents from a pixmap in a well defined fashion, synchronizing
1569 with the display refresh and potentially using a more efficient
1570 mechanism than copying the contents of the source pixmap.")
1571     (license (license:x11-style "file://presentproto.h"
1572                                 "See 'presentproto.h' in the distribution."))))
1573
1574 (define-public printproto
1575   (package
1576     (name "printproto")
1577     (version "1.0.5")
1578     (source
1579       (origin
1580         (method url-fetch)
1581         (uri (string-append
1582                "mirror://xorg/individual/proto/printproto-"
1583                version
1584                ".tar.bz2"))
1585         (sha256
1586           (base32
1587             "06liap8n4s25sgp27d371cc7yg9a08dxcr3pmdjp761vyin3360j"))))
1588     (build-system gnu-build-system)
1589     (native-inputs `(("pkg-config" ,pkg-config)))
1590     (home-page "https://www.x.org/wiki/")
1591     (synopsis "Xorg PrintProto protocol headers")
1592     (description
1593      "Print Extension defines a protocol for a portable,
1594 network-transparent printing system.")
1595     (license license:x11)))
1596
1597
1598 (define-public randrproto
1599   (package
1600     (name "randrproto")
1601     (version "1.5.0")
1602     (source
1603       (origin
1604         (method url-fetch)
1605         (uri (string-append
1606                "mirror://xorg/individual/proto/randrproto-"
1607                version
1608                ".tar.bz2"))
1609         (sha256
1610           (base32
1611             "0s4496z61y5q45q20gldwpf788b9nsa8hb13gnck1mwwwwrmarsc"))))
1612     (build-system gnu-build-system)
1613     (native-inputs `(("pkg-config" ,pkg-config)))
1614     (home-page "https://www.x.org/wiki/")
1615     (synopsis "Xorg RandRProto protocol headers")
1616     (description
1617      "Resize and Rotate Extension defines a protocol for clients to
1618 dynamically change X screens, so as to resize, rotate and reflect the root
1619 window of a screen.")
1620     (license license:x11)))
1621
1622
1623 (define-public recordproto
1624   (package
1625     (name "recordproto")
1626     (version "1.14.2")
1627     (source
1628       (origin
1629         (method url-fetch)
1630         (uri (string-append
1631                "mirror://xorg/individual/proto/recordproto-"
1632                version
1633                ".tar.bz2"))
1634         (sha256
1635           (base32
1636             "0w3kgr1zabwf79bpc28dcnj0fpni6r53rpi82ngjbalj5s6m8xx7"))))
1637     (build-system gnu-build-system)
1638     (native-inputs `(("pkg-config" ,pkg-config)))
1639     (home-page "https://www.x.org/wiki/")
1640     (synopsis "Xorg RecordProto protocol headers")
1641     (description
1642      "Record Extension defines a protocol for the recording and playback
1643 of user actions in the X Window System.")
1644     (license license:x11)))
1645
1646
1647 (define-public renderproto
1648   (package
1649     (name "renderproto")
1650     (version "0.11.1")
1651     (source
1652       (origin
1653         (method url-fetch)
1654         (uri (string-append
1655                "mirror://xorg/individual/proto/renderproto-"
1656                version
1657                ".tar.bz2"))
1658         (sha256
1659           (base32
1660             "0dr5xw6s0qmqg0q5pdkb4jkdhaja0vbfqla79qh5j1xjj9dmlwq6"))))
1661     (build-system gnu-build-system)
1662     (native-inputs `(("pkg-config" ,pkg-config)))
1663     (home-page "https://www.x.org/wiki/")
1664     (synopsis "Xorg RenderProto protocol headers")
1665     (description
1666      "Rendering Extension defines a protcol for a digital image composition
1667 as the foundation of a new rendering model within the X Window System.")
1668     (license license:x11)))
1669
1670
1671 (define-public resourceproto
1672   (package
1673     (name "resourceproto")
1674     (version "1.2.0")
1675     (source
1676       (origin
1677         (method url-fetch)
1678         (uri (string-append
1679                "mirror://xorg/individual/proto/resourceproto-"
1680                version
1681                ".tar.bz2"))
1682         (sha256
1683           (base32
1684             "0638iyfiiyjw1hg3139pai0j6m65gkskrvd9684zgc6ydcx00riw"))))
1685     (build-system gnu-build-system)
1686     (native-inputs `(("pkg-config" ,pkg-config)))
1687     (home-page "https://www.x.org/wiki/")
1688     (synopsis "Xorg ResourceProto protocol headers")
1689     (description
1690      "Resource Extension defines a protocol that allows a client to
1691 query the X server about its usage of various resources.")
1692     (license license:x11)))
1693
1694
1695 (define-public scrnsaverproto
1696   (package
1697     (name "scrnsaverproto")
1698     (version "1.2.2")
1699     (source
1700       (origin
1701         (method url-fetch)
1702         (uri (string-append
1703                "mirror://xorg/individual/proto/scrnsaverproto-"
1704                version
1705                ".tar.bz2"))
1706         (sha256
1707           (base32
1708             "0rfdbfwd35d761xkfifcscx56q0n56043ixlmv70r4v4l66hmdwb"))))
1709     (build-system gnu-build-system)
1710     (native-inputs `(("pkg-config" ,pkg-config)))
1711     (home-page "https://www.x.org/wiki/")
1712     (synopsis "Xorg ScrnSaverProto protocol headers")
1713     (description
1714      "Screen Saver Extension defines a protocol to control screensaver
1715 features and to query screensaver info on specific windows.")
1716     (license license:x11)))
1717
1718
1719 (define-public sessreg
1720   (package
1721     (name "sessreg")
1722     (version "1.1.0")
1723     (source
1724       (origin
1725         (method url-fetch)
1726         (uri (string-append
1727                "mirror://xorg/individual/app/sessreg-"
1728                version
1729                ".tar.bz2"))
1730         (sha256
1731           (base32
1732             "0z013rskwmdadd8cdlxvh4asmgim61qijyzfbqmr1q1mg1jpf4am"))))
1733     (build-system gnu-build-system)
1734     (inputs
1735       `(("xproto" ,xproto)))
1736     (native-inputs
1737        `(("pkg-config" ,pkg-config)))
1738     (home-page "https://www.x.org/wiki/")
1739     (synopsis "Register X sessions in system utmp/utmpx databases")
1740     (description
1741      "SessReg is a simple program for managing utmp/wtmp entries for X
1742 sessions.  It was originally written for use with xdm, but may also be
1743 used with other display managers such as gdm or kdm.")
1744     (license license:x11)))
1745
1746
1747 (define-public setxkbmap
1748   (package
1749     (name "setxkbmap")
1750     (version "1.3.1")
1751     (source
1752       (origin
1753         (method url-fetch)
1754         (uri (string-append
1755                "mirror://xorg/individual/app/setxkbmap-"
1756                version
1757                ".tar.bz2"))
1758         (sha256
1759           (base32
1760             "1qfk097vjysqb72pq89h0la3462kbb2dh1d11qzs2fr67ybb7pd9"))))
1761     (build-system gnu-build-system)
1762     (inputs
1763       `(("libxkbfile" ,libxkbfile)
1764         ("xkeyboard-config" ,xkeyboard-config)
1765         ("libx11" ,libx11)))
1766     (native-inputs
1767       `(("pkg-config" ,pkg-config)))
1768     (arguments
1769      `(#:configure-flags
1770        (list (string-append "--with-xkb-config-root="
1771                             (assoc-ref %build-inputs "xkeyboard-config")
1772                             "/share/X11/xkb"))))
1773     (home-page "https://www.x.org/wiki/")
1774     (synopsis "Set the keyboard using the X Keyboard Extension")
1775     (description
1776      "Setxkbmap is an X11 client to change the keymaps in the X server
1777 for a specified keyboard to use the layout determined by the options
1778 listed on the command line.")
1779     (license license:x11)))
1780
1781
1782 (define-public smproxy
1783   (package
1784     (name "smproxy")
1785     (version "1.0.6")
1786     (source
1787       (origin
1788         (method url-fetch)
1789         (uri (string-append
1790                "mirror://xorg/individual/app/smproxy-"
1791                version
1792                ".tar.bz2"))
1793         (sha256
1794           (base32
1795             "0rkjyzmsdqmlrkx8gy2j4q6iksk58hcc92xzdprkf8kml9ar3wbc"))))
1796     (build-system gnu-build-system)
1797     (inputs
1798       `(("libxt" ,libxt)
1799         ("libxmu" ,libxmu)))
1800     (native-inputs
1801       `(("pkg-config" ,pkg-config)))
1802     (home-page "https://www.x.org/wiki/")
1803     (synopsis "Session Manager Proxy")
1804     (description
1805      "SMProxy allows X applications that do not support X11R6 session
1806 management to participate in an X11R6 session.")
1807     (license license:x11)))
1808
1809
1810 (define-public util-macros
1811   (package
1812     (name "util-macros")
1813     (version "1.19.0")
1814     (source
1815       (origin
1816         (method url-fetch)
1817         (uri (string-append
1818                "mirror://xorg/individual/util/util-macros-"
1819                version
1820                ".tar.bz2"))
1821         (sha256
1822           (base32
1823             "1fnhpryf55l0yqajxn0cxan3kvsjzi67nlanz8clwqzf54cb2d98"))))
1824     (build-system gnu-build-system)
1825     (native-inputs `(("pkg-config" ,pkg-config)))
1826     (arguments
1827      `(#:phases (alist-cons-after
1828                  'unpack 'fix-makefile-in
1829                  (lambda _
1830                    (substitute* "Makefile.in"
1831                      ;; Install xorg-macros.pc in PREFIX/lib/pkgconfig,
1832                      ;; not PREFIX/share/pkgconfig.
1833                      (("\\$\\(datadir\\)/pkgconfig") "$(libdir)/pkgconfig")))
1834                  (alist-cons-after
1835                   'install 'post-install-cleanup
1836                   (lambda* (#:key outputs #:allow-other-keys)
1837                     (let ((out (assoc-ref outputs "out")))
1838                       (with-directory-excursion out
1839                         (delete-file "share/util-macros/INSTALL")
1840                         (rmdir "share/util-macros"))))
1841                   %standard-phases))))
1842     (home-page "https://www.x.org/wiki/")
1843     (synopsis "Xorg autoconf macros")
1844     (description
1845      "This package provides a set of autoconf macros used by the
1846 configure.ac scripts in other Xorg modular packages, and is needed to
1847 generate new versions of their configure scripts with autoconf.")
1848     (license license:x11)))
1849
1850
1851 (define-public videoproto
1852   (package
1853     (name "videoproto")
1854     (version "2.3.3")
1855     (source
1856       (origin
1857         (method url-fetch)
1858         (uri (string-append
1859                "mirror://xorg/individual/proto/videoproto-"
1860                version
1861                ".tar.bz2"))
1862         (sha256
1863           (base32
1864             "00m7rh3pwmsld4d5fpii3xfk5ciqn17kkk38gfpzrrh8zn4ki067"))))
1865     (build-system gnu-build-system)
1866     (native-inputs `(("pkg-config" ,pkg-config)))
1867     (home-page "https://www.x.org/wiki/")
1868     (synopsis "Xorg VideoProto protocol headers")
1869     (description
1870      "Video Extension provides a protocol for a video output mechanism,
1871 mainly to rescale video playback in the video controller hardware.")
1872     (license license:x11)))
1873
1874
1875 (define-public windowswmproto
1876   (package
1877     (name "windowswmproto")
1878     (version "1.0.4")
1879     (source
1880       (origin
1881         (method url-fetch)
1882         (uri (string-append
1883                "mirror://xorg/individual/proto/windowswmproto-"
1884                version
1885                ".tar.bz2"))
1886         (sha256
1887           (base32
1888             "0syjxgy4m8l94qrm03nvn5k6bkxc8knnlld1gbllym97nvnv0ny0"))))
1889     (build-system gnu-build-system)
1890     (native-inputs `(("pkg-config" ,pkg-config)))
1891     (home-page "https://www.x.org/wiki/")
1892     (synopsis "Xorg WindowsWMProto protocol headers")
1893     (description
1894      "WindowsWM Extension defines a protocol, used for coordination between
1895 an X11 server and the Microsoft Windows native window manager.  WindowsWM
1896 is only intended to be used on Cygwin when running a rootless XWin
1897 server.")
1898     (license license:x11)))
1899
1900
1901 (define-public x11perf
1902   (package
1903     (name "x11perf")
1904     (version "1.6.0")
1905     (source
1906       (origin
1907         (method url-fetch)
1908         (uri (string-append
1909                "mirror://xorg/individual/app/x11perf-"
1910                version
1911                ".tar.bz2"))
1912         (sha256
1913           (base32
1914             "0lb716yfdb8f11h4cz93d1bapqdxf1xplsb21kbp4xclq7g9hw78"))))
1915     (build-system gnu-build-system)
1916     (inputs
1917       `(("libx11" ,libx11)
1918         ("libxft" ,libxft)
1919         ("libxmu" ,libxmu)
1920         ("libxrender" ,libxrender)))
1921     (native-inputs
1922       `(("pkg-config" ,pkg-config)))
1923     (home-page "https://www.x.org/wiki/")
1924     (synopsis "X server performance benchmarker")
1925     (description
1926      "X11Perf is a simple performance benchmarker for the Xorg X server.")
1927     (license license:x11)))
1928
1929
1930 (define-public xauth
1931   (package
1932     (name "xauth")
1933     (version "1.0.10")
1934     (source
1935       (origin
1936         (method url-fetch)
1937         (uri (string-append
1938                "mirror://xorg/individual/app/xauth-"
1939                version
1940                ".tar.bz2"))
1941         (sha256
1942           (base32
1943             "0kgwz9rmxjfdvi2syf8g0ms5rr5cgyqx4n0n1m960kyz7k745zjs"))))
1944     (build-system gnu-build-system)
1945     (inputs
1946       `(("libxmu" ,libxmu)
1947         ("libxext" ,libxext)
1948         ("libxau" ,libxau)
1949         ("libx11" ,libx11)))
1950     (native-inputs
1951       `(("pkg-config" ,pkg-config)))
1952
1953     ;; FIXME: The test suite needs http://liw.fi/cmdtest/
1954     (arguments `(#:tests? #f))
1955
1956     (home-page "https://www.x.org/wiki/")
1957     (synopsis "X authority file utility")
1958     (description
1959      "XAuth program is used to edit and display the authorization
1960 information used in connecting to the X server.")
1961     (license license:x11)))
1962
1963
1964 (define-public xbacklight
1965   (package
1966     (name "xbacklight")
1967     (version "1.2.1")
1968     (source
1969       (origin
1970         (method url-fetch)
1971         (uri (string-append
1972                "mirror://xorg/individual/app/xbacklight-"
1973                version
1974                ".tar.bz2"))
1975         (sha256
1976           (base32
1977             "0arnd1j8vzhzmw72mqhjjcb2qwcbs9qphsy3ps593ajyld8wzxhp"))))
1978     (build-system gnu-build-system)
1979     (inputs
1980      `(("libxcb" ,libxcb)
1981        ("xcb-util" ,xcb-util)))
1982     (native-inputs
1983      `(("pkg-config" ,pkg-config)))
1984     (home-page "https://www.x.org/wiki/")
1985     (synopsis "Control display backlight")
1986     (description
1987      "Xbacklight is used to adjust the backlight brightness where
1988 supported.  It uses the RandR extension to find all outputs on the X
1989 server supporting backlight brightness control and changes them all in
1990 the same way.")
1991     (license license:x11)))
1992
1993
1994 (define-public xbitmaps
1995   (package
1996     (name "xbitmaps")
1997     (version "1.1.1")
1998     (source
1999       (origin
2000         (method url-fetch)
2001         (uri (string-append
2002                "mirror://xorg/individual/data/xbitmaps-"
2003                version
2004                ".tar.bz2"))
2005         (sha256
2006           (base32
2007             "178ym90kwidia6nas4qr5n5yqh698vv8r02js0r4vg3b6lsb0w9n"))))
2008     (build-system gnu-build-system)
2009     (native-inputs `(("pkg-config" ,pkg-config)))
2010     (home-page "https://www.x.org/wiki/")
2011     (synopsis "X bitmaps")
2012     (description
2013      "xbitmaps provides basic bitmaps (little pictures) used by some
2014 legacy X clients.")
2015     (license license:x11)))
2016
2017 (define-public xcalc
2018   (package
2019     (name "xcalc")
2020     (version "1.0.6")
2021     (source
2022      (origin
2023        (method url-fetch)
2024        (uri (string-append
2025              "mirror://xorg/individual/app/" name "-"
2026              version
2027              ".tar.gz"))
2028        (sha256
2029         (base32
2030          "1lg8xwj0nr8anbd77n3cs87s57sr4gmb3pxs3k22a28n6ndcvmbz"))))
2031     (build-system gnu-build-system)
2032     (arguments
2033      `(#:phases (modify-phases %standard-phases
2034                   (add-after
2035                    'configure 'mutate-makefile
2036                    (lambda _
2037                      (substitute* "Makefile"
2038                        (("^appdefaultdir = .*$")
2039                         (string-append "appdefaultdir = " %output
2040                                        ,%app-defaults-dir "\n")))
2041                      #t)))))
2042     (inputs
2043      `(("libxaw" ,libxaw)))
2044     (native-inputs
2045      `(("pkg-config" ,pkg-config)))
2046     (home-page "https://www.x.org/wiki/")
2047     (synopsis "Hand calculator for the X Window system")
2048     (description "Xcalc is a scientific calculator desktop accessory that can
2049 emulate a TI-30 or an HP-10C.")
2050     (license license:x11)))
2051
2052
2053 (define-public xcb-proto
2054   (package
2055     (name "xcb-proto")
2056     (version "1.11")
2057     (source
2058       (origin
2059         (method url-fetch)
2060         (uri (string-append
2061                "mirror://xorg/individual/xcb/xcb-proto-"
2062                version
2063                ".tar.bz2"))
2064         (sha256
2065           (base32
2066             "0bp3f53l9fy5x3mn1rkj1g81aiyzl90wacwvqdgy831aa3kfxb5l"))))
2067     (build-system gnu-build-system)
2068     (native-inputs
2069       `(("pkg-config" ,pkg-config) ("python" ,python-minimal-wrapper)))
2070     (home-page "https://www.x.org/wiki/")
2071     (synopsis "XML-XCB protocol descriptions")
2072     (description
2073      "XCB-Proto provides the XML-XCB protocol descriptions that libxcb
2074 uses to generate the majority of its code and API.  XCB-Proto is
2075 separated from libxcb to allow reuse by other projects, such as
2076 additional language bindings, protocol dissectors, or documentation
2077 generators.
2078
2079 XCB-Proto also contains language-independent Python libraries that are
2080 used to parse an XML description and create objects used by Python code
2081 generators in individual language bindings.")
2082     (license license:x11)))
2083
2084
2085 (define-public xcmiscproto
2086   (package
2087     (name "xcmiscproto")
2088     (version "1.2.2")
2089     (source
2090       (origin
2091         (method url-fetch)
2092         (uri (string-append
2093                "mirror://xorg/individual/proto/xcmiscproto-"
2094                version
2095                ".tar.bz2"))
2096         (sha256
2097           (base32
2098             "1pyjv45wivnwap2wvsbrzdvjc5ql8bakkbkrvcv6q9bjjf33ccmi"))))
2099     (build-system gnu-build-system)
2100     (native-inputs `(("pkg-config" ,pkg-config)))
2101     (home-page "https://www.x.org/wiki/")
2102     (synopsis "Xorg XCMiscProto protocol headers")
2103     (description
2104      "XC-MISC Extension defines a protocol that provides Xlib two ways
2105 to query the server for available resource IDs.")
2106     (license license:x11)))
2107
2108
2109 (define-public xcmsdb
2110   (package
2111     (name "xcmsdb")
2112     (version "1.0.5")
2113     (source
2114       (origin
2115         (method url-fetch)
2116         (uri (string-append
2117                "mirror://xorg/individual/app/xcmsdb-"
2118                version
2119                ".tar.bz2"))
2120         (sha256
2121           (base32
2122             "1ik7gzlp2igz183x70883000ygp99r20x3aah6xhaslbpdhm6n75"))))
2123     (build-system gnu-build-system)
2124     (inputs
2125       `(("libx11" ,libx11)))
2126     (native-inputs
2127       `(("pkg-config" ,pkg-config)))
2128     (home-page "https://www.x.org/wiki/")
2129     (synopsis "Device Color Characterization utility")
2130     (description
2131      "XCMSDB is used to load, query, or remove Device Color
2132 Characterization data stored in properties on the root window of the
2133 screen as specified in section 7, Device Color Characterization, of the
2134 X11 Inter-Client Communication Conventions Manual (ICCCM).")
2135     (license license:x11)))
2136
2137
2138 (define-public xcursor-themes
2139   (package
2140     (name "xcursor-themes")
2141     (version "1.0.4")
2142     (source
2143       (origin
2144         (method url-fetch)
2145         (uri (string-append
2146                "mirror://xorg/individual/data/xcursor-themes-"
2147                version
2148                ".tar.bz2"))
2149         (sha256
2150           (base32
2151             "11mv661nj1p22sqkv87ryj2lcx4m68a04b0rs6iqh3fzp42jrzg3"))))
2152     (build-system gnu-build-system)
2153     (inputs
2154       `(("libxcursor" ,libxcursor)
2155         ("xcursorgen" ,xcursorgen)))
2156     (native-inputs
2157       `(("pkg-config" ,pkg-config)))
2158     (arguments
2159      `(#:configure-flags
2160        (list (string-append "--with-cursordir="
2161                             (assoc-ref %outputs "out")
2162                             "/share/icons"))))
2163     (home-page "https://www.x.org/wiki/")
2164     (synopsis "Default Xorg cursors")
2165     (description
2166      "This package provides a default set of cursor themes for the Xorg
2167 X server: 'handhelds', 'redglass' and 'whiteglass'.")
2168     (license license:x11)))
2169
2170
2171 (define-public xcursorgen
2172   (package
2173     (name "xcursorgen")
2174     (version "1.0.6")
2175     (source
2176       (origin
2177         (method url-fetch)
2178         (uri (string-append
2179                "mirror://xorg/individual/app/xcursorgen-"
2180                version
2181                ".tar.bz2"))
2182         (sha256
2183           (base32
2184             "0v7nncj3kaa8c0524j7ricdf4rvld5i7c3m6fj55l5zbah7r3j1i"))))
2185     (build-system gnu-build-system)
2186     (inputs
2187       `(("libxcursor" ,libxcursor)
2188         ("libpng" ,libpng)))
2189     (native-inputs
2190       `(("pkg-config" ,pkg-config)))
2191     (home-page "https://www.x.org/wiki/")
2192     (synopsis "Create an X cursor file from PNG images")
2193     (description
2194      "XCursorGen prepares X11 cursor sets for use with libXcursor.")
2195     (license license:x11)))
2196
2197
2198 (define-public xdpyinfo
2199   (package
2200     (name "xdpyinfo")
2201     (version "1.3.2")
2202     (source
2203       (origin
2204         (method url-fetch)
2205         (uri (string-append
2206                "mirror://xorg/individual/app/xdpyinfo-"
2207                version
2208                ".tar.bz2"))
2209         (sha256
2210           (base32
2211             "0ldgrj4w2fa8jng4b3f3biaj0wyn8zvya88pnk70d7k12pcqw8rh"))))
2212     (build-system gnu-build-system)
2213     (inputs
2214       `(("inputproto" ,inputproto)
2215         ("libx11" ,libx11)
2216         ("libxxf86vm" ,libxxf86vm)
2217         ("libxxf86dga" ,libxxf86dga)
2218         ("libxtst" ,libxtst)
2219         ("libxrender" ,libxrender)
2220         ("libxinerama" ,libxinerama)
2221         ("libxi" ,libxi)
2222         ("libxcomposite" ,libxcomposite)
2223         ("libdmx" ,libdmx)))
2224     (native-inputs
2225       `(("pkg-config" ,pkg-config)))
2226     (home-page "https://www.x.org/wiki/")
2227     (synopsis "Xorg display information utility")
2228     (description
2229      "Xdpyinfo is used to display information about an X server: the
2230 capabilities of a server, the predefined values for various parameters
2231 used in communicating between clients and the server, and the different
2232 types of screens, visuals, and X11 protocol extensions that are
2233 available.")
2234     (license license:x11)))
2235
2236
2237 (define-public xdriinfo
2238   (package
2239     (name "xdriinfo")
2240     (version "1.0.5")
2241     (source
2242       (origin
2243         (method url-fetch)
2244         (uri (string-append
2245                "mirror://xorg/individual/app/xdriinfo-"
2246                version
2247                ".tar.bz2"))
2248         (sha256
2249           (base32
2250             "0681d0y8liqakkpz7mmsf689jcxrvs5291r20qi78mc9xxk3gfjc"))))
2251     (build-system gnu-build-system)
2252     (inputs
2253       `(("mesa" ,mesa)
2254         ("libx11" ,libx11)))
2255     (native-inputs
2256       `(("pkg-config" ,pkg-config)))
2257     (home-page "https://www.x.org/wiki/")
2258     (synopsis "Query DRI configuration information")
2259     (description
2260      "XDRIInfo is used to query configuration information of X11
2261 DRI (Direct Rendering Infrastructure) drivers.")
2262     (license license:x11)))
2263
2264
2265 (define-public xev
2266   (package
2267     (name "xev")
2268     (version "1.2.2")
2269     (source
2270       (origin
2271         (method url-fetch)
2272         (uri (string-append
2273                "mirror://xorg/individual/app/xev-"
2274                version
2275                ".tar.bz2"))
2276         (sha256
2277           (base32
2278             "0krivhrxpq6719103r541xpi3i3a0y15f7ypc4lnrx8sdhmfcjnr"))))
2279     (build-system gnu-build-system)
2280     (inputs
2281       `(("libxrender" ,libxrender)
2282         ("libxrandr" ,libxrandr)
2283         ("xproto" ,xproto)
2284         ("libx11" ,libx11)))
2285     (native-inputs
2286      `(("pkg-config" ,pkg-config)))
2287     (home-page "https://www.x.org/wiki/")
2288     (synopsis "Print contents of X events")
2289     (description
2290      "XEv creates a window and then asks the X server to send it X11
2291 events whenever anything happens to the window (such as it being moved,
2292 resized, typed in, clicked in, etc.).  You can also attach it to an
2293 existing window.  It is useful for seeing what causes events to occur
2294 and to display the information that they contain; it is essentially a
2295 debugging and development tool, and should not be needed in normal
2296 usage.")
2297     (license license:x11)))
2298
2299
2300 (define-public xextproto
2301   (package
2302     (name "xextproto")
2303     (version "7.3.0")
2304     (source
2305       (origin
2306         (method url-fetch)
2307         (uri (string-append
2308                "mirror://xorg/individual/proto/xextproto-"
2309                version
2310                ".tar.bz2"))
2311         (sha256
2312           (base32
2313             "1c2vma9gqgc2v06rfxdiqgwhxmzk2cbmknwf1ng3m76vr0xb5x7k"))))
2314     (build-system gnu-build-system)
2315     (native-inputs `(("pkg-config" ,pkg-config)))
2316     (home-page "https://www.x.org/wiki/")
2317     (synopsis "Xorg XExtProto protocol headers")
2318     (description
2319      "XExtProto provides the following extensions: DOUBLE-BUFFER, DPMS,
2320 Extended-Visual-Information, Generic Event Extension, LBX, MIT-SHM,
2321 MIT-SUNDRY-NONSTANDARD, Multi-Buffering, SECURITY, SHAPE, SYNC, TOG-CUP,
2322 XC-APPGROUP, XTEST.")
2323     (license license:x11)))
2324
2325
2326 (define-public libevdev
2327   (package
2328     (name "libevdev")
2329     (version "1.5.5")
2330     (source
2331      (origin
2332        (method url-fetch)
2333        (uri (string-append "https://www.freedesktop.org/software/" name "/"
2334                            name "-" version ".tar.xz"))
2335        (sha256
2336         (base32
2337          "1cc00876lqvyadsfmj3sh1h2i0r3qfar98izdfar5f8q41w2009j"))))
2338     (build-system gnu-build-system)
2339     (native-inputs `(("python" ,python)))
2340     (home-page "https://www.freedesktop.org/wiki/Software/libevdev/")
2341     (synopsis "Wrapper library for evdev devices")
2342     (description
2343      "libevdev is a wrapper library for evdev devices. it moves the common
2344 tasks when dealing with evdev devices into a library and provides a library
2345 interface to the callers, thus avoiding erroneous ioctls, etc.
2346
2347 The eventual goal is that libevdev wraps all ioctls available to evdev
2348 devices, thus making direct access unnecessary.")
2349     (license (license:x11-style "file://COPYING"))))
2350
2351
2352 (define-public xf86-input-evdev
2353   (package
2354     (name "xf86-input-evdev")
2355     (version "2.10.5")
2356     (source
2357       (origin
2358         (method url-fetch)
2359         (uri (string-append
2360                "mirror://xorg/individual/driver/xf86-input-evdev-"
2361                version
2362                ".tar.bz2"))
2363         (sha256
2364           (base32
2365            "03dphgwjaxxyys8axc1kyysp6xvy9bjxicsdrhi2jvdgbchadnly"))))
2366     (build-system gnu-build-system)
2367     (inputs
2368       `(("udev" ,eudev)
2369         ("libevdev" ,libevdev)
2370         ("mtdev" ,mtdev)
2371         ("xorg-server" ,xorg-server)))
2372     (native-inputs `(("pkg-config" ,pkg-config)))
2373     (arguments
2374      `(#:configure-flags
2375        (list (string-append "--with-sdkdir="
2376                             (assoc-ref %outputs "out")
2377                             "/include/xorg"))))
2378     (home-page "https://www.x.org/wiki/")
2379     (synopsis "Generic input driver for X server")
2380     (description
2381      "xf86-input-evdev is a generic input driver for the Xorg X server.
2382 This driver supports all input devices that the kernel knows about,
2383 including most mice, keyboards, tablets and touchscreens.")
2384     (license license:x11)))
2385
2386 (define-public xf86-input-libinput
2387   (package
2388     (name "xf86-input-libinput")
2389     (version "0.24.0")
2390     (source (origin
2391               (method url-fetch)
2392               (uri (string-append
2393                     "mirror://xorg/individual/driver/"
2394                     name "-" version ".tar.bz2"))
2395               (sha256
2396                (base32
2397                 "0a1nn65qq71bbfhxq39zdb4b1h6ickzv98cjdacv4ngd18shgjyx"))))
2398     (build-system gnu-build-system)
2399     (arguments
2400      '(#:configure-flags
2401        (list (string-append "--with-sdkdir="
2402                             %output "/include/xorg"))))
2403     (native-inputs
2404      `(("pkg-config" ,pkg-config)))
2405     (inputs
2406      `(("libinput" ,libinput)
2407        ("xorg-server" ,xorg-server)))
2408     (home-page "https://www.x.org/wiki/")
2409     (synopsis "Input driver for X server based on libinput")
2410     (description
2411      "xf86-input-libinput is an input driver for the Xorg X server based
2412 on libinput.  It is a thin wrapper around libinput, so while it does
2413 provide all features that libinput supports it does little beyond.")
2414     (license license:x11)))
2415
2416 (define-public xf86-input-joystick
2417   (package
2418     (name "xf86-input-joystick")
2419     (version "1.6.3")
2420     (source
2421       (origin
2422         (method url-fetch)
2423         (uri (string-append
2424                "mirror://xorg/individual/driver/xf86-input-joystick-"
2425                version
2426                ".tar.bz2"))
2427         (sha256
2428           (base32
2429             "1awfq496d082brgjbr60lhm6jvr9537rflwxqdfqwfzjy3n6jxly"))))
2430     (build-system gnu-build-system)
2431     (inputs `(("xorg-server" ,xorg-server)))
2432     (native-inputs `(("pkg-config" ,pkg-config)))
2433     (arguments
2434      `(#:configure-flags
2435        (list (string-append "--with-sdkdir="
2436                             (assoc-ref %outputs "out")
2437                             "/include/xorg"))))
2438     (home-page "https://www.x.org/wiki/")
2439     (synopsis "Joystick input driver for X server")
2440     (description
2441      "xf86-input-joystick is a joystick input driver for the Xorg X server.
2442 It is used to cotrol the pointer with a joystick device.")
2443     (license license:x11)))
2444
2445
2446 (define-public xf86-input-keyboard
2447   (package
2448     (name "xf86-input-keyboard")
2449     (version "1.9.0")
2450     (source
2451       (origin
2452         (method url-fetch)
2453         (uri (string-append
2454                "mirror://xorg/individual/driver/xf86-input-keyboard-"
2455                version
2456                ".tar.bz2"))
2457         (sha256
2458           (base32
2459             "12032yg412kyvnmc5fha1in7mpi651d8sa1bk4138s2j2zr01jgp"))))
2460     (build-system gnu-build-system)
2461     (inputs `(("xorg-server" ,xorg-server)))
2462     (native-inputs `(("pkg-config" ,pkg-config)))
2463     (home-page "https://www.x.org/wiki/")
2464     (synopsis "Keyboard input driver for X server")
2465     (description
2466      "xf86-input-keyboard is a keyboard input driver for the Xorg X server.")
2467     (license license:x11)))
2468
2469
2470 (define-public xf86-input-mouse
2471   (package
2472     (name "xf86-input-mouse")
2473     (version "1.9.2")
2474     (source
2475       (origin
2476         (method url-fetch)
2477         (uri (string-append
2478                "mirror://xorg/individual/driver/xf86-input-mouse-"
2479                version
2480                ".tar.bz2"))
2481         (sha256
2482           (base32
2483             "0bsbgww9421792zan43j60mndqprhfxhc48agsi15d3abjqda9gl"))))
2484     (build-system gnu-build-system)
2485     (inputs `(("xorg-server" ,xorg-server)))
2486     (native-inputs `(("pkg-config" ,pkg-config)))
2487     (arguments
2488      `(#:configure-flags
2489        (list (string-append "--with-sdkdir="
2490                             (assoc-ref %outputs "out")
2491                             "/include/xorg"))))
2492     (home-page "https://www.x.org/wiki/")
2493     (synopsis "Mouse input driver for X server")
2494     (description
2495      "xf86-input-mouse is a mouse input driver for the Xorg X server.
2496 This driver supports four classes of mice: serial, bus and PS/2 mice,
2497 and additional mouse types supported by specific operating systems, such
2498 as USB mice.")
2499     (license license:x11)))
2500
2501
2502 (define-public xf86-input-synaptics
2503   (package
2504     (name "xf86-input-synaptics")
2505     (version "1.9.0")
2506     (source
2507       (origin
2508         (method url-fetch)
2509         (uri (string-append
2510                "mirror://xorg/individual/driver/xf86-input-synaptics-"
2511                version
2512                ".tar.bz2"))
2513         (sha256
2514           (base32
2515             "0niv0w1czbxh4y3qkqbpdp5gjwhp3379inwhknhif0m4sy4k5fmg"))))
2516     (build-system gnu-build-system)
2517     (inputs `(("libx11" ,libx11)
2518               ("libxi" ,libxi)
2519               ("libevdev" ,libevdev)
2520               ("mtdev" ,mtdev)
2521               ("xorg-server" ,xorg-server)))
2522     (native-inputs `(("pkg-config" ,pkg-config)))
2523     (arguments
2524      `(#:configure-flags
2525        (list (string-append "--with-sdkdir="
2526                             (assoc-ref %outputs "out")
2527                             "/include/xorg")
2528              (string-append "--with-xorg-conf-dir="
2529                             (assoc-ref %outputs "out")
2530                             "/share/X11/xorg.conf.d"))))
2531     (home-page "https://www.x.org/wiki/")
2532     (synopsis "Touchpad input driver for X server")
2533     (description
2534      "xf86-input-synaptics is a touchpad driver for the Xorg X server.")
2535     (license license:x11)))
2536
2537
2538 (define-public xf86-input-void
2539   (package
2540     (name "xf86-input-void")
2541     (version "1.4.1")
2542     (source
2543       (origin
2544         (method url-fetch)
2545         (uri (string-append
2546                "mirror://xorg/individual/driver/xf86-input-void-"
2547                version
2548                ".tar.bz2"))
2549         (sha256
2550           (base32
2551             "171k8b8s42s3w73l7ln9jqwk88w4l7r1km2blx1vy898c854yvpr"))))
2552     (build-system gnu-build-system)
2553     (inputs `(("xorg-server" ,xorg-server)))
2554     (native-inputs `(("pkg-config" ,pkg-config)))
2555     (home-page "https://www.x.org/wiki/")
2556     (synopsis "Void (null) input driver for X server")
2557     (description
2558      "xf86-input-void is a null input driver for the Xorg X server.")
2559     (license license:x11)))
2560
2561
2562 (define-public xf86-video-ark
2563   (package
2564     (name "xf86-video-ark")
2565     (version "0.7.5")
2566     (source
2567       (origin
2568         (method url-fetch)
2569         (uri (string-append
2570                "mirror://xorg/individual/driver/xf86-video-ark-"
2571                version
2572                ".tar.bz2"))
2573         (sha256
2574           (base32
2575            "07p5vdsj2ckxb6wh02s61akcv4qfg6s1d5ld3jn3lfaayd3f1466"))
2576         (patches (search-patches "xf86-video-ark-remove-mibstore.patch"))))
2577     (build-system gnu-build-system)
2578     (inputs `(("xorg-server" ,xorg-server)))
2579     (native-inputs `(("pkg-config" ,pkg-config)))
2580     (home-page "https://www.x.org/wiki/")
2581     (synopsis "Ark Logic video driver for X server")
2582     (description
2583      "xf86-video-ark is an Ark Logic video driver for the Xorg X server.")
2584     (license license:x11)))
2585
2586 ;; This driver depends on XAA which has been removed from xorg-server.
2587 ;;
2588 ;; (define-public xf86-video-ast
2589 ;;   (package
2590 ;;     (name "xf86-video-ast")
2591 ;;     (version "0.93.10")
2592 ;;     (source
2593 ;;       (origin
2594 ;;         (method url-fetch)
2595 ;;         (uri (string-append
2596 ;;                "mirror://xorg/individual/driver/xf86-video-ast-"
2597 ;;                version
2598 ;;                ".tar.bz2"))
2599 ;;         (sha256
2600 ;;           (base32
2601 ;;            "1q64z8qqa0ix3cymqiwk1s3sphd1fvvz30lvyxhgkgciygz6dm69"))
2602 ;;         (patches (search-patches "xf86-video-ast-remove-mibstore.patch"))))
2603 ;;     (build-system gnu-build-system)
2604 ;;     (inputs `(("xorg-server" ,xorg-server)))
2605 ;;     (native-inputs `(("pkg-config" ,pkg-config)))
2606 ;;     (home-page "https://www.x.org/wiki/")
2607 ;;     (synopsis "ASpeed Technologies video driver for X server")
2608 ;;     (description
2609 ;;      "xf86-video-ast is an ASpeed Technologies video driver for the Xorg
2610 ;; X server.")
2611 ;;     (license license:x11)))
2612
2613
2614 (define-public xf86-video-ati
2615   (package
2616     (name "xf86-video-ati")
2617     (version "7.8.0")
2618     (source
2619       (origin
2620         (method url-fetch)
2621         (uri (string-append
2622                "mirror://xorg/individual/driver/xf86-video-ati-"
2623                version
2624                ".tar.bz2"))
2625         (sha256
2626           (base32
2627             "1ynnm4v4261xmg94b7jam9hjyym4n2nqba23rv23v3wjfbkms7s0"))))
2628     (build-system gnu-build-system)
2629     (inputs `(("mesa" ,mesa)
2630               ("xxf86driproto" ,xf86driproto)
2631               ("xorg-server" ,xorg-server)))
2632     (native-inputs `(("pkg-config" ,pkg-config)))
2633     (arguments `(#:configure-flags `("--disable-glamor"))) ; TODO: Enable glamor
2634     (home-page "https://www.x.org/wiki/")
2635     (synopsis "ATI Radeon video driver for X server")
2636     (description
2637      "xf86-video-ati is an ATI Radeon video driver for the Xorg
2638 X server.")
2639     (license license:x11)))
2640
2641
2642 (define-public xf86-video-cirrus
2643   (package
2644     (name "xf86-video-cirrus")
2645     (version "1.5.3")
2646     (source
2647       (origin
2648         (method url-fetch)
2649         (uri (string-append
2650                "mirror://xorg/individual/driver/xf86-video-cirrus-"
2651                version
2652                ".tar.bz2"))
2653         (sha256
2654           (base32
2655             "1asifc6ld2g9kap15vfhvsvyl69lj7pw3d9ra9mi4najllh7pj7d"))))
2656     (build-system gnu-build-system)
2657     (inputs `(("xorg-server" ,xorg-server)))
2658     (native-inputs `(("pkg-config" ,pkg-config)))
2659     (home-page "https://www.x.org/wiki/")
2660     (synopsis "Cirrus Logic video driver for X server")
2661     (description
2662      "xf86-video-cirrus is a Cirrus Logic video driver for the Xorg
2663 X server.")
2664     (license license:x11)))
2665
2666
2667 ;; non-free license
2668 ;; (define-public xf86-video-dummy
2669
2670
2671 (define-public xf86-video-fbdev
2672   (package
2673     (name "xf86-video-fbdev")
2674     (version "0.4.4")
2675     (source
2676       (origin
2677         (method url-fetch)
2678         (uri (string-append
2679                "mirror://xorg/individual/driver/xf86-video-fbdev-"
2680                version
2681                ".tar.bz2"))
2682         (sha256
2683           (base32
2684             "06ym7yy017lanj730hfkpfk4znx3dsj8jq3qvyzsn8w294kb7m4x"))))
2685     (build-system gnu-build-system)
2686     (inputs `(("xorg-server" ,xorg-server)))
2687     (native-inputs `(("pkg-config" ,pkg-config)))
2688     (home-page "https://www.x.org/wiki/")
2689     (synopsis "Framebuffer device video driver for X server")
2690     (description
2691      "xf86-video-fbdev is a video driver for the Xorg X server for
2692 framebuffer device.")
2693     (license license:x11)))
2694
2695
2696 (define-public xf86-video-geode
2697   (package
2698     (name "xf86-video-geode")
2699     (version "2.11.18")
2700     (source
2701       (origin
2702         (method url-fetch)
2703         (uri (string-append
2704                "mirror://xorg/individual/driver/xf86-video-geode-"
2705                version
2706                ".tar.bz2"))
2707         (sha256
2708           (base32
2709            "1s59kdj573v38sb14xfhp1l926aypbhy11vaz36y72x6calfkv6n"))
2710         (patches (search-patches "xf86-video-geode-glibc-2.20.patch"))))
2711     (build-system gnu-build-system)
2712     (inputs `(("xorg-server" ,xorg-server)))
2713     (native-inputs `(("pkg-config" ,pkg-config)))
2714     (supported-systems
2715      ;; This driver is only supported on i686 systems.
2716      (filter (lambda (system) (string-prefix? "i686-" system))
2717              %supported-systems))
2718     (home-page "https://www.x.org/wiki/")
2719     (synopsis "AMD Geode GX/LX video driver for X server")
2720     (description
2721      "xf86-video-geode is an Xorg X server video driver for the AMD
2722 Geode GX and LX processors.  The GX component supports both XAA and EXA
2723 for graphics acceleration.  The LX component supports EXA, including
2724 compositing.  Both support Xv overlay and dynamic rotation with XRandR.")
2725     (license license:x11)))
2726
2727
2728 ;; Driver for obsolete graphics cards, depends on libglide:
2729 ;; http://sourceforge.net/projects/glide/ ,
2730 ;; last updated in 2003, and which does not compile out of the box any more.
2731 ;; (define-public xf86-video-glide
2732 ;;   (package
2733 ;;     (name "xf86-video-glide")
2734 ;;     (version "1.2.0")
2735 ;;     (source
2736 ;;       (origin
2737 ;;         (method url-fetch)
2738 ;;         (uri (string-append
2739 ;;                "mirror://xorg/X11R7.7/src/everything/xf86-video-glide-"
2740 ;;                version
2741 ;;                ".tar.bz2"))
2742 ;;         (sha256
2743 ;;           (base32
2744 ;;             "0byapm9mnpqk3wijfnnan3d22ii5cw6dmg4xn1625iiz89j5vs1l"))))
2745 ;;     (build-system gnu-build-system)
2746 ;;     (inputs `(("pkg-config" ,pkg-config)
2747 ;;               ("xorg-server" ,xorg-server)))
2748 ;;     (home-page "https://www.x.org/wiki/")
2749 ;;     (synopsis "Glide video driver for X server")
2750 ;;     (description
2751 ;;      "xf86-video-glide is a Glide video driver for the Xorg X server.")
2752 ;;     (license license:x11)))
2753
2754
2755 (define-public xf86-video-glint
2756   (package
2757     (name "xf86-video-glint")
2758     (version "1.2.9")
2759     (source
2760       (origin
2761         (method url-fetch)
2762         (uri (string-append
2763                "mirror://xorg/individual/driver/xf86-video-glint-"
2764                version
2765                ".tar.bz2"))
2766         (sha256
2767           (base32
2768            "1lkpspvrvrp9s539bhfdjfh4andaqyk63l6zjn8m3km95smk6a45"))))
2769     (build-system gnu-build-system)
2770     (inputs `(("xf86dgaproto" ,xf86dgaproto)
2771               ("xorg-server" ,xorg-server)))
2772     (native-inputs `(("pkg-config" ,pkg-config)))
2773     (home-page "https://www.x.org/wiki/")
2774     (synopsis "GLINT/Permedia video driver for X server")
2775     (description
2776      "xf86-video-glint is a GLINT/Permedia video driver for the Xorg
2777 X server.")
2778     (license license:x11)))
2779
2780
2781 (define-public xf86-video-i128
2782   (package
2783     (name "xf86-video-i128")
2784     (version "1.3.6")
2785     (source
2786       (origin
2787         (method url-fetch)
2788         (uri (string-append
2789                "mirror://xorg/individual/driver/xf86-video-i128-"
2790                version
2791                ".tar.bz2"))
2792         (sha256
2793           (base32
2794            "171b8lbxr56w3isph947dnw7x87hc46v6m3mcxdcz44gk167x0pq"))
2795         (patches (search-patches "xf86-video-i128-remove-mibstore.patch"))))
2796     (build-system gnu-build-system)
2797     (inputs `(("xorg-server" ,xorg-server)))
2798     (native-inputs `(("pkg-config" ,pkg-config)))
2799     (home-page "https://www.x.org/wiki/")
2800     (synopsis "I128 video driver for X server")
2801     (description
2802      "xf86-video-i128 is an I128 (Imagine 128) video driver for the Xorg
2803 X server.")
2804     (license license:x11)))
2805
2806
2807 (define-public xf86-video-intel
2808   (let ((commit "9fe04af4bce3057e3e94a6bf36a3d8d2e48d592c"))
2809     (package
2810       (name "xf86-video-intel")
2811       (version (string-append "2.99.917-2-" (string-take commit 7)))
2812       (source
2813        (origin
2814          ;; there's no current tarball
2815          (method git-fetch)
2816          (uri (git-reference
2817                (url "https://anongit.freedesktop.org/git/xorg/driver/xf86-video-intel.git")
2818                (commit commit)))
2819          (sha256
2820           (base32
2821            "06nnm9kjvmwxazp2ki0i5x1xv03bysfgpw30nd2jlf71qllybxml"))
2822          (file-name (string-append name "-" version))))
2823       (build-system gnu-build-system)
2824       (inputs `(("mesa" ,mesa)
2825                 ("udev" ,eudev)
2826                 ("libx11" ,libx11)
2827                 ("libxfont" ,libxfont)
2828                 ("xorg-server" ,xorg-server)))
2829       (native-inputs
2830        `(("pkg-config" ,pkg-config)
2831          ("autoconf" ,autoconf)
2832          ("automake" ,automake)
2833          ("libtool" ,libtool)))
2834       (supported-systems
2835        ;; This driver is only supported on Intel systems.
2836        (filter (lambda (system) (or (string-prefix? "i686-" system)
2837                                     (string-prefix? "x86_64-" system)))
2838                %supported-systems))
2839       (arguments
2840        '(#:phases (modify-phases %standard-phases
2841                     (add-after 'unpack 'bootstrap
2842                       (lambda _
2843                         (zero? (system* "autoreconf" "-vfi")))))))
2844       (home-page "https://www.x.org/wiki/")
2845       (synopsis "Intel video driver for X server")
2846       (description
2847        "xf86-video-intel is a 2D graphics driver for the Xorg X server.
2848 It supports a variety of Intel graphics chipsets.")
2849       (license license:x11))))
2850
2851
2852 (define-public xf86-video-mach64
2853   (package
2854     (name "xf86-video-mach64")
2855     (version "6.9.5")
2856     (source
2857       (origin
2858         (method url-fetch)
2859         (uri (string-append
2860                "mirror://xorg/individual/driver/xf86-video-mach64-"
2861                version
2862                ".tar.bz2"))
2863         (sha256
2864           (base32
2865            "07xlf5nsjm0x18ij5gyy4lf8hwpl10i8chi3skpqjh84drdri61y"))
2866         (patches (search-patches "xf86-video-mach64-glibc-2.20.patch"))))
2867     (build-system gnu-build-system)
2868     (inputs `(("mesa" ,mesa)
2869               ("xf86driproto" ,xf86driproto)
2870               ("xorg-server" ,xorg-server)))
2871     (native-inputs
2872       `(("pkg-config" ,pkg-config)))
2873     (home-page "https://www.x.org/wiki/")
2874     (synopsis "Mach64 video driver for X server")
2875     (description
2876      "xf86-video-mach64 is a video driver for the Xorg X server.
2877 This driver is intended for all ATI video adapters based on the Mach64
2878 series or older chipsets, providing maximum video function within
2879 hardware limitations.  The driver is also intended to optionally provide
2880 the same level of support for generic VGA or 8514/A adapters.")
2881     (license license:x11)))
2882
2883
2884 (define-public xf86-video-mga
2885   (package
2886     (name "xf86-video-mga")
2887     (version "1.6.5")
2888     (source
2889       (origin
2890         (method url-fetch)
2891         (uri (string-append
2892                "mirror://xorg/individual/driver/xf86-video-mga-"
2893                version
2894                ".tar.bz2"))
2895         (sha256
2896           (base32
2897            "08ll52hlar9z446v0wwca5qkj3hxhswwm7vvcgic9xv4cf7csqxn"))))
2898     (build-system gnu-build-system)
2899     (inputs `(("mesa" ,mesa)
2900               ("xf86driproto" ,xf86driproto)
2901               ("xorg-server" ,xorg-server)))
2902     (native-inputs `(("pkg-config" ,pkg-config)))
2903     (home-page "https://www.x.org/wiki/")
2904     (synopsis "Matrox video driver for X server")
2905     (description
2906      "xf86-video-mga is a Matrox video driver for the Xorg X server.")
2907     (license license:x11)))
2908
2909 (define-public xf86-video-modesetting
2910   (package
2911     (name "xf86-video-modesetting")
2912     (version "0.9.0")
2913     (source
2914       (origin
2915         (method url-fetch)
2916         (uri (string-append
2917               "mirror://xorg/individual/driver/xf86-video-modesetting-"
2918               version ".tar.bz2"))
2919         (sha256
2920          (base32
2921            "0p6pjn5bnd2wr3lmas4b12zcq12d9ilvssga93fzlg90fdahikwh"))))
2922     (build-system gnu-build-system)
2923     (inputs `(("libdrm" ,libdrm)
2924               ("xf86driproto" ,xf86driproto)
2925               ("libx11" ,libx11)
2926               ("xorg-server" ,xorg-server)))
2927     (native-inputs `(("pkg-config" ,pkg-config)))
2928     (home-page "https://www.x.org/wiki/")
2929     (synopsis "\"Modesetting\" video driver for X server")
2930     (description
2931      "This is a generic \"modesetting\" video driver, that relies on the Linux
2932 kernel mode setting (KMS).")
2933     (license license:x11)))
2934
2935 (define-public xf86-video-neomagic
2936   (package
2937     (name "xf86-video-neomagic")
2938     (version "1.2.9")
2939     (source
2940       (origin
2941         (method url-fetch)
2942         (uri (string-append
2943                "mirror://xorg/individual/driver/xf86-video-neomagic-"
2944                version
2945                ".tar.bz2"))
2946         (sha256
2947           (base32
2948             "1whb2kgyqaxdjim27ya404acz50izgmafwnb6y9m89q5n6b97y3j"))))
2949     (build-system gnu-build-system)
2950     (inputs `(("xf86dgaproto" ,xf86dgaproto)
2951               ("xorg-server" ,xorg-server)))
2952     (native-inputs `(("pkg-config" ,pkg-config)))
2953     (home-page "https://www.x.org/wiki/")
2954     (synopsis "NeoMagic video driver for X server")
2955     (description
2956      "xf86-video-neomagic is a NeoMagic video driver for the Xorg X server.")
2957     (license license:x11)))
2958
2959
2960 ;; This driver depends on XAA which has been removed from xorg-server.
2961
2962 ;; (define-public xf86-video-newport
2963 ;;   (package
2964 ;;     (name "xf86-video-newport")
2965 ;;     (version "0.2.4")
2966 ;;     (source
2967 ;;       (origin
2968 ;;         (method url-fetch)
2969 ;;         (uri (string-append
2970 ;;                "mirror://xorg/individual/driver/xf86-video-newport-"
2971 ;;                version
2972 ;;                ".tar.bz2"))
2973 ;;         (sha256
2974 ;;           (base32
2975 ;;             "1yafmp23jrfdmc094i6a4dsizapsc9v0pl65cpc8w1kvn7343k4i"))))
2976 ;;     (build-system gnu-build-system)
2977 ;;     (inputs `(("xorg-server" ,xorg-server)))
2978 ;;     (native-inputs `(("pkg-config" ,pkg-config)))
2979 ;;     (home-page "https://www.x.org/wiki/")
2980 ;;     (synopsis "Newport video driver for X server")
2981 ;;     (description
2982 ;;      "xf86-video-newport is an Xorg X server video driver for the SGI
2983 ;; newport cards.")
2984 ;;     (license license:x11)))
2985
2986
2987 (define-public xf86-video-nv
2988   (package
2989     (name "xf86-video-nv")
2990     (version "2.1.21")
2991     (source
2992       (origin
2993         (method url-fetch)
2994         (uri (string-append
2995                "mirror://xorg/individual/driver/xf86-video-nv-"
2996                version
2997                ".tar.bz2"))
2998         (sha256
2999           (base32
3000            "0bdk3pc5y0n7p53q4gc2ff7bw16hy5hwdjjxkm5j3s7hdyg6960z"))))
3001     (build-system gnu-build-system)
3002     (inputs `(("xorg-server" ,xorg-server)))
3003     (native-inputs `(("pkg-config" ,pkg-config)))
3004     (home-page "https://www.x.org/wiki/")
3005     (synopsis "NVIDIA video driver for X server")
3006     (description
3007      "This package contains Xorg support for the NVIDIA GeForce 8 series of
3008 graphics processors.
3009
3010 There are a few caveats of which to be aware: the XVideo extension is not
3011 supported, and the RENDER extension is not accelerated by this driver.")
3012     (license license:x11)))
3013
3014 (define-public xf86-video-nouveau
3015   (package
3016     (name "xf86-video-nouveau")
3017     (version "1.0.13")
3018     (source
3019      (origin
3020        (method url-fetch)
3021        (uri (string-append
3022              "mirror://xorg/individual/driver/xf86-video-nouveau-"
3023              version
3024              ".tar.bz2"))
3025        (sha256
3026         (base32
3027          "1js7vak68g2800f1cy5r41wl5x2j7dbmbd7zxypzfgcw2fx454kd"))))
3028     (build-system gnu-build-system)
3029     (inputs `(("xorg-server" ,xorg-server)))
3030     (native-inputs `(("pkg-config" ,pkg-config)))
3031     (home-page "http://nouveau.freedesktop.org")
3032     (synopsis "NVIDIA video driver for X server")
3033     (description
3034      "This package provides modern, high-quality Xorg drivers for NVIDIA
3035 graphics cards.")
3036     (license license:x11)))
3037
3038 (define-public xf86-video-openchrome
3039   (package
3040     (name "xf86-video-openchrome")
3041     (version "0.5.0")
3042     (source
3043       (origin
3044         (method url-fetch)
3045         (uri (string-append
3046                "mirror://xorg/individual/driver/xf86-video-openchrome-"
3047                version
3048                ".tar.bz2"))
3049         (sha256
3050          (base32
3051           "1fsmr455lk89zl795d6b5ypyqjim40j3h2vjch52lcssjw9xdza9"))))
3052     (build-system gnu-build-system)
3053     (inputs `(("libx11" ,libx11)
3054               ("libxext" ,libxext)
3055               ("libxvmc" ,libxvmc)
3056               ("mesa" ,mesa)
3057               ("xf86driproto" ,xf86driproto)
3058               ("xorg-server" ,xorg-server)))
3059     (native-inputs
3060      `(("pkg-config" ,pkg-config)))
3061     (home-page "https://www.x.org/wiki/")
3062     (synopsis "Openchrome video driver for X server")
3063     (description
3064      "xf86-video-openchrome is a video driver for the Xorg X server.
3065 This driver is intended for VIA chipsets featuring the VIA UniChrome,
3066 UniChrome Pro and Chrome9 integrated graphics processors.")
3067     (license license:x11)))
3068
3069
3070 (define-public xf86-video-qxl
3071   (package
3072     (name "xf86-video-qxl")
3073     (version "0.1.5")
3074     (source (origin
3075               (method url-fetch)
3076               (uri (string-append
3077                 "mirror://xorg/individual/driver/"
3078                 "xf86-video-qxl-" version ".tar.bz2"))
3079               (sha256
3080                (base32
3081                 "14jc24znnahhmz4kqalafmllsg8awlz0y6gpgdpk5ih38ph851mi"))))
3082     (build-system gnu-build-system)
3083     (inputs
3084       `(("fontsproto" ,fontsproto)
3085         ("libxfont" ,libxfont)
3086         ("spice-protocol" ,spice-protocol)
3087         ("xf86dgaproto" ,xf86dgaproto)
3088         ("xorg-server" ,xorg-server)
3089         ("xproto" ,xproto)))
3090     (native-inputs
3091       `(("pkg-config" ,pkg-config)))
3092     (synopsis "Qxl video driver for X server")
3093     (description "xf86-video-qxl is a video driver for the Xorg X server.
3094 This driver is intended for the spice qxl virtio device.")
3095     (home-page "http://www.spice-space.org")
3096     (license license:x11)))
3097
3098
3099 (define-public xf86-video-r128
3100   (package
3101     (name "xf86-video-r128")
3102     (version "6.10.2")
3103     (source
3104       (origin
3105         (method url-fetch)
3106         (uri (string-append
3107                "mirror://xorg/individual/driver/xf86-video-r128-"
3108                version
3109                ".tar.bz2"))
3110         (sha256
3111           (base32
3112            "1pkpka5m4cd6iy0f8iqnmg6xci14nb6887ilvxzn3xrsgx8j3nl4"))))
3113     (build-system gnu-build-system)
3114     (inputs `(("mesa" ,mesa)
3115               ("xf86driproto" ,xf86driproto)
3116               ("xorg-server" ,xorg-server)))
3117     (native-inputs `(("pkg-config" ,pkg-config)))
3118     (home-page "https://www.x.org/wiki/")
3119     (synopsis "ATI Rage 128 video driver for X server")
3120     (description
3121      "xf86-video-r128 is a video driver for the Xorg X server.
3122 This driver is intended for ATI Rage 128 based cards.")
3123     (license license:x11)))
3124
3125
3126 (define-public xf86-video-savage
3127   (package
3128     (name "xf86-video-savage")
3129     (version "2.3.9")
3130     (source
3131       (origin
3132         (method url-fetch)
3133         (uri (string-append
3134                "mirror://xorg/individual/driver/xf86-video-savage-"
3135                version
3136                ".tar.bz2"))
3137         (sha256
3138           (base32
3139            "11pcrsdpdrwk0mrgv83s5nsx8a9i4lhmivnal3fjbrvi3zdw94rc"))))
3140     (build-system gnu-build-system)
3141     (inputs `(("mesa" ,mesa)
3142               ("xf86driproto" ,xf86driproto)
3143               ("xorg-server" ,xorg-server)))
3144     (native-inputs `(("pkg-config" ,pkg-config)))
3145     (home-page "https://www.x.org/wiki/")
3146     (synopsis "Savage video driver for X server")
3147     (description
3148      "xf86-video-savage is an S3 Savage video driver for the Xorg X server.")
3149     (license license:x11)))
3150
3151
3152 (define-public xf86-video-siliconmotion
3153   (package
3154     (name "xf86-video-siliconmotion")
3155     (version "1.7.9")
3156     (source
3157       (origin
3158         (method url-fetch)
3159         (uri (string-append
3160                "mirror://xorg/individual/driver/xf86-video-siliconmotion-"
3161                version
3162                ".tar.bz2"))
3163         (sha256
3164           (base32
3165            "1g2r6gxqrmjdff95d42msxdw6vmkg2zn5sqv0rxd420iwy8wdwyh"))))
3166     (build-system gnu-build-system)
3167     (inputs `(("xorg-server" ,xorg-server)))
3168     (native-inputs `(("pkg-config" ,pkg-config)))
3169     (home-page "https://www.x.org/wiki/")
3170     (synopsis "Silicon Motion video driver for X server")
3171     (description
3172      "xf86-video-siliconmotion is a Silicon Motion video driver for the
3173 Xorg X server.")
3174     (license license:x11)))
3175
3176
3177 (define-public xf86-video-sis
3178   (package
3179     (name "xf86-video-sis")
3180     (version "0.10.9")
3181     (source
3182       (origin
3183         (method url-fetch)
3184         (uri (string-append
3185                "mirror://xorg/individual/driver/xf86-video-sis-"
3186                version
3187                ".tar.bz2"))
3188         (sha256
3189           (base32
3190            "03f1abjjf68y8y1iz768rn95va9d33wmbwfbsqrgl6k0gi0bf9jj"))))
3191     (build-system gnu-build-system)
3192     (inputs `(("mesa" ,mesa)
3193               ("xf86dgaproto" ,xf86dgaproto)
3194               ("xf86driproto" ,xf86driproto)
3195               ("xorg-server" ,xorg-server)))
3196     (native-inputs
3197       `(("pkg-config" ,pkg-config)))
3198     (home-page "https://www.x.org/wiki/")
3199     (synopsis "Sis video driver for X server")
3200     (description
3201      "xf86-video-SiS is a SiS video driver for the Xorg X server.
3202 This driver supports SiS chipsets of 300/315/330/340 series.")
3203     (license license:bsd-3)))
3204
3205
3206 (define-public xf86-video-suncg6
3207   (package
3208     (name "xf86-video-suncg6")
3209     (version "1.1.2")
3210     (source
3211       (origin
3212         (method url-fetch)
3213         (uri (string-append
3214                "mirror://xorg/individual/driver/xf86-video-suncg6-"
3215                version
3216                ".tar.bz2"))
3217         (sha256
3218           (base32
3219             "04fgwgk02m4nimlv67rrg1wnyahgymrn6rb2cjj1l8bmzkii4glr"))))
3220     (build-system gnu-build-system)
3221     (inputs `(("xorg-server" ,xorg-server)))
3222     (native-inputs `(("pkg-config" ,pkg-config)))
3223     (home-page "https://www.x.org/wiki/")
3224     (synopsis "GX/TurboGX video driver for X server")
3225     (description
3226      "xf86-video-suncg6 is a GX/TurboGX video driver for the Xorg X server.")
3227     (license license:x11)))
3228
3229
3230 (define-public xf86-video-sunffb
3231   (package
3232     (name "xf86-video-sunffb")
3233     (version "1.2.2")
3234     (source
3235       (origin
3236         (method url-fetch)
3237         (uri (string-append
3238                "mirror://xorg/individual/driver/xf86-video-sunffb-"
3239                version
3240                ".tar.bz2"))
3241         (sha256
3242           (base32
3243             "07z3ngifwg2d4jgq8pms47n5lr2yn0ai72g86xxjnb3k20n5ym7s"))))
3244     (build-system gnu-build-system)
3245     (inputs `(("xorg-server" ,xorg-server)))
3246     (native-inputs `(("pkg-config" ,pkg-config)))
3247     (home-page "https://www.x.org/wiki/")
3248     (synopsis "SUNFFB video driver for X server")
3249     (description
3250      "xf86-video-sunffb is a SUNFFB video driver for the Xorg X server.")
3251     (license license:x11)))
3252
3253
3254 (define-public xf86-video-tdfx
3255   (package
3256     (name "xf86-video-tdfx")
3257     (version "1.4.7")
3258     (source
3259       (origin
3260         (method url-fetch)
3261         (uri (string-append
3262                "mirror://xorg/individual/driver/xf86-video-tdfx-"
3263                version
3264                ".tar.bz2"))
3265         (sha256
3266           (base32
3267            "0hia45z4jc472fxp00803nznizcn4h1ybp63jcsb4lmd9vhqxx2c"))))
3268     (build-system gnu-build-system)
3269     (inputs `(("mesa" ,mesa)
3270               ("xf86driproto" ,xf86driproto)
3271               ("xorg-server" ,xorg-server)))
3272     (native-inputs `(("pkg-config" ,pkg-config)))
3273     (home-page "https://www.x.org/wiki/")
3274     (synopsis "3Dfx video driver for X server")
3275     (description
3276      "xf86-video-tdfx is a 3Dfx video driver for the Xorg X server.")
3277     (license license:x11)))
3278
3279
3280 (define-public xf86-video-tga
3281   (package
3282     (name "xf86-video-tga")
3283     (version "1.2.2")
3284     (source
3285       (origin
3286         (method url-fetch)
3287         (uri (string-append
3288                "mirror://xorg/individual/driver/xf86-video-tga-"
3289                version
3290                ".tar.bz2"))
3291         (sha256
3292           (base32
3293            "0cb161lvdgi6qnf1sfz722qn38q7kgakcvj7b45ba3i0020828r0"))
3294         (patches (search-patches "xf86-video-tga-remove-mibstore.patch"))))
3295     (build-system gnu-build-system)
3296     (inputs `(("xf86dgaproto" ,xf86dgaproto)
3297               ("xorg-server" ,xorg-server)))
3298     (native-inputs `(("pkg-config" ,pkg-config)))
3299     (home-page "https://www.x.org/wiki/")
3300     (synopsis "TGA video driver for X server")
3301     (description
3302      "xf86-video-tga is a TGA (DEC 21030) video driver for the Xorg
3303 X server.")
3304     (license license:x11)))
3305
3306
3307 (define-public xf86-video-trident
3308   (package
3309     (name "xf86-video-trident")
3310     (version "1.3.8")
3311     (source
3312       (origin
3313         (method url-fetch)
3314         (uri (string-append
3315                "mirror://xorg/individual/driver/xf86-video-trident-"
3316                version
3317                ".tar.bz2"))
3318         (sha256
3319           (base32
3320            "0gxcar434kx813fxdpb93126lhmkl3ikabaljhcj5qn3fkcijlcy"))))
3321     (build-system gnu-build-system)
3322     (inputs `(("xf86dgaproto" ,xf86dgaproto)
3323               ("xorg-server" ,xorg-server)))
3324     (native-inputs `(("pkg-config" ,pkg-config)))
3325     (home-page "https://www.x.org/wiki/")
3326     (synopsis "Trident video driver for X server")
3327     (description
3328      "xf86-video-trident is a Trident video driver for the Xorg X server.")
3329     (license license:x11)))
3330
3331
3332 ;; no license
3333 ;; (define-public xf86-video-v4l
3334
3335
3336 (define-public xf86-video-vesa
3337   (package
3338     (name "xf86-video-vesa")
3339     (version "2.3.4")
3340     (source
3341       (origin
3342         (method url-fetch)
3343         (uri (string-append
3344                "mirror://xorg/individual/driver/xf86-video-vesa-"
3345                version
3346                ".tar.bz2"))
3347         (sha256
3348           (base32
3349             "1haiw8r1z8ihk68d0jqph2wsld13w4qkl86biq46fvyxg7cg9pbv"))))
3350     (build-system gnu-build-system)
3351     (inputs `(("xorg-server" ,xorg-server)))
3352     (native-inputs `(("pkg-config" ,pkg-config)))
3353     (home-page "https://www.x.org/wiki/")
3354     (synopsis "VESA video driver for X server")
3355     (description
3356      "xf86-video-vesa is a generic VESA video driver for the Xorg
3357 X server.")
3358     (license license:x11)))
3359
3360
3361 (define-public xf86-video-vmware
3362   (package
3363     (name "xf86-video-vmware")
3364     (version "13.2.1")
3365     (source
3366       (origin
3367         (method url-fetch)
3368         (uri (string-append
3369                "mirror://xorg/individual/driver/xf86-video-vmware-"
3370                version
3371                ".tar.bz2"))
3372         (sha256
3373           (base32
3374            "0azn3g0vcki47n5jddagk2rmbwdvp845k8p7d2r56zxs3w8ggxz2"))))
3375     (build-system gnu-build-system)
3376     (inputs
3377      `(("libx11" ,libx11)
3378        ("libxext" ,libxext)
3379        ("mesa" ,mesa)                   ; for xatracker
3380        ("xorg-server" ,xorg-server)))
3381     (native-inputs
3382      `(("eudev" ,eudev)
3383        ("pkg-config" ,pkg-config)))
3384     (home-page "https://www.x.org/wiki/")
3385     (synopsis "VMware SVGA video driver for X server")
3386     (description
3387      "xf86-video-vmware is a VMware SVGA video driver for the Xorg X server.")
3388     (license license:x11)))
3389
3390
3391 (define-public xf86-video-voodoo
3392   (package
3393     (name "xf86-video-voodoo")
3394     (version "1.2.5")
3395     (source
3396       (origin
3397         (method url-fetch)
3398         (uri (string-append
3399                "mirror://xorg/individual/driver/xf86-video-voodoo-"
3400                version
3401                ".tar.bz2"))
3402         (sha256
3403           (base32
3404            "1s6p7yxmi12q4y05va53rljwyzd6ry492r1pgi7wwq6cznivhgly"))
3405         (patches
3406          (list (origin
3407                  (method url-fetch)
3408                  (uri "https://cgit.freedesktop.org/xorg/driver/\
3409 xf86-video-voodoo/patch/?id=9172ae566a0e85313fc80ab62b4455393eefe593")
3410                  (sha256
3411                   (base32
3412                    "0rndmxf5b8j3hjnhrwrnzsq5024fli134fj1mprhkcrvax2zq8db"))
3413                  (file-name "xf86-video-voodoo-pcitag.patch"))))))
3414     (build-system gnu-build-system)
3415     (inputs `(("xf86dgaproto" ,xf86dgaproto)
3416               ("xorg-server" ,xorg-server)))
3417     (native-inputs `(("pkg-config" ,pkg-config)))
3418     (home-page "https://www.x.org/wiki/")
3419     (synopsis "Voodoo/Voodoo2 video driver for X server")
3420     (description
3421      "xf86-video-voodoo is a Voodoo video driver for the Xorg X server.")
3422     (license license:x11)))
3423
3424
3425 ;; Only relevant for the frame buffer on BSD systems.
3426 ;; (define-public xf86-video-wsfb
3427
3428
3429 (define-public xf86bigfontproto
3430   (package
3431     (name "xf86bigfontproto")
3432     (version "1.2.0")
3433     (source
3434       (origin
3435         (method url-fetch)
3436         (uri (string-append
3437                "mirror://xorg/individual/proto/xf86bigfontproto-"
3438                version
3439                ".tar.bz2"))
3440         (sha256
3441           (base32
3442             "0j0n7sj5xfjpmmgx6n5x556rw21hdd18fwmavp95wps7qki214ms"))))
3443     (build-system gnu-build-system)
3444     (home-page "https://www.x.org/wiki/")
3445     (synopsis "Xorg XF86BigFontProto protocol headers")
3446     (description
3447      "XFree86 Bigfont Extension contains header files and documentation
3448 for the XF86BigFontProto protocol.")
3449     (license license:x11)))
3450
3451
3452 (define-public xf86dgaproto
3453   (package
3454     (name "xf86dgaproto")
3455     (version "2.1")
3456     (source
3457       (origin
3458         (method url-fetch)
3459         (uri (string-append
3460                "mirror://xorg/individual/proto/xf86dgaproto-"
3461                version
3462                ".tar.bz2"))
3463         (sha256
3464           (base32
3465             "0l4hx48207mx0hp09026r6gy9nl3asbq0c75hri19wp1118zcpmc"))))
3466     (build-system gnu-build-system)
3467     (home-page "https://www.x.org/wiki/")
3468     (synopsis "Xorg XF86DGAProto protocol headers")
3469     (description
3470      "XFree86 Direct Graphic Access Extension defines a protocol for
3471 direct linear framebuffer access.")
3472     (license license:x11)))
3473
3474
3475 (define-public xf86driproto
3476   (package
3477     (name "xf86driproto")
3478     (version "2.1.1")
3479     (source
3480       (origin
3481         (method url-fetch)
3482         (uri (string-append
3483                "mirror://xorg/individual/proto/xf86driproto-"
3484                version
3485                ".tar.bz2"))
3486         (sha256
3487           (base32
3488             "07v69m0g2dfzb653jni4x656jlr7l84c1k39j8qc8vfb45r8sjww"))))
3489     (build-system gnu-build-system)
3490     (home-page "https://www.x.org/wiki/")
3491     (synopsis "Xorg XF86DRIProto protocol headers")
3492     (description
3493      "XFree86 Direct Rendering Infrastructure Extension defines a
3494 protocol to allow user applications to access the video hardware without
3495 requiring data to be passed through the X server.")
3496     (license license:x11)))
3497
3498
3499 (define-public xf86vidmodeproto
3500   (package
3501     (name "xf86vidmodeproto")
3502     (version "2.3.1")
3503     (source
3504       (origin
3505         (method url-fetch)
3506         (uri (string-append
3507                "mirror://xorg/individual/proto/xf86vidmodeproto-"
3508                version
3509                ".tar.bz2"))
3510         (sha256
3511           (base32
3512             "0w47d7gfa8zizh2bshdr2rffvbr4jqjv019mdgyh6cmplyd4kna5"))))
3513     (build-system gnu-build-system)
3514     (home-page "https://www.x.org/wiki/")
3515     (synopsis "Xorg XF86VidModeProto protocol headers")
3516     (description
3517      "XFree86 Video Mode Extension defines a protocol for dynamically
3518 configuring modelines and gamma.")
3519     (license license:x11)))
3520
3521
3522 (define-public xgamma
3523   (package
3524     (name "xgamma")
3525     (version "1.0.6")
3526     (source
3527       (origin
3528         (method url-fetch)
3529         (uri (string-append
3530                "mirror://xorg/individual/app/xgamma-"
3531                version
3532                ".tar.bz2"))
3533         (sha256
3534           (base32
3535             "1lr2nb1fhg5fk2fchqxdxyl739602ggwhmgl2wiv5c8qbidw7w8f"))))
3536     (build-system gnu-build-system)
3537     (inputs
3538       `(("libxxf86vm" ,libxxf86vm)
3539         ("libx11" ,libx11)))
3540     (native-inputs
3541       `(("pkg-config" ,pkg-config)))
3542     (home-page "https://www.x.org/wiki/")
3543     (synopsis "Alter a monitor's gamma correction")
3544     (description
3545      "XGamma is used to query and alter the gamma correction of a
3546 monitor via the X video mode extension.")
3547     (license license:x11)))
3548
3549
3550 (define-public xhost
3551   (package
3552     (name "xhost")
3553     (version "1.0.7")
3554     (source
3555       (origin
3556         (method url-fetch)
3557         (uri (string-append
3558                "mirror://xorg/individual/app/xhost-"
3559                version
3560                ".tar.bz2"))
3561         (sha256
3562           (base32
3563             "16n26xw6l01zq31d4qvsaz50misvizhn7iihzdn5f7s72pp1krlk"))))
3564     (build-system gnu-build-system)
3565     (inputs
3566       `(("libxmu" ,libxmu)
3567         ("libxau" ,libxau)
3568         ("libx11" ,libx11)))
3569     (native-inputs
3570       `(("pkg-config" ,pkg-config)))
3571     (home-page "https://www.x.org/wiki/")
3572     (synopsis "Xorg server access control utility")
3573     (description
3574      "XHost is used to manage the list of host names or user names
3575 allowed to make connections to the X server.")
3576     (license license:x11)))
3577
3578
3579 (define-public xineramaproto
3580   (package
3581     (name "xineramaproto")
3582     (version "1.2.1")
3583     (source
3584       (origin
3585         (method url-fetch)
3586         (uri (string-append
3587                "mirror://xorg/individual/proto/xineramaproto-"
3588                version
3589                ".tar.bz2"))
3590         (sha256
3591           (base32
3592             "0ns8abd27x7gbp4r44z3wc5k9zqxxj8zjnazqpcyr4n17nxp8xcp"))))
3593     (build-system gnu-build-system)
3594     (native-inputs `(("pkg-config" ,pkg-config)))
3595     (home-page "https://www.x.org/wiki/")
3596     (synopsis "Xorg XineramaProto protocol headers")
3597     (description
3598      "Xinerama Extension allows clients to query information about multiple
3599 physical screens controlled by a single X server that appear as a single
3600 screen to core X11 protocol operations.
3601
3602 This extension provides a common network protocol for querying information
3603 which may be provided by different underlying screen combination
3604 technologies in the X server, such as the original Xinerama multiplexer, or
3605 alternative implementations like XRandR or TwinView.")
3606     (license license:x11)))
3607
3608
3609 (define-public xinput
3610   (package
3611     (name "xinput")
3612     (version "1.6.2")
3613     (source
3614       (origin
3615         (method url-fetch)
3616         (uri (string-append
3617                "mirror://xorg/individual/app/xinput-"
3618                version
3619                ".tar.bz2"))
3620         (sha256
3621           (base32
3622             "1i75mviz9dyqyf7qigzmxq8vn31i86aybm662fzjz5c086dx551n"))))
3623     (build-system gnu-build-system)
3624     (inputs
3625       `(("libxrender" ,libxrender)
3626         ("libxrandr" ,libxrandr)
3627         ("libxinerama" ,libxinerama)
3628         ("libxext" ,libxext)
3629         ("libxi" ,libxi)
3630         ("libx11" ,libx11)
3631         ("inputproto" ,inputproto)))
3632     (native-inputs
3633        `(("pkg-config" ,pkg-config)))
3634     (home-page "https://www.x.org/wiki/")
3635     (synopsis "Configure input devices for X server")
3636     (description
3637      "XInput is used to configure and test XInput devices.")
3638     (license license:x11)))
3639
3640
3641 (define xkbcomp-intermediate ; used as input for xkeyboard-config
3642   (package
3643     (name "xkbcomp-intermediate")
3644     (version "1.3.1")
3645     (source
3646       (origin
3647         (method url-fetch)
3648         (uri (string-append
3649                "mirror://xorg/individual/app/xkbcomp-"
3650                version
3651                ".tar.bz2"))
3652         (sha256
3653          (base32
3654           "0gcjy70ppmcl610z8gxc7sydsx93f8cm8pggm4qhihaa1ngdq103"))))
3655     (build-system gnu-build-system)
3656     (inputs
3657       `(("xproto" ,xproto)
3658         ("libxkbfile" ,libxkbfile)
3659         ("libx11" ,libx11)))
3660     (native-inputs
3661         `(("pkg-config" ,pkg-config)))
3662     (home-page "https://www.x.org/wiki/")
3663     (synopsis "Compile XKB keyboard description")
3664     (description
3665      "xkbcomp keymap compiler converts a description of an XKB keymap
3666 into one of several output formats.  The most common use for xkbcomp is
3667 to create a compiled keymap file (.xkm extension) which can be read
3668 directly by XKB- capable X servers or utilities.
3669
3670 X Keyboard (XKB) Extension essentially replaces the core protocol
3671 definition of keyboard.  The extension makes possible to clearly and
3672 explicitly specify most aspects of keyboard behaviour on per-key basis
3673 and to more closely track the logical and physical state of the
3674 keyboard.  It also includes a number of keyboard controls designed to
3675 make keyboards more accessible to people with physical impairments.")
3676     (license license:x11)))
3677
3678 (define-public xkbcomp ; using xkeyboard-config as input
3679   (package (inherit xkbcomp-intermediate)
3680     (name "xkbcomp")
3681     (inputs
3682       `(,@(package-inputs xkbcomp-intermediate)
3683         ("xkeyboard-config" ,xkeyboard-config)))
3684     (arguments
3685      `(#:configure-flags
3686        (list (string-append "--with-xkb-config-root="
3687                             (assoc-ref %build-inputs "xkeyboard-config")
3688                             "/share/X11/xkb"))))))
3689
3690
3691 (define-public xkbevd
3692   (package
3693     (name "xkbevd")
3694     (version "1.1.4")
3695     (source
3696       (origin
3697         (method url-fetch)
3698         (uri (string-append
3699                "mirror://xorg/individual/app/xkbevd-"
3700                version
3701                ".tar.bz2"))
3702         (sha256
3703           (base32
3704             "0sprjx8i86ljk0l7ldzbz2xlk8916z5zh78cafjv8k1a63js4c14"))))
3705     (build-system gnu-build-system)
3706     (inputs
3707       `(("libxkbfile" ,libxkbfile)
3708         ("libx11" ,libx11)))
3709     (native-inputs
3710       `(("pkg-config" ,pkg-config)))
3711     (home-page "https://www.x.org/wiki/")
3712     (synopsis "XKB event daemon demo")
3713     (description
3714      "XKB event daemon listens for the specified XKB events and executes
3715 requested commands if they occur.")
3716     (license license:x11)))
3717
3718
3719 (define-public xkbutils
3720   (package
3721     (name "xkbutils")
3722     (version "1.0.4")
3723     (source
3724       (origin
3725         (method url-fetch)
3726         (uri (string-append
3727                "mirror://xorg/individual/app/xkbutils-"
3728                version
3729                ".tar.bz2"))
3730         (sha256
3731           (base32
3732             "0c412isxl65wplhl7nsk12vxlri29lk48g3p52hbrs3m0awqm8fj"))))
3733     (build-system gnu-build-system)
3734     (inputs
3735       `(("libxt" ,libxt)
3736         ("xproto" ,xproto)
3737         ("libxaw" ,libxaw)
3738         ("inputproto" ,inputproto)))
3739     (native-inputs
3740       `(("pkg-config" ,pkg-config)))
3741     (home-page "https://www.x.org/wiki/")
3742     (synopsis "XKB utilities")
3743     (description
3744      "XKBUtils is a collection of small utilities for X Keyboard (XKB)
3745 extension to the X11 protocol.  It includes:
3746
3747 - xkbbell: generate XKB bell events;
3748
3749 - xkbvleds: display the state of LEDs on an XKB keyboard in a window;
3750
3751 - xkbwatch: reports changes in the XKB keyboard state.")
3752     (license license:x11)))
3753
3754
3755 (define-public xkeyboard-config
3756   (package
3757     (name "xkeyboard-config")
3758     (version "2.18")
3759     (source
3760       (origin
3761         (method url-fetch)
3762         (uri (string-append
3763               "mirror://xorg/individual/data/xkeyboard-config/xkeyboard-config-"
3764               version
3765               ".tar.bz2"))
3766         (sha256
3767           (base32
3768             "1l6x2w357ja8vm94ns79s7yj9a5dlr01r9dxrjvzwncadiyr27f4"))))
3769     (build-system gnu-build-system)
3770     (inputs
3771       `(("gettext" ,gettext-minimal)
3772         ("libx11" ,libx11)
3773         ("xkbcomp-intermediate" ,xkbcomp-intermediate)))
3774     (native-inputs
3775       `(("intltool" ,intltool)
3776         ("pkg-config" ,pkg-config)))
3777     (home-page "https://www.x.org/wiki/")
3778     (synopsis "Xorg XKB configuration files")
3779     (description
3780      "xkeyboard-config provides a database for X Keyboard (XKB) Extension.
3781 There are five components that define a complete keyboard mapping:
3782 symbols, geometry, keycodes, compat, and types; these five components
3783 can be combined together using the 'rules' component of this database.")
3784     (license license:x11)))
3785
3786
3787 (define-public xkill
3788   (package
3789     (name "xkill")
3790     (version "1.0.4")
3791     (source
3792       (origin
3793         (method url-fetch)
3794         (uri (string-append
3795                "mirror://xorg/individual/app/xkill-"
3796                version
3797                ".tar.bz2"))
3798         (sha256
3799           (base32
3800             "0bl1ky8ps9jg842j4mnmf4zbx8nkvk0h77w7bqjlpwij9wq2mvw8"))))
3801     (build-system gnu-build-system)
3802     (inputs
3803       `(("libxmu" ,libxmu)
3804         ("libx11" ,libx11)))
3805     (native-inputs
3806        `(("pkg-config" ,pkg-config)))
3807     (home-page "https://www.x.org/wiki/")
3808     (synopsis "Kill a client by its X resource")
3809     (description
3810      "XKill is used to force the X server to close connections to
3811 clients.  This program is very dangerous, but is useful for aborting
3812 programs that have displayed undesired windows on a user's screen.")
3813     (license license:x11)))
3814
3815
3816 (define-public xlsatoms
3817   (package
3818     (name "xlsatoms")
3819     (version "1.1.2")
3820     (source
3821       (origin
3822         (method url-fetch)
3823         (uri (string-append
3824                "mirror://xorg/individual/app/xlsatoms-"
3825                version
3826                ".tar.bz2"))
3827         (sha256
3828           (base32
3829             "196yjik910xsr7dwy8daa0amr0r22ynfs360z0ndp9mx7mydrra7"))))
3830     (build-system gnu-build-system)
3831     (inputs
3832       `(("libxcb" ,libxcb)))
3833     (native-inputs
3834       `(("pkg-config" ,pkg-config)))
3835     (home-page "https://www.x.org/wiki/")
3836     (synopsis "List interned X server atoms")
3837     (description
3838      "XLsAtoms is used to list the interned atoms defined on X server.")
3839     (license license:x11)))
3840
3841
3842 (define-public xlsclients
3843   (package
3844     (name "xlsclients")
3845     (version "1.1.3")
3846     (source
3847       (origin
3848         (method url-fetch)
3849         (uri (string-append
3850                "mirror://xorg/individual/app/xlsclients-"
3851                version
3852                ".tar.bz2"))
3853         (sha256
3854           (base32
3855             "0g9x7rrggs741x9xwvv1k9qayma980d88nhdqw7j3pn3qvy6d5jx"))))
3856     (build-system gnu-build-system)
3857     (inputs
3858       `(("libxcb" ,libxcb)))
3859     (native-inputs
3860       `(("pkg-config" ,pkg-config)))
3861     (home-page "https://www.x.org/wiki/")
3862     (synopsis "List client applications running on a display")
3863     (description
3864      "XLsClients is used to list information about the client programs
3865 running on X server.")
3866     (license license:x11)))
3867
3868
3869 (define-public xlsfonts
3870   (package
3871     (name "xlsfonts")
3872     (version "1.0.5")
3873     (source
3874      (origin
3875        (method url-fetch)
3876        (uri (string-append
3877              "mirror://xorg/individual/app/xlsfonts-"
3878              version
3879              ".tar.bz2"))
3880        (sha256
3881         (base32
3882          "1yi774g6r1kafsbnxbkrwyndd3i60362ck1fps9ywz076pn5naa0"))))
3883     (build-system gnu-build-system)
3884     (inputs
3885      `(("xproto" ,xproto)
3886        ("libx11" ,libx11)))
3887     (native-inputs
3888      `(("pkg-config" ,pkg-config)))
3889     (home-page "https://www.x.org/wiki/")
3890     (synopsis "List fonts available from an X server")
3891     (description
3892      "xlsfonts lists fonts available from an X server via the X11 core
3893 protocol.")
3894     (license license:x11)))
3895
3896 (define-public xfontsel
3897   (package
3898     (name "xfontsel")
3899     (version "1.0.5")
3900     (source (origin
3901               (method url-fetch)
3902               (uri (string-append
3903                     "mirror://xorg/individual/app/xfontsel-"
3904                     version ".tar.bz2"))
3905               (sha256
3906                (base32
3907                 "1grir464hy52a71r3mpm9mzvkf7nwr3vk0b1vc27pd3gp588a38p"))))
3908     (build-system gnu-build-system)
3909     (arguments
3910      `(#:configure-flags
3911        (list (string-append "--with-appdefaultdir="
3912                             %output ,%app-defaults-dir))))
3913     (inputs
3914      `(("libx11" ,libx11)
3915        ("libxaw" ,libxaw)
3916        ("libxmu" ,libxmu)
3917        ("libxt" ,libxt)))
3918     (native-inputs
3919      `(("pkg-config" ,pkg-config)))
3920     (home-page "https://www.x.org/wiki/")
3921     (synopsis "Browse and select X font names")
3922     (description
3923      "XFontSel provides a simple way to display the X11 core protocol fonts
3924 known to your X server, examine samples of each, and retrieve the X Logical
3925 Font Description (XLFD) full name for a font.")
3926     (license license:x11)))
3927
3928 (define-public xfd
3929   (package
3930     (name "xfd")
3931     (version "1.1.2")
3932     (source (origin
3933               (method url-fetch)
3934               (uri (string-append
3935                     "mirror://xorg/individual/app/xfd-"
3936                     version ".tar.bz2"))
3937               (sha256
3938                (base32
3939                 "0n97iqqap9wyxjan2n520vh4rrf5bc0apsw2k9py94dqzci258y1"))))
3940     (build-system gnu-build-system)
3941     (arguments
3942        `(#:configure-flags
3943          (list (string-append "--with-appdefaultdir="
3944                               %output ,%app-defaults-dir))))
3945     (inputs
3946      `(("fontconfig" ,fontconfig)
3947        ("libx11" ,libx11)
3948        ("libxaw" ,libxaw)
3949        ("libxft" ,libxft)
3950        ("libxmu" ,libxmu)
3951        ("libxrender" ,libxrender)))
3952     (native-inputs
3953      `(("gettext" ,gettext-minimal)
3954        ("pkg-config" ,pkg-config)))
3955     (home-page "https://www.x.org/wiki/")
3956     (synopsis "Display all the characters in an X font")
3957     (description
3958      "XFD (X Font Display) package provides an utility that displays a
3959 window containing the name of the font being displayed, a row of command
3960 buttons, several lines of text for displaying character metrics, and a grid
3961 containing one glyph per cell.")
3962     (license license:x11)))
3963
3964 (define-public xmodmap
3965   (package
3966     (name "xmodmap")
3967     (version "1.0.9")
3968     (source
3969       (origin
3970         (method url-fetch)
3971         (uri (string-append
3972                "mirror://xorg/individual/app/xmodmap-"
3973                version
3974                ".tar.bz2"))
3975         (sha256
3976           (base32
3977             "0y649an3jqfq9klkp9y5gj20xb78fw6g193f5mnzpl0hbz6fbc5p"))
3978         (patches (search-patches "xmodmap-asprintf.patch"))))
3979     (build-system gnu-build-system)
3980     (inputs
3981       `(("xproto" ,xproto)
3982         ("libx11" ,libx11)))
3983     (native-inputs
3984       `(("pkg-config" ,pkg-config)))
3985     (home-page "https://www.x.org/wiki/")
3986     (synopsis "Modify keymaps and button mappings on X server")
3987     (description
3988      "Xmodmap is used to display and edit the keyboard modifier map and
3989 keymap table that are used by client programs running on X server to
3990 convert event keycodes into keysyms.  It is usually run from the user's
3991 session startup script to configure the keyboard according to personal
3992 tastes.")
3993     (license license:x11)))
3994
3995
3996 ;; no license
3997 ;; (define-public xorg-docs
3998
3999
4000 (define-public xorg-sgml-doctools
4001   (package
4002     (name "xorg-sgml-doctools")
4003     (version "1.11")
4004     (source
4005       (origin
4006         (method url-fetch)
4007         (uri (string-append
4008                "mirror://xorg/individual/doc/xorg-sgml-doctools-"
4009                version
4010                ".tar.bz2"))
4011         (sha256
4012           (base32
4013             "0k5pffyi5bx8dmfn033cyhgd3gf6viqj3x769fqixifwhbgy2777"))))
4014     (build-system gnu-build-system)
4015     (native-inputs `(("pkg-config" ,pkg-config)))
4016     (home-page "https://www.x.org/wiki/")
4017     (synopsis "Xorg SGML documentation tools")
4018     (description
4019     "This package provides a common set of SGML entities and XML/CSS style
4020 sheets used in building/formatting the documentation provided in other
4021 Xorg packages.  It's typically only needed by people building from
4022 source who want to produce formatted documentation from their builds, or
4023 those who have installed the HTML version of the documentation, which
4024 refers to the included common xorg.css stylesheet.")
4025     (license license:x11)))
4026
4027
4028 (define-public xpr
4029   (package
4030     (name "xpr")
4031     (version "1.0.4")
4032     (source
4033       (origin
4034         (method url-fetch)
4035         (uri (string-append
4036                "mirror://xorg/individual/app/xpr-"
4037                version
4038                ".tar.bz2"))
4039         (sha256
4040           (base32
4041             "1dbcv26w2yand2qy7b3h5rbvw1mdmdd57jw88v53sgdr3vrqvngy"))))
4042     (build-system gnu-build-system)
4043     (inputs
4044       `(("xproto" ,xproto)
4045         ("libxmu" ,libxmu)
4046         ("libx11" ,libx11)))
4047     (native-inputs
4048         `(("pkg-config" ,pkg-config)))
4049     (home-page "https://www.x.org/wiki/")
4050     (synopsis "Print an X window dump from xwd")
4051     (description
4052      "XPr takes as input a window dump file produced by xwd and formats
4053 it for output on various types of printers.")
4054     (license license:x11)))
4055
4056
4057 (define-public xprop
4058   (package
4059     (name "xprop")
4060     (version "1.2.2")
4061     (source
4062       (origin
4063         (method url-fetch)
4064         (uri (string-append
4065                "mirror://xorg/individual/app/xprop-"
4066                version
4067                ".tar.bz2"))
4068         (sha256
4069           (base32
4070             "1ilvhqfjcg6f1hqahjkp8qaay9rhvmv2blvj3w9asraq0aqqivlv"))))
4071     (build-system gnu-build-system)
4072     (inputs
4073       `(("xproto" ,xproto)
4074         ("libx11" ,libx11)))
4075     (native-inputs
4076       `(("pkg-config" ,pkg-config)))
4077     (home-page "https://www.x.org/wiki/")
4078     (synopsis "Display X server properties")
4079     (description
4080      "xprop is used to display and/or set window and font properties of
4081 an X server.")
4082     (license license:x11)))
4083
4084
4085 (define-public xrandr
4086   (package
4087     (name "xrandr")
4088     (version "1.5.0")
4089     (source
4090       (origin
4091         (method url-fetch)
4092         (uri (string-append
4093                "mirror://xorg/individual/app/xrandr-"
4094                version ".tar.bz2"))
4095         (sha256
4096           (base32
4097             "1kaih7rmzxr1vp5a5zzjhm5x7dn9mckya088sqqw026pskhx9ky1"))))
4098     (build-system gnu-build-system)
4099     (inputs
4100       `(("libxrender" ,libxrender)
4101         ("libxrandr" ,libxrandr)
4102         ("xproto" ,xproto)
4103         ("libx11" ,libx11)))
4104     (native-inputs
4105      `(("pkg-config" ,pkg-config)))
4106     (home-page "https://www.x.org/wiki/")
4107     (synopsis "Command line interface to X RandR extension")
4108     (description
4109      "xrandr - primitive command line interface to X11 Resize, Rotate,
4110 and Reflect (RandR) extension.")
4111     (license license:x11)))
4112
4113
4114 (define-public xrdb
4115   (package
4116     (name "xrdb")
4117     (version "1.1.0")
4118     (source
4119       (origin
4120         (method url-fetch)
4121         (uri (string-append
4122                "mirror://xorg/individual/app/xrdb-"
4123                version
4124                ".tar.bz2"))
4125         (sha256
4126           (base32
4127             "0nsnr90wazcdd50nc5dqswy0bmq6qcj14nnrhyi7rln9pxmpp0kk"))))
4128     (build-system gnu-build-system)
4129     (inputs
4130       `(("libxmu" ,libxmu)
4131         ("libx11" ,libx11)))
4132     (native-inputs
4133       `(("pkg-config" ,pkg-config)))
4134     (home-page "https://www.x.org/wiki/")
4135     (synopsis "X server resource database utility")
4136     (description
4137      "XRDB is used to get or set the contents of the RESOURCE_MANAGER
4138 property on the root window of screen 0, or the SCREEN_RESOURCES
4139 property on the root window of any or all screens, or everything
4140 combined.  You would normally run this program from your X startup
4141 file.")
4142     (license license:x11)))
4143
4144
4145 (define-public xrefresh
4146   (package
4147     (name "xrefresh")
4148     (version "1.0.5")
4149     (source
4150       (origin
4151         (method url-fetch)
4152         (uri (string-append
4153                "mirror://xorg/individual/app/xrefresh-"
4154                version
4155                ".tar.bz2"))
4156         (sha256
4157           (base32
4158             "1mlinwgvql6s1rbf46yckbfr9j22d3c3z7jx3n6ix7ca18dnf4rj"))))
4159     (build-system gnu-build-system)
4160     (inputs
4161       `(("libx11" ,libx11)))
4162     (native-inputs
4163       `(("pkg-config" ,pkg-config)))
4164     (home-page "https://www.x.org/wiki/")
4165     (synopsis "Refresh all or part of an X screen")
4166     (description
4167      "Xrefresh is a simple X program that causes all or part of your
4168 screen to be repainted.  This is useful when system messages have messed
4169 up your screen.")
4170     (license license:x11)))
4171
4172
4173 (define-public xset
4174   (package
4175     (name "xset")
4176     (version "1.2.3")
4177     (source
4178       (origin
4179         (method url-fetch)
4180         (uri (string-append
4181                "mirror://xorg/individual/app/xset-"
4182                version
4183                ".tar.bz2"))
4184         (sha256
4185           (base32
4186             "0qw0iic27bz3yz2wynf1gxs70hhkcf9c4jrv7zhlg1mq57xz90j3"))))
4187     (build-system gnu-build-system)
4188     (inputs
4189       `(("xproto" ,xproto)
4190         ("libxmu" ,libxmu)
4191         ("libxext" ,libxext)
4192         ("libx11" ,libx11)))
4193     (native-inputs
4194        `(("pkg-config" ,pkg-config)))
4195     (home-page "https://www.x.org/wiki/")
4196     (synopsis "User preference utility for X server")
4197     (description
4198      "XSet is used to set various user preference options of the display.")
4199     (license license:x11)))
4200
4201
4202 (define-public xsetroot
4203   (package
4204     (name "xsetroot")
4205     (version "1.1.1")
4206     (source
4207       (origin
4208         (method url-fetch)
4209         (uri (string-append
4210                "mirror://xorg/individual/app/xsetroot-"
4211                version
4212                ".tar.bz2"))
4213         (sha256
4214           (base32
4215             "1nf3ii31m1knimbidaaym8p61fq3blv8rrdr2775yhcclym5s8ds"))))
4216     (build-system gnu-build-system)
4217     (inputs
4218       `(("libxmu" ,libxmu)
4219         ("libxcursor" ,libxcursor)
4220         ("xbitmaps" ,xbitmaps)))
4221     (native-inputs
4222       `(("pkg-config" ,pkg-config)))
4223     (home-page "https://www.x.org/wiki/")
4224     (synopsis "Root window parameter setting utility for X server")
4225     (description
4226      "XSetRoot allows you to tailor the appearance of the root window on
4227 a display running X server.")
4228     (license license:x11)))
4229
4230
4231 (define-public xtrans
4232   (package
4233     (name "xtrans")
4234     (version "1.3.5")
4235     (source
4236       (origin
4237         (method url-fetch)
4238         (uri (string-append
4239                "mirror://xorg/individual/lib/xtrans-"
4240                version
4241                ".tar.bz2"))
4242         (sha256
4243           (base32
4244             "00c3ph17acnsch3gbdmx33b9ifjnl5w7vx8hrmic1r1cjcv3pgdd"))))
4245     (build-system gnu-build-system)
4246     (native-inputs `(("pkg-config" ,pkg-config)))
4247     (home-page "https://www.x.org/wiki/")
4248     (synopsis "Xorg Network Transport layer library")
4249     (description
4250      "Xtrans is a library of code that is shared among various X packages to
4251 handle network protocol transport in a modular fashion, allowing a single
4252 place to add new transport types.  It is used by the X server, libX11,
4253 libICE, the X font server, and related components.")
4254     (license license:x11)))
4255
4256
4257 (define-public xvinfo
4258   (package
4259     (name "xvinfo")
4260     (version "1.1.3")
4261     (source
4262       (origin
4263         (method url-fetch)
4264         (uri (string-append
4265                "mirror://xorg/individual/app/xvinfo-"
4266                version
4267                ".tar.bz2"))
4268         (sha256
4269           (base32
4270             "1sz5wqhxd1fqsfi1w5advdlwzkizf2fgl12hdpk66f7mv9l8pflz"))))
4271     (build-system gnu-build-system)
4272     (inputs
4273       `(("libxext" ,libxext)
4274         ("libxv" ,libxv)
4275         ("libx11" ,libx11)))
4276     (native-inputs
4277       `(("pkg-config" ,pkg-config)))
4278     (home-page "https://www.x.org/wiki/")
4279     (synopsis "Print out X-Video extension adaptor information")
4280     (description
4281      "XVInfo is used to print out the capabilities of any video adaptors
4282 associated with the display that are accessible through the X-Video
4283 extension.")
4284     (license license:x11)))
4285
4286
4287 (define-public xwd
4288   (package
4289     (name "xwd")
4290     (version "1.0.6")
4291     (source
4292       (origin
4293         (method url-fetch)
4294         (uri (string-append
4295                "mirror://xorg/individual/app/xwd-"
4296                version
4297                ".tar.bz2"))
4298         (sha256
4299           (base32
4300             "0ybx48agdvjp9lgwvcw79r1x6jbqbyl3fliy3i5xwy4d4si9dcrv"))))
4301     (build-system gnu-build-system)
4302     (inputs
4303       `(("libxt" ,libxt)
4304         ("libxkbfile" ,libxkbfile)
4305         ("xproto" ,xproto)))
4306     (native-inputs
4307        `(("pkg-config" ,pkg-config)))
4308     (home-page "https://www.x.org/wiki/")
4309     (synopsis "Dump current contents of X window or screen to file")
4310     (description
4311      "Xwd is used to store window images in a specially formatted dump
4312 file.  This file can then be read by various other X utilities for
4313 redisplay, printing, editing, formatting, archiving, image processing,
4314 etc.  The target window is selected by clicking the pointer in the
4315 desired window.  The keyboard bell is rung once at the beginning of the
4316 dump and twice whenthe dump is completed.")
4317     (license license:x11)))
4318
4319
4320 (define-public xwininfo
4321   (package
4322     (name "xwininfo")
4323     (version "1.1.3")
4324     (source
4325       (origin
4326         (method url-fetch)
4327         (uri (string-append
4328                "mirror://xorg/individual/app/xwininfo-"
4329                version
4330                ".tar.bz2"))
4331         (sha256
4332           (base32
4333             "1y1zn8ijqslb5lfpbq4bb78kllhch8in98ps7n8fg3dxjpmb13i1"))))
4334     (build-system gnu-build-system)
4335     (inputs
4336       `(("libx11" ,libx11)
4337         ("xproto" ,xproto)))
4338     (native-inputs
4339        `(("pkg-config" ,pkg-config)))
4340     (home-page "https://www.x.org/wiki/")
4341     (synopsis "Window information utility for X server")
4342     (description
4343      "XWinInfo is used to print out information about windows on an X server.
4344 Various information is displayed depending on which options are selected.")
4345     (license license:x11)))
4346
4347
4348 (define-public xwud
4349   (package
4350     (name "xwud")
4351     (version "1.0.4")
4352     (source
4353       (origin
4354         (method url-fetch)
4355         (uri (string-append
4356                "mirror://xorg/individual/app/xwud-"
4357                version
4358                ".tar.bz2"))
4359         (sha256
4360           (base32
4361             "1ggql6maivah58kwsh3z9x1hvzxm1a8888xx4s78cl77ryfa1cyn"))))
4362     (build-system gnu-build-system)
4363     (inputs
4364       `(("xproto" ,xproto)
4365         ("libx11" ,libx11)))
4366     (native-inputs
4367        `(("pkg-config" ,pkg-config)))
4368     (home-page "https://www.x.org/wiki/")
4369     (synopsis "Display an X window dump from xwd")
4370     (description
4371      "Xwud is used to display in a window an image saved in a specially
4372 formatted dump file, such as produced by xwd.")
4373     (license license:x11)))
4374
4375 (define-public xorg-rgb
4376   (package
4377     (name "xorg-rgb")
4378     (version "1.0.6")
4379     (source
4380       (origin
4381         (method url-fetch)
4382         (uri (string-append
4383                "mirror://xorg/individual/app/rgb-"
4384                version
4385                ".tar.bz2"))
4386         (sha256
4387           (base32
4388             "1c76zcjs39ljil6f6jpx1x17c8fnvwazz7zvl3vbjfcrlmm7rjmv"))))
4389     (build-system gnu-build-system)
4390     (inputs
4391      `(("xproto" ,xproto)))
4392     (native-inputs
4393      `(("pkg-config" ,pkg-config)))
4394     (home-page "http://www.x.org/wiki/")
4395     (synopsis "X color name database")
4396     (description
4397      "This package provides the X color name database.")
4398     (license license:x11)))
4399
4400 ;; packages of height 1 in the propagated-inputs tree
4401
4402 (define-public fixesproto
4403   (package
4404     (name "fixesproto")
4405     (version "5.0")
4406     (source
4407       (origin
4408         (method url-fetch)
4409         (uri (string-append
4410                "mirror://xorg/individual/proto/fixesproto-"
4411                version
4412                ".tar.bz2"))
4413         (sha256
4414           (base32
4415             "1ki4wiq2iivx5g4w5ckzbjbap759kfqd72yg18m3zpbb4hqkybxs"))))
4416     (build-system gnu-build-system)
4417     (propagated-inputs
4418       `(("xextproto" ,xextproto)))
4419     (native-inputs
4420       `(("pkg-config" ,pkg-config)))
4421     (home-page "https://www.x.org/wiki/")
4422     (synopsis "Xorg FixesProto protocol headers")
4423     (description
4424      "Fixes Extension makes changes to many areas of the protocol to resolve
4425 issues raised by application interaction with core protocol mechanisms that
4426 cannot be adequately worked around on the client side of the wire.")
4427     (license license:x11)))
4428
4429
4430 (define-public libxdamage
4431   (package
4432     (name "libxdamage")
4433     (version "1.1.4")
4434     (source
4435       (origin
4436         (method url-fetch)
4437         (uri (string-append
4438                "mirror://xorg/individual/lib/libXdamage-"
4439                version
4440                ".tar.bz2"))
4441         (sha256
4442           (base32
4443             "1bamagq7g6s0d23l8rb3nppj8ifqj05f7z9bhbs4fdg8az3ffgvw"))))
4444     (build-system gnu-build-system)
4445     (propagated-inputs
4446       ;; These are all in the Requires or Requires.private field of xdamage.pc
4447       `(("damageproto" ,damageproto)
4448         ("libxfixes" ,libxfixes)
4449         ("xproto" ,xproto)
4450         ("libx11" ,libx11)))
4451     (native-inputs
4452       `(("pkg-config" ,pkg-config)))
4453     (home-page "https://www.x.org/wiki/")
4454     (synopsis "Xorg Damage Extension library")
4455     (description "Xorg library for the XDamage extension.")
4456     (license license:x11)))
4457
4458
4459 (define-public libxext
4460   (package
4461     (name "libxext")
4462     (version "1.3.3")
4463     (source
4464       (origin
4465         (method url-fetch)
4466         (uri (string-append
4467                "mirror://xorg/individual/lib/libXext-"
4468                version
4469                ".tar.bz2"))
4470         (sha256
4471           (base32
4472             "0dbfn5bznnrhqzvkrcmw4c44yvvpwdcsrvzxf4rk27r36b9x865m"))))
4473     (build-system gnu-build-system)
4474     (propagated-inputs
4475       `(("xextproto" ,xextproto)))
4476     (inputs
4477       `(("libxau" ,libxau)
4478         ("libx11" ,libx11)))
4479     (native-inputs
4480       `(("pkg-config" ,pkg-config)))
4481     (home-page "https://www.x.org/wiki/")
4482     (synopsis "Xorg Common extensions library")
4483     (description
4484      "Library for common extensions to the X11 protocol.")
4485     (license license:x11)))
4486
4487
4488 (define-public libxinerama
4489   (package
4490     (name "libxinerama")
4491     (version "1.1.3")
4492     (source
4493       (origin
4494         (method url-fetch)
4495         (uri (string-append
4496                "mirror://xorg/individual/lib/libXinerama-"
4497                version
4498                ".tar.bz2"))
4499         (sha256
4500           (base32
4501             "1qlqfvzw45gdzk9xirgwlp2qgj0hbsyiqj8yh8zml2bk2ygnjibs"))))
4502     (build-system gnu-build-system)
4503     (propagated-inputs
4504       `(("xineramaproto" ,xineramaproto)))
4505     (inputs
4506       `(("libxext" ,libxext)
4507         ("libx11" ,libx11)))
4508     (native-inputs
4509       `(("pkg-config" ,pkg-config)))
4510     (home-page "https://www.x.org/wiki/")
4511     (synopsis "Xorg Xinerama protocol library")
4512     (description "API for Xinerama extension to X11 protocol.")
4513     (license license:x11)))
4514
4515
4516 (define-public libxp
4517   (package
4518     (name "libxp")
4519     (version "1.0.3")
4520     (source
4521       (origin
4522         (method url-fetch)
4523         (uri (string-append
4524                "mirror://xorg/individual/lib/libXp-"
4525                version
4526                ".tar.bz2"))
4527         (sha256
4528           (base32
4529             "0mwc2jwmq03b1m9ihax5c6gw2ln8rc70zz4fsj3kb7440nchqdkz"))))
4530     (build-system gnu-build-system)
4531     (propagated-inputs
4532       `(("printproto" ,printproto)))
4533     (inputs
4534       `(("libx11" ,libx11)
4535         ("libxext" ,libxext)))
4536     (native-inputs
4537       `(("pkg-config" ,pkg-config)))
4538     (home-page "https://www.x.org/wiki/")
4539     (synopsis "Xorg Print Client library")
4540     (description "Xorg Print Client library.")
4541     (license license:x11)))
4542
4543
4544 (define-public libxrender
4545   (package
4546     (name "libxrender")
4547     (version "0.9.10")
4548     (source
4549       (origin
4550         (method url-fetch)
4551         (uri (string-append
4552                "mirror://xorg/individual/lib/libXrender-"
4553                version
4554                ".tar.bz2"))
4555         (sha256
4556           (base32
4557             "0j89cnb06g8x79wmmnwzykgkkfdhin9j7hjpvsxwlr3fz1wmjvf0"))))
4558     (build-system gnu-build-system)
4559     (propagated-inputs
4560       `(("renderproto" ,renderproto)))
4561     (inputs
4562       `(("xproto" ,xproto)
4563         ("libx11" ,libx11)))
4564     (native-inputs
4565       `(("pkg-config" ,pkg-config)))
4566     (home-page "https://www.x.org/wiki/")
4567     (synopsis "Xorg Render Extension library")
4568     (description "Library for the Render Extension to the X11 protocol.")
4569     (license license:x11)))
4570
4571 (define-public libxtst
4572   (package
4573     (name "libxtst")
4574     (version "1.2.3")
4575     (source
4576       (origin
4577         (method url-fetch)
4578         (uri (string-append
4579                "mirror://xorg/individual/lib/libXtst-"
4580                version
4581                ".tar.bz2"))
4582         (sha256
4583           (base32
4584             "012jpyj7xfm653a9jcfqbzxyywdmwb2b5wr1dwylx14f3f54jma6"))))
4585     (build-system gnu-build-system)
4586     (propagated-inputs
4587       `(("recordproto" ,recordproto)
4588         ("libxi" ,libxi)))
4589     (inputs
4590       `(("libx11" ,libx11)
4591         ("inputproto" ,inputproto)))
4592     (native-inputs
4593       `(("pkg-config" ,pkg-config)))
4594     (home-page "https://www.x.org/wiki/")
4595     (synopsis "Xorg library for Xtest and Record extensions")
4596     (description
4597      "libXtst provides the Xlib-based client API for the XTEST & RECORD
4598 extensions.
4599
4600 The XTEST extension is a minimal set of client and server extensions
4601 required to completely test the X11 server with no user intervention.  This
4602 extension is not intended to support general journaling and playback of user
4603 actions.
4604
4605 The RECORD extension supports the recording and reporting of all core X
4606 protocol and arbitrary X extension protocol.")
4607     (license license:x11)))
4608
4609 (define-public libxv
4610   (package
4611     (name "libxv")
4612     (version "1.0.11")
4613     (source
4614       (origin
4615         (method url-fetch)
4616         (uri (string-append
4617                "mirror://xorg/individual/lib/libXv-"
4618                version
4619                ".tar.bz2"))
4620         (sha256
4621           (base32
4622             "125hn06bd3d8y97hm2pbf5j55gg4r2hpd3ifad651i4sr7m16v6j"))))
4623     (build-system gnu-build-system)
4624     (propagated-inputs
4625      `(("videoproto" ,videoproto)))
4626     (inputs
4627       `(("xproto" ,xproto)
4628         ("libxext" ,libxext)
4629         ("libx11" ,libx11)))
4630     (native-inputs
4631       `(("pkg-config" ,pkg-config)))
4632     (home-page "https://www.x.org/wiki/")
4633     (synopsis "Xorg XVideo Extension library")
4634     (description "Library for the X Video Extension to the X11 protocol.")
4635     (license license:x11)))
4636
4637 (define-public mkfontdir
4638   (package
4639     (name "mkfontdir")
4640     (version "1.0.7")
4641     (source
4642       (origin
4643         (method url-fetch)
4644         (uri (string-append
4645                "mirror://xorg/individual/app/mkfontdir-"
4646                version
4647                ".tar.bz2"))
4648         (sha256
4649           (base32
4650             "0c3563kw9fg15dpgx4dwvl12qz6sdqdns1pxa574hc7i5m42mman"))))
4651     (build-system gnu-build-system)
4652     (arguments
4653      '(#:phases
4654        (modify-phases %standard-phases
4655          (add-after 'install 'wrap-mkfontdir
4656            (lambda* (#:key inputs outputs #:allow-other-keys)
4657              (wrap-program (string-append (assoc-ref outputs "out")
4658                                           "/bin/mkfontdir")
4659                `("PATH" ":" prefix
4660                  (,(string-append (assoc-ref inputs "mkfontscale")
4661                                   "/bin")))))))))
4662     (inputs
4663       `(("mkfontscale" ,mkfontscale)))
4664     (native-inputs
4665       `(("pkg-config" ,pkg-config)))
4666     (home-page "https://www.x.org/wiki/")
4667     (synopsis "Create an index of X font files in a directory")
4668     (description
4669      "MkFontDir creates the 'fonts.dir' files needed by the legacy X
4670 server core font system.  The current implementation is a simple wrapper
4671 script around the mkfontscale program.")
4672     (license license:x11)))
4673
4674
4675 (define-public xproto
4676   (package
4677     (name "xproto")
4678     (version "7.0.29")
4679     (source
4680       (origin
4681         (method url-fetch)
4682         (uri (string-append
4683                "mirror://xorg/individual/proto/xproto-"
4684                version
4685                ".tar.bz2"))
4686         (sha256
4687           (base32
4688             "12lzpa9mrzkyrhrphzpi1014np3328qg7mdq08wj6wyaj9q4f6kc"))))
4689     (build-system gnu-build-system)
4690     (propagated-inputs
4691       `(("util-macros" ,util-macros))) ; to get util-macros in (almost?) all package inputs
4692     (native-inputs
4693       `(("pkg-config" ,pkg-config)))
4694     (home-page "https://www.x.org/wiki/")
4695     (synopsis "Xorg X11Proto protocol headers")
4696     (description
4697      "XProto provides the headers and specification documents defining
4698 the X Window System Core Protocol, Version 11.
4699
4700 It also includes a number of headers that aren't purely protocol related,
4701 but are depended upon by many other X Window System packages to provide
4702 common definitions and porting layer.")
4703     (license license:x11)))
4704
4705
4706
4707 ;; packages of height 2 in the propagated-inputs tree
4708
4709 (define-public libice
4710   (package
4711     (name "libice")
4712     (version "1.0.9")
4713     (source
4714       (origin
4715         (method url-fetch)
4716         (uri (string-append
4717                "mirror://xorg/individual/lib/libICE-"
4718                version
4719                ".tar.bz2"))
4720         (sha256
4721           (base32
4722             "00p2b6bsg6kcdbb39bv46339qcywxfl4hsrz8asm4hy6q7r34w4g"))))
4723     (build-system gnu-build-system)
4724     (propagated-inputs
4725       `(("xproto" ,xproto)))
4726     (inputs
4727       `(("xtrans" ,xtrans)))
4728     (native-inputs
4729       `(("pkg-config" ,pkg-config)))
4730     (home-page "https://www.x.org/wiki/")
4731     (synopsis "Xorg Inter-Client Exchange library")
4732     (description "Xorg Inter-Client Exchange library.")
4733     (license license:x11)))
4734
4735
4736 (define-public libxau
4737   (package
4738     (name "libxau")
4739     (version "1.0.8")
4740     (source
4741       (origin
4742         (method url-fetch)
4743         (uri (string-append
4744                "mirror://xorg/individual/lib/libXau-"
4745                version
4746                ".tar.bz2"))
4747         (sha256
4748           (base32
4749             "1wm4pv12f36cwzhldpp7vy3lhm3xdcnp4f184xkxsp7b18r7gm7x"))))
4750     (build-system gnu-build-system)
4751     (propagated-inputs
4752       `(("xproto" ,xproto)))
4753     (native-inputs
4754       `(("pkg-config" ,pkg-config)))
4755     (home-page "https://www.x.org/wiki/")
4756     (synopsis "Xorg Authorization library")
4757     (description
4758      "libXau provides an authorization library for individual access to
4759 an X Window System display.")
4760     (license license:x11)))
4761
4762 (define-public libxfixes
4763   (package
4764     (name "libxfixes")
4765     (version "5.0.3")
4766     (source
4767       (origin
4768         (method url-fetch)
4769         (uri (string-append
4770                "mirror://xorg/individual/lib/libXfixes-"
4771                version
4772                ".tar.bz2"))
4773         (sha256
4774           (base32
4775             "1miana3y4hwdqdparsccmygqr3ic3hs5jrqfzp70hvi2zwxd676y"))))
4776     (build-system gnu-build-system)
4777     (propagated-inputs
4778       `(("fixesproto" ,fixesproto)))
4779     (inputs
4780       `(("xproto" ,xproto)
4781         ("libx11" ,libx11)))
4782     (native-inputs
4783       `(("pkg-config" ,pkg-config)))
4784     (home-page "https://www.x.org/wiki/")
4785     (synopsis "Xorg Fixes Extension library")
4786     (description "Library for the XFixes Extension to the X11 protocol.")
4787     (license license:x11)))
4788
4789 (define-public libxfont
4790   (package
4791     (name "libxfont")
4792     (version "1.5.2")
4793     (source
4794       (origin
4795         (method url-fetch)
4796         (uri (string-append
4797                "mirror://xorg/individual/lib/libXfont-"
4798                version
4799                ".tar.bz2"))
4800         (sha256
4801           (base32
4802             "0w8d07bkmjiarkx09579bl8zsq903mn8javc7qpi0ix4ink5x502"))))
4803     (build-system gnu-build-system)
4804     (propagated-inputs
4805       `(("fontsproto" ,fontsproto)
4806         ("freetype" ,freetype)
4807         ("libfontenc" ,libfontenc)
4808         ("xproto" ,xproto)))
4809     (inputs
4810       `(("zlib" ,zlib)
4811         ("xtrans" ,xtrans)))
4812     (native-inputs
4813        `(("pkg-config" ,pkg-config)))
4814     (home-page "https://www.x.org/wiki/")
4815     (synopsis "Xorg Font handling library")
4816     (description
4817      "libXfont provides the core of the legacy X11 font system, handling the
4818 index files (fonts.dir, fonts.alias, fonts.scale), the various font file
4819 formats, and rasterizing them.  It is used by the X servers, the X Font
4820 Server (xfs), and some font utilities (bdftopcf for instance), but should
4821 not be used by normal X11 clients.  X11 clients access fonts via either the
4822 new API's in libXft, or the legacy API's in libX11.")
4823     (license license:x11)))
4824
4825
4826 (define-public libxi
4827   (package
4828     (name "libxi")
4829     (version "1.7.8")
4830     (source
4831       (origin
4832         (method url-fetch)
4833         (uri (string-append
4834                "mirror://xorg/individual/lib/libXi-"
4835                version
4836                ".tar.bz2"))
4837         (sha256
4838           (base32
4839             "1fr7mi4nbcxsa88qin9g2ipmzh595ydxy9qnabzl270laf6zmwnq"))))
4840     (build-system gnu-build-system)
4841     (propagated-inputs
4842       `(("inputproto" ,inputproto)
4843         ("libx11" ,libx11)
4844         ("libxext" ,libxext)
4845         ("libxfixes" ,libxfixes)))
4846     (inputs
4847       `(("xproto" ,xproto)))
4848     (native-inputs
4849        `(("pkg-config" ,pkg-config)))
4850     (home-page "https://www.x.org/wiki/")
4851     (synopsis "Xorg Input Extension library")
4852     (description "Library for the XInput Extension to the X11 protocol.")
4853     (license license:x11)))
4854
4855 (define-public libxrandr
4856   (package
4857     (name "libxrandr")
4858     (version "1.5.1")
4859     (source
4860       (origin
4861         (method url-fetch)
4862         (uri (string-append
4863                "mirror://xorg/individual/lib/libXrandr-"
4864                version
4865                ".tar.bz2"))
4866         (sha256
4867           (base32
4868             "06pmphx8lp3iywqnh88fvbfb0d8xgkx0qpvan49akpja1vxfgy8z"))))
4869     (build-system gnu-build-system)
4870     (propagated-inputs
4871       ;; In accordance with xrandr.pc.
4872       `(("libx11" ,libx11)
4873         ("libxext" ,libxext)
4874         ("libxrender" ,libxrender)
4875         ("randrproto" ,randrproto)
4876         ("xproto" ,xproto)))
4877     (native-inputs
4878        `(("pkg-config" ,pkg-config)))
4879     (home-page "https://www.x.org/wiki/")
4880     (synopsis "Xorg Resize and Rotate Extension library")
4881     (description
4882      "Library for the Resize and Rotate Extension to the X11 protocol.")
4883     (license license:x11)))
4884
4885 (define-public libxvmc
4886   (package
4887     (name "libxvmc")
4888     (version "1.0.10")
4889     (source
4890       (origin
4891         (method url-fetch)
4892         (uri (string-append
4893                "mirror://xorg/individual/lib/libXvMC-"
4894                version
4895                ".tar.bz2"))
4896         (sha256
4897           (base32
4898             "0bpffxr5dal90a8miv2w0rif61byqxq2f5angj4z1bnznmws00g5"))))
4899     (build-system gnu-build-system)
4900     (propagated-inputs
4901       `(("libxv" ,libxv)))
4902     (inputs
4903       `(("xproto" ,xproto)
4904         ("libxext" ,libxext)
4905         ("libx11" ,libx11)))
4906     (native-inputs
4907        `(("pkg-config" ,pkg-config)))
4908     (home-page "https://www.x.org/wiki/")
4909     (synopsis "Xorg XvMC library")
4910     (description "Xorg XvMC library.")
4911     (license license:x11)))
4912
4913 (define-public libxxf86vm
4914   (package
4915     (name "libxxf86vm")
4916     (version "1.1.4")
4917     (source
4918       (origin
4919         (method url-fetch)
4920         (uri (string-append
4921                "mirror://xorg/individual/lib/libXxf86vm-"
4922                version
4923                ".tar.bz2"))
4924         (sha256
4925           (base32
4926             "0mydhlyn72i7brjwypsqrpkls3nm6vxw0li8b2nw0caz7kwjgvmg"))))
4927     (build-system gnu-build-system)
4928     (propagated-inputs
4929       `(("libxext" ,libxext)
4930         ("xf86vidmodeproto" ,xf86vidmodeproto)))
4931     (inputs
4932       `(("libx11" ,libx11)))
4933     (native-inputs
4934        `(("pkg-config" ,pkg-config)))
4935     (home-page "https://www.x.org/wiki/")
4936     (synopsis "Xorg XF86 Video Mode Extension library")
4937     (description
4938      "Library for the XFree86 Video Mode Extension Extension to the X11
4939 protocol.")
4940     (license license:x11)))
4941
4942
4943 ;; packages of height 3 in the propagated-inputs tree
4944
4945 (define-public libxcb
4946   (package
4947     (name "libxcb")
4948     (version "1.11.1")
4949     (source
4950       (origin
4951         (method url-fetch)
4952         (uri (string-append "mirror://xorg/individual/xcb/"
4953                             name "-" version ".tar.bz2"))
4954         (sha256
4955           (base32
4956            "0c4xyvdyx5adh8dzyhnrmvwwz24gri4z1czxmxqm63i0gmngs85p"))))
4957     (build-system gnu-build-system)
4958     (propagated-inputs
4959       `(("libpthread-stubs" ,libpthread-stubs)
4960         ("libxau" ,libxau)
4961         ("libxdmcp" ,libxdmcp)))
4962     (inputs
4963       `(("xcb-proto" ,xcb-proto)
4964         ("libxslt" ,libxslt)))
4965     (native-inputs
4966       `(("pkg-config" ,pkg-config)
4967         ("python" ,python-minimal-wrapper)))
4968     (arguments
4969      `(#:configure-flags '("--enable-xkb")))
4970     (home-page "https://www.x.org/wiki/")
4971     (synopsis "The X C Binding (XCB) library")
4972     (description
4973      "libxcb provides an interface to the X Window System protocol,
4974 which replaces the current Xlib interface.  It has several advantages
4975 over Xlib, including:
4976
4977 - size: small, simple library, and lower memory footprint;
4978
4979 - latency hiding: batch several requests and wait for the replies later;
4980
4981 - direct protocol access: interface and protocol correspond exactly;
4982
4983 - proven thread support: transparently access XCB from multiple threads;
4984
4985 - easy extension implementation: interfaces auto-generated from XML-XCB.")
4986     (license license:x11)))
4987
4988
4989 (define-public xorg-server
4990   (package
4991     (name "xorg-server")
4992     (version "1.18.4")
4993     (source
4994       (origin
4995         (method url-fetch)
4996         (uri (string-append
4997               "mirror://xorg/individual/xserver/"
4998               name "-" version ".tar.bz2"))
4999         (sha256
5000          (base32
5001           "1j1i3n5xy1wawhk95kxqdc54h34kg7xp4nnramba2q8xqfr5k117"))))
5002     (build-system gnu-build-system)
5003     (propagated-inputs
5004       `(("dri2proto" ,dri2proto)
5005         ("dri3proto" ,dri3proto)
5006         ("fontsproto" ,fontsproto)
5007         ("inputproto" ,inputproto)
5008         ("kbproto" ,kbproto)
5009         ("libpciaccess" ,libpciaccess)
5010         ("mesa" ,mesa)
5011         ("pixman" ,pixman)
5012         ("presentproto" ,presentproto)
5013         ("randrproto" ,randrproto)
5014         ("renderproto" ,renderproto)
5015         ("resourceproto" ,resourceproto)
5016         ("scrnsaverproto" ,scrnsaverproto)
5017         ("videoproto" ,videoproto)
5018         ("xextproto" ,xextproto)
5019         ("xineramaproto" ,xineramaproto)
5020         ("xf86driproto" ,xf86driproto)
5021         ("xproto" ,xproto)))
5022     (inputs
5023       `(("bigreqsproto" ,bigreqsproto)
5024         ("compositeproto" ,compositeproto)
5025         ("damageproto" ,damageproto)
5026         ("udev" ,eudev)
5027         ("dbus" ,dbus)
5028         ("dmxproto" ,dmxproto)
5029         ("libdmx" ,libdmx)
5030         ("libgcrypt" ,libgcrypt)
5031         ("libxau" ,libxau)
5032         ("libxaw" ,libxaw)
5033         ("libxdmcp" ,libxdmcp)
5034         ("libxfixes" ,libxfixes)
5035         ("libxfont" ,libxfont)
5036         ("libxkbfile" ,libxkbfile)
5037         ("libxrender" ,libxrender)
5038         ("libxres" ,libxres)
5039         ("libxshmfence" ,libxshmfence)
5040         ("libxt" ,libxt)
5041         ("libxv" ,libxv)
5042         ("recordproto" ,recordproto)
5043         ("xcmiscproto" ,xcmiscproto)
5044         ("xf86bigfontproto" ,xf86bigfontproto)
5045         ("xf86dgaproto" ,xf86dgaproto)
5046         ("xf86vidmodeproto" ,xf86vidmodeproto)
5047         ("xkbcomp" ,xkbcomp)
5048         ("xkeyboard-config" ,xkeyboard-config)
5049         ("xtrans" ,xtrans)
5050         ("zlib" ,zlib)
5051         ;; Inputs for Xephyr
5052         ("xcb-util" ,xcb-util)
5053         ("xcb-util-image" ,xcb-util-image)
5054         ("xcb-util-keysyms" ,xcb-util-keysyms)
5055         ("xcb-util-renderutil" ,xcb-util-renderutil)
5056         ("xcb-util-wm" ,xcb-util-wm)))
5057     (native-inputs
5058        `(("python" ,python-minimal-wrapper)
5059          ("pkg-config" ,pkg-config)))
5060     (arguments
5061      `(#:parallel-tests? #f
5062        #:configure-flags
5063        (list (string-append "--with-xkb-path="
5064                             (assoc-ref %build-inputs "xkeyboard-config")
5065                             "/share/X11/xkb")
5066              (string-append "--with-xkb-output="
5067                             "/tmp") ; FIXME: This is a bit doubtful; where should
5068                                     ; the compiled keyboard maps go?
5069              (string-append "--with-xkb-bin-directory="
5070                             (assoc-ref %build-inputs "xkbcomp")
5071                             "/bin")
5072              ;; By default, it ends up with invalid '${prefix}/...', causes:
5073              ;;   _FontTransOpen: Unable to Parse address ${prefix}/share/...
5074              ;; It's not used anyway, so set it to empty.
5075              "--with-default-font-path="
5076
5077
5078              ;; For the log file, etc.
5079              "--localstatedir=/var"
5080              ;; For sddm
5081              "--enable-kdrive"
5082              "--enable-xephyr")
5083
5084        #:phases (alist-cons-before
5085                  'configure 'pre-configure
5086                  (lambda _
5087                    (substitute* (find-files "." "\\.c$")
5088                      (("/bin/sh") (which "sh")))
5089
5090                    ;; Don't try to 'mkdir /var'.
5091                    (substitute* "hw/xfree86/Makefile.in"
5092                      (("\\$\\(MKDIR_P\\).*logdir.*")
5093                       "true\n")))
5094                  %standard-phases)))
5095     (home-page "https://www.x.org/wiki/")
5096     (synopsis "Xorg implementation of the X Window System")
5097     (description
5098      "This package provides the Xorg X server itself.
5099 The X server accepts requests from client programs to create windows, which
5100 are (normally rectangular) 'virtual screens' that the client program can
5101 draw into.
5102
5103 Windows are then composed on the actual screen by the X server (or by a
5104 separate composite manager) as directed by the window manager, which usually
5105 communicates with the user via graphical controls such as buttons and
5106 draggable titlebars and borders.")
5107     (license license:x11)))
5108
5109 (define-public xorg-server-xwayland
5110   (package
5111     (inherit xorg-server)
5112     (name "xorg-server-xwayland")
5113     (inputs
5114      `(("libepoxy" ,libepoxy)
5115        ("wayland" ,wayland)
5116        ,@(package-inputs xorg-server)))
5117     (arguments
5118      (substitute-keyword-arguments (package-arguments xorg-server)
5119        ((#:configure-flags flags)
5120         `(cons* "--enable-xwayland" "--disable-xorg"
5121                 "--disable-docs"    "--disable-devel-docs"
5122                 "--disable-xvfb"    "--disable-xnest"
5123                 "--disable-xquartz" "--disable-xwin"
5124                 ,flags))))
5125     (synopsis "Xorg server with wayland backend")))
5126
5127
5128 ;; packages of height 4 in the propagated-inputs tree
5129
5130 (define-public libx11
5131   (package
5132     (name "libx11")
5133     (version "1.6.4")
5134     (source
5135       (origin
5136         (method url-fetch)
5137         (uri (string-append
5138                "mirror://xorg/individual/lib/libX11-"
5139                version
5140                ".tar.bz2"))
5141         (sha256
5142           (base32
5143             "0hg46i6h92pmb7xp1cis2j43zq3fkdz89p0yv35w4vm17az4iixp"))))
5144     (build-system gnu-build-system)
5145     (outputs '("out"
5146                "doc"))                            ;8 MiB of man pages + XML
5147     (arguments
5148      '(#:configure-flags (list (string-append "--mandir="
5149                                               (assoc-ref %outputs "doc")
5150                                               "/share/man"))))
5151     (propagated-inputs
5152       `(("kbproto" ,kbproto)
5153         ("libxcb" ,libxcb)))
5154     (inputs
5155       `(("inputproto" ,inputproto)
5156         ("xextproto" ,xextproto)
5157         ("xtrans" ,xtrans)))
5158     (native-inputs
5159       `(("pkg-config" ,pkg-config)))
5160     (home-page "https://www.x.org/wiki/")
5161     (synopsis "Xorg Core X11 protocol client library")
5162     (description "Xorg Core X11 protocol client library.")
5163     (license license:x11)))
5164
5165 ;; packages of height 5 in the propagated-inputs tree
5166
5167 (define-public libxcursor
5168   (package
5169     (name "libxcursor")
5170     (version "1.1.14")
5171     (source
5172       (origin
5173         (method url-fetch)
5174         (uri (string-append
5175                "mirror://xorg/individual/lib/libXcursor-"
5176                version
5177                ".tar.bz2"))
5178         (sha256
5179           (base32
5180             "1prkdicl5y5yx32h1azh6gjfbijvjp415javv8dsakd13jrarilv"))))
5181     (build-system gnu-build-system)
5182     (propagated-inputs
5183       `(("libx11" ,libx11)
5184         ("libxrender" ,libxrender)
5185         ("libxfixes" ,libxfixes)
5186         ("xproto" ,xproto)))
5187     (native-inputs
5188       `(("pkg-config" ,pkg-config)))
5189     (home-page "https://www.x.org/wiki/")
5190     (synopsis "Xorg Cursor management library")
5191     (description "Xorg Cursor management library.")
5192     (license license:x11)))
5193
5194
5195 (define-public libxt
5196   (package
5197     (name "libxt")
5198     (version "1.1.5")
5199     (source
5200       (origin
5201         (method url-fetch)
5202         (uri (string-append
5203                "mirror://xorg/individual/lib/libXt-"
5204                version
5205                ".tar.bz2"))
5206         (sha256
5207           (base32
5208            "06lz6i7rbrp19kgikpaz4c97fw7n31k2h2aiikczs482g2zbdvj6"))
5209         (patches (search-patches "libxt-guix-search-paths.patch"))))
5210     (build-system gnu-build-system)
5211     (outputs '("out"
5212                "doc"))                            ;2 MiB of man pages + XML
5213     (arguments
5214      '(#:configure-flags (list (string-append "--mandir="
5215                                               (assoc-ref %outputs "doc")
5216                                               "/share/man"))))
5217     (propagated-inputs
5218       `(("libx11" ,libx11)
5219         ("libice" ,libice)
5220         ("libsm" ,libsm)))
5221     (inputs
5222       `(("libx11" ,libx11)))
5223     (native-inputs
5224       `(("pkg-config" ,pkg-config)))
5225     (home-page "https://www.x.org/wiki/")
5226     (synopsis "Xorg XToolkit Intrinsics library")
5227     (description "Xorg XToolkit Intrinsics library.")
5228     (license license:x11)))
5229
5230
5231 (define-public libxaw
5232   (package
5233     (name "libxaw")
5234     (version "1.0.13")
5235     (source
5236       (origin
5237         (method url-fetch)
5238         (uri (string-append
5239                "mirror://xorg/individual/lib/libXaw-"
5240                version
5241                ".tar.bz2"))
5242         (sha256
5243           (base32
5244             "1kdhxplwrn43d9jp3v54llp05kwx210lrsdvqb6944jp29rhdy4f"))))
5245     (build-system gnu-build-system)
5246     (propagated-inputs
5247       `(("libxext" ,libxext)
5248         ("libxmu" ,libxmu)
5249         ("libxpm" ,libxpm)
5250         ("libxt" ,libxt)))
5251     (inputs
5252       `(("xproto" ,xproto)))
5253     (native-inputs
5254       `(("pkg-config" ,pkg-config)))
5255     (home-page "https://www.x.org/wiki/")
5256     (synopsis "Xorg Xaw library")
5257     (description
5258      "Xaw is the X Athena Widget Set based on the X Toolkit
5259 Intrinsics (Xt) Library.")
5260     (license license:x11)))
5261
5262 (define-public twm
5263   (package
5264     (name "twm")
5265     (version "1.0.9")
5266     (source
5267      (origin
5268        (method url-fetch)
5269        (uri (string-append
5270              "mirror://xorg/individual/app/" name "-"
5271              version
5272              ".tar.gz"))
5273        (sha256
5274         (base32
5275          "1s1r00x8add3f27xjqxg6q7mwplwrb72gakbh4y6j052as25wchw"))))
5276     (build-system gnu-build-system)
5277     (inputs
5278      `(("libxt" ,libxt)
5279        ("libxmu" ,libxmu)
5280        ("libxext" ,libxext)
5281        ("xproto" ,xproto)))
5282     (native-inputs
5283      `(("bison" ,bison)
5284        ("pkg-config" ,pkg-config)))
5285     (home-page "https://www.x.org/wiki/")
5286     (synopsis "Tab Window Manager for the X Window System")
5287     (description "Twm is a window manager for the X Window System.
5288 It provides titlebars, shaped windows, several forms of icon management,
5289 user-defined macro functions, click-to-type and pointer-driven
5290 keyboard focus, and user-specified key and pointer button bindings.")
5291     (license license:x11)))
5292
5293 (define-public xcb-util
5294   (package
5295     (name "xcb-util")
5296     (version "0.4.0")
5297     (source (origin
5298              (method url-fetch)
5299              (uri (string-append "mirror://xorg/individual/xcb/"
5300                                  name "-" version ".tar.bz2"))
5301              (sha256
5302               (base32
5303                "1sahmrgbpyki4bb72hxym0zvxwnycmswsxiisgqlln9vrdlr9r26"))))
5304     (build-system gnu-build-system)
5305     (propagated-inputs
5306      `(("libxcb" ,libxcb)))
5307     (native-inputs
5308      `(("pkg-config" ,pkg-config)))
5309     (home-page "https://cgit.freedesktop.org/xcb/util/")
5310     (synopsis "Core XCB utility functions")
5311     (description
5312      "The XCB util module provides a number of libraries which sit on
5313 top of libxcb, the core X protocol library, and some of the extension
5314 libraries.  These experimental libraries provide convenience functions
5315 and interfaces which make the raw X protocol more usable.  Some of the
5316 libraries also provide client-side code which is not strictly part of
5317 the X protocol but which has traditionally been provided by Xlib.
5318
5319 The XCB util module provides the following libraries:
5320
5321 - aux: Convenient access to connection setup and some core requests.
5322
5323 - atom: Standard core X atom constants and atom caching.
5324
5325 - event: Some utilities that have little to do with events any more.")
5326     (license license:x11)))
5327
5328
5329 (define-public xcb-util-cursor
5330   (package
5331     (name "xcb-util-cursor")
5332     (version "0.1.2")
5333     (source (origin
5334               (method url-fetch)
5335               (uri (string-append "https://xcb.freedesktop.org/dist/"
5336                                   "xcb-util-cursor-" version ".tar.gz"))
5337               (sha256
5338                (base32
5339                 "0bm0mp99abdfb6v4v60hq3msvk67b2x9ml3kbx5y2g18xdhm3rdr"))))
5340     (build-system gnu-build-system)
5341     (native-inputs
5342      `(("m4" ,m4)
5343        ("pkg-config" ,pkg-config)))
5344     (inputs
5345      `(("libxcb" ,libxcb)))
5346     (propagated-inputs
5347      `(("xcb-util-renderutil" ,xcb-util-renderutil)
5348        ("xcb-util-image" ,xcb-util-image)))
5349     (home-page "https://cgit.freedesktop.org/xcb/util-cursor/")
5350     (synopsis "Port of libxcursor")
5351     (description "XCB-util-cursor is a port of libxcursor.")
5352     (license
5353      ; expat license  with added clause regarding advertising
5354      (license:non-copyleft
5355       "file://COPYING"
5356       "See COPYING in the distribution."))))
5357
5358
5359 (define-public xcb-util-image
5360   (package
5361     (name "xcb-util-image")
5362     (version "0.4.0")
5363     (source (origin
5364              (method url-fetch)
5365              (uri (string-append "mirror://xorg/individual/xcb/"
5366                                  name "-" version ".tar.bz2"))
5367              (sha256
5368               (base32
5369                "1z1gxacg7q4cw6jrd26gvi5y04npsyavblcdad1xccc8swvnmf9d"))))
5370     (build-system gnu-build-system)
5371     (propagated-inputs
5372      `(("libxcb" ,libxcb)))
5373     (inputs
5374      `(("xcb-util" ,xcb-util)))
5375     (native-inputs
5376      `(("pkg-config" ,pkg-config)))
5377     (home-page "https://cgit.freedesktop.org/xcb/util-image/")
5378     (synopsis "XCB port of Xlib's XImage and XShmImage")
5379     (description
5380      "The XCB util module provides a number of libraries which sit on
5381 top of libxcb, the core X protocol library, and some of the extension
5382 libraries.  These experimental libraries provide convenience functions
5383 and interfaces which make the raw X protocol more usable.  Some of the
5384 libraries also provide client-side code which is not strictly part of
5385 the X protocol but which has traditionally been provided by Xlib.
5386
5387 The XCB util-image module provides the following library:
5388
5389 - image: Port of Xlib's XImage and XShmImage functions.")
5390     (license license:x11)))
5391
5392
5393 (define-public xcb-util-keysyms
5394   (package
5395     (name "xcb-util-keysyms")
5396     (version "0.4.0")
5397     (source (origin
5398              (method url-fetch)
5399              (uri (string-append "mirror://xorg/individual/xcb/"
5400                                  name "-" version ".tar.bz2"))
5401              (sha256
5402               (base32
5403                "1nbd45pzc1wm6v5drr5338j4nicbgxa5hcakvsvm5pnyy47lky0f"))))
5404     (build-system gnu-build-system)
5405     (propagated-inputs
5406      `(("libxcb" ,libxcb)))
5407     (native-inputs
5408      `(("pkg-config" ,pkg-config)))
5409     (home-page "https://cgit.freedesktop.org/xcb/util-keysyms/")
5410     (synopsis "Standard X constants and conversion to/from keycodes")
5411     (description
5412      "The XCB util module provides a number of libraries which sit on
5413 top of libxcb, the core X protocol library, and some of the extension
5414 libraries.  These experimental libraries provide convenience functions
5415 and interfaces which make the raw X protocol more usable.  Some of the
5416 libraries also provide client-side code which is not strictly part of
5417 the X protocol but which has traditionally been provided by Xlib.
5418
5419 The XCB util-keysyms module provides the following library:
5420
5421 - keysyms: Standard X key constants and conversion to/from keycodes.")
5422     (license license:x11)))
5423
5424
5425 (define-public xcb-util-renderutil
5426   (package
5427     (name "xcb-util-renderutil")
5428     (version "0.3.9")
5429     (source (origin
5430              (method url-fetch)
5431              (uri (string-append "mirror://xorg/individual/xcb/"
5432                                  name "-" version ".tar.bz2"))
5433              (sha256
5434               (base32
5435                "0nza1csdvvxbmk8vgv8vpmq7q8h05xrw3cfx9lwxd1hjzd47xsf6"))))
5436     (build-system gnu-build-system)
5437     (propagated-inputs
5438      `(("libxcb" ,libxcb)))
5439     (native-inputs
5440      `(("pkg-config" ,pkg-config)))
5441     (home-page "https://cgit.freedesktop.org/xcb/util-renderutil/")
5442     (synopsis "Convenience functions for the Render extension")
5443     (description
5444      "The XCB util module provides a number of libraries which sit on
5445 top of libxcb, the core X protocol library, and some of the extension
5446 libraries.  These experimental libraries provide convenience functions
5447 and interfaces which make the raw X protocol more usable.  Some of the
5448 libraries also provide client-side code which is not strictly part of
5449 the X protocol but which has traditionally been provided by Xlib.
5450
5451 The XCB util-renderutil module provides the following library:
5452
5453 - renderutil: Convenience functions for the Render extension.")
5454     (license license:x11)))
5455
5456
5457 (define-public xcb-util-wm
5458   (package
5459     (name "xcb-util-wm")
5460     (version "0.4.1")
5461     (source (origin
5462              (method url-fetch)
5463              (uri (string-append "mirror://xorg/individual/xcb/"
5464                                  name "-" version ".tar.bz2"))
5465              (sha256
5466               (base32
5467                "0gra7hfyxajic4mjd63cpqvd20si53j1q3rbdlkqkahfciwq3gr8"))))
5468     (build-system gnu-build-system)
5469     (propagated-inputs
5470      `(("libxcb" ,libxcb)))
5471     (native-inputs
5472      `(("m4" ,m4)
5473        ("pkg-config" ,pkg-config)))
5474     (home-page "https://cgit.freedesktop.org/xcb/util-wm/")
5475     (synopsis "Client and window-manager helpers for ICCCM and EWMH")
5476     (description
5477      "The XCB util modules provides a number of libraries which sit on
5478 top of libxcb, the core X protocol library, and some of the extension
5479 libraries.  These experimental libraries provide convenience functions
5480 and interfaces which make the raw X protocol more usable.  Some of the
5481 libraries also provide client-side code which is not strictly part of
5482 the X protocol but which has traditionally been provided by Xlib.
5483
5484 The XCB util-wm module provides the following libraries:
5485
5486 - ewmh: Both client and window-manager helpers for EWMH.
5487
5488 - icccm: Both client and window-manager helpers for ICCCM.")
5489     (license license:x11)))
5490
5491 (define-public xinit
5492   (package
5493     (name "xinit")
5494     (version "1.3.4")
5495     (source (origin
5496               (method url-fetch)
5497               (uri (string-append "mirror://xorg/individual/app/xinit-"
5498                                   version ".tar.bz2"))
5499               (sha256
5500                (base32
5501                 "1cq2g469mb2cfgr8k57960yrn90bl33vfqri4pdh2zm0jxrqvn3m"))))
5502     (build-system gnu-build-system)
5503     (inputs
5504      `(("xproto" ,xproto)
5505        ("libx11" ,libx11)))
5506     (native-inputs
5507      `(("pkg-config" ,pkg-config)))
5508     (propagated-inputs
5509      `(("xauth" ,xauth)))
5510     (home-page "http://x.org")
5511     (synopsis "Commands to start the X Window server")
5512     (description
5513      "The xinit program is used to start the X Window System server and a
5514 first client program on systems that are not using a display manager such as
5515 xdm.  This package also provides the 'startx' command, which provides a
5516 user-friendly mechanism to start the X server.")
5517     (license license:x11)))
5518
5519 ;; package outside the x.org system proper of height 5
5520
5521 (define-public libxaw3d
5522   (package
5523     (name "libxaw3d")
5524     (version "1.6.2")
5525     (source
5526       (origin
5527         (method url-fetch)
5528         (uri (string-append
5529                "mirror://xorg/individual/lib/libXaw3d-"
5530                version
5531                ".tar.bz2"))
5532         (sha256
5533           (base32
5534             "0awplv1nf53ywv01yxphga3v6dcniwqnxgnb0cn4khb121l12kxp"))))
5535     (build-system gnu-build-system)
5536     (propagated-inputs
5537       `(("libxext" ,libxext)
5538         ("libxmu" ,libxmu)
5539         ("libxt" ,libxt)))
5540     (inputs
5541      `(("libx11" ,libx11)))
5542     (native-inputs
5543      `(("pkg-config" ,pkg-config)))
5544     (home-page "https://www.x.org/wiki/")
5545     (synopsis "Xorg Xaw3d library")
5546     (description
5547      "Xaw is the X 3D Athena Widget Set based on the X Toolkit
5548 Intrinsics (Xt) Library.")
5549     (license license:x11)))
5550
5551 (define-public xmag
5552   (package
5553     (name "xmag")
5554     (version "1.0.6")
5555     (source
5556      (origin
5557        (method url-fetch)
5558        (uri (string-append
5559              "mirror://xorg/individual/app/" name "-"
5560              version
5561              ".tar.gz"))
5562        (sha256
5563         (base32
5564          "19bsg5ykal458d52v0rvdx49v54vwxwqg8q36fdcsv9p2j8yri87"))))
5565     (build-system gnu-build-system)
5566     (arguments
5567      `(#:configure-flags
5568        (list (string-append "--with-appdefaultdir="
5569                             %output ,%app-defaults-dir))))
5570     (inputs
5571      `(("libxaw" ,libxaw)))
5572     (native-inputs
5573      `(("pkg-config" ,pkg-config)))
5574     (home-page "https://www.x.org/wiki/")
5575     (synopsis "Display or capture a magnified part of a X11 screen")
5576     (description "Xmag displays and captures a magnified snapshot of a portion
5577 of an X11 screen.")
5578     (license license:x11)))
5579
5580 (define-public xmessage
5581   (package
5582     (name "xmessage")
5583     (version "1.0.4")
5584     (source
5585      (origin
5586        (method url-fetch)
5587        (uri (string-append
5588              "mirror://xorg/individual/app/" name "-"
5589              version
5590              ".tar.gz"))
5591        (sha256
5592         (base32
5593          "1jmcac1xbwplbxfl75sr6w3zqhx1khpdzlqippjsr31cjp1rjc48"))))
5594     (build-system gnu-build-system)
5595     (arguments
5596      `(#:configure-flags
5597        (list (string-append "--with-appdefaultdir="
5598                             %output ,%app-defaults-dir))))
5599     (inputs
5600      `(("libxaw" ,libxaw)))
5601     (native-inputs
5602      `(("pkg-config" ,pkg-config)))
5603     (home-page "https://www.x.org/wiki/")
5604     (synopsis "Displays a message or query in a window")
5605     (description
5606      "Xmessage displays a message or query in a window.   The user can click
5607 on a button to dismiss it or can select one of several buttons
5608 to answer a question.  Xmessage can also exit after a specified time.")
5609     (license license:x11)))
5610
5611 (define-public xterm
5612   (package
5613     (name "xterm")
5614     (version "322")
5615     (source (origin
5616               (method url-fetch)
5617               (uri (string-append "ftp://ftp.invisible-island.net/xterm/"
5618                                   "xterm-" version ".tgz"))
5619               (sha256
5620                (base32
5621                 "1mh9s5g3fs64iimnl7axk0isb5306dyshisxlv5gr8vn7ysl3nws"))))
5622     (build-system gnu-build-system)
5623     (arguments
5624      '(#:configure-flags '("--enable-wide-chars" "--enable-256-color"
5625                            "--enable-load-vt-fonts" "--enable-i18n"
5626                            "--enable-doublechars" "--enable-luit"
5627                            "--enable-mini-luit")
5628        #:tests? #f))
5629     (native-inputs
5630      `(("pkg-config" ,pkg-config)))
5631     (inputs
5632      `(("luit" ,luit)
5633        ("libXft" ,libxft)
5634        ("fontconfig" ,fontconfig)
5635        ("freetype" ,freetype)
5636        ("ncurses" ,ncurses)
5637        ("libICE" ,libice)
5638        ("libSM" ,libsm)
5639        ("libX11" ,libx11)
5640        ("libXext" ,libxext)
5641        ("libXt" ,libxt)
5642        ("xproto" ,xproto)
5643        ("libXaw" ,libxaw)))
5644     (home-page "http://invisible-island.net/xterm")
5645     (synopsis "Terminal emulator for the X Window System")
5646     (description
5647      "The xterm program is a terminal emulator for the X Window System.  It
5648 provides DEC VT102/VT220 (VTxxx) and Tektronix 4014 compatible terminals for
5649 programs that cannot use the window system directly.")
5650     (license license:x11)))
5651
5652 (define-public perl-x11-protocol
5653   (package
5654     (name "perl-x11-protocol")
5655     (version "0.56")
5656     (source (origin
5657              (method url-fetch)
5658              (uri (string-append
5659                    "mirror://cpan/authors/id/S/SM/SMCCAM/X11-Protocol-"
5660                    version ".tar.gz"))
5661              (sha256
5662               (base32
5663                "1dq89bh6fqv7l5mbffqcismcljpq5f869bx7g8lg698zgindv5ny"))))
5664     (build-system perl-build-system)
5665     (arguments '(#:tests? #f))          ;tests require a running x server
5666     (synopsis "Raw interface to X Window System servers")
5667     (description
5668      "X11::Protocol is a client-side interface to the X11 Protocol, allowing
5669 perl programs to display windows and graphics on X11 servers.")
5670     (home-page
5671      (string-append "http://search.cpan.org/~smccam/X11-Protocol-" version))
5672     ;; From the package README: "you can redistribute and/or modify it under
5673     ;; the same terms as Perl itself. (As an exception, the file
5674     ;; Keysyms.pm,which is derived from a file in the standard X11
5675     ;; distribution, has another, less restrictive copying policy, as do some
5676     ;; of the extension modules in the directory Protocol/Ext: see those files
5677     ;; for details)."
5678     (license (package-license perl))))
5679
5680 (define-public xcompmgr
5681   (package
5682     (name "xcompmgr")
5683     (version "1.1.7")
5684     (source
5685      (origin
5686        ;; there's no current tarball
5687        (method git-fetch)
5688        (uri (git-reference
5689              (url "https://anongit.freedesktop.org/git/xorg/app/xcompmgr.git")
5690              (commit (string-append name "-" version))))
5691        (sha256
5692         (base32
5693          "04swkrm3gk689wrjc418bd3n25w8r20kg1xfbn5j8d7mx1r5gf16"))
5694        (file-name (string-append name "-" version))))
5695     (build-system gnu-build-system)
5696     (arguments
5697      `(#:phases (modify-phases %standard-phases
5698                   (add-after 'unpack 'autogen
5699                               (lambda _
5700                                 (setenv "NOCONFIGURE" "t")
5701                                 (zero? (system* "sh" "autogen.sh")))))))
5702     (native-inputs
5703      `(("pkg-config" ,pkg-config)
5704        ("autoconf" ,autoconf)
5705        ("automake" ,automake)))
5706     (inputs
5707      `(("libX11" ,libx11)
5708        ("libXext" ,libxext)
5709        ("libXcomposite" ,libxcomposite)
5710        ("libXfixes" ,libxfixes)
5711        ("libXdamage" ,libxdamage)
5712        ("libXrender" ,libxrender)))
5713     (synopsis "X Compositing manager using RENDER")
5714     (description "xcompmgr is a sample compositing manager for X servers
5715 supporting the XFIXES, DAMAGE, RENDER, and COMPOSITE extensions.  It enables
5716 basic eye-candy effects.")
5717     (home-page "https://cgit.freedesktop.org/xorg/app/xcompmgr/")
5718     (license (license:x11-style
5719               "https://cgit.freedesktop.org/xorg/app/xcompmgr/tree/COPYING"))))