OGRErr OGRJMLWriterLayer::CreateField( OGRFieldDefn *poFieldDefn,
int bApproxOK )
{
if( bFeaturesWritten )
return OGRERR_FAILURE;
if( !bAddRGBField && strcmp( poFieldDefn->GetNameRef(), "R_G_B" ) == 0 )
return OGRERR_FAILURE;
const char* pszType = NULL;
OGRFieldType eType = poFieldDefn->GetType();
if( eType == OFTInteger )
{
pszType = "INTEGER";
}
else if( eType == OFTInteger64 )
{
pszType = "OBJECT";
}
else if( eType == OFTReal )
{
pszType = "DOUBLE";
}
else if( eType == OFTDate || eType == OFTDateTime )
{
pszType = "DATE";
}
else
{
if( eType != OFTString )
{
if( bApproxOK )
{
CPLError(CE_Warning, CPLE_AppDefined,
"Field of type %s unhandled natively. Converting to string",
OGRFieldDefn::GetFieldTypeName(eType));
}
else
{
CPLError(CE_Warning, CPLE_AppDefined,
"Field of type %s unhandled natively.",
OGRFieldDefn::GetFieldTypeName(eType));
return OGRERR_FAILURE;
}
}
pszType = "STRING";
}
WriteColumnDeclaration( poFieldDefn->GetNameRef(), pszType );
poFeatureDefn->AddFieldDefn( poFieldDefn );
return OGRERR_NONE;
}
OGRErr OGRJMLWriterLayer::ICreateFeature( OGRFeature *poFeature )
{
/* Finish column declaration if we haven't yet created a feature */
if( !bFeaturesWritten )
{
if( bAddOGRStyleField && poFeatureDefn->GetFieldIndex("OGR_STYLE") < 0 )
{
WriteColumnDeclaration( "OGR_STYLE", "STRING" );
}
if( bAddRGBField && poFeatureDefn->GetFieldIndex("R_G_B") < 0 )
{
WriteColumnDeclaration( "R_G_B", "STRING" );
}
VSIFPrintfL(fp, "</ColumnDefinitions>\n</JCSGMLInputTemplate>\n<featureCollection>\n");
bFeaturesWritten = TRUE;
}
if( bClassicGML )
VSIFPrintfL(fp, " <featureMember>\n");
VSIFPrintfL(fp, " <feature>\n");
/* Add geometry */
VSIFPrintfL(fp, " <geometry>\n");
OGRGeometry* poGeom = poFeature->GetGeometryRef();
if( poGeom != NULL )
{
char* pszGML = poGeom->exportToGML();
VSIFPrintfL(fp, " %s\n", pszGML);
CPLFree(pszGML);
}
else
{
VSIFPrintfL(fp, " %s\n",
"<gml:MultiGeometry></gml:MultiGeometry>");
}
VSIFPrintfL(fp, " </geometry>\n");
/* Add fields */
for(int i=0;i<poFeature->GetFieldCount();i++)
{
char* pszName = OGRGetXML_UTF8_EscapedString(
poFeatureDefn->GetFieldDefn(i)->GetNameRef() );
if( bClassicGML )
VSIFPrintfL(fp, " <%s>", pszName);
else
VSIFPrintfL(fp, " <property name=\"%s\">", pszName);
if( poFeature->IsFieldSet(i) )
{
OGRFieldType eType = poFeatureDefn->GetFieldDefn(i)->GetType();
if( eType == OFTString )
{
char* pszValue = OGRGetXML_UTF8_EscapedString(
poFeature->GetFieldAsString(i) );
VSIFPrintfL(fp, "%s", pszValue);
CPLFree(pszValue);
}
else if( eType == OFTDateTime )
{
int nYear, nMonth, nDay, nHour, nMinute, nTZFlag;
float fSecond;
poFeature->GetFieldAsDateTime(i, &nYear, &nMonth, &nDay,
&nHour, &nMinute, &fSecond, &nTZFlag);
/* When writing time zone, OpenJUMP expects .XXX seconds */
/* to be written */
if( nTZFlag > 1 || OGR_GET_MS(fSecond) != 0 )
VSIFPrintfL(fp, "%04d-%02d-%02dT%02d:%02d:%06.3f",
nYear, nMonth, nDay,
nHour, nMinute, fSecond);
else
VSIFPrintfL(fp, "%04d-%02d-%02dT%02d:%02d:%02d",
nYear, nMonth, nDay,
nHour, nMinute, (int)fSecond);
if( nTZFlag > 1 )
{
int nOffset = (nTZFlag - 100) * 15;
int nHours = (int) (nOffset / 60); // round towards zero
int nMinutes = ABS(nOffset - nHours * 60);
if( nOffset < 0 )
{
VSIFPrintfL(fp, "-" );
nHours = ABS(nHours);
}
else
VSIFPrintfL(fp, "+" );
VSIFPrintfL(fp, "%02d%02d", nHours, nMinutes );
}
}
else
{
VSIFPrintfL(fp, "%s", poFeature->GetFieldAsString(i));
}
}
if( bClassicGML )
VSIFPrintfL(fp, "</%s>\n", pszName);
else
VSIFPrintfL(fp, "</property>\n");
CPLFree(pszName);
}
/* Add OGR_STYLE from feature style string (if asked) */
if( bAddOGRStyleField && poFeatureDefn->GetFieldIndex("OGR_STYLE") < 0 )
{
if( bClassicGML )
VSIFPrintfL(fp, " <OGR_STYLE>");
else
VSIFPrintfL(fp, " <property name=\"%s\">", "OGR_STYLE");
if( poFeature->GetStyleString() != NULL )
{
char* pszValue = OGRGetXML_UTF8_EscapedString( poFeature->GetStyleString() );
VSIFPrintfL(fp, "%s", pszValue);
CPLFree(pszValue);
}
if( bClassicGML )
VSIFPrintfL(fp, "</OGR_STYLE>\n");
else
VSIFPrintfL(fp, "</property>\n");
}
/* Derive R_G_B field from feature style string */
if( bAddRGBField && poFeatureDefn->GetFieldIndex("R_G_B") < 0 )
{
if( bClassicGML )
VSIFPrintfL(fp, " <R_G_B>");
else
VSIFPrintfL(fp, " <property name=\"%s\">", "R_G_B");
if( poFeature->GetStyleString() != NULL )
{
OGRGeometry* poGeom = poFeature->GetGeometryRef();
OGRwkbGeometryType eGeomType =
poGeom ? wkbFlatten(poGeom->getGeometryType()) : wkbUnknown;
OGRStyleMgr oMgr;
oMgr.InitFromFeature(poFeature);
for(int i=0;i<oMgr.GetPartCount();i++)
{
OGRStyleTool* poTool = oMgr.GetPart(i);
if( poTool != NULL )
{
const char* pszColor = NULL;
if( poTool->GetType() == OGRSTCPen &&
eGeomType != wkbPolygon && eGeomType != wkbMultiPolygon )
{
GBool bIsNull;
pszColor = ((OGRStylePen*)poTool)->Color(bIsNull);
if( bIsNull ) pszColor = NULL;
}
else if( poTool->GetType() == OGRSTCBrush )
{
GBool bIsNull;
pszColor = ((OGRStyleBrush*)poTool)->ForeColor(bIsNull);
if( bIsNull ) pszColor = NULL;
}
int R, G, B, A;
if( pszColor != NULL &&
poTool->GetRGBFromString(pszColor, R, G, B, A) && A != 0 )
{
VSIFPrintfL(fp, "%02X%02X%02X", R, G, B);
}
delete poTool;
}
}
}
if( bClassicGML )
VSIFPrintfL(fp, "</R_G_B>\n");
else
VSIFPrintfL(fp, "</property>\n");
}
VSIFPrintfL(fp, " </feature>\n");
if( bClassicGML )
VSIFPrintfL(fp, " </featureMember>\n");
poFeature->SetFID(nNextFID ++);
return OGRERR_NONE;
}
