Coverage Report

Created: 2024-05-21 06:09

/src/c-blosc/internal-complibs/zstd-1.5.6/compress/zstd_opt.c
Line
Count
Source (jump to first uncovered line)
1
/*
2
 * Copyright (c) Meta Platforms, Inc. and affiliates.
3
 * All rights reserved.
4
 *
5
 * This source code is licensed under both the BSD-style license (found in the
6
 * LICENSE file in the root directory of this source tree) and the GPLv2 (found
7
 * in the COPYING file in the root directory of this source tree).
8
 * You may select, at your option, one of the above-listed licenses.
9
 */
10
11
#include "zstd_compress_internal.h"
12
#include "hist.h"
13
#include "zstd_opt.h"
14
15
#if !defined(ZSTD_EXCLUDE_BTLAZY2_BLOCK_COMPRESSOR) \
16
 || !defined(ZSTD_EXCLUDE_BTOPT_BLOCK_COMPRESSOR) \
17
 || !defined(ZSTD_EXCLUDE_BTULTRA_BLOCK_COMPRESSOR)
18
19
162M
#define ZSTD_LITFREQ_ADD    2   /* scaling factor for litFreq, so that frequencies adapt faster to new stats */
20
193M
#define ZSTD_MAX_PRICE     (1<<30)
21
22
99.1k
#define ZSTD_PREDEF_THRESHOLD 8   /* if srcSize < ZSTD_PREDEF_THRESHOLD, symbols' cost is assumed static, directly determined by pre-defined distributions */
23
24
25
/*-*************************************
26
*  Price functions for optimal parser
27
***************************************/
28
29
#if 0    /* approximation at bit level (for tests) */
30
#  define BITCOST_ACCURACY 0
31
#  define BITCOST_MULTIPLIER (1 << BITCOST_ACCURACY)
32
#  define WEIGHT(stat, opt) ((void)(opt), ZSTD_bitWeight(stat))
33
#elif 0  /* fractional bit accuracy (for tests) */
34
#  define BITCOST_ACCURACY 8
35
#  define BITCOST_MULTIPLIER (1 << BITCOST_ACCURACY)
36
#  define WEIGHT(stat,opt) ((void)(opt), ZSTD_fracWeight(stat))
37
#else    /* opt==approx, ultra==accurate */
38
151G
#  define BITCOST_ACCURACY 8
39
108G
#  define BITCOST_MULTIPLIER (1 << BITCOST_ACCURACY)
40
43.5G
#  define WEIGHT(stat,opt) ((opt) ? ZSTD_fracWeight(stat) : ZSTD_bitWeight(stat))
41
#endif
42
43
/* ZSTD_bitWeight() :
44
 * provide estimated "cost" of a stat in full bits only */
45
MEM_STATIC U32 ZSTD_bitWeight(U32 stat)
46
71.5M
{
47
71.5M
    return (ZSTD_highbit32(stat+1) * BITCOST_MULTIPLIER);
48
71.5M
}
49
50
/* ZSTD_fracWeight() :
51
 * provide fractional-bit "cost" of a stat,
52
 * using linear interpolation approximation */
53
MEM_STATIC U32 ZSTD_fracWeight(U32 rawStat)
54
43.4G
{
55
43.4G
    U32 const stat = rawStat + 1;
56
43.4G
    U32 const hb = ZSTD_highbit32(stat);
57
43.4G
    U32 const BWeight = hb * BITCOST_MULTIPLIER;
58
    /* Fweight was meant for "Fractional weight"
59
     * but it's effectively a value between 1 and 2
60
     * using fixed point arithmetic */
61
43.4G
    U32 const FWeight = (stat << BITCOST_ACCURACY) >> hb;
62
43.4G
    U32 const weight = BWeight + FWeight;
63
43.4G
    assert(hb + BITCOST_ACCURACY < 31);
64
43.4G
    return weight;
65
43.4G
}
66
67
#if (DEBUGLEVEL>=2)
68
/* debugging function,
69
 * @return price in bytes as fractional value
70
 * for debug messages only */
71
MEM_STATIC double ZSTD_fCost(int price)
72
{
73
    return (double)price / (BITCOST_MULTIPLIER*8);
74
}
75
#endif
76
77
static int ZSTD_compressedLiterals(optState_t const* const optPtr)
78
166M
{
79
166M
    return optPtr->literalCompressionMode != ZSTD_ps_disable;
80
166M
}
81
82
static void ZSTD_setBasePrices(optState_t* optPtr, int optLevel)
83
4.68M
{
84
4.68M
    if (ZSTD_compressedLiterals(optPtr))
85
4.68M
        optPtr->litSumBasePrice = WEIGHT(optPtr->litSum, optLevel);
86
4.68M
    optPtr->litLengthSumBasePrice = WEIGHT(optPtr->litLengthSum, optLevel);
87
4.68M
    optPtr->matchLengthSumBasePrice = WEIGHT(optPtr->matchLengthSum, optLevel);
88
4.68M
    optPtr->offCodeSumBasePrice = WEIGHT(optPtr->offCodeSum, optLevel);
89
4.68M
}
90
91
92
static U32 sum_u32(const unsigned table[], size_t nbElts)
93
276k
{
94
276k
    size_t n;
95
276k
    U32 total = 0;
96
19.1M
    for (n=0; n<nbElts; n++) {
97
18.8M
        total += table[n];
98
18.8M
    }
99
276k
    return total;
100
276k
}
101
102
typedef enum { base_0possible=0, base_1guaranteed=1 } base_directive_e;
103
104
static U32
105
ZSTD_downscaleStats(unsigned* table, U32 lastEltIndex, U32 shift, base_directive_e base1)
106
63.2k
{
107
63.2k
    U32 s, sum=0;
108
63.2k
    DEBUGLOG(5, "ZSTD_downscaleStats (nbElts=%u, shift=%u)",
109
63.2k
            (unsigned)lastEltIndex+1, (unsigned)shift );
110
63.2k
    assert(shift < 30);
111
16.1M
    for (s=0; s<lastEltIndex+1; s++) {
112
16.1M
        unsigned const base = base1 ? 1 : (table[s]>0);
113
16.1M
        unsigned const newStat = base + (table[s] >> shift);
114
16.1M
        sum += newStat;
115
16.1M
        table[s] = newStat;
116
16.1M
    }
117
63.2k
    return sum;
118
63.2k
}
119
120
/* ZSTD_scaleStats() :
121
 * reduce all elt frequencies in table if sum too large
122
 * return the resulting sum of elements */
123
static U32 ZSTD_scaleStats(unsigned* table, U32 lastEltIndex, U32 logTarget)
124
156k
{
125
156k
    U32 const prevsum = sum_u32(table, lastEltIndex+1);
126
156k
    U32 const factor = prevsum >> logTarget;
127
156k
    DEBUGLOG(5, "ZSTD_scaleStats (nbElts=%u, target=%u)", (unsigned)lastEltIndex+1, (unsigned)logTarget);
128
156k
    assert(logTarget < 30);
129
156k
    if (factor <= 1) return prevsum;
130
3.25k
    return ZSTD_downscaleStats(table, lastEltIndex, ZSTD_highbit32(factor), base_1guaranteed);
131
156k
}
132
133
/* ZSTD_rescaleFreqs() :
134
 * if first block (detected by optPtr->litLengthSum == 0) : init statistics
135
 *    take hints from dictionary if there is one
136
 *    and init from zero if there is none,
137
 *    using src for literals stats, and baseline stats for sequence symbols
138
 * otherwise downscale existing stats, to be used as seed for next block.
139
 */
140
static void
141
ZSTD_rescaleFreqs(optState_t* const optPtr,
142
            const BYTE* const src, size_t const srcSize,
143
                  int const optLevel)
144
99.1k
{
145
99.1k
    int const compressedLiterals = ZSTD_compressedLiterals(optPtr);
146
99.1k
    DEBUGLOG(5, "ZSTD_rescaleFreqs (srcSize=%u)", (unsigned)srcSize);
147
99.1k
    optPtr->priceType = zop_dynamic;
148
149
99.1k
    if (optPtr->litLengthSum == 0) {  /* no literals stats collected -> first block assumed -> init */
150
151
        /* heuristic: use pre-defined stats for too small inputs */
152
59.9k
        if (srcSize <= ZSTD_PREDEF_THRESHOLD) {
153
0
            DEBUGLOG(5, "srcSize <= %i : use predefined stats", ZSTD_PREDEF_THRESHOLD);
154
0
            optPtr->priceType = zop_predef;
155
0
        }
156
157
59.9k
        assert(optPtr->symbolCosts != NULL);
158
59.9k
        if (optPtr->symbolCosts->huf.repeatMode == HUF_repeat_valid) {
159
160
            /* huffman stats covering the full value set : table presumed generated by dictionary */
161
0
            optPtr->priceType = zop_dynamic;
162
163
0
            if (compressedLiterals) {
164
                /* generate literals statistics from huffman table */
165
0
                unsigned lit;
166
0
                assert(optPtr->litFreq != NULL);
167
0
                optPtr->litSum = 0;
168
0
                for (lit=0; lit<=MaxLit; lit++) {
169
0
                    U32 const scaleLog = 11;   /* scale to 2K */
170
0
                    U32 const bitCost = HUF_getNbBitsFromCTable(optPtr->symbolCosts->huf.CTable, lit);
171
0
                    assert(bitCost <= scaleLog);
172
0
                    optPtr->litFreq[lit] = bitCost ? 1 << (scaleLog-bitCost) : 1 /*minimum to calculate cost*/;
173
0
                    optPtr->litSum += optPtr->litFreq[lit];
174
0
            }   }
175
176
0
            {   unsigned ll;
177
0
                FSE_CState_t llstate;
178
0
                FSE_initCState(&llstate, optPtr->symbolCosts->fse.litlengthCTable);
179
0
                optPtr->litLengthSum = 0;
180
0
                for (ll=0; ll<=MaxLL; ll++) {
181
0
                    U32 const scaleLog = 10;   /* scale to 1K */
182
0
                    U32 const bitCost = FSE_getMaxNbBits(llstate.symbolTT, ll);
183
0
                    assert(bitCost < scaleLog);
184
0
                    optPtr->litLengthFreq[ll] = bitCost ? 1 << (scaleLog-bitCost) : 1 /*minimum to calculate cost*/;
185
0
                    optPtr->litLengthSum += optPtr->litLengthFreq[ll];
186
0
            }   }
187
188
0
            {   unsigned ml;
189
0
                FSE_CState_t mlstate;
190
0
                FSE_initCState(&mlstate, optPtr->symbolCosts->fse.matchlengthCTable);
191
0
                optPtr->matchLengthSum = 0;
192
0
                for (ml=0; ml<=MaxML; ml++) {
193
0
                    U32 const scaleLog = 10;
194
0
                    U32 const bitCost = FSE_getMaxNbBits(mlstate.symbolTT, ml);
195
0
                    assert(bitCost < scaleLog);
196
0
                    optPtr->matchLengthFreq[ml] = bitCost ? 1 << (scaleLog-bitCost) : 1 /*minimum to calculate cost*/;
197
0
                    optPtr->matchLengthSum += optPtr->matchLengthFreq[ml];
198
0
            }   }
199
200
0
            {   unsigned of;
201
0
                FSE_CState_t ofstate;
202
0
                FSE_initCState(&ofstate, optPtr->symbolCosts->fse.offcodeCTable);
203
0
                optPtr->offCodeSum = 0;
204
0
                for (of=0; of<=MaxOff; of++) {
205
0
                    U32 const scaleLog = 10;
206
0
                    U32 const bitCost = FSE_getMaxNbBits(ofstate.symbolTT, of);
207
0
                    assert(bitCost < scaleLog);
208
0
                    optPtr->offCodeFreq[of] = bitCost ? 1 << (scaleLog-bitCost) : 1 /*minimum to calculate cost*/;
209
0
                    optPtr->offCodeSum += optPtr->offCodeFreq[of];
210
0
            }   }
211
212
59.9k
        } else {  /* first block, no dictionary */
213
214
59.9k
            assert(optPtr->litFreq != NULL);
215
59.9k
            if (compressedLiterals) {
216
                /* base initial cost of literals on direct frequency within src */
217
59.9k
                unsigned lit = MaxLit;
218
59.9k
                HIST_count_simple(optPtr->litFreq, &lit, src, srcSize);   /* use raw first block to init statistics */
219
59.9k
                optPtr->litSum = ZSTD_downscaleStats(optPtr->litFreq, MaxLit, 8, base_0possible);
220
59.9k
            }
221
222
59.9k
            {   unsigned const baseLLfreqs[MaxLL+1] = {
223
59.9k
                    4, 2, 1, 1, 1, 1, 1, 1,
224
59.9k
                    1, 1, 1, 1, 1, 1, 1, 1,
225
59.9k
                    1, 1, 1, 1, 1, 1, 1, 1,
226
59.9k
                    1, 1, 1, 1, 1, 1, 1, 1,
227
59.9k
                    1, 1, 1, 1
228
59.9k
                };
229
59.9k
                ZSTD_memcpy(optPtr->litLengthFreq, baseLLfreqs, sizeof(baseLLfreqs));
230
59.9k
                optPtr->litLengthSum = sum_u32(baseLLfreqs, MaxLL+1);
231
59.9k
            }
232
233
59.9k
            {   unsigned ml;
234
3.23M
                for (ml=0; ml<=MaxML; ml++)
235
3.17M
                    optPtr->matchLengthFreq[ml] = 1;
236
59.9k
            }
237
59.9k
            optPtr->matchLengthSum = MaxML+1;
238
239
59.9k
            {   unsigned const baseOFCfreqs[MaxOff+1] = {
240
59.9k
                    6, 2, 1, 1, 2, 3, 4, 4,
241
59.9k
                    4, 3, 2, 1, 1, 1, 1, 1,
242
59.9k
                    1, 1, 1, 1, 1, 1, 1, 1,
243
59.9k
                    1, 1, 1, 1, 1, 1, 1, 1
244
59.9k
                };
245
59.9k
                ZSTD_memcpy(optPtr->offCodeFreq, baseOFCfreqs, sizeof(baseOFCfreqs));
246
59.9k
                optPtr->offCodeSum = sum_u32(baseOFCfreqs, MaxOff+1);
247
59.9k
            }
248
249
59.9k
        }
250
251
59.9k
    } else {   /* new block : scale down accumulated statistics */
252
253
39.1k
        if (compressedLiterals)
254
39.1k
            optPtr->litSum = ZSTD_scaleStats(optPtr->litFreq, MaxLit, 12);
255
39.1k
        optPtr->litLengthSum = ZSTD_scaleStats(optPtr->litLengthFreq, MaxLL, 11);
256
39.1k
        optPtr->matchLengthSum = ZSTD_scaleStats(optPtr->matchLengthFreq, MaxML, 11);
257
39.1k
        optPtr->offCodeSum = ZSTD_scaleStats(optPtr->offCodeFreq, MaxOff, 11);
258
39.1k
    }
259
260
99.1k
    ZSTD_setBasePrices(optPtr, optLevel);
261
99.1k
}
262
263
/* ZSTD_rawLiteralsCost() :
264
 * price of literals (only) in specified segment (which length can be 0).
265
 * does not include price of literalLength symbol */
