1
0
mirror of https://github.com/upx/upx synced 2025-09-28 19:06:07 +08:00
upx/src/bele.h
Markus F.X.J. Oberhumer 24ffaa0738 Added BE64 and LE64 types.
committer: mfx <mfx> 1126183138 +0000
2005-09-08 12:38:58 +00:00

476 lines
14 KiB
C++

/* bele.h -- access memory in BigEndian and LittleEndian byte order
This file is part of the UPX executable compressor.
Copyright (C) 1996-2005 Markus Franz Xaver Johannes Oberhumer
Copyright (C) 1996-2005 Laszlo Molnar
All Rights Reserved.
UPX and the UCL library are free software; you can redistribute them
and/or modify them under the terms of the GNU General Public License as
published by the Free Software Foundation; either version 2 of
the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; see the file COPYING.
If not, write to the Free Software Foundation, Inc.,
59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
Markus F.X.J. Oberhumer Laszlo Molnar
<mfx@users.sourceforge.net> <ml1050@users.sourceforge.net>
*/
#ifndef __UPX_BELE_H
#define __UPX_BELE_H
/*************************************************************************
// core
**************************************************************************/
inline unsigned get_be16(const void *bb)
{
#if defined(ACC_UA_GET_BE16)
return ACC_UA_GET_BE16(bb);
#else
return acc_ua_get_be16(bb);
#endif
}
inline void set_be16(void *bb, unsigned v)
{
#if defined(ACC_UA_SET_BE16)
ACC_UA_SET_BE16(bb, v);
#else
acc_ua_set_be16(bb, v);
#endif
}
inline unsigned get_be24(const void *bb)
{
#if defined(ACC_UA_GET_BE24)
return ACC_UA_GET_BE24(bb);
#else
return acc_ua_get_be24(bb);
#endif
}
inline void set_be24(void *bb, unsigned v)
{
#if defined(ACC_UA_SET_BE24)
ACC_UA_SET_BE24(bb, v);
#else
acc_ua_set_be24(bb, v);
#endif
}
inline unsigned get_be32(const void *bb)
{
#if defined(ACC_UA_GET_BE32)
return ACC_UA_GET_BE32(bb);
#else
return acc_ua_get_be32(bb);
#endif
}
inline void set_be32(void *bb, unsigned v)
{
#if defined(ACC_UA_SET_BE32)
ACC_UA_SET_BE32(bb, v);
#else
acc_ua_set_be32(bb, v);
#endif
}
inline acc_uint64l_t get_be64(const void *bb)
{
#if defined(ACC_UA_GET_BE64)
return ACC_UA_GET_BE64(bb);
#else
return acc_ua_get_be64(bb);
#endif
}
inline void set_be64(void *bb, acc_uint64l_t v)
{
#if defined(ACC_UA_SET_BE64)
ACC_UA_SET_BE64(bb, v);
#else
acc_ua_set_be64(bb, v);
#endif
}
inline unsigned get_le16(const void *bb)
{
#if defined(ACC_UA_GET_LE16)
return ACC_UA_GET_LE16(bb);
#else
return acc_ua_get_le16(bb);
#endif
}
inline void set_le16(void *bb, unsigned v)
{
#if defined(ACC_UA_SET_LE16)
ACC_UA_SET_LE16(bb, v);
#else
acc_ua_set_le16(bb, v);
#endif
}
inline unsigned get_le24(const void *bb)
{
#if defined(ACC_UA_GET_LE24)
return ACC_UA_GET_LE24(bb);
#else
return acc_ua_get_le24(bb);
#endif
}
inline void set_le24(void *bb, unsigned v)
{
#if defined(ACC_UA_SET_LE24)
ACC_UA_SET_LE24(bb, v);
#else
acc_ua_set_le24(bb, v);
#endif
}
inline unsigned get_le32(const void *bb)
{
#if defined(ACC_UA_GET_LE32)
return ACC_UA_GET_LE32(bb);
#else
return acc_ua_get_le32(bb);
#endif
}
inline void set_le32(void *bb, unsigned v)
{
#if defined(ACC_UA_SET_LE32)
ACC_UA_SET_LE32(bb, v);
#else
acc_ua_set_le32(bb, v);
#endif
}
inline acc_uint64l_t get_le64(const void *bb)
{
#if defined(ACC_UA_GET_LE64)
return ACC_UA_GET_LE64(bb);
#else
return acc_ua_get_le64(bb);
#endif
}
inline void set_le64(void *bb, acc_uint64l_t v)
{
#if defined(ACC_UA_SET_LE64)
ACC_UA_SET_LE64(bb, v);
#else
acc_ua_set_le64(bb, v);
#endif
}
/*************************************************************************
// get signed values, i.e. sign-extend
**************************************************************************/
inline int sign_extend(int v, int bits)
{
const unsigned sign_bit = 1u << (bits - 1);
v |= 0u - (v & sign_bit);
return v;
}
inline acc_int64l_t sign_extend(acc_int64l_t v, int bits)
{
const acc_uint64l_t sign_bit = ACC_UINT64_C(1) << (bits - 1);
v |= ACC_UINT64_C(0) - (v & sign_bit);
return v;
}
inline int get_be16_signed(const void *bb)
{
int v = get_be16(bb);
return sign_extend(v, 16);
}
inline int get_be24_signed(const void *bb)
{
int v = get_be24(bb);
return sign_extend(v, 24);
}
inline int get_be32_signed(const void *bb)
{
int v = get_be32(bb);
return sign_extend(v, 32);
}
inline acc_int64l_t get_be64_signed(const void *bb)
{
acc_int64l_t v = get_be64(bb);
return sign_extend(v, 64);
}
inline int get_le16_signed(const void *bb)
{
int v = get_le16(bb);
return sign_extend(v, 16);
}
inline int get_le24_signed(const void *bb)
{
int v = get_le24(bb);
return sign_extend(v, 24);
}
inline int get_le32_signed(const void *bb)
{
int v = get_le32(bb);
return sign_extend(v, 32);
}
inline int get_le64_signed(const void *bb)
{
acc_int64l_t v = get_le64(bb);
return sign_extend(v, 64);
}
/*************************************************************************
// classes for portable unaligned access
//
// Important: these classes must be PODs (Plain Old Data), i.e. no
// constructor, no destructor, no virtual functions and no default
// assignment operator, and all fields must be public(!).
**************************************************************************/
struct BE16
{
unsigned char d[2];
BE16& operator = (unsigned v) { set_be16(d, v); return *this; }
BE16& operator += (unsigned v) { set_be16(d, get_be16(d) + v); return *this; }
BE16& operator -= (unsigned v) { set_be16(d, get_be16(d) - v); return *this; }
BE16& operator *= (unsigned v) { set_be16(d, get_be16(d) * v); return *this; }
BE16& operator &= (unsigned v) { set_be16(d, get_be16(d) & v); return *this; }
BE16& operator |= (unsigned v) { set_be16(d, get_be16(d) | v); return *this; }
BE16& operator ^= (unsigned v) { set_be16(d, get_be16(d) ^ v); return *this; }
operator unsigned () const { return get_be16(d); }
}
__attribute_packed;
struct BE32
{
unsigned char d[4];
BE32& operator = (unsigned v) { set_be32(d, v); return *this; }
BE32& operator += (unsigned v) { set_be32(d, get_be32(d) + v); return *this; }
BE32& operator -= (unsigned v) { set_be32(d, get_be32(d) - v); return *this; }
BE32& operator *= (unsigned v) { set_be32(d, get_be32(d) * v); return *this; }
BE32& operator &= (unsigned v) { set_be32(d, get_be32(d) & v); return *this; }
BE32& operator |= (unsigned v) { set_be32(d, get_be32(d) | v); return *this; }
BE32& operator ^= (unsigned v) { set_be32(d, get_be32(d) ^ v); return *this; }
operator unsigned () const { return get_be32(d); }
}
__attribute_packed;
struct BE64
{
unsigned char d[8];
BE64& operator = (acc_uint64l_t v) { set_be64(d, v); return *this; }
BE64& operator += (acc_uint64l_t v) { set_be64(d, get_be64(d) + v); return *this; }
BE64& operator -= (acc_uint64l_t v) { set_be64(d, get_be64(d) - v); return *this; }
BE64& operator *= (acc_uint64l_t v) { set_be64(d, get_be64(d) * v); return *this; }
BE64& operator &= (acc_uint64l_t v) { set_be64(d, get_be64(d) & v); return *this; }
BE64& operator |= (acc_uint64l_t v) { set_be64(d, get_be64(d) | v); return *this; }
BE64& operator ^= (acc_uint64l_t v) { set_be64(d, get_be64(d) ^ v); return *this; }
operator acc_uint64l_t () const { return get_be64(d); }
}
__attribute_packed;
struct LE16
{
unsigned char d[2];
LE16& operator = (unsigned v) { set_le16(d, v); return *this; }
LE16& operator += (unsigned v) { set_le16(d, get_le16(d) + v); return *this; }
LE16& operator -= (unsigned v) { set_le16(d, get_le16(d) - v); return *this; }
LE16& operator *= (unsigned v) { set_le16(d, get_le16(d) * v); return *this; }
LE16& operator &= (unsigned v) { set_le16(d, get_le16(d) & v); return *this; }
LE16& operator |= (unsigned v) { set_le16(d, get_le16(d) | v); return *this; }
LE16& operator ^= (unsigned v) { set_le16(d, get_le16(d) ^ v); return *this; }
operator unsigned () const { return get_le16(d); }
}
__attribute_packed;
struct LE32
{
unsigned char d[4];
LE32& operator = (unsigned v) { set_le32(d, v); return *this; }
LE32& operator += (unsigned v) { set_le32(d, get_le32(d) + v); return *this; }
LE32& operator -= (unsigned v) { set_le32(d, get_le32(d) - v); return *this; }
LE32& operator *= (unsigned v) { set_le32(d, get_le32(d) * v); return *this; }
LE32& operator &= (unsigned v) { set_le32(d, get_le32(d) & v); return *this; }
LE32& operator |= (unsigned v) { set_le32(d, get_le32(d) | v); return *this; }
LE32& operator ^= (unsigned v) { set_le32(d, get_le32(d) ^ v); return *this; }
operator unsigned () const { return get_le32(d); }
}
__attribute_packed;
struct LE64
{
unsigned char d[8];
LE64& operator = (acc_uint64l_t v) { set_le64(d, v); return *this; }
LE64& operator += (acc_uint64l_t v) { set_le64(d, get_le64(d) + v); return *this; }
LE64& operator -= (acc_uint64l_t v) { set_le64(d, get_le64(d) - v); return *this; }
LE64& operator *= (acc_uint64l_t v) { set_le64(d, get_le64(d) * v); return *this; }
LE64& operator &= (acc_uint64l_t v) { set_le64(d, get_le64(d) & v); return *this; }
LE64& operator |= (acc_uint64l_t v) { set_le64(d, get_le64(d) | v); return *this; }
LE64& operator ^= (acc_uint64l_t v) { set_le64(d, get_le64(d) ^ v); return *this; }
operator acc_uint64l_t () const { return get_le64(d); }
}
__attribute_packed;
/*************************************************************************
// global operators
**************************************************************************/
inline bool operator < (const BE16& v1, const BE16& v2) {
return (unsigned) v1 < (unsigned) v2;
}
inline bool operator < (const BE32& v1, const BE32& v2) {
return (unsigned) v1 < (unsigned) v2;
}
inline bool operator < (const BE64& v1, const BE64& v2) {
return (acc_uint64l_t) v1 < (acc_uint64l_t) v2;
}
inline bool operator < (const LE16& v1, const LE16& v2) {
return (unsigned) v1 < (unsigned) v2;
}
inline bool operator < (const LE32& v1, const LE32& v2) {
return (unsigned) v1 < (unsigned) v2;
}
inline bool operator < (const LE64& v1, const LE64& v2) {
return (acc_uint64l_t) v1 < (acc_uint64l_t) v2;
}
template <class T>
inline T* operator + (T* ptr, const BE16& v) { return ptr + (unsigned) v; }
template <class T>
inline T* operator + (const BE16& v, T* ptr) { return ptr + (unsigned) v; }
template <class T>
inline T* operator - (T* ptr, const BE16& v) { return ptr - (unsigned) v; }
template <class T>
inline T* operator + (T* ptr, const BE32& v) { return ptr + (unsigned) v; }
template <class T>
inline T* operator + (const BE32& v, T* ptr) { return ptr + (unsigned) v; }
template <class T>
inline T* operator - (T* ptr, const BE32& v) { return ptr - (unsigned) v; }
// these are not implemented on purpose and will cause link-time errors
template <class T> T* operator + (T* ptr, const BE64& v);
template <class T> T* operator + (const BE64& v, T* ptr);
template <class T> T* operator - (T* ptr, const BE64& v);
template <class T>
inline T* operator + (T* ptr, const LE16& v) { return ptr + (unsigned) v; }
template <class T>
inline T* operator + (const LE16& v, T* ptr) { return ptr + (unsigned) v; }
template <class T>
inline T* operator - (T* ptr, const LE16& v) { return ptr - (unsigned) v; }
template <class T>
inline T* operator + (T* ptr, const LE32& v) { return ptr + (unsigned) v; }
template <class T>
inline T* operator + (const LE32& v, T* ptr) { return ptr + (unsigned) v; }
template <class T>
inline T* operator - (T* ptr, const LE32& v) { return ptr - (unsigned) v; }
// these are not implemented on purpose and will cause link-time errors
template <class T> T* operator + (T* ptr, const LE64& v);
template <class T> T* operator + (const LE64& v, T* ptr);
template <class T> T* operator - (T* ptr, const LE64& v);
/*************************************************************************
// misc
**************************************************************************/
// for use with qsort()
int __acc_cdecl_qsort be16_compare(const void *e1, const void *e2);
int __acc_cdecl_qsort be24_compare(const void *e1, const void *e2);
int __acc_cdecl_qsort be32_compare(const void *e1, const void *e2);
int __acc_cdecl_qsort be64_compare(const void *e1, const void *e2);
int __acc_cdecl_qsort le16_compare(const void *e1, const void *e2);
int __acc_cdecl_qsort le24_compare(const void *e1, const void *e2);
int __acc_cdecl_qsort le32_compare(const void *e1, const void *e2);
int __acc_cdecl_qsort le64_compare(const void *e1, const void *e2);
int __acc_cdecl_qsort be16_compare_signed(const void *e1, const void *e2);
int __acc_cdecl_qsort be24_compare_signed(const void *e1, const void *e2);
int __acc_cdecl_qsort be32_compare_signed(const void *e1, const void *e2);
int __acc_cdecl_qsort be64_compare_signed(const void *e1, const void *e2);
int __acc_cdecl_qsort le16_compare_signed(const void *e1, const void *e2);
int __acc_cdecl_qsort le24_compare_signed(const void *e1, const void *e2);
int __acc_cdecl_qsort le32_compare_signed(const void *e1, const void *e2);
int __acc_cdecl_qsort le64_compare_signed(const void *e1, const void *e2);
// just for testing...
#if !defined(ACC_CFG_NO_UNALIGNED)
#if 0 && (ACC_ARCH_AMD64 || ACC_ARCH_I386) && (ACC_CC_GNUC >= 0x030200)
typedef acc_uint16e_t LE16_unaligned __attribute__((__aligned__(1)));
typedef acc_uint32e_t LE32_unaligned __attribute__((__aligned__(1)));
# define LE16 LE16_unaligned
# define LE32 LE32_unaligned
#endif
#if 0 && (ACC_ARCH_I386) && (ACC_CC_INTELC)
typedef __declspec(align(1)) acc_uint16e_t LE16_unaligned;
typedef __declspec(align(1)) acc_uint32e_t LE32_unaligned;
# define LE16 LE16_unaligned
# define LE32 LE32_unaligned
#endif
#if 0 && (ACC_ARCH_AMD64 || ACC_ARCH_I386) && (ACC_CC_MSC) && (_MSC_VER >= 1200)
typedef __declspec(align(1)) acc_uint16e_t LE16_unaligned;
typedef __declspec(align(1)) acc_uint32e_t LE32_unaligned;
# define LE16 LE16_unaligned
# define LE32 LE32_unaligned
# pragma warning(disable: 4244) // Wx: conversion, possible loss of data
#endif
#endif
#endif /* already included */
/*
vi:ts=4:et:nowrap
*/