Initial checkin

Imported from subversion report, converted to git. Updated all paths in
scripts and makefiles, reflecting the new directory hierarchy.

1 files changed, 152 insertions, 0 deletions

diff --git a/libmail/imapparsefmt.C b/libmail/imapparsefmt.C
new file mode 100644
index 0000000..fb26cba
--- /dev/null
+++ b/libmail/imapparsefmt.C
@@ -0,0 +1,152 @@
+/*
+** Copyright 2002, Double Precision Inc.
+**
+** See COPYING for distribution information.
+*/
+#include "libmail_config.h"
+#include "imap.H"
+#include "imapparsefmt.H"
+#include <stdlib.h>
+#include <string.h>
+#include <ctype.h>
+
+using namespace std;
+
+/////////////////////////////////////////////////////////////////////////
+//
+// Parse a structured IMAP reply
+
+mail::imapparsefmt::imapparsefmt()
+	: current(NULL), nil(false), value(""), parent(NULL)
+{
+}
+
+mail::imapparsefmt::imapparsefmt(mail::imapparsefmt *parentArg)
+	: current(NULL), nil(false), value(""), parent(parentArg)
+{
+	parent->children.push_back(this);
+}
+
+mail::imapparsefmt::imapparsefmt(const mail::imapparsefmt &cpy)
+	: current(NULL), nil(false), value(""), parent(NULL)
+{
+	try {
+		(*this)=cpy;
+	} catch (...)
+	{
+		destroy();
+		children.clear();
+		LIBMAIL_THROW(LIBMAIL_THROW_EMPTY);
+	}
+}
+
+mail::imapparsefmt::~imapparsefmt()
+{
+	destroy();
+}
+
+mail::imapparsefmt &mail::imapparsefmt
+::operator=(const mail::imapparsefmt &cpy)
+{
+	destroy();
+	children.clear();
+
+	current=cpy.current;
+	nil=cpy.nil;
+	value=cpy.value;
+	parent=cpy.parent;
+
+	vector<mail::imapparsefmt *>::const_iterator b=cpy.children.begin(),
+		e=cpy.children.end();
+
+	while (b != e)
+	{
+		mail::imapparsefmt *ptr=new mail::imapparsefmt(**b);
+
+		if (!ptr)
+			LIBMAIL_THROW("Out of memory.");
+
+		try {
+			ptr->parent=this;
+			children.push_back(ptr);
+		} catch (...)
+		{
+			delete ptr;
+			LIBMAIL_THROW(LIBMAIL_THROW_EMPTY);
+		}
+		b++;
+	}
+	return *this;
+}
+
+void mail::imapparsefmt::destroy()
+{
+	vector<mail::imapparsefmt *>::iterator b=children.begin(),
+		e=children.end();
+
+	while (b != e)
+	{
+		delete *b;
+		b++;
+	}
+}
+
+bool mail::imapparsefmt::process(mail::imap &imapAccount,
+				 mail::imapHandlerStructured::Token &t,
+				 bool &parse_error)
+{
+	parse_error=false;
+	if (current == NULL)	// Start of tree.
+	{
+		if (t == mail::imapHandlerStructured::NIL)
+		{
+			nil=1;
+			return true;
+		}
+
+		if (t == mail::imapHandlerStructured::ATOM ||
+		    t == mail::imapHandlerStructured::STRING)
+		{
+			value=t.text;
+			return true;
+		}
+		if (t != '(')
+		{
+			parse_error=true;
+			return true;
+		}
+
+		current=this;
+		return false;
+	}
+
+	if (t == ')')
+	{
+		current=current->parent;
+		return (current == NULL);
+	}
+
+	mail::imapparsefmt *child=new mail::imapparsefmt(current);
+
+	if (t == mail::imapHandlerStructured::NIL)
+	{
+		child->nil=1;
+		return false;
+	}
+
+	if (t == mail::imapHandlerStructured::ATOM ||
+	    t == mail::imapHandlerStructured::STRING)
+	{
+		child->value=t.text;
+		return false;
+	}
+
+	if (t != '(')
+	{
+		parse_error=1;
+		return true;
+	}
+
+	current=child;
+	return false;
+}