--- parser3/src/main/pa_table.C	2001/02/22 10:43:46	1.9
+++ parser3/src/main/pa_table.C	2002/08/01 11:26:51	1.48
@@ -1,71 +1,106 @@
-/*
-  $Id: pa_table.C,v 1.9 2001/02/22 10:43:46 paf Exp $
+/** @file
+	Parser: table class.
+
+	Copyright (c) 2001, 2002 ArtLebedev Group (http://www.artlebedev.com)
+	Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)
 */
 
-#include <stdlib.h>
+static const char* IDENT_TABLE_C="$Id: pa_table.C,v 1.48 2002/08/01 11:26:51 paf Exp $";
+
+//#include <stdlib.h>
 
 #include "pa_table.h"
 #include "pa_pool.h"
+#include "pa_exception.h"
 
-Table::Table(Request& arequest, 
-			 char *afile, uint aline, 
-			 Array *acolumns, 
+Table::Table(Pool& apool, 
+			 const String *aorigin_string,
+			 const Array *acolumns, 
 			 int initial_rows) :
-	Array(arequest.pool(), initial_rows),
-	request(arequest),
+	Array(apool, initial_rows),
+
+	forigin_string(aorigin_string),
 	fcurrent(0),
 	fcolumns(acolumns), 
-	name2number(arequest.pool(), false) {
-#ifndef NO_STRING_ORIGIN
-	forigin.file=afile;
-	forigin.line=aline;
-#endif
+	name2number(*NEW Hash(pool())) {
 
 	if(fcolumns)
 		for(int i=0; i<fcolumns->size(); i++) {
-			String name(arequest.pool());
-			name.APPEND(fcolumns->get_cstr(i), 0, 0, 0);
+			const String& name=*fcolumns->get_string(i);
 			name2number.put(name, i+1);
 		}
 }
 
-const Array &Table::at(int index) {
-	if(index<0 || index>=size())
-		THROW(0, 0, 
-			0,
-			"table row index %d is out of range [0..%d]", 
-			index, size()-1);
-	
-	return *static_cast<const Array *>(get(index));
-}
-
-const char *Table::item(int index) {
-	const Array& row=at(fcurrent);
-	return row.get_cstr(index);
-}
-
-const char *Table::item(const String& column_name) {
-	int column_index;
-	if(fcolumns) {
-		int found_index=name2number.get_int(column_name);
-		if(found_index)
-			column_index=found_index-1;
-		else
-			THROW(0, 0,
-				&column_name, 
+Table::Table(const Table& source)  :
+	Array(source),
+
+	forigin_string(source.forigin_string),
+	fcurrent(source.fcurrent),
+	fcolumns(source.fcolumns),
+	name2number(source.name2number) {
+
+}
+
+Table::Table(Pool& apool, const Table& source, int offset) :
+	Array(apool),
+
+	forigin_string(source.forigin_string),
+	fcurrent(source.fcurrent),
+	fcolumns(source.fcolumns),
+	name2number(source.name2number) {
+
+	append_array(source, offset);
+}
+
+int Table::column_name2index(const String& column_name, bool bark) const {
+	if(fcolumns) {// named
+		int result=name2number.get_int(column_name)-1; // -1 = column not found
+		if(bark && result<0)
+			throw Exception("parser.runtime",
+				&column_name,
 				"column not found");
-	} else {
-		column_index=atoi(column_name.cstr());
+		return result;
+	} else { // nameless
+		char *error_pos;
+		const char *cstr=column_name.cstr();
+		int result=(int)strtol(cstr, &error_pos, 0);
+		if(*error_pos/*not EOS*/) {
+			result=-1;
+			if(bark)
+				throw Exception("parser.runtime",
+					&column_name,
+					"invalid column number");
+		}
+		return result;
+	}
+}
+
+const String *Table::item(int column) const {
+	if(valid(fcurrent)) {
 		const Array& row=at(fcurrent);
-		if(column_index<0 || column_index>=row.size())
-			return 0;
-		/*
-			request.exception().raise(0, 0,
-				&column_name, 
-				"table column index %d is out of range [0..%d]", 
-				column_index, row->size()-1);
-				*/
+		if(column>=0 && column<row.size()) // proper index?
+			return row.get_string(column);
 	}
+	return 0; // it's OK we don't have row|column, just return nothing
+}
+
+bool Table::locate(int column, const String& value) {
+	int scurrent=fcurrent;
+	for(fcurrent=0; fcurrent<size(); fcurrent++) {
+		const String *item_value=item(column);
+		if(item_value && *item_value==value)
+			return true;
+	}
+
+	fcurrent=scurrent;
+	return false;
+}
+
+bool Table::locate(const String& column, const String& value) {
+	return locate(column_name2index(column, true), value);
+}
 
-	return item(column_index);
+void Table::offset(bool absolute, int offset) {
+	if(size())
+		fcurrent=((absolute?0:fcurrent)+offset+size())%size();
 }