Debug well-known geometry

Prints the raw calls to the WKBGeometryHandler(). Useful for writing custom C++ handlers and debugging read problems.

wkb_debug(wkb)

wkt_debug(wkt)

wkt_streamer_debug(wkt)

Arguments

wkb

A list() of raw() vectors, such as that returned by sf::st_as_binary().

wkt

A character vector containing well-known text.

Value

The input, invisibly

Examples

wkt_debug("MULTIPOLYGON (((0 0, 10 0, 0 10, 0 0)))")
#> nextFeatureStart(0)
#>     nextGeometryStart(MULTIPOLYGON [1], WKReader::PART_ID_NONE)
#>         nextGeometryStart(POLYGON [1], 0)
#>             nextLinearRingStart(POLYGON [1], 4, 0)
#>                 nextCoordinate(POLYGON [1], WKCoord(x = 0, y = 0), 0)
#>                 nextCoordinate(POLYGON [1], WKCoord(x = 10, y = 0), 1)
#>                 nextCoordinate(POLYGON [1], WKCoord(x = 0, y = 10), 2)
#>                 nextCoordinate(POLYGON [1], WKCoord(x = 0, y = 0), 3)
#>             nextLinearRingEnd(POLYGON [1], 4, 0)
#>         nextGeometryEnd(POLYGON [1], 0)
#>     nextGeometryEnd(MULTIPOLYGON [1], WKReader::PART_ID_NONE)
#> nextFeatureEnd(0)
wkt_streamer_debug("MULTIPOLYGON (((0 0, 10 0, 0 10, 0 0)))")
#> nextFeatureStart(0)
#>     nextGeometryStart(MULTIPOLYGON [unknown], WKReader::PART_ID_NONE)
#>         nextGeometryStart(POLYGON [unknown], 0)
#>             nextLinearRingStart(POLYGON [unknown], WKGeometryMeta::SIZE_UNKNOWN, 0)
#>                 nextCoordinate(POLYGON [unknown], WKCoord(x = 0, y = 0), 0)
#>                 nextCoordinate(POLYGON [unknown], WKCoord(x = 10, y = 0), 1)
#>                 nextCoordinate(POLYGON [unknown], WKCoord(x = 0, y = 10), 2)
#>                 nextCoordinate(POLYGON [unknown], WKCoord(x = 0, y = 0), 3)
#>             nextLinearRingEnd(POLYGON [unknown], WKGeometryMeta::SIZE_UNKNOWN, 0)
#>         nextGeometryEnd(POLYGON [unknown], 0)
#>     nextGeometryEnd(MULTIPOLYGON [unknown], WKReader::PART_ID_NONE)
#> nextFeatureEnd(0)
wkb_debug(
  wk::wkt_translate_wkb(
    "MULTIPOLYGON (((0 0, 10 0, 0 10, 0 0)))"
  )
)
#> nextFeatureStart(0)
#>     nextGeometryStart(MULTIPOLYGON [1], WKReader::PART_ID_NONE)
#>         nextGeometryStart(POLYGON [1], 0)
#>             nextLinearRingStart(POLYGON [1], 4, 0)
#>                 nextCoordinate(POLYGON [1], WKCoord(x = 0, y = 0), 0)
#>                 nextCoordinate(POLYGON [1], WKCoord(x = 10, y = 0), 1)
#>                 nextCoordinate(POLYGON [1], WKCoord(x = 0, y = 10), 2)
#>                 nextCoordinate(POLYGON [1], WKCoord(x = 0, y = 0), 3)
#>             nextLinearRingEnd(POLYGON [1], 4, 0)
#>         nextGeometryEnd(POLYGON [1], 0)
#>     nextGeometryEnd(MULTIPOLYGON [1], WKReader::PART_ID_NONE)
#> nextFeatureEnd(0)