2000-05-28 13:40:48 +00:00
|
|
|
/*****************************************************************************/
|
|
|
|
/* */
|
|
|
|
/* datatype.h */
|
|
|
|
/* */
|
|
|
|
/* Type string handling for the cc65 C compiler */
|
|
|
|
/* */
|
|
|
|
/* */
|
|
|
|
/* */
|
|
|
|
/* (C) 1998 Ullrich von Bassewitz */
|
|
|
|
/* Wacholderweg 14 */
|
|
|
|
/* D-70597 Stuttgart */
|
|
|
|
/* EMail: uz@musoftware.de */
|
|
|
|
/* */
|
|
|
|
/* */
|
|
|
|
/* This software is provided 'as-is', without any expressed or implied */
|
|
|
|
/* warranty. In no event will the authors be held liable for any damages */
|
|
|
|
/* arising from the use of this software. */
|
|
|
|
/* */
|
|
|
|
/* Permission is granted to anyone to use this software for any purpose, */
|
|
|
|
/* including commercial applications, and to alter it and redistribute it */
|
|
|
|
/* freely, subject to the following restrictions: */
|
|
|
|
/* */
|
|
|
|
/* 1. The origin of this software must not be misrepresented; you must not */
|
|
|
|
/* claim that you wrote the original software. If you use this software */
|
|
|
|
/* in a product, an acknowledgment in the product documentation would be */
|
|
|
|
/* appreciated but is not required. */
|
|
|
|
/* 2. Altered source versions must be plainly marked as such, and must not */
|
|
|
|
/* be misrepresented as being the original software. */
|
|
|
|
/* 3. This notice may not be removed or altered from any source */
|
|
|
|
/* distribution. */
|
|
|
|
/* */
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#ifndef DATATYPE_H
|
|
|
|
#define DATATYPE_H
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
/* Data */
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
|
|
|
2000-07-27 21:08:52 +00:00
|
|
|
|
|
|
|
// Basic data types
|
2000-08-01 15:04:35 +00:00
|
|
|
enum {
|
|
|
|
T_END = 0x0000,
|
2000-07-27 21:08:52 +00:00
|
|
|
|
|
|
|
// Basic types
|
|
|
|
T_TYPE_NONE = 0x0000,
|
|
|
|
T_TYPE_CHAR = 0x0001,
|
|
|
|
T_TYPE_INT = 0x0002,
|
|
|
|
T_TYPE_ENUM = 0x0003,
|
|
|
|
T_TYPE_FLOAT = 0x0004,
|
|
|
|
T_TYPE_DOUBLE = 0x0005,
|
|
|
|
T_TYPE_VOID = 0x0006,
|
|
|
|
T_TYPE_STRUCT = 0x0007,
|
|
|
|
T_TYPE_UNION = 0x0008,
|
|
|
|
T_TYPE_ARRAY = 0x0009,
|
|
|
|
T_TYPE_PTR = 0x000A,
|
|
|
|
T_TYPE_FUNC = 0x000B,
|
|
|
|
T_MASK_TYPE = 0x001F,
|
|
|
|
|
|
|
|
// Type classes
|
|
|
|
T_CLASS_NONE = 0x0000,
|
|
|
|
T_CLASS_INT = 0x0020,
|
|
|
|
T_CLASS_FLOAT = 0x0040,
|
|
|
|
T_CLASS_PTR = 0x0060,
|
|
|
|
T_CLASS_STRUCT = 0x0080,
|
|
|
|
T_CLASS_FUNC = 0x00A0,
|
|
|
|
T_MASK_CLASS = 0x00E0,
|
|
|
|
|
|
|
|
// Type signedness
|
|
|
|
T_SIGN_NONE = 0x0000,
|
|
|
|
T_SIGN_UNSIGNED = 0x0100,
|
|
|
|
T_SIGN_SIGNED = 0x0200,
|
|
|
|
T_MASK_SIGN = 0x0300,
|
|
|
|
|
|
|
|
// Type size modifiers
|
|
|
|
T_SIZE_NONE = 0x0000,
|
|
|
|
T_SIZE_SHORT = 0x0400,
|
|
|
|
T_SIZE_LONG = 0x0800,
|
|
|
|
T_SIZE_LONGLONG = 0x0C00,
|
|
|
|
T_MASK_SIZE = 0x0C00,
|
|
|
|
|
|
|
|
// Type qualifiers
|
|
|
|
T_QUAL_NONE = 0x0000,
|
|
|
|
T_QUAL_CONST = 0x1000,
|
|
|
|
T_QUAL_VOLATILE = 0x2000,
|
|
|
|
T_MASK_QUAL = 0x3000,
|
|
|
|
|
|
|
|
// Types
|
2000-08-01 15:04:35 +00:00
|
|
|
T_CHAR = T_TYPE_CHAR | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_NONE,
|
|
|
|
T_SCHAR = T_TYPE_CHAR | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_NONE,
|
|
|
|
T_UCHAR = T_TYPE_CHAR | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_NONE,
|
|
|
|
T_SHORT = T_TYPE_INT | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_SHORT,
|
|
|
|
T_USHORT = T_TYPE_INT | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_SHORT,
|
|
|
|
T_INT = T_TYPE_INT | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_NONE,
|
|
|
|
T_UINT = T_TYPE_INT | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_NONE,
|
|
|
|
T_LONG = T_TYPE_INT | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_LONG,
|
|
|
|
T_ULONG = T_TYPE_INT | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_LONG,
|
|
|
|
T_LONGLONG = T_TYPE_INT | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_LONGLONG,
|
|
|
|
T_ULONGLONG = T_TYPE_INT | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_LONGLONG,
|
|
|
|
T_ENUM = T_TYPE_ENUM | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_NONE,
|
|
|
|
T_FLOAT = T_TYPE_FLOAT | T_CLASS_FLOAT | T_SIGN_NONE | T_SIZE_NONE,
|
|
|
|
T_DOUBLE = T_TYPE_DOUBLE | T_CLASS_FLOAT | T_SIGN_NONE | T_SIZE_NONE,
|
|
|
|
T_VOID = T_TYPE_VOID | T_CLASS_NONE | T_SIGN_NONE | T_SIZE_NONE,
|
|
|
|
T_STRUCT = T_TYPE_STRUCT | T_CLASS_STRUCT | T_SIGN_NONE | T_SIZE_NONE,
|
|
|
|
T_UNION = T_TYPE_UNION | T_CLASS_STRUCT | T_SIGN_NONE | T_SIZE_NONE,
|
|
|
|
T_ARRAY = T_TYPE_ARRAY | T_CLASS_PTR | T_SIGN_NONE | T_SIZE_NONE,
|
|
|
|
T_PTR = T_TYPE_PTR | T_CLASS_PTR | T_SIGN_NONE | T_SIZE_NONE,
|
|
|
|
T_FUNC = T_TYPE_FUNC | T_CLASS_FUNC | T_SIGN_NONE | T_SIZE_NONE,
|
2000-07-27 21:08:52 +00:00
|
|
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
|
2000-05-28 13:40:48 +00:00
|
|
|
/* Forward for a symbol entry */
|
|
|
|
struct SymEntry;
|
|
|
|
|
|
|
|
/* Type entry */
|
|
|
|
typedef unsigned short type;
|
|
|
|
|
|
|
|
/* Maximum length of a type string */
|
|
|
|
#define MAXTYPELEN 30
|
|
|
|
|
|
|
|
/* type elements needed for Encode/Decode */
|
|
|
|
#define DECODE_SIZE 5
|
|
|
|
|
|
|
|
/* Predefined type strings */
|
|
|
|
extern type type_int [];
|
|
|
|
extern type type_uint [];
|
|
|
|
extern type type_long [];
|
|
|
|
extern type type_ulong [];
|
|
|
|
extern type type_void [];
|
|
|
|
extern type type_pschar [];
|
|
|
|
extern type type_puchar [];
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
/* Code */
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
unsigned TypeLen (const type* Type);
|
|
|
|
/* Return the length of the type string */
|
|
|
|
|
|
|
|
int TypeCmp (const type* T1, const type* T2);
|
|
|
|
/* Compare two type strings */
|
|
|
|
|
|
|
|
type* TypeCpy (type* Dest, const type* Src);
|
|
|
|
/* Copy a type string */
|
|
|
|
|
|
|
|
type* TypeCat (type* Dest, const type* Src);
|
|
|
|
/* Append Src */
|
|
|
|
|
|
|
|
type* TypeDup (const type* Type);
|
|
|
|
/* Create a copy of the given type on the heap */
|
|
|
|
|
|
|
|
type* TypeAlloc (unsigned Len);
|
|
|
|
/* Allocate memory for a type string of length Len. Len *must* include the
|
|
|
|
* trailing T_END.
|
|
|
|
*/
|
|
|
|
|
|
|
|
void TypeFree (type* Type);
|
|
|
|
/* Free a type string */
|
|
|
|
|
|
|
|
type GetDefaultChar (void);
|
|
|
|
/* Return the default char type (signed/unsigned) depending on the settings */
|
|
|
|
|
|
|
|
type* GetCharArrayType (unsigned Len);
|
|
|
|
/* Return the type for a char array of the given length */
|
|
|
|
|
|
|
|
type* GetImplicitFuncType (void);
|
|
|
|
/* Return a type string for an inplicitly declared function */
|
|
|
|
|
|
|
|
void PrintType (FILE* F, const type* Type);
|
|
|
|
/* Output translation of type array. */
|
|
|
|
|
|
|
|
void PrintRawType (FILE* F, const type* Type);
|
|
|
|
/* Print a type string in raw format (for debugging) */
|
|
|
|
|
|
|
|
void Encode (type* Type, unsigned long Val);
|
|
|
|
/* Encode an unsigned long into a type array */
|
|
|
|
|
|
|
|
void EncodePtr (type* Type, void* P);
|
|
|
|
/* Encode a pointer into a type array */
|
|
|
|
|
|
|
|
unsigned long Decode (const type* Type);
|
|
|
|
/* Decode an unsigned long from a type array */
|
|
|
|
|
|
|
|
void* DecodePtr (const type* Type);
|
|
|
|
/* Decode a pointer from a type array */
|
|
|
|
|
|
|
|
int HasEncode (const type* Type);
|
|
|
|
/* Return true if the given type has encoded data */
|
2000-07-27 21:08:52 +00:00
|
|
|
|
2000-05-28 13:40:48 +00:00
|
|
|
void CopyEncode (const type* Source, type* Target);
|
|
|
|
/* Copy encoded data from Source to Target */
|
|
|
|
|
|
|
|
unsigned SizeOf (const type* Type);
|
|
|
|
/* Compute size of object represented by type array. */
|
|
|
|
|
|
|
|
unsigned PSizeOf (const type* Type);
|
|
|
|
/* Compute size of pointer object. */
|
|
|
|
|
|
|
|
unsigned TypeOf (const type* Type);
|
|
|
|
/* Get the code generator base type of the object */
|
|
|
|
|
|
|
|
type* Indirect (type* Type);
|
|
|
|
/* Do one indirection for the given type, that is, return the type where the
|
|
|
|
* given type points to.
|
|
|
|
*/
|
|
|
|
|
2000-08-01 15:04:35 +00:00
|
|
|
int IsTypeVoid (const type* Type);
|
2000-05-28 13:40:48 +00:00
|
|
|
/* Return true if this is a void type */
|
|
|
|
|
|
|
|
int IsPtr (const type* Type);
|
|
|
|
/* Return true if this is a pointer type */
|
|
|
|
|
|
|
|
int IsChar (const type* Type);
|
|
|
|
/* Return true if this is a character type */
|
|
|
|
|
|
|
|
int IsInt (const type* Type);
|
|
|
|
/* Return true if this is an integer type */
|
|
|
|
|
|
|
|
int IsLong (const type* Type);
|
|
|
|
/* Return true if this is a long type (signed or unsigned) */
|
|
|
|
|
|
|
|
int IsUnsigned (const type* Type);
|
|
|
|
/* Return true if this is an unsigned type */
|
|
|
|
|
|
|
|
int IsStruct (const type* Type);
|
|
|
|
/* Return true if this is a struct type */
|
|
|
|
|
|
|
|
int IsFunc (const type* Type);
|
|
|
|
/* Return true if this is a function type */
|
|
|
|
|
|
|
|
int IsFastCallFunc (const type* Type);
|
|
|
|
/* Return true if this is a function type with __fastcall__ calling conventions */
|
|
|
|
|
|
|
|
int IsFuncPtr (const type* Type);
|
|
|
|
/* Return true if this is a function pointer */
|
|
|
|
|
|
|
|
int IsArray (const type* Type);
|
|
|
|
/* Return true if this is an array type */
|
|
|
|
|
|
|
|
struct FuncDesc* GetFuncDesc (const type* Type);
|
|
|
|
/* Get the FuncDesc pointer from a function or pointer-to-function type */
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* End of datatype.h */
|
|
|
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
|