mirror of
https://github.com/GothenburgBitFactory/taskwarrior.git
synced 2025-06-26 10:54:26 +02:00
Unit Tests
- Converted to use the new template.
This commit is contained in:
Paul Beckingham
parent
52a6cfd4a0
commit
5586a3c8cc
1 changed files with 77 additions and 73 deletions
150
test/bulk.t
150
test/bulk.t
|
|
@ -33,8 +33,12 @@ use Test::More tests => 42;
|
|||
delete $ENV{'TASKDATA'};
|
||||
delete $ENV{'TASKRC'};
|
||||
|
||||
use File::Basename;
|
||||
my $ut = basename ($0);
|
||||
my $rc = $ut . '.rc';
|
||||
|
||||
# Create the rc file.
|
||||
if (open my $fh, '>', 'bulk.rc')
|
||||
if (open my $fh, '>', $rc)
|
||||
{
|
||||
print $fh "data.location=.\n",
|
||||
"bulk=3\n";
|
||||
|
|
@ -42,24 +46,24 @@ if (open my $fh, '>', 'bulk.rc')
|
|||
}
|
||||
|
||||
# Exercise bulk and non-bulk confirmations for 'delete' and 'modify'.
|
||||
qx{../src/task rc:bulk.rc add one 2>&1};
|
||||
qx{../src/task rc:bulk.rc add two 2>&1};
|
||||
qx{../src/task rc:bulk.rc add three 2>&1};
|
||||
qx{../src/task rc:bulk.rc add four 2>&1};
|
||||
qx{../src/task rc:bulk.rc add five 2>&1};
|
||||
qx{../src/task rc:bulk.rc add six 2>&1};
|
||||
qx{../src/task rc:bulk.rc add seven 2>&1};
|
||||
qx{../src/task rc:bulk.rc add eight 2>&1};
|
||||
qx{../src/task rc:bulk.rc add nine 2>&1};
|
||||
qx{../src/task rc:bulk.rc add ten 2>&1};
|
||||
qx{../src/task rc:bulk.rc add eleven 2>&1};
|
||||
qx{../src/task rc:bulk.rc add twelve 2>&1};
|
||||
qx{../src/task rc:bulk.rc add thirteen 2>&1};
|
||||
qx{../src/task rc:bulk.rc add fourteen 2>&1};
|
||||
qx{../src/task rc:bulk.rc add fifteen 2>&1};
|
||||
qx{../src/task rc:bulk.rc add sixteen 2>&1};
|
||||
qx{../src/task rc:bulk.rc add seventeen 2>&1};
|
||||
qx{../src/task rc:bulk.rc add eighteen 2>&1};
|
||||
qx{../src/task rc:$rc add one 2>&1};
|
||||
qx{../src/task rc:$rc add two 2>&1};
|
||||
qx{../src/task rc:$rc add three 2>&1};
|
||||
qx{../src/task rc:$rc add four 2>&1};
|
||||
qx{../src/task rc:$rc add five 2>&1};
|
||||
qx{../src/task rc:$rc add six 2>&1};
|
||||
qx{../src/task rc:$rc add seven 2>&1};
|
||||
qx{../src/task rc:$rc add eight 2>&1};
|
||||
qx{../src/task rc:$rc add nine 2>&1};
|
||||
qx{../src/task rc:$rc add ten 2>&1};
|
||||
qx{../src/task rc:$rc add eleven 2>&1};
|
||||
qx{../src/task rc:$rc add twelve 2>&1};
|
||||
qx{../src/task rc:$rc add thirteen 2>&1};
|
||||
qx{../src/task rc:$rc add fourteen 2>&1};
|
||||
qx{../src/task rc:$rc add fifteen 2>&1};
|
||||
qx{../src/task rc:$rc add sixteen 2>&1};
|
||||
qx{../src/task rc:$rc add seventeen 2>&1};
|
||||
qx{../src/task rc:$rc add eighteen 2>&1};
|
||||
|
||||
# The 'delete' command is used, but it could be any write command.
|
||||
# Note that 'y' is passed to task despite rc.confirmation=off. This allows
|
||||
|
|
@ -68,80 +72,80 @@ qx{../src/task rc:bulk.rc add eighteen 2>&1};
|
|||
# 'yes' tests:
|
||||
|
||||
# Test with 1 task. 1 is a special case.
|
||||
my $output = qx{echo 'y' | ../src/task rc:bulk.rc rc.confirmation=off 1 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, 'Single delete with no confirmation');
|
||||
unlike ($output, qr/\(yes\/no\/all\/quit\)/, 'Single delete with no bulk confirmation');
|
||||
like ($output, qr/Deleting task 1/, 'Verified delete 1');
|
||||
my $output = qx{echo 'y' | ../src/task rc:$rc rc.confirmation=off 1 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, "$ut: Single delete with no confirmation");
|
||||
unlike ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Single delete with no bulk confirmation");
|
||||
like ($output, qr/Deleting task 1/, "$ut: Verified delete 1");
|
||||
|
||||
$output = qx{echo 'y' | ../src/task rc:bulk.rc rc.confirmation=on 2 delete 2>&1};
|
||||
like ($output, qr/\(yes\/no\)/, 'Single delete with confirmation');
|
||||
unlike ($output, qr/\(yes\/no\/all\/quit\)/, 'Single delete with no bulk confirmation');
|
||||
like ($output, qr/Deleting task 2/, 'Verified delete 2');
|
||||
$output = qx{echo 'y' | ../src/task rc:$rc rc.confirmation=on 2 delete 2>&1};
|
||||
like ($output, qr/\(yes\/no\)/, "$ut: Single delete with confirmation");
|
||||
unlike ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Single delete with no bulk confirmation");
|
||||
like ($output, qr/Deleting task 2/, "$ut: Verified delete 2");
|
||||
|
||||
# Test with 2 tasks. 2 is greater than 1 and less than bulk.
|
||||
$output = qx{echo 'y' | ../src/task rc:bulk.rc rc.confirmation=off 3-4 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, 'Multiple delete with no confirmation');
|
||||
unlike ($output, qr/\(yes\/no\/all\/quit\)/, 'Multiple delete with no bulk confirmation');
|
||||
like ($output, qr/Deleting task 3/, 'Verified delete 3');
|
||||
like ($output, qr/Deleting task 4/, 'Verified delete 4');
|
||||
$output = qx{echo 'y' | ../src/task rc:$rc rc.confirmation=off 3-4 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, "$ut: Multiple delete with no confirmation");
|
||||
unlike ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Multiple delete with no bulk confirmation");
|
||||
like ($output, qr/Deleting task 3/, "$ut: Verified delete 3");
|
||||
like ($output, qr/Deleting task 4/, "$ut: Verified delete 4");
|
||||
|
||||
$output = qx{printf 'y\ny\n' | ../src/task rc:bulk.rc rc.confirmation=on 5-6 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, 'Multiple delete with confirmation');
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Multiple delete with bulk confirmation');
|
||||
like ($output, qr/Deleting task 5/, 'Verified delete 5');
|
||||
like ($output, qr/Deleting task 6/, 'Verified delete 6');
|
||||
$output = qx{printf 'y\ny\n' | ../src/task rc:$rc rc.confirmation=on 5-6 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, "$ut: Multiple delete with confirmation");
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Multiple delete with bulk confirmation");
|
||||
like ($output, qr/Deleting task 5/, "$ut: Verified delete 5");
|
||||
like ($output, qr/Deleting task 6/, "$ut: Verified delete 6");
|
||||
|
||||
# Test with 3 tasks. 3 is considered bulk.
|
||||
$output = qx{printf 'y\ny\ny\n' | ../src/task rc:bulk.rc rc.confirmation=off 7-9 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, 'Bulk delete with no confirmation');
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Bulk delete with no bulk confirmation');
|
||||
like ($output, qr/Deleting task 7/, 'Verified delete 7');
|
||||
like ($output, qr/Deleting task 8/, 'Verified delete 8');
|
||||
like ($output, qr/Deleting task 9/, 'Verified delete 9');
|
||||
$output = qx{printf 'y\ny\ny\n' | ../src/task rc:$rc rc.confirmation=off 7-9 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, "$ut: Bulk delete with no confirmation");
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Bulk delete with no bulk confirmation");
|
||||
like ($output, qr/Deleting task 7/, "$ut: Verified delete 7");
|
||||
like ($output, qr/Deleting task 8/, "$ut: Verified delete 8");
|
||||
like ($output, qr/Deleting task 9/, "$ut: Verified delete 9");
|
||||
|
||||
$output = qx{printf 'y\ny\ny\n' | ../src/task rc:bulk.rc rc.confirmation=on 10-12 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, 'Bulk delete with confirmation');
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Bulk delete with bulk confirmation');
|
||||
like ($output, qr/Deleting task 10/, 'Verified delete 10');
|
||||
like ($output, qr/Deleting task 11/, 'Verified delete 11');
|
||||
like ($output, qr/Deleting task 12/, 'Verified delete 12');
|
||||
$output = qx{printf 'y\ny\ny\n' | ../src/task rc:$rc rc.confirmation=on 10-12 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, "$ut: Bulk delete with confirmation");
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Bulk delete with bulk confirmation");
|
||||
like ($output, qr/Deleting task 10/, "$ut: Verified delete 10");
|
||||
like ($output, qr/Deleting task 11/, "$ut: Verified delete 11");
|
||||
like ($output, qr/Deleting task 12/, "$ut: Verified delete 12");
|
||||
|
||||
# 'no' tests:
|
||||
|
||||
# Test with 1 task, denying delete.
|
||||
$output = qx{echo 'n' | ../src/task rc:bulk.rc rc.confirmation=on 13 delete 2>&1};
|
||||
like ($output, qr/\(yes\/no\)/, 'Single delete with confirmation');
|
||||
unlike ($output, qr/\(yes\/no\/all\/quit\)/, 'Single delete with no bulk confirmation');
|
||||
unlike ($output, qr/Deleting task/, 'Verified no delete 13');
|
||||
$output = qx{echo 'n' | ../src/task rc:$rc rc.confirmation=on 13 delete 2>&1};
|
||||
like ($output, qr/\(yes\/no\)/, "$ut: Single delete with confirmation");
|
||||
unlike ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Single delete with no bulk confirmation");
|
||||
unlike ($output, qr/Deleting task/, "$ut: Verified no delete 13");
|
||||
|
||||
# Test with 2 tasks, denying delete.
|
||||
$output = qx{printf 'n\nn\n' | ../src/task rc:bulk.rc rc.confirmation=on 13-14 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, 'Multiple delete with confirmation');
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Multiple delete with no bulk confirmation');
|
||||
unlike ($output, qr/Deleting task/, 'Verified no delete 13-14');
|
||||
$output = qx{printf 'n\nn\n' | ../src/task rc:$rc rc.confirmation=on 13-14 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, "$ut: Multiple delete with confirmation");
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Multiple delete with no bulk confirmation");
|
||||
unlike ($output, qr/Deleting task/, "$ut: Verified no delete 13-14");
|
||||
|
||||
# Test with 3 tasks, denying delete.
|
||||
$output = qx{printf 'n\nn\nn\n' | ../src/task rc:bulk.rc rc.confirmation=on 13-15 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, 'Bulk delete with confirmation');
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Bulk delete with no bulk confirmation');
|
||||
unlike ($output, qr/Deleting task/, 'Verified no delete 13-15');
|
||||
$output = qx{printf 'n\nn\nn\n' | ../src/task rc:$rc rc.confirmation=on 13-15 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, "$ut: Bulk delete with confirmation");
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Bulk delete with no bulk confirmation");
|
||||
unlike ($output, qr/Deleting task/, "$ut: Verified no delete 13-15");
|
||||
|
||||
# 'all' tests:
|
||||
$output = qx{echo 'all' | ../src/task rc:bulk.rc rc.confirmation=on 13-15 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, 'Bulk delete with confirmation');
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Bulk delete with bulk confirmation');
|
||||
like ($output, qr/Deleting task 13/, 'Verified delete 13');
|
||||
like ($output, qr/Deleting task 14/, 'Verified delete 14');
|
||||
like ($output, qr/Deleting task 15/, 'Verified delete 15');
|
||||
$output = qx{echo 'all' | ../src/task rc:$rc rc.confirmation=on 13-15 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, "$ut: Bulk delete with confirmation");
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Bulk delete with bulk confirmation");
|
||||
like ($output, qr/Deleting task 13/, "$ut: Verified delete 13");
|
||||
like ($output, qr/Deleting task 14/, "$ut: Verified delete 14");
|
||||
like ($output, qr/Deleting task 15/, "$ut: Verified delete 15");
|
||||
|
||||
# 'quit' tests:
|
||||
$output = qx{echo 'quit' | ../src/task rc:bulk.rc rc.confirmation=on 16-18 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, 'Bulk delete with no confirmation');
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Bulk delete with no bulk confirmation');
|
||||
like ($output, qr/Deleted 0 tasks./, 'No task deleted');
|
||||
unlike ($output, qr/delete task 17/, 'No question asked for subsequent tasks');
|
||||
$output = qx{echo 'quit' | ../src/task rc:$rc rc.confirmation=on 16-18 delete 2>&1};
|
||||
unlike ($output, qr/\(yes\/no\)/, "$ut: Bulk delete with no confirmation");
|
||||
like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Bulk delete with no bulk confirmation");
|
||||
like ($output, qr/Deleted 0 tasks./, "$ut: No task deleted");
|
||||
unlike ($output, qr/delete task 17/, "$ut: No question asked for subsequent tasks");
|
||||
|
||||
# Cleanup.
|
||||
unlink qw(pending.data completed.data undo.data backlog.data bulk.rc);
|
||||
unlink qw(pending.data completed.data undo.data backlog.data), $rc;
|
||||
exit 0;
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue