Blame src/lzo1a_cr.ch

Packit Service 5195f2
/* lzo1a_cr.ch -- literal run handling for the the LZO1A algorithm
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
/* WARNING: this file should *not* be used by applications. It is
Packit Service 5195f2
   part of the implementation of the LZO package and is subject
Packit Service 5195f2
   to change.
Packit Service 5195f2
 */
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
#ifndef __LZO1A_CR_H
Packit Service 5195f2
#define __LZO1A_CR_H 1
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
/***********************************************************************
Packit Service 5195f2
// code a literal run
Packit Service 5195f2
************************************************************************/
Packit Service 5195f2
Packit Service 5195f2
static lzo_bytep
Packit Service 5195f2
store_run(lzo_bytep const oo, const lzo_bytep const ii, lzo_uint r_len)
Packit Service 5195f2
{
Packit Service 5195f2
    lzo_bytep op;
Packit Service 5195f2
    const lzo_bytep ip;
Packit Service 5195f2
    lzo_uint t;
Packit Service 5195f2
Packit Service 5195f2
    op = oo;
Packit Service 5195f2
    ip = ii;
Packit Service 5195f2
    assert(r_len > 0);
Packit Service 5195f2
Packit Service 5195f2
    /* code a long R0 run */
Packit Service 5195f2
    if (r_len >= 512)
Packit Service 5195f2
    {
Packit Service 5195f2
        unsigned r_bits = 6;        /* 256 << 6 == 16384 */
Packit Service 5195f2
        lzo_uint tt = 32768u;
Packit Service 5195f2
Packit Service 5195f2
        while (r_len >= (t = tt))
Packit Service 5195f2
        {
Packit Service 5195f2
            r_len -= t;
Packit Service 5195f2
            *op++ = 0; *op++ = (R0MAX - R0MIN);
Packit Service 5195f2
            MEMCPY8_DS(op, ip, t);
Packit Service 5195f2
            LZO_STATS(lzo_stats->r0long_runs++);
Packit Service 5195f2
        }
Packit Service 5195f2
        tt >>= 1;
Packit Service 5195f2
        do {
Packit Service 5195f2
            if (r_len >= (t = tt))
Packit Service 5195f2
            {
Packit Service 5195f2
                r_len -= t;
Packit Service 5195f2
                *op++ = 0; *op++ = LZO_BYTE((R0FAST - R0MIN) + r_bits);
Packit Service 5195f2
                MEMCPY8_DS(op, ip, t);
Packit Service 5195f2
                LZO_STATS(lzo_stats->r0long_runs++);
Packit Service 5195f2
            }
Packit Service 5195f2
            tt >>= 1;
Packit Service 5195f2
        } while (--r_bits > 0);
Packit Service 5195f2
    }
Packit Service 5195f2
    assert(r_len < 512);
Packit Service 5195f2
Packit Service 5195f2
    while (r_len >= (t = R0FAST))
Packit Service 5195f2
    {
Packit Service 5195f2
        r_len -= t;
Packit Service 5195f2
        *op++ = 0; *op++ = (R0FAST - R0MIN);
Packit Service 5195f2
        MEMCPY8_DS(op, ip, t);
Packit Service 5195f2
        LZO_STATS(lzo_stats->r0fast_runs++);
Packit Service 5195f2
    }
Packit Service 5195f2
Packit Service 5195f2
    t = r_len;
Packit Service 5195f2
    if (t >= R0MIN)
Packit Service 5195f2
    {
Packit Service 5195f2
        /* code a short R0 run */
Packit Service 5195f2
        *op++ = 0; *op++ = LZO_BYTE(t - R0MIN);
Packit Service 5195f2
        MEMCPY_DS(op, ip, t);
Packit Service 5195f2
        LZO_STATS(lzo_stats->r0short_runs++);
Packit Service 5195f2
    }
Packit Service 5195f2
    else if (t > 0)
Packit Service 5195f2
    {
Packit Service 5195f2
        /* code a short literal run */
Packit Service 5195f2
        LZO_STATS(lzo_stats->lit_runs++);
Packit Service 5195f2
        LZO_STATS(lzo_stats->lit_run[t]++);
Packit Service 5195f2
        *op++ = LZO_BYTE(t);
Packit Service 5195f2
        MEMCPY_DS(op, ip, t);
Packit Service 5195f2
    }
Packit Service 5195f2
Packit Service 5195f2
    return op;
Packit Service 5195f2
}
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
Packit Service 5195f2
#endif /* already included */
Packit Service 5195f2
Packit Service 5195f2
/*
Packit Service 5195f2
vi:ts=4:et
Packit Service 5195f2
*/
Packit Service 5195f2