GMLAS: add support for gml:TimeInstantType

Refs #13120

Author: rouault

autotest/ogr/ogr_gmlas.py

@@ -3534,3 +3534,35 @@ def test_ogr_gmlas_citygml_lod2_no_schema_location():
                 pytest.skip(f"cannot open {url}")
 
     assert ds.GetLayerCount() == 1537
+
+
+###############################################################################
+
+
+@pytest.mark.require_curl()
+def test_ogr_gmlas_datetime(tmp_vsimem):
+
+    ds = ogr.Open("GMLAS:data/gml/datetime.gml")
+    lyr = ds.GetLayer("test")
+    f = lyr.GetNextFeature()
+    lyr_defn = lyr.GetLayerDefn()
+    assert (
+        lyr_defn.GetFieldDefn(lyr_defn.GetFieldIndex("time")).GetType() == ogr.OFTTime
+    )
+    assert f["time"] == "23:59:60"
+    assert (
+        lyr_defn.GetFieldDefn(lyr_defn.GetFieldIndex("date")).GetType() == ogr.OFTDate
+    )
+    assert f["date"] == "9999/12/31"
+    assert (
+        lyr_defn.GetFieldDefn(lyr_defn.GetFieldIndex("datetime")).GetType()
+        == ogr.OFTDateTime
+    )
+    assert f["datetime"] == "9999/12/31 23:59:60.999"
+    assert (
+        lyr_defn.GetFieldDefn(
+            lyr_defn.GetFieldIndex("dtintimeposition_timeposition")
+        ).GetType()
+        == ogr.OFTDateTime
+    )
+    assert f["dtintimeposition_timeposition"] == "9999/12/31 23:59:60.999"

ogr/ogrsf_frmts/gmlas/ogr_gmlas_consts.h

@@ -268,6 +268,7 @@ STRING_CONST(szXS_GYEAR, "gYear");
 STRING_CONST(szXS_GYEAR_MONTH, "gYearMonth");
 STRING_CONST(szXS_TIME, "time");
 STRING_CONST(szXS_DATETIME, "dateTime");
+STRING_CONST(szXS_TIME_INSTANT_TYPE, "TimeInstantType");
 STRING_CONST(szXS_ANY_URI, "anyURI");
 STRING_CONST(szXS_ANY_TYPE, "anyType");
 STRING_CONST(szXS_ANY_SIMPLE_TYPE, "anySimpleType");

ogr/ogrsf_frmts/gmlas/ogrgmlasschemaanalyzer.cpp

@@ -3344,9 +3344,19 @@ bool GMLASSchemaAnalyzer::ExploreModelGroup(
 
                         const std::vector<GMLASField> &osNestedClassFields =
                             oNestedClass.GetFields();
+                        const bool bIsTimeInstantType =
+                            transcode(poTypeDef->getName()) ==
+                            szXS_TIME_INSTANT_TYPE;
                         for (size_t j = 0; j < osNestedClassFields.size(); j++)
                         {
                             GMLASField oField(osNestedClassFields[j]);
+                            if (bIsTimeInstantType &&
+                                oField.GetType() == GMLAS_FT_ANYSIMPLETYPE &&
+                                oField.GetName() == "timePosition")
+                            {
+                                oField.SetType(GMLAS_FT_DATETIME,
+                                               szXS_DATETIME);
+                            }
                             oField.SetName(osPrefixedEltName + "_" +
                                            oField.GetName());
                             if (nMinOccurs == 0 ||
@@ -3356,6 +3366,7 @@ bool GMLASSchemaAnalyzer::ExploreModelGroup(
                                 oField.SetMinOccurs(0);
                                 oField.SetNotNullable(false);
                             }
+
                             aoFields.push_back(std::move(oField));
                         }