266
static U32 ZSTD_rawLiteralsCost(const BYTE* const literals, U32 const litLength,
267
                                const optState_t* const optPtr,
268
                                int optLevel)
269
153M
{
270
153M
    DEBUGLOG(8, "ZSTD_rawLiteralsCost (%u literals)", litLength);
271
153M
    if (litLength == 0) return 0;
272
273
153M
    if (!ZSTD_compressedLiterals(optPtr))
274
0
        return (litLength << 3) * BITCOST_MULTIPLIER;  /* Uncompressed - 8 bytes per literal. */
275
276
153M
    if (optPtr->priceType == zop_predef)
277
0
        return (litLength*6) * BITCOST_MULTIPLIER;  /* 6 bit per literal - no statistic used */
278
279
    /* dynamic statistics */
280
153M
    {   U32 price = optPtr->litSumBasePrice * litLength;
281
153M
        U32 const litPriceMax = optPtr->litSumBasePrice - BITCOST_MULTIPLIER;
282
153M
        U32 u;
283
153M
        assert(optPtr->litSumBasePrice >= BITCOST_MULTIPLIER);
284
307M
        for (u=0; u < litLength; u++) {
285
153M
            U32 litPrice = WEIGHT(optPtr->litFreq[literals[u]], optLevel);
286
153M
            if (UNLIKELY(litPrice > litPriceMax)) litPrice = litPriceMax;
287
153M
            price -= litPrice;
288
153M
        }
289
153M
        return price;
290
153M
    }
291
153M
}
292
293
/* ZSTD_litLengthPrice() :
294
 * cost of literalLength symbol */
295
static U32 ZSTD_litLengthPrice(U32 const litLength, const optState_t* const optPtr, int optLevel)
296
547M
{
297
547M
    assert(litLength <= ZSTD_BLOCKSIZE_MAX);
298
547M
    if (optPtr->priceType == zop_predef)
299
0
        return WEIGHT(litLength, optLevel);
300
301
    /* ZSTD_LLcode() can't compute litLength price for sizes >= ZSTD_BLOCKSIZE_MAX
302
     * because it isn't representable in the zstd format.
303
     * So instead just pretend it would cost 1 bit more than ZSTD_BLOCKSIZE_MAX - 1.
304
     * In such a case, the block would be all literals.
305
     */
306
547M
    if (litLength == ZSTD_BLOCKSIZE_MAX)
307
0
        return BITCOST_MULTIPLIER + ZSTD_litLengthPrice(ZSTD_BLOCKSIZE_MAX - 1, optPtr, optLevel);
308
309
    /* dynamic statistics */
310
547M
    {   U32 const llCode = ZSTD_LLcode(litLength);
311
547M
        return (LL_bits[llCode] * BITCOST_MULTIPLIER)
312
547M
             + optPtr->litLengthSumBasePrice
313
547M
             - WEIGHT(optPtr->litLengthFreq[llCode], optLevel);
314
547M
    }
315
547M
}
316
317
/* ZSTD_getMatchPrice() :
318
 * Provides the cost of the match part (offset + matchLength) of a sequence.
319
 * Must be combined with ZSTD_fullLiteralsCost() to get the full cost of a sequence.
320
 * @offBase : sumtype, representing an offset or a repcode, and using numeric representation of ZSTD_storeSeq()
321
 * @optLevel: when <2, favors small offset for decompression speed (improved cache efficiency)
322
 */
323
FORCE_INLINE_TEMPLATE U32
324
ZSTD_getMatchPrice(U32 const offBase,
325
                   U32 const matchLength,
326
             const optState_t* const optPtr,
327
                   int const optLevel)
328
21.4G
{
329
21.4G
    U32 price;
330
21.4G
    U32 const offCode = ZSTD_highbit32(offBase);
331
21.4G
    U32 const mlBase = matchLength - MINMATCH;
332
21.4G
    assert(matchLength >= MINMATCH);
333
334
21.4G
    if (optPtr->priceType == zop_predef)  /* fixed scheme, does not use statistics */
335
0
        return WEIGHT(mlBase, optLevel)
336
0
             + ((16 + offCode) * BITCOST_MULTIPLIER); /* emulated offset cost */
337
338
    /* dynamic statistics */
339
21.4G
    price = (offCode * BITCOST_MULTIPLIER) + (optPtr->offCodeSumBasePrice - WEIGHT(optPtr->offCodeFreq[offCode], optLevel));
340
21.4G
    if ((optLevel<2) /*static*/ && offCode >= 20)
341
0
        price += (offCode-19)*2 * BITCOST_MULTIPLIER; /* handicap for long distance offsets, favor decompression speed */
342
343
    /* match Length */
344
21.4G
    {   U32 const mlCode = ZSTD_MLcode(mlBase);
345
21.4G
        price += (ML_bits[mlCode] * BITCOST_MULTIPLIER) + (optPtr->matchLengthSumBasePrice - WEIGHT(optPtr->matchLengthFreq[mlCode], optLevel));
346
21.4G
    }
347
348
21.4G
    price += BITCOST_MULTIPLIER / 5;   /* heuristic : make matches a bit more costly to favor less sequences -> faster decompression speed */
349
350
21.4G
    DEBUGLOG(8, "ZSTD_getMatchPrice(ml:%u) = %u", matchLength, price);
351
21.4G
    return price;
352
21.4G
}
353
354
/* ZSTD_updateStats() :
355
 * assumption : literals + litLength <= iend */
356
static void ZSTD_updateStats(optState_t* const optPtr,
357
                             U32 litLength, const BYTE* literals,
358
                             U32 offBase, U32 matchLength)
359
7.63M
{
360
    /* literals */
361
7.63M
    if (ZSTD_compressedLiterals(optPtr)) {
362
7.63M
        U32 u;
363
162M
        for (u=0; u < litLength; u++)
364
154M
            optPtr->litFreq[literals[u]] += ZSTD_LITFREQ_ADD;
365
7.63M
        optPtr->litSum += litLength*ZSTD_LITFREQ_ADD;
366
7.63M
    }
367
368
    /* literal Length */
369
7.63M
    {   U32 const llCode = ZSTD_LLcode(litLength);
370
7.63M
        optPtr->litLengthFreq[llCode]++;
371
7.63M
        optPtr->litLengthSum++;
372
7.63M
    }
373
374
    /* offset code : follows storeSeq() numeric representation */
375
7.63M
    {   U32 const offCode = ZSTD_highbit32(offBase);
376
7.63M
        assert(offCode <= MaxOff);
377
7.63M
        optPtr->offCodeFreq[offCode]++;
378
7.63M
        optPtr->offCodeSum++;
379
7.63M
    }
380
381
    /* match Length */
382
7.63M
    {   U32 const mlBase = matchLength - MINMATCH;
383
7.63M
        U32 const mlCode = ZSTD_MLcode(mlBase);
384
7.63M
        optPtr->matchLengthFreq[mlCode]++;
385
7.63M
        optPtr->matchLengthSum++;
386
7.63M
    }
387
7.63M
}
388
389
390
/* ZSTD_readMINMATCH() :
391
 * function safe only for comparisons
392
 * assumption : memPtr must be at least 4 bytes before end of buffer */
393
MEM_STATIC U32 ZSTD_readMINMATCH(const void* memPtr, U32 length)
394
1.73G
{
395
1.73G
    switch (length)
396
1.73G
    {
397
0
    default :
398
219M
    case 4 : return MEM_read32(memPtr);
399
1.51G
    case 3 : if (MEM_isLittleEndian())
400
1.51G
                return MEM_read32(memPtr)<<8;
401
0
             else
402
0
                return MEM_read32(memPtr)>>8;
403
1.73G
    }
404
1.73G
}
405
406
407
/* Update hashTable3 up to ip (excluded)
408
   Assumption : always within prefix (i.e. not within extDict) */
409
static
410
ZSTD_ALLOW_POINTER_OVERFLOW_ATTR
411
U32 ZSTD_insertAndFindFirstIndexHash3 (const ZSTD_matchState_t* ms,
412
                                       U32* nextToUpdate3,
413
                                       const BYTE* const ip)
414
189M
{
415
189M
    U32* const hashTable3 = ms->hashTable3;
416
189M
    U32 const hashLog3 = ms->hashLog3;
417
189M
    const BYTE* const base = ms->window.base;
418
189M
    U32 idx = *nextToUpdate3;
419
189M
    U32 const target = (U32)(ip - base);
420
189M
    size_t const hash3 = ZSTD_hash3Ptr(ip, hashLog3);
421
189M
    assert(hashLog3 > 0);
422
423
494M
    while(idx < target) {
424
304M
        hashTable3[ZSTD_hash3Ptr(base+idx, hashLog3)] = idx;
425
304M
        idx++;
426
304M
    }
427
428
189M
    *nextToUpdate3 = target;
429
189M
    return hashTable3[hash3];
430
189M
}
431
432
433
/*-*************************************
434
*  Binary Tree search
435
***************************************/
436
/** ZSTD_insertBt1() : add one or multiple positions to tree.
437
 * @param ip assumed <= iend-8 .
438
 * @param target The target of ZSTD_updateTree_internal() - we are filling to this position
439
 * @return : nb of positions added */
440
static
441
ZSTD_ALLOW_POINTER_OVERFLOW_ATTR
442
U32 ZSTD_insertBt1(
443
                const ZSTD_matchState_t* ms,
444
                const BYTE* const ip, const BYTE* const iend,
445
                U32 const target,
446
                U32 const mls, const int extDict)
