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