You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
291 lines
9.6 KiB
291 lines
9.6 KiB
/****************************************************************************** |
|
* $Id: safileio.c,v 1.5 2016-12-05 12:44:05 erouault Exp $ |
|
* |
|
* Project: Shapelib |
|
* Purpose: Default implementation of file io based on stdio. |
|
* Author: Frank Warmerdam, warmerdam@pobox.com |
|
* |
|
****************************************************************************** |
|
* Copyright (c) 2007, Frank Warmerdam |
|
* |
|
* This software is available under the following "MIT Style" license, |
|
* or at the option of the licensee under the LGPL (see COPYING). This |
|
* option is discussed in more detail in shapelib.html. |
|
* |
|
* -- |
|
* |
|
* 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: safileio.c,v $ |
|
* Revision 1.5 2016-12-05 12:44:05 erouault |
|
* * Major overhaul of Makefile build system to use autoconf/automake. |
|
* |
|
* * Warning fixes in contrib/ |
|
* |
|
* Revision 1.4 2008-01-16 20:05:14 bram |
|
* Add file hooks that accept UTF-8 encoded filenames on some platforms. Use SASetupUtf8Hooks |
|
* tosetup the hooks and check SHPAPI_UTF8_HOOKS for its availability. Currently, this |
|
* is only available on the Windows platform that decodes the UTF-8 filenames to wide |
|
* character strings and feeds them to _wfopen and _wremove. |
|
* |
|
* Revision 1.3 2007/12/18 18:28:11 bram |
|
* - create hook for client specific atof (bugzilla ticket 1615) |
|
* - check for NULL handle before closing cpCPG file, and close after reading. |
|
* |
|
* Revision 1.2 2007/12/15 20:25:30 bram |
|
* dbfopen.c now reads the Code Page information from the DBF file, and exports |
|
* this information as a string through the DBFGetCodePage function. This is |
|
* either the number from the LDID header field ("LDID/<number>") or as the |
|
* content of an accompanying .CPG file. When creating a DBF file, the code can |
|
* be set using DBFCreateEx. |
|
* |
|
* Revision 1.1 2007/12/06 06:56:41 fwarmerdam |
|
* new |
|
* |
|
*/ |
|
|
|
#include "shapefil.h" |
|
|
|
#include <math.h> |
|
#include <limits.h> |
|
#include <assert.h> |
|
#include <stdlib.h> |
|
#include <string.h> |
|
#include <stdio.h> |
|
|
|
SHP_CVSID("$Id: safileio.c,v 1.5 2016-12-05 12:44:05 erouault Exp $"); |
|
|
|
#ifdef SHPAPI_UTF8_HOOKS |
|
# ifdef SHPAPI_WINDOWS |
|
# define WIN32_LEAN_AND_MEAN |
|
# define NOMINMAX |
|
# include <windows.h> |
|
# pragma comment(lib, "kernel32.lib") |
|
# endif |
|
#endif |
|
|
|
/************************************************************************/ |
|
/* SADFOpen() */ |
|
/************************************************************************/ |
|
|
|
SAFile SADFOpen( const char *pszFilename, const char *pszAccess ) |
|
|
|
{ |
|
return (SAFile) fopen( pszFilename, pszAccess ); |
|
} |
|
|
|
/************************************************************************/ |
|
/* SADFRead() */ |
|
/************************************************************************/ |
|
|
|
SAOffset SADFRead( void *p, SAOffset size, SAOffset nmemb, SAFile file ) |
|
|
|
{ |
|
return (SAOffset) fread( p, (size_t) size, (size_t) nmemb, |
|
(FILE *) file ); |
|
} |
|
|
|
/************************************************************************/ |
|
/* SADFWrite() */ |
|
/************************************************************************/ |
|
|
|
SAOffset SADFWrite( void *p, SAOffset size, SAOffset nmemb, SAFile file ) |
|
|
|
{ |
|
return (SAOffset) fwrite( p, (size_t) size, (size_t) nmemb, |
|
(FILE *) file ); |
|
} |
|
|
|
/************************************************************************/ |
|
/* SADFSeek() */ |
|
/************************************************************************/ |
|
|
|
SAOffset SADFSeek( SAFile file, SAOffset offset, int whence ) |
|
|
|
{ |
|
return (SAOffset) fseek( (FILE *) file, (long) offset, whence ); |
|
} |
|
|
|
/************************************************************************/ |
|
/* SADFTell() */ |
|
/************************************************************************/ |
|
|
|
SAOffset SADFTell( SAFile file ) |
|
|
|
{ |
|
return (SAOffset) ftell( (FILE *) file ); |
|
} |
|
|
|
/************************************************************************/ |
|
/* SADFFlush() */ |
|
/************************************************************************/ |
|
|
|
int SADFFlush( SAFile file ) |
|
|
|
{ |
|
return fflush( (FILE *) file ); |
|
} |
|
|
|
/************************************************************************/ |
|
/* SADFClose() */ |
|
/************************************************************************/ |
|
|
|
int SADFClose( SAFile file ) |
|
|
|
{ |
|
return fclose( (FILE *) file ); |
|
} |
|
|
|
/************************************************************************/ |
|
/* SADFClose() */ |
|
/************************************************************************/ |
|
|
|
int SADRemove( const char *filename ) |
|
|
|
{ |
|
return remove( filename ); |
|
} |
|
|
|
/************************************************************************/ |
|
/* SADError() */ |
|
/************************************************************************/ |
|
|
|
void SADError( const char *message ) |
|
|
|
{ |
|
fprintf( stderr, "%s\n", message ); |
|
} |
|
|
|
/************************************************************************/ |
|
/* SASetupDefaultHooks() */ |
|
/************************************************************************/ |
|
|
|
void SASetupDefaultHooks( SAHooks *psHooks ) |
|
|
|
{ |
|
psHooks->FOpen = SADFOpen; |
|
psHooks->FRead = SADFRead; |
|
psHooks->FWrite = SADFWrite; |
|
psHooks->FSeek = SADFSeek; |
|
psHooks->FTell = SADFTell; |
|
psHooks->FFlush = SADFFlush; |
|
psHooks->FClose = SADFClose; |
|
psHooks->Remove = SADRemove; |
|
|
|
psHooks->Error = SADError; |
|
psHooks->Atof = atof; |
|
} |
|
|
|
|
|
|
|
|
|
#ifdef SHPAPI_WINDOWS |
|
|
|
/************************************************************************/ |
|
/* Utf8ToWideChar */ |
|
/************************************************************************/ |
|
|
|
const wchar_t* Utf8ToWideChar( const char *pszFilename ) |
|
{ |
|
int nMulti, nWide; |
|
wchar_t *pwszFileName; |
|
|
|
nMulti = strlen(pszFilename) + 1; |
|
nWide = MultiByteToWideChar( CP_UTF8, 0, pszFilename, nMulti, 0, 0); |
|
if( nWide == 0 ) |
|
{ |
|
return NULL; |
|
} |
|
pwszFileName = (wchar_t*) malloc(nWide * sizeof(wchar_t)); |
|
if ( pwszFileName == NULL ) |
|
{ |
|
return NULL; |
|
} |
|
if( MultiByteToWideChar( CP_UTF8, 0, pszFilename, nMulti, pwszFileName, nWide ) == 0 ) |
|
{ |
|
free( pwszFileName ); |
|
return NULL; |
|
} |
|
return pwszFileName; |
|
} |
|
|
|
/************************************************************************/ |
|
/* SAUtf8WFOpen */ |
|
/************************************************************************/ |
|
|
|
SAFile SAUtf8WFOpen( const char *pszFilename, const char *pszAccess ) |
|
{ |
|
SAFile file = NULL; |
|
const wchar_t *pwszFileName, *pwszAccess; |
|
pwszFileName = Utf8ToWideChar( pszFilename ); |
|
pwszAccess = Utf8ToWideChar( pszAccess ); |
|
if( pwszFileName != NULL && pwszFileName != NULL) |
|
{ |
|
file = (SAFile) _wfopen( pwszFileName, pwszAccess ); |
|
} |
|
free ((wchar_t*) pwszFileName); |
|
free ((wchar_t*) pwszAccess); |
|
return file; |
|
} |
|
|
|
/************************************************************************/ |
|
/* SAUtf8WRemove() */ |
|
/************************************************************************/ |
|
|
|
int SAUtf8WRemove( const char *pszFilename ) |
|
{ |
|
const wchar_t *pwszFileName = Utf8ToWideChar( pszFilename ); |
|
int rc = -1; |
|
if( pwszFileName != NULL ) |
|
{ |
|
rc = _wremove( pwszFileName ); |
|
} |
|
free ((wchar_t*) pwszFileName); |
|
return rc; |
|
} |
|
|
|
#endif |
|
|
|
#ifdef SHPAPI_UTF8_HOOKS |
|
|
|
/************************************************************************/ |
|
/* SASetupUtf8Hooks() */ |
|
/************************************************************************/ |
|
|
|
void SASetupUtf8Hooks( SAHooks *psHooks ) |
|
{ |
|
#ifdef SHPAPI_WINDOWS |
|
psHooks->FOpen = SAUtf8WFOpen; |
|
psHooks->Remove = SAUtf8WRemove; |
|
#else |
|
# error "no implementations of UTF-8 hooks available for this platform" |
|
#endif |
|
psHooks->FRead = SADFRead; |
|
psHooks->FWrite = SADFWrite; |
|
psHooks->FSeek = SADFSeek; |
|
psHooks->FTell = SADFTell; |
|
psHooks->FFlush = SADFFlush; |
|
psHooks->FClose = SADFClose; |
|
|
|
psHooks->Error = SADError; |
|
psHooks->Atof = atof; |
|
} |
|
|
|
#endif
|
|
|