/****************************************************************************** * * Project: SDTS Translator * Purpose: Implementation of SDTS_CATD and SDTS_CATDEntry classes for * reading CATD files. * Author: Frank Warmerdam, warmerdam@pobox.com * ****************************************************************************** * Copyright (c) 1999, Frank Warmerdam * * Permission is hereby granted, free of charge, to any person obtaining a * copy of this software and associated documentation files (the "Software"), * to deal in the Software without restriction, including without limitation * the rights to use, copy, modify, merge, publish, distribute, sublicense, * and/or sell copies of the Software, and to permit persons to whom the * Software is furnished to do so, subject to the following conditions: * * The above copyright notice and this permission notice shall be included * in all copies or substantial portions of the Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER * DEALINGS IN THE SOFTWARE. ****************************************************************************/ #include "sdts_al.h" CPL_CVSID("$Id: sdtscatd.cpp 2ace03ec48c36dae8ba74089d85617c095643428 2018-11-02 18:02:33 +0100 Even Rouault $") /************************************************************************/ /* ==================================================================== */ /* SDTS_CATDEntry */ /* */ /* This class is for internal use of the SDTS_CATD class only, */ /* and represents one entry in the directory ... a reference */ /* to another module file. */ /* ==================================================================== */ /************************************************************************/ class SDTS_CATDEntry { public: char * pszModule; char * pszType; char * pszFile; char * pszExternalFlag; char * pszFullPath; }; /************************************************************************/ /* ==================================================================== */ /* SDTS_CATD */ /* ==================================================================== */ /************************************************************************/ /************************************************************************/ /* SDTS_CATD() */ /************************************************************************/ SDTS_CATD::SDTS_CATD() : pszPrefixPath(nullptr), nEntries(0), papoEntries(nullptr) {} /************************************************************************/ /* ~SDTS_CATD() */ /************************************************************************/ SDTS_CATD::~SDTS_CATD() { for( int i = 0; i < nEntries; i++ ) { CPLFree( papoEntries[i]->pszModule ); CPLFree( papoEntries[i]->pszType ); CPLFree( papoEntries[i]->pszFile ); CPLFree( papoEntries[i]->pszExternalFlag ); CPLFree( papoEntries[i]->pszFullPath ); delete papoEntries[i]; } CPLFree( papoEntries ); CPLFree( pszPrefixPath ); } /************************************************************************/ /* Read() */ /* */ /* Read the named file to initialize this structure. */ /************************************************************************/ int SDTS_CATD::Read( const char * pszFilename ) { /* -------------------------------------------------------------------- */ /* Open the file. */ /* -------------------------------------------------------------------- */ DDFModule oCATDFile; if( !oCATDFile.Open( pszFilename ) ) return FALSE; CPLErrorReset(); // Clear any ADRG "unrecognized data_struct_code" errors. /* -------------------------------------------------------------------- */ /* Does this file have a CATD field? If not, it isn't an SDTS */ /* record and we won't even try reading the first record for */ /* fear it will we a huge honking ADRG data record or something. */ /* -------------------------------------------------------------------- */ if( oCATDFile.FindFieldDefn( "CATD" ) == nullptr ) return FALSE; /* -------------------------------------------------------------------- */ /* Strip off the filename, and keep the path prefix. */ /* -------------------------------------------------------------------- */ pszPrefixPath = CPLStrdup( pszFilename ); int i = static_cast(strlen(pszPrefixPath)) - 1; for( ; i > 0; i-- ) { if( pszPrefixPath[i] == '\\' || pszPrefixPath[i] == '/' ) { pszPrefixPath[i] = '\0'; break; } } if( i <= 0 ) { strcpy( pszPrefixPath, "." ); } /* ==================================================================== */ /* Loop reading CATD records, and adding to our list of entries */ /* for each. */ /* ==================================================================== */ DDFRecord *poRecord = nullptr; int nIters = 0; while( (poRecord = oCATDFile.ReadRecord()) != nullptr && nIters < 1000 ) { nIters ++; /* -------------------------------------------------------------------- */ /* Verify that we have a proper CATD record. */ /* -------------------------------------------------------------------- */ if( poRecord->GetStringSubfield( "CATD", 0, "MODN", 0 ) == nullptr ) continue; /* -------------------------------------------------------------------- */ /* Create a new entry, and get the module and file name. */ /* -------------------------------------------------------------------- */ SDTS_CATDEntry *poEntry = new SDTS_CATDEntry; poEntry->pszModule = CPLStrdup(poRecord->GetStringSubfield( "CATD", 0, "NAME", 0 )); poEntry->pszFile = CPLStrdup(poRecord->GetStringSubfield( "CATD", 0, "FILE", 0 )); poEntry->pszExternalFlag = CPLStrdup(poRecord->GetStringSubfield( "CATD", 0, "EXTR", 0 )); poEntry->pszType = CPLStrdup(poRecord->GetStringSubfield( "CATD", 0, "TYPE", 0 )); if( poEntry->pszModule[0] == '\0' || poEntry->pszFile[0] == '\0' || // Exclude following one for performance reasons in oss-fuzz (poEntry->pszFile[0] == '/' && poEntry->pszFile[1] == '\0') ) { CPLFree(poEntry->pszModule); CPLFree(poEntry->pszFile); CPLFree(poEntry->pszExternalFlag); CPLFree(poEntry->pszType); delete poEntry; continue; } /* -------------------------------------------------------------------- */ /* Create a full path to the file. */ /* -------------------------------------------------------------------- */ poEntry->pszFullPath = CPLStrdup(CPLFormCIFilename( pszPrefixPath, poEntry->pszFile, nullptr )); /* -------------------------------------------------------------------- */ /* Add the entry to the list. */ /* -------------------------------------------------------------------- */ papoEntries = reinterpret_cast( CPLRealloc( papoEntries, sizeof(void*) * ++nEntries ) ); papoEntries[nEntries-1] = poEntry; } return nEntries > 0; } /************************************************************************/ /* GetModuleFilePath() */ /************************************************************************/ const char * SDTS_CATD::GetModuleFilePath( const char * pszModule ) const { for( int i = 0; i < nEntries; i++ ) { if( EQUAL(papoEntries[i]->pszModule,pszModule) ) return papoEntries[i]->pszFullPath; } return nullptr; } /************************************************************************/ /* GetEntryModule() */ /************************************************************************/ const char * SDTS_CATD::GetEntryModule( int iEntry ) const { if( iEntry < 0 || iEntry >= nEntries ) return nullptr; return papoEntries[iEntry]->pszModule; } /************************************************************************/ /* GetEntryTypeDesc() */ /************************************************************************/ /** * Fetch the type description of a module in the catalog. * * @param iEntry The module index within the CATD catalog. A number from * zero to GetEntryCount()-1. * * @return A pointer to an internal string with the type description for * this module. This is from the CATD file (subfield TYPE of field CATD), * and will be something like "Attribute Primary ". */ const char * SDTS_CATD::GetEntryTypeDesc( int iEntry ) const { if( iEntry < 0 || iEntry >= nEntries ) return nullptr; return papoEntries[iEntry]->pszType; } /************************************************************************/ /* GetEntryType() */ /************************************************************************/ /** * Fetch the enumerated type of a module in the catalog. * * @param iEntry The module index within the CATD catalog. A number from * zero to GetEntryCount()-1. * * @return A value from the SDTSLayerType enumeration indicating the type of * the module, and indicating the corresponding type of reader.

