firebird-mirror/src/include/memory_routines.h

/*
 *	PROGRAM:	Client/Server Common Code
 *	MODULE:		memory_routines.h
 *	DESCRIPTION:	Misc memory content routines
 *
 * The contents of this file are subject to the Interbase Public
 * License Version 1.0 (the "License"); you may not use this file
 * except in compliance with the License. You may obtain a copy
 * of the License at http://www.Inprise.com/IPL.html
 *
 * Software distributed under the License is distributed on an
 * "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express
 * or implied. See the License for the specific language governing
 * rights and limitations under the License.
 *
 * The Original Code was created by Inprise Corporation
 * and its predecessors. Portions created by Inprise Corporation are
 * Copyright (C) Inprise Corporation.
 *
 * Created by: Dimitry Sibiryakov <aafemt@users.sourceforge.net>
 *
 * All Rights Reserved.
 * Contributor(s): ______________________________________.
 */

#ifndef MEMORY_ROUTINES_H
#define MEMORY_ROUTINES_H


inline USHORT get_short(const UCHAR* p)
{
/**************************************
 *
 *      g e t _ s h o r t
 *
 **************************************
 *
 * Functional description
 *    Gather one unsigned short int
 *    from two chars
 *
 **************************************/
#ifndef WORDS_BIGENDIAN
	// little-endian
	USHORT temp;
	memcpy(&temp, p, sizeof(USHORT));
	return temp;
#else
	// big-endian
	union {
		USHORT n;
		UCHAR c[2];
	} temp;

	temp.c[0] = p[0];
	temp.c[1] = p[1];

	return temp.n;
#endif
}

inline SLONG get_long(const UCHAR* p)
{
/**************************************
 *
 *      g e t _ l o n g
 *
 **************************************
 *
 * Functional description
 *    Gather one signed long int
 *    from four chars
 *
 **************************************/
#ifndef WORDS_BIGENDIAN
	// little-endian
	SLONG temp;
	memcpy(&temp, p, sizeof(SLONG));
	return temp;
#else
	// big-endian
	union {
		SLONG n;
		UCHAR c[4];
	} temp;

	temp.c[0] = p[0];
	temp.c[1] = p[1];
	temp.c[2] = p[2];
	temp.c[3] = p[3];

	return temp.n;
#endif
}

inline void put_short(UCHAR* p, USHORT value)
{
/**************************************
 *
 *      p u t _ s h o r t
 *
 **************************************
 *
 * Functional description
 *    Store one unsigned short int as
 *    two chars
 *
 **************************************/
#ifndef WORDS_BIGENDIAN
	// little-endian
	memcpy(p, &value, sizeof(USHORT));
#else
	// big-endian
	union {
		USHORT n;
		UCHAR c[2];
	} temp;

	temp.n = value;

	p[0] = temp.c[0];
	p[1] = temp.c[1];
#endif
}

inline void put_long(UCHAR* p, SLONG value)
{
/**************************************
 *
 *      p u t _ l o n g
 *
 **************************************
 *
 * Functional description
 *    Store one signed long int as
 *    four chars
 *
 **************************************/
#ifndef WORDS_BIGENDIAN
	// little-endian
	memcpy(p, &value, sizeof(SLONG));
#else
	// big-endian
	union {
		SLONG n;
		UCHAR c[4];
	} temp;

	temp.n = value;

	p[0] = temp.c[0];
	p[1] = temp.c[1];
	p[2] = temp.c[2];
	p[3] = temp.c[3];
#endif
}

#endif // MEMORY_ROUTINES_H