GothenburgBitFactory/taskwarrior
1
0
Fork 0
mirror of https://github.com/GothenburgBitFactory/taskwarrior.git synced 2025-06-26 10:54:26 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Unit Tests

Browse source 
- Converted to use the new template.
This commit is contained in:
Paul Beckingham 2014-10-27 22:03:57 -04:00
parent 52a6cfd4a0
commit 5586a3c8cc
1 changed files with 77 additions and 73 deletions
Download patch file Download diff file Expand all files Collapse all files

150
test/bulk.t
View file

@ -33,8 +33,12 @@ use Test::More tests => 42;
delete $ENV{'TASKDATA'}; delete $ENV{'TASKDATA'};
delete $ENV{'TASKRC'}; delete $ENV{'TASKRC'};
use File::Basename;
my $ut = basename ($0);
my $rc = $ut . '.rc';
# Create the rc file. # Create the rc file.
if (open my $fh, '>', 'bulk.rc') if (open my $fh, '>', $rc)
{ {
print $fh "data.location=.\n", print $fh "data.location=.\n",
"bulk=3\n"; "bulk=3\n";
@ -42,24 +46,24 @@ if (open my $fh, '>', 'bulk.rc')
} }
# Exercise bulk and non-bulk confirmations for 'delete' and 'modify'. # Exercise bulk and non-bulk confirmations for 'delete' and 'modify'.
qx{../src/task rc:bulk.rc add one 2>&1}; qx{../src/task rc:$rc add one 2>&1};
qx{../src/task rc:bulk.rc add two 2>&1}; qx{../src/task rc:$rc add two 2>&1};
qx{../src/task rc:bulk.rc add three 2>&1}; qx{../src/task rc:$rc add three 2>&1};
qx{../src/task rc:bulk.rc add four 2>&1}; qx{../src/task rc:$rc add four 2>&1};
qx{../src/task rc:bulk.rc add five 2>&1}; qx{../src/task rc:$rc add five 2>&1};
qx{../src/task rc:bulk.rc add six 2>&1}; qx{../src/task rc:$rc add six 2>&1};
qx{../src/task rc:bulk.rc add seven 2>&1}; qx{../src/task rc:$rc add seven 2>&1};
qx{../src/task rc:bulk.rc add eight 2>&1}; qx{../src/task rc:$rc add eight 2>&1};
qx{../src/task rc:bulk.rc add nine 2>&1}; qx{../src/task rc:$rc add nine 2>&1};
qx{../src/task rc:bulk.rc add ten 2>&1}; qx{../src/task rc:$rc add ten 2>&1};
qx{../src/task rc:bulk.rc add eleven 2>&1}; qx{../src/task rc:$rc add eleven 2>&1};
qx{../src/task rc:bulk.rc add twelve 2>&1}; qx{../src/task rc:$rc add twelve 2>&1};
qx{../src/task rc:bulk.rc add thirteen 2>&1}; qx{../src/task rc:$rc add thirteen 2>&1};
qx{../src/task rc:bulk.rc add fourteen 2>&1}; qx{../src/task rc:$rc add fourteen 2>&1};
qx{../src/task rc:bulk.rc add fifteen 2>&1}; qx{../src/task rc:$rc add fifteen 2>&1};
qx{../src/task rc:bulk.rc add sixteen 2>&1}; qx{../src/task rc:$rc add sixteen 2>&1};
qx{../src/task rc:bulk.rc add seventeen 2>&1}; qx{../src/task rc:$rc add seventeen 2>&1};
qx{../src/task rc:bulk.rc add eighteen 2>&1}; qx{../src/task rc:$rc add eighteen 2>&1};
# The 'delete' command is used, but it could be any write command. # 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 # 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: # 'yes' tests:
# Test with 1 task. 1 is a special case. # 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}; my $output = qx{echo 'y' | ../src/task rc:$rc rc.confirmation=off 1 delete 2>&1};
unlike ($output, qr/\(yes\/no\)/, 'Single delete with no confirmation'); unlike ($output, qr/\(yes\/no\)/, "$ut: Single delete with no confirmation");
unlike ($output, qr/\(yes\/no\/all\/quit\)/, 'Single delete with no bulk confirmation'); unlike ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Single delete with no bulk confirmation");
like ($output, qr/Deleting task 1/, 'Verified delete 1'); 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}; $output = qx{echo 'y' | ../src/task rc:$rc rc.confirmation=on 2 delete 2>&1};
like ($output, qr/\(yes\/no\)/, 'Single delete with confirmation'); like ($output, qr/\(yes\/no\)/, "$ut: Single delete with confirmation");
unlike ($output, qr/\(yes\/no\/all\/quit\)/, 'Single delete with no bulk confirmation'); unlike ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Single delete with no bulk confirmation");
like ($output, qr/Deleting task 2/, 'Verified delete 2'); like ($output, qr/Deleting task 2/, "$ut: Verified delete 2");
# Test with 2 tasks. 2 is greater than 1 and less than bulk. # 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}; $output = qx{echo 'y' | ../src/task rc:$rc rc.confirmation=off 3-4 delete 2>&1};
unlike ($output, qr/\(yes\/no\)/, 'Multiple delete with no confirmation'); unlike ($output, qr/\(yes\/no\)/, "$ut: Multiple delete with no confirmation");
unlike ($output, qr/\(yes\/no\/all\/quit\)/, 'Multiple delete with no bulk confirmation'); unlike ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Multiple delete with no bulk confirmation");
like ($output, qr/Deleting task 3/, 'Verified delete 3'); like ($output, qr/Deleting task 3/, "$ut: Verified delete 3");
like ($output, qr/Deleting task 4/, 'Verified delete 4'); 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}; $output = qx{printf 'y\ny\n' | ../src/task rc:$rc rc.confirmation=on 5-6 delete 2>&1};
unlike ($output, qr/\(yes\/no\)/, 'Multiple delete with confirmation'); unlike ($output, qr/\(yes\/no\)/, "$ut: Multiple delete with confirmation");
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Multiple delete with bulk confirmation'); like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Multiple delete with bulk confirmation");
like ($output, qr/Deleting task 5/, 'Verified delete 5'); like ($output, qr/Deleting task 5/, "$ut: Verified delete 5");
like ($output, qr/Deleting task 6/, 'Verified delete 6'); like ($output, qr/Deleting task 6/, "$ut: Verified delete 6");
# Test with 3 tasks. 3 is considered bulk. # 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}; $output = qx{printf 'y\ny\ny\n' | ../src/task rc:$rc rc.confirmation=off 7-9 delete 2>&1};
unlike ($output, qr/\(yes\/no\)/, 'Bulk delete with no confirmation'); unlike ($output, qr/\(yes\/no\)/, "$ut: Bulk delete with no confirmation");
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Bulk delete with no bulk confirmation'); like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Bulk delete with no bulk confirmation");
like ($output, qr/Deleting task 7/, 'Verified delete 7'); like ($output, qr/Deleting task 7/, "$ut: Verified delete 7");
like ($output, qr/Deleting task 8/, 'Verified delete 8'); like ($output, qr/Deleting task 8/, "$ut: Verified delete 8");
like ($output, qr/Deleting task 9/, 'Verified delete 9'); 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}; $output = qx{printf 'y\ny\ny\n' | ../src/task rc:$rc rc.confirmation=on 10-12 delete 2>&1};
unlike ($output, qr/\(yes\/no\)/, 'Bulk delete with confirmation'); unlike ($output, qr/\(yes\/no\)/, "$ut: Bulk delete with confirmation");
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Bulk delete with bulk confirmation'); like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Bulk delete with bulk confirmation");
like ($output, qr/Deleting task 10/, 'Verified delete 10'); like ($output, qr/Deleting task 10/, "$ut: Verified delete 10");
like ($output, qr/Deleting task 11/, 'Verified delete 11'); like ($output, qr/Deleting task 11/, "$ut: Verified delete 11");
like ($output, qr/Deleting task 12/, 'Verified delete 12'); like ($output, qr/Deleting task 12/, "$ut: Verified delete 12");
# 'no' tests: # 'no' tests:
# Test with 1 task, denying delete. # Test with 1 task, denying delete.
$output = qx{echo 'n' | ../src/task rc:bulk.rc rc.confirmation=on 13 delete 2>&1}; $output = qx{echo 'n' | ../src/task rc:$rc rc.confirmation=on 13 delete 2>&1};
like ($output, qr/\(yes\/no\)/, 'Single delete with confirmation'); like ($output, qr/\(yes\/no\)/, "$ut: Single delete with confirmation");
unlike ($output, qr/\(yes\/no\/all\/quit\)/, 'Single delete with no bulk confirmation'); unlike ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Single delete with no bulk confirmation");
unlike ($output, qr/Deleting task/, 'Verified no delete 13'); unlike ($output, qr/Deleting task/, "$ut: Verified no delete 13");
# Test with 2 tasks, denying delete. # 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}; $output = qx{printf 'n\nn\n' | ../src/task rc:$rc rc.confirmation=on 13-14 delete 2>&1};
unlike ($output, qr/\(yes\/no\)/, 'Multiple delete with confirmation'); unlike ($output, qr/\(yes\/no\)/, "$ut: Multiple delete with confirmation");
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Multiple delete with no bulk confirmation'); like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Multiple delete with no bulk confirmation");
unlike ($output, qr/Deleting task/, 'Verified no delete 13-14'); unlike ($output, qr/Deleting task/, "$ut: Verified no delete 13-14");
# Test with 3 tasks, denying delete. # 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}; $output = qx{printf 'n\nn\nn\n' | ../src/task rc:$rc rc.confirmation=on 13-15 delete 2>&1};
unlike ($output, qr/\(yes\/no\)/, 'Bulk delete with confirmation'); unlike ($output, qr/\(yes\/no\)/, "$ut: Bulk delete with confirmation");
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Bulk delete with no bulk confirmation'); like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Bulk delete with no bulk confirmation");
unlike ($output, qr/Deleting task/, 'Verified no delete 13-15'); unlike ($output, qr/Deleting task/, "$ut: Verified no delete 13-15");
# 'all' tests: # 'all' tests:
$output = qx{echo 'all' | ../src/task rc:bulk.rc rc.confirmation=on 13-15 delete 2>&1}; $output = qx{echo 'all' | ../src/task rc:$rc rc.confirmation=on 13-15 delete 2>&1};
unlike ($output, qr/\(yes\/no\)/, 'Bulk delete with confirmation'); unlike ($output, qr/\(yes\/no\)/, "$ut: Bulk delete with confirmation");
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Bulk delete with bulk confirmation'); like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Bulk delete with bulk confirmation");
like ($output, qr/Deleting task 13/, 'Verified delete 13'); like ($output, qr/Deleting task 13/, "$ut: Verified delete 13");
like ($output, qr/Deleting task 14/, 'Verified delete 14'); like ($output, qr/Deleting task 14/, "$ut: Verified delete 14");
like ($output, qr/Deleting task 15/, 'Verified delete 15'); like ($output, qr/Deleting task 15/, "$ut: Verified delete 15");
# 'quit' tests: # 'quit' tests:
$output = qx{echo 'quit' | ../src/task rc:bulk.rc rc.confirmation=on 16-18 delete 2>&1}; $output = qx{echo 'quit' | ../src/task rc:$rc rc.confirmation=on 16-18 delete 2>&1};
unlike ($output, qr/\(yes\/no\)/, 'Bulk delete with no confirmation'); unlike ($output, qr/\(yes\/no\)/, "$ut: Bulk delete with no confirmation");
like ($output, qr/\(yes\/no\/all\/quit\)/, 'Bulk delete with no bulk confirmation'); like ($output, qr/\(yes\/no\/all\/quit\)/, "$ut: Bulk delete with no bulk confirmation");
like ($output, qr/Deleted 0 tasks./, 'No task deleted'); like ($output, qr/Deleted 0 tasks./, "$ut: No task deleted");
unlike ($output, qr/delete task 17/, 'No question asked for subsequent tasks'); unlike ($output, qr/delete task 17/, "$ut: No question asked for subsequent tasks");
# Cleanup. # 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; exit 0;