Commit | Line | Data |
---|---|---|
00e65098 LC |
1 | ;;; GNU Guix --- Functional package management for GNU |
2 | ;;; Copyright © 2015 Ludovic Courtès <ludo@gnu.org> | |
2149d3e3 | 3 | ;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be> |
00e65098 LC |
4 | ;;; |
5 | ;;; This file is part of GNU Guix. | |
6 | ;;; | |
7 | ;;; GNU Guix is free software; you can redistribute it and/or modify it | |
8 | ;;; under the terms of the GNU General Public License as published by | |
9 | ;;; the Free Software Foundation; either version 3 of the License, or (at | |
10 | ;;; your option) any later version. | |
11 | ;;; | |
12 | ;;; GNU Guix is distributed in the hope that it will be useful, but | |
13 | ;;; WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 | ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 | ;;; GNU General Public License for more details. | |
16 | ;;; | |
17 | ;;; You should have received a copy of the GNU General Public License | |
18 | ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. | |
19 | ||
20 | (define-module (gnu packages rdesktop) | |
21 | #:use-module ((guix licenses) #:prefix license:) | |
22 | #:use-module (guix packages) | |
23 | #:use-module (guix download) | |
2149d3e3 TD |
24 | #:use-module (guix git-download) |
25 | #:use-module (guix build-system cmake) | |
00e65098 | 26 | #:use-module (guix build-system gnu) |
2149d3e3 TD |
27 | #:use-module (gnu packages compression) |
28 | #:use-module (gnu packages cups) | |
29 | #:use-module (gnu packages gstreamer) | |
30 | #:use-module (gnu packages linux) | |
31 | #:use-module (gnu packages pkg-config) | |
32 | #:use-module (gnu packages pulseaudio) | |
cc2b77df | 33 | #:use-module (gnu packages tls) |
2149d3e3 TD |
34 | #:use-module (gnu packages video) |
35 | #:use-module (gnu packages xorg) | |
36 | #:use-module (gnu packages xml)) | |
00e65098 LC |
37 | |
38 | (define-public rdesktop | |
39 | (package | |
40 | (name "rdesktop") | |
41 | (version "1.8.3") | |
42 | (source (origin | |
43 | (method url-fetch) | |
44 | (uri (string-append | |
de67e922 LF |
45 | "mirror://sourceforge/" name "/" name "/" version "/" |
46 | name "-" version ".tar.gz")) | |
00e65098 LC |
47 | (sha256 |
48 | (base32 | |
49 | "1r7c1rjmw2xzq8fw0scyb453gy9z19774z1z8ldmzzsfndb03cl8")))) | |
50 | (build-system gnu-build-system) | |
51 | (arguments | |
52 | '(#:configure-flags (list (string-append "--with-openssl=" | |
53 | (assoc-ref %build-inputs | |
54 | "openssl")) | |
55 | ||
56 | ;; XXX: optional dependencies missing | |
57 | "--disable-credssp" | |
58 | "--disable-smartcard") | |
59 | ||
60 | #:tests? #f)) ;no 'check' target | |
61 | (inputs | |
62 | `(("libx11" ,libx11) | |
63 | ("openssl" ,openssl))) | |
64 | (home-page "http://www.rdesktop.org/") | |
65 | (synopsis "Client for Windows Terminal Services") | |
66 | (description | |
67 | "rdesktop is a client for Microsoft's Windows Remote Desktop Services, | |
e881752c | 68 | capable of natively speaking Remote Desktop Protocol (RDP). It allows users |
00e65098 LC |
69 | to remotely control a user's Windows desktop.") |
70 | (license license:gpl3+))) | |
2149d3e3 TD |
71 | |
72 | (define-public freerdp | |
73 | (package | |
74 | (name "freerdp") | |
75 | (version "1.2.0-beta1+android9") | |
76 | (source (origin | |
77 | (method git-fetch) | |
78 | (uri (git-reference | |
79 | (url "git://github.com/FreeRDP/FreeRDP.git") | |
80 | (commit version))) | |
81 | (file-name (git-file-name name version)) | |
82 | (sha256 | |
83 | (base32 "1m0lzrr7hkxfvc5f9p8snimv0rmin2463zhg25mv36wig8g5k7l3")))) | |
84 | (build-system cmake-build-system) | |
85 | (native-inputs | |
86 | `(("pkg-config" ,pkg-config) | |
87 | ("xmlto" ,xmlto))) | |
88 | (inputs | |
89 | `(("libx11" ,libx11) | |
90 | ("libxkbfile" ,libxkbfile) | |
91 | ("libxcursor" ,libxcursor) | |
92 | ("libxext" ,libxext) | |
93 | ("libxi" ,libxi) | |
94 | ("libxv" ,libxv) | |
95 | ("libxrandr" ,libxrandr) | |
96 | ("libxrender" ,libxrender) | |
97 | ("libxinerama" ,libxinerama) | |
98 | ("libxshmfence" ,libxshmfence) | |
99 | ("libxml2" ,libxml2) | |
100 | ("libxslt" ,libxslt) | |
101 | ("cups" ,cups) | |
102 | ("ffmpeg" ,ffmpeg) | |
103 | ("pulseaudio" ,pulseaudio) | |
104 | ("alsa-lib" ,alsa-lib) | |
105 | ("gstreamer" ,gstreamer) | |
106 | ("gst-plugins-base" ,gst-plugins-base) | |
107 | ("zlib" ,zlib) | |
108 | ("openssl" ,openssl))) | |
109 | (arguments | |
110 | `(#:configure-flags | |
111 | '("-DCMAKE_INSTALL_LIBDIR=lib" | |
112 | "-DWITH_PULSE=ON" | |
113 | "-DWITH_CUPS=ON") | |
114 | #:phases | |
115 | (modify-phases %standard-phases | |
116 | (add-before 'configure 'patch-cmakelists | |
117 | (lambda _ | |
118 | ;; CMake would return an error on REMOVE_DUPLICATES because this | |
119 | ;; list is empty. | |
120 | (substitute* "channels/client/CMakeLists.txt" | |
121 | (("list\\(REMOVE_DUPLICATES CHANNEL_STATIC_CLIENT_ENTRIES\\)") | |
122 | ""))))) | |
123 | #:tests? #f)) ; no 'test' target | |
124 | (home-page "https://www.freerdp.com") | |
125 | (synopsis "Remote Desktop Protocol implementation") | |
126 | (description "FreeRDP implements Microsoft's Remote Desktop Protocol. It | |
127 | consists of the @code{xfreerdp} client, libraries for client and server | |
128 | functionality, and Windows Portable Runtime (WinPR), a portable implementation | |
129 | of parts of the Windows API.") | |
130 | (license license:asl2.0))) |