From 5a61bd462315ef530f7f8e76774aea8acbdb84d6 Mon Sep 17 00:00:00 2001
From: Andy Tai <atai@atai.org>
Date: Sat, 2 Sep 2023 17:15:05 -0700
Subject: [PATCH] gnu: freerdp: Enable server build.

* gnu/packages/rdesktop.scm (freerdp): Enable server build.
[phases] (configure-flags): Enable server build flags.
[inputs]: Add server build dependencies and additional protocols
cairo, dbus, gsm, lame, libxdamage, opencl, openh264, openssl.

Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
---
 gnu/packages/rdesktop.scm | 17 ++++++++++++++++-
 1 file changed, 16 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/rdesktop.scm b/gnu/packages/rdesktop.scm
index 2a969a2f78..6a13de6148 100644
--- a/gnu/packages/rdesktop.scm
+++ b/gnu/packages/rdesktop.scm
@@ -32,6 +32,7 @@ (define-module (gnu packages rdesktop)
   #:use-module (guix build-system cmake)
   #:use-module (guix build-system gnu)
   #:use-module (gnu packages assembly)
+  #:use-module (gnu packages audio)
   #:use-module (gnu packages autotools)
   #:use-module (gnu packages bison)
   #:use-module (gnu packages check)
@@ -43,11 +44,13 @@ (define-module (gnu packages rdesktop)
   #:use-module (gnu packages gettext)
   #:use-module (gnu packages glib)
   #:use-module (gnu packages gstreamer)
+  #:use-module (gnu packages gtk)
   #:use-module (gnu packages image)
   #:use-module (gnu packages libusb)
   #:use-module (gnu packages linux)
   #:use-module (gnu packages mp3)
   #:use-module (gnu packages nettle)
+  #:use-module (gnu packages opencl)
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages python)
   #:use-module (gnu packages python-xyz)
@@ -113,13 +116,18 @@ (define-public freerdp
            xmlto))
     (inputs
      (list alsa-lib
+           cairo
            cups
+           dbus
            ffmpeg-4
+           gsm
+           lame
            libjpeg-turbo
            libusb
            libx11
            libxkbfile
            libxcursor
+           libxdamage
            libxext
            libxi
            libxv
@@ -127,6 +135,10 @@ (define-public freerdp
            libxrender
            libxinerama
            libxshmfence
+           opencl-headers
+           openh264
+           opensles
+           openssl
            pulseaudio
            zlib))
     (propagated-inputs (list libxkbcommon openssl wayland))
@@ -139,7 +151,10 @@ (define-public freerdp
                           #~())
                    "-DWITH_PULSE=ON"
                    "-DWITH_CUPS=ON"
-                   "-DBUILD_TESTING=ON")))
+                   "-DBUILD_TESTING=ON"
+                   "-DWITH_SERVER=ON" ;build servers
+                   "-DWITH_SHADOW=ON" ;build shadow server
+                   "-DWITH_PROXY=ON")))
     (home-page "https://www.freerdp.com")
     (synopsis "Remote Desktop Protocol implementation")
     (description "FreeRDP implements Microsoft's Remote Desktop Protocol.