447
13.2M
{
448
13.2M
    const ZSTD_compressionParameters* const cParams = &ms->cParams;
449
13.2M
    U32*   const hashTable = ms->hashTable;
450
13.2M
    U32    const hashLog = cParams->hashLog;
451
13.2M
    size_t const h  = ZSTD_hashPtr(ip, hashLog, mls);
452
13.2M
    U32*   const bt = ms->chainTable;
453
13.2M
    U32    const btLog  = cParams->chainLog - 1;
454
13.2M
    U32    const btMask = (1 << btLog) - 1;
455
13.2M
    U32 matchIndex = hashTable[h];
456
13.2M
    size_t commonLengthSmaller=0, commonLengthLarger=0;
457
13.2M
    const BYTE* const base = ms->window.base;
458
13.2M
    const BYTE* const dictBase = ms->window.dictBase;
459
13.2M
    const U32 dictLimit = ms->window.dictLimit;
460
13.2M
    const BYTE* const dictEnd = dictBase + dictLimit;
461
13.2M
    const BYTE* const prefixStart = base + dictLimit;
462
13.2M
    const BYTE* match;
463
13.2M
    const U32 curr = (U32)(ip-base);
464
13.2M
    const U32 btLow = btMask >= curr ? 0 : curr - btMask;
465
13.2M
    U32* smallerPtr = bt + 2*(curr&btMask);
466
13.2M
    U32* largerPtr  = smallerPtr + 1;
467
13.2M
    U32 dummy32;   /* to be nullified at the end */
468
    /* windowLow is based on target because
469
     * we only need positions that will be in the window at the end of the tree update.
470
     */
471
13.2M
    U32 const windowLow = ZSTD_getLowestMatchIndex(ms, target, cParams->windowLog);
472
13.2M
    U32 matchEndIdx = curr+8+1;
473
13.2M
    size_t bestLength = 8;
474
13.2M
    U32 nbCompares = 1U << cParams->searchLog;
475
#ifdef ZSTD_C_PREDICT
476
    U32 predictedSmall = *(bt + 2*((curr-1)&btMask) + 0);
477
    U32 predictedLarge = *(bt + 2*((curr-1)&btMask) + 1);
478
    predictedSmall += (predictedSmall>0);
479
    predictedLarge += (predictedLarge>0);
480
#endif /* ZSTD_C_PREDICT */
481
482
13.2M
    DEBUGLOG(8, "ZSTD_insertBt1 (%u)", curr);
483
484
13.2M
    assert(curr <= target);
485
13.2M
    assert(ip <= iend-8);   /* required for h calculation */
486
13.2M
    hashTable[h] = curr;   /* Update Hash Table */
487
488
13.2M
    assert(windowLow > 0);
489
80.4M
    for (; nbCompares && (matchIndex >= windowLow); --nbCompares) {
490
67.3M
        U32* const nextPtr = bt + 2*(matchIndex & btMask);
491
67.3M
        size_t matchLength = MIN(commonLengthSmaller, commonLengthLarger);   /* guaranteed minimum nb of common bytes */
492
67.3M
        assert(matchIndex < curr);
493
494
#ifdef ZSTD_C_PREDICT   /* note : can create issues when hlog small <= 11 */
495
        const U32* predictPtr = bt + 2*((matchIndex-1) & btMask);   /* written this way, as bt is a roll buffer */
496
        if (matchIndex == predictedSmall) {
497
            /* no need to check length, result known */
498
            *smallerPtr = matchIndex;
499
            if (matchIndex <= btLow) { smallerPtr=&dummy32; break; }   /* beyond tree size, stop the search */
500
            smallerPtr = nextPtr+1;               /* new "smaller" => larger of match */
501
            matchIndex = nextPtr[1];              /* new matchIndex larger than previous (closer to current) */
502
            predictedSmall = predictPtr[1] + (predictPtr[1]>0);
503
            continue;
504
        }
505
        if (matchIndex == predictedLarge) {
506
            *largerPtr = matchIndex;
507
            if (matchIndex <= btLow) { largerPtr=&dummy32; break; }   /* beyond tree size, stop the search */
508
            largerPtr = nextPtr;
509
            matchIndex = nextPtr[0];
510
            predictedLarge = predictPtr[0] + (predictPtr[0]>0);
511
            continue;
512
        }
513
#endif
514
515
67.3M
        if (!extDict || (matchIndex+matchLength >= dictLimit)) {
516
67.3M
            assert(matchIndex+matchLength >= dictLimit);   /* might be wrong if actually extDict */
517
67.3M
            match = base + matchIndex;
518
67.3M
            matchLength += ZSTD_count(ip+matchLength, match+matchLength, iend);
519
67.3M
        } else {
520
0
            match = dictBase + matchIndex;
521
0
            matchLength += ZSTD_count_2segments(ip+matchLength, match+matchLength, iend, dictEnd, prefixStart);
522
0
            if (matchIndex+matchLength >= dictLimit)
523
0
                match = base + matchIndex;   /* to prepare for next usage of match[matchLength] */
524
0
        }
525
526
67.3M
        if (matchLength > bestLength) {
527
14.2M
            bestLength = matchLength;
528
14.2M
            if (matchLength > matchEndIdx - matchIndex)
529
263k
                matchEndIdx = matchIndex + (U32)matchLength;
530
14.2M
        }
531
532
67.3M
        if (ip+matchLength == iend) {   /* equal : no way to know if inf or sup */
533
150k
            break;   /* drop , to guarantee consistency ; miss a bit of compression, but other solutions can corrupt tree */
534
150k
        }
535
536
67.2M
        if (match[matchLength] < ip[matchLength]) {  /* necessarily within buffer */
537
            /* match is smaller than current */
538
20.9M
            *smallerPtr = matchIndex;             /* update smaller idx */
539
20.9M
            commonLengthSmaller = matchLength;    /* all smaller will now have at least this guaranteed common length */
540
20.9M
            if (matchIndex <= btLow) { smallerPtr=&dummy32; break; }   /* beyond tree size, stop searching */
541
20.9M
            smallerPtr = nextPtr+1;               /* new "candidate" => larger than match, which was smaller than target */
542
20.9M
            matchIndex = nextPtr[1];              /* new matchIndex, larger than previous and closer to current */
543
46.2M
        } else {
544
            /* match is larger than current */
545
46.2M
            *largerPtr = matchIndex;
546
46.2M
            commonLengthLarger = matchLength;
547
46.2M
            if (matchIndex <= btLow) { largerPtr=&dummy32; break; }   /* beyond tree size, stop searching */
548
46.2M
            largerPtr = nextPtr;
549
46.2M
            matchIndex = nextPtr[0];
550
46.2M
    }   }
551
552
13.2M
    *smallerPtr = *largerPtr = 0;
553
13.2M
    {   U32 positions = 0;
554
13.2M
        if (bestLength > 384) positions = MIN(192, (U32)(bestLength - 384));   /* speed optimization */
555
13.2M
        assert(matchEndIdx > curr + 8);
556
13.2M
        return MAX(positions, matchEndIdx - (curr + 8));
557
13.2M
    }
558
13.2M
}
559
560
FORCE_INLINE_TEMPLATE
561
ZSTD_ALLOW_POINTER_OVERFLOW_ATTR
562
void ZSTD_updateTree_internal(
563
                ZSTD_matchState_t* ms,
564
                const BYTE* const ip, const BYTE* const iend,
565
                const U32 mls, const ZSTD_dictMode_e dictMode)
566
306M
{
567
306M
    const BYTE* const base = ms->window.base;
568
306M
    U32 const target = (U32)(ip - base);
569
306M
    U32 idx = ms->nextToUpdate;
570
306M
    DEBUGLOG(7, "ZSTD_updateTree_internal, from %u to %u  (dictMode:%u)",
571
306M
                idx, target, dictMode);
572
573
319M
    while(idx < target) {
574
13.2M
        U32 const forward = ZSTD_insertBt1(ms, base+idx, iend, target, mls, dictMode == ZSTD_extDict);
575
13.2M
        assert(idx < (U32)(idx + forward));
576
13.2M
        idx += forward;
577
13.2M
    }
578
306M
    assert((size_t)(ip - base) <= (size_t)(U32)(-1));
579
306M
    assert((size_t)(iend - base) <= (size_t)(U32)(-1));
580
306M
    ms->nextToUpdate = target;
581
306M
}
582
583
0
void ZSTD_updateTree(ZSTD_matchState_t* ms, const BYTE* ip, const BYTE* iend) {
584
0
    ZSTD_updateTree_internal(ms, ip, iend, ms->cParams.minMatch, ZSTD_noDict);
585
0
}
586
587
FORCE_INLINE_TEMPLATE
588
ZSTD_ALLOW_POINTER_OVERFLOW_ATTR
589
U32
590
ZSTD_insertBtAndGetAllMatches (
591
                ZSTD_match_t* matches,  /* store result (found matches) in this table (presumed large enough) */
592
                ZSTD_matchState_t* ms,
593
                U32* nextToUpdate3,
594
                const BYTE* const ip, const BYTE* const iLimit,
595
                const ZSTD_dictMode_e dictMode,
596
                const U32 rep[ZSTD_REP_NUM],
597
                const U32 ll0,  /* tells if associated literal length is 0 or not. This value must be 0 or 1 */
598
                const U32 lengthToBeat,
599
                const U32 mls /* template */)
