Blame src/lzo1c_cc.c

Packit Service 5195f2
/* lzo1c_cc.c -- LZO1C compression internal entry point
Packit Service 5195f2
Packit Service 5195f2
   This file is part of the LZO real-time data compression library.
Packit Service 5195f2
Packit Service 5195f2
   Copyright (C) 1996-2014 Markus Franz Xaver Johannes Oberhumer
Packit Service 5195f2
   All Rights Reserved.
Packit Service 5195f2
Packit Service 5195f2
   The LZO library is free software; you can redistribute it and/or
Packit Service 5195f2
   modify it under the terms of the GNU General Public License as
Packit Service 5195f2
   published by the Free Software Foundation; either version 2 of
Packit Service 5195f2
   the License, or (at your option) any later version.
Packit Service 5195f2
Packit Service 5195f2
   The LZO library is distributed in the hope that it will be useful,
Packit Service 5195f2
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit Service 5195f2
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit Service 5195f2
   GNU General Public License for more details.
Packit Service 5195f2
Packit Service 5195f2
   You should have received a copy of the GNU General Public License
Packit Service 5195f2
   along with the LZO library; see the file COPYING.
Packit Service 5195f2
   If not, write to the Free Software Foundation, Inc.,
Packit Service 5195f2
   51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
Packit Service 5195f2
Packit Service 5195f2
   Markus F.X.J. Oberhumer
Packit Service 5195f2
   <markus@oberhumer.com>
Packit Service 5195f2
   http://www.oberhumer.com/opensource/lzo/
Packit Service 5195f2
 */
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
#define LZO_NEED_DICT_H 1
Packit Service 5195f2
#include "config1c.h"
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
/***********************************************************************
Packit Service 5195f2
// compression internal entry point.
Packit Service 5195f2
************************************************************************/
Packit Service 5195f2
Packit Service 5195f2
int _lzo1c_do_compress   ( const lzo_bytep in,  lzo_uint  in_len,
Packit Service 5195f2
                                 lzo_bytep out, lzo_uintp out_len,
Packit Service 5195f2
                                 lzo_voidp wrkmem,
Packit Service 5195f2
                                 lzo_compress_t func )
