unpack zips in src to better compression

sources/z-tools/trunk/zview/zedit/char.c

@@ -0,0 +1,227 @@
+/*
+ *	Routines d'<27>dition de texte
+ *  D.B<>r<EFBFBD>ziat 1998
+ *	Insertion/Suppressions de caract<63>res
+ */
+
+#include <stdlib.h>
+#include <string.h>
+#include <stdio.h>
+#include <windom1.h>
+#include "../types2b.h"
+#include "../pdf/goo/gmem.h"
+#include "libtedit.h"
+
+/* extern function */
+extern EDLINE *line_new( char *buf);
+extern void line_add( EDIT *edit, EDLINE *line, int16 mode);
+extern void line_rem( EDIT *edit);
+
+
+/* prototype */
+void char_shift_right( char *buf);
+void char_shift_left( char *buf); 
+
+
+
+/* d<>calage vers la droite du buffer */
+
+void char_shift_right( char *buf) 
+{
+	int16 l = ( int16)strlen(buf);
+	
+	buf += l;
+	*(buf+1) = '\0';
+
+	while( l) 
+	{
+		*buf = *(buf-1);
+		buf --;
+		l --;
+	}
+}
+
+/* d<>calage vers la gauche du buffer */
+
+void char_shift_left( char *buf) 
+{
+	do 
+	{
+		*buf = *(buf+1);
+	} while (*buf++);
+}
+
+
+/* Insertion <20> la position courante 
+ * et incr<63>mentation de la position */
+
+void char_put( EDIT *edit, int16 c) 
+{
+	EDLINE *line;
+	int16 pos;
+	
+	if( edit -> top == NULL) 
+	{
+		edit -> top = line_new( NULL);
+		edit -> bot = edit -> cur.line = edit -> top;
+	}
+	
+	pos = edit->cur.row;
+	
+	if( c == NEWLINE) 
+	{
+		line = line_new( edit->cur.line->buf+pos);
+		edit->cur.line->buf[pos] = ENDLINE;
+		edit->cur.line->len = (int)strlen( edit->cur.line->buf);
+		line_add( edit, line, ED_CUR);
+		edit->cur.row = 0;
+		edit->cur.line = line;
+		edit->cur.index ++;
+	} 
+	else 
+	{
+		line = edit->cur.line;
+
+		if( ++line->len >= line->size) 
+		{
+			line->size += SIZE_REALLOC;
+			line->buf = ( char*)grealloc(line->buf,line->size);
+		}
+
+		char_shift_right( line->buf + pos);
+		line->buf[pos] = c;
+		edit->cur.row ++;
+	}
+}
+
+/* int char_get(void); */
+
+/*
+ * Efface le caract<63>re derri<72>re le curseur 
+ * retourne 1 si OK 0 si on a effacer une ligne
+ */
+
+int16 char_del( EDIT *edit) 
+{
+	if( edit -> top == NULL) 
+		return 0;
+
+	if( edit -> cur.row) 
+	{
+		edit -> cur.row --;
+		edit -> cur.line -> len --;
+		char_shift_left( edit -> cur.line->buf + edit -> cur.row);
+	} 
+	else 
+	{
+		EDLINE *line = edit -> cur.line;
+		int16 pos, tindex;
+		
+		if( line -> prev) 
+		{
+			/* Concat<61>ner la ligne pr<70>c<EFBFBD>dente avec la ligne courante */
+			pos = line -> prev -> len;
+			
+			/* Adapter la taille */
+			if( line -> prev -> size < line -> prev -> len + line -> len) 
+			{
+				line -> prev -> size = line -> prev -> len + line -> len + 1;
+				line -> prev -> buf = (char *) grealloc( line -> prev -> buf, line -> size);
+			}
+			
+			strcat( line -> prev -> buf, line -> buf);
+			line -> prev -> len = (int) strlen( line -> prev -> buf);
+			/* Effacer la ligne courante */
+			line = line -> prev;
+			tindex = edit -> cur.index;
+			line_rem( edit);
+			/* Pointer la ligne pr<70>c<EFBFBD>dente <20> la bonne position */
+			edit -> cur.row = pos;
+			edit -> cur.line = line;
+			edit -> cur.index = tindex-1;
+			return 0;
+		}
+	}
+	return 1;
+}
+
+/* Mouvement du curseur */
+
+int16 curs_left( EDIT *edit) 
+{
+	if( edit->cur.row ) 
+	{
+		edit->cur.row --;
+		edit->maxcur --;
+	} 
+	else if( edit->cur.line->prev) 
+	{
+		edit->cur.index --;
+		edit->cur.line = edit->cur.line->prev;
+		edit->maxcur = edit->cur.row = edit->cur.line->len;
+	} 
+	else
+		return 0;
+
+	return 1;
+}
+
+int16 curs_right( EDIT *edit) 
+{
+	int16 c = edit->cur.line->buf[edit->cur.row];
+	
+	if( c == '\0') 
+	{
+		if( edit->cur.line->next) 
+		{
+			edit->cur.index ++;
+			edit->cur.line = edit->cur.line->next;
+			edit->cur.row = 0;
+			edit->maxcur = 0;
+		} 
+		else 
+			return 0; /* fin du buffer */
+	} 
+	else
+ 	{
+		edit->cur.row ++;
+		edit->maxcur ++;
+	}
+	return 1;
+}
+
+int16 curs_up( EDIT *edit) 
+{
+	if( edit -> cur.line -> prev) 
+	{
+		edit -> cur.index --;
+		edit -> cur.line = edit -> cur.line -> prev;
+		edit -> cur.row = MAX( edit -> cur.row, edit -> maxcur);
+		edit -> cur.row = MIN( edit -> cur.row, edit -> cur.line -> len);
+		return 1;
+	}
+	return 0;
+}
+
+int16 curs_down( EDIT *edit) 
+{
+	if( edit -> cur.line -> next) 
+	{
+		edit -> cur.index ++;
+		edit -> cur.line = edit -> cur.line -> next;
+		edit -> cur.row = MAX( edit -> cur.row, edit -> maxcur);
+		edit -> cur.row = MIN( edit -> cur.row, edit -> cur.line -> len);
+		return 1;
+	}
+	return 0;
+}
+
+/* Insertion d'une chaine dans une ligne */
+
+void string_put( EDIT *edit, char *str) 
+{
+	for( ;*str;str++) 
+	{
+		char_put( edit, *str);
+	}
+}