Copy the KDE 3.5 branch to branches/trinity for new KDE 3.5 features.

BUG:215923


git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdepim@1054174 283d02a7-25f6-0310-bc7c-ecb5cbfe19da

1 files changed, 178 insertions, 0 deletions

diff --git a/ktnef/lib/lzfu.cpp b/ktnef/lib/lzfu.cpp
new file mode 100644
index 000000000..ab4fa36a0
--- /dev/null
+++ b/ktnef/lib/lzfu.cpp
@@ -0,0 +1,178 @@
+/*
+    lzfu.cpp
+
+    Copyright (C) 2003 Michael Goffioul <kdeprint@swing.be>
+
+    This file is part of KTNEF, the KDE TNEF support library/program.
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software Foundation,
+    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
+ */
+
+#include "config.h"
+
+#include "lzfu.h"
+
+#ifdef HAVE_STDINT_H
+#include <stdint.h>
+#endif
+#include <sys/types.h>
+#include <string.h>
+#include <qiodevice.h>
+#include <stdio.h>
+
+//#define DO_DEBUG
+
+#define LZFU_COMPRESSED		0x75465a4c
+#define LZFU_UNCOMPRESSED	0x414c454d
+
+#define LZFU_INITDICT	"{\\rtf1\\ansi\\mac\\deff0\\deftab720{\\fonttbl;}" \
+						"{\\f0\\fnil \\froman \\fswiss \\fmodern \\fscrip" \
+						"t \\fdecor MS Sans SerifSymbolArialTimes Ne" \
+						"w RomanCourier{\\colortbl\\red0\\green0\\blue0" \
+						"\r\n\\par \\pard\\plain\\f0\\fs20\\b\\i\\u\\tab" \
+						"\\tx"
+#define LZFU_INITLENGTH 207
+
+typedef struct _lzfuheader {
+	uint32_t cbSize;
+	uint32_t cbRawSize;
+	uint32_t dwMagic;
+	uint32_t dwCRC;
+} lzfuheader;
+
+#define FLAG(f,n)	(f>>n)&0x1
+
+/*typedef struct _blockheader {
+	unsigned int offset:12;
+	unsigned int length:4;
+} blockheader;*/
+
+#define OFFSET(b) (b>>4)&0xFFF
+#define LENGTH(b) ((b&0xF)+2)
+
+int lzfu_decompress(QIODevice *input, QIODevice *output)
+{
+	unsigned char window[4096];
+	unsigned int wlength = 0, cursor = 0, ocursor = 0;
+	lzfuheader lzfuhdr;
+	//blockheader blkhdr;
+	uint16_t blkhdr;
+	char bFlags;
+	int nFlags;
+
+	memcpy(window, LZFU_INITDICT, LZFU_INITLENGTH);
+	wlength = LZFU_INITLENGTH;
+	if (input->readBlock((char*)&lzfuhdr, sizeof(lzfuhdr)) != sizeof(lzfuhdr))
+	{
+		fprintf(stderr, "unexpected eof, cannot read LZFU header\n");
+		return -1;
+	}
+	cursor += sizeof( lzfuhdr );
+#ifdef DO_DEBUG
+	fprintf(stdout, "total size : %d\n", lzfuhdr.cbSize+4);
+	fprintf(stdout, "raw size   : %d\n", lzfuhdr.cbRawSize);
+	fprintf(stdout, "compressed : %s\n", (lzfuhdr.dwMagic == LZFU_COMPRESSED ? "yes" : "no"));
+	fprintf(stdout, "CRC        : %x\n", lzfuhdr.dwCRC);
+	fprintf(stdout, "\n");
+#endif
+
+	while (cursor < lzfuhdr.cbSize+4 && ocursor < lzfuhdr.cbRawSize && !input->atEnd())
+	{
+		if (input->readBlock(&bFlags, 1) != 1)
+		{
+			fprintf(stderr, "unexpected eof, cannot read chunk flag\n");
+			return -1;
+		}
+		nFlags = 8;
+		cursor++;
+#ifdef DO_DEBUG
+		fprintf(stdout, "Flags : ");
+		for (int i=nFlags-1; i>=0; i--)
+			fprintf(stdout, "%d", FLAG(bFlags, i));
+		fprintf(stdout, "\n");
+#endif
+		for (int i=0; i<nFlags && ocursor<lzfuhdr.cbRawSize && cursor<lzfuhdr.cbSize+4; i++)
+		{
+			if (FLAG(bFlags, i))
+			{
+				// compressed chunck
+				char c1, c2;
+				if (input->readBlock(&c1, 1) != 1 || input->readBlock(&c2, 1) != 1)
+				{
+					fprintf(stderr, "unexpected eof, cannot read block header\n");
+					return -1;
+				}
+				blkhdr = c1;
+				blkhdr <<= 8;
+				blkhdr |= (0xFF&c2);
+				unsigned int offset = OFFSET(blkhdr), length = LENGTH(blkhdr);
+				cursor += 2;
+#ifdef DO_DEBUG
+				fprintf( stdout, "block : offset=%.4d [%d], length=%.2d (0x%04X)\n", OFFSET( blkhdr ), wlength, LENGTH( blkhdr ), blkhdr );
+#endif
+				//if (offset >= wlength)
+				//{
+				//	break;
+				//}
+#ifdef DO_DEBUG
+				fprintf( stdout, "block : " );
+#endif
+				for (unsigned int i=0; i<length; i++)
+				{
+					c1 = window[( offset+i ) % 4096];
+					//if (wlength < 4096)
+					//{
+						window[wlength] = c1;
+						wlength = ( wlength+1 ) % 4096;
+					//}
+#ifdef DO_DEBUG
+					if ( c1 == '\n' )
+						fprintf( stdout, "\nblock : " );
+					else
+						fprintf( stdout, "%c", c1 );
+#endif
+					output->putch(c1);
+					ocursor++;
+				}
+#ifdef DO_DEBUG
+				fprintf( stdout, "\n" );
+#endif
+			}
+			else
+			{
+				// uncompressed chunk (char)
+				signed char c = (char)input->getch();
+				if (c == -1)
+				{
+					if (!input->atEnd())
+					{
+						fprintf(stderr, "unexpected eof, cannot read character\n");
+						return -1;
+					}
+					break;
+				}
+#ifdef DO_DEBUG
+				fprintf( stdout, "char  : %c\n", c );
+#endif
+				cursor++;
+				//if (wlength < 4096)
+				//{
+					window[wlength] = c;
+					wlength = ( wlength+1 ) % 4096;
+				//}
+				output->putch(c);
+				ocursor++;
+			}
+		}
+
+	}
+
+	return 0;
+}