* *

*/ SDTSLayerType SDTS_CATD::GetEntryType( int iEntry ) const { if( iEntry < 0 || iEntry >= nEntries ) return SLTUnknown; else if( STARTS_WITH_CI(papoEntries[iEntry]->pszType, "Attribute Primary") ) return SLTAttr; else if( STARTS_WITH_CI(papoEntries[iEntry]->pszType,"Attribute Secondary") ) return SLTAttr; else if( EQUAL(papoEntries[iEntry]->pszType,"Line") || STARTS_WITH_CI(papoEntries[iEntry]->pszType, "Line ") ) return SLTLine; else if( STARTS_WITH_CI(papoEntries[iEntry]->pszType, "Point-Node") ) return SLTPoint; else if( STARTS_WITH_CI(papoEntries[iEntry]->pszType, "Polygon") ) return SLTPoly; else if( STARTS_WITH_CI(papoEntries[iEntry]->pszType, "Cell") ) return SLTRaster; else return SLTUnknown; } /************************************************************************/ /* SetEntryTypeUnknown() */ /************************************************************************/ void SDTS_CATD::SetEntryTypeUnknown(int iEntry) { if( iEntry >= 0 && iEntry < nEntries ) { CPLFree(papoEntries[iEntry]->pszType); papoEntries[iEntry]->pszType = CPLStrdup("Unknown"); } } /************************************************************************/ /* GetEntryFilePath() */ /************************************************************************/ /** * Fetch the full filename of the requested module. * * @param iEntry The module index within the CATD catalog. A number from * zero to GetEntryCount()-1. * * @return A pointer to an internal string containing the filename. This * string should not be altered, or freed by the application. */ const char * SDTS_CATD::GetEntryFilePath( int iEntry ) const { if( iEntry < 0 || iEntry >= nEntries ) return nullptr; return papoEntries[iEntry]->pszFullPath; }