void MMPrintToStream(const MMessage * msg, FILE * optFile)
{
PrintMMessageToStreamAux(msg, optFile?optFile:stdout, 0);
}
void MMPrintToStream(const MMessage * msg)
{
PrintMMessageToStreamAux(msg, 0);
}
static void PrintMMessageFieldToStream(const MMessageField * field, FILE * file, int indent)
{
char pbuf[5];
const void * data = field->data;
int i = 0;
int ni = field->numItems;
if (ni > 10) ni = 10; /* truncate to avoid too much spam */
MakePrettyTypeCodeString(field->typeCode, pbuf);
DoIndent(indent); fprintf(file, "Entry: Name=[%s] GetNumItems()="UINT32_FORMAT_SPEC", TypeCode=%s ("INT32_FORMAT_SPEC") flatSize="UINT32_FORMAT_SPEC"\n", field->name, field->numItems, pbuf, field->typeCode, GetMMessageFieldFlattenedSize(field, MFalse));
for (i=0; i<ni; i++)
{
DoIndent(indent); fprintf(file, " %i. ", i);
switch(field->typeCode)
{
case B_BOOL_TYPE: fprintf(file, "%i\n", (((const MBool *)data)[i])); break;
case B_DOUBLE_TYPE: fprintf(file, "%f\n", ((const double *)data)[i]); break;
case B_FLOAT_TYPE: fprintf(file, "%f\n", ((const float *)data)[i]); break;
case B_INT64_TYPE: fprintf(file, INT64_FORMAT_SPEC"\n", ((const int64 *)data)[i]); break;
case B_INT32_TYPE: fprintf(file, INT32_FORMAT_SPEC"\n", ((const int32 *)data)[i]); break;
case B_POINTER_TYPE: fprintf(file, "%p\n", ((const void **)data)[i]); break;
case B_INT16_TYPE: fprintf(file, "%i\n", ((const int16 *)data)[i]); break;
case B_INT8_TYPE: fprintf(file, "%i\n", ((const int8 *)data)[i]); break;
case B_POINT_TYPE:
{
const MPoint * pt = &((const MPoint *)data)[i];
fprintf(file, "x=%f y=%f\n", pt->x, pt->y);
}
break;
case B_RECT_TYPE:
{
const MRect * rc = &((const MRect *)data)[i];
fprintf(file, "l=%f t=%f r=%f b=%f\n", rc->left, rc->top, rc->right, rc->bottom);
}
break;
case B_MESSAGE_TYPE:
{
MMessage * subMsg = ((MMessage **)field->data)[i];
if (subMsg) PrintMMessageToStreamAux(subMsg, file, indent+3);
else fprintf(file, "(NULL Message)\n");
}
break;
case B_STRING_TYPE:
{
MByteBuffer * subBuf = ((MByteBuffer **)field->data)[i];
if (subBuf) fprintf(file, "[%s]\n", (const char *) (&subBuf->bytes));
else fprintf(file, "(NULL String)\n");
}
break;
default:
{
MByteBuffer * subBuf = ((MByteBuffer **)field->data)[i];
if (subBuf)
{
int numBytes = subBuf->numBytes;
if (numBytes > 0)
{
const uint8 * b = &subBuf->bytes;
int nb = subBuf->numBytes;
int j;
if (nb > 10)
{
fprintf(file, "(%i bytes, starting with", nb);
nb = 10;
}
else fprintf(file, "(%i bytes, equal to",nb);
for (j=0; j<nb; j++) fprintf(file, " %02x", b[j]);
if (nb < subBuf->numBytes) fprintf(file, "...)\n");
else fprintf(file, ")\n");
}
else fprintf(file, "(zero-length buffer)\n");
}
else fprintf(file, "(NULL Buffer)\n");
}
break;
}
}
}
static void PrintMMessageFieldToStream(const MMessageField * field, int indent)
{
char pbuf[5];
const void * data = field->data;
int i = 0;
int ni = field->numItems;
if (ni > 10) ni = 10; /* truncate to avoid too much spam */
MakePrettyTypeCodeString(field->typeCode, pbuf);
dlog(DEBUG1,"Entry: Name=[%s] GetNumItems()=%lu, TypeCode=%s (%li) flatSize=%lu", field->name, field->numItems, pbuf, field->typeCode, GetMMessageFieldFlattenedSize(field, MFalse));
for (i=0; i<ni; i++)
{
switch(field->typeCode)
{
case B_BOOL_TYPE: dlog(DEBUG1,"%i) %i",i, (((const MBool *)data)[i])); break;
case B_DOUBLE_TYPE: dlog(DEBUG1,"%i) %f", i, ((const double *)data)[i]); break;
case B_FLOAT_TYPE: dlog(DEBUG1,"%i) %f", i, ((const float *)data)[i]); break;
case B_INT64_TYPE: dlog(DEBUG1,"%i) %lli", i, ((const int64 *)data)[i]); break;
case B_INT32_TYPE: dlog(DEBUG1,"%i) %li", i, ((const int32 *)data)[i]); break;
case B_POINTER_TYPE: dlog(DEBUG1,"%i) %p", i, ((const void **)data)[i]); break;
case B_INT16_TYPE: dlog(DEBUG1,"%i) %i", i, ((const int16 *)data)[i]); break;
case B_INT8_TYPE: dlog(DEBUG1,"%i) %i", i, ((const int8 *)data)[i]); break;
case B_POINT_TYPE:
{
const MPoint * pt = &((const MPoint *)data)[i];
dlog(DEBUG1,"%i) x=%f y=%f", i, pt->x, pt->y);
}
break;
case B_RECT_TYPE:
{
const MRect * rc = &((const MRect *)data)[i];
dlog(DEBUG1,"%i) l=%f t=%f r=%f b=%f", i, rc->left, rc->top, rc->right, rc->bottom);
}
break;
case B_MESSAGE_TYPE:
{
MMessage * subMsg = ((MMessage **)field->data)[i];
if (subMsg) PrintMMessageToStreamAux(subMsg, indent+3);
else dlog(DEBUG1,"%i) (NULL Message)", i);
}
break;
case B_STRING_TYPE:
{
MByteBuffer * subBuf = ((MByteBuffer **)field->data)[i];
if (subBuf) dlog(DEBUG1,"%i) [%s]", i,(const char *) (&subBuf->bytes));
else dlog(DEBUG1,"%i) (NULL String)", i);
}
break;
default:
{
MByteBuffer * subBuf = ((MByteBuffer **)field->data)[i];
if (subBuf)
{
int numBytes = subBuf->numBytes;
if (numBytes > 0)
{
const uint8 * b = &subBuf->bytes;
int nb = subBuf->numBytes;
int j;
if (nb > 10)
{
dlog(DEBUG1,"%i) (%i bytes, starting with", i, nb);
nb = 10;
}
else dlog(DEBUG1,"%i) (%i bytes, equal to", i, nb);
for (j=0; j<nb; j++) dlog(DEBUG1," %02x", b[j]);
if (nb < subBuf->numBytes) dlog(DEBUG1,"...)");
else dlog(DEBUG1,")");
}
else dlog(DEBUG1,"%i) (zero-length buffer)", i);
}
else dlog(DEBUG1,"%i) (NULL Buffer)", i);
}
break;
}
}
/* just to shut up the warnings */
if (0) {
DoIndent(0);
}
}