#define _CRT_SECURE_NO_WARNINGS

#include <cn-cbor/cn-cbor.h>
#include <cose/cose.h>
#include <cose_int.h>
#include <fcntl.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/stat.h>

#ifdef _MSC_VER
#include <io.h>
#endif

#ifndef _MSC_VER
#define strcat_s(a, b, c) strcat(a, c)
#endif

typedef struct _FOO {
	char* fieldName;
	int type;
	int value;
	struct _FOO* children;
	int count;
	int group;
} FOO;

FOO Recipients;
extern FOO Signer[];

#ifdef USE_CBOR_CONTEXT
void* context = NULL;
#endif

FOO AlgorithmMap[38] = {
	{"HSS-LMS", CN_CBOR_INT, -46, NULL, 0, 0},
	{"ECHD-SS+A256KW", CN_CBOR_INT, -34, NULL, 0, 0},
	{"ECHD-SS+A192KW", CN_CBOR_INT, -33, NULL, 0, 0},
	{"ECHD-SS+A128KW", CN_CBOR_INT, -32, NULL, 0, 0},
	{"ECHD-ES+A256KW", CN_CBOR_INT, -31, NULL, 0, 0},
	{"ECHD-ES+A192KW", CN_CBOR_INT, -30, NULL, 0, 0},
	{"ECHD-ES+A128KW", CN_CBOR_INT, -29, NULL, 0, 0},
	{"ECDH-SS + HKDF-512", CN_CBOR_INT, -28, NULL, 0, 0},
	{"ECDH-SS + HKDF-256", CN_CBOR_INT, -27, NULL, 0, 0},
	{"ECDH-ES + HKDF-512", CN_CBOR_INT, -26, NULL, 0, 0},
	{"ECDH-ES + HKDF-256", CN_CBOR_INT, -25, NULL, 0, 0},

	{"ECDSA 512", CN_CBOR_INT, -9, NULL, 0, 0},
	{"ECDSA 384", CN_CBOR_INT, -8, NULL, 0, 0},
	{"ECDSA 256", CN_CBOR_INT, -7, NULL, 0, 0},

	{"direct", CN_CBOR_INT, -6, NULL, 0, 0},

	{"A256KW", CN_CBOR_INT, -5, NULL, 0, 0},
	{"A192KW", CN_CBOR_INT, -4, NULL, 0, 0},
	{"A128KW", CN_CBOR_INT, -3, NULL, 0, 0},

	{"AES-GCM 128", CN_CBOR_UINT, 1, NULL, 0, 0},
	{"AES-GCM 192", CN_CBOR_UINT, 2, NULL, 0, 0},
	{"AES-GCM 256", CN_CBOR_UINT, 3, NULL, 0, 0},

	{"HMAC 256//64", CN_CBOR_UINT, 4, NULL, 0, 0},
	{"HMAC 256//256", CN_CBOR_UINT, 5, NULL, 0, 0},
	{"HMAC 384//384", CN_CBOR_UINT, 6, NULL, 0, 0},
	{"HMAC 512//512", CN_CBOR_UINT, 8, NULL, 0, 0},

	{"AES-CCM-16-64-128", CN_CBOR_UINT, 10, NULL, 0, 0},
	{"AES-CCM-16-64-256", CN_CBOR_UINT, 11, NULL, 0, 0},
	{"AES-CCM-16-128-128", CN_CBOR_UINT, 12, NULL, 0, 0},
	{"AES-CCM-16-128-256", CN_CBOR_UINT, 13, NULL, 0, 0},
	{"AES-CBC-MAC-128//64", CN_CBOR_UINT, 14, NULL, 0, 0},
	{"AES-CBC-MAC-256//64", CN_CBOR_UINT, 15, NULL, 0, 0},

	{"ChaCha20//Poly1305", CN_CBOR_UINT, 24, NULL, 0, 0},

	{"AES-CBC-MAC-128/128", CN_CBOR_UINT, 25, NULL, 0, 0},
	{"AES-CBC-MAC-256/128", CN_CBOR_UINT, 26, NULL, 0, 0},
	{"AES-CCM-64-64-128", CN_CBOR_UINT, 30, NULL, 0, 0},
	{"AES-CCM-64-64-256", CN_CBOR_UINT, 31, NULL, 0, 0},
	{"AES-CCM-64-128-128", CN_CBOR_UINT, 32, NULL, 0, 0},
	{"AES-CCM-64-128-256", CN_CBOR_UINT, 33, NULL, 0, 0},
};

