lib/Rex/Helper/File/Stat/Unix.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 13 | 27 | 48.1 |
branch | n/a | ||
condition | n/a | ||
subroutine | 5 | 12 | 41.6 |
pod | 0 | 8 | 0.0 |
total | 18 | 47 | 38.3 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | # | ||||||
2 | # (c) Jan Gehring |
||||||
3 | # | ||||||
4 | |||||||
5 | package Rex::Helper::File::Stat::Unix; | ||||||
6 | |||||||
7 | 19 | 19 | 293 | use v5.12.5; | |||
19 | 98 | ||||||
8 | 19 | 19 | 125 | use warnings; | |||
19 | 46 | ||||||
19 | 985 | ||||||
9 | |||||||
10 | our $VERSION = '1.14.2.2'; # TRIAL VERSION | ||||||
11 | |||||||
12 | 19 | 19 | 161 | use Fcntl; | |||
19 | 64 | ||||||
19 | 7146 | ||||||
13 | |||||||
14 | 19 | 19 | 179 | use Rex::Helper::Run; | |||
19 | 64 | ||||||
19 | 6033 | ||||||
15 | |||||||
16 | sub S_ISDIR { | ||||||
17 | 0 | 0 | 0 | 0 | shift; | ||
18 | 0 | 0 | Fcntl::S_ISDIR(@_); | ||||
19 | } | ||||||
20 | |||||||
21 | sub S_ISREG { | ||||||
22 | 0 | 0 | 0 | 0 | shift; | ||
23 | 0 | 0 | Fcntl::S_ISREG(@_); | ||||
24 | } | ||||||
25 | |||||||
26 | sub S_ISLNK { | ||||||
27 | 0 | 0 | 0 | 0 | shift; | ||
28 | 0 | 0 | Fcntl::S_ISLNK(@_); | ||||
29 | } | ||||||
30 | |||||||
31 | sub S_ISBLK { | ||||||
32 | 0 | 0 | 0 | 0 | shift; | ||
33 | 0 | 0 | Fcntl::S_ISBLK(@_); | ||||
34 | } | ||||||
35 | |||||||
36 | sub S_ISCHR { | ||||||
37 | 0 | 0 | 0 | 0 | shift; | ||
38 | 0 | 0 | Fcntl::S_ISCHR(@_); | ||||
39 | } | ||||||
40 | |||||||
41 | sub S_ISFIFO { | ||||||
42 | 0 | 0 | 0 | 0 | shift; | ||
43 | 0 | 0 | Fcntl::S_ISFIFO(@_); | ||||
44 | } | ||||||
45 | |||||||
46 | sub S_ISSOCK { | ||||||
47 | 0 | 0 | 0 | 0 | shift; | ||
48 | 0 | 0 | Fcntl::S_ISSOCK(@_); | ||||
49 | } | ||||||
50 | |||||||
51 | sub S_IMODE { | ||||||
52 | 139 | 139 | 0 | 413 | shift; | ||
53 | 139 | 2994 | Fcntl::S_IMODE(@_); | ||||
54 | } | ||||||
55 | |||||||
56 | 1; |