#include <config.h>

#include <ctype.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "camel-test.h"

static struct {
	const gchar *utf8;
	const gchar *utf7;
	guint32 unicode[200];
} tests[] = {
	/* the escape gchar */
	{ "&", "&-",
	  {  0x0026, } },
	/* part of set D */
	{ "+", "+",
	  {  0x002b, } },
	{ "plain ascii text", "plain ascii text",
	  {  0x0070, 0x006c, 0x0061, 0x0069, 0x006e, 0x0020, 0x0061, 0x0073, 0x0063, 0x0069, 0x0069, 0x0020, 0x0074, 0x0065, 0x0078, 0x0074, } },
	/* part of set O */
	{ "'(),-./:?", "'(),-./:?",
	  {  0x0027, 0x0028, 0x0029, 0x002c, 0x002d, 0x002e, 0x002f, 0x003a, 0x003f, } },
	{ "!\"#$%*+-;<=>@[]^_`{|}", "!\"#$%*+-;<=>@[]^_`{|}",
	  {  0x0021, 0x0022, 0x0023, 0x0024, 0x0025, 0x002a, 0x002b, 0x002d, 0x003b, 0x003c, 0x003d, 0x003e, 0x0040, 0x005b, 0x005d, 0x005e, 0x005f, 0x0060, 0x007b, 0x007c, 0x007d, } },
	/* example strings from rfc1642 (modified for imap utf7) */
	{ "A\xe2\x89\xa2\xce\x91" ".", "A&ImIDkQ-.",
	  {  0x0041, 0x2262, 0x0391, 0x002e, } },
	{ "Hi Mum \xe2\x98\xba!", "Hi Mum &Jjo-!",
	  {  0x0048, 0x0069, 0x0020, 0x004d, 0x0075, 0x006d, 0x0020, 0x263a, 0x0021, } },
	{ "\xe6\x97\xa5\xe6\x9c\xac\xe8\xaa\x9e", "&ZeVnLIqe-",
	  {  0x65e5, 0x672c, 0x8a9e, } },
	{ "Item 3 is \xc2\xa3" "1.", "Item 3 is &AKM-1.",
	  {  0x0049, 0x0074, 0x0065, 0x006d, 0x0020, 0x0033, 0x0020, 0x0069, 0x0073, 0x0020, 0x00a3, 0x0031, 0x002e, } },
	{ "\"The sayings of Confucius,\" James R. Ware, trans.  \xe5\x8f\xb0\xe5\x8c\x97:\xe6\x96\x87\xe8\x87\xb4\xe5\x87\xba\xe7\x89\x88\xe7\xa4\xbe, 1980.  (Chinese text with English translation)\xe5\x9b\x9b\xe6\x9b\xb8\xe4\xba\x94\xe7\xb6\x93, \xe5\xae\x8b\xe5\x85\x83\xe4\xba\xba\xe6\xb3\xa8, \xe5\x8c\x97\xe4\xba\xac:  \xe4\xb8\xad\xe5\x9c\x8b\xe6\x9b\xb8\xe5\xba\x97, 1990.",
	  "\"The sayings of Confucius,\" James R. Ware, trans.  &U,BTFw-:&ZYeB9FH6ckh5Pg-, 1980.  (Chinese text with English translation)&Vttm+E6UfZM-, &W4tRQ066bOg-, &UxdOrA-:  &Ti1XC2b4Xpc-, 1990.",
	  {  0x0022, 0x0054, 0x0068, 0x0065, 0x0020, 0x0073, 0x0061, 0x0079, 0x0069, 0x006e, 0x0067, 0x0073, 0x0020, 0x006f, 0x0066, 0x0020, 0x0043, 0x006f, 0x006e, 0x0066, 0x0075, 0x0063, 0x0069, 0x0075, 0x0073, 0x002c, 0x0022, 0x0020, 0x004a, 0x0061, 0x006d, 0x0065, 0x0073, 0x0020, 0x0052, 0x002e, 0x0020, 0x0057, 0x0061, 0x0072, 0x0065, 0x002c, 0x0020, 0x0074, 0x0072, 0x0061, 0x006e, 0x0073, 0x002e, 0x0020, 0x0020, 0x53f0, 0x5317, 0x003a, 0x6587, 0x81f4, 0x51fa, 0x7248, 0x793e, 0x002c, 0x0020, 0x0031, 0x0039, 0x0038, 0x0030, 0x002e, 0x0020, 0x0020, 0x0028, 0x0043, 0x0068, 0x0069, 0x006e, 0x0065, 0x0073, 0x0065, 0x0020, 0x0074, 0x0065, 0x0078, 0x0074, 0x0020, 0x0077, 0x0069, 0x0074, 0x0068, 0x0020, 0x0045, 0x006e, 0x0067, 0x006c, 0x0069, 0x0073, 0x0068, 0x0020, 0x0074, 0x0072, 0x0061, 0x006e, 0x0073, 0x006c, 0x0061, 0x0074, 0x0069, 0x006f, 0x006e, 0x0029, 0x56db, 0x66f8, 0x4e94, 0x7d93, 0x002c, 0x0020, 0x5b8b, 0x5143, 0x4eba, 0x6ce8, 0x002c, 0x0020, 0x5317, 0x4eac, 0x003a, 0x0020, 0x0020, 0x4e2d, 0x570b, 0x66f8, 0x5e97, 0x002c, 0x0020, 0x0031, 0x0039, 0x0039, 0x0030, 0x002e, } },
};

gint
main (gint argc,
      gchar **argv)
{
	const gchar *p;
	gchar *utf8, *utf7;
	gint i, j;
	guint32 u;
	gchar utf8enc[256];
	GString *out;

	camel_test_init (argc, argv);

	out = g_string_new ("");

	camel_test_start ("UTF8, UTF7 RFC1642+RFC2060");

	for (i = 0; i < G_N_ELEMENTS (tests); i++) {

		camel_test_push ("%2d: %s utf8 decode", i, tests[i].utf7);
		p = tests[i].utf8;
		j = 0;
		do {
			u = camel_utf8_getc ((const guchar **) &p);
			check (u == tests[i].unicode[j]);
			j++;
		} while (u);
		camel_test_pull ();

		camel_test_push ("%2d: %s utf7->utf8", i, tests[i].utf7);
		utf8 = camel_utf7_utf8 (tests[i].utf7);
		check_msg (strcmp (utf8, tests[i].utf8) == 0, "utf8 = '%s'", utf8);
		camel_test_pull ();

		camel_test_push ("%2d: %s utf7->utf8->utf7", i, tests[i].utf7);
		utf7 = camel_utf8_utf7 (utf8);
		check_msg (strcmp (utf7, tests[i].utf7) == 0, "utf7 = '%s'", utf7);
		camel_test_pull ();

		g_free (utf7);
		g_free (utf8);

		camel_test_push ("%2d: %s utf8 encode", i, tests[i].utf7);

		g_string_truncate (out, 0);
		p = utf8enc;
		j = 0;
		do {
			u = tests[i].unicode[j++];
			camel_utf8_putc ((guchar **) &p, u);
			g_string_append_u (out, u);
		} while (u);

		check (strcmp (utf8enc, out->str) == 0);
		check (strcmp (utf8enc, tests[i].utf8) == 0);

		camel_test_pull ();
	}

	camel_test_end ();

	return 0;
}