/****************************************************************************** * $Id: tigerentitynames.cpp,v 1.12 2006/03/29 00:46:20 fwarmerdam Exp $ * * Project: TIGER/Line Translator * Purpose: Implements TigerEntityNames, providing access to .RTC 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. ****************************************************************************** * * $Log: tigerentitynames.cpp,v $ * Revision 1.12 2006/03/29 00:46:20 fwarmerdam * update contact info * * Revision 1.11 2005/09/21 00:53:19 fwarmerdam * fixup OGRFeatureDefn and OGRSpatialReference refcount handling * * Revision 1.10 2003/01/11 15:29:55 warmerda * expanded tabs * * Revision 1.9 2003/01/04 23:21:56 mbp * Minor bug fixes and field definition changes. Cleaned * up and commented code written for TIGER 2002 support. * * Revision 1.8 2002/12/26 00:20:19 mbp * re-organized code to hold TIGER-version details in TigerRecordInfo structs; * first round implementation of TIGER_2002 support * * Revision 1.7 2001/07/19 16:05:49 warmerda * clear out tabs * * Revision 1.6 2001/07/18 04:55:16 warmerda * added CPL_CSVID * * Revision 1.5 2001/07/04 23:25:32 warmerda * first round implementation of writer * * Revision 1.4 2001/07/04 05:40:35 warmerda * upgraded to support FILE, and Tiger2000 schema * * Revision 1.3 2001/01/19 21:15:20 warmerda * expanded tabs * * Revision 1.2 2000/01/13 05:18:11 warmerda * added support for multiple versions * * Revision 1.1 1999/12/22 15:37:59 warmerda * New * */ #include "ogr_tiger.h" #include "cpl_conv.h" CPL_CVSID("$Id: tigerentitynames.cpp,v 1.12 2006/03/29 00:46:20 fwarmerdam Exp $"); #define FILE_CODE "C" static TigerFieldInfo rtC_2002_fields[] = { // fieldname fmt type OFTType beg end len bDefine bSet bWrite { "MODULE", ' ', ' ', OFTString, 0, 0, 8, 1, 0, 0 }, { "STATE", 'L', 'N', OFTInteger, 6, 7, 2, 1, 1, 1 }, { "COUNTY", 'L', 'N', OFTInteger, 8, 10, 3, 1, 1, 1 }, { "DATAYR", 'L', 'A', OFTString, 11, 14, 4, 1, 1, 1 }, { "FIPS", 'L', 'N', OFTInteger, 15, 19, 5, 1, 1, 1 }, { "FIPSCC", 'L', 'A', OFTString, 20, 21, 2, 1, 1, 1 }, { "PLACEDC", 'L', 'A', OFTString, 22, 22, 1, 1, 1, 1 }, { "LSADC", 'L', 'A', OFTString, 23, 24, 2, 1, 1, 1 }, { "ENTITY", 'L', 'A', OFTString, 25, 25, 1, 1, 1, 1 }, { "MA", 'L', 'N', OFTInteger, 26, 29, 4, 1, 1, 1 }, { "SD", 'L', 'N', OFTInteger, 30, 34, 5, 1, 1, 1 }, { "AIANHH", 'L', 'N', OFTInteger, 35, 38, 4, 1, 1, 1 }, { "VTDTRACT", 'R', 'A', OFTString, 39, 44, 6, 1, 1, 1 }, { "UAUGA", 'L', 'N', OFTInteger, 45, 49, 5, 1, 1, 1 }, { "AITSCE", 'L', 'N', OFTInteger, 50, 52, 3, 1, 1, 1 }, { "RS_C1", 'L', 'N', OFTInteger, 53, 54, 2, 1, 1, 1 }, { "RS_C2", 'L', 'N', OFTInteger, 55, 62, 8, 1, 1, 1 }, { "NAME", 'L', 'A', OFTString, 63, 122, 60, 1, 1, 1 }, }; static TigerRecordInfo rtC_2002_info = { rtC_2002_fields, sizeof(rtC_2002_fields) / sizeof(TigerFieldInfo), 122 }; static TigerFieldInfo rtC_2000_Redistricting_fields[] = { // fieldname fmt type OFTType beg end len bDefine bSet bWrite { "MODULE", ' ', ' ', OFTString, 0, 0, 8, 1, 0, 0 }, { "STATE", 'L', 'N', OFTInteger, 6, 7, 2, 1, 1, 1 }, { "COUNTY", 'L', 'N', OFTInteger, 8, 10, 3, 1, 1, 1 }, { "FIPSYR", 'L', 'N', OFTString, 11, 14, 4, 1, 1, 1 }, { "FIPS", 'L', 'N', OFTInteger, 15, 19, 5, 1, 1, 1 }, { "FIPSCC", 'L', 'A', OFTString, 20, 21, 2, 1, 1, 1 }, { "PDC", 'L', 'A', OFTString, 22, 22, 1, 1, 1, 1 }, { "LASAD", 'L', 'A', OFTString, 23, 24, 2, 1, 1, 1 }, { "ENTITY", 'L', 'A', OFTString, 25, 25, 1, 1, 1, 1 }, { "MA", 'L', 'N', OFTInteger, 26, 29, 4, 1, 1, 1 }, { "SD", 'L', 'N', OFTInteger, 30, 34, 5, 1, 1, 1 }, { "AIR", 'L', 'N', OFTInteger, 35, 38, 4, 1, 1, 1 }, { "VTD", 'R', 'A', OFTString, 39, 44, 6, 1, 1, 1 }, { "UA", 'L', 'N', OFTInteger, 45, 49, 5, 1, 1, 1 }, { "AITSCE", 'L', 'N', OFTInteger, 50, 52, 3, 1, 1, 1 }, { "NAME", 'L', 'A', OFTString, 53, 112, 66, 1, 1, 1 } }; static TigerRecordInfo rtC_2000_Redistricting_info = { rtC_2000_Redistricting_fields, sizeof(rtC_2000_Redistricting_fields) / sizeof(TigerFieldInfo), 112 }; static TigerFieldInfo rtC_fields[] = { // fieldname fmt type OFTType beg end len bDefine bSet bWrite { "MODULE", ' ', ' ', OFTString, 0, 0, 8, 1, 0, 0 }, { "STATE", 'L', 'N', OFTInteger, 6, 7, 2, 1, 1, 1 }, { "COUNTY", 'L', 'N', OFTInteger, 8, 10, 3, 1, 1, 1 }, { "FIPSYR", 'L', 'N', OFTString, 11, 12, 4, 1, 1, 1 }, { "FIPS", 'L', 'N', OFTInteger, 13, 17, 5, 1, 1, 1 }, { "FIPSCC", 'L', 'A', OFTString, 18, 19, 2, 1, 1, 1 }, { "PDC", 'L', 'A', OFTString, 20, 20, 1, 1, 1, 1 }, { "LASAD", 'L', 'A', OFTString, 21, 22, 2, 1, 1, 1 }, { "ENTITY", 'L', 'A', OFTString, 23, 23, 1, 1, 1, 1 }, { "MA", 'L', 'N', OFTInteger, 24, 27, 4, 1, 1, 1 }, { "SD", 'L', 'N', OFTInteger, 28, 32, 5, 1, 1, 1 }, { "AIR", 'L', 'N', OFTInteger, 33, 36, 4, 1, 1, 1 }, { "VTD", 'R', 'A', OFTString, 37, 42, 6, 1, 1, 1 }, { "UA", 'L', 'N', OFTInteger, 43, 46, 4, 1, 1, 1 }, { "NAME", 'L', 'A', OFTString, 47, 112, 66, 1, 1, 1 } }; static TigerRecordInfo rtC_info = { rtC_fields, sizeof(rtC_fields) / sizeof(TigerFieldInfo), 112 }; /************************************************************************/ /* TigerEntityNames() */ /************************************************************************/ TigerEntityNames::TigerEntityNames( OGRTigerDataSource * poDSIn, const char * pszPrototypeModule ) { poDS = poDSIn; poFeatureDefn = new OGRFeatureDefn( "EntityNames" ); poFeatureDefn->Reference(); poFeatureDefn->SetGeomType( wkbPoint ); if( poDS->GetVersion() >= TIGER_2002 ) { psRTCInfo = &rtC_2002_info; } else if( poDS->GetVersion() >= TIGER_2000_Redistricting ) { psRTCInfo = &rtC_2000_Redistricting_info; } else { psRTCInfo = &rtC_info; } AddFieldDefns( psRTCInfo, poFeatureDefn ); } /************************************************************************/ /* ~TigerEntityNames() */ /************************************************************************/ TigerEntityNames::~TigerEntityNames() { } /************************************************************************/ /* SetModule() */ /************************************************************************/ int TigerEntityNames::SetModule( const char * pszModule ) { if( !OpenFile( pszModule, "C" ) ) return FALSE; EstablishFeatureCount(); return TRUE; } /************************************************************************/ /* GetFeature() */ /************************************************************************/ OGRFeature *TigerEntityNames::GetFeature( int nRecordId ) { char achRecord[OGR_TIGER_RECBUF_LEN]; if( nRecordId < 0 || nRecordId >= nFeatures ) { CPLError( CE_Failure, CPLE_FileIO, "Request for out-of-range feature %d of %sC", nRecordId, pszModule ); return NULL; } /* -------------------------------------------------------------------- */ /* Read the raw record data from the file. */ /* -------------------------------------------------------------------- */ if( fpPrimary == NULL ) return NULL; if( VSIFSeek( fpPrimary, nRecordId * nRecordLength, SEEK_SET ) != 0 ) { CPLError( CE_Failure, CPLE_FileIO, "Failed to seek to %d of %sC", nRecordId * nRecordLength, pszModule ); return NULL; } if( VSIFRead( achRecord, psRTCInfo->nRecordLength, 1, fpPrimary ) != 1 ) { CPLError( CE_Failure, CPLE_FileIO, "Failed to read record %d of %sC", nRecordId, pszModule ); return NULL; } /* -------------------------------------------------------------------- */ /* Set fields. */ /* -------------------------------------------------------------------- */ OGRFeature *poFeature = new OGRFeature( poFeatureDefn ); SetFields( psRTCInfo, poFeature, achRecord ); return poFeature; } /************************************************************************/ /* CreateFeature() */ /************************************************************************/ OGRErr TigerEntityNames::CreateFeature( OGRFeature *poFeature ) { char szRecord[OGR_TIGER_RECBUF_LEN]; if( !SetWriteModule( FILE_CODE, psRTCInfo->nRecordLength+2, poFeature ) ) return OGRERR_FAILURE; memset( szRecord, ' ', psRTCInfo->nRecordLength ); WriteFields( psRTCInfo, poFeature, szRecord ); WriteRecord( szRecord, psRTCInfo->nRecordLength, FILE_CODE ); return OGRERR_NONE; }