1/* align.c -- test alignment (important for 16-bit systems) 2 3 This file is part of the LZO real-time data compression library. 4 5 Copyright (C) 2008 Markus Franz Xaver Johannes Oberhumer 6 Copyright (C) 2007 Markus Franz Xaver Johannes Oberhumer 7 Copyright (C) 2006 Markus Franz Xaver Johannes Oberhumer 8 Copyright (C) 2005 Markus Franz Xaver Johannes Oberhumer 9 Copyright (C) 2004 Markus Franz Xaver Johannes Oberhumer 10 Copyright (C) 2003 Markus Franz Xaver Johannes Oberhumer 11 Copyright (C) 2002 Markus Franz Xaver Johannes Oberhumer 12 Copyright (C) 2001 Markus Franz Xaver Johannes Oberhumer 13 Copyright (C) 2000 Markus Franz Xaver Johannes Oberhumer 14 Copyright (C) 1999 Markus Franz Xaver Johannes Oberhumer 15 Copyright (C) 1998 Markus Franz Xaver Johannes Oberhumer 16 Copyright (C) 1997 Markus Franz Xaver Johannes Oberhumer 17 Copyright (C) 1996 Markus Franz Xaver Johannes Oberhumer 18 All Rights Reserved. 19 20 The LZO library is free software; you can redistribute it and/or 21 modify it under the terms of the GNU General Public License as 22 published by the Free Software Foundation; either version 2 of 23 the License, or (at your option) any later version. 24 25 The LZO library is distributed in the hope that it will be useful, 26 but WITHOUT ANY WARRANTY; without even the implied warranty of 27 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 28 GNU General Public License for more details. 29 30 You should have received a copy of the GNU General Public License 31 along with the LZO library; see the file COPYING. 32 If not, write to the Free Software Foundation, Inc., 33 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. 34 35 Markus F.X.J. Oberhumer 36 <markus@oberhumer.com> 37 http://www.oberhumer.com/opensource/lzo/ 38 */ 39 40 41#if 0 42#include "src/lzo_conf.h" 43#include "src/lzo_ptr.h" 44#endif 45#include "lzo/lzoconf.h" 46 47/* utility layer */ 48#define WANT_LZO_MALLOC 1 49#include "examples/portab.h" 50 51 52int opt_verbose = 0; 53 54 55/************************************************************************* 56// 57**************************************************************************/ 58 59long align_test(lzo_bytep block, lzo_uint len, lzo_uint step) 60{ 61 lzo_bytep b1 = block; 62 lzo_bytep b2 = block; 63 lzo_bytep k1 = NULL; 64 lzo_bytep k2 = NULL; 65 lzo_bytep k; 66 lzo_bytep x; 67 lzo_uint offset = 0; 68 long i = 0; 69 70 assert(step > 0); 71 assert(step <= 65536L); 72 assert((step & (step - 1)) == 0); 73 74 for (offset = step; offset < len; offset += step) 75 { 76 k1 = LZO_PTR_ALIGN_UP(b1+1,step); 77 k2 = b2 + offset; 78 if (k1 != k2) 79 { 80 printf("error 1: i %ld step %ld offset %ld: " 81 "%p (%ld) %p (%ld)\n", 82 i, (long) step, (long) offset, 83 k1, (long) (k1 - block), 84 k2, (long) (k2 - block)); 85 return 0; 86 } 87 if (k1 - step != b1) 88 { 89 printf("error 2: i %ld step %ld offset %ld: " 90 "%p (%ld) %p (%ld)\n", 91 i, (long) step, (long) offset, 92 b1, (long) (b1 - block), 93 k1, (long) (k1 - block)); 94 return 0; 95 } 96 97 assert(k1 > b1); 98 assert(k2 > b2); 99 assert((lzo_uint)(k2 - b2) == offset); 100 assert(k1 - offset == b2); 101#if defined(PTR_ALIGNED_4) 102 if (step == 4) 103 { 104 assert(PTR_ALIGNED_4(k1)); 105 assert(PTR_ALIGNED_4(k2)); 106 assert(PTR_ALIGNED2_4(k1,k2)); 107 } 108#endif 109#if defined(PTR_ALIGNED_8) 110 if (step == 8) 111 { 112 assert(PTR_ALIGNED_8(k1)); 113 assert(PTR_ALIGNED_8(k2)); 114 assert(PTR_ALIGNED2_8(k1,k2)); 115 } 116#endif 117#if defined(PTR_LINEAR) 118 assert((PTR_LINEAR(k1) & (step-1)) == 0); 119 assert((PTR_LINEAR(k2) & (step-1)) == 0); 120#endif 121 122 for (k = b1 + 1; k <= k1; k++) 123 { 124 x = LZO_PTR_ALIGN_UP(k,step); 125 if (x != k1) 126 { 127 printf("error 3: base: %p %p %p i %ld step %ld offset %ld: " 128 "%p (%ld) %p (%ld) %p (%ld)\n", 129 block, b1, b2, 130 i, (long) step, (long) offset, 131 k1, (long) (k1 - block), 132 k, (long) (k - block), 133 x, (long) (x - block)); 134 return 0; 135 } 136 } 137 138 b1 = k1; 139 i++; 140 } 141 142 return i; 143} 144 145 146/************************************************************************* 147// 148**************************************************************************/ 149 150#define BLOCK_LEN (128*1024L) 151 152int main(int argc, char *argv[]) 153{ 154 lzo_bytep buf; 155 lzo_uint step; 156 157 if (argc >= 2 && strcmp(argv[1],"-v") == 0) 158 opt_verbose = 1; 159 160 if (lzo_init() != LZO_E_OK) 161 { 162 printf("lzo_init() failed !!!\n"); 163 return 3; 164 } 165 buf = (lzo_bytep) lzo_malloc(2*BLOCK_LEN + 256); 166 if (buf == NULL) 167 { 168 printf("out of memory\n"); 169 return 2; 170 } 171 172 printf("Align init: %p ( 0x%lx )\n", buf, (unsigned long) buf); 173 174 for (step = 1; step <= 65536L; step *= 2) 175 { 176 lzo_bytep block = buf; 177 long n; 178 unsigned gap; 179 180 gap = __lzo_align_gap(block,step); 181 block = LZO_PTR_ALIGN_UP(block,step); 182 if (opt_verbose >= 1) 183 printf("STEP %5ld: GAP: %5lu %p %p %5ld\n", 184 (long) step, (long) gap, buf, block, 185 (long) (block - buf)); 186 n = align_test(block,BLOCK_LEN,step); 187 if (n == 0) 188 return 1; 189 if ((n + 1) * step != BLOCK_LEN) 190 { 191 printf("error 4: %ld %ld\n",(long)step,n); 192 return 1; 193 } 194 } 195 196 lzo_free(buf); 197 printf("Alignment test passed.\n"); 198 return 0; 199} 200 201 202/* 203vi:ts=4:et 204*/ 205 206