postgis/loader/safileio.c
Paul Ramsey 30b6497b47 Add support file for shapefil update
git-svn-id: http://svn.osgeo.org/postgis/trunk@5959 b70326c6-7e19-0410-871a-916f4a2858ee
2010-09-10 20:47:51 +00:00

299 lines
9.9 KiB
C

/******************************************************************************
* $Id: safileio.c,v 1.4 2008-01-16 20:05:14 bram 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 LICENSE.LGPL). 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.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.4 2008-01-16 20:05:14 bram 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
/* Local Prototypes */
SAFile SADFOpen( const char *pszFilename, const char *pszAccess );
SAOffset SADFRead( void *p, SAOffset size, SAOffset nmemb, SAFile file );
SAOffset SADFWrite( void *p, SAOffset size, SAOffset nmemb, SAFile file );
SAOffset SADFSeek( SAFile file, SAOffset offset, int whence );
SAOffset SADFTell( SAFile file );
int SADFFlush( SAFile file );
int SADFClose( SAFile file );
int SADRemove( const char *filename );
void SADError( const char *message );
/************************************************************************/
/* 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