FOO KeyMap[9] = {{"kty", CN_CBOR_UINT, 1, NULL, 0, 0},
	{"kid", CN_CBOR_UINT, 2, NULL, 0, 0},
	{"alg", CN_CBOR_UINT, 3, AlgorithmMap, _countof(AlgorithmMap), 0},
	{"key_ops", CN_CBOR_UINT, 4, NULL, 0, 0},
	{"crv", CN_CBOR_INT, -1, NULL, 0, 2}, {"x", CN_CBOR_INT, -2, NULL, 0, 2},
	{"y", CN_CBOR_INT, -3, NULL, 0, 2}, {"d", CN_CBOR_INT, -4, NULL, 0, 2},
	{"k", CN_CBOR_INT, -1, NULL, 0, 4}};

FOO Key = {NULL, CN_CBOR_MAP, 0, KeyMap, _countof(KeyMap), 0};

FOO KeySet = {NULL, CN_CBOR_ARRAY, 0, &Key, 1, 0};

FOO HeaderMap[27] = {
	{"alg", CN_CBOR_UINT, 1, AlgorithmMap, _countof(AlgorithmMap), 0},
	{"crit", CN_CBOR_UINT, 2, NULL, 0, 0},
	{"content type", CN_CBOR_UINT, 3, NULL, 0, 0},
	{"kid", CN_CBOR_UINT, 4, NULL, 0, 0}, {"iv", CN_CBOR_UINT, 5, NULL, 0, 0},
	{"partial iv", CN_CBOR_UINT, 6, NULL, 0, 0},
	{"countersign", CN_CBOR_UINT, 7, Signer, 5, 0},
	{"op time", CN_CBOR_INT, 8, NULL, 0, 0},
	{"ephemeral", CN_CBOR_INT, -1, KeyMap, _countof(KeyMap), 50},
	{"salt", CN_CBOR_INT, -20, NULL, 0, 50},
	{"U identity", CN_CBOR_INT, -21, NULL, 0, 50},
	{"U nonce", CN_CBOR_INT, -22, NULL, 0, 50},
	{"U other", CN_CBOR_INT, -23, NULL, 0, 50},
	{"V identity", CN_CBOR_INT, -24, NULL, 0, 50},
	{"V nonce", CN_CBOR_INT, -25, NULL, 0, 50},
	{"V other", CN_CBOR_INT, -26, NULL, 0, 50},
	{"static key", CN_CBOR_INT, -2, NULL, 0, 50},
	{"static kid", CN_CBOR_INT, -3, NULL, 0, 50},
	{"salt", CN_CBOR_INT, -20, NULL, 0, 52},
	{"U identity", CN_CBOR_INT, -21, NULL, 0, 52},
	{"U nonce", CN_CBOR_INT, -22, NULL, 0, 52},
	{"U other", CN_CBOR_INT, -23, NULL, 0, 52},
	{"V identity", CN_CBOR_INT, -24, NULL, 0, 52},
	{"V nonce", CN_CBOR_INT, -25, NULL, 0, 52},
	{"V other", CN_CBOR_INT, -26, NULL, 0, 52},
	{"static key", CN_CBOR_INT, -2, NULL, 0, 52},
	{"static kid", CN_CBOR_INT, -3, NULL, 0, 52}};

FOO RecurseHeaderMap = {
	NULL, CN_CBOR_MAP, 0, HeaderMap, _countof(HeaderMap), 0};

FOO EncryptedBody[4] = {
	{"protected", CN_CBOR_BYTES, 0, &RecurseHeaderMap, 1, 0},
	{"unprotected", CN_CBOR_MAP, 0, HeaderMap, _countof(HeaderMap), 0},
	{"ciphertext", CN_CBOR_BYTES, 0, NULL, 0, 0},
	{"recipients", CN_CBOR_ARRAY, 0, &Recipients, 1, 0}};

FOO Recipients = {
	NULL, CN_CBOR_ARRAY, 0, EncryptedBody, _countof(EncryptedBody), 0};

