package fedoralog;
use base 'basetest';

use testapi;

sub post_fail_hook() {
    my $self = shift;
    my $password = get_var("ROOT_PASSWORD", "weakpassword");

    send_key "ctrl-alt-f2";
    assert_screen "text_console_login", 20;
    type_string "root";
    send_key "ret";
    assert_screen "console_password_required", 10;
    type_string $password;
    send_key "ret";

    assert_screen "root_logged_in", 10;

    # Upload all ABRT logs
    type_string "cd /var/tmp/abrt && tar czvf abrt.tar.gz *";
    send_key "ret";
    upload_logs "/var/tmp/abrt/abrt.tar.gz";

    # Upload /var/log
    type_string "tar czvf /tmp/var_log.tar.gz /var/log";
    send_key "ret";
    upload_logs "/tmp/var_log.tar.gz";
}

1;

# vim: set sw=4 et: