/src/lzma-fuzz/sdk/C/Ppmd7Enc.c
Line | Count | Source (jump to first uncovered line) |
1 | | /* Ppmd7Enc.c -- PPMdH Encoder |
2 | | 2017-04-03 : Igor Pavlov : Public domain |
3 | | This code is based on PPMd var.H (2001): Dmitry Shkarin : Public domain */ |
4 | | |
5 | | #include "Precomp.h" |
6 | | |
7 | | #include "Ppmd7.h" |
8 | | |
9 | 14.1M | #define kTopValue (1 << 24) |
10 | | |
11 | | void Ppmd7z_RangeEnc_Init(CPpmd7z_RangeEnc *p) |
12 | 1.61k | { |
13 | 1.61k | p->Low = 0; |
14 | 1.61k | p->Range = 0xFFFFFFFF; |
15 | 1.61k | p->Cache = 0; |
16 | 1.61k | p->CacheSize = 1; |
17 | 1.61k | } |
18 | | |
19 | | static void RangeEnc_ShiftLow(CPpmd7z_RangeEnc *p) |
20 | 5.67M | { |
21 | 5.67M | if ((UInt32)p->Low < (UInt32)0xFF000000 || (unsigned)(p->Low >> 32) != 0) |
22 | 5.65M | { |
23 | 5.65M | Byte temp = p->Cache; |
24 | 5.65M | do |
25 | 5.67M | { |
26 | 5.67M | IByteOut_Write(p->Stream, (Byte)(temp + (Byte)(p->Low >> 32))); |
27 | 5.67M | temp = 0xFF; |
28 | 5.67M | } |
29 | 5.67M | while (--p->CacheSize != 0); |
30 | 5.65M | p->Cache = (Byte)((UInt32)p->Low >> 24); |
31 | 5.65M | } |
32 | 5.67M | p->CacheSize++; |
33 | 5.67M | p->Low = (UInt32)p->Low << 8; |
34 | 5.67M | } |
35 | | |
36 | | static void RangeEnc_Encode(CPpmd7z_RangeEnc *p, UInt32 start, UInt32 size, UInt32 total) |
37 | 6.67M | { |
38 | 6.67M | p->Low += start * (p->Range /= total); |
39 | 6.67M | p->Range *= size; |
40 | 12.2M | while (p->Range < kTopValue) |
41 | 5.59M | { |
42 | 5.59M | p->Range <<= 8; |
43 | 5.59M | RangeEnc_ShiftLow(p); |
44 | 5.59M | } |
45 | 6.67M | } |
46 | | |
47 | | static void RangeEnc_EncodeBit_0(CPpmd7z_RangeEnc *p, UInt32 size0) |
48 | 1.50M | { |
49 | 1.50M | p->Range = (p->Range >> 14) * size0; |
50 | 1.52M | while (p->Range < kTopValue) |
51 | 24.0k | { |
52 | 24.0k | p->Range <<= 8; |
53 | 24.0k | RangeEnc_ShiftLow(p); |
54 | 24.0k | } |
55 | 1.50M | } |
56 | | |
57 | | static void RangeEnc_EncodeBit_1(CPpmd7z_RangeEnc *p, UInt32 size0) |
58 | 329k | { |
59 | 329k | UInt32 newBound = (p->Range >> 14) * size0; |
60 | 329k | p->Low += newBound; |
61 | 329k | p->Range -= newBound; |
62 | 376k | while (p->Range < kTopValue) |
63 | 47.3k | { |
64 | 47.3k | p->Range <<= 8; |
65 | 47.3k | RangeEnc_ShiftLow(p); |
66 | 47.3k | } |
67 | 329k | } |
68 | | |
69 | | void Ppmd7z_RangeEnc_FlushData(CPpmd7z_RangeEnc *p) |
70 | 1.61k | { |
71 | 1.61k | unsigned i; |
72 | 9.70k | for (i = 0; i < 5; i++) |
73 | 8.09k | RangeEnc_ShiftLow(p); |
74 | 1.61k | } |
75 | | |
76 | | |
77 | 147M | #define MASK(sym) ((signed char *)charMask)[sym] |
78 | | |
79 | | void Ppmd7_EncodeSymbol(CPpmd7 *p, CPpmd7z_RangeEnc *rc, int symbol) |
80 | 7.95M | { |
81 | 7.95M | size_t charMask[256 / sizeof(size_t)]; |
82 | 7.95M | if (p->MinContext->NumStats != 1) |
83 | 6.12M | { |
84 | 6.12M | CPpmd_State *s = Ppmd7_GetStats(p, p->MinContext); |
85 | 6.12M | UInt32 sum; |
86 | 6.12M | unsigned i; |
87 | 6.12M | if (s->Symbol == symbol) |
88 | 1.44M | { |
89 | 1.44M | RangeEnc_Encode(rc, 0, s->Freq, p->MinContext->SummFreq); |
90 | 1.44M | p->FoundState = s; |
91 | 1.44M | Ppmd7_Update1_0(p); |
92 | 1.44M | return; |
93 | 1.44M | } |
94 | 4.68M | p->PrevSuccess = 0; |
95 | 4.68M | sum = s->Freq; |
96 | 4.68M | i = p->MinContext->NumStats - 1; |
97 | 4.68M | do |
98 | 597M | { |
99 | 597M | if ((++s)->Symbol == symbol) |
100 | 4.53M | { |
101 | 4.53M | RangeEnc_Encode(rc, sum, s->Freq, p->MinContext->SummFreq); |
102 | 4.53M | p->FoundState = s; |
103 | 4.53M | Ppmd7_Update1(p); |
104 | 4.53M | return; |
105 | 4.53M | } |
106 | 592M | sum += s->Freq; |
107 | 592M | } |
108 | 592M | while (--i); |
109 | | |
110 | 152k | p->HiBitsFlag = p->HB2Flag[p->FoundState->Symbol]; |
111 | 152k | PPMD_SetAllBitsIn256Bytes(charMask); |
112 | 152k | MASK(s->Symbol) = 0; |
113 | 152k | i = p->MinContext->NumStats - 1; |
114 | 486k | do { MASK((--s)->Symbol) = 0; } while (--i); |
115 | 152k | RangeEnc_Encode(rc, sum, p->MinContext->SummFreq - sum, p->MinContext->SummFreq); |
116 | 152k | } |
117 | 1.83M | else |
118 | 1.83M | { |
119 | 1.83M | UInt16 *prob = Ppmd7_GetBinSumm(p); |
120 | 1.83M | CPpmd_State *s = Ppmd7Context_OneState(p->MinContext); |
121 | 1.83M | if (s->Symbol == symbol) |
122 | 1.50M | { |
123 | 1.50M | RangeEnc_EncodeBit_0(rc, *prob); |
124 | 1.50M | *prob = (UInt16)PPMD_UPDATE_PROB_0(*prob); |
125 | 1.50M | p->FoundState = s; |
126 | 1.50M | Ppmd7_UpdateBin(p); |
127 | 1.50M | return; |
128 | 1.50M | } |
129 | 329k | else |
130 | 329k | { |
131 | 329k | RangeEnc_EncodeBit_1(rc, *prob); |
132 | 329k | *prob = (UInt16)PPMD_UPDATE_PROB_1(*prob); |
133 | 329k | p->InitEsc = PPMD7_kExpEscape[*prob >> 10]; |
134 | 329k | PPMD_SetAllBitsIn256Bytes(charMask); |
135 | 329k | MASK(s->Symbol) = 0; |
136 | 329k | p->PrevSuccess = 0; |
137 | 329k | } |
138 | 1.83M | } |
139 | 481k | for (;;) |
140 | 549k | { |
141 | 549k | UInt32 escFreq; |
142 | 549k | CPpmd_See *see; |
143 | 549k | CPpmd_State *s; |
144 | 549k | UInt32 sum; |
145 | 549k | unsigned i, numMasked = p->MinContext->NumStats; |
146 | 549k | do |
147 | 769k | { |
148 | 769k | p->OrderFall++; |
149 | 769k | if (!p->MinContext->Suffix) |
150 | 0 | return; /* EndMarker (symbol = -1) */ |
151 | 769k | p->MinContext = Ppmd7_GetContext(p, p->MinContext->Suffix); |
152 | 769k | } |
153 | 769k | while (p->MinContext->NumStats == numMasked); |
154 | | |
155 | 549k | see = Ppmd7_MakeEscFreq(p, numMasked, &escFreq); |
156 | 549k | s = Ppmd7_GetStats(p, p->MinContext); |
157 | 549k | sum = 0; |
158 | 549k | i = p->MinContext->NumStats; |
159 | 549k | do |
160 | 40.9M | { |
161 | 40.9M | int cur = s->Symbol; |
162 | 40.9M | if (cur == symbol) |
163 | 481k | { |
164 | 481k | UInt32 low = sum; |
165 | 481k | CPpmd_State *s1 = s; |
166 | 481k | do |
167 | 65.6M | { |
168 | 65.6M | sum += (s->Freq & (int)(MASK(s->Symbol))); |
169 | 65.6M | s++; |
170 | 65.6M | } |
171 | 65.6M | while (--i); |
172 | 481k | RangeEnc_Encode(rc, low, s1->Freq, sum + escFreq); |
173 | 481k | Ppmd_See_Update(see); |
174 | 481k | p->FoundState = s1; |
175 | 481k | Ppmd7_Update2(p); |
176 | 481k | return; |
177 | 481k | } |
178 | 40.4M | sum += (s->Freq & (int)(MASK(cur))); |
179 | 40.4M | MASK(cur) = 0; |
180 | 40.4M | s++; |
181 | 40.4M | } |
182 | 40.4M | while (--i); |
183 | | |
184 | 68.3k | RangeEnc_Encode(rc, sum, escFreq, sum + escFreq); |
185 | 68.3k | see->Summ = (UInt16)(see->Summ + sum + escFreq); |
186 | 68.3k | } |
187 | 481k | } |