600
306M
{
601
306M
    const ZSTD_compressionParameters* const cParams = &ms->cParams;
602
306M
    U32 const sufficient_len = MIN(cParams->targetLength, ZSTD_OPT_NUM -1);
603
306M
    const BYTE* const base = ms->window.base;
604
306M
    U32 const curr = (U32)(ip-base);
605
306M
    U32 const hashLog = cParams->hashLog;
606
306M
    U32 const minMatch = (mls==3) ? 3 : 4;
607
306M
    U32* const hashTable = ms->hashTable;
608
306M
    size_t const h  = ZSTD_hashPtr(ip, hashLog, mls);
609
306M
    U32 matchIndex  = hashTable[h];
610
306M
    U32* const bt   = ms->chainTable;
611
306M
    U32 const btLog = cParams->chainLog - 1;
612
306M
    U32 const btMask= (1U << btLog) - 1;
613
306M
    size_t commonLengthSmaller=0, commonLengthLarger=0;
614
306M
    const BYTE* const dictBase = ms->window.dictBase;
615
306M
    U32 const dictLimit = ms->window.dictLimit;
616
306M
    const BYTE* const dictEnd = dictBase + dictLimit;
617
306M
    const BYTE* const prefixStart = base + dictLimit;
618
306M
    U32 const btLow = (btMask >= curr) ? 0 : curr - btMask;
619
306M
    U32 const windowLow = ZSTD_getLowestMatchIndex(ms, curr, cParams->windowLog);
620
306M
    U32 const matchLow = windowLow ? windowLow : 1;
621
306M
    U32* smallerPtr = bt + 2*(curr&btMask);
622
306M
    U32* largerPtr  = bt + 2*(curr&btMask) + 1;
623
306M
    U32 matchEndIdx = curr+8+1;   /* farthest referenced position of any match => detects repetitive patterns */
624
306M
    U32 dummy32;   /* to be nullified at the end */
625
306M
    U32 mnum = 0;
626
306M
    U32 nbCompares = 1U << cParams->searchLog;
627
628
306M
    const ZSTD_matchState_t* dms    = dictMode == ZSTD_dictMatchState ? ms->dictMatchState : NULL;
629
306M
    const ZSTD_compressionParameters* const dmsCParams =
630
306M
                                      dictMode == ZSTD_dictMatchState ? &dms->cParams : NULL;
631
306M
    const BYTE* const dmsBase       = dictMode == ZSTD_dictMatchState ? dms->window.base : NULL;
632
306M
    const BYTE* const dmsEnd        = dictMode == ZSTD_dictMatchState ? dms->window.nextSrc : NULL;
633
306M
    U32         const dmsHighLimit  = dictMode == ZSTD_dictMatchState ? (U32)(dmsEnd - dmsBase) : 0;
634
306M
    U32         const dmsLowLimit   = dictMode == ZSTD_dictMatchState ? dms->window.lowLimit : 0;
635
306M
    U32         const dmsIndexDelta = dictMode == ZSTD_dictMatchState ? windowLow - dmsHighLimit : 0;
636
306M
    U32         const dmsHashLog    = dictMode == ZSTD_dictMatchState ? dmsCParams->hashLog : hashLog;
637
306M
    U32         const dmsBtLog      = dictMode == ZSTD_dictMatchState ? dmsCParams->chainLog - 1 : btLog;
638
306M
    U32         const dmsBtMask     = dictMode == ZSTD_dictMatchState ? (1U << dmsBtLog) - 1 : 0;
639
306M
    U32         const dmsBtLow      = dictMode == ZSTD_dictMatchState && dmsBtMask < dmsHighLimit - dmsLowLimit ? dmsHighLimit - dmsBtMask : dmsLowLimit;
640
641
306M
    size_t bestLength = lengthToBeat-1;
642
306M
    DEBUGLOG(8, "ZSTD_insertBtAndGetAllMatches: current=%u", curr);
643
644
    /* check repCode */
645
306M
    assert(ll0 <= 1);   /* necessarily 1 or 0 */
646
306M
    {   U32 const lastR = ZSTD_REP_NUM + ll0;
647
306M
        U32 repCode;
648
1.22G
        for (repCode = ll0; repCode < lastR; repCode++) {
649
919M
            U32 const repOffset = (repCode==ZSTD_REP_NUM) ? (rep[0] - 1) : rep[repCode];
650
919M
            U32 const repIndex = curr - repOffset;
651
919M
            U32 repLen = 0;
652
919M
            assert(curr >= dictLimit);
653
919M
            if (repOffset-1 /* intentional overflow, discards 0 and -1 */ < curr-dictLimit) {  /* equivalent to `curr > repIndex >= dictLimit` */
654
                /* We must validate the repcode offset because when we're using a dictionary the
655
                 * valid offset range shrinks when the dictionary goes out of bounds.
656
                 */
657
869M
                if ((repIndex >= windowLow) & (ZSTD_readMINMATCH(ip, minMatch) == ZSTD_readMINMATCH(ip - repOffset, minMatch))) {
658
167M
                    repLen = (U32)ZSTD_count(ip+minMatch, ip+minMatch-repOffset, iLimit) + minMatch;
659
167M
                }
660
869M
            } else {  /* repIndex < dictLimit || repIndex >= curr */
661
50.0M
                const BYTE* const repMatch = dictMode == ZSTD_dictMatchState ?
662
0
                                             dmsBase + repIndex - dmsIndexDelta :
663
50.0M
                                             dictBase + repIndex;
664
50.0M
                assert(curr >= windowLow);
665
50.0M
                if ( dictMode == ZSTD_extDict
666
50.0M
                  && ( ((repOffset-1) /*intentional overflow*/ < curr - windowLow)  /* equivalent to `curr > repIndex >= windowLow` */
667
0
                     & (((U32)((dictLimit-1) - repIndex) >= 3) ) /* intentional overflow : do not test positions overlapping 2 memory segments */)
668
50.0M
                  && (ZSTD_readMINMATCH(ip, minMatch) == ZSTD_readMINMATCH(repMatch, minMatch)) ) {
669
0
                    repLen = (U32)ZSTD_count_2segments(ip+minMatch, repMatch+minMatch, iLimit, dictEnd, prefixStart) + minMatch;
670
0
                }
671
50.0M
                if (dictMode == ZSTD_dictMatchState
672
50.0M
                  && ( ((repOffset-1) /*intentional overflow*/ < curr - (dmsLowLimit + dmsIndexDelta))  /* equivalent to `curr > repIndex >= dmsLowLimit` */
673
0
                     & ((U32)((dictLimit-1) - repIndex) >= 3) ) /* intentional overflow : do not test positions overlapping 2 memory segments */
674
50.0M
                  && (ZSTD_readMINMATCH(ip, minMatch) == ZSTD_readMINMATCH(repMatch, minMatch)) ) {
675
0
                    repLen = (U32)ZSTD_count_2segments(ip+minMatch, repMatch+minMatch, iLimit, dmsEnd, prefixStart) + minMatch;
676
0
            }   }
677
            /* save longer solution */
678
919M
            if (repLen > bestLength) {
679
86.5M
                DEBUGLOG(8, "found repCode %u (ll0:%u, offset:%u) of length %u",
680
86.5M
                            repCode, ll0, repOffset, repLen);
681
86.5M
                bestLength = repLen;
682
86.5M
                matches[mnum].off = REPCODE_TO_OFFBASE(repCode - ll0 + 1);  /* expect value between 1 and 3 */
683
86.5M
                matches[mnum].len = (U32)repLen;
684
86.5M
                mnum++;
685
86.5M
                if ( (repLen > sufficient_len)
686
86.5M
                   | (ip+repLen == iLimit) ) {  /* best possible */
687
198k
                    return mnum;
688
198k
    }   }   }   }
689
690
    /* HC3 match finder */
691
306M
    if ((mls == 3) /*static*/ && (bestLength < mls)) {
692
189M
        U32 const matchIndex3 = ZSTD_insertAndFindFirstIndexHash3(ms, nextToUpdate3, ip);
693
189M
        if ((matchIndex3 >= matchLow)
694
189M
          & (curr - matchIndex3 < (1<<18)) /*heuristic : longer distance likely too expensive*/ ) {
695
83.5M
            size_t mlen;
696
83.5M
            if ((dictMode == ZSTD_noDict) /*static*/ || (dictMode == ZSTD_dictMatchState) /*static*/ || (matchIndex3 >= dictLimit)) {
697
83.5M
                const BYTE* const match = base + matchIndex3;
698
83.5M
                mlen = ZSTD_count(ip, match, iLimit);
699
83.5M
            } else {
700
0
                const BYTE* const match = dictBase + matchIndex3;
701
0
                mlen = ZSTD_count_2segments(ip, match, iLimit, dictEnd, prefixStart);
702
0
            }
703
704
            /* save best solution */
705
83.5M
            if (mlen >= mls /* == 3 > bestLength */) {
706
29.9M
                DEBUGLOG(8, "found small match with hlog3, of length %u",
707
29.9M
                            (U32)mlen);
708
29.9M
                bestLength = mlen;
709
29.9M
                assert(curr > matchIndex3);
710
29.9M
                assert(mnum==0);  /* no prior solution */
711
29.9M
                matches[0].off = OFFSET_TO_OFFBASE(curr - matchIndex3);
712
29.9M
                matches[0].len = (U32)mlen;
713
29.9M
                mnum = 1;
714
29.9M
                if ( (mlen > sufficient_len) |
715
29.9M
                     (ip+mlen == iLimit) ) {  /* best possible length */
716
10.9k
                    ms->nextToUpdate = curr+1;  /* skip insertion */
717
10.9k
                    return 1;
718
10.9k
        }   }   }
719
        /* no dictMatchState lookup: dicts don't have a populated HC3 table */
720
189M
    }  /* if (mls == 3) */
721
722
306M
    hashTable[h] = curr;   /* Update Hash Table */
723
724
8.09G
    for (; nbCompares && (matchIndex >= matchLow); --nbCompares) {
725
7.78G
        U32* const nextPtr = bt + 2*(matchIndex & btMask);
726
7.78G
        const BYTE* match;
727
7.78G
        size_t matchLength = MIN(commonLengthSmaller, commonLengthLarger);   /* guaranteed minimum nb of common bytes */
728
7.78G
        assert(curr > matchIndex);
729
730
7.78G
        if ((dictMode == ZSTD_noDict) || (dictMode == ZSTD_dictMatchState) || (matchIndex+matchLength >= dictLimit)) {
731
7.78G
            assert(matchIndex+matchLength >= dictLimit);  /* ensure the condition is correct when !extDict */
732
7.78G
            match = base + matchIndex;
733
7.78G
            if (matchIndex >= dictLimit) assert(memcmp(match, ip, matchLength) == 0);  /* ensure early section of match is equal as expected */
734
7.78G
            matchLength += ZSTD_count(ip+matchLength, match+matchLength, iLimit);
735
7.78G
        } else {
736
0
            match = dictBase + matchIndex;
737
0
            assert(memcmp(match, ip, matchLength) == 0);  /* ensure early section of match is equal as expected */
738
0
            matchLength += ZSTD_count_2segments(ip+matchLength, match+matchLength, iLimit, dictEnd, prefixStart);
739
0
            if (matchIndex+matchLength >= dictLimit)
740
0
                match = base + matchIndex;   /* prepare for match[matchLength] read */
741
0
        }
742
743
7.78G
        if (matchLength > bestLength) {
744
88.7M
            DEBUGLOG(8, "found match of length %u at distance %u (offBase=%u)",
745
88.7M
                    (U32)matchLength, curr - matchIndex, OFFSET_TO_OFFBASE(curr - matchIndex));
746
88.7M
            assert(matchEndIdx > matchIndex);
747
88.7M
            if (matchLength > matchEndIdx - matchIndex)
748
224k
                matchEndIdx = matchIndex + (U32)matchLength;
749
88.7M
            bestLength = matchLength;
750
88.7M
            matches[mnum].off = OFFSET_TO_OFFBASE(curr - matchIndex);
751
88.7M
            matches[mnum].len = (U32)matchLength;
752
88.7M
            mnum++;
753
88.7M
            if ( (matchLength > ZSTD_OPT_NUM)
754
88.7M
               | (ip+matchLength == iLimit) /* equal : no way to know if inf or sup */) {
755
31.4k
                if (dictMode == ZSTD_dictMatchState) nbCompares = 0; /* break should also skip searching dms */
756
31.4k
                break; /* drop, to preserve bt consistency (miss a little bit of compression) */
757
31.4k
        }   }
758
759
7.78G
        if (match[matchLength] < ip[matchLength]) {
760
            /* match smaller than current */
761
4.62G
            *smallerPtr = matchIndex;             /* update smaller idx */
762
4.62G
            commonLengthSmaller = matchLength;    /* all smaller will now have at least this guaranteed common length */
763
4.62G
            if (matchIndex <= btLow) { smallerPtr=&dummy32; break; }   /* beyond tree size, stop the search */
764
4.62G
            smallerPtr = nextPtr+1;               /* new candidate => larger than match, which was smaller than current */
765
4.62G
            matchIndex = nextPtr[1];              /* new matchIndex, larger than previous, closer to current */
766
4.62G
        } else {
767
3.16G
            *largerPtr = matchIndex;
768
3.16G
            commonLengthLarger = matchLength;
769
3.16G
            if (matchIndex <= btLow) { largerPtr=&dummy32; break; }   /* beyond tree size, stop the search */
770
3.16G
            largerPtr = nextPtr;
771
3.16G
            matchIndex = nextPtr[0];
772
3.16G
    }   }
773
774
306M
    *smallerPtr = *largerPtr = 0;
775
776
306M
    assert(nbCompares <= (1U << ZSTD_SEARCHLOG_MAX)); /* Check we haven't underflowed. */
777
306M
    if (dictMode == ZSTD_dictMatchState && nbCompares) {
778
0
        size_t const dmsH = ZSTD_hashPtr(ip, dmsHashLog, mls);
779
0
        U32 dictMatchIndex = dms->hashTable[dmsH];
780
0
        const U32* const dmsBt = dms->chainTable;
781
0
        commonLengthSmaller = commonLengthLarger = 0;
782
0
        for (; nbCompares && (dictMatchIndex > dmsLowLimit); --nbCompares) {
783
0
            const U32* const nextPtr = dmsBt + 2*(dictMatchIndex & dmsBtMask);
784
0
            size_t matchLength = MIN(commonLengthSmaller, commonLengthLarger);   /* guaranteed minimum nb of common bytes */
785
0
            const BYTE* match = dmsBase + dictMatchIndex;
786
0
            matchLength += ZSTD_count_2segments(ip+matchLength, match+matchLength, iLimit, dmsEnd, prefixStart);
787
0
            if (dictMatchIndex+matchLength >= dmsHighLimit)
788
0
                match = base + dictMatchIndex + dmsIndexDelta;   /* to prepare for next usage of match[matchLength] */
789
790
0
            if (matchLength > bestLength) {
791
0
                matchIndex = dictMatchIndex + dmsIndexDelta;
792
0
                DEBUGLOG(8, "found dms match of length %u at distance %u (offBase=%u)",
793
0
                        (U32)matchLength, curr - matchIndex, OFFSET_TO_OFFBASE(curr - matchIndex));
794
0
                if (matchLength > matchEndIdx - matchIndex)
795
0
                    matchEndIdx = matchIndex + (U32)matchLength;
796
0
                bestLength = matchLength;
797
0
                matches[mnum].off = OFFSET_TO_OFFBASE(curr - matchIndex);
798
0
                matches[mnum].len = (U32)matchLength;
799
0
                mnum++;
800
0
                if ( (matchLength > ZSTD_OPT_NUM)
801
0
                   | (ip+matchLength == iLimit) /* equal : no way to know if inf or sup */) {
802
0
                    break;   /* drop, to guarantee consistency (miss a little bit of compression) */
803
0
            }   }
804
805
0
            if (dictMatchIndex <= dmsBtLow) { break; }   /* beyond tree size, stop the search */
806
0
            if (match[matchLength] < ip[matchLength]) {
807
0
                commonLengthSmaller = matchLength;    /* all smaller will now have at least this guaranteed common length */
808
0
                dictMatchIndex = nextPtr[1];              /* new matchIndex larger than previous (closer to current) */
809
0
            } else {
810
                /* match is larger than current */
811
0
                commonLengthLarger = matchLength;
812
0
                dictMatchIndex = nextPtr[0];
813
0
    }   }   }  /* if (dictMode == ZSTD_dictMatchState) */
814
815
306M
    assert(matchEndIdx > curr+8);
816
306M
    ms->nextToUpdate = matchEndIdx - 8;  /* skip repetitive patterns */
817
306M
    return mnum;
818
306M
}
819
820
typedef U32 (*ZSTD_getAllMatchesFn)(
821
    ZSTD_match_t*,
822
    ZSTD_matchState_t*,
823
    U32*,
824
    const BYTE*,
825
    const BYTE*,
826
    const U32 rep[ZSTD_REP_NUM],
827
    U32 const ll0,
828
    U32 const lengthToBeat);
