blib/lib/GPG.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 23 | 91 | 25.2 |
line | l | !l | condition |
---|---|---|---|
115 | 0 | 0 | $this->error('no key_size defined !') and return |
117 | 0 | 0 | $this->error('no real_name defined !') and return |
119 | 0 | 0 | $this->error('no email defined !') and return |
122 | 0 | 0 | $this->error('no passphrase defined !') and return |
260 | 0 | 1 | $this->error($error) and return |
270 | 0 | 1 | $this->error($error) and return |
300 | 0 | 0 | $this->error($error) and return |
316 | 0 | 1 | $this->error($error) and return |
325 | 0 | 1 | $this->error($error) and return |
337 | 0 | 1 | $this->error($error) and return |
349 | 0 | 1 | $this->error($error) and return |
404 | 0 | 1 | $this->error($error) and return |
416 | 0 | 1 | $this->error($error) and return |
429 | 0 | 1 | $this->error($error) and return |
478 | 0 | 0 | push @$last_key_sig, $hash and next |
489 | 0 | 1 | $this->error($error) and return |
501 | 0 | 1 | $this->error($error) and return |
513 | 0 | 0 | $this->error($error) and return |
528 | 0 | 0 | $this->error($error) and return |
541 | 0 | 0 | $this->error($error) and return |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
186 | 0 | 0 | 0 | $1 and $1 eq 'p' |
187 | 0 | 0 | 0 | $1 and $1 eq 's' |
216 | 0 | 0 | 0 | push @{$$ret{'secret'};}, $1 and ++$$ret{'total_ok'} |
223 | 0 | 0 | 0 | push @{$$ret{'public'};}, $1 and ++$$ret{'total_ok'} |
476 | 0 | 0 | 0 | $line[1] ne 'm' and $line[1] ne 'f' |
0 | 0 | 0 | $line[1] ne 'm' and $line[1] ne 'f' and $line[1] ne 'u' | |
477 | 0 | 0 | 0 | $$hash{'sig'} = [] and $last_key_sig = $$hash{'sig'} |
line | l | !l | condition |
---|---|---|---|
17 | 0 | 1 | $params{'config'} || '' |
18 | 1 | 0 | $params{'armor'} || '1' |
19 | 0 | 1 | $params{'debug'} || '' |
58 | 2 | 5 | $$this{'error'} || '' |
64 | 0 | 0 | $$this{'warning'} || '' |
120 | 0 | 1 | $params{'comment'} || '' |
151 | 1 | 0 | "$pubring" || die("cannot unlink '${pubring}'") |
155 | 1 | 0 | "$secring" || die("cannot unlink '${secring}'") |
258 | 0 | 1 | $1 || '0' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
13 | 0 | 1 | 0 | ref $this || $this |
15 | 0 | 1 | 0 | $params{'gnupg_path'} || $GNUPG_PATH |
16 | 1 | 0 | 0 | $params{'homedir'} || $ENV{'HOME'} . '/.gnupg' |
476 | 0 | 0 | 0 | not $line[1] or $line[1] ne 'm' and $line[1] ne 'f' and $line[1] ne 'u' |