FOO MacBody[5] = {{"protected", CN_CBOR_BYTES, 0, &RecurseHeaderMap, 1, 0},
	{"unprotected", CN_CBOR_MAP, 0, HeaderMap, _countof(HeaderMap), 0},
	{"payload", CN_CBOR_BYTES, 0, NULL, 0, 0},
	{"tag", CN_CBOR_BYTES, 0, NULL, 0, 0},
	{"recipients", CN_CBOR_ARRAY, 0, &Recipients, 1, 0}};

FOO Signer[5] = {
	{"protected", CN_CBOR_BYTES, 0, &RecurseHeaderMap, 1, 0},
	{"unprotected", CN_CBOR_MAP, 0, HeaderMap, _countof(HeaderMap), 0},
	{"signature", CN_CBOR_BYTES, 0, NULL, 0, 0},
};

FOO Signers = {NULL, CN_CBOR_ARRAY, 0, Signer, _countof(Signer), 0};

FOO SignBody[5] = {{"protected", CN_CBOR_BYTES, 0, &RecurseHeaderMap, 1, 0},
	{"unprotected", CN_CBOR_MAP, 0, HeaderMap, _countof(HeaderMap), 0},
	{"payload", CN_CBOR_BYTES, 0, NULL, 0, 0},
	{"signatures", CN_CBOR_ARRAY, 0, &Signers, 1, 0}};

FOO Sign0Body[4] = {{"protected", CN_CBOR_BYTES, 0, &RecurseHeaderMap, 1, 0},
	{"unprotected", CN_CBOR_MAP, 0, HeaderMap, _countof(HeaderMap), 0},
	{"payload", CN_CBOR_BYTES, 0, NULL, 0, 0},
	{"signature", CN_CBOR_BYTES, 0, NULL, 0, 0}};

FOO EnvelopedMessage = {
	NULL, CN_CBOR_ARRAY, 0, EncryptedBody, _countof(EncryptedBody), 0};
FOO SignedMessage = {NULL, CN_CBOR_ARRAY, 0, SignBody, _countof(SignBody), 0};
FOO Sign0Message = {NULL, CN_CBOR_ARRAY, 0, Sign0Body, _countof(Sign0Body), 0};

FOO MacMessage = {NULL, CN_CBOR_ARRAY, 0, MacBody, _countof(MacBody), 0};

FOO EncryptedMessage = {
	NULL, CN_CBOR_ARRAY, 0, EncryptedBody, _countof(EncryptedBody) - 1, 0};

FOO EncryptedMessageWithTag = {NULL, CN_CBOR_TAG, 997, &EncryptedMessage, 1, 0};

FOO EnvelopedMessageWithTag = {NULL, CN_CBOR_TAG, 998, &EnvelopedMessage, 1, 0};

FOO SignedMessageWithTag = {NULL, CN_CBOR_TAG, 999, &SignedMessage, 1, 0};

FOO Sign0MessageWithTag = {NULL, CN_CBOR_TAG, 997, &Sign0Message, 1, 0};

FOO MacMessageWithTag = {NULL, CN_CBOR_TAG, 996, &MacMessage, 1, 0};

FOO Mac0Body[4] = {{"protected", CN_CBOR_BYTES, 0, &RecurseHeaderMap, 1, 0},
	{"unprotected", CN_CBOR_MAP, 0, HeaderMap, _countof(HeaderMap), 0},
	{"payload", CN_CBOR_BYTES, 0, NULL, 0, 0},
	{"tag", CN_CBOR_BYTES, 0, NULL, 0, 0}};

FOO Mac0Message = {NULL, CN_CBOR_ARRAY, 0, Mac0Body, _countof(Mac0Body), 0};

FOO Mac0MessageWithTag = {NULL, CN_CBOR_TAG, 995, &Mac0Message, 1, 0};

size_t WrapLineAt = 0;
char OutputBuffer[4 * 4096];

void WrapPrintF(FILE* fp, char* format, ...)
{
	va_list args;
	char buffer[10000];
	char* iRet;

	va_start(args, format);
	vsprintf(buffer, format, args);
	if (WrapLineAt == 0) {
		fprintf(fp, "%s", buffer);
		va_end(args);
		return;
	}

	strcat_s(OutputBuffer, sizeof(OutputBuffer), buffer);

	while ((iRet = strchr(OutputBuffer, '\n'))) {
		char* t = OutputBuffer;
		*iRet = 0;

		while (strlen(t) > WrapLineAt) {
			char x = t[WrapLineAt];
			t[WrapLineAt] = 0;
			fprintf(fp, "%s", t);
			fprintf(fp, "\n");
			t[WrapLineAt] = x;
			t += WrapLineAt;
		}

		fprintf(fp, "%s", t);
		fprintf(fp, "\n");
		if (strlen(OutputBuffer) + strlen(iRet + 1) >=
			sizeof(OutputBuffer) - 1) {
			fprintf(stderr, "Internal buffer too small for dumping");
			exit(1);
		}
		strcpy(OutputBuffer, iRet + 1);
	}

	va_end(args);
}

