release/src/router/lzo/src/lzo1a_cr.ch

   1 /* lzo1a_cr.ch -- literal run handling for the the LZO1A algorithm
   2
   3    This file is part of the LZO real-time data compression library.
   4
   5    Copyright (C) 2011 Markus Franz Xaver Johannes Oberhumer
   6    Copyright (C) 2010 Markus Franz Xaver Johannes Oberhumer
   7    Copyright (C) 2009 Markus Franz Xaver Johannes Oberhumer
   8    Copyright (C) 2008 Markus Franz Xaver Johannes Oberhumer
   9    Copyright (C) 2007 Markus Franz Xaver Johannes Oberhumer
  10    Copyright (C) 2006 Markus Franz Xaver Johannes Oberhumer
  11    Copyright (C) 2005 Markus Franz Xaver Johannes Oberhumer
  12    Copyright (C) 2004 Markus Franz Xaver Johannes Oberhumer
  13    Copyright (C) 2003 Markus Franz Xaver Johannes Oberhumer
  14    Copyright (C) 2002 Markus Franz Xaver Johannes Oberhumer
  15    Copyright (C) 2001 Markus Franz Xaver Johannes Oberhumer
  16    Copyright (C) 2000 Markus Franz Xaver Johannes Oberhumer
  17    Copyright (C) 1999 Markus Franz Xaver Johannes Oberhumer
  18    Copyright (C) 1998 Markus Franz Xaver Johannes Oberhumer
  19    Copyright (C) 1997 Markus Franz Xaver Johannes Oberhumer
  20    Copyright (C) 1996 Markus Franz Xaver Johannes Oberhumer
  21    All Rights Reserved.
  22
  23    The LZO library is free software; you can redistribute it and/or
  24    modify it under the terms of the GNU General Public License as
  25    published by the Free Software Foundation; either version 2 of
  26    the License, or (at your option) any later version.
  27
  28    The LZO library is distributed in the hope that it will be useful,
  29    but WITHOUT ANY WARRANTY; without even the implied warranty of
  30    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  31    GNU General Public License for more details.
  32
  33    You should have received a copy of the GNU General Public License
  34    along with the LZO library; see the file COPYING.
  35    If not, write to the Free Software Foundation, Inc.,
  36    51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
  37
  38    Markus F.X.J. Oberhumer
  39    <markus@oberhumer.com>
  40    http://www.oberhumer.com/opensource/lzo/
  41  */
  42
  43
  44 /* WARNING: this file should *not* be used by applications. It is
  45    part of the implementation of the LZO package and is subject
  46    to change.
  47  */
  48
  49
  50 #ifndef __LZO1A_CR_H
  51 #define __LZO1A_CR_H 1
  52
  53
  54 /***********************************************************************
  55 // code a literal run
  56 ************************************************************************/
  57
  58 static lzo_bytep
  59 store_run(lzo_bytep const oo, const lzo_bytep const ii, lzo_uint r_len)
  60 {
  61     register lzo_bytep op;
  62     register const lzo_bytep ip;
  63     register lzo_uint t;
  64
  65     op = oo;
  66     ip = ii;
  67     assert(r_len > 0);
  68
  69     /* code a long R0 run */
  70     if (r_len >= 512)
  71     {
  72         unsigned r_bits = 6;        /* 256 << 6 == 16384 */
  73         lzo_uint tt = 32768u;
  74
  75         while (r_len >= (t = tt))
  76         {
  77             r_len -= t;
  78             *op++ = 0; *op++ = (R0MAX - R0MIN);
  79             MEMCPY8_DS(op, ip, t);
  80             LZO_STATS(lzo_stats->r0long_runs++);
  81         }
  82         tt >>= 1;
  83         do {
  84             if (r_len >= (t = tt))
  85             {
  86                 r_len -= t;
  87                 *op++ = 0; *op++ = LZO_BYTE((R0FAST - R0MIN) + r_bits);
  88                 MEMCPY8_DS(op, ip, t);
  89                 LZO_STATS(lzo_stats->r0long_runs++);
  90             }
  91             tt >>= 1;
  92         } while (--r_bits > 0);
  93     }
  94     assert(r_len < 512);
  95
  96     while (r_len >= (t = R0FAST))
  97     {
  98         r_len -= t;
  99         *op++ = 0; *op++ = (R0FAST - R0MIN);
 100         MEMCPY8_DS(op, ip, t);
 101         LZO_STATS(lzo_stats->r0fast_runs++);
 102     }
 103
 104     t = r_len;
 105     if (t >= R0MIN)
 106     {
 107         /* code a short R0 run */
 108         *op++ = 0; *op++ = LZO_BYTE(t - R0MIN);
 109         MEMCPY_DS(op, ip, t);
 110         LZO_STATS(lzo_stats->r0short_runs++);
 111     }
 112     else if (t > 0)
 113     {
 114         /* code a short literal run */
 115         LZO_STATS(lzo_stats->lit_runs++);
 116         LZO_STATS(lzo_stats->lit_run[t]++);
 117         *op++ = LZO_BYTE(t);
 118         MEMCPY_DS(op, ip, t);
 119     }
 120
 121     return op;
 122 }
 123
 124
 125
 126 #endif /* already included */
 127
 128 /*
 129 vi:ts=4:et
 130 */
 131