Add tests.

2000-11-24  Not Zed  <NotZed@HelixCode.com>

	* Makefile.am (SUBDIRS): Add tests.

	* camel-mime-filter-basic.c (filter): Well, I'll add the extra
	bytes here too, lathough not strictly needed, might save a
	re-malloc when we get to complete().

	* camel-mime-filter-charset.c (filter): Make sure we have room if
	we only convert very short data.
	(complete): and here too.

	* tests/Makefile.am: Initial test harness & tests.  Requires gcc
	for this.

	* camel-internet-address.c (d): Turn off debug.

	* camel-charset-map.c (camel_charset_step): Oops, & masks for set
	intersection, not | them.  Dunno how this got even close to
	working.

2000-11-23  Not Zed  <NotZed@HelixCode.com>

	* camel-mime-filter-basic.c (filter): For base64 encoding, the
	output size for 0, 1, or 2 bytes of input can exceed input*2, so
	make sure we account for that as well.
	(complete): And here.
	(complete): Similarly for qp encoding, if we have a trailing
	space, we need some extra bytes (not needed for 'filter()', as any
	such bytes are stored in state/save).

	* camel-mime-utils.c (quoted_decode_step): Removed fixme not required.
	(quoted_encode_close): Dont append a trailing afterall.  Otherwise
	a pass through the encode/decode will grow the message each time.

svn path=/trunk/; revision=6656

3 files changed, 548 insertions, 0 deletions

