| line |
true |
false |
branch |
|
34
|
0 |
0 |
defined $arg{'Host'} ? : |
|
|
0 |
0 |
defined $arg{'Port'} ? : |
|
|
0 |
0 |
defined $arg{'Timeout'} ? : |
|
40
|
0 |
0 |
unless defined $obj |
|
48
|
0 |
0 |
if (defined $arg{'version'}) { } |
|
67
|
0 |
0 |
if $arg{'Debug'} |
|
70
|
0 |
0 |
if $arg{'Debug'} |
|
75
|
0 |
0 |
if $arg{'Debug'} |
|
77
|
0 |
0 |
if $response |
|
89
|
0 |
0 |
${*$self;}->{'args'}{'TargetSubID'} ? : |
|
92
|
0 |
0 |
if $arg{'Debug'} |
|
95
|
0 |
0 |
if $arg{'Debug'} |
|
101
|
0 |
0 |
if $arg{'Debug'} |
|
103
|
0 |
0 |
if $response |
|
115
|
0 |
0 |
${*$self;}->{'args'}{'TargetSubID'} ? : |
|
118
|
0 |
0 |
if $arg{'Debug'} |
|
120
|
0 |
0 |
if $arg{'Debug'} |
|
133
|
0 |
0 |
if (scalar @ready) |
|
135
|
0 |
0 |
if (not sysread($ready[0], $response, 4096)) { } |
|
139
|
0 |
0 |
if $arg{'Debug'} |
|
143
|
0 |
0 |
if length $fixMsg <= 0 |
|
145
|
0 |
0 |
if $arg{'Debug'} |
|
149
|
0 |
0 |
if (not defined $parsedResp->{'MsgType'}) { } |
|
|
0 |
0 |
elsif ($parsedResp->{'MsgType'} eq '0') { } |
|
|
0 |
0 |
elsif ($parsedResp->{'MsgType'} eq '1') { } |
|
150
|
0 |
0 |
if $arg{'Debug'} |
|
153
|
0 |
0 |
if $arg{'Debug'} |
|
156
|
0 |
0 |
defined $parsedResp->{'TestReqID'} ? : |
|
157
|
0 |
0 |
if $arg{'Debug'} |
|
171
|
0 |
0 |
if (time - $lastHbTime > $HeartBtInt) |
|
182
|
0 |
0 |
if defined ${*$self;}->{'logon'}{'MsgType'} and ${*$self;}->{'logon'}{'MsgType'} eq &getMessageType('Logon') |
|
208
|
0 |
0 |
if (defined $$arg{$field->{'name'}}) { } |
|
|
0 |
0 |
elsif ($field->{'required'} eq 'Y' and defined $fieldDefaults{$field->{'name'}}) { } |
|
|
0 |
0 |
elsif ($field->{'required'} eq 'Y' and $field->{'name'} ne 'BeginString' and $field->{'name'} ne 'BodyLength' and $field->{'name'} ne 'MsgType' and $field->{'name'} ne 'MsgSeqNum' and $field->{'name'} ne 'SendingTime') { } |
|
209
|
0 |
0 |
if (ref $$arg{$field->{'name'}} eq 'HASH') |
|
213
|
0 |
0 |
if (&isComponent($component)) { } |
|
216
|
0 |
0 |
if (defined $$arg{$field->{'name'}}{$component}{$_->{'name'}}) |
|
218
|
0 |
0 |
if (ref $componentField eq 'ARRAY') { } |
|
231
|
0 |
0 |
if (ref $componentField eq 'ARRAY') { } |
|
246
|
0 |
0 |
if ref $$arg{$field->{'name'}} eq 'HASH' |
|
254
|
0 |
0 |
if ($field->{'name'} eq 'MDReqID') { } |
|
282
|
0 |
0 |
defined $ff ? : |
|
290
|
0 |
0 |
unless defined $gn |
|
291
|
0 |
0 |
unless &isGroup($gn) |
|
294
|
0 |
0 |
unless defined $msg |
|
306
|
0 |
0 |
unless defined $s |
|
308
|
0 |
0 |
unless defined $gn |
|
310
|
0 |
0 |
unless &isGroup($g) |
|
320
|
0 |
0 |
unless defined $m and defined $f |
|
322
|
0 |
0 |
unless defined $fn |
|
327
|
0 |
0 |
if $f2->{'name'} eq $fn and not defined $f2->{'component'} |
|
330
|
0 |
0 |
if (defined $f2->{'group'}) |
|
331
|
0 |
0 |
if &_isFieldInStructure($f2->{'group'}, $fn) == 1 |
|
336
|
0 |
0 |
if (defined $f2->{'component'}) |
|
337
|
0 |
0 |
if &_isFieldInStructure(scalar &getComponentFields($f2->{'name'}), $fn) == 1 |
|
352
|
0 |
0 |
if $e->{'name'} eq $gn and defined $e->{'group'} |
|
355
|
0 |
0 |
if (defined $e->{'group'}) |
|
358
|
0 |
0 |
if defined $ret |
|
362
|
0 |
0 |
if (defined $e->{'component'}) |
|
364
|
0 |
0 |
if defined $ret |
|
374
|
0 |
0 |
defined $fh ? : |
|
384
|
0 |
0 |
if $f =~ /^[0-9]+$/ |
|
386
|
0 |
0 |
unless defined $fh |
|
387
|
0 |
0 |
defined $fh ? : |
|
393
|
0 |
0 |
if $v =~ /^[0-9]+$/ |
|
395
|
0 |
0 |
unless defined $fh |
|
396
|
0 |
0 |
if ($fh->{'enum'}) |
|
398
|
0 |
0 |
if ($_->{'description'} eq $v) |
|
410
|
0 |
0 |
unless defined $fh |
|
411
|
0 |
0 |
if ($fh->{'enum'}) |
|
413
|
0 |
0 |
if ($_->{'name'} eq $v) |
|
428
|
0 |
0 |
if $f =~ /^[0-9]+$/ |
|
430
|
0 |
0 |
unless defined $fh |
|
431
|
0 |
0 |
defined $fh ? : |
|
437
|
0 |
0 |
unless defined $fh |
|
438
|
0 |
0 |
defined $fh ? : |
|
449
|
0 |
0 |
unless defined $fh |
|
450
|
0 |
0 |
defined $fh ? : |
|
470
|
0 |
0 |
unless defined $fh |
|
471
|
0 |
0 |
defined $fh ? : |
|
476
|
0 |
0 |
unless defined $message |
|
495
|
0 |
0 |
if (defined $$result->{$k}) |
|
496
|
0 |
0 |
if defined $groupTag |
|
499
|
0 |
0 |
if (defined $groupTag) |
|
500
|
0 |
0 |
unless &isFieldInGroup($msgType, $groupTag, $k) |
|
505
|
0 |
0 |
if (defined $fieldName) { } |
|
511
|
0 |
0 |
if ($fieldName eq 'MsgType') { } |
|
|
0 |
0 |
elsif (&isGroup($k)) { } |