--- parser3/src/main/pa_string.C	2001/03/21 14:06:46	1.47
+++ parser3/src/main/pa_string.C	2001/03/29 15:00:22	1.53
@@ -5,15 +5,16 @@
 
 	Author: Alexander Petrosyan <paf@design.ru> (http://design.ru/paf)
 
-	$Id: pa_string.C,v 1.47 2001/03/21 14:06:46 paf Exp $
+	$Id: pa_string.C,v 1.53 2001/03/29 15:00:22 paf Exp $
 */
 
-#include <string.h>
+#include "pa_config_includes.h"
 
 #include "pa_pool.h"
 #include "pa_string.h"
 #include "pa_hash.h"
 #include "pa_exception.h"
+#include "pa_common.h"
 
 // String
 
@@ -30,7 +31,7 @@ String::String(Pool& apool, const char *
 		if(tainted)
 			APPEND_TAINTED(src, 0, 0, 0);
 		else
-			APPEND(src, 0, 0, 0);
+			APPEND_CONST(src);
 }
 
 void String::expand() {
@@ -194,7 +195,7 @@ String& String::real_append(STRING_APPEN
 
 	append_here->item.ptr=src;
 	fsize+=append_here->item.size=size;
-	append_here->item.lang=tainted?UL_YES:UL_NO;
+	append_here->item.lang=lang;
 #ifndef NO_STRING_ORIGIN
 	append_here->item.origin.file=file;
 	append_here->item.origin.line=line;
@@ -287,11 +288,10 @@ int String::cmp(const String& src) const
 	return result;
 }
 
-bool String::operator == (const char* b_ptr) const {
-	size_t b_size=b_ptr?strlen(b_ptr):0;
-	if(size() != b_size)
-		return false;
+int String::cmp(const char* b_ptr, int& partial, size_t src_size) const {
+	size_t b_size=src_size?src_size:b_ptr?strlen(b_ptr):0;
 
+	partial=-1;
 	const Chunk *a_chunk=&head;
 	const Chunk::Row *a_row=a_chunk->rows;
 	int a_offset=0;
@@ -301,47 +301,89 @@ bool String::operator == (const char* b_
 	bool a_break=false;
 	bool b_break=false;
 	while(true) {
+		a_break=a_row==a_end;
+		if(a_break || b_break)
+			break;
+
 		int size_diff=
 			(a_row->item.size-a_offset)-
 			(b_size-b_offset);
 
 		if(size_diff==0) { // a has same size as b
-			if(memcmp(a_row->item.ptr+a_offset, b_ptr+b_offset, a_row->item.size-a_offset)!=0)
-				return false;
+			if(int result=memcmp(a_row->item.ptr+a_offset, b_ptr+b_offset, a_row->item.size-a_offset)!=0)
+				return result;
 			a_row++; a_countdown--; a_offset=0;
 			b_break=true;
 		} else if (size_diff>0) { // a longer
-			if(memcmp(a_row->item.ptr+a_offset, b_ptr+b_offset, b_size-b_offset)!=0)
-				return false;
+			if(int result=memcmp(a_row->item.ptr+a_offset, b_ptr+b_offset, b_size-b_offset)!=0)
+				return result;
 			a_offset+=b_size-b_offset;
 			b_break=true;
 		} else { // b longer
-			if(memcmp(a_row->item.ptr+a_offset, b_ptr+b_offset, a_row->item.size-a_offset)!=0)
-				return false;
+			if(int result=memcmp(a_row->item.ptr+a_offset, b_ptr+b_offset, a_row->item.size-a_offset)!=0)
+				return result;
 			b_offset+=a_row->item.size-a_offset;
 			a_row++; a_countdown--; a_offset=0;
 		}
 
-		a_break=a_row==a_end;
-		if(a_break || b_break)
-			break;
-
 		if(!a_countdown) {
 			a_chunk=a_row->link;
 			a_row=a_chunk->rows;
 			a_countdown=a_chunk->count;
 		}
 	}
-	return a_break==b_break;
+	if(a_break==b_break) // ended simultaneously
+		return partial=0;
+	else if(a_break) // first bytes equal, but a ended before b
+		return partial=1;
+	else
+		return partial=2;
 }
 
 #ifndef NO_STRING_ORIGIN
 const Origin& String::origin() const { 
 	if(!fused_rows)
 		THROW(0, 0, 
-		0,
-		"String::origin() of empty string called");
+			0,
+			"String::origin() of empty string called");
 	
-	return head.rows[0].item.origin; 
+	// determining origin by last appended piece
+	// because first one frequently constant. 
+	// ex: ^load[/file] "document_root" + "/file"
+	return append_here[-1].item.origin; 
 }
 #endif
+
+String& String::piece(size_t start, size_t finish) const {
+	start=max(0, start);
+	finish=min(size(), finish);
+
+	String& result=*NEW String(pool());
+
+	size_t pos=0;
+	const Chunk *chunk=&head; 
+	do {
+		const Chunk::Row *row=chunk->rows;
+		for(int i=0; i<chunk->count; pos+=row->item.size, i++, row++) {
+			if(row==append_here)
+				goto break2;
+
+			if(start>=pos) { // started now or already?
+				size_t item_finish=pos+row->item.size;
+				bool started=start < item_finish; // started now?
+				bool finished=finish < item_finish; // finished now?
+				size_t offset=started?start-pos:0;
+				size_t size=finished?finish-pos:row->item.size;
+				result.APPEND(
+					row->item.ptr+offset, size-offset, 
+					row->item.lang,
+					row->item.origin.file, row->item.origin.line);
+				if(finished)
+					goto break2;
+			}
+		}
+		chunk=row->link;
+	} while(chunk);
+break2:
+	return result;
+}
\ No newline at end of file