line |
true |
false |
branch |
102
|
0 |
0 |
if defined $self |
106
|
0 |
0 |
unless $_[0]->isa('HASH') |
108
|
0 |
0 |
unless defined $self |
110
|
0 |
0 |
if (exists $OWNER{$self}) |
206
|
22 |
22 |
unless ($self->isa('SCALAR')) |
207
|
0 |
22 |
unless $self->isa('HASH') |
209
|
0 |
22 |
unless defined $self |
214
|
22 |
22 |
if (exists $OWNER{$self}) |
219
|
0 |
44 |
if ($code) |
231
|
10 |
3 |
if ($arg and $arg eq 'Geo::OGR::FeatureDefn') { } |
237
|
12 |
0 |
if defined $self |
310
|
41 |
41 |
unless ($self->isa('SCALAR')) |
311
|
0 |
41 |
unless $self->isa('HASH') |
313
|
0 |
41 |
unless defined $self |
318
|
4 |
78 |
if (exists $OWNER{$self}) |
323
|
0 |
82 |
if ($code) |
337
|
0 |
4 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
4 |
0 |
elsif (@_ and @_ % 2 == 0) { } |
343
|
0 |
4 |
if $fields and ref $fields ne 'ARRAY' |
348
|
2 |
2 |
if ($gt) { } |
|
2 |
0 |
elsif ($fields) { } |
353
|
0 |
4 |
if exists $schema{'StyleIgnored'} |
356
|
17 |
1 |
if (ref $fd eq 'HASH') |
357
|
3 |
14 |
if ($fd->{'GeometryType'} or exists $Geo::OGR::Geometry::TYPE_STRING2INT{$fd->{'Type'}}) { } |
363
|
15 |
3 |
if (&blessed($d) and $d->isa('Geo::OGR::FieldDefn')) { } |
|
3 |
0 |
elsif (&blessed($d) and $d->isa('Geo::OGR::GeomFieldDefn')) { } |
366
|
1 |
2 |
if $gt |
414
|
72 |
72 |
unless ($self->isa('SCALAR')) |
415
|
0 |
72 |
unless $self->isa('HASH') |
417
|
0 |
72 |
unless defined $self |
422
|
32 |
112 |
if (exists $Geo::OGR::FieldDefn::OWNER{$self}) |
427
|
0 |
144 |
if ($code) |
438
|
1 |
31 |
if (@_ == 0) { } |
|
0 |
31 |
elsif (@_ == 1 and not ref $_[0]) { } |
|
0 |
31 |
elsif (@_ == 2 and not $Geo::OGR::FieldDefn::SCHEMA_KEYS{$_[0]}) { } |
445
|
30 |
1 |
@_ % 2 == 0 ? : |
447
|
61 |
1 |
if ($Geo::OGR::FieldDefn::SCHEMA_KEYS{$key}) { } |
450
|
0 |
1 |
if $key ne 'Index' |
506
|
40 |
40 |
unless $_[0]->isa('HASH') |
508
|
0 |
40 |
unless defined $self |
510
|
10 |
30 |
if (exists $Geo::OGR::GeomFieldDefn::OWNER{$self}) |
520
|
0 |
10 |
if (@_ == 0) { } |
|
0 |
10 |
elsif (@_ == 1) { } |
|
0 |
10 |
elsif (@_ == 2 and not $Geo::OGR::GeomFieldDefn::SCHEMA_KEYS{$_[0]}) { } |
527
|
10 |
0 |
@_ % 2 == 0 ? : |
529
|
19 |
0 |
if ($Geo::OGR::GeomFieldDefn::SCHEMA_KEYS{$key}) { } |
532
|
0 |
0 |
if $key ne 'Index' and $key ne 'GeometryType' |
578
|
52 |
52 |
unless ($self->isa('SCALAR')) |
579
|
0 |
52 |
unless $self->isa('HASH') |
581
|
0 |
52 |
unless defined $self |
586
|
23 |
81 |
if (exists $Geo::OGR::Geometry::OWNER{$self}) |
591
|
0 |
104 |
if ($code) |
602
|
7 |
19 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
18 |
1 |
elsif (@_ % 2 == 0) { } |
615
|
0 |
26 |
if ($hex) { } |
622
|
1 |
25 |
if ($hex) |
633
|
16 |
10 |
if (defined $wkt) { } |
|
1 |
9 |
elsif (defined $wkb) { } |
|
1 |
8 |
elsif (defined $gml) { } |
|
1 |
7 |
elsif (defined $json) { } |
|
7 |
0 |
elsif (defined $type) { } |
|
0 |
0 |
elsif (defined $arc) { } |
644
|
0 |
7 |
if Geo::OGR::GT_HasZ($type) |
645
|
0 |
7 |
if Geo::OGR::GT_HasM($type) |
651
|
25 |
0 |
if defined $self |
652
|
5 |
20 |
if $points |
899
|
3 |
14 |
unless @_ |
908
|
0 |
0 |
if $driver->TestCapability('VECTOR') |
918
|
1 |
44 |
if $driver->TestCapability('VECTOR') |
926
|
0 |
0 |
if $p[1] |
928
|
0 |
0 |
unless $dataset |
935
|
0 |
0 |
if $p[1] |
937
|
0 |
0 |
unless $dataset |
953
|
0 |
0 |
if $p[2] and $p[2]{'STRICT'} eq 'NO' |
961
|
0 |
0 |
if $p[1] |
963
|
0 |
0 |
unless $dataset |
990
|
24 |
24 |
unless ($self->isa('SCALAR')) |
991
|
0 |
24 |
unless $self->isa('HASH') |
993
|
0 |
24 |
unless defined $self |
995
|
0 |
48 |
if ($Geo::GDAL::Dataset::RESULT_SET{$self}) |
1000
|
0 |
48 |
if (exists $Geo::OGR::Layer::OWNER{$self}) |
1017
|
0 |
1 |
if @_ == 0 |
1021
|
13 |
5 |
if _TestCapability($self, $Geo::OGR::Layer::CAPABILITIES{$cap}) |
1049
|
0 |
21 |
if (@_ == 0) { } |
|
13 |
8 |
elsif (ref $_[0] eq 'HASH') { } |
|
8 |
0 |
elsif (@_ % 2 == 0) { } |
1060
|
0 |
21 |
if (&blessed($params{'Defn'}) and $params{'Defn'}->isa('Geo::OGR::FieldDefn')) { } |
|
0 |
21 |
elsif (&blessed($_[0]) and $params{'Defn'}->isa('Geo::OGR::GeomFieldDefn')) { } |
1067
|
2 |
19 |
if (exists $params{'GeometryType'}) |
1071
|
15 |
6 |
if (exists $Geo::OGR::FieldDefn::TYPE_STRING2INT{$params{'Type'}}) { } |
|
6 |
0 |
elsif (exists $Geo::OGR::Geometry::TYPE_STRING2INT{$params{'Type'}}) { } |
1086
|
1 |
0 |
@_ % 2 == 0 ? : |
1087
|
0 |
1 |
if (&blessed($param) and $param->isa('Geo::OGR::FieldDefn')) { } |
1092
|
1 |
0 |
if exists $param->{'Name'} |
1093
|
1 |
0 |
if exists $param->{'Type'} |
1094
|
0 |
1 |
if exists $param->{'Width'} or exists $param->{'Precision'} |
1095
|
0 |
1 |
if exists $param->{'Nullable'} |
1096
|
0 |
1 |
if exists $param->{'Default'} |
1109
|
0 |
7 |
if @_ |
1110
|
0 |
7 |
if (@_ and @_ % 2 == 0) |
1112
|
0 |
0 |
if ($schema{'Fields'}) |
1126
|
1 |
0 |
defined $row{'FID'} ? : |
1127
|
0 |
1 |
unless $feature |
1129
|
0 |
1 |
if (defined wantarray) { } |
1134
|
1 |
0 |
if $update |
1135
|
1 |
0 |
unless defined wantarray |
1142
|
1 |
0 |
defined $FID ? : |
1143
|
0 |
1 |
unless $feature |
1145
|
0 |
1 |
if $set |
1147
|
1 |
0 |
if (defined wantarray) { } |
1152
|
0 |
1 |
if $set |
1153
|
0 |
1 |
unless defined wantarray |
1159
|
0 |
0 |
if @_ == 1 |
1160
|
0 |
0 |
if @_ == 4 |
1161
|
0 |
0 |
unless defined wantarray |
1168
|
0 |
9 |
unless ref $feature |
1170
|
6 |
3 |
if (ref $feature eq 'HASH') { } |
|
3 |
0 |
elsif (ref $feature eq 'ARRAY') { } |
|
0 |
0 |
elsif (&blessed($feature) and $feature->isa('Geo::OGR::Feature')) { } |
1178
|
7 |
1 |
unless defined wantarray |
1199
|
0 |
3 |
if $in_place |
1211
|
0 |
0 |
if ($in_place) |
1250
|
2 |
0 |
if $fd |
1256
|
0 |
0 |
@_ == 2 ? : |
1259
|
0 |
0 |
if defined $sr |
1260
|
0 |
0 |
if defined wantarray |
1288
|
13 |
4 |
if ($index < 0 and $name =~ /^\d+$/) |
1290
|
13 |
0 |
if $name >= 0 and $name < $self->GetFieldCount |
1292
|
0 |
17 |
if $index < 0 |
1299
|
15 |
1 |
if ($index < 0 and $name =~ /^\d+$/) |
1301
|
15 |
0 |
if $name >= 0 and $name < $self->GetGeomFieldCount |
1303
|
0 |
16 |
if $index < 0 |
1311
|
0 |
8 |
if @_ |
1312
|
0 |
8 |
if (@_ and @_ % 2 == 0) |
1314
|
0 |
0 |
if ($schema{'Fields'}) |
1332
|
0 |
8 |
wantarray ? : |
1338
|
0 |
1 |
if $Geo::OGR::Feature::DEFNS{tied %$self} or $Geo::OGR::Layer::DEFNS{tied %$self} |
1340
|
0 |
1 |
if (@_ == 0) { } |
|
0 |
1 |
elsif (ref $_[0] eq 'HASH') { } |
|
1 |
0 |
elsif (@_ % 2 == 0) { } |
1347
|
0 |
1 |
if (exists $Geo::OGR::FieldDefn::TYPE_STRING2INT{$params{'Type'}}) { } |
1358
|
0 |
0 |
if $Geo::OGR::Feature::DEFNS{tied %$self} or $Geo::OGR::Layer::DEFNS{tied %$self} |
1360
|
0 |
0 |
if $self->_GetFieldDefn($i)->Name eq $name |
1363
|
0 |
0 |
if $self->_GetGeomFieldDefn($i)->Name eq $name |
1394
|
0 |
2 |
if $Geo::OGR::Feature::DEFNS{tied %$self} or $Geo::OGR::Layer::DEFNS{tied %$self} |
1395
|
2 |
0 |
if (defined $type) |
1399
|
0 |
2 |
if defined wantarray |
1405
|
0 |
0 |
if @_ |
1406
|
0 |
0 |
if defined wantarray |
1411
|
0 |
8 |
if @_ |
1412
|
8 |
0 |
if defined wantarray |
1441
|
7 |
2 |
unless $@ |
1449
|
2 |
2 |
if (not $@) { } |
1458
|
0 |
0 |
if @_ |
1459
|
0 |
0 |
unless defined wantarray |
1466
|
61 |
40 |
if ($index < 0 and $name =~ /^\d+$/) |
1468
|
60 |
1 |
if $name >= 0 and $name < $self->GetFieldCount |
1470
|
6 |
95 |
if $index < 0 |
1477
|
19 |
5 |
if ($index < 0 and $name =~ /^\d+$/) |
1479
|
19 |
0 |
if $name >= 0 and $name < $self->GetGeomFieldCount |
1481
|
1 |
23 |
if $index < 0 |
1499
|
0 |
0 |
if @_ |
1500
|
0 |
0 |
unless defined wantarray |
1516
|
0 |
0 |
if @_ |
1525
|
7 |
3 |
if (@_) |
1527
|
0 |
7 |
if (@_ == 1 and ref $_[0] eq 'HASH') { } |
|
7 |
0 |
elsif (@_ and @_ % 2 == 0) { } |
1534
|
1 |
6 |
if defined $row{'FID'} |
1537
|
1 |
11 |
if $name eq 'FID' |
1538
|
3 |
8 |
if ($name eq 'Geometry') |
1544
|
7 |
4 |
if ($self->GetFieldDefnRef($i)->Name eq $name) |
1550
|
7 |
1 |
if $f |
1552
|
1 |
0 |
if ($self->GetGeomFieldDefnRef($i)->Name eq $name) |
1558
|
1 |
0 |
if $f |
1562
|
7 |
3 |
unless defined wantarray |
1580
|
3 |
4 |
if (@_) |
1582
|
1 |
2 |
if @_ == $nf + $ngf + 1 |
1583
|
1 |
2 |
if defined $FID |
1585
|
1 |
2 |
if (@$values != $nf + $ngf) |
1597
|
2 |
4 |
unless defined wantarray |
1622
|
11 |
29 |
unless IsFieldSet($self, $field) |
1624
|
13 |
16 |
if ($type == $Geo::OGR::OFTInteger) |
1627
|
1 |
15 |
if ($type == $Geo::OGR::OFTInteger64) |
1630
|
2 |
13 |
if ($type == $Geo::OGR::OFTReal) |
1633
|
4 |
9 |
if ($type == $Geo::OGR::OFTString) |
1636
|
1 |
8 |
if ($type == $Geo::OGR::OFTIntegerList) |
1638
|
0 |
1 |
wantarray ? : |
1640
|
1 |
7 |
if ($type == $Geo::OGR::OFTInteger64List) |
1642
|
0 |
1 |
wantarray ? : |
1644
|
1 |
6 |
if ($type == $Geo::OGR::OFTRealList) |
1646
|
0 |
1 |
wantarray ? : |
1648
|
1 |
5 |
if ($type == $Geo::OGR::OFTStringList) |
1650
|
0 |
1 |
wantarray ? : |
1652
|
2 |
3 |
if ($type == $Geo::OGR::OFTBinary) |
1655
|
1 |
2 |
if ($type == $Geo::OGR::OFTDate) |
1658
|
0 |
1 |
wantarray ? : |
1660
|
1 |
1 |
if ($type == $Geo::OGR::OFTTime) |
1662
|
0 |
1 |
wantarray ? : |
1664
|
1 |
0 |
if ($type == $Geo::OGR::OFTDateTime) |
1666
|
0 |
1 |
wantarray ? : |
1681
|
1 |
24 |
if (@_ == 0 or not defined $arg) |
1685
|
0 |
24 |
if @_ > 1 |
1687
|
7 |
17 |
if (ref $arg) { } |
1688
|
1 |
6 |
if ($type == $Geo::OGR::OFTIntegerList) { } |
|
1 |
5 |
elsif ($type == $Geo::OGR::OFTInteger64List) { } |
|
1 |
4 |
elsif ($type == $Geo::OGR::OFTRealList) { } |
|
1 |
3 |
elsif ($type == $Geo::OGR::OFTStringList) { } |
|
1 |
2 |
elsif ($type == $Geo::OGR::OFTDate) { } |
|
1 |
1 |
elsif ($type == $Geo::OGR::OFTTime) { } |
|
1 |
0 |
elsif ($type == $Geo::OGR::OFTDateTime) { } |
|
0 |
0 |
elsif ($type == $Geo::OGR::OFTInteger64) { } |
1720
|
1 |
16 |
if ($type == $Geo::OGR::OFTBinary) { } |
|
1 |
15 |
elsif ($type == $Geo::OGR::OFTInteger64) { } |
|
15 |
0 |
elsif ($type == $Geo::OGR::OFTInteger or $type == $Geo::OGR::OFTReal or $type == $Geo::OGR::OFTString) { } |
1742
|
14 |
5 |
if @_ |
1743
|
16 |
3 |
if defined wantarray |
1748
|
19 |
5 |
@_ > 0 && ref $_[0] eq '' || @_ > 2 && @_ % 2 == 1 ? : |
1751
|
0 |
23 |
if (@_ and @_ % 2 == 0) { } |
1756
|
11 |
12 |
if ($geometry) |
1758
|
4 |
7 |
if (&blessed($geometry) and $geometry->isa('Geo::OGR::Geometry')) { } |
|
7 |
0 |
elsif (ref $geometry eq 'HASH') { } |
1760
|
0 |
4 |
if $type ne 'Unknown' and $type ne $gtype |
1765
|
0 |
4 |
if $@ |
1772
|
0 |
7 |
if $type ne 'Unknown' and $type ne $gtype |
1777
|
0 |
7 |
if $@ |
1782
|
7 |
16 |
unless defined wantarray |
1784
|
0 |
16 |
unless $geometry |
1793
|
0 |
0 |
if @_ <= 2 |
1795
|
0 |
0 |
if @_ <= 3 |
1855
|
33 |
9 |
if (@_) |
1856
|
1 |
32 |
@_ % 2 == 0 ? : |
1858
|
296 |
1 |
unless exists $params->{$key} |
1860
|
0 |
1 |
if $@ |
1863
|
32 |
10 |
unless defined wantarray |
1868
|
0 |
10 |
wantarray ? : |
1875
|
0 |
41 |
if @_ |
1876
|
41 |
0 |
if defined wantarray |
1881
|
0 |
10 |
if (defined $type) |
1882
|
0 |
0 |
unless exists $Geo::OGR::FieldDefn::TYPE_STRING2INT{$type} |
1886
|
10 |
0 |
if defined wantarray |
1891
|
0 |
10 |
if (defined $sub_type) |
1892
|
0 |
0 |
unless exists $Geo::OGR::FieldDefn::SUB_TYPE_STRING2INT{$sub_type} |
1896
|
10 |
0 |
if defined wantarray |
1901
|
0 |
10 |
if (defined $justify) |
1902
|
0 |
0 |
unless exists $Geo::OGR::FieldDefn::JUSTIFY_STRING2INT{$justify} |
1903
|
0 |
0 |
if exists $Geo::OGR::FieldDefn::JUSTIFY_STRING2INT{$justify} |
1906
|
10 |
0 |
if defined wantarray |
1911
|
1 |
10 |
if @_ |
1912
|
10 |
1 |
if defined wantarray |
1917
|
0 |
10 |
if @_ |
1918
|
10 |
0 |
if defined wantarray |
1923
|
0 |
10 |
if @_ |
1924
|
10 |
0 |
if defined wantarray |
1929
|
0 |
10 |
if @_ |
1930
|
10 |
0 |
if defined wantarray |
1935
|
0 |
10 |
if @_ |
1936
|
10 |
0 |
if defined wantarray |
1952
|
10 |
10 |
if (@_) |
1953
|
0 |
10 |
@_ % 2 == 0 ? : |
1955
|
50 |
0 |
unless exists $params->{$key} |
1957
|
0 |
0 |
if $@ |
1960
|
10 |
10 |
unless defined wantarray |
1965
|
0 |
10 |
wantarray ? : |
1972
|
0 |
17 |
if @_ |
1973
|
17 |
0 |
if defined wantarray |
1978
|
0 |
23 |
if (defined $type) |
1982
|
23 |
0 |
if defined wantarray |
1992
|
0 |
10 |
if @_ |
1993
|
10 |
0 |
if defined wantarray |
1998
|
0 |
10 |
if @_ |
1999
|
10 |
0 |
if defined wantarray |
2004
|
0 |
10 |
if @_ |
2005
|
10 |
0 |
if defined wantarray |
2071
|
0 |
0 |
if (exists $default{$p}) { } |
2080
|
0 |
0 |
unless ref $p{'Center'} eq 'ARRAY' |
2091
|
0 |
6 |
if ($f =~ /text/i) { } |
|
6 |
0 |
elsif ($f =~ /wkt/i) { } |
|
0 |
0 |
elsif ($f =~ /binary/i) { } |
|
0 |
0 |
elsif ($f =~ /wkb/i) { } |
|
0 |
0 |
elsif ($f =~ /gml/i) { } |
|
0 |
0 |
elsif ($f =~ /kml/i) { } |
|
0 |
0 |
elsif ($f =~ /json/i) { } |
2094
|
6 |
0 |
if ($f =~ /iso/i) { } |
2102
|
0 |
0 |
if ($f =~ /iso/i) { } |
|
0 |
0 |
elsif ($f =~ /ewkb/i) { } |
|
0 |
0 |
elsif ($f =~ /hex/i) { } |
2129
|
0 |
0 |
if length $x == 1 |
2138
|
0 |
0 |
if ($srid) { } |
2142
|
0 |
0 |
if (length $s > 2) { } |
|
0 |
0 |
elsif (length $s > 1) { } |
2184
|
9 |
0 |
if (not $has_z || $has_m) { } |
|
0 |
0 |
elsif ($has_z and not $has_m) { } |
|
0 |
0 |
elsif (not $has_z and $has_m) { } |
2200
|
1 |
0 |
if (not $has_z || $has_m) { } |
|
0 |
0 |
elsif ($has_z and not $has_m) { } |
|
0 |
0 |
elsif (not $has_z and $has_m) { } |
2218
|
9 |
0 |
if (not $has_z || $has_m) { } |
|
0 |
0 |
elsif ($has_z and not $has_m) { } |
|
0 |
0 |
elsif (not $has_z and $has_m) { } |
2228
|
2 |
7 |
wantarray ? : |
2234
|
1 |
1 |
if (@_) |
2237
|
1 |
0 |
if (Geo::OGR::GT_Flatten($t) == $Geo::OGR::wkbPoint) |
2240
|
1 |
0 |
if (not $has_z || $has_m) { } |
|
0 |
0 |
elsif ($has_z or $has_m) { } |
2241
|
0 |
1 |
if @_ > 2 |
2244
|
0 |
0 |
if @_ > 3 |
2247
|
0 |
0 |
if @_ > 4 |
2251
|
0 |
1 |
unless defined $i |
2254
|
1 |
1 |
unless defined wantarray |
2256
|
1 |
0 |
wantarray ? : |
2265
|
0 |
11 |
if Geo::OGR::GT_HasZ($t) |
2266
|
0 |
11 |
if Geo::OGR::GT_HasM($t) |
2269
|
7 |
4 |
if ($points) |
2271
|
0 |
7 |
if ($t eq 'Unknown' or $t eq 'None' or $t eq 'GeometryCollection') { } |
|
6 |
1 |
elsif ($t eq 'Point') { } |
|
1 |
0 |
elsif ($t eq 'LineString' or $t eq 'LinearRing' or $t eq 'CircularString') { } |
|
0 |
0 |
elsif ($t eq 'Polygon') { } |
|
0 |
0 |
elsif ($t eq 'MultiPoint') { } |
|
0 |
0 |
elsif ($t eq 'MultiLineString') { } |
|
0 |
0 |
elsif ($t eq 'MultiPolygon') { } |
2275
|
0 |
6 |
if (ref $points->[0]) { } |
2287
|
0 |
0 |
if $has_z |
2288
|
0 |
0 |
if $has_m |
2312
|
7 |
4 |
unless defined wantarray |
2320
|
0 |
4 |
if ($n) { } |
2326
|
2 |
2 |
if ($n == 1) { } |
2350
|
0 |
0 |
if $@ |
2399
|
1 |
0 |
if ($n > 0) { } |
2424
|
134 |
1 |
if (defined $type) { } |
2433
|
0 |
0 |
unless exists $Geo::OGR::Geometry::TYPE_STRING2INT{$type} |
2435
|
0 |
0 |
if $modifier =~ /flat/i |
2436
|
0 |
0 |
if $modifier =~ /z/i |
2437
|
0 |
0 |
if $modifier =~ /collection/i |
2438
|
0 |
0 |
if $modifier =~ /curve/i |
2439
|
0 |
0 |
if $modifier =~ /linear/i |
2445
|
0 |
0 |
unless exists $Geo::OGR::Geometry::TYPE_STRING2INT{$type} |
2447
|
0 |
0 |
if (defined $type2) { } |
2448
|
0 |
0 |
unless exists $Geo::OGR::Geometry::TYPE_STRING2INT{$type2} |
2451
|
0 |
0 |
if $test =~ /subclass/i |
2453
|
0 |
0 |
if $test =~ /z/i |
2454
|
0 |
0 |
if $test =~ /subclass/i |
2455
|
0 |
0 |
if $test =~ /curve/i |
2456
|
0 |
0 |
if $test =~ /surface/i |
2457
|
0 |
0 |
if $test =~ /linear/i |