bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Some work on the generic type module.

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@5251 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2011-08-21 19:27:03 +00:00
parent 358ccf236e
commit ac2b837285
2 changed files with 82 additions and 59 deletions
Download Patch File Download Diff File Expand all files Collapse all files

52
src/common/gentype.c
View File

@@ -36,7 +36,6 @@
/* common */ /* common */
#include "gentype.h" #include "gentype.h"
#include "strbuf.h" #include "strbuf.h"
#include "xmalloc.h"
@@ -46,29 +45,40 @@
gt_string GT_FromStrBuf (const struct StrBuf* S) void GT_AddArray (StrBuf* Type, unsigned ArraySize)
/* Create a dynamically allocated type string from a string buffer. */ /* Add an array with the given size to the type string in Type. This will
{ * NOT add the element type!
/* To avoid silly mistakes, check if the last character in S is a
* terminator. If not, don't rely on S being terminated.
*/ */
unsigned Len = SB_GetLen (S); {
if (Len > 0 && SB_LookAtLast (S) == '\0') { unsigned I;
/* String is terminated - allocate memory */
gt_string Type = xmalloc (Len); /* Add the array token */
/* Copy the data and return the result */ SB_AppendChar (Type, GT_TYPE_ARRAY);
return memcpy (Type, SB_GetConstBuf (S), Len);
} else { /* Add the size. */
/* String not terminated - allocate memory */ for (I = 0; I < 4; ++I) {
gt_string Type = xmalloc (Len + 1); SB_AppendChar (Type, ArraySize & 0xFF);
/* Copy the data */ ArraySize >>= 8;
memcpy (Type, SB_GetConstBuf (S), Len);
/* Terminate the string */
Type[Len] = GT_END;
/* Return the copy */
return Type;
} }
} }
unsigned GT_GetArraySize (StrBuf* Type)
/* Retrieve the size of an array stored in Type at the current index position.
* The index position will get moved past the array size.
*/
{
unsigned Size;
Size = (unsigned)SB_Get (Type);
Size |= (unsigned)SB_Get (Type) << 8;
Size |= (unsigned)SB_Get (Type) << 16;
Size |= (unsigned)SB_Get (Type) << 24;
return Size;
}

89
src/common/gentype.h
View File

