Git/testssl.sh
1
0
Fork 0
mirror of https://github.com/drwetter/testssl.sh.git synced 2025-01-30 20:31:15 +01:00
Code Issues Packages Projects Releases Wiki Activity

Check file permissions on ./testssl.sh

Browse Source 
This commit adds a check that ./testssl.sh has both read and execute permission. If ./testssl.sh is lacking execute permission, it will pass the tests in 00_testssl_help.t and 01_testssl_banner.t that run the program as `bash ./testssl.sh`, but will fail the subsequent tests that run the program as `./testssl.sh`, but the reason for the failure will not be clear.
This commit is contained in:
David Cooper 2021-11-15 07:25:08 -05:00 committed by GitHub
parent 1b11575c28
commit 64d110f19d
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
t/00_testssl_help.t
View File

@ -4,6 +4,7 @@
use strict;
use Test::More;
use File::stat;
my $tests = 0;
my $fileout="";
@ -20,6 +21,15 @@ my $error_regexp4='command not found';
my $error_regexp5='(syntax error|unexpected token)';
printf "\n%s\n", "Testing whether just calling \"./testssl.sh\" produces no error ...";
my $info = stat($prg);
my $retMode = $info->mode;
is($retMode & 0400, 0400, "Checking \"./testssl.sh\" for read permission");
$tests++;
is($retMode & 0100, 0100, "Checking \"./testssl.sh\" for execute permission");
$tests++;
$fileout = `timeout 10 bash $prg 2>&1`;
my $retval=$?;