Packit Service 5195f2
{
Packit Service 5195f2
    int r;
Packit Service 5195f2
#if defined(LZO_TEST_COMPRESS_OVERRUN)
Packit Service 5195f2
    lzo_uint avail_out = *out_len;
Packit Service 5195f2
#endif
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
#if (LZO_COLLECT_STATS)
Packit Service 5195f2
    _lzo1c_stats_init(lzo_stats);
Packit Service 5195f2
    lzo_stats->in_len = in_len;
Packit Service 5195f2
#endif
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
    /* don't try to compress a block that's too short */
Packit Service 5195f2
    if (in_len == 0)
Packit Service 5195f2
    {
Packit Service 5195f2
        *out_len = 0;
Packit Service 5195f2
        r = LZO_E_OK;
Packit Service 5195f2
    }
Packit Service 5195f2
    else if (in_len <= MIN_LOOKAHEAD + 1)
Packit Service 5195f2
    {
Packit Service 5195f2
#if defined(LZO_RETURN_IF_NOT_COMPRESSIBLE)
Packit Service 5195f2
        *out_len = 0;
Packit Service 5195f2
        r = LZO_E_NOT_COMPRESSIBLE;
Packit Service 5195f2
#else
Packit Service 5195f2
        *out_len = pd(STORE_RUN(out,in,in_len), out);
Packit Service 5195f2
        r = (*out_len > in_len) ? LZO_E_OK : LZO_E_ERROR;
Packit Service 5195f2
#endif
Packit Service 5195f2
    }
Packit Service 5195f2
    else
Packit Service 5195f2
        r = func(in,in_len,out,out_len,wrkmem);
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
#if defined(LZO_EOF_CODE)
Packit Service 5195f2
#if defined(LZO_TEST_COMPRESS_OVERRUN)
Packit Service 5195f2
    if (r == LZO_E_OK && avail_out - *out_len < 3)
Packit Service 5195f2
        r = LZO_E_COMPRESS_OVERRUN;
Packit Service 5195f2
#endif
Packit Service 5195f2
    if (r == LZO_E_OK)
Packit Service 5195f2
    {
Packit Service 5195f2
        lzo_bytep op = out + *out_len;
Packit Service 5195f2
        op[0] = M3_MARKER | 1;
Packit Service 5195f2
        op[1] = 0;
Packit Service 5195f2
        op[2] = 0;
Packit Service 5195f2
        *out_len += 3;
Packit Service 5195f2
    }
Packit Service 5195f2
#endif
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
#if (LZO_COLLECT_STATS)
Packit Service 5195f2
    lzo_stats->out_len = *out_len;
Packit Service 5195f2
    lzo_stats->match_bytes =
Packit Service 5195f2
       1 * lzo_stats->m1_matches + 2 * lzo_stats->m2_matches +
Packit Service 5195f2
       3 * lzo_stats->m3_matches + 4 * lzo_stats->m4_matches;
Packit Service 5195f2
    _lzo1c_stats_calc(lzo_stats);
Packit Service 5195f2
#endif
Packit Service 5195f2
Packit Service 5195f2
    return r;
Packit Service 5195f2
}
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
/***********************************************************************
Packit Service 5195f2
// note: this is not thread safe, but as it is used for finetuning only
Packit Service 5195f2
//       we don't care
Packit Service 5195f2
************************************************************************/
Packit Service 5195f2
Packit Service 5195f2
#undef lzo_stats
Packit Service 5195f2
/* lzo_stats_t is still defined */
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
#if (LZO_COLLECT_STATS)
Packit Service 5195f2
Packit Service 5195f2
static lzo_stats_t lzo_statistics;
Packit Service 5195f2
lzo_stats_t * const lzo1c_stats = &lzo_statistics;
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
void _lzo1c_stats_init(lzo_stats_t *lzo_stats)
Packit Service 5195f2
{
Packit Service 5195f2
    lzo_memset(lzo_stats,0,sizeof(*lzo_stats));
Packit Service 5195f2
}
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
void _lzo1c_stats_calc(lzo_stats_t *lzo_stats)
Packit Service 5195f2
{
Packit Service 5195f2
    lzo_stats->matches =
Packit Service 5195f2
       lzo_stats->m1_matches + lzo_stats->m2_matches +
Packit Service 5195f2
       lzo_stats->m3_matches + lzo_stats->m4_matches;
Packit Service 5195f2
Packit Service 5195f2
    lzo_stats->literal_overhead = lzo_stats->lit_runs +
Packit Service 5195f2
       2 * (lzo_stats->r0short_runs + lzo_stats->r0fast_runs +
Packit Service 5195f2
            lzo_stats->r0long_runs);
Packit Service 5195f2
    lzo_stats->literal_bytes = lzo_stats->literals +
Packit Service 5195f2
       lzo_stats->literal_overhead;
Packit Service 5195f2
Packit Service 5195f2
#if 0
Packit Service 5195f2
    assert(lzo_stats->match_bytes + lzo_stats->literal_bytes ==
Packit Service 5195f2
       lzo_stats->out_len);
Packit Service 5195f2
#endif
Packit Service 5195f2
Packit Service 5195f2
    lzo_stats->m2_matches -= lzo_stats->r1_matches;
Packit Service 5195f2
    lzo_stats->m2_match[M2_MIN_LEN] -= lzo_stats->r1_matches;
Packit Service 5195f2
Packit Service 5195f2
    if (lzo_stats->literals > 0)
Packit Service 5195f2
        lzo_stats->literal_overhead_percent =
Packit Service 5195f2
           100.0 * lzo_stats->literal_overhead / lzo_stats->literals;
Packit Service 5195f2
}
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
#endif
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
/*
Packit Service 5195f2
vi:ts=4:et
Packit Service 5195f2
*/
Packit Service 5195f2