343 lines
10 KiB
C
343 lines
10 KiB
C
/**
|
|
* PhysicsFS; a portable, flexible file i/o abstraction.
|
|
*
|
|
* Documentation is in physfs.h. It's verbose, honest. :)
|
|
*
|
|
* Please see the file LICENSE in the source's root directory.
|
|
*
|
|
* This file written by Ryan C. Gordon.
|
|
*/
|
|
|
|
#if HAVE_CONFIG_H
|
|
# include <config.h>
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <assert.h>
|
|
|
|
#define __PHYSICSFS_INTERNAL__
|
|
#include "physfs_internal.h"
|
|
|
|
/* This byteorder stuff was lifted from SDL. http://www.libsdl.org/ */
|
|
#define PHYSFS_LIL_ENDIAN 1234
|
|
#define PHYSFS_BIG_ENDIAN 4321
|
|
|
|
#if defined(__i386__) || defined(__ia64__) || defined(WIN32) || \
|
|
(defined(__alpha__) || defined(__alpha)) || \
|
|
defined(__arm__) || \
|
|
(defined(__mips__) && defined(__MIPSEL__)) || \
|
|
defined(__SYMBIAN32__) || \
|
|
defined(__x86_64__) || \
|
|
defined(__LITTLE_ENDIAN__)
|
|
#define PHYSFS_BYTEORDER PHYSFS_LIL_ENDIAN
|
|
#else
|
|
#define PHYSFS_BYTEORDER PHYSFS_BIG_ENDIAN
|
|
#endif
|
|
|
|
|
|
/* The macros used to swap values */
|
|
/* Try to use superfast macros on systems that support them */
|
|
#ifdef linux
|
|
#include <asm/byteorder.h>
|
|
#ifdef __arch__swab16
|
|
#define PHYSFS_Swap16 __arch__swab16
|
|
#endif
|
|
#ifdef __arch__swab32
|
|
#define PHYSFS_Swap32 __arch__swab32
|
|
#endif
|
|
#endif /* linux */
|
|
|
|
#if (defined _MSC_VER)
|
|
#define __inline__ __inline
|
|
#endif
|
|
|
|
#ifndef PHYSFS_Swap16
|
|
static __inline__ PHYSFS_uint16 PHYSFS_Swap16(PHYSFS_uint16 D)
|
|
{
|
|
return((D<<8)|(D>>8));
|
|
}
|
|
#endif
|
|
#ifndef PHYSFS_Swap32
|
|
static __inline__ PHYSFS_uint32 PHYSFS_Swap32(PHYSFS_uint32 D)
|
|
{
|
|
return((D<<24)|((D<<8)&0x00FF0000)|((D>>8)&0x0000FF00)|(D>>24));
|
|
}
|
|
#endif
|
|
#ifndef PHYSFS_NO_64BIT_SUPPORT
|
|
#ifndef PHYSFS_Swap64
|
|
static __inline__ PHYSFS_uint64 PHYSFS_Swap64(PHYSFS_uint64 val) {
|
|
PHYSFS_uint32 hi, lo;
|
|
|
|
/* Separate into high and low 32-bit values and swap them */
|
|
lo = (PHYSFS_uint32)(val&0xFFFFFFFF);
|
|
val >>= 32;
|
|
hi = (PHYSFS_uint32)(val&0xFFFFFFFF);
|
|
val = PHYSFS_Swap32(lo);
|
|
val <<= 32;
|
|
val |= PHYSFS_Swap32(hi);
|
|
return(val);
|
|
}
|
|
#endif
|
|
#else
|
|
#ifndef PHYSFS_Swap64
|
|
/* This is mainly to keep compilers from complaining in PHYSFS code.
|
|
If there is no real 64-bit datatype, then compilers will complain about
|
|
the fake 64-bit datatype that PHYSFS provides when it compiles user code.
|
|
*/
|
|
#define PHYSFS_Swap64(X) (X)
|
|
#endif
|
|
#endif /* PHYSFS_NO_64BIT_SUPPORT */
|
|
|
|
|
|
/* Byteswap item from the specified endianness to the native endianness */
|
|
#if PHYSFS_BYTEORDER == PHYSFS_LIL_ENDIAN
|
|
PHYSFS_uint16 PHYSFS_swapULE16(PHYSFS_uint16 x) { return(x); }
|
|
PHYSFS_sint16 PHYSFS_swapSLE16(PHYSFS_sint16 x) { return(x); }
|
|
PHYSFS_uint32 PHYSFS_swapULE32(PHYSFS_uint32 x) { return(x); }
|
|
PHYSFS_sint32 PHYSFS_swapSLE32(PHYSFS_sint32 x) { return(x); }
|
|
PHYSFS_uint64 PHYSFS_swapULE64(PHYSFS_uint64 x) { return(x); }
|
|
PHYSFS_sint64 PHYSFS_swapSLE64(PHYSFS_sint64 x) { return(x); }
|
|
|
|
PHYSFS_uint16 PHYSFS_swapUBE16(PHYSFS_uint16 x) { return(PHYSFS_Swap16(x)); }
|
|
PHYSFS_sint16 PHYSFS_swapSBE16(PHYSFS_sint16 x) { return(PHYSFS_Swap16(x)); }
|
|
PHYSFS_uint32 PHYSFS_swapUBE32(PHYSFS_uint32 x) { return(PHYSFS_Swap32(x)); }
|
|
PHYSFS_sint32 PHYSFS_swapSBE32(PHYSFS_sint32 x) { return(PHYSFS_Swap32(x)); }
|
|
PHYSFS_uint64 PHYSFS_swapUBE64(PHYSFS_uint64 x) { return(PHYSFS_Swap64(x)); }
|
|
PHYSFS_sint64 PHYSFS_swapSBE64(PHYSFS_sint64 x) { return(PHYSFS_Swap64(x)); }
|
|
#else
|
|
PHYSFS_uint16 PHYSFS_swapULE16(PHYSFS_uint16 x) { return(PHYSFS_Swap16(x)); }
|
|
PHYSFS_sint16 PHYSFS_swapSLE16(PHYSFS_sint16 x) { return(PHYSFS_Swap16(x)); }
|
|
PHYSFS_uint32 PHYSFS_swapULE32(PHYSFS_uint32 x) { return(PHYSFS_Swap32(x)); }
|
|
PHYSFS_sint32 PHYSFS_swapSLE32(PHYSFS_sint32 x) { return(PHYSFS_Swap32(x)); }
|
|
PHYSFS_uint64 PHYSFS_swapULE64(PHYSFS_uint64 x) { return(PHYSFS_Swap64(x)); }
|
|
PHYSFS_sint64 PHYSFS_swapSLE64(PHYSFS_sint64 x) { return(PHYSFS_Swap64(x)); }
|
|
|
|
PHYSFS_uint16 PHYSFS_swapUBE16(PHYSFS_uint16 x) { return(x); }
|
|
PHYSFS_sint16 PHYSFS_swapSBE16(PHYSFS_sint16 x) { return(x); }
|
|
PHYSFS_uint32 PHYSFS_swapUBE32(PHYSFS_uint32 x) { return(x); }
|
|
PHYSFS_sint32 PHYSFS_swapSBE32(PHYSFS_sint32 x) { return(x); }
|
|
PHYSFS_uint64 PHYSFS_swapUBE64(PHYSFS_uint64 x) { return(x); }
|
|
PHYSFS_sint64 PHYSFS_swapSBE64(PHYSFS_sint64 x) { return(x); }
|
|
#endif
|
|
|
|
|
|
int PHYSFS_readSLE16(PHYSFS_file *file, PHYSFS_sint16 *val)
|
|
{
|
|
PHYSFS_sint16 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapSLE16(in);
|
|
return(1);
|
|
} /* PHYSFS_readSLE16 */
|
|
|
|
|
|
int PHYSFS_readULE16(PHYSFS_file *file, PHYSFS_uint16 *val)
|
|
{
|
|
PHYSFS_uint16 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapULE16(in);
|
|
return(1);
|
|
} /* PHYSFS_readULE16 */
|
|
|
|
|
|
int PHYSFS_readSBE16(PHYSFS_file *file, PHYSFS_sint16 *val)
|
|
{
|
|
PHYSFS_sint16 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapSBE16(in);
|
|
return(1);
|
|
} /* PHYSFS_readSBE16 */
|
|
|
|
|
|
int PHYSFS_readUBE16(PHYSFS_file *file, PHYSFS_uint16 *val)
|
|
{
|
|
PHYSFS_uint16 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapUBE16(in);
|
|
return(1);
|
|
} /* PHYSFS_readUBE16 */
|
|
|
|
|
|
int PHYSFS_readSLE32(PHYSFS_file *file, PHYSFS_sint32 *val)
|
|
{
|
|
PHYSFS_sint32 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapSLE32(in);
|
|
return(1);
|
|
} /* PHYSFS_readSLE32 */
|
|
|
|
|
|
int PHYSFS_readULE32(PHYSFS_file *file, PHYSFS_uint32 *val)
|
|
{
|
|
PHYSFS_uint32 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapULE32(in);
|
|
return(1);
|
|
} /* PHYSFS_readULE32 */
|
|
|
|
|
|
int PHYSFS_readSBE32(PHYSFS_file *file, PHYSFS_sint32 *val)
|
|
{
|
|
PHYSFS_sint32 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapSBE32(in);
|
|
return(1);
|
|
} /* PHYSFS_readSBE32 */
|
|
|
|
|
|
int PHYSFS_readUBE32(PHYSFS_file *file, PHYSFS_uint32 *val)
|
|
{
|
|
PHYSFS_uint32 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapUBE32(in);
|
|
return(1);
|
|
} /* PHYSFS_readUBE32 */
|
|
|
|
|
|
int PHYSFS_readSLE64(PHYSFS_file *file, PHYSFS_sint64 *val)
|
|
{
|
|
PHYSFS_sint64 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapSLE64(in);
|
|
return(1);
|
|
} /* PHYSFS_readSLE64 */
|
|
|
|
|
|
int PHYSFS_readULE64(PHYSFS_file *file, PHYSFS_uint64 *val)
|
|
{
|
|
PHYSFS_uint64 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapULE64(in);
|
|
return(1);
|
|
} /* PHYSFS_readULE64 */
|
|
|
|
|
|
int PHYSFS_readSBE64(PHYSFS_file *file, PHYSFS_sint64 *val)
|
|
{
|
|
PHYSFS_sint64 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapSBE64(in);
|
|
return(1);
|
|
} /* PHYSFS_readSBE64 */
|
|
|
|
|
|
int PHYSFS_readUBE64(PHYSFS_file *file, PHYSFS_uint64 *val)
|
|
{
|
|
PHYSFS_uint64 in;
|
|
BAIL_IF_MACRO(val == NULL, ERR_INVALID_ARGUMENT, 0);
|
|
BAIL_IF_MACRO(PHYSFS_read(file, &in, sizeof (in), 1) != 1, NULL, 0);
|
|
*val = PHYSFS_swapUBE64(in);
|
|
return(1);
|
|
} /* PHYSFS_readUBE64 */
|
|
|
|
|
|
|
|
int PHYSFS_writeSLE16(PHYSFS_file *file, PHYSFS_sint16 val)
|
|
{
|
|
PHYSFS_sint16 out = PHYSFS_swapSLE16(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeSLE16 */
|
|
|
|
|
|
int PHYSFS_writeULE16(PHYSFS_file *file, PHYSFS_uint16 val)
|
|
{
|
|
PHYSFS_uint16 out = PHYSFS_swapULE16(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeULE16 */
|
|
|
|
|
|
int PHYSFS_writeSBE16(PHYSFS_file *file, PHYSFS_sint16 val)
|
|
{
|
|
PHYSFS_sint16 out = PHYSFS_swapSBE16(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeSBE16 */
|
|
|
|
|
|
int PHYSFS_writeUBE16(PHYSFS_file *file, PHYSFS_uint16 val)
|
|
{
|
|
PHYSFS_uint16 out = PHYSFS_swapUBE16(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeUBE16 */
|
|
|
|
|
|
int PHYSFS_writeSLE32(PHYSFS_file *file, PHYSFS_sint32 val)
|
|
{
|
|
PHYSFS_sint32 out = PHYSFS_swapSLE32(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeSLE32 */
|
|
|
|
|
|
int PHYSFS_writeULE32(PHYSFS_file *file, PHYSFS_uint32 val)
|
|
{
|
|
PHYSFS_uint32 out = PHYSFS_swapULE32(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeULE32 */
|
|
|
|
|
|
int PHYSFS_writeSBE32(PHYSFS_file *file, PHYSFS_sint32 val)
|
|
{
|
|
PHYSFS_sint32 out = PHYSFS_swapSBE32(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeSBE32 */
|
|
|
|
|
|
int PHYSFS_writeUBE32(PHYSFS_file *file, PHYSFS_uint32 val)
|
|
{
|
|
PHYSFS_uint32 out = PHYSFS_swapUBE32(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeUBE32 */
|
|
|
|
|
|
int PHYSFS_writeSLE64(PHYSFS_file *file, PHYSFS_sint64 val)
|
|
{
|
|
PHYSFS_sint64 out = PHYSFS_swapSLE64(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeSLE64 */
|
|
|
|
|
|
int PHYSFS_writeULE64(PHYSFS_file *file, PHYSFS_uint64 val)
|
|
{
|
|
PHYSFS_uint64 out = PHYSFS_swapULE64(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeULE64 */
|
|
|
|
|
|
int PHYSFS_writeSBE64(PHYSFS_file *file, PHYSFS_sint64 val)
|
|
{
|
|
PHYSFS_sint64 out = PHYSFS_swapSBE64(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeSBE64 */
|
|
|
|
|
|
int PHYSFS_writeUBE64(PHYSFS_file *file, PHYSFS_uint64 val)
|
|
{
|
|
PHYSFS_uint64 out = PHYSFS_swapUBE64(val);
|
|
BAIL_IF_MACRO(PHYSFS_write(file, &out, sizeof (out), 1) != 1, NULL, 0);
|
|
return(1);
|
|
} /* PHYSFS_writeUBE64 */
|
|
|
|
/* end of physfs_byteorder.c ... */
|
|
|