|
16
|
1 /*
|
|
36
|
2 This program is free software; you can redistribute it and/or modify
|
|
|
3 it under the terms of the GNU General Public License as published by
|
|
|
4 the Free Software Foundation; either version 2 of the License, or
|
|
|
5 (at your option) any later version.
|
|
16
|
6
|
|
36
|
7 You should have received a copy of the GNU General Public License
|
|
|
8 along with this program; if not, write to the Free Software Foundation,
|
|
|
9 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
|
|
16
|
10 */
|
|
|
11
|
|
|
12 #include "define.h"
|
|
|
13 #include "libpst.h"
|
|
|
14 #include <sys/types.h>
|
|
|
15 #include <string.h>
|
|
|
16 #include <stdio.h>
|
|
|
17
|
|
|
18 #ifndef _MSC_VER
|
|
|
19 #include <stdint.h>
|
|
|
20 #endif
|
|
|
21
|
|
|
22 #ifdef _MSC_VER
|
|
|
23 #define uint32_t unsigned int
|
|
|
24 #endif
|
|
|
25
|
|
|
26 #include "lzfu.h"
|
|
|
27
|
|
36
|
28 #define LZFU_COMPRESSED 0x75465a4c
|
|
|
29 #define LZFU_UNCOMPRESSED 0x414c454d
|
|
16
|
30
|
|
|
31 // initital dictionary
|
|
36
|
32 #define LZFU_INITDICT "{\\rtf1\\ansi\\mac\\deff0\\deftab720{\\fonttbl;}" \
|
|
|
33 "{\\f0\\fnil \\froman \\fswiss \\fmodern \\fscrip" \
|
|
|
34 "t \\fdecor MS Sans SerifSymbolArialTimes Ne" \
|
|
|
35 "w RomanCourier{\\colortbl\\red0\\green0\\blue0" \
|
|
|
36 "\r\n\\par \\pard\\plain\\f0\\fs20\\b\\i\\u\\tab" \
|
|
|
37 "\\tx"
|
|
16
|
38 // initial length of dictionary
|
|
|
39 #define LZFU_INITLENGTH 207
|
|
|
40
|
|
|
41 // header for compressed rtf
|
|
|
42 typedef struct _lzfuheader {
|
|
36
|
43 uint32_t cbSize;
|
|
|
44 uint32_t cbRawSize;
|
|
|
45 uint32_t dwMagic;
|
|
|
46 uint32_t dwCRC;
|
|
16
|
47 } lzfuheader;
|
|
|
48
|
|
|
49
|
|
36
|
50 /**
|
|
|
51 We always need to add 0x10 to the buffer offset because we need to skip past the header info
|
|
16
|
52 */
|
|
|
53
|
|
36
|
54 unsigned char* lzfu_decompress (unsigned char* rtfcomp, size_t *size) {
|
|
|
55 // the dictionary buffer
|
|
|
56 unsigned char dict[4096];
|
|
|
57 // the dictionary pointer
|
|
|
58 unsigned int dict_length=0;
|
|
|
59 // the header of the lzfu block
|
|
|
60 lzfuheader lzfuhdr;
|
|
|
61 // container for the data blocks
|
|
|
62 unsigned char flags;
|
|
|
63 // temp value for determining the bits in the flag
|
|
|
64 unsigned char flag_mask;
|
|
|
65 unsigned int i, in_size;
|
|
|
66 unsigned char *out_buf;
|
|
|
67 unsigned int out_ptr = 0;
|
|
16
|
68
|
|
36
|
69 memcpy(dict, LZFU_INITDICT, LZFU_INITLENGTH);
|
|
|
70 dict_length = LZFU_INITLENGTH;
|
|
|
71 memcpy(&lzfuhdr, rtfcomp, sizeof(lzfuhdr));
|
|
37
|
72 LE32_CPU(lzfuhdr.cbSize);
|
|
|
73 LE32_CPU(lzfuhdr.cbRawSize);
|
|
|
74 LE32_CPU(lzfuhdr.dwMagic);
|
|
|
75 LE32_CPU(lzfuhdr.dwCRC);
|
|
36
|
76 /* printf("total size: %d\n", lzfuhdr.cbSize+4);
|
|
|
77 printf("raw size : %d\n", lzfuhdr.cbRawSize);
|
|
|
78 printf("compressed: %s\n", (lzfuhdr.dwMagic == LZFU_COMPRESSED ? "yes" : "no"));
|
|
|
79 printf("CRC : %#x\n", lzfuhdr.dwCRC);
|
|
|
80 printf("\n");*/
|
|
|
81 out_buf = (unsigned char*)xmalloc(lzfuhdr.cbRawSize+20); //plus 4 cause we have 2x'}' and a \0
|
|
|
82 in_size = 0;
|
|
|
83 // we add plus one here cause when referencing an array, the index is always one less
|
|
|
84 // (ie, when accessing 2 element array, highest index is [1])
|
|
|
85 while (in_size+0x11 < lzfuhdr.cbSize) {
|
|
|
86 memcpy(&flags, &(rtfcomp[in_size+0x10]), 1);
|
|
|
87 in_size += 1;
|
|
16
|
88
|
|
36
|
89 flag_mask = 1;
|
|
|
90 while (flag_mask != 0 && in_size+0x11 < lzfuhdr.cbSize) {
|
|
|
91 if (flag_mask & flags) {
|
|
|
92 // read 2 bytes from input
|
|
|
93 unsigned short int blkhdr, offset, length;
|
|
|
94 memcpy(&blkhdr, &(rtfcomp[in_size+0x10]), 2);
|
|
|
95 LE16_CPU(blkhdr);
|
|
|
96 in_size += 2;
|
|
|
97 /* swap the upper and lower bytes of blkhdr */
|
|
|
98 blkhdr = (((blkhdr&0xFF00)>>8)+
|
|
|
99 ((blkhdr&0x00FF)<<8));
|
|
|
100 /* the offset is the first 24 bits of the 32 bit value */
|
|
|
101 offset = (blkhdr&0xFFF0)>>4;
|
|
|
102 /* the length of the dict entry are the last 8 bits */
|
|
|
103 length = (blkhdr&0x000F)+2;
|
|
|
104 // add the value we are about to print to the dictionary
|
|
|
105 for (i=0; i < length; i++) {
|
|
|
106 unsigned char c1;
|
|
|
107 c1 = dict[(offset+i)%4096];
|
|
|
108 dict[dict_length]=c1;
|
|
|
109 dict_length = (dict_length+1) % 4096;
|
|
|
110 out_buf[out_ptr++] = c1;
|
|
|
111 }
|
|
|
112 } else {
|
|
|
113 // uncompressed chunk (single byte)
|
|
|
114 char c1 = rtfcomp[in_size+0x10];
|
|
|
115 in_size ++;
|
|
|
116 dict[dict_length] = c1;
|
|
|
117 dict_length = (dict_length+1)%4096;
|
|
|
118 out_buf[out_ptr++] = c1;
|
|
|
119 }
|
|
|
120 flag_mask <<= 1;
|
|
|
121 }
|
|
16
|
122 }
|
|
36
|
123 // the compressed version doesn't appear to drop the closing braces onto the doc.
|
|
|
124 // we should do that
|
|
|
125 out_buf[out_ptr++] = '}';
|
|
|
126 out_buf[out_ptr++] = '}';
|
|
37
|
127 *size = out_ptr;
|
|
36
|
128 out_buf[out_ptr++] = '\0';
|
|
|
129 return out_buf;
|
|
16
|
130 }
|
