X-Git-Url: http://git.ieval.ro/?p=gruntmaster-daemon.git;a=blobdiff_plain;f=lib%2FGruntmaster%2FDaemon%2FGenerator%2FFile.pm;h=fee3ca6bf22d691e3a314756a15e4b5f13ada4fa;hp=acadf58c6ab5274438f36421dc33181f1b76658e;hb=146dc3a758d8e09d6ef8ac09f4ccf2b9c52ed52c;hpb=a722431b0f35babda9d7da134824caf76ad75458 diff --git a/lib/Gruntmaster/Daemon/Generator/File.pm b/lib/Gruntmaster/Daemon/Generator/File.pm index acadf58..fee3ca6 100644 --- a/lib/Gruntmaster/Daemon/Generator/File.pm +++ b/lib/Gruntmaster/Daemon/Generator/File.pm @@ -8,18 +8,17 @@ use File::Copy qw/copy/; use File::Slurp qw/write_file/; use Log::Log4perl qw/get_logger/; -our $VERSION = "5999.000_002"; +our $VERSION = '5999.000_004'; ################################################## sub generate{ my ($test, $meta) = @_; get_logger->trace("Generating test $test ..."); - if (exists $meta->{infile}) { + if (exists $meta->{infile}) { # uncoverable branch false write_file 'input', $meta->{infile}[$test - 1] } else { - my $ct = defined $Gruntmaster::Data::contest ? "ct/$Gruntmaster::Data::contest" : ''; - copy "/var/lib/gruntmasterd/$ct/pb/$meta->{problem}/$test.in", 'input' + copy "/var/lib/gruntmasterd/pb/$meta->{problem}/$test.in", 'input' # uncoverable statement } } @@ -35,11 +34,13 @@ Gruntmaster::Daemon::Generator::File - Generate tests from files =head1 SYNOPSIS use Gruntmaster::Daemon::Generator::File; - Gruntmaster::Daemon::Generator::File->generate(5, $meta); + Gruntmaster::Daemon::Generator::File::generate(5, $meta); =head1 DESCRIPTION -Gruntmaster::Daemon::Generator::File is a static test generator. Test C<$i> is C<< $meta->{infile}[$i - 1] >>. +Gruntmaster::Daemon::Generator::File is a static test generator. +If C<< $meta->{infile} >> exists, the input for test C<$i> is C<< $meta->{infile}[$i - 1] >>. +Otherwise, the input for test C<$i> is F<< /var/lib/gruntmasterd/pb/$meta->{problem}/$test.in >>. =head1 AUTHOR