Handle java license popup during installation

lib/Distribution/Opensuse/Tumbleweed.pm

@@ -40,6 +40,7 @@ use Installation::SystemProbing::EncryptedVolumeActivationController;
 use Installation::SystemRole::SystemRoleController;
 use Installation::Popups::OKPopupController;
 use Installation::Popups::YesNoPopupController;
+use Installation::Popups::AcceptPopupController;
 use YaST::Bootloader::BootloaderSettingsController;
 use YaST::Firstboot::ConfigurationCompletedController;
 use YaST::Firstboot::HostNameController;
@@ -176,6 +177,10 @@ sub get_yes_no_popup_controller {
     return Installation::Popups::YesNoPopupController->new();
 }
 
+sub get_accept_popup_controller {
+    return Installation::Popups::AcceptPopupController->new();
+}
+
 sub get_encrypted_volume_activation {
     return Installation::SystemProbing::EncryptedVolumeActivationController->new();
 }

lib/Installation/Popups/AcceptPopup.pm

@@ -0,0 +1,38 @@
+# SUSE's openQA tests
+#
+# Copyright 2022 SUSE LLC
+# SPDX-License-Identifier: FSFAP
+
+# Summary: The class introduces methods to handle
+# an Accept license popup.
+# Maintainer: QE YaST and Migration (QE Yam) <qe-yam at suse de>
+
+package Installation::Popups::AcceptPopup;
+use strict;
+use warnings;
+
+sub new {
+    my ($class, $args) = @_;
+    my $self = bless {
+        app => $args->{app}
+    }, $class;
+    return $self->init();
+}
+
+sub init {
+    my $self = shift;
+    $self->{btn_accept} = $self->{app}->button({id => 'accept'});
+    return $self;
+}
+
+sub is_shown {
+    my ($self) = @_;
+    $self->{btn_accept}->exist();
+}
+
+sub press_accept {
+    my ($self) = @_;
+    $self->{btn_accept}->click();
+}
+
+1;

lib/Installation/Popups/AcceptPopupController.pm

@@ -0,0 +1,46 @@
+# SUSE's openQA tests
+#
+# Copyright 2021 SUSE LLC
+# SPDX-License-Identifier: FSFAP
+
+# Summary: The class introduces business actions for Popups with Accept option
+# Maintainer: QE YaST and Migration (QE Yam) <qe-yam at suse de>
+
+package Installation::Popups::AcceptPopupController;
+use strict;
+use warnings;
+use YuiRestClient;
+use YuiRestClient::Wait;
+use Installation::Popups::AcceptPopup;
+
+sub new {
+    my ($class, $args) = @_;
+    my $self = bless {}, $class;
+    return $self->init();
+}
+
+sub init {
+    my ($self) = @_;
+    $self->{AcceptPopup} = Installation::Popups::AcceptPopup->new({app => YuiRestClient::get_app()});
+    return $self;
+}
+
+sub wait_accept_popup {
+    my ($self, $args) = @_;
+    YuiRestClient::Wait::wait_until(object => sub {
+            $self->{AcceptPopup}->is_shown({timeout => 0});
+    }, %$args);
+}
+
+sub get_accept_popup {
+    my ($self) = @_;
+    die 'Accept Popup is not displayed' unless $self->{AcceptPopup}->is_shown();
+    return $self->{AcceptPopup};
+}
+
+sub accept {
+    my ($self) = @_;
+    $self->get_accept_popup()->press_accept();
+}
+
+1;

tests/installation/confirm_package_license.pm

@@ -0,0 +1,24 @@
+# SUSE's openQA tests
+#
+# Copyright 2021 SUSE LLC
+# SPDX-License-Identifier: FSFAP
+
+# Summary: This test module confirms the popup for Package license.
+
+# Maintainer: QE YaST and Migration (QE Yam) <qe-yam at suse de>
+
+use strict;
+use warnings;
+use base 'y2_installbase';
+
+sub run {
+    my $package_license_popup = $testapi::distri->get_accept_popup_controller();
+    $package_license_popup->wait_accept_popup({
+            timeout => 3000,
+            interval => 2,
+            message => 'Accept license popup did not appear'});
+
+    $package_license_popup->accept();
+}
+
+1;