/****************************************************************************** * * Project: TIGER/Line Translator * Purpose: Implements TigerPolygon, providing access to .RTA files. * Author: Frank Warmerdam, warmerdam@pobox.com * ****************************************************************************** * Copyright (c) 1999, Frank Warmerdam * Copyright (c) 2011, Even Rouault * * 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 "ogr_tiger.h" #include "cpl_conv.h" #include static const TigerFieldInfo rtA_2002_fields[] = { // fieldname fmt type OFTType beg end len bDefine bSet {"MODULE", ' ', ' ', OFTString, 0, 0, 8, 1, 0}, {"FILE", 'L', 'N', OFTInteger, 6, 10, 5, 1, 1}, {"CENID", 'L', 'A', OFTString, 11, 15, 5, 1, 1}, {"POLYID", 'R', 'N', OFTInteger, 16, 25, 10, 1, 1}, {"STATECU", 'L', 'N', OFTInteger, 26, 27, 2, 1, 1}, {"COUNTYCU", 'L', 'N', OFTInteger, 28, 30, 3, 1, 1}, {"TRACT", 'L', 'N', OFTInteger, 31, 36, 6, 1, 1}, {"BLOCK", 'L', 'N', OFTInteger, 37, 40, 4, 1, 1}, {"BLOCKSUFCU", 'L', 'A', OFTString, 41, 41, 1, 1, 1}, {"RS_A1", 'L', 'A', OFTString, 42, 42, 1, 1, 1}, {"AIANHHFPCU", 'L', 'N', OFTInteger, 43, 47, 5, 1, 1}, {"AIANHHCU", 'L', 'N', OFTInteger, 48, 51, 4, 1, 1}, {"AIHHTLICU", 'L', 'A', OFTString, 52, 52, 1, 1, 1}, {"ANRCCU", 'L', 'N', OFTInteger, 53, 57, 5, 1, 1}, {"AITSCECU", 'L', 'N', OFTInteger, 58, 60, 3, 1, 1}, {"AITSCU", 'L', 'N', OFTInteger, 61, 65, 5, 1, 1}, {"CONCITCU", 'L', 'N', OFTInteger, 66, 70, 5, 1, 1}, {"COUSUBCU", 'L', 'N', OFTInteger, 71, 75, 5, 1, 1}, {"SUBMCDCU", 'L', 'N', OFTInteger, 76, 80, 5, 1, 1}, {"PLACECU", 'L', 'N', OFTInteger, 81, 85, 5, 1, 1}, {"SDELMCU", 'L', 'A', OFTString, 86, 90, 5, 1, 1}, {"SDSECCU", 'L', 'A', OFTString, 91, 95, 5, 1, 1}, {"SDUNICU", 'L', 'A', OFTString, 96, 100, 5, 1, 1}, {"MSACMSACU", 'L', 'N', OFTInteger, 101, 104, 4, 1, 1}, {"PMSACU", 'L', 'N', OFTInteger, 105, 108, 4, 1, 1}, {"NECMACU", 'L', 'N', OFTInteger, 109, 112, 4, 1, 1}, {"CDCU", 'R', 'N', OFTInteger, 113, 114, 2, 1, 1}, {"RS_A2", 'L', 'A', OFTString, 115, 119, 5, 1, 1}, {"RS_A3", 'R', 'A', OFTString, 120, 122, 3, 1, 1}, {"RS_A4", 'R', 'A', OFTString, 123, 128, 6, 1, 1}, {"RS_A5", 'R', 'A', OFTString, 129, 131, 3, 1, 1}, {"RS_A6", 'R', 'A', OFTString, 132, 134, 3, 1, 1}, {"RS_A7", 'R', 'A', OFTString, 135, 139, 5, 1, 1}, {"RS_A8", 'R', 'A', OFTString, 140, 145, 6, 1, 1}, {"RS_A9", 'L', 'A', OFTString, 146, 151, 6, 1, 1}, {"RS_A10", 'L', 'A', OFTString, 152, 157, 6, 1, 1}, {"RS_A11", 'L', 'A', OFTString, 158, 163, 6, 1, 1}, {"RS_A12", 'L', 'A', OFTString, 164, 169, 6, 1, 1}, {"RS_A13", 'L', 'A', OFTString, 170, 175, 6, 1, 1}, {"RS_A14", 'L', 'A', OFTString, 176, 181, 6, 1, 1}, {"RS_A15", 'L', 'A', OFTString, 182, 186, 5, 1, 1}, {"RS_A16", 'L', 'A', OFTString, 187, 187, 1, 1, 1}, {"RS_A17", 'L', 'A', OFTString, 188, 193, 6, 1, 1}, {"RS_A18", 'L', 'A', OFTString, 194, 199, 6, 1, 1}, {"RS_A19", 'L', 'A', OFTString, 200, 210, 11, 1, 1}, }; static const TigerRecordInfo rtA_2002_info = { rtA_2002_fields, sizeof(rtA_2002_fields) / sizeof(TigerFieldInfo), 210}; static const TigerFieldInfo rtA_2003_fields[] = { // fieldname fmt type OFTType beg end len bDefine bSet {"MODULE", ' ', ' ', OFTString, 0, 0, 8, 1, 0}, {"FILE", 'L', 'N', OFTInteger, 6, 10, 5, 1, 1}, {"CENID", 'L', 'A', OFTString, 11, 15, 5, 1, 1}, {"POLYID", 'R', 'N', OFTInteger, 16, 25, 10, 1, 1}, {"STATECU", 'L', 'N', OFTInteger, 26, 27, 2, 1, 1}, {"COUNTYCU", 'L', 'N', OFTInteger, 28, 30, 3, 1, 1}, {"TRACT", 'L', 'N', OFTInteger, 31, 36, 6, 1, 1}, {"BLOCK", 'L', 'N', OFTInteger, 37, 40, 4, 1, 1}, {"BLOCKSUFCU", 'L', 'A', OFTString, 41, 41, 1, 1, 1}, {"RS_A1", 'L', 'A', OFTString, 42, 42, 1, 1, 1}, {"AIANHHFPCU", 'L', 'N', OFTInteger, 43, 47, 5, 1, 1}, {"AIANHHCU", 'L', 'N', OFTInteger, 48, 51, 4, 1, 1}, {"AIHHTLICU", 'L', 'A', OFTString, 52, 52, 1, 1, 1}, {"ANRCCU", 'L', 'N', OFTInteger, 53, 57, 5, 1, 1}, {"AITSCECU", 'L', 'N', OFTInteger, 58, 60, 3, 1, 1}, {"AITSCU", 'L', 'N', OFTInteger, 61, 65, 5, 1, 1}, {"CONCITCU", 'L', 'N', OFTInteger, 66, 70, 5, 1, 1}, {"COUSUBCU", 'L', 'N', OFTInteger, 71, 75, 5, 1, 1}, {"SUBMCDCU", 'L', 'N', OFTInteger, 76, 80, 5, 1, 1}, {"PLACECU", 'L', 'N', OFTInteger, 81, 85, 5, 1, 1}, {"SDELMCU", 'L', 'A', OFTString, 86, 90, 5, 1, 1}, {"SDSECCU", 'L', 'A', OFTString, 91, 95, 5, 1, 1}, {"SDUNICU", 'L', 'A', OFTString, 96, 100, 5, 1, 1}, {"RS_A20", 'L', 'A', OFTString, 101, 104, 4, 1, 1}, {"RS_A21", 'L', 'A', OFTString, 105, 108, 4, 1, 1}, {"RS_A22", 'L', 'A', OFTString, 109, 112, 4, 1, 1}, {"CDCU", 'R', 'N', OFTInteger, 113, 114, 2, 1, 1}, {"ZCTA5CU", 'L', 'A', OFTString, 115, 119, 5, 1, 1}, {"ZCTA3CU", 'R', 'A', OFTString, 120, 122, 3, 1, 1}, {"RS_A4", 'R', 'A', OFTString, 123, 128, 6, 1, 1}, {"RS_A5", 'R', 'A', OFTString, 129, 131, 3, 1, 1}, {"RS_A6", 'R', 'A', OFTString, 132, 134, 3, 1, 1}, {"RS_A7", 'R', 'A', OFTString, 135, 139, 5, 1, 1}, {"RS_A8", 'R', 'A', OFTString, 140, 145, 6, 1, 1}, {"RS_A9", 'L', 'A', OFTString, 146, 151, 6, 1, 1}, {"CBSACU", 'L', 'A', OFTInteger, 152, 156, 5, 1, 1}, {"CSACU", 'L', 'A', OFTInteger, 157, 159, 3, 1, 1}, {"NECTACU", 'L', 'A', OFTInteger, 160, 164, 5, 1, 1}, {"CNECTACU", 'L', 'A', OFTInteger, 165, 167, 3, 1, 1}, {"METDIVCU", 'L', 'A', OFTInteger, 168, 172, 5, 1, 1}, {"NECTADIVCU", 'L', 'A', OFTInteger, 173, 177, 5, 1, 1}, {"RS_A14", 'L', 'A', OFTString, 178, 181, 4, 1, 1}, {"RS_A15", 'L', 'A', OFTString, 182, 186, 5, 1, 1}, {"RS_A16", 'L', 'A', OFTString, 187, 187, 1, 1, 1}, {"RS_A17", 'L', 'A', OFTString, 188, 193, 6, 1, 1}, {"RS_A18", 'L', 'A', OFTString, 194, 199, 6, 1, 1}, {"RS_A19", 'L', 'A', OFTString, 200, 210, 11, 1, 1}, }; static const TigerRecordInfo rtA_2003_info = { rtA_2003_fields, sizeof(rtA_2003_fields) / sizeof(TigerFieldInfo), 210}; static const TigerFieldInfo rtA_2004_fields[] = { // fieldname fmt type OFTType beg end len bDefine bSet {"MODULE", ' ', ' ', OFTString, 0, 0, 8, 1, 0}, {"FILE", 'L', 'N', OFTInteger, 6, 10, 5, 1, 1}, {"CENID", 'L', 'A', OFTString, 11, 15, 5, 1, 1}, {"POLYID", 'R', 'N', OFTInteger, 16, 25, 10, 1, 1}, {"STATECU", 'L', 'N', OFTInteger, 26, 27, 2, 1, 1}, {"COUNTYCU", 'L', 'N', OFTInteger, 28, 30, 3, 1, 1}, {"TRACT", 'L', 'N', OFTInteger, 31, 36, 6, 1, 1}, {"BLOCK", 'L', 'N', OFTInteger, 37, 40, 4, 1, 1}, {"BLOCKSUFCU", 'L', 'A', OFTString, 41, 41, 1, 1, 1}, {"RS_A1", 'L', 'A', OFTString, 42, 42, 1, 1, 1}, {"AIANHHFPCU", 'L', 'N', OFTInteger, 43, 47, 5, 1, 1}, {"AIANHHCU", 'L', 'N', OFTInteger, 48, 51, 4, 1, 1}, {"AIHHTLICU", 'L', 'A', OFTString, 52, 52, 1, 1, 1}, {"ANRCCU", 'L', 'N', OFTInteger, 53, 57, 5, 1, 1}, {"AITSCECU", 'L', 'N', OFTInteger, 58, 60, 3, 1, 1}, {"AITSCU", 'L', 'N', OFTInteger, 61, 65, 5, 1, 1}, {"CONCITCU", 'L', 'N', OFTInteger, 66, 70, 5, 1, 1}, {"COUSUBCU", 'L', 'N', OFTInteger, 71, 75, 5, 1, 1}, {"SUBMCDCU", 'L', 'N', OFTInteger, 76, 80, 5, 1, 1}, {"PLACECU", 'L', 'N', OFTInteger, 81, 85, 5, 1, 1}, {"SDELMCU", 'L', 'A', OFTString, 86, 90, 5, 1, 1}, {"SDSECCU", 'L', 'A', OFTString, 91, 95, 5, 1, 1}, {"SDUNICU", 'L', 'A', OFTString, 96, 100, 5, 1, 1}, {"RS_A20", 'L', 'A', OFTString, 101, 104, 4, 1, 1}, {"RS_A21", 'L', 'A', OFTString, 105, 108, 4, 1, 1}, {"RS_A22", 'L', 'A', OFTString, 109, 112, 4, 1, 1}, {"CDCU", 'R', 'N', OFTInteger, 113, 114, 2, 1, 1}, {"ZCTA5CU", 'L', 'A', OFTString, 115, 119, 5, 1, 1}, {"ZCTA3CU", 'R', 'A', OFTString, 120, 122, 3, 1, 1}, {"RS_A4", 'R', 'A', OFTString, 123, 128, 6, 1, 1}, {"RS_A5", 'R', 'A', OFTString, 129, 131, 3, 1, 1}, {"RS_A6", 'R', 'A', OFTString, 132, 134, 3, 1, 1}, {"RS_A7", 'R', 'A', OFTString, 135, 139, 5, 1, 1}, {"RS_A8", 'R', 'A', OFTString, 140, 145, 6, 1, 1}, {"RS_A9", 'L', 'A', OFTString, 146, 151, 6, 1, 1}, {"CBSACU", 'L', 'A', OFTInteger, 152, 156, 5, 1, 1}, {"CSACU", 'L', 'A', OFTInteger, 157, 159, 3, 1, 1}, {"NECTACU", 'L', 'A', OFTInteger, 160, 164, 5, 1, 1}, {"CNECTACU", 'L', 'A', OFTInteger, 165, 167, 3, 1, 1}, {"METDIVCU", 'L', 'A', OFTInteger, 168, 172, 5, 1, 1}, {"NECTADIVCU", 'L', 'A', OFTInteger, 173, 177, 5, 1, 1}, {"RS_A14", 'L', 'A', OFTString, 178, 181, 4, 1, 1}, {"UACU", 'L', 'N', OFTInteger, 182, 186, 5, 1, 1}, {"URCU", 'L', 'A', OFTString, 187, 187, 1, 1, 1}, {"RS_A17", 'L', 'A', OFTString, 188, 193, 6, 1, 1}, {"RS_A18", 'L', 'A', OFTString, 194, 199, 6, 1, 1}, {"RS_A19", 'L', 'A', OFTString, 200, 210, 11, 1, 1}, }; static const TigerRecordInfo rtA_2004_info = { rtA_2004_fields, sizeof(rtA_2004_fields) / sizeof(TigerFieldInfo), 210}; static const TigerFieldInfo rtA_fields[] = { // fieldname fmt type OFTType beg end len bDefine bSet {"MODULE", ' ', ' ', OFTString, 0, 0, 8, 1, 0}, {"FILE", 'L', 'N', OFTString, 6, 10, 5, 1, 1}, {"STATE", 'L', 'N', OFTInteger, 6, 7, 2, 1, 1}, {"COUNTY", 'L', 'N', OFTInteger, 8, 10, 3, 1, 1}, {"CENID", 'L', 'A', OFTString, 11, 15, 5, 1, 1}, {"POLYID", 'R', 'N', OFTInteger, 16, 25, 10, 1, 1}, {"FAIR", 'L', 'N', OFTInteger, 26, 30, 5, 1, 1}, {"FMCD", 'L', 'N', OFTInteger, 31, 35, 5, 1, 1}, {"FPL", 'L', 'N', OFTInteger, 36, 40, 5, 1, 1}, {"CTBNA90", 'L', 'N', OFTInteger, 41, 46, 6, 1, 1}, {"BLK90", 'L', 'A', OFTString, 47, 50, 4, 1, 1}, {"CD106", 'L', 'N', OFTInteger, 51, 52, 2, 1, 1}, {"CD108", 'L', 'N', OFTInteger, 53, 54, 2, 1, 1}, {"SDELM", 'L', 'A', OFTString, 55, 59, 5, 1, 1}, {"SDSEC", 'L', 'N', OFTString, 65, 69, 5, 1, 1}, {"SDUNI", 'L', 'A', OFTString, 70, 74, 5, 1, 1}, {"TAZ", 'R', 'A', OFTString, 75, 80, 6, 1, 1}, {"UA", 'L', 'N', OFTInteger, 81, 84, 4, 1, 1}, {"URBFLAG", 'L', 'A', OFTString, 85, 85, 1, 1, 1}, {"CTPP", 'L', 'A', OFTString, 86, 89, 4, 1, 1}, {"STATE90", 'L', 'N', OFTInteger, 90, 91, 2, 1, 1}, {"COUN90", 'L', 'N', OFTInteger, 92, 94, 3, 1, 1}, {"AIR90", 'L', 'N', OFTInteger, 95, 98, 4, 1, 1}}; static const TigerRecordInfo rtA_info = { rtA_fields, sizeof(rtA_fields) / sizeof(TigerFieldInfo), 98}; static const TigerFieldInfo rtS_2002_fields[] = { // fieldname fmt type OFTType beg end len bDefine bSet {"FILE", 'L', 'N', OFTInteger, 6, 10, 5, 0, 0}, {"CENID", 'L', 'A', OFTString, 11, 15, 5, 0, 0}, {"POLYID", 'R', 'N', OFTInteger, 16, 25, 10, 0, 0}, {"STATE", 'L', 'N', OFTInteger, 26, 27, 2, 1, 1}, {"COUNTY", 'L', 'N', OFTInteger, 28, 30, 3, 1, 1}, {"TRACT", 'L', 'N', OFTInteger, 31, 36, 6, 0, 0}, {"BLOCK", 'L', 'N', OFTInteger, 37, 40, 4, 0, 0}, {"BLKGRP", 'L', 'N', OFTInteger, 41, 41, 1, 1, 1}, {"AIANHHFP", 'L', 'N', OFTInteger, 42, 46, 5, 1, 1}, {"AIANHH", 'L', 'N', OFTInteger, 47, 50, 4, 1, 1}, {"AIHHTLI", 'L', 'A', OFTString, 51, 51, 1, 1, 1}, {"ANRC", 'L', 'N', OFTInteger, 52, 56, 5, 1, 1}, {"AITSCE", 'L', 'N', OFTInteger, 57, 59, 3, 1, 1}, {"AITS", 'L', 'N', OFTInteger, 60, 64, 5, 1, 1}, {"CONCIT", 'L', 'N', OFTInteger, 65, 69, 5, 1, 1}, {"COUSUB", 'L', 'N', OFTInteger, 70, 74, 5, 1, 1}, {"SUBMCD", 'L', 'N', OFTInteger, 75, 79, 5, 1, 1}, {"PLACE", 'L', 'N', OFTInteger, 80, 84, 5, 1, 1}, {"SDELM", 'L', 'N', OFTInteger, 85, 89, 5, 1, 1}, {"SDSEC", 'L', 'N', OFTInteger, 90, 94, 5, 1, 1}, {"SDUNI", 'L', 'N', OFTInteger, 95, 99, 5, 1, 1}, {"MSACMSA", 'L', 'N', OFTInteger, 100, 103, 4, 1, 1}, {"PMSA", 'L', 'N', OFTInteger, 104, 107, 4, 1, 1}, {"NECMA", 'L', 'N', OFTInteger, 108, 111, 4, 1, 1}, {"CD106", 'L', 'N', OFTInteger, 112, 113, 2, 1, 1}, // Note: spec has CD106 with 'R', but sample data file (08005) seems to // have been written with 'L', so I'm using 'L' here. mbp Tue Dec 24 // 19:03:40 2002 {"CD108", 'R', 'N', OFTInteger, 114, 115, 2, 1, 1}, {"PUMA5", 'L', 'N', OFTInteger, 116, 120, 5, 1, 1}, {"PUMA1", 'L', 'N', OFTInteger, 121, 125, 5, 1, 1}, {"ZCTA5", 'L', 'A', OFTString, 126, 130, 5, 1, 1}, {"ZCTA3", 'L', 'A', OFTString, 131, 133, 3, 1, 1}, {"TAZ", 'L', 'A', OFTString, 134, 139, 6, 1, 1}, {"TAZCOMB", 'L', 'A', OFTString, 140, 145, 6, 1, 1}, {"UA", 'L', 'N', OFTInteger, 146, 150, 5, 1, 1}, {"UR", 'L', 'A', OFTString, 151, 151, 1, 1, 1}, {"VTD", 'R', 'A', OFTString, 152, 157, 6, 1, 1}, {"SLDU", 'R', 'A', OFTString, 158, 160, 3, 1, 1}, {"SLDL", 'R', 'A', OFTString, 161, 163, 3, 1, 1}, {"UGA", 'L', 'A', OFTString, 164, 168, 5, 1, 1}, }; static const TigerRecordInfo rtS_2002_info = { rtS_2002_fields, sizeof(rtS_2002_fields) / sizeof(TigerFieldInfo), 168}; static const TigerFieldInfo rtS_2000_Redistricting_fields[] = { {"FILE", 'L', 'N', OFTString, 6, 10, 5, 0, 0}, {"STATE", 'L', 'N', OFTInteger, 6, 7, 2, 0, 0}, {"COUNTY", 'L', 'N', OFTInteger, 8, 10, 3, 0, 0}, {"CENID", 'L', 'A', OFTString, 11, 15, 5, 0, 0}, {"POLYID", 'R', 'N', OFTInteger, 16, 25, 10, 0, 0}, {"WATER", 'L', 'N', OFTString, 26, 26, 1, 1, 1}, {"CMSAMSA", 'L', 'N', OFTInteger, 27, 30, 4, 1, 1}, {"PMSA", 'L', 'N', OFTInteger, 31, 34, 4, 1, 1}, {"AIANHH", 'L', 'N', OFTInteger, 35, 39, 5, 1, 1}, {"AIR", 'L', 'N', OFTInteger, 40, 43, 4, 1, 1}, {"TRUST", 'L', 'A', OFTString, 44, 44, 1, 1, 1}, {"ANRC", 'L', 'A', OFTInteger, 45, 46, 2, 1, 1}, {"STATECU", 'L', 'N', OFTInteger, 47, 48, 2, 1, 1}, {"COUNTYCU", 'L', 'N', OFTInteger, 49, 51, 3, 1, 1}, {"FCCITY", 'L', 'N', OFTInteger, 52, 56, 5, 1, 1}, {"FMCD", 'L', 'N', OFTInteger, 57, 61, 5, 0, 0}, {"FSMCD", 'L', 'N', OFTInteger, 62, 66, 5, 1, 1}, {"PLACE", 'L', 'N', OFTInteger, 67, 71, 5, 1, 1}, {"CTBNA00", 'L', 'N', OFTInteger, 72, 77, 6, 1, 1}, {"BLK00", 'L', 'N', OFTString, 78, 81, 4, 1, 1}, {"RS10", 'R', 'N', OFTInteger, 82, 82, 0, 0, 1}, {"CDCU", 'L', 'N', OFTInteger, 83, 84, 2, 1, 1}, {"SLDU", 'R', 'A', OFTString, 85, 87, 3, 1, 1}, {"SLDL", 'R', 'A', OFTString, 88, 90, 3, 1, 1}, {"UGA", 'L', 'A', OFTString, 91, 95, 5, 1, 1}, {"BLKGRP", 'L', 'N', OFTInteger, 96, 96, 1, 1, 1}, {"VTD", 'R', 'A', OFTString, 97, 102, 6, 1, 1}, {"STATECOL", 'L', 'N', OFTInteger, 103, 104, 2, 1, 1}, {"COUNTYCOL", 'L', 'N', OFTInteger, 105, 107, 3, 1, 1}, {"BLOCKCOL", 'R', 'N', OFTInteger, 108, 112, 5, 1, 1}, {"BLKSUFCOL", 'L', 'A', OFTString, 113, 113, 1, 1, 1}, {"ZCTA5", 'L', 'A', OFTString, 114, 118, 5, 1, 1}}; static const TigerRecordInfo rtS_2000_Redistricting_info = { rtS_2000_Redistricting_fields, sizeof(rtS_2000_Redistricting_fields) / sizeof(TigerFieldInfo), 120}; static const TigerFieldInfo rtS_fields[] = { {"FILE", 'L', 'N', OFTString, 6, 10, 5, 0, 0}, {"STATE", 'L', 'N', OFTInteger, 6, 7, 2, 0, 0}, {"COUNTY", 'L', 'N', OFTInteger, 8, 10, 3, 0, 0}, {"CENID", 'L', 'A', OFTString, 11, 15, 5, 0, 0}, {"POLYID", 'R', 'N', OFTInteger, 16, 25, 10, 0, 0}, {"WATER", 'L', 'N', OFTString, 26, 26, 1, 1, 1}, {"CMSAMSA", 'L', 'N', OFTInteger, 27, 30, 4, 1, 1}, {"PMSA", 'L', 'N', OFTInteger, 31, 34, 4, 1, 1}, {"AIANHH", 'L', 'N', OFTInteger, 35, 39, 5, 1, 1}, {"AIR", 'L', 'N', OFTInteger, 40, 43, 4, 1, 1}, {"TRUST", 'L', 'A', OFTString, 44, 44, 1, 1, 1}, {"ANRC", 'L', 'A', OFTInteger, 45, 46, 2, 1, 1}, {"STATECU", 'L', 'N', OFTInteger, 47, 48, 2, 1, 1}, {"COUNTYCU", 'L', 'N', OFTInteger, 49, 51, 3, 1, 1}, {"FCCITY", 'L', 'N', OFTInteger, 52, 56, 5, 1, 1}, {"FMCD", 'L', 'N', OFTInteger, 57, 61, 5, 0, 0}, {"FSMCD", 'L', 'N', OFTInteger, 62, 66, 5, 1, 1}, {"PLACE", 'L', 'N', OFTInteger, 67, 71, 5, 1, 1}, {"CTBNA00", 'L', 'N', OFTInteger, 72, 77, 6, 1, 1}, {"BLK00", 'L', 'N', OFTString, 78, 81, 4, 1, 1}, {"RS10", 'R', 'N', OFTInteger, 82, 82, 0, 0, 1}, {"CDCU", 'L', 'N', OFTInteger, 83, 84, 2, 1, 1}, {"STSENATE", 'L', 'A', OFTString, 85, 90, 6, 1, 1}, {"STHOUSE", 'L', 'A', OFTString, 91, 96, 6, 1, 1}, {"VTD00", 'L', 'A', OFTString, 97, 102, 6, 1, 1}}; static const TigerRecordInfo rtS_info = { rtS_fields, sizeof(rtS_fields) / sizeof(TigerFieldInfo), 120}; /************************************************************************/ /* TigerPolygon() */ /************************************************************************/ TigerPolygon::TigerPolygon(OGRTigerDataSource *poDSIn, const char * /* pszPrototypeModule */) : psRTAInfo(nullptr), psRTSInfo(nullptr), fpRTS(nullptr), bUsingRTS(true), nRTSRecLen(0) { poDS = poDSIn; poFeatureDefn = new OGRFeatureDefn("Polygon"); poFeatureDefn->Reference(); poFeatureDefn->SetGeomType(wkbNone); if (poDS->GetVersion() >= TIGER_2004) { psRTAInfo = &rtA_2004_info; } else if (poDS->GetVersion() >= TIGER_2003) { psRTAInfo = &rtA_2003_info; } else if (poDS->GetVersion() >= TIGER_2002) { psRTAInfo = &rtA_2002_info; } else { psRTAInfo = &rtA_info; } if (poDS->GetVersion() >= TIGER_2002) { psRTSInfo = &rtS_2002_info; } else if (poDS->GetVersion() >= TIGER_2000_Redistricting) { psRTSInfo = &rtS_2000_Redistricting_info; } else { psRTSInfo = &rtS_info; } /* -------------------------------------------------------------------- */ /* Fields from type A record. */ /* -------------------------------------------------------------------- */ AddFieldDefns(psRTAInfo, poFeatureDefn); /* -------------------------------------------------------------------- */ /* Add the RTS records if it is available. */ /* -------------------------------------------------------------------- */ if (bUsingRTS) { AddFieldDefns(psRTSInfo, poFeatureDefn); } } /************************************************************************/ /* ~TigerPolygon() */ /************************************************************************/ TigerPolygon::~TigerPolygon() { if (fpRTS != nullptr) VSIFCloseL(fpRTS); } /************************************************************************/ /* SetModule() */ /************************************************************************/ bool TigerPolygon::SetModule(const char *pszModuleIn) { if (!OpenFile(pszModuleIn, "A")) return false; EstablishFeatureCount(); /* -------------------------------------------------------------------- */ /* Open the RTS file */ /* -------------------------------------------------------------------- */ if (bUsingRTS) { if (fpRTS != nullptr) { VSIFCloseL(fpRTS); fpRTS = nullptr; } if (pszModuleIn) { char *pszFilename = poDS->BuildFilename(pszModuleIn, "S"); fpRTS = VSIFOpenL(pszFilename, "rb"); CPLFree(pszFilename); nRTSRecLen = EstablishRecordLength(fpRTS); } } return true; } /************************************************************************/ /* GetFeature() */ /************************************************************************/ OGRFeature *TigerPolygon::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 %sA", nRecordId, pszModule); return nullptr; } /* -------------------------------------------------------------------- */ /* Read the raw record data from the file. */ /* -------------------------------------------------------------------- */ if (fpPrimary == nullptr) return nullptr; if (nRecordLength > static_cast(sizeof(achRecord))) { CPLError(CE_Failure, CPLE_AppDefined, "Record length too large"); return nullptr; } { const auto nOffset = static_cast(nRecordId) * nRecordLength; if (VSIFSeekL(fpPrimary, nOffset, SEEK_SET) != 0) { CPLError(CE_Failure, CPLE_FileIO, "Failed to seek to %" PRIu64 " of %sA", nOffset, pszModule); return nullptr; } } if (VSIFReadL(achRecord, nRecordLength, 1, fpPrimary) != 1) { CPLError(CE_Failure, CPLE_FileIO, "Failed to read record %d of %sA", nRecordId, pszModule); return nullptr; } /* -------------------------------------------------------------------- */ /* Set fields. */ /* -------------------------------------------------------------------- */ OGRFeature *poFeature = new OGRFeature(poFeatureDefn); SetFields(psRTAInfo, poFeature, achRecord); /* -------------------------------------------------------------------- */ /* Read RTS record, and apply fields. */ /* -------------------------------------------------------------------- */ if (fpRTS != nullptr) { char achRTSRec[OGR_TIGER_RECBUF_LEN]; { const auto nOffset = static_cast(nRecordId) * nRTSRecLen; if (VSIFSeekL(fpRTS, nOffset, SEEK_SET) != 0) { CPLError(CE_Failure, CPLE_FileIO, "Failed to seek to %" PRIu64 " of %sS", nOffset, pszModule); delete poFeature; return nullptr; } } // Overflow cannot happen since psRTInfo->nRecordLength is unsigned // char and sizeof(achRecord) == OGR_TIGER_RECBUF_LEN > 255 if (VSIFReadL(achRTSRec, psRTSInfo->nRecordLength, 1, fpRTS) != 1) { CPLError(CE_Failure, CPLE_FileIO, "Failed to read record %d of %sS", nRecordId, pszModule); delete poFeature; return nullptr; } SetFields(psRTSInfo, poFeature, achRTSRec); } return poFeature; }