| line |
true |
false |
branch |
|
45
|
0 |
0 |
unless my $log = $self->error_log |
|
46
|
0 |
0 |
unless -f $log |
|
47
|
0 |
0 |
unless open my $fh, "<", $log |
|
70
|
0 |
0 |
unless $ok |
|
81
|
0 |
0 |
unless defined $ENV{$var} |
|
87
|
0 |
0 |
unless defined $old{$var} |
|
101
|
0 |
0 |
if (defined $val) { } |
|
124
|
0 |
0 |
unless $self->{'dir'} |
|
129
|
0 |
0 |
unless defined $self->{'username'} |
|
130
|
0 |
0 |
unless defined $self->{'password'} |
|
156
|
0 |
0 |
unless my $from = $self->{'cloned_from'} |
|
159
|
0 |
0 |
if $started |
|
161
|
0 |
0 |
($self->{'verbose'} // 0) > 2 ? : |
|
165
|
0 |
0 |
if $started |
|
172
|
0 |
0 |
if $self->started |
|
176
|
0 |
0 |
$ENV{'QDB_TMPDIR'} ? : |
|
178
|
0 |
0 |
($self->{'verbose'} // 0) > 2 ? : |
|
187
|
0 |
0 |
if @bad |
|
203
|
0 |
0 |
if $clone->{'autostart'} |
|
210
|
0 |
0 |
if $self->no_log(@_) |
|
228
|
0 |
0 |
unless defined $pid |
|
230
|
0 |
0 |
if ($pid) |
|
232
|
0 |
0 |
if $params->{'no_wait'} |
|
235
|
0 |
0 |
unless $ret == $pid |
|
237
|
0 |
0 |
unless $exit |
|
240
|
0 |
0 |
unless ($no_log) |
|
241
|
0 |
0 |
unless open my $fh, "<", $log_file |
|
245
|
0 |
0 |
if length $error_log |
|
251
|
0 |
0 |
unless ($no_log) |
|
252
|
0 |
0 |
unless open my $log, ">", $log_file |
|
259
|
0 |
0 |
if (my $file = $params->{'stdin'}) |
|
261
|
0 |
0 |
unless open STDIN, "<", $file |
|
279
|
0 |
0 |
if -d $self->{'dir'} |
|
287
|
0 |
0 |
unless @_ > 1 |
|
305
|
0 |
0 |
if $self->{'watcher'} or -S $socket |
|
316
|
0 |
0 |
if $self->{'watcher'} or -S $socket |
|
324
|
0 |
0 |
if ($waited > 10) |
|
341
|
0 |
0 |
unless my $watcher = delete $self->{'watcher'} |
|
356
|
0 |
0 |
if $driver_handle->{'Type'} and $driver_handle->{'Type'} eq "db" and $driver_handle->{'Name'} and index($driver_handle->{'Name'}, $self->{'dir'}) != -1 |
|
365
|
0 |
0 |
unless ($params{'no_wait'}) |
|
375
|
0 |
0 |
if &DBIx::QuickDB::Driver::time() - $start > 10 |
|
382
|
0 |
0 |
if $socket and -S $socket |
|
391
|
0 |
0 |
unless defined $db_name |
|
398
|
0 |
0 |
unless $self->{'root_pid'} and $self->{'root_pid'} == $$ |
|
400
|
0 |
0 |
if (my $watcher = delete $self->{'watcher'}) { } |
|
|
0 |
0 |
elsif ($self->should_cleanup) { } |
|
409
|
0 |
0 |
if ($server_pid and kill 0, $server_pid) |
|
413
|
0 |
0 |
if &DBIx::QuickDB::Driver::time() - $start > 5 |
|
416
|
0 |
0 |
if kill 0, $server_pid |
|
418
|
0 |
0 |
if $self->should_cleanup |