diff --git a/camel/tests/message/Makefile.am b/camel/tests/message/Makefile.am
new file mode 100644
index 0000000000..2656a007d9
--- /dev/null
+++ b/camel/tests/message/Makefile.am
@@ -0,0 +1,22 @@
+
+INCLUDES = -I$(top_srcdir)/intl -I$(top_srcdir) -I$(top_srcdir)/camel \
+	-I$(includedir) \
+	-I$(top_srcdir)/camel/tests/lib \
+	-DG_LOG_DOMAIN=\"evolution-tests\"	
+
+LDADD = \
+	$(top_builddir)/camel/libcamel.la 	\
+	$(top_builddir)/e-util/libeutil.la	\
+	$(top_builddir)/libibex/libibex.la 	\
+	$(GNOME_LIBDIR) 			\
+	$(top_builddir)/camel/tests/lib/libcameltest.a			\
+	$(GNOMEUI_LIBS) $(INTLLIBS) $(EXTRA_GNOME_LIBS)
+
+check_PROGRAMS =  	\
+	test1		\
+	test2
+
+TESTS = test1 test2
+
+
+
diff --git a/camel/tests/message/test1.c b/camel/tests/message/test1.c
new file mode 100644
index 0000000000..681537d269
--- /dev/null
+++ b/camel/tests/message/test1.c
@@ -0,0 +1,189 @@
+/*
+  test1.c
+
+  Create a message, save it.
+
+  Retrieve message, compare content.
+
+
+  Operations:
+	writing/loading from different types of streams
+	reading/writing different content
+	reading/writing different encodings
+	reading/writing different charsets
+
+  Just testing streams:
+  	different stream types
+	different file ops
+	seek, eof, etc.
+*/
+
+#include "camel-test.h"
+#include "messages.h"
+
+/* for stat */
+#include <sys/stat.h>
+#include <unistd.h>
+
+#include <camel/camel-mime-message.h>
+#include <camel/camel-stream-fs.h>
+#include <camel/camel-stream-mem.h>
+
+struct _text {
+	char *text;
+	int len;
+};
+
+#define MAX_TEXTS (14)
+struct _text texts[MAX_TEXTS];
+
+static void
+setup(void)
+{
+	int i, j;
+	char *p;
+
+	/* setup various edge and other general cases */
+	texts[0].text = "";
+	texts[0].len = 0;
+	texts[1].text = "";
+	texts[1].len = 1;
+	texts[2].text = "\n";
+	texts[2].len = 1;
+	texts[3].text = "A";
+	texts[3].len = 1;
+	texts[4].text = "This is a test.\n.";
+	texts[4].len = strlen(texts[4].text);
+	texts[5].text = "This is a test.\n\n.\n";
+	texts[5].len = strlen(texts[5].text);
+	texts[6].text = g_malloc0(1024);
+	texts[6].len = 1024;
+	texts[7].text = g_malloc0(102400);
+	texts[7].len = 102400;
+	texts[8].text = g_malloc(1024);
+	memset(texts[8].text, '\n', 1024);
+	texts[8].len = 1024;
+	texts[9].text = g_malloc(102400);
+	memset(texts[9].text, '\n', 102400);
+	texts[9].len = 102400;
+	texts[10].text = g_malloc(1024);
+	memset(texts[10].text, ' ', 1024);
+	texts[10].len = 1024;
+	texts[11].text = g_malloc(102400);
+	memset(texts[11].text, ' ', 102400);
+	texts[11].len = 102400;
+
+	srand(42);
+	p = texts[12].text = g_malloc(1024);
+	for (i=0;i<1024;i++) {
+		j = rand();
+		if (j<RAND_MAX/120)
+			*p++ = '\n';
+		else
+			*p++ = (j % 95) + 32;
+	}
+	texts[12].len = 1024;
+	p = texts[13].text = g_malloc(102400);
+	for (i=0;i<102400;i++) {
+		j = rand();
+		if (j<RAND_MAX/120)
+			*p++ = '\n';
+		else
+			*p++ = (j % 95) + 32;
+	}
+	texts[13].len = 102400;
+}
+
+int main(int argc, char **argv)
+{
+	CamelMimeMessage *msg, *msg2;
+	int i, j;
+	char *text;
+	int len;
+
+	camel_test_init(argc, argv);
+
+	setup();
+
+	camel_test_start("Simple memory-based content creation");
+
+	/* test all ways of setting simple content for a message (i.e. memory based) */
+	for (j=0;j<MAX_TEXTS;j++) {
+		push("testing text number %d", j);
+		text = texts[j].text;
+		len = texts[j].len;
+		for (i=0;i<SET_CONTENT_WAYS;i++) {
+			push("create simple message %d", i);
+			msg = test_message_create_simple();
+
+			push("set simple content");
+			test_message_set_content_simple((CamelMimePart *)msg, i, "text/plain", text, len);
+			pull();
+
+			push("compare original content");
+			test_message_compare_content(camel_medium_get_content_object((CamelMedium *)msg), text, len);
+			pull();
+
+			push("save message to test1.msg");
+			unlink("test1.msg");
+			test_message_write_file(msg, "test1.msg");
+			check_unref(msg, 1);
+			pull();
+	
+			push("read from test1.msg");
+			msg2 = test_message_read_file("test1.msg");
+			pull();
+
+			push("compare read with original content");
+			test_message_compare_content(camel_medium_get_content_object((CamelMedium *)msg2), text, len);
+			check_unref(msg2, 1);
+			pull();
+
+			unlink("test1.msg");
+			pull();
+		}
+		pull();
+	}
+
+	camel_test_end();
+
+	camel_test_start("Different encodings");
+	for (j=0;j<MAX_TEXTS;j++) {
+		push("testing text number %d", j);
+		text = texts[j].text;
+		len = texts[j].len;
+		for (i=0;i<CAMEL_MIME_PART_NUM_ENCODINGS;i++) {
+			
+			push("test simple message, encoding %s", camel_mime_part_encoding_to_string(i));
+			msg = test_message_create_simple();
+
+			push("set simple content");
+			test_message_set_content_simple((CamelMimePart *)msg, 0, "text/plain", text, len);
+			pull();
+
+			camel_mime_part_set_encoding((CamelMimePart *)msg, i);
+
+			push("save message to test1.msg");
+			unlink("test1.msg");
+			test_message_write_file(msg, "test1.msg");
+			check_unref(msg, 1);
+			pull();
+	
+			push("read from test1.msg");
+			msg2 = test_message_read_file("test1.msg");
+			pull();
+
+			push("compare read with original content");
+			test_message_compare_content(camel_medium_get_content_object((CamelMedium *)msg2), text, len);
+			check_unref(msg2, 1);
+			pull();
+
+			unlink("test1.msg");
+			pull();
+		}
+		pull();
+	}
+	camel_test_end();
+
+	return 0;
+}
diff --git a/camel/tests/message/test2.c b/camel/tests/message/test2.c
new file mode 100644
index 0000000000..8a3fe3c250
--- /dev/null
+++ b/camel/tests/message/test2.c
@@ -0,0 +1,337 @@
+#include "camel-test.h"
+#include "messages.h"
+#include "addresses.h"
+
+/* for stat */
+#include <sys/stat.h>
+#include <unistd.h>
+
+#include <unicode.h>
+
+#include <camel/camel-internet-address.h>
+#include <camel/camel-address.h>
+
+/* a bunch of test strings in different encodings, just taken from gnome-core po files */
+/* see data/genline.pl */
+struct _l {
+    char *type;
+    char *line;
+} test_lines[] = {
+	/* FIXME: for now, remove the types libunicode doesn't know about, this is tricky to fix */
+	/* And at best, all we could do is translate it to X-Unknown, or something */
+	/*{ "windows-1251", "Åäèí àïëåò íå îòãîâàðÿ íà çàÿâêà çà çàïèñ.\nÄà ãî ïðåìàõíà ëè èëè äà ïî÷àêàì?" },*/
+	{ "iso-8859-1", "Omple les miniatures de la finestra amb contingut de la pantalla" },
+	{ "ISO-8859-2", "Správce oken hýbe s okrajem okna (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
+	{ "ISO-8859-1", "Vindueshåndtering flytter dekorationsvindue istedet (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
+	{ "ISO-8859-1", "Vorschaubilder der Fenster mit dem Bildschirminhalt ausfüllen" },
+	{ "iso-8859-7", "ÅìöÜíéóç åñãáóéþí ðïõ äå öáßíïíôáé óôç ëßóôá ðáñáèýñùí (ÐÁÑÁÊÁÌØÇ-ËÉÓÔÁÐÁÑÁÈÕÑÙÍ)" },
+	{ "iso-8859-1", "You've chosen to disable the startup hint. To re-enable it, choose \"Startup Hint\" in the GNOME Control Centre" },
+	{ "iso-8859-1", "El aplique de reloj muestra en su panel la fecha y la hora de forma simple y ligero " },
+	{ "iso-8859-1", "Applet ei vasta salvestuskäsule. Kas peaks ta niisama sulgema, või veel ootama?" },
+	{ "iso-8859-1", "Lehio kudeatzaileak lehioaren dekorazaioa mugiarazten (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
+	{ "iso-8859-15", "Näytä sovellukset, joiden ikkunoista on näkyvillä vain otsikkopalkki" },
+	{ "ISO-8859-1", "Afficher les tâches qui ne sont pas dans la liste des fenêtres" },
+	{ "iso-8859-1", "Níl applet ag tabhair freagra ar iarratas sábháil. Bain amach an applet nó lean ar fánacht?" },
+	{ "iso-8859-1", "Amosa-las tarefas agochadas da lista de fiestras (SKIP-WINLIST)" },
+	{ "iso-8859-2", "Az ablakkezelõ a dekorációt mozgassa az ablak helyett (AfterStep, Enlightenment, FVWM, IceWM, SawMill)" },
+	{ "iso-8859-1", "Riempi la finestra delle anteprime con il contenuto dello schermo" },
+	{ "euc-jp", "¥¦¥¤¥ó¥É¥¦¥Þ¥Í¡¼¥¸¥ã¤Ï¾þ¤ê¥¦¥¤¥ó¥É¥¦¤òÆ°¤«¤¹ (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
+	{ "euc-kr", "â °ü¸®ÀÚ°¡ ²Ù¹Î â ´ë½Å À̵¿ (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
+	{ "iso-8859-13", "Priedas neatsakinëja á praðymà iðsisaugoti. Paðalinti priedà ar laukti toliau?" },
+	{ "iso-8859-1", "Window manager verplaatst dekoratie (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
+	{ "iso-8859-1", "Vindushåndtereren flytter dekorasjonsvinduet i stedet (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
+	{ "iso-8859-2", "Przemieszczanie dekoracji zamiast okna (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
+	{ "iso-8859-1", "Este programa é responsável por executar outras aplicações, embeber pequenos applets, a paz no mundo e crashes aleatórios do X." },
+	{ "iso-8859-1", "Mostrar tarefas que se escondem da lista de janelas (SKIP-WINLIST)" },
+	{ "koi8-r", "÷ÙÓÏÔÁ ÒÁÂÏÞÅÇÏ ÓÔÏÌÁ × ÐÅÒÅËÌÀÞÁÔÅÌÅ ÓÏ×ÐÁÄÁÅÔ Ó ×ÙÓÏÔÏÊ ÐÁÎÅÌÉ" },
+	{ "iso-8859-2", "Správca okien presúva okraje okien (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
+	{ "iso-8859-2", "Ka¾i posle, ki se skrivajo pred upravljalnik oken (SKIP-WINLIST)" },
+	{ "iso-8859-5", "Window ÜÕÝÐÔ×ÕàØ ßÞÜÕàÐ ÔÕÚÞàÐæØÞÝØ ßàÞ×Þà ãÜÕáâÞ âÞÓa (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
+	{ "iso-8859-2", "Window menadzeri pomera dekoracioni prozor umesto toga (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
+	{ "iso-8859-1", "Fönsterhanteraren flyttar dekorationsfönstret istället (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
+	/*{ "TSCII", "À½¢ì¸¼î-ºð¼¸ò¾¢ø À¡÷ì¸ ÓÊ¡¾ À½¢ì¸¼í¸¨Ç ¸¡Á¢ (À½¢ì¸¼î-ºð¼¸õ-¾Å¢÷)" },*/
+	{ "iso-8859-9", "Kaydetme isteðine bir uygulak cevap vermiyor . Uygulaðý sileyim mi , yoksa bekleyeyim mi ?" },
+	{ "koi8-u", "ðÅÒÅͦÝÅÎÎÑ ÄÅËÏÒÁæ§ ÚÁͦÓÔØ ×¦ËÎÁ (AfterStep, Enlightenment, FVWM, IceWM, Sawfish)" },
+	{ "iso-8859-1", "Cwand on scriftôr est bodjî foû, li scriftôr èt totes les apliketes å dvins sont pierdowes. Bodjî ci scriftôr chal?" },
+	{ "gb2312", "ǨÒƵ½×°Êδ°¿Ú¹ÜÀí³ÌÐò(AfterStep, Enlightenment, FVWM, IceWM, SawMill)" },
+	{ "big5", "µøµ¡ºÞ²zªÌ¥u²¾°Ê¸Ë¹¢µøµ¡ (AfterStep, Enlightenment, FVWM, IceWM, Sawmill)" },
+};
+
+static char *convert(const char *in, const char *from, const char *to)
+{
+	unicode_iconv_t ic = unicode_iconv_open(to, from);
+	char *out, *outp;
+	const char *inp;
+	int inlen, outlen;
+
+	if (ic == (unicode_iconv_t)-1)
+		return g_strdup(in);
+
+	inlen = strlen(in);
+	outlen = inlen*5 + 16;
+
+	outp = out = g_malloc(outlen);
+	inp = in;
+
+	if (unicode_iconv(ic, &inp, &inlen, &outp, &outlen) == -1) {
+		test_free(out);
+		unicode_iconv_close(ic);
+		return g_strdup(in);
+	}
+
+	if (unicode_iconv(ic, NULL, 0, &outp, &outlen) == -1) {
+		test_free(out);
+		unicode_iconv_close(ic);
+		return g_strdup(in);
+	}
+
+	unicode_iconv_close(ic);
+
+	*outp = 0;
+
+#if 0
+	/* lets see if we can convert back again? */
+	{
+		char *nout, *noutp;
+		unicode_iconv_t ic = unicode_iconv_open(from, to);
+
+		inp = out;
+		inlen = strlen(out);
+		outlen = inlen*5 + 16;
+		noutp = nout = g_malloc(outlen);
+		if (unicode_iconv(ic, &inp, &inlen, &noutp, &outlen) == -1
+		    || unicode_iconv(ic, NULL, 0, &noutp, &outlen) == -1) {
+			g_warning("Cannot convert '%s' \n from %s to %s: %s\n", in, to, from, strerror(errno));
+		}
+		unicode_iconv_close(ic);
+	}
+
+	/* and lets see what camel thinks out optimal charset is */
+	{
+		printf("Camel thinks the best encoding of '%s' is %s, although we converted from %s\n",
+		       in, camel_charset_best(out, strlen(out)), from);
+	}
+#endif
+
+	return out;
+}
+
+#define to_utf8(in, type) convert(in, type, "utf-8")
+#define from_utf8(in, type) convert(in, "utf-8", type)
+
+#define ARRAY_LEN(x) (sizeof(x)/sizeof(x[0]))
+
+int main(int argc, char **argv)
+{
+	int i;
+	CamelInternetAddress *addr, *addr2;
+	char *name;
+	char *charset;
+	const char *real, *where;
+	char *enc, *enc2, *format, *format2;
+
+	camel_test_init(argc, argv);
+
+	camel_test_start("CamelInternetAddress, basics");
+
+	addr = camel_internet_address_new();
+
+	push("Test blank address");
+	check(camel_address_length(CAMEL_ADDRESS(addr)) == 0);
+	check(camel_internet_address_get(addr, 0, &real, &where) == FALSE);
+	pull();
+
+	push("Test blank clone");
+	addr2 = CAMEL_INTERNET_ADDRESS(camel_address_new_clone(CAMEL_ADDRESS(addr)));
+	test_address_compare(addr, addr2);
+	check_unref(addr2, 1);
+	pull();
+
+	push("Test add 1");
+	camel_internet_address_add(addr, "Zed", "nowhere@here.com.au");
+	check(camel_address_length(CAMEL_ADDRESS(addr)) == 1);
+	check(camel_internet_address_get(addr, 0, &real, &where) == TRUE);
+	check_msg(string_equal("Zed", real), "real = '%s'", real);
+	check(strcmp(where, "nowhere@here.com.au") == 0);
+	pull();
+
+	push("Test clone 1");
+	addr2 = CAMEL_INTERNET_ADDRESS(camel_address_new_clone(CAMEL_ADDRESS(addr)));
+	test_address_compare(addr, addr2);
+	check_unref(addr2, 1);
+	pull();
+
+	push("Test add many");
+	for (i=1;i<10;i++) {
+		char name[16], a[32];
+		sprintf(name, "Zed %d", i);
+		sprintf(a, "nowhere@here-%d.com.au", i);
+		camel_internet_address_add(addr, name, a);
+		check(camel_address_length(CAMEL_ADDRESS(addr)) == i+1);
+		check(camel_internet_address_get(addr, i, &real, &where) == TRUE);
+		check_msg(string_equal(name, real), "name = '%s' real = '%s'", name, real);
+		check(strcmp(where, a) == 0);
+	}
+	pull();
+
+	/* put a few of these in to make it look like its doing something impressive ... :) */
+	camel_test_end();
+	camel_test_start("CamelInternetAddress, search");
+
+	push("Test search");
+	camel_test_nonfatal("Address comparisons should ignore whitespace??");
+	check(camel_internet_address_find_name(addr, "Zed 1", &where) == 1);
+	check(camel_internet_address_find_name(addr, "Zed 9", &where) == 9);
+	check(camel_internet_address_find_name(addr, "Zed", &where) == 0);
+	check(camel_internet_address_find_name(addr, " Zed", &where) == 0);
+	check(camel_internet_address_find_name(addr, "Zed ", &where) == 0);
+	check(camel_internet_address_find_name(addr, "  Zed ", &where) == 0);
+	check(camel_internet_address_find_name(addr, "Zed 20", &where) == -1);
+	check(camel_internet_address_find_name(addr, "", &where) == -1);
+	/* interface dont handle nulls :) */
+	/*check(camel_internet_address_find_name(addr, NULL, &where) == -1);*/
+
+	check(camel_internet_address_find_address(addr, "nowhere@here-1.com.au", &where) == 1);
+	check(camel_internet_address_find_address(addr, "nowhere@here-1 . com.au", &where) == 1);
+	check(camel_internet_address_find_address(addr, "nowhere@here-2 .com.au ", &where) == 2);
+	check(camel_internet_address_find_address(addr, " nowhere @here-3.com.au", &where) == 3);
+	check(camel_internet_address_find_address(addr, "nowhere@here-20.com.au ", &where) == -1);
+	check(camel_internet_address_find_address(addr, "", &where) == -1);
+	/*check(camel_internet_address_find_address(addr, NULL, &where) == -1);*/
+	camel_test_fatal();
+	pull();
+
+	camel_test_end();
+	camel_test_start("CamelInternetAddress, copy/cat/clone");
+
+	push("Test clone many");
+	addr2 = CAMEL_INTERNET_ADDRESS(camel_address_new_clone(CAMEL_ADDRESS(addr)));
+	test_address_compare(addr, addr2);
+	pull();
+
+	push("Test remove items");
+	camel_address_remove(CAMEL_ADDRESS(addr2), 0);
+	check(camel_address_length(CAMEL_ADDRESS(addr2)) == 9);
+	camel_address_remove(CAMEL_ADDRESS(addr2), 0);
+	check(camel_address_length(CAMEL_ADDRESS(addr2)) == 8);
+	camel_address_remove(CAMEL_ADDRESS(addr2), 5);
+	check(camel_address_length(CAMEL_ADDRESS(addr2)) == 7);
+	camel_address_remove(CAMEL_ADDRESS(addr2), 10);
+	check(camel_address_length(CAMEL_ADDRESS(addr2)) == 7);
+	camel_address_remove(CAMEL_ADDRESS(addr2), -1);
+	check(camel_address_length(CAMEL_ADDRESS(addr2)) == 0);
+	check_unref(addr2, 1);
+	pull();
+
+	push("Testing copy/cat");
+	push("clone + cat");
+	addr2 = CAMEL_INTERNET_ADDRESS(camel_address_new_clone(CAMEL_ADDRESS(addr)));
+	camel_address_cat(CAMEL_ADDRESS(addr2), CAMEL_ADDRESS(addr));
+	check(camel_address_length(CAMEL_ADDRESS(addr)) == 10);
+	check(camel_address_length(CAMEL_ADDRESS(addr2)) == 20);
+	check_unref(addr2, 1);
+	pull();
+
+	push("cat + cat + copy");
+	addr2 = camel_internet_address_new();
+	camel_address_cat(CAMEL_ADDRESS(addr2), CAMEL_ADDRESS(addr));
+	test_address_compare(addr, addr2);
+	camel_address_cat(CAMEL_ADDRESS(addr2), CAMEL_ADDRESS(addr));
+	check(camel_address_length(CAMEL_ADDRESS(addr)) == 10);
+	check(camel_address_length(CAMEL_ADDRESS(addr2)) == 20);
+	camel_address_copy(CAMEL_ADDRESS(addr2), CAMEL_ADDRESS(addr));
+	test_address_compare(addr, addr2);
+	check_unref(addr2, 1);
+	pull();
+
+	push("copy");
+	addr2 = camel_internet_address_new();
+	camel_address_copy(CAMEL_ADDRESS(addr2), CAMEL_ADDRESS(addr));
+	test_address_compare(addr, addr2);
+	check_unref(addr2, 1);
+	pull();
+
+	pull();
+
+	check_unref(addr, 1);
+
+	camel_test_end();
+
+	camel_test_start("CamelInternetAddress, I18N");
+
+	for (i=0;i<ARRAY_LEN(test_lines);i++) {
+		push("Testing text line %d (%s) '%s'", i, test_lines[i].type, test_lines[i].line);
+
+		addr = camel_internet_address_new();
+
+		/* first, convert to api format (utf-8) */
+		charset = test_lines[i].type;
+		name = to_utf8(test_lines[i].line, charset);
+
+		push("Address setup");
+		camel_internet_address_add(addr, name, "nobody@nowhere.com");
+		check(camel_internet_address_get(addr, 0, &real, &where) == TRUE);
+		check_msg(string_equal(name, real), "name = '%s' real = '%s'", name, real);
+		check(strcmp(where, "nobody@nowhere.com") == 0);
+
+		check(camel_internet_address_get(addr, 1, &real, &where) == FALSE);
+		check(camel_address_length(CAMEL_ADDRESS(addr)) == 1);
+		pull();
+
+		push("Address encode/decode");
+		enc = camel_address_encode(CAMEL_ADDRESS(addr));
+
+		addr2 = camel_internet_address_new();
+		check(camel_address_decode(CAMEL_ADDRESS(addr2), enc) == 1);
+		check(camel_address_length(CAMEL_ADDRESS(addr2)) == 1);
+
+		enc2 = camel_address_encode(CAMEL_ADDRESS(addr2));
+		check_msg(string_equal(enc, enc2), "enc = '%s' enc2 = '%s'", enc, enc2);
+		test_free(enc2);
+
+		push("Compare addresses");
+		test_address_compare(addr, addr2);
+		pull();
+		test_free(enc);
+		pull();
+
+		/* FIXME: format/unformat arne't guaranteed to be reversible, at least at the moment */
+		camel_test_nonfatal("format/unformat not (yet) reversible for all cases");
+
+		push("Address format/unformat");
+		format = camel_address_format(CAMEL_ADDRESS(addr));
+
+		addr2 = camel_internet_address_new();
+		check(camel_address_unformat(CAMEL_ADDRESS(addr2), format) == 1);
+		check(camel_address_length(CAMEL_ADDRESS(addr2)) == 1);
+
+		format2 = camel_address_format(CAMEL_ADDRESS(addr2));
+		check_msg(string_equal(format, format2), "format = '%s\n\tformat2 = '%s'", format, format2);
+		test_free(format2);
+
+		/* currently format/unformat doesn't handle ,'s and other special chars at all */
+		if (camel_address_length(CAMEL_ADDRESS(addr2)) == 1) {
+			push("Compare addresses");
+			test_address_compare(addr, addr2);
+			pull();
+		}
+
+		test_free(format);
+		pull();
+
+		camel_test_fatal();
+
+		check_unref(addr2, 1);
+
+		check_unref(addr, 1);
+		pull();
+
+	}
+
+	camel_test_end();
+
+	/* FIXME: Add test of decoding of externally defined addresses */
+	/* FIXME: Add test of decoding of broken addresses */
+
+	return 0;
+}