release/src/router/lzo/src/lzo1b_r.ch

   1 /* lzo1b_r.ch -- literal run handling for the the LZO1B/LZO1C 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 /***********************************************************************
  45 // store a literal run (internal)
  46 ************************************************************************/
  47
  48 LZO_PUBLIC(lzo_bytep )
  49 STORE_RUN ( lzo_bytep const oo, const lzo_bytep const ii, lzo_uint r_len)
  50 {
  51     register lzo_bytep op;
  52     register const lzo_bytep ip;
  53     register lzo_uint t;
  54
  55     LZO_STATS(lzo_stats->literals += r_len);
  56
  57     op = oo;
  58     ip = ii;
  59     assert(r_len > 0);
  60
  61     /* code a long R0 run */
  62     if (r_len >= 512)
  63     {
  64         unsigned r_bits = 6;        /* 256 << 6 == 16384 */
  65         lzo_uint tt = 32768u;
  66
  67         while (r_len >= (t = tt))
  68         {
  69             r_len -= t;
  70             *op++ = 0; *op++ = (R0FAST - R0MIN) + 7;
  71             MEMCPY8_DS(op, ip, t);
  72             LZO_STATS(lzo_stats->r0long_runs++);
  73         }
  74         tt >>= 1;
  75         do {
  76             if (r_len >= (t = tt))
  77             {
  78                 r_len -= t;
  79                 *op++ = 0; *op++ = LZO_BYTE((R0FAST - R0MIN) + r_bits);
  80                 MEMCPY8_DS(op, ip, t);
  81                 LZO_STATS(lzo_stats->r0long_runs++);
  82             }
  83             tt >>= 1;
  84         } while (--r_bits > 0);
  85     }
  86     assert(r_len < 512);
  87
  88     while (r_len >= (t = R0FAST))
  89     {
  90         r_len -= t;
  91         *op++ = 0; *op++ = (R0FAST - R0MIN);
  92         MEMCPY8_DS(op, ip, t);
  93         LZO_STATS(lzo_stats->r0fast_runs++);
  94     }
  95
  96     t = r_len;
  97     if (t >= R0MIN)
  98     {
  99         /* code a short R0 run */
 100         *op++ = 0; *op++ = LZO_BYTE(t - R0MIN);
 101         MEMCPY_DS(op, ip, t);
 102         LZO_STATS(lzo_stats->r0short_runs++);
 103     }
 104     else if (t > 0)
 105     {
 106         /* code a short literal run */
 107         LZO_STATS(lzo_stats->lit_runs++);
 108         LZO_STATS(lzo_stats->lit_run[t]++);
 109         *op++ = LZO_BYTE(t);
 110         MEMCPY_DS(op, ip, t);
 111     }
 112
 113     return op;
 114 }
 115
 116
 117 /*
 118 vi:ts=4:et
 119 */
 120