mirror of https://github.com/cc65/cc65.git
126 lines
4.9 KiB
C
126 lines
4.9 KiB
C
/*****************************************************************************/
|
|
/* */
|
|
/* gentype.c */
|
|
/* */
|
|
/* Generic data type encoding */
|
|
/* */
|
|
/* */
|
|
/* */
|
|
/* (C) 2011, Ullrich von Bassewitz */
|
|
/* Roemerstrasse 52 */
|
|
/* D-70794 Filderstadt */
|
|
/* EMail: uz@cc65.org */
|
|
/* */
|
|
/* */
|
|
/* 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. */
|
|
/* */
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
/* common */
|
|
#include "check.h"
|
|
#include "gentype.h"
|
|
#include "strbuf.h"
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
/* Code */
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
void GT_AddArray (StrBuf* Type, unsigned ArraySize)
|
|
/* Add an array with the given size to the type string in Type. This will
|
|
** NOT add the element type!
|
|
*/
|
|
{
|
|
unsigned SizeBytes;
|
|
|
|
/* Remember the current position */
|
|
unsigned Pos = SB_GetLen (Type);
|
|
|
|
/* Add a dummy array token */
|
|
SB_AppendChar (Type, GT_TYPE_ARRAY);
|
|
|
|
/* Add the size. */
|
|
SizeBytes = 0;
|
|
do {
|
|
SB_AppendChar (Type, ArraySize & 0xFF);
|
|
ArraySize >>= 8;
|
|
++SizeBytes;
|
|
} while (ArraySize);
|
|
|
|
/* Write the correct array token */
|
|
SB_GetBuf (Type)[Pos] = GT_ARRAY (SizeBytes);
|
|
}
|
|
|
|
|
|
|
|
unsigned GT_GetElementCount (StrBuf* Type)
|
|
/* Retrieve the element count of an array stored in Type at the current index
|
|
** position. Note: Index must point to the array token itself, since the size
|
|
** of the element count is encoded there. The index position will get moved
|
|
** past the array.
|
|
*/
|
|
{
|
|
/* Get the number of bytes for the element count */
|
|
unsigned SizeBytes = GT_GET_SIZE (SB_Get (Type));
|
|
|
|
/* Read the size */
|
|
unsigned Size = 0;
|
|
const char* Buf = SB_GetConstBuf (Type) + SB_GetLen (Type);
|
|
while (SizeBytes--) {
|
|
Size <<= 8;
|
|
Size |= Buf[SizeBytes];
|
|
}
|
|
|
|
/* Return it */
|
|
return Size;
|
|
}
|
|
|
|
|
|
|
|
const char* GT_AsString (const StrBuf* Type, StrBuf* String)
|
|
/* Convert the type into a readable representation. The target string buffer
|
|
** will be zero terminated and a pointer to the contents are returned.
|
|
*/
|
|
{
|
|
static const char HexTab[16] = "0123456789ABCDEF";
|
|
unsigned I;
|
|
|
|
/* Convert Type into readable hex. String will have twice then length
|
|
** plus a terminator.
|
|
*/
|
|
SB_Realloc (String, 2 * SB_GetLen (Type) + 1);
|
|
SB_Clear (String);
|
|
|
|
for (I = 0; I < SB_GetLen (Type); ++I) {
|
|
unsigned char C = SB_AtUnchecked (Type, I);
|
|
SB_AppendChar (String, HexTab[(C & 0xF0) >> 4]);
|
|
SB_AppendChar (String, HexTab[(C & 0x0F) >> 0]);
|
|
}
|
|
|
|
/* Terminate the string so it can be used with string functions */
|
|
SB_Terminate (String);
|
|
|
|
/* Return the contents of String */
|
|
return SB_GetConstBuf (String);
|
|
}
|