use base "installedtest";
use strict;
use testapi;

sub run {
    my $self=shift;
    if (not( check_screen "root_console", 0)) {
        $self->root_console(tty=>3);
    }
    # this only succeeds if the firewall is running
    assert_script_run 'firewall-cmd --state';
    # these succeed if the specified service/port is allowed
    assert_script_run 'firewall-cmd --query-service ftp';
    assert_script_run 'firewall-cmd --query-port imap/tcp';
    assert_script_run 'firewall-cmd --query-port 1234/udp';
    assert_script_run 'firewall-cmd --query-port 47/tcp';
}

sub test_flags {
    return { fatal => 1 };
}

1;

# vim: set sw=4 et: