From 9b255a188cc411228f646002d0e6e169485ddbc5 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 17 Nov 2006 16:43:38 +0000 Subject: add some tests on empty header, buggy header, empty hdlist --- t/parse.t | 18 +++++++++++++++++- 1 file changed, 17 insertions(+), 1 deletion(-) (limited to 't') diff --git a/t/parse.t b/t/parse.t index d62b34f..c44d756 100644 --- a/t/parse.t +++ b/t/parse.t @@ -4,7 +4,7 @@ use strict; use warnings; -use Test::More tests => 35; +use Test::More tests => 39; use MDV::Packdrakeng; use URPM; use URPM::Build; @@ -33,6 +33,22 @@ TODO: { q/get headers from parsing rpm/); } +system('touch t/headers/empty'); +is(URPM->new->parse_hdlist('t/headers/empty'), undef, 'empty header'); +system('echo FOO > t/headers/bad'); +is(URPM->new->parse_hdlist('t/headers/bad'), undef, 'bad rpm header'); + +$a->build_hdlist( + start => 0, + end => -1, + hdlist => 't/empty_hdlist.cz', +); +ok(-f 't/empty_hdlist.cz'); + +($start, $end) = URPM->new->parse_hdlist('t/empty_hdlist.cz'); +is("$start $end", "0 -1", 'empty hdlist'); + + $a->build_hdlist( start => 0, end => $#{$a->{depslist}}, -- cgit v1.2.1