NAME Test::Archive::Libarchive - Testing tools for Archive::Libarchive VERSION version 0.02 SYNOPSIS use Test2::V0; use Archive::Libarchive; use Test::Archive::Libarchive; use Path::Tiny qw( path ); my $w = Archive::Libarchive->new; la_ok $w, 'add_filter_gzip'; la_ok $w, 'set_format_pax_restricted'; la_ok $w, 'open_filename' => ['foo.tar.gz']; my $e = Archive::Libarchive::Entry->new; $e->set_pathname(__FILE__); $e->set_size(-s __FILE__); $e->set_filetype('reg'); la_ok $w, 'write_header' => [$e]; is($w->write_data(path(__FILE__)->slurp_raw), -s __FILE__); la_ok $w, 'close'; done_testing; DESCRIPTION Error handling for libarchive and Archive::Libarchive is fairly primitive. Most methods return an int which correspond to ARCHIVE_EOF, ARCHIVE_OK, ARCHIVE_RETRY, ARCHIVE_WARN, ARCHIVE_FAILED or ARCHIVE_FATAL. Some methods will also return the number of actual bytes written on success and one of these codes on failure. It can be tedious doing the necessary checks for each method call in a test, so this module provides tools for testing Archive::Libarchive method calls that follow this pattern. FUNCTIONS la_ok la_ok $a, $method; la_ok $a, $method, \@arguments; la_ok $a, $method, \@arguments, $test_name; Tests that calling the method $method on the archive object $a returns ARCHIVE_OK. This indicates a successful method call. la_eof la_eof $a, $method; la_eof $a, $method, \@arguments; la_eof $a, $method, \@arguments, $test_name; Tests that calling the method $method on the archive object $a returns ARCHIVE_EOF. This is for when you reach the end of the archive or a file. la_warn la_warn $a, $method; la_warn $a, $method, \@arguments; la_warn $a, $method, \@arguments, $test_name; Tests that calling the method $method on the archive object $a returns ARCHIVE_WARN. This indicates a possible problem, but things are still working. la_retry la_retry $a, $method; la_retry $a, $method, \@arguments; la_retry $a, $method, \@arguments, $test_name; Tests that calling the method $method on the archive object $a returns ARCHIVE_RETRY. This indicates that a retry might succeed. la_failed la_failed $a, $method; la_failed $a, $method, \@arguments; la_failed $a, $method, \@arguments, $test_name; Tests that calling the method $method on the archive object $a returns ARCHIVE_RETRY. Operation failed. la_fatal la_failed $a, $method; la_failed $a, $method, \@arguments; la_failed $a, $method, \@arguments, $test_name; Tests that calling the method $method on the archive object $a returns ARCHIVE_RETRY. Operation failed so badly that the archive object is no longer usable. la_read_data_ok my $content = la_read_data_ok $a; my $content = la_read_data_ok $a, $test_name; Tests that the data can be read from the archive. The entire content section will be read and returned on success. If there is a failure during the read then the test will fail. CAVEATS Not all methods in Archive::Libarchive return a result code like this. Some like write_data return the number of bytes on success. SEE ALSO Archive::Libarchive AUTHOR Graham Ollis COPYRIGHT AND LICENSE This software is copyright (c) 2021 by Graham Ollis. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.