--- parser3/src/main/pa_exception.C	2001/03/11 08:16:35	1.6
+++ parser3/src/main/pa_exception.C	2002/01/21 12:33:26	1.32
@@ -1,31 +1,187 @@
-/*
-	Parser
+/** @file
+	Parser: exception class.
+
 	Copyright (c) 2001 ArtLebedev Group (http://www.artlebedev.com)
-	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
+	Author: Alexander Petrosyan <paf@design.ru> (http://paf.design.ru)
 
-	$Id: pa_exception.C,v 1.6 2001/03/11 08:16:35 paf Exp $
+	$Id: pa_exception.C,v 1.32 2002/01/21 12:33:26 paf Exp $
 */
 
-#include <stdio.h>
-#include <stdlib.h>
-
-#include "pa_exception.h"
 #include "pa_common.h"
+#include "pa_exception.h"
+#include "pa_globals.h"
 
-void Exception::_throw(const String *atype, const String *acode,
-					  const String *aproblem_source, 
-					  const char *comment_fmt, ...) const {
+Exception::Exception() {
+	ftype=fcode=fproblem_source=0;
+	owns_comment=false; fcomment=0;
+}
+void Exception::initialize(
+	const String *atype, const String *acode,
+	const String *aproblem_source, 
+	const char *comment_fmt, va_list args) {
+	//_asm int 3;
+//__asm__("int3");
 	ftype=atype;
 	fcode=acode;
 	fproblem_source=aproblem_source;
+	owns_comment=true;
 
 	if(comment_fmt) {
-		va_list args;
-		va_start(args, comment_fmt);
+		fcomment=(char *)malloc(MAX_STRING);
 		vsnprintf(fcomment, MAX_STRING, comment_fmt, args);
-		va_end(args);
-	} else 
-		fcomment[0]=0;
+	} else
+		fcomment=0;
+}
+Exception::Exception(
+	const String *atype, const String *acode,
+	const String *aproblem_source, 
+	const char *comment_fmt, va_list args) {
+	initialize(atype, acode, aproblem_source, comment_fmt, args);
+}
+Exception::Exception(const String *atype, const String *acode,
+					  const String *aproblem_source, 
+					  const char *comment_fmt, ...) {
+	va_list args;
+    va_start(args, comment_fmt);
+	initialize(atype, acode, aproblem_source, comment_fmt, args);
+	va_end(args);
+}
+Exception::Exception(
+	const String *atype, const String *acode,
+	const String *aproblem_source, 
+	GdomeException& exc) :
+	ftype(atype),
+	fcode(acode),
+	fproblem_source(aproblem_source),
+	owns_comment(true) {
+
+	const char *xml_generic_errors=xmlGenericErrors();
+	if(xml_generic_errors || exc) {
+		const char *s;
+		switch((GdomeExceptionCode)exc) {
+		case GDOME_NOEXCEPTION_ERR: s="NOEXCEPTION_ERR"; break;
+		case GDOME_INDEX_SIZE_ERR: s="INDEX_SIZE_ERR"; break;
+		case GDOME_DOMSTRING_SIZE_ERR: s="DOMSTRING_SIZE_ERR"; break;
+		case GDOME_HIERARCHY_REQUEST_ERR: s="HIERARCHY_REQUEST_ERR"; break;
+		case GDOME_WRONG_DOCUMENT_ERR: s="WRONG_DOCUMENT_ERR"; break;
+		case GDOME_INVALID_CHARACTER_ERR: s="INVALID_CHARACTER_ERR"; break;
+		case GDOME_NO_DATA_ALLOWED_ERR: s="NO_DATA_ALLOWED_ERR"; break;
+		case GDOME_NO_MODIFICATION_ALLOWED_ERR: s="NO_MODIFICATION_ALLOWED_ERR"; break;
+		case GDOME_NOT_FOUND_ERR: s="NOT_FOUND_ERR"; break;
+		case GDOME_NOT_SUPPORTED_ERR: s="NOT_SUPPORTED_ERR"; break;
+		case GDOME_INUSE_ATTRIBUTE_ERR: s="INUSE_ATTRIBUTE_ERR"; break;
+		case GDOME_INVALID_STATE_ERR: s="INVALID_STATE_ERR"; break;
+		case GDOME_SYNTAX_ERR: s="SYNTAX_ERR"; break;
+		case GDOME_INVALID_MODIFICATION_ERR: s="INVALID_MODIFICATION_ERR"; break;
+		case GDOME_NAMESPACE_ERR: s="NAMESPACE_ERR"; break;
+		case GDOME_INVALID_ACCESS_ERR: s="INVALID_ACCESS_ERR"; break;
+		case GDOME_NULL_POINTER_ERR: s="NULL_POINTER_ERR"; break;
+		default: s="<UNKNOWN CODE>"; break;
+		}
+		
+		fcomment=(char *)malloc(MAX_STRING);
+		const char *xml_error_message=
+			xml_generic_errors?xml_generic_errors:"<no xml_generic_errors>";
+		if(exc)
+			snprintf(fcomment, MAX_STRING, 
+				"DOMException %s (%d).\n"
+				"%s", 
+					s,  // decoded code of exception
+					exc, // DOM exception code
+					xml_error_message // xml generic messages accumulated
+			);
+		else // no DOM exception
+			snprintf(fcomment, MAX_STRING, 
+				"%s", 
+					xml_error_message // xml generic messages accumulated
+			);
+		if(xml_generic_errors)
+			free((void *)xml_generic_errors);
+	} else
+		fcomment=0;
+}
+
 
