| line |
true |
false |
branch |
|
238
|
0 |
0 |
unless (-e $filename) |
|
242
|
0 |
0 |
unless (-s $filename) |
|
258
|
0 |
0 |
$^O eq 'MSWin32' ? : |
|
281
|
0 |
0 |
unless -d $thisdir and -w $thisdir |
|
295
|
0 |
0 |
if (%{$self->scratch_database;}) { } |
|
315
|
0 |
0 |
unless do_system($Bin{'Initdb'}, '-D', "$dbdir", '>>', "$initlog", '2>&1') |
|
317
|
0 |
0 |
if (my $conf_append = $self->database_options('append_to_conf')) |
|
318
|
0 |
0 |
unless -e "$dbdir/postgresql.conf" |
|
319
|
0 |
0 |
unless open my $fp, ">> $dbdir/postgresql.conf" |
|
327
|
0 |
0 |
unless do_system($Bin{'Pgctl'}, qq[-o "$pmopts"], '-w', '-t', 120, '-D', "$dbdir", '-l', 'postmaster.log', 'start') |
|
330
|
0 |
0 |
unless -e $domain |
|
340
|
0 |
0 |
if $ENV{'MBD_DONT_STOP_TEST_DB'} or %{$self->scratch_database;} |
|
348
|
0 |
0 |
if $ENV{'MBD_DONT_STOP_TEST_DB'} or %{$self->scratch_database;} |
|
351
|
0 |
0 |
unless (-e $pid_file) |
|
359
|
0 |
0 |
unless kill 0, $pid |
|
360
|
0 |
0 |
unless kill 9, $pid |
|
366
|
0 |
0 |
unless -e $filename |
|
374
|
0 |
0 |
unless -e $filename |
|
393
|
0 |
0 |
unless (do_system($Bin{'Pgdump'}, '-xOs', '-E', 'utf8', '-n', $database_schema, $database_name, '>', $tmpfile)) |
|
400
|
0 |
0 |
unless (@lines) |
|
409
|
0 |
0 |
if /alter table/i |
|
412
|
0 |
0 |
if (@lines > 0 and not -s $outfile) |
|
434
|
0 |
0 |
unless do_system($Bin{'Pgdump'}, '--data-only', '-xO', '-E', 'utf8', '-n', $database_schema, $database_name, '|', q[egrep -v '^SET (lock_timeout|search_path)'], '>', "$tmpfile") |
|
438
|
0 |
0 |
unless rename "$tmpfile", $outfile |
|
452
|
0 |
0 |
unless ($self->_database_exists) |
|
474
|
0 |
0 |
unless $self->_database_exists |
|
492
|
0 |
0 |
unless my $filename = $args{'outfile'} |
|
529
|
0 |
0 |
unless $list |
|
531
|
0 |
0 |
unless $self->_do_psql("create extension if not exists $lang") |
|
542
|
0 |
0 |
unless ($self->_database_exists($database_name)) |
|
544
|
0 |
0 |
unless do_system($Bin{'Createdb'}, $database_name) |
|
548
|
0 |
0 |
unless $database_schema eq 'public' |
|
576
|
0 |
0 |
if (my $postgis = $self->database_extensions('postgis')) |
|
578
|
0 |
0 |
unless my $postgis_schema = $$postgis{'schema'} |
|
579
|
0 |
0 |
unless $postgis_schema eq 'public' |
|
582
|
0 |
0 |
unless $self->_do_psql_file($self->postgis_base . '/postgis.sql') |
|
583
|
0 |
0 |
unless $self->_do_psql_file($self->postgis_base . '/spatial_ref_sys.sql') |
|
587
|
0 |
0 |
if (my $sql = $self->database_options('post_initdb')) |
|
592
|
0 |
0 |
if (my $sql = $self->database_options('after_create')) |
|
609
|
0 |
0 |
unless my $dir = $args{'dir'} |
|
620
|
0 |
0 |
unless open my $fp, ">$filename" |
|
631
|
0 |
0 |
unless my $fp = 'IO::File'->new("<$database_name.$type") |
|
632
|
0 |
0 |
unless mkdir $type |
|
635
|
0 |
0 |
unless $outfp = 'IO::File'->new(">$type/$1") |
|
|
0 |
0 |
if (s/^_CUT: (.*)$//) |
|
636
|
0 |
0 |
if (s/^_DB: (.*)$//) |
|
637
|
0 |
0 |
if defined $outfp |