@@ -33,18 +33,32 @@
/* This module implements a specification for a "generic data type". It is
* called generic, because it doesn't mimic a high level language. Instead it
* tries to desrcibe the type as representation on the machine.
* The reasoning behing this type is to allow a debugger to represent the
* data to the user, independent of the actual source.
* C data types may be mapped to generic ones, but attributes like const or
* volatile are (of course) lost.
*
* The data type is stored in a char array and can be terminate by a zero
* (see definition of GT_END below). The later is not really necessary but
* allows handling of types using the usual string functions. This is in fact
* one of the advantages of the choosen implementation:
* String buffers may be used to dynamically build types. Types may be stored
* as strings in the string pool of an object file. And a string pool may be
* used to remove duplicates and reference types using unique ids.
*/
#ifndef GENTYPE_H #ifndef GENTYPE_H
#define GENTYPE_H #define GENTYPE_H
/*****************************************************************************/ /* common */
/* Forwards */ #include "strbuf.h"
/*****************************************************************************/
struct StrBuf;
@@ -54,14 +68,6 @@ struct StrBuf;
/* The data type used to encode a generic type */
typedef unsigned char* gt_string;
/* Termination, so we can use string functions to handle type strings */
#define GT_END 0x00U
/* Size of a data type */ /* Size of a data type */
#define GT_SIZE_1 0x00U #define GT_SIZE_1 0x00U
#define GT_SIZE_2 0x01U #define GT_SIZE_2 0x01U
@@ -87,30 +93,30 @@ typedef unsigned char* gt_string;
* introduce one thing that cannot be zero for normal data. This is the * introduce one thing that cannot be zero for normal data. This is the
* type. * type.
*/ */
#define GT_INTEGER 0x20U #define GT_TYPE_INT 0x20U
#define GT_POINTER 0x40U #define GT_TYPE_PTR 0x40U
#define GT_FLOAT 0x60U #define GT_TYPE_FLOAT 0x60U
#define GT_ARRAY 0x80U #define GT_TYPE_ARRAY 0x80U
#define GT_FUNCTION 0xA0U #define GT_TYPE_FUNC 0xA0U
#define GT_STRUCT 0xC0U #define GT_TYPE_STRUCT 0xC0U
#define GT_UNION 0xE0U #define GT_TYPE_UNION 0xE0U
#define GT_MASK 0xE0U #define GT_TYPE_MASK 0xE0U
#define GT_GET_TYPE(x) ((x) & GT_TYPE_MASK) #define GT_GET_TYPE(x) ((x) & GT_TYPE_MASK)
#define GT_IS_INTEGER(x) (GT_GET_TYPE(x) == GT_INTEGER) #define GT_IS_INTEGER(x) (GT_GET_TYPE(x) == GT_TYPE_INTEGER)
#define GT_IS_POINTER(x) (GT_GET_TYPE(x) == GT_POINTER) #define GT_IS_POINTER(x) (GT_GET_TYPE(x) == GT_TYPE_POINTER)
#define GT_IS_FLOAT(x) (GT_GET_TYPE(x) == GT_FLOAT) #define GT_IS_FLOAT(x) (GT_GET_TYPE(x) == GT_TYPE_FLOAT)
#define GT_IS_ARRAY(x) (GT_GET_TYPE(x) == GT_ARRAY) #define GT_IS_ARRAY(x) (GT_GET_TYPE(x) == GT_TYPE_ARRAY)
#define GT_IS_FUNCTION(x) (GT_GET_TYPE(x) == GT_FUNCTION) #define GT_IS_FUNCTION(x) (GT_GET_TYPE(x) == GT_TYPE_FUNCTION)
#define GT_IS_STRUCT(x) (GT_GET_TYPE(x) == GT_STRUCT) #define GT_IS_STRUCT(x) (GT_GET_TYPE(x) == GT_TYPE_STRUCT)
#define GT_IS_UNION(x) (GT_GET_TYPE(x) == GT_UNION) #define GT_IS_UNION(x) (GT_GET_TYPE(x) == GT_TYPE_UNION)
/* Combined values for the 6502 family */ /* Combined values for the 6502 family */
#define GT_BYTE (GT_INTEGER | GT_LITTLE_ENDIAN | GT_UNSIGNED | GT_SIZE_1) #define GT_BYTE (GT_TYPE_INT | GT_LITTLE_ENDIAN | GT_UNSIGNED | GT_SIZE_1)
#define GT_WORD (GT_INTEGER | GT_LITTLE_ENDIAN | GT_UNSIGNED | GT_SIZE_2) #define GT_WORD (GT_TYPE_INT | GT_LITTLE_ENDIAN | GT_UNSIGNED | GT_SIZE_2)
#define GT_DWORD (GT_INTEGER | GT_LITTLE_ENDIAN | GT_UNSIGNED | GT_SIZE_4) #define GT_DWORD (GT_TYPE_INT | GT_LITTLE_ENDIAN | GT_UNSIGNED | GT_SIZE_4)
#define GT_DBYTE (GT_POINTER | GT_BIG_ENDIAN | GT_UNSIGNED | GT_SIZE_2) #define GT_DBYTE (GT_TYPE_PTR | GT_BIG_ENDIAN | GT_UNSIGNED | GT_SIZE_2)
#define GT_PTR (GT_POINTER | GT_LITTLE_ENDIAN | GT_UNSIGNED | GT_SIZE_2) #define GT_PTR (GT_TYPE_PTR | GT_LITTLE_ENDIAN | GT_UNSIGNED | GT_SIZE_2)
#define GT_FAR_PTR (GT_POINTER | GT_LITTLE_ENDIAN | GT_UNSIGNED | GT_SIZE_3) #define GT_FAR_PTR (GT_TYPE_PTR | GT_LITTLE_ENDIAN | GT_UNSIGNED | GT_SIZE_3)
@@ -120,8 +126,15 @@ typedef unsigned char* gt_string;
gt_string GT_FromStrBuf (const struct StrBuf* S); void GT_AddArray (StrBuf* Type, unsigned ArraySize);
/* Create a dynamically allocated type string from a string buffer */ /* Add an array with the given size to the type string in Type. This will
* NOT add the element type!
*/
unsigned GT_GetArraySize (StrBuf* Type);
/* Retrieve the size of an array stored in Type at the current index position.
* The index position will get moved past the array size.
*/