-	longjmp(mark, 1);
+Exception::Exception(const Exception& src) : 
+	ftype(src.ftype),
+	fcode(src.fcode),
+	fproblem_source(src.fproblem_source),
+	fcomment(src.fcomment),
+	owns_comment(src.owns_comment) {
+	// that ugly string got from STL, along with principal ideal
+	const_cast<Exception *>(&src)->owns_comment=false;
 }
+Exception& Exception::operator =(const Exception& src) {
+	ftype=src.ftype;
+	fcode=src.fcode;
+	fproblem_source=src.fproblem_source;
+
+	if(owns_comment)
+		free(fcomment);
+	fcomment=src.fcomment;
+	// that ugly string got from STL, along with principal ideal
+	owns_comment=src.owns_comment;  ((Exception*)&src)->owns_comment=false;
+	
+	return *this;
+}
+Exception::~Exception() {
+	if(owns_comment)
+		free(fcomment);
+}
+
+#ifdef XML
+/*
+void Exception::provide_source(Pool& pool, const String *source, const XSLException& e) {
+	if(e.getURI().empty())
+		throw Exception(0, 0,
+			source,
+			"%s (%s)",
+				pool.transcode_cstr(e.getMessage()),  // message for exception
+				pool.transcode_cstr(e.getType()) // type of exception
+		);
+	else
+		throw Exception(0, 0,
+			source,
+			"%s (%s). %s(%d:%d)'", 
+				pool.transcode_cstr(e.getMessage()),  // message for exception
+				pool.transcode_cstr(e.getType()), // type of exception
+				
+				pool.transcode_cstr(e.getURI()),  // URI for the associated document, if any
+				e.getLineNumber(),  // line number, or -1 if unknown
+				e.getColumnNumber() // column number, or -1 if unknown
+		);
+}
+
+void Exception::provide_source(Pool& pool, const String *source, const SAXException& e) {
+	throw Exception(0, 0,
+		source,
+		"%s",
+			pool.transcode_cstr(XalanDOMString(e.getMessage()))  // message for exception
+	);
+}
+void Exception::provide_source(Pool& pool, const String *source, const SAXParseException& e) {
+	throw Exception(0, 0,
+		source,
+		"%s. %s(%d:%d)",
+			pool.transcode_cstr(XalanDOMString(e.getMessage())),  // message for exception
+			e.getSystemId()?pool.transcode_cstr(XalanDOMString(e.getSystemId())):"block", // file of exception
+			e.getLineNumber(), e.getColumnNumber() // line:col
+	);
+}
+
+
+void Exception::provide_source(Pool& pool, const String *source, const XMLException& e) {
+	throw Exception(0, 0,
+		source,
+		"%s (%s). %s(%d)'", 
+			pool.transcode_cstr(XalanDOMString(e.getMessage())),  // message for exception
+			pool.transcode_cstr(XalanDOMString(e.getType())), // type of exception
+			
+			e.getSrcFile()?e.getSrcFile():"block", // file of exception
+			e.getSrcLine()  // line number
+			//e.getCode()
+	);
+}
+
+*/
+#endif