829
830
FORCE_INLINE_TEMPLATE
831
ZSTD_ALLOW_POINTER_OVERFLOW_ATTR
832
U32 ZSTD_btGetAllMatches_internal(
833
        ZSTD_match_t* matches,
834
        ZSTD_matchState_t* ms,
835
        U32* nextToUpdate3,
836
        const BYTE* ip,
837
        const BYTE* const iHighLimit,
838
        const U32 rep[ZSTD_REP_NUM],
839
        U32 const ll0,
840
        U32 const lengthToBeat,
841
        const ZSTD_dictMode_e dictMode,
842
        const U32 mls)
843
320M
{
844
320M
    assert(BOUNDED(3, ms->cParams.minMatch, 6) == mls);
845
320M
    DEBUGLOG(8, "ZSTD_BtGetAllMatches(dictMode=%d, mls=%u)", (int)dictMode, mls);
846
320M
    if (ip < ms->window.base + ms->nextToUpdate)
847
13.4M
        return 0;   /* skipped area */
848
306M
    ZSTD_updateTree_internal(ms, ip, iHighLimit, mls, dictMode);
849
306M
    return ZSTD_insertBtAndGetAllMatches(matches, ms, nextToUpdate3, ip, iHighLimit, dictMode, rep, ll0, lengthToBeat, mls);
850
320M
}
851
852
1.18M
#define ZSTD_BT_GET_ALL_MATCHES_FN(dictMode, mls) ZSTD_btGetAllMatches_##dictMode##_##mls
853
854
#define GEN_ZSTD_BT_GET_ALL_MATCHES_(dictMode, mls)            \
855
    static U32 ZSTD_BT_GET_ALL_MATCHES_FN(dictMode, mls)(      \
856
            ZSTD_match_t* matches,                             \
857
            ZSTD_matchState_t* ms,                             \
858
            U32* nextToUpdate3,                                \
859
            const BYTE* ip,                                    \
860
            const BYTE* const iHighLimit,                      \
861
            const U32 rep[ZSTD_REP_NUM],                       \
862
            U32 const ll0,                                     \
863
            U32 const lengthToBeat)                            \
