4a0a212884
OBS-URL: https://build.opensuse.org/package/show/devel:languages:perl/perl-Test-HexString?expand=0&rev=1
92 lines
3.2 KiB
RPMSpec
92 lines
3.2 KiB
RPMSpec
#
|
|
# spec file for package perl-Test-HexString (Version 0.02)
|
|
#
|
|
# Copyright (c) 2011 SUSE LINUX Products GmbH, Nuernberg, Germany.
|
|
#
|
|
# All modifications and additions to the file contributed by third parties
|
|
# remain the property of their copyright owners, unless otherwise agreed
|
|
# upon. The license for this file, and modifications and additions to the
|
|
# file, is the same license as for the pristine package itself (unless the
|
|
# license for the pristine package is not an Open Source License, in which
|
|
# case the license is the MIT License). An "Open Source License" is a
|
|
# license that conforms to the Open Source Definition (Version 1.9)
|
|
# published by the Open Source Initiative.
|
|
|
|
# Please submit bugfixes or comments via http://bugs.opensuse.org/
|
|
#
|
|
|
|
Name: perl-Test-HexString
|
|
Version: 0.02
|
|
Release: 1
|
|
License: GPL+ or Artistic
|
|
%define cpan_name Test-HexString
|
|
Summary: test binary strings with hex dump diagnostics
|
|
Url: http://search.cpan.org/dist/Test-HexString/
|
|
Group: Development/Libraries/Perl
|
|
Source: http://www.cpan.org/authors/id/P/PE/PEVANS/%{cpan_name}-%{version}.tar.gz
|
|
BuildArch: noarch
|
|
BuildRoot: %{_tmppath}/%{name}-%{version}-build
|
|
BuildRequires: perl
|
|
BuildRequires: perl-macros
|
|
BuildRequires: perl(Module::Build)
|
|
%{perl_requires}
|
|
|
|
%description
|
|
This testing module provides a single function, 'is_hexstr()', which
|
|
asserts that the given string matches what was expected. When the strings
|
|
match (i.e. compare equal using the 'eq' operator), the behaviour is
|
|
identical to the usual 'is()' function provided by 'Test::More'.
|
|
|
|
When the strings are different, a hex dump is produced as diagnostic,
|
|
rather than the string values being printed raw. This may be beneficial if
|
|
the string contains largely binary data, such as may be produced by binary
|
|
file or network protocol modules.
|
|
|
|
To print the hex dump when it fails, each string is broken into 16 byte
|
|
chunks. The first pair of chunks that fail to match are then printed, in
|
|
both hexadecimal and character form, in a message in the following format:
|
|
|
|
# Failed test at -e line 1.
|
|
# at bytes 0-0xf (0-15)
|
|
# got: | 61 20 6c 6f 6e 67 20 73 74 72 69 6e 67 20 68 65 |a long string he|
|
|
# exp: | 61 20 6c 6f 6e 67 20 53 74 72 69 6e 67 20 68 65 |a long String he|
|
|
# Looks like you failed 1 test of 1.
|
|
|
|
Only bytes in the range '0x20-0x7e' are printed as literal characters. Any
|
|
other byte is rendered as '.':
|
|
|
|
# Failed test at -e line 1.
|
|
# at bytes 0-0xf (0-15)
|
|
# got: | 00 01 02 03 04 05 06 07 08 09 0a 0b 0c 0d 0e 0f |................|
|
|
# exp: | 01 02 03 04 05 06 07 08 09 0a 0b 0c 0d 0e 0f 10 |................|
|
|
# Looks like you failed 1 test of 1.
|
|
|
|
Only the first differing line is printed; because otherwise it may result
|
|
in a long output because of misaligned bytes.
|
|
|
|
If STDOUT is a terminal, then different bytes are printed in bold for
|
|
visibility.
|
|
|
|
%prep
|
|
%setup -q -n %{cpan_name}-%{version}
|
|
|
|
%build
|
|
%{__perl} Build.PL installdirs=vendor
|
|
./Build build flags=%{?_smp_mflags}
|
|
|
|
%check
|
|
./Build test
|
|
|
|
%install
|
|
./Build install destdir=%{buildroot} create_packlist=0
|
|
%perl_gen_filelist
|
|
|
|
%clean
|
|
%{__rm} -rf %{buildroot}
|
|
|
|
%files -f %{name}.files
|
|
%defattr(-,root,root,755)
|
|
%doc Changes LICENSE README
|
|
|
|
%changelog
|