void Indent(FILE* fp, int depth)
{
	for (int i = 0; i < depth; i++) {
		WrapPrintF(fp, "  ");
	}
}

void PrintUsage()
{
	fprintf(stderr, "dumper [<filein> [<fileout>]]\n");
	exit(1);
}

void DumpBytes(FILE* fp, const cn_cbor* cbor)
{
	bool fText = true;

	for (int i = 0; i < cbor->length; i++) {
		if ((cbor->v.bytes[i] < 32) || (cbor->v.bytes[i] > 126) ||
			(cbor->v.bytes[i] == '\'')) {
			fText = false;
		}
	}

	if (fText && (cbor->length > 0)) {
		WrapPrintF(fp, "'");
		for (int i = 0; i < cbor->length; i++) {
			WrapPrintF(fp, "%c", cbor->v.bytes[i]);
		}
		WrapPrintF(fp, "'");
	} else {
		WrapPrintF(fp, "h'");
		for (int i = 0; i < cbor->length; i++) {
			WrapPrintF(fp, "%02x", cbor->v.bytes[i]);
		}
		WrapPrintF(fp, "'");
	}
}

void DumpTree(const cn_cbor* cbor,
	FILE* out,
	const FOO* pFOO,
	int depth,
	int fField,
	int fValue,
	int fInComment)
{
	int i;
	int i2;
	const cn_cbor* cbor2;
	const FOO* pFoo2;
	int group;

	if (pFOO != NULL) {
		switch (pFOO->type) {
			case CN_CBOR_TAG:
				if (cbor->type != CN_CBOR_TAG) {
					pFOO = NULL;
				}
				break;
			default:
				break;
		}
	}

	if (fField && (pFOO != NULL) && (pFOO->fieldName != NULL)) {
		if (fInComment) {
			WrapPrintF(out, "\\ %s \\ ", pFOO->fieldName);
		}
		else {
			WrapPrintF(out, "/ %s / ", pFOO->fieldName);
		}
	}

	switch (cbor->type) {
		case CN_CBOR_TAG:
			WrapPrintF(out, "%u(\n", cbor->v.uint);
			Indent(out, depth + 1);
			DumpTree(cbor->last_child, out,
				pFOO != NULL ? pFOO->children : NULL, depth + 1, true, true,
				fInComment);
			WrapPrintF(out, "\n");
			Indent(out, depth);
			WrapPrintF(out, ")");
			break;

		case CN_CBOR_ARRAY:
			WrapPrintF(out, "[");
			cbor2 = cbor->first_child;
			for (i = 0; i < cbor->length; i++, cbor2 = cbor2->next) {
				if (i != 0) {
					WrapPrintF(out, ", ");
				}
				if (pFOO == NULL) {
					pFoo2 = NULL;
				}
				else if (pFOO->count == 1) {
					pFoo2 = pFOO->children;
				}
				else if (i >= pFOO->count) {
					pFoo2 = NULL;
				}
				else {
					pFoo2 = &pFOO->children[i];
				}

				WrapPrintF(out, "\n");
				Indent(out, depth + 1);
				DumpTree(cbor2, out, pFoo2, depth + 1, true, true, fInComment);
			}
			if (i > 0) {
				WrapPrintF(out, "\n");
				Indent(out, depth);
			}
			WrapPrintF(out, "]");
			break;

		case CN_CBOR_MAP:
			WrapPrintF(out, "{");
			cbor2 = cbor->first_child;
			//  Determine the correct group - always assume it is at element
			//  UINT=1
			group = 0;
			for (i = 0; i < cbor->length; i += 2, cbor2 = cbor2->next->next) {
				if ((cbor2->type == CN_CBOR_UINT) && (cbor2->v.uint == 1)) {
					group = (int)cbor2->next->v.uint;
					break;
				}
			}

			cbor2 = cbor->first_child;
			//  Dump each element
			for (i = 0; i < cbor->length; i += 2, cbor2 = cbor2->next) {
				pFoo2 = NULL;
				if (pFOO != NULL) {
					//  Locate the right entry in foo
					for (i2 = 0, pFoo2 = pFOO->children; i2 < pFOO->count;
						 pFoo2++, i2 += 1) {
						if ((unsigned)pFoo2->type != cbor2->type) {
							continue;
						}
						switch (cbor2->type) {
							case CN_CBOR_UINT:
								if ((group != 0) && (pFoo2->group != 0) &&
									(pFoo2->group != group)) {
									continue;
								}
								if (pFoo2->value == (int)cbor2->v.uint) {
									i2 = pFOO->count + 1;
								}
								break;

							case CN_CBOR_INT:
								if ((group != 0) && (pFoo2->group != 0) &&
									(pFoo2->group != group)) {
									continue;
								}
								if (pFoo2->value == cbor2->v.sint) {
									i2 = pFOO->count + 1;
								}
								break;

							default:
								//  Should assert here?
								break;
						}

						if (i2 == pFOO->count + 1) {
							break;
						}
					}
					if (i2 == pFOO->count) {
						pFoo2 = NULL;
					}
				}
				if (i != 0) {
					WrapPrintF(out, ", ");
				}
				WrapPrintF(out, "\n");
				Indent(out, depth + 1);
				DumpTree(cbor2, out, pFoo2, depth + 1, true, false, fInComment);
				WrapPrintF(out, ":");
				cbor2 = cbor2->next;
				DumpTree(cbor2, out, pFoo2, depth + 1, false, true, fInComment);
			}
			if (i > 0) {
				WrapPrintF(out, "\n");
				Indent(out, depth);
			}
			WrapPrintF(out, "}");
			break;

		case CN_CBOR_BYTES:
			DumpBytes(out, cbor);
			if ((pFOO != NULL) && (pFOO->children != NULL)) {
				const cn_cbor* cbor3 = cn_cbor_decode(
					cbor->v.bytes, cbor->length CBOR_CONTEXT_PARAM, NULL);
				if (cbor3 != NULL) {
					WrapPrintF(out, fInComment ? " \\ " : " / ");
					DumpTree(cbor3, out, pFOO->children, depth + 1, true, true,
						true);
					WrapPrintF(out, fInComment ? " \\ " : " / ");
				}
			}
			break;

		case CN_CBOR_INT:
			WrapPrintF(out, "%d", cbor->v.sint);
			if (fValue && pFOO != NULL) {
				for (i = 0, pFoo2 = pFOO->children; i < pFOO->count;
					 i++, pFoo2++) {
					if ((pFoo2->type == CN_CBOR_INT) &&
						(pFoo2->value == cbor->v.sint)) {
						if (pFoo2->fieldName != NULL) {
							if (fInComment) {
								WrapPrintF(out, " \\ %s \\", pFoo2->fieldName);
							}
							else {
								WrapPrintF(out, " / %s /", pFoo2->fieldName);
							}
						}
						break;
					}
				}
			}
			break;

		case CN_CBOR_UINT:
			WrapPrintF(out, "%u", cbor->v.uint);
			if (fValue && (pFOO != NULL)) {
				for (i = 0, pFoo2 = pFOO->children; i < pFOO->count;
					 i++, pFoo2++) {
					if ((pFoo2->type == CN_CBOR_UINT) &&
						(pFoo2->value == (int)cbor->v.uint)) {
						if (pFoo2->fieldName != NULL) {
							if (fInComment) {
								WrapPrintF(out, " \\ %s \\", pFoo2->fieldName);
							}
							else {
								WrapPrintF(out, " / %s /", pFoo2->fieldName);
							}
						}
						break;
					}
				}
			}
			break;

		case CN_CBOR_TEXT:
			WrapPrintF(out, "\"");
			for (i = 0; i < cbor->length; i++) {
				if (fInComment && (cbor->v.str[i] == '/')) {
					WrapPrintF(out, "%c", cbor->v.str[i]);
				}
				WrapPrintF(out, "%c", cbor->v.str[i]);
			}
			WrapPrintF(out, "\"");
			break;

		case CN_CBOR_TRUE:
			WrapPrintF(out, "true");
			break;

		case CN_CBOR_FALSE:
			WrapPrintF(out, "false");
			break;

		default:
			WrapPrintF(out, "##");
			break;
	}
}

int main(int argc, char** argv)
{
	FILE* in = NULL;
	FILE* out = NULL;
	byte* pb = NULL;
	size_t cb = 0;
	byte rgb[2048];
	size_t cbIn;
	int forXML = false;
	FOO* root = NULL;

	for (int i = 1; i < argc; i++) {
		if ((argv[i][0] == '-') || (argv[i][0] == '/')) {
			if (strcmp(&argv[i][1], "someoption") == 0) {
			} else if (strcmp(&argv[i][1], "xml=yes") == 0) {
				forXML = true;
			} else if (strcmp(&argv[i][1], "xml=no") == 0) {
				forXML = false;
			}
			else if (strncmp(&argv[i][1], "wrap=", 5) == 0) {
				WrapLineAt = atoi(&argv[i][6]);
			} else if (strncmp(&argv[i][1], "type=", 5) == 0) {
				if (strcmp(&argv[i][1], "type=encrypt") == 0) {
					root = &EncryptedMessage;
				}
				else if (strcmp(&argv[i][1], "type=envelope") == 0) {
					root = &EnvelopedMessage;
				}
				else if (strcmp(&argv[i][1], "type=signed") == 0) {
					root = &SignedMessage;
				}
				else if (strcmp(&argv[i][1], "type=mac") == 0) {
					root = &MacMessage;
				}
				else if (strcmp(&argv[i][1], "type=mac0") == 0) {
					root = &Mac0Message;
				}
				else if (strcmp(&argv[i][1], "type=keyset") == 0) {
					root = &KeySet;
				}
				else if (strcmp(&argv[i][1], "type=key") == 0) {
					root = &Key;
				}
				else {
					PrintUsage();
				}
			} else {
				PrintUsage();
				exit(1);
			}
		} else {
			if (in == NULL) {
				in = fopen(argv[i], "rb");
				if (in == NULL) {
					fprintf(stderr, "Unable to open file '%s'\n", argv[i]);
					exit(1);
				}
			} else if (out == NULL) {
				out = fopen(argv[i], "wt");
				if (out == NULL) {
					fprintf(stderr, "Unable to open file '%s'\n", argv[i]);
					exit(1);
				}
			} else {
				PrintUsage();
				exit(1);
			}
		}
	}

	//  Set defaults

	if (in == NULL) {
#ifdef _WIN32
		in = stdin;
		_setmode(_fileno(stdin), _O_BINARY);
#else
		in = stdin;	 //  fdreopen(_fileno(stdin), NULL, O_RDONLY |
					 //  OPEN_O_BINARY);
#endif
	}
	if (out == NULL) {
		out = stdout;
	}

	// Read the input to a buffer - needed for the parser

	cbIn = 1;
	while (cbIn > 0) {
		cbIn = fread(rgb, 1, sizeof(rgb), in);
		if (cbIn == 0) {
			//  finished
			break;
		}

		pb = realloc(pb, cb + cbIn);
		if (pb == NULL) {
			fprintf(stderr, "Error allocating memory\n");
			exit(1);
		}
		memcpy(pb + cb, rgb, cbIn);
		cb += cbIn;
	}

	//  Parse it

	cn_cbor* cbor = cn_cbor_decode(pb, cb CBOR_CONTEXT_PARAM, NULL);
	if (cbor == NULL) {
		fprintf(stderr, "Error parsing CBOR");
		exit(1);
	}

	if (root == NULL) {
		if (cbor->type == CN_CBOR_TAG) {
			switch (cbor->v.sint) {
				case 98:
					root = &SignedMessageWithTag;
					break;
				case 96:
					root = &EnvelopedMessageWithTag;
					break;
				case 16:
					root = &EncryptedMessageWithTag;
					break;
				case 97:
					root = &MacMessageWithTag;
					break;
				case 17:
					root = &Mac0MessageWithTag;
					break;
				case 18:
					root = &Sign0MessageWithTag;
					break;
			}
		}
	}

	if (forXML) {
		fprintf(out, "<t>Size of binary file is %lu bytes</t>\n\n",
			(unsigned long)cb);
		fprintf(out, "<figure><artwork type='CBORdiag'><![CDATA[\n");
	}

	DumpTree(cbor, out, root, 0, true, true, false);
	WrapPrintF(out, "\n");

	if (forXML) {
		fprintf(out, "]]></artwork></figure>\n");
	}
}