864
320M
    {                                                          \
865
320M
        return ZSTD_btGetAllMatches_internal(                  \
866
320M
                matches, ms, nextToUpdate3, ip, iHighLimit,    \
867
320M
                rep, ll0, lengthToBeat, ZSTD_##dictMode, mls); \
868
320M
    }
zstd_opt.c:ZSTD_btGetAllMatches_noDict_3
Line
Count
Source
864
282M
    {                                                          \
865
282M
        return ZSTD_btGetAllMatches_internal(                  \
866
282M
                matches, ms, nextToUpdate3, ip, iHighLimit,    \
867
282M
                rep, ll0, lengthToBeat, ZSTD_##dictMode, mls); \
868
282M
    }
zstd_opt.c:ZSTD_btGetAllMatches_noDict_4
Line
Count
Source
864
37.1M
    {                                                          \
865
37.1M
        return ZSTD_btGetAllMatches_internal(                  \
866
37.1M
                matches, ms, nextToUpdate3, ip, iHighLimit,    \
867
37.1M
                rep, ll0, lengthToBeat, ZSTD_##dictMode, mls); \
868
37.1M
    }
Unexecuted instantiation: zstd_opt.c:ZSTD_btGetAllMatches_noDict_5
Unexecuted instantiation: zstd_opt.c:ZSTD_btGetAllMatches_noDict_6
Unexecuted instantiation: zstd_opt.c:ZSTD_btGetAllMatches_extDict_3
Unexecuted instantiation: zstd_opt.c:ZSTD_btGetAllMatches_extDict_4
Unexecuted instantiation: zstd_opt.c:ZSTD_btGetAllMatches_extDict_5
Unexecuted instantiation: zstd_opt.c:ZSTD_btGetAllMatches_extDict_6
Unexecuted instantiation: zstd_opt.c:ZSTD_btGetAllMatches_dictMatchState_3
Unexecuted instantiation: zstd_opt.c:ZSTD_btGetAllMatches_dictMatchState_4
Unexecuted instantiation: zstd_opt.c:ZSTD_btGetAllMatches_dictMatchState_5
Unexecuted instantiation: zstd_opt.c:ZSTD_btGetAllMatches_dictMatchState_6
869
870
#define GEN_ZSTD_BT_GET_ALL_MATCHES(dictMode)  \
871
    GEN_ZSTD_BT_GET_ALL_MATCHES_(dictMode, 3)  \
872
    GEN_ZSTD_BT_GET_ALL_MATCHES_(dictMode, 4)  \
873
    GEN_ZSTD_BT_GET_ALL_MATCHES_(dictMode, 5)  \
874
    GEN_ZSTD_BT_GET_ALL_MATCHES_(dictMode, 6)
875
876
GEN_ZSTD_BT_GET_ALL_MATCHES(noDict)
877
GEN_ZSTD_BT_GET_ALL_MATCHES(extDict)
878
GEN_ZSTD_BT_GET_ALL_MATCHES(dictMatchState)
879
880
#define ZSTD_BT_GET_ALL_MATCHES_ARRAY(dictMode)  \
881
297k
    {                                            \
882
297k
        ZSTD_BT_GET_ALL_MATCHES_FN(dictMode, 3), \
883
297k
        ZSTD_BT_GET_ALL_MATCHES_FN(dictMode, 4), \
884
297k
        ZSTD_BT_GET_ALL_MATCHES_FN(dictMode, 5), \
885
297k
        ZSTD_BT_GET_ALL_MATCHES_FN(dictMode, 6)  \
886
297k
    }
887
888
static ZSTD_getAllMatchesFn
889
ZSTD_selectBtGetAllMatches(ZSTD_matchState_t const* ms, ZSTD_dictMode_e const dictMode)
890
99.1k
{
891
99.1k
    ZSTD_getAllMatchesFn const getAllMatchesFns[3][4] = {
892
99.1k
        ZSTD_BT_GET_ALL_MATCHES_ARRAY(noDict),
893
99.1k
        ZSTD_BT_GET_ALL_MATCHES_ARRAY(extDict),
894
99.1k
        ZSTD_BT_GET_ALL_MATCHES_ARRAY(dictMatchState)
895
99.1k
    };
896
99.1k
    U32 const mls = BOUNDED(3, ms->cParams.minMatch, 6);
897
99.1k
    assert((U32)dictMode < 3);
898
99.1k
    assert(mls - 3 < 4);
899
99.1k
    return getAllMatchesFns[(int)dictMode][mls - 3];
900
99.1k
}
901
902
/*************************
903
*  LDM helper functions  *
904
*************************/
905
906
/* Struct containing info needed to make decision about ldm inclusion */
907
typedef struct {
908
    rawSeqStore_t seqStore;   /* External match candidates store for this block */
909
    U32 startPosInBlock;      /* Start position of the current match candidate */
910
    U32 endPosInBlock;        /* End position of the current match candidate */
911
    U32 offset;               /* Offset of the match candidate */
912
} ZSTD_optLdm_t;
913
914
/* ZSTD_optLdm_skipRawSeqStoreBytes():
915
 * Moves forward in @rawSeqStore by @nbBytes,
916
 * which will update the fields 'pos' and 'posInSequence'.
917
 */
918
static void ZSTD_optLdm_skipRawSeqStoreBytes(rawSeqStore_t* rawSeqStore, size_t nbBytes)
919
0
{
920
0
    U32 currPos = (U32)(rawSeqStore->posInSequence + nbBytes);
921
0
    while (currPos && rawSeqStore->pos < rawSeqStore->size) {
922
0
        rawSeq currSeq = rawSeqStore->seq[rawSeqStore->pos];
923
0
        if (currPos >= currSeq.litLength + currSeq.matchLength) {
924
0
            currPos -= currSeq.litLength + currSeq.matchLength;
925
0
            rawSeqStore->pos++;
926
0
        } else {
927
0
            rawSeqStore->posInSequence = currPos;
928
0
            break;
929
0
        }
930
0
    }
931
0
    if (currPos == 0 || rawSeqStore->pos == rawSeqStore->size) {
932
0
        rawSeqStore->posInSequence = 0;
933
0
    }
934
0
}
935
936
/* ZSTD_opt_getNextMatchAndUpdateSeqStore():
937
 * Calculates the beginning and end of the next match in the current block.
938
 * Updates 'pos' and 'posInSequence' of the ldmSeqStore.
939
 */
940
static void
941
ZSTD_opt_getNextMatchAndUpdateSeqStore(ZSTD_optLdm_t* optLdm, U32 currPosInBlock,
942
                                       U32 blockBytesRemaining)
943
99.1k
{
944
99.1k
    rawSeq currSeq;
945
99.1k
    U32 currBlockEndPos;
946
99.1k
    U32 literalsBytesRemaining;
947
99.1k
    U32 matchBytesRemaining;
948
949
    /* Setting match end position to MAX to ensure we never use an LDM during this block */
950
99.1k
    if (optLdm->seqStore.size == 0 || optLdm->seqStore.pos >= optLdm->seqStore.size) {
951
99.1k
        optLdm->startPosInBlock = UINT_MAX;
952
99.1k
        optLdm->endPosInBlock = UINT_MAX;
953
99.1k
        return;
954
99.1k
    }
955
    /* Calculate appropriate bytes left in matchLength and litLength
956
     * after adjusting based on ldmSeqStore->posInSequence */
957
0
    currSeq = optLdm->seqStore.seq[optLdm->seqStore.pos];
958
0
    assert(optLdm->seqStore.posInSequence <= currSeq.litLength + currSeq.matchLength);
959
0
    currBlockEndPos = currPosInBlock + blockBytesRemaining;
960
0
    literalsBytesRemaining = (optLdm->seqStore.posInSequence < currSeq.litLength) ?
961
0
            currSeq.litLength - (U32)optLdm->seqStore.posInSequence :
962
0
            0;
963
0
    matchBytesRemaining = (literalsBytesRemaining == 0) ?
964
0
            currSeq.matchLength - ((U32)optLdm->seqStore.posInSequence - currSeq.litLength) :
965
0
            currSeq.matchLength;
966
967
    /* If there are more literal bytes than bytes remaining in block, no ldm is possible */
968
0
    if (literalsBytesRemaining >= blockBytesRemaining) {
969
0
        optLdm->startPosInBlock = UINT_MAX;
970
0
        optLdm->endPosInBlock = UINT_MAX;
971
0
        ZSTD_optLdm_skipRawSeqStoreBytes(&optLdm->seqStore, blockBytesRemaining);
972
0
        return;
973
0
    }
974
975
    /* Matches may be < MINMATCH by this process. In that case, we will reject them
976
       when we are deciding whether or not to add the ldm */
977
0
    optLdm->startPosInBlock = currPosInBlock + literalsBytesRemaining;
978
0
    optLdm->endPosInBlock = optLdm->startPosInBlock + matchBytesRemaining;
979
0
    optLdm->offset = currSeq.offset;
980
981
0
    if (optLdm->endPosInBlock > currBlockEndPos) {
982
        /* Match ends after the block ends, we can't use the whole match */
983
0
        optLdm->endPosInBlock = currBlockEndPos;
984
0
        ZSTD_optLdm_skipRawSeqStoreBytes(&optLdm->seqStore, currBlockEndPos - currPosInBlock);
985
0
    } else {
986
        /* Consume nb of bytes equal to size of sequence left */
987
0
        ZSTD_optLdm_skipRawSeqStoreBytes(&optLdm->seqStore, literalsBytesRemaining + matchBytesRemaining);
988
0
    }
989
0
}
990
991
/* ZSTD_optLdm_maybeAddMatch():
992
 * Adds a match if it's long enough,
993
 * based on it's 'matchStartPosInBlock' and 'matchEndPosInBlock',
994
 * into 'matches'. Maintains the correct ordering of 'matches'.
995
 */
996
static void ZSTD_optLdm_maybeAddMatch(ZSTD_match_t* matches, U32* nbMatches,
997
                                      const ZSTD_optLdm_t* optLdm, U32 currPosInBlock)
998
0
{
999
0
    U32 const posDiff = currPosInBlock - optLdm->startPosInBlock;
1000
    /* Note: ZSTD_match_t actually contains offBase and matchLength (before subtracting MINMATCH) */
1001
0
    U32 const candidateMatchLength = optLdm->endPosInBlock - optLdm->startPosInBlock - posDiff;
1002
1003
    /* Ensure that current block position is not outside of the match */
1004
0
    if (currPosInBlock < optLdm->startPosInBlock
1005
0
      || currPosInBlock >= optLdm->endPosInBlock
1006
0
      || candidateMatchLength < MINMATCH) {
1007
0
        return;
1008
0
    }
1009
1010
0
    if (*nbMatches == 0 || ((candidateMatchLength > matches[*nbMatches-1].len) && *nbMatches < ZSTD_OPT_NUM)) {
1011
0
        U32 const candidateOffBase = OFFSET_TO_OFFBASE(optLdm->offset);
1012
0
        DEBUGLOG(6, "ZSTD_optLdm_maybeAddMatch(): Adding ldm candidate match (offBase: %u matchLength %u) at block position=%u",
1013
0
                 candidateOffBase, candidateMatchLength, currPosInBlock);
1014
0
        matches[*nbMatches].len = candidateMatchLength;
1015
0
        matches[*nbMatches].off = candidateOffBase;
1016
0
        (*nbMatches)++;
1017
0
    }
1018
0
}
1019
1020
/* ZSTD_optLdm_processMatchCandidate():
1021
 * Wrapper function to update ldm seq store and call ldm functions as necessary.
1022
 */
1023
static void
1024
ZSTD_optLdm_processMatchCandidate(ZSTD_optLdm_t* optLdm,
1025
                                  ZSTD_match_t* matches, U32* nbMatches,
1026
                                  U32 currPosInBlock, U32 remainingBytes)
1027
320M
{
1028
320M
    if (optLdm->seqStore.size == 0 || optLdm->seqStore.pos >= optLdm->seqStore.size) {
1029
320M
        return;
1030
320M
    }
1031
1032
0
    if (currPosInBlock >= optLdm->endPosInBlock) {
1033
0
        if (currPosInBlock > optLdm->endPosInBlock) {
1034
            /* The position at which ZSTD_optLdm_processMatchCandidate() is called is not necessarily
1035
             * at the end of a match from the ldm seq store, and will often be some bytes
1036
             * over beyond matchEndPosInBlock. As such, we need to correct for these "overshoots"
1037
             */
1038
0
            U32 const posOvershoot = currPosInBlock - optLdm->endPosInBlock;
1039
0
            ZSTD_optLdm_skipRawSeqStoreBytes(&optLdm->seqStore, posOvershoot);
1040
0
        }
1041
0
        ZSTD_opt_getNextMatchAndUpdateSeqStore(optLdm, currPosInBlock, remainingBytes);
1042
0
    }
1043
0
    ZSTD_optLdm_maybeAddMatch(matches, nbMatches, optLdm, currPosInBlock);
1044
0
}
1045
1046
1047
/*-*******************************
1048
*  Optimal parser
1049
*********************************/
1050
1051
#if 0 /* debug */
1052
1053
static void
1054
listStats(const U32* table, int lastEltID)
1055
{
1056
    int const nbElts = lastEltID + 1;
1057
    int enb;
1058
    for (enb=0; enb < nbElts; enb++) {
1059
        (void)table;
1060
        /* RAWLOG(2, "%3i:%3i,  ", enb, table[enb]); */
1061
        RAWLOG(2, "%4i,", table[enb]);
1062
    }
1063
    RAWLOG(2, " \n");
1064
}
1065
1066
#endif
1067
1068
153M
#define LIT_PRICE(_p) (int)ZSTD_rawLiteralsCost(_p, 1, optStatePtr, optLevel)
1069
547M
#define LL_PRICE(_l) (int)ZSTD_litLengthPrice(_l, optStatePtr, optLevel)
1070
166M
#define LL_INCPRICE(_l) (LL_PRICE(_l) - LL_PRICE(_l-1))
1071
1072
FORCE_INLINE_TEMPLATE
1073
ZSTD_ALLOW_POINTER_OVERFLOW_ATTR
1074
size_t
1075
ZSTD_compressBlock_opt_generic(ZSTD_matchState_t* ms,
1076
                               seqStore_t* seqStore,
1077
                               U32 rep[ZSTD_REP_NUM],
1078
                         const void* src, size_t srcSize,
1079
                         const int optLevel,
1080
                         const ZSTD_dictMode_e dictMode)
1081
99.1k
{
1082
99.1k
    optState_t* const optStatePtr = &ms->opt;
1083
99.1k
    const BYTE* const istart = (const BYTE*)src;
1084
99.1k
    const BYTE* ip = istart;
1085
99.1k
    const BYTE* anchor = istart;
1086
99.1k
    const BYTE* const iend = istart + srcSize;
1087
99.1k
    const BYTE* const ilimit = iend - 8;
1088
99.1k
    const BYTE* const base = ms->window.base;
1089
99.1k
    const BYTE* const prefixStart = base + ms->window.dictLimit;
1090
99.1k
    const ZSTD_compressionParameters* const cParams = &ms->cParams;
1091
1092
99.1k
    ZSTD_getAllMatchesFn getAllMatches = ZSTD_selectBtGetAllMatches(ms, dictMode);
1093
1094
99.1k
    U32 const sufficient_len = MIN(cParams->targetLength, ZSTD_OPT_NUM -1);
1095
99.1k
    U32 const minMatch = (cParams->minMatch == 3) ? 3 : 4;
1096
99.1k
    U32 nextToUpdate3 = ms->nextToUpdate;
1097
1098
99.1k
    ZSTD_optimal_t* const opt = optStatePtr->priceTable;
1099
99.1k
    ZSTD_match_t* const matches = optStatePtr->matchTable;
1100
99.1k
    ZSTD_optimal_t lastStretch;
1101
99.1k
    ZSTD_optLdm_t optLdm;
1102
1103
99.1k
    ZSTD_memset(&lastStretch, 0, sizeof(ZSTD_optimal_t));
1104
1105
99.1k
    optLdm.seqStore = ms->ldmSeqStore ? *ms->ldmSeqStore : kNullRawSeqStore;
1106
99.1k
    optLdm.endPosInBlock = optLdm.startPosInBlock = optLdm.offset = 0;
1107
99.1k
    ZSTD_opt_getNextMatchAndUpdateSeqStore(&optLdm, (U32)(ip-istart), (U32)(iend-ip));
1108
1109
    /* init */
1110
99.1k
    DEBUGLOG(5, "ZSTD_compressBlock_opt_generic: current=%u, prefix=%u, nextToUpdate=%u",
1111
99.1k
                (U32)(ip - base), ms->window.dictLimit, ms->nextToUpdate);
1112
99.1k
    assert(optLevel <= 2);
1113
99.1k
    ZSTD_rescaleFreqs(optStatePtr, (const BYTE*)src, srcSize, optLevel);
1114
99.1k
    ip += (ip==prefixStart);
1115
1116
    /* Match Loop */
1117
185M
    while (ip < ilimit) {
1118
185M
        U32 cur, last_pos = 0;
1119
1120
        /* find first match */
1121
185M
        {   U32 const litlen = (U32)(ip - anchor);
1122
185M
            U32 const ll0 = !litlen;
1123
185M
            U32 nbMatches = getAllMatches(matches, ms, &nextToUpdate3, ip, iend, rep, ll0, minMatch);
1124
185M
            ZSTD_optLdm_processMatchCandidate(&optLdm, matches, &nbMatches,
1125
185M
                                              (U32)(ip-istart), (U32)(iend-ip));
1126
185M
            if (!nbMatches) {
1127
180M
                DEBUGLOG(8, "no match found at cPos %u", (unsigned)(ip-istart));
1128
180M
                ip++;
1129
180M
                continue;
1130
180M
            }
1131
1132
            /* Match found: let's store this solution, and eventually find more candidates.
1133
             * During this forward pass, @opt is used to store stretches,
1134
             * defined as "a match followed by N literals".
1135
             * Note how this is different from a Sequence, which is "N literals followed by a match".
1136
             * Storing stretches allows us to store different match predecessors
1137
             * for each literal position part of a literals run. */
1138
1139
            /* initialize opt[0] */
1140
5.07M
            opt[0].mlen = 0;  /* there are only literals so far */
1141
5.07M
            opt[0].litlen = litlen;
1142
            /* No need to include the actual price of the literals before the first match
1143
             * because it is static for the duration of the forward pass, and is included
1144
             * in every subsequent price. But, we include the literal length because
1145
             * the cost variation of litlen depends on the value of litlen.
1146
             */
1147
5.07M
            opt[0].price = LL_PRICE(litlen);
1148
5.07M
            ZSTD_STATIC_ASSERT(sizeof(opt[0].rep[0]) == sizeof(rep[0]));
1149
5.07M
            ZSTD_memcpy(&opt[0].rep, rep, sizeof(opt[0].rep));
1150
1151
            /* large match -> immediate encoding */
1152
5.07M
            {   U32 const maxML = matches[nbMatches-1].len;
1153
5.07M
                U32 const maxOffBase = matches[nbMatches-1].off;
1154
5.07M
                DEBUGLOG(6, "found %u matches of maxLength=%u and maxOffBase=%u at cPos=%u => start new series",
1155
5.07M
                            nbMatches, maxML, maxOffBase, (U32)(ip-prefixStart));
1156
1157
5.07M
                if (maxML > sufficient_len) {
1158
222k
                    lastStretch.litlen = 0;
1159
222k
                    lastStretch.mlen = maxML;
1160
222k
                    lastStretch.off = maxOffBase;
1161
222k
                    DEBUGLOG(6, "large match (%u>%u) => immediate encoding",
1162
222k
                                maxML, sufficient_len);
1163
222k
                    cur = 0;
1164
222k
                    last_pos = maxML;
1165
222k
                    goto _shortestPath;
1166
222k
            }   }
1167
1168
            /* set prices for first matches starting position == 0 */
1169
4.85M
            assert(opt[0].price >= 0);
1170
4.85M
            {   U32 pos;
1171
4.85M
                U32 matchNb;
1172
15.7M
                for (pos = 1; pos < minMatch; pos++) {
1173
10.9M
                    opt[pos].price = ZSTD_MAX_PRICE;
1174
10.9M
                    opt[pos].mlen = 0;
1175
10.9M
                    opt[pos].litlen = litlen + pos;
1176
10.9M
                }
1177
37.5M
                for (matchNb = 0; matchNb < nbMatches; matchNb++) {
1178
32.6M
                    U32 const offBase = matches[matchNb].off;
1179
32.6M
                    U32 const end = matches[matchNb].len;
1180
108M
                    for ( ; pos <= end ; pos++ ) {
1181
76.1M
                        int const matchPrice = (int)ZSTD_getMatchPrice(offBase, pos, optStatePtr, optLevel);
1182
76.1M
                        int const sequencePrice = opt[0].price + matchPrice;
1183
76.1M
                        DEBUGLOG(7, "rPos:%u => set initial price : %.2f",
1184
76.1M
                                    pos, ZSTD_fCost(sequencePrice));
1185
76.1M
                        opt[pos].mlen = pos;
1186
76.1M
                        opt[pos].off = offBase;
1187
76.1M
                        opt[pos].litlen = 0; /* end of match */
1188
76.1M
                        opt[pos].price = sequencePrice + LL_PRICE(0);
1189
76.1M
                    }
1190
32.6M
                }
1191
4.85M
                last_pos = pos-1;
1192
4.85M
                opt[pos].price = ZSTD_MAX_PRICE;
1193
4.85M
            }
1194
4.85M
        }
1195
1196
        /* check further positions */
1197
141M
        for (cur = 1; cur <= last_pos; cur++) {
1198
141M
            const BYTE* const inr = ip + cur;
1199
141M
            assert(cur <= ZSTD_OPT_NUM);
1200
141M
            DEBUGLOG(7, "cPos:%zi==rPos:%u", inr-istart, cur);
1201
1202
            /* Fix current position with one literal if cheaper */
1203
141M
            {   U32 const litlen = opt[cur-1].litlen + 1;
1204
141M
                int const price = opt[cur-1].price
1205
141M
                                + LIT_PRICE(ip+cur-1)
1206
141M
                                + LL_INCPRICE(litlen);
1207
141M
                assert(price < 1000000000); /* overflow check */
1208
141M
                if (price <= opt[cur].price) {
1209
28.4M
                    ZSTD_optimal_t const prevMatch = opt[cur];
1210
28.4M
                    DEBUGLOG(7, "cPos:%zi==rPos:%u : better price (%.2f<=%.2f) using literal (ll==%u) (hist:%u,%u,%u)",
1211
28.4M
                                inr-istart, cur, ZSTD_fCost(price), ZSTD_fCost(opt[cur].price), litlen,
1212
28.4M
                                opt[cur-1].rep[0], opt[cur-1].rep[1], opt[cur-1].rep[2]);
1213
28.4M
                    opt[cur] = opt[cur-1];
1214
28.4M
                    opt[cur].litlen = litlen;
1215
28.4M
                    opt[cur].price = price;
1216
28.4M
                    if ( (optLevel >= 1) /* additional check only for higher modes */
1217
28.4M
                      && (prevMatch.litlen == 0) /* replace a match */
1218
28.4M
                      && (LL_INCPRICE(1) < 0) /* ll1 is cheaper than ll0 */
1219
28.4M
                      && LIKELY(ip + cur < iend)
1220
28.4M
                    ) {
1221
                        /* check next position, in case it would be cheaper */
1222
5.86M
                        int with1literal = prevMatch.price + LIT_PRICE(ip+cur) + LL_INCPRICE(1);
1223
5.86M
                        int withMoreLiterals = price + LIT_PRICE(ip+cur) + LL_INCPRICE(litlen+1);
1224
5.86M
                        DEBUGLOG(7, "then at next rPos %u : match+1lit %.2f vs %ulits %.2f",
1225
5.86M
                                cur+1, ZSTD_fCost(with1literal), litlen+1, ZSTD_fCost(withMoreLiterals));
1226
5.86M
                        if ( (with1literal < withMoreLiterals)
1227
5.86M
                          && (with1literal < opt[cur+1].price) ) {
1228
                            /* update offset history - before it disappears */
1229
1.83M
                            U32 const prev = cur - prevMatch.mlen;
1230
1.83M
                            repcodes_t const newReps = ZSTD_newRep(opt[prev].rep, prevMatch.off, opt[prev].litlen==0);
1231
1.83M
                            assert(cur >= prevMatch.mlen);
1232
1.83M
                            DEBUGLOG(7, "==> match+1lit is cheaper (%.2f < %.2f) (hist:%u,%u,%u) !",
1233
1.83M
                                        ZSTD_fCost(with1literal), ZSTD_fCost(withMoreLiterals),
1234
1.83M
                                        newReps.rep[0], newReps.rep[1], newReps.rep[2] );
1235
1.83M
                            opt[cur+1] = prevMatch;  /* mlen & offbase */
1236
1.83M
                            ZSTD_memcpy(opt[cur+1].rep, &newReps, sizeof(repcodes_t));
1237
1.83M
                            opt[cur+1].litlen = 1;
1238
1.83M
                            opt[cur+1].price = with1literal;
1239
1.83M
                            if (last_pos < cur+1) last_pos = cur+1;
1240
1.83M
                        }
1241
5.86M
                    }
1242
113M
                } else {
1243
113M
                    DEBUGLOG(7, "cPos:%zi==rPos:%u : literal would cost more (%.2f>%.2f)",
1244
113M
                                inr-istart, cur, ZSTD_fCost(price), ZSTD_fCost(opt[cur].price));
1245
113M
                }
1246
141M
            }
1247
1248
            /* Offset history is not updated during match comparison.
1249
             * Do it here, now that the match is selected and confirmed.
1250
             */
1251
141M
            ZSTD_STATIC_ASSERT(sizeof(opt[cur].rep) == sizeof(repcodes_t));
1252
141M
            assert(cur >= opt[cur].mlen);
1253
141M
            if (opt[cur].litlen == 0) {
1254
                /* just finished a match => alter offset history */
1255
111M
                U32 const prev = cur - opt[cur].mlen;
1256
111M
                repcodes_t const newReps = ZSTD_newRep(opt[prev].rep, opt[cur].off, opt[prev].litlen==0);
1257
111M
                ZSTD_memcpy(opt[cur].rep, &newReps, sizeof(repcodes_t));
1258
111M
            }
1259
1260
            /* last match must start at a minimum distance of 8 from oend */
1261
141M
            if (inr > ilimit) continue;
1262
1263
141M
            if (cur == last_pos) break;
1264
1265
137M
            if ( (optLevel==0) /*static_test*/
1266
137M
              && (opt[cur+1].price <= opt[cur].price + (BITCOST_MULTIPLIER/2)) ) {
1267
2.95M
                DEBUGLOG(7, "skip current position : next rPos(%u) price is cheaper", cur+1);
1268
2.95M
                continue;  /* skip unpromising positions; about ~+6% speed, -0.01 ratio */
1269
2.95M
            }
1270
1271
134M
            assert(opt[cur].price >= 0);
1272
134M
            {   U32 const ll0 = (opt[cur].litlen == 0);
1273
134M
                int const previousPrice = opt[cur].price;
1274
134M
                int const basePrice = previousPrice + LL_PRICE(0);
1275
134M
                U32 nbMatches = getAllMatches(matches, ms, &nextToUpdate3, inr, iend, opt[cur].rep, ll0, minMatch);
1276
134M
                U32 matchNb;
1277
1278
134M
                ZSTD_optLdm_processMatchCandidate(&optLdm, matches, &nbMatches,
1279
134M
                                                  (U32)(inr-istart), (U32)(iend-inr));
1280
1281
134M
                if (!nbMatches) {
1282
23.6M
                    DEBUGLOG(7, "rPos:%u : no match found", cur);
1283
23.6M
                    continue;
1284
23.6M
                }
1285
1286
110M
                {   U32 const longestML = matches[nbMatches-1].len;
1287
110M
                    DEBUGLOG(7, "cPos:%zi==rPos:%u, found %u matches, of longest ML=%u",
1288
110M
                                inr-istart, cur, nbMatches, longestML);
1289
1290
110M
                    if ( (longestML > sufficient_len)
1291
110M
                      || (cur + longestML >= ZSTD_OPT_NUM)
1292
110M
                      || (ip + cur + longestML >= iend) ) {
1293
142k
                        lastStretch.mlen = longestML;
1294
142k
                        lastStretch.off = matches[nbMatches-1].off;
1295
142k
                        lastStretch.litlen = 0;
1296
142k
                        last_pos = cur + longestML;
1297
142k
                        goto _shortestPath;
1298
142k
                }   }
1299
1300
                /* set prices using matches found at position == cur */
1301
281M
                for (matchNb = 0; matchNb < nbMatches; matchNb++) {
1302
171M
                    U32 const offset = matches[matchNb].off;
1303
171M
                    U32 const lastML = matches[matchNb].len;
1304
171M
                    U32 const startML = (matchNb>0) ? matches[matchNb-1].len+1 : minMatch;
1305
171M
                    U32 mlen;
1306
1307
171M
                    DEBUGLOG(7, "testing match %u => offBase=%4u, mlen=%2u, llen=%2u",
1308
171M
                                matchNb, matches[matchNb].off, lastML, opt[cur].litlen);
1309
1310
21.5G
                    for (mlen = lastML; mlen >= startML; mlen--) {  /* scan downward */
1311
21.3G
                        U32 const pos = cur + mlen;
1312
21.3G
                        int const price = basePrice + (int)ZSTD_getMatchPrice(offset, mlen, optStatePtr, optLevel);
1313
1314
21.3G
                        if ((pos > last_pos) || (price < opt[pos].price)) {
1315
141M
                            DEBUGLOG(7, "rPos:%u (ml=%2u) => new better price (%.2f<%.2f)",
1316
141M
                                        pos, mlen, ZSTD_fCost(price), ZSTD_fCost(opt[pos].price));
1317
209M
                            while (last_pos < pos) {
1318
                                /* fill empty positions, for future comparisons */
1319
67.6M
                                last_pos++;
1320
67.6M
                                opt[last_pos].price = ZSTD_MAX_PRICE;
1321
67.6M
                                opt[last_pos].litlen = !0;  /* just needs to be != 0, to mean "not an end of match" */
1322
67.6M
                            }
1323
141M
                            opt[pos].mlen = mlen;
1324
141M
                            opt[pos].off = offset;
1325
141M
                            opt[pos].litlen = 0;
1326
141M
                            opt[pos].price = price;
1327
21.1G
                        } else {
1328
21.1G
                            DEBUGLOG(7, "rPos:%u (ml=%2u) => new price is worse (%.2f>=%.2f)",
1329
21.1G
                                        pos, mlen, ZSTD_fCost(price), ZSTD_fCost(opt[pos].price));
1330
21.1G
                            if (optLevel==0) break;  /* early update abort; gets ~+10% speed for about -0.01 ratio loss */
1331
21.1G
                        }
1332
21.3G
            }   }   }
1333
110M
            opt[last_pos+1].price = ZSTD_MAX_PRICE;
1334
110M
        }  /* for (cur = 1; cur <= last_pos; cur++) */
1335
1336
4.71M
        lastStretch = opt[last_pos];
1337
4.71M
        assert(cur >= lastStretch.mlen);
1338
4.71M
        cur = last_pos - lastStretch.mlen;
1339
1340
5.07M
_shortestPath:   /* cur, last_pos, best_mlen, best_off have to be set */
1341
5.07M
        assert(opt[0].mlen == 0);
1342
5.07M
        assert(last_pos >= lastStretch.mlen);
1343
5.07M
        assert(cur == last_pos - lastStretch.mlen);
1344
1345
5.07M
        if (lastStretch.mlen==0) {
1346
            /* no solution : all matches have been converted into literals */
1347
496k
            assert(lastStretch.litlen == (ip - anchor) + last_pos);
1348
496k
            ip += last_pos;
1349
496k
            continue;
1350
496k
        }
1351
4.58M
        assert(lastStretch.off > 0);
1352
1353
        /* Update offset history */
1354
4.58M
        if (lastStretch.litlen == 0) {
1355
            /* finishing on a match : update offset history */
1356
3.81M
            repcodes_t const reps = ZSTD_newRep(opt[cur].rep, lastStretch.off, opt[cur].litlen==0);
1357
3.81M
            ZSTD_memcpy(rep, &reps, sizeof(repcodes_t));
1358
3.81M
        } else {
1359
767k
            ZSTD_memcpy(rep, lastStretch.rep, sizeof(repcodes_t));
1360
767k
            assert(cur >= lastStretch.litlen);
1361
767k
            cur -= lastStretch.litlen;
1362
767k
        }
1363
1364
        /* Let's write the shortest path solution.
1365
         * It is stored in @opt in reverse order,
1366
         * starting from @storeEnd (==cur+2),
1367
         * effectively partially @opt overwriting.
1368
         * Content is changed too:
1369
         * - So far, @opt stored stretches, aka a match followed by literals
1370
         * - Now, it will store sequences, aka literals followed by a match
1371
         */
1372
4.58M
        {   U32 const storeEnd = cur + 2;
1373
4.58M
            U32 storeStart = storeEnd;
1374
4.58M
            U32 stretchPos = cur;
1375
1376
4.58M
            DEBUGLOG(6, "start reverse traversal (last_pos:%u, cur:%u)",
1377
4.58M
                        last_pos, cur); (void)last_pos;
1378
4.58M
            assert(storeEnd < ZSTD_OPT_SIZE);
1379
4.58M
            DEBUGLOG(6, "last stretch copied into pos=%u (llen=%u,mlen=%u,ofc=%u)",
1380
4.58M
                        storeEnd, lastStretch.litlen, lastStretch.mlen, lastStretch.off);
1381
4.58M
            if (lastStretch.litlen > 0) {
1382
                /* last "sequence" is unfinished: just a bunch of literals */
1383
767k
                opt[storeEnd].litlen = lastStretch.litlen;
1384
767k
                opt[storeEnd].mlen = 0;
1385
767k
                storeStart = storeEnd-1;
1386
767k
                opt[storeStart] = lastStretch;
1387
767k
            } {
1388
4.58M
                opt[storeEnd] = lastStretch;  /* note: litlen will be fixed */
1389
4.58M
                storeStart = storeEnd;
1390
4.58M
            }
1391
7.63M
            while (1) {
1392
7.63M
                ZSTD_optimal_t nextStretch = opt[stretchPos];
1393
7.63M
                opt[storeStart].litlen = nextStretch.litlen;
1394
7.63M
                DEBUGLOG(6, "selected sequence (llen=%u,mlen=%u,ofc=%u)",
1395
7.63M
                            opt[storeStart].litlen, opt[storeStart].mlen, opt[storeStart].off);
1396
7.63M
                if (nextStretch.mlen == 0) {
1397
                    /* reaching beginning of segment */
1398
4.58M
                    break;
1399
4.58M
                }
1400
3.04M
                storeStart--;
1401
3.04M
                opt[storeStart] = nextStretch; /* note: litlen will be fixed */
1402
3.04M
                assert(nextStretch.litlen + nextStretch.mlen <= stretchPos);
1403
3.04M
                stretchPos -= nextStretch.litlen + nextStretch.mlen;
1404
3.04M
            }
1405
1406
            /* save sequences */
1407
4.58M
            DEBUGLOG(6, "sending selected sequences into seqStore");
1408
4.58M
            {   U32 storePos;
1409
12.2M
                for (storePos=storeStart; storePos <= storeEnd; storePos++) {
1410
7.63M
                    U32 const llen = opt[storePos].litlen;
1411
7.63M
                    U32 const mlen = opt[storePos].mlen;
1412
7.63M
                    U32 const offBase = opt[storePos].off;
1413
7.63M
                    U32 const advance = llen + mlen;
1414
7.63M
                    DEBUGLOG(6, "considering seq starting at %zi, llen=%u, mlen=%u",
1415
7.63M
                                anchor - istart, (unsigned)llen, (unsigned)mlen);
1416
1417
7.63M
                    if (mlen==0) {  /* only literals => must be last "sequence", actually starting a new stream of sequences */
1418
0
                        assert(storePos == storeEnd);   /* must be last sequence */
1419
0
                        ip = anchor + llen;     /* last "sequence" is a bunch of literals => don't progress anchor */
1420
0
                        continue;   /* will finish */
1421
0
                    }
1422
1423
7.63M
                    assert(anchor + llen <= iend);
1424
7.63M
                    ZSTD_updateStats(optStatePtr, llen, anchor, offBase, mlen);
1425
7.63M
                    ZSTD_storeSeq(seqStore, llen, anchor, iend, offBase, mlen);
1426
7.63M
                    anchor += advance;
1427
7.63M
                    ip = anchor;
1428
7.63M
            }   }
1429
4.58M
            DEBUGLOG(7, "new offset history : %u, %u, %u", rep[0], rep[1], rep[2]);
1430
1431
            /* update all costs */
1432
4.58M
            ZSTD_setBasePrices(optStatePtr, optLevel);
1433
4.58M
        }
1434
4.58M
    }   /* while (ip < ilimit) */
1435
1436
    /* Return the last literals size */
1437
99.1k
    return (size_t)(iend - anchor);
1438
99.1k
}
1439
#endif /* build exclusions */
1440
1441
#ifndef ZSTD_EXCLUDE_BTOPT_BLOCK_COMPRESSOR
1442
static size_t ZSTD_compressBlock_opt0(
1443
        ZSTD_matchState_t* ms, seqStore_t* seqStore, U32 rep[ZSTD_REP_NUM],
1444
        const void* src, size_t srcSize, const ZSTD_dictMode_e dictMode)
1445
14.7k
{
1446
14.7k
    return ZSTD_compressBlock_opt_generic(ms, seqStore, rep, src, srcSize, 0 /* optLevel */, dictMode);
1447
14.7k
}
1448
#endif
1449
1450
#ifndef ZSTD_EXCLUDE_BTULTRA_BLOCK_COMPRESSOR
1451
static size_t ZSTD_compressBlock_opt2(
1452
        ZSTD_matchState_t* ms, seqStore_t* seqStore, U32 rep[ZSTD_REP_NUM],
1453
        const void* src, size_t srcSize, const ZSTD_dictMode_e dictMode)
1454
84.3k
{
1455
84.3k
    return ZSTD_compressBlock_opt_generic(ms, seqStore, rep, src, srcSize, 2 /* optLevel */, dictMode);
1456
84.3k
}
1457
#endif
1458
1459
#ifndef ZSTD_EXCLUDE_BTOPT_BLOCK_COMPRESSOR
1460
size_t ZSTD_compressBlock_btopt(
1461
        ZSTD_matchState_t* ms, seqStore_t* seqStore, U32 rep[ZSTD_REP_NUM],
1462
        const void* src, size_t srcSize)
1463
14.7k
{
1464
14.7k
    DEBUGLOG(5, "ZSTD_compressBlock_btopt");
1465
14.7k
    return ZSTD_compressBlock_opt0(ms, seqStore, rep, src, srcSize, ZSTD_noDict);
1466
14.7k
}
1467
#endif
1468
1469
1470
1471
1472
#ifndef ZSTD_EXCLUDE_BTULTRA_BLOCK_COMPRESSOR
1473
/* ZSTD_initStats_ultra():
1474
 * make a first compression pass, just to seed stats with more accurate starting values.
1475
 * only works on first block, with no dictionary and no ldm.
1476
 * this function cannot error out, its narrow contract must be respected.
1477
 */
1478
static
1479
ZSTD_ALLOW_POINTER_OVERFLOW_ATTR
1480
void ZSTD_initStats_ultra(ZSTD_matchState_t* ms,
1481
                          seqStore_t* seqStore,
1482
                          U32 rep[ZSTD_REP_NUM],
1483
                    const void* src, size_t srcSize)
1484
39.1k
{
1485
39.1k
    U32 tmpRep[ZSTD_REP_NUM];  /* updated rep codes will sink here */
1486
39.1k
    ZSTD_memcpy(tmpRep, rep, sizeof(tmpRep));
1487
1488
39.1k
    DEBUGLOG(4, "ZSTD_initStats_ultra (srcSize=%zu)", srcSize);
1489
39.1k
    assert(ms->opt.litLengthSum == 0);    /* first block */
1490
39.1k
    assert(seqStore->sequences == seqStore->sequencesStart);   /* no ldm */
1491
39.1k
    assert(ms->window.dictLimit == ms->window.lowLimit);   /* no dictionary */
1492
39.1k
    assert(ms->window.dictLimit - ms->nextToUpdate <= 1);  /* no prefix (note: intentional overflow, defined as 2-complement) */
1493
1494
39.1k
    ZSTD_compressBlock_opt2(ms, seqStore, tmpRep, src, srcSize, ZSTD_noDict);   /* generate stats into ms->opt*/
1495
1496
    /* invalidate first scan from history, only keep entropy stats */
1497
39.1k
    ZSTD_resetSeqStore(seqStore);
1498
39.1k
    ms->window.base -= srcSize;
1499
39.1k
    ms->window.dictLimit += (U32)srcSize;
1500
39.1k
    ms->window.lowLimit = ms->window.dictLimit;
1501
39.1k
    ms->nextToUpdate = ms->window.dictLimit;
1502
1503
39.1k
}
1504
1505
size_t ZSTD_compressBlock_btultra(
1506
        ZSTD_matchState_t* ms, seqStore_t* seqStore, U32 rep[ZSTD_REP_NUM],
1507
        const void* src, size_t srcSize)
1508
6.09k
{
1509
6.09k
    DEBUGLOG(5, "ZSTD_compressBlock_btultra (srcSize=%zu)", srcSize);
1510
6.09k
    return ZSTD_compressBlock_opt2(ms, seqStore, rep, src, srcSize, ZSTD_noDict);
1511
6.09k
}
1512
1513
size_t ZSTD_compressBlock_btultra2(
1514
        ZSTD_matchState_t* ms, seqStore_t* seqStore, U32 rep[ZSTD_REP_NUM],
1515
        const void* src, size_t srcSize)
1516
39.1k
{
1517
39.1k
    U32 const curr = (U32)((const BYTE*)src - ms->window.base);
1518
39.1k
    DEBUGLOG(5, "ZSTD_compressBlock_btultra2 (srcSize=%zu)", srcSize);
1519
1520
    /* 2-passes strategy:
1521
     * this strategy makes a first pass over first block to collect statistics
1522
     * in order to seed next round's statistics with it.
1523
     * After 1st pass, function forgets history, and starts a new block.
1524
     * Consequently, this can only work if no data has been previously loaded in tables,
1525
     * aka, no dictionary, no prefix, no ldm preprocessing.
1526
     * The compression ratio gain is generally small (~0.5% on first block),
1527
     * the cost is 2x cpu time on first block. */
1528
39.1k
    assert(srcSize <= ZSTD_BLOCKSIZE_MAX);
1529
39.1k
    if ( (ms->opt.litLengthSum==0)   /* first block */
1530
39.1k
      && (seqStore->sequences == seqStore->sequencesStart)  /* no ldm */
1531
39.1k
      && (ms->window.dictLimit == ms->window.lowLimit)   /* no dictionary */
1532
39.1k
      && (curr == ms->window.dictLimit)    /* start of frame, nothing already loaded nor skipped */
1533
39.1k
      && (srcSize > ZSTD_PREDEF_THRESHOLD) /* input large enough to not employ default stats */
1534
39.1k
      ) {
1535
39.1k
        ZSTD_initStats_ultra(ms, seqStore, rep, src, srcSize);
1536
39.1k
    }
1537
1538
39.1k
    return ZSTD_compressBlock_opt2(ms, seqStore, rep, src, srcSize, ZSTD_noDict);
1539
39.1k
}
1540
#endif
1541
1542
#ifndef ZSTD_EXCLUDE_BTOPT_BLOCK_COMPRESSOR
1543
size_t ZSTD_compressBlock_btopt_dictMatchState(
1544
        ZSTD_matchState_t* ms, seqStore_t* seqStore, U32 rep[ZSTD_REP_NUM],
1545
        const void* src, size_t srcSize)
1546
0
{
1547
0
    return ZSTD_compressBlock_opt0(ms, seqStore, rep, src, srcSize, ZSTD_dictMatchState);
1548
0
}
1549
1550
size_t ZSTD_compressBlock_btopt_extDict(
1551
        ZSTD_matchState_t* ms, seqStore_t* seqStore, U32 rep[ZSTD_REP_NUM],
1552
        const void* src, size_t srcSize)
1553
0
{
1554
0
    return ZSTD_compressBlock_opt0(ms, seqStore, rep, src, srcSize, ZSTD_extDict);
1555
0
}
1556
#endif
1557
1558
#ifndef ZSTD_EXCLUDE_BTULTRA_BLOCK_COMPRESSOR
1559
size_t ZSTD_compressBlock_btultra_dictMatchState(
1560
        ZSTD_matchState_t* ms, seqStore_t* seqStore, U32 rep[ZSTD_REP_NUM],
1561
        const void* src, size_t srcSize)
1562
0
{
1563
0
    return ZSTD_compressBlock_opt2(ms, seqStore, rep, src, srcSize, ZSTD_dictMatchState);
1564
0
}
1565
1566
size_t ZSTD_compressBlock_btultra_extDict(
1567
        ZSTD_matchState_t* ms, seqStore_t* seqStore, U32 rep[ZSTD_REP_NUM],
1568
        const void* src, size_t srcSize)
1569
0
{
1570
0
    return ZSTD_compressBlock_opt2(ms, seqStore, rep, src, srcSize, ZSTD_extDict);
1571
0
}
1572
#endif
1573
1574
/* note : no btultra2 variant for extDict nor dictMatchState,
1575
 * because btultra2 is not meant to work with dictionaries
1576
 * and is only specific for the first block (no prefix) */