From ca3fce337049304fc7533802ad26b39177352c2d Mon Sep 17 00:00:00 2001
From: Lukas Ruzicka <lruzicka@redhat.com>
Date: Thu, 17 Oct 2024 16:49:18 +0200
Subject: [PATCH] Create the basic client file.

---
 tests/remote_desktop_freerdp.pm | 43 +++++++++++++++++++++++++++++++++
 1 file changed, 43 insertions(+)
 create mode 100644 tests/remote_desktop_freerdp.pm

diff --git a/tests/remote_desktop_freerdp.pm b/tests/remote_desktop_freerdp.pm
new file mode 100644
index 00000000..7c6b60c9
--- /dev/null
+++ b/tests/remote_desktop_freerdp.pm
@@ -0,0 +1,43 @@
+use base "installedtest";
+use strict;
+use testapi;
+use utils;
+
+# This test uses a freerdp connection to a remote computer
+# running Gnome Workstation.
+
+sub run {
+    my $self = shift;
+    my $user = "";
+    my $password = "";
+    my $ip = "";
+
+    # Switch to console and install the necessary packages.
+    $self->root_console(tty => 3);
+    assert_script_run("hostnamectl set-hostname pawn");
+    assert_script_run("dnf install -y freerdp", timeout => 60);
+
+    # Return to the desktop
+    desktop_vt();
+
+    # Open terminal and make a connection to the remote server.
+    menu_launch_type("terminal");
+    wait_still_screen(2);
+    enter_cmd("xfreerdp /:u $user /:p $password /:v $ip");
+    
+    # Check that a connection window has appeared.
+    assert_screen("freerdp_connection_window");
+    
+    # Perform login, start terminal and check the hostname.
+    assert_and_check("freerdp_login_screen");
+    send_key("ret");
+    sleep(2);
+    type_very_safely($syspw);
+    assert_screen("freerdp_desktop_connected");
+}
+
+sub test_flags {
+    return {fatal => 1, milestone => 1};
+}
+1;
+# vim: set sw=4 et: