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