rle_comp.zip_fast rle_it

#include <stdio.h> #include <string.h> #define BYTE unsigned char //0123456789012345678901234567890 char orig[31] = "01234567890AAAAAAAAAAAAAA567890"; char comp[128]; int rle_compress(void *ds, void *sr, int len) { int c, l, div; char *s, *d, *p, *o; d = (char *)ds; p = o = (char*)sr; l = 0; div = 0; while (len > 0) { c = 0; s = p; while ((*p == *s) && (len)) { p++; c++; len--; } if ((c > 2) || (len == 0)) { if (c <= 2) { div += c; c ^= c; } if (div) { *d++ = div; l++; while (div) { *d++ = *o++; l++; div--; } } if (c) { l += 2; *d++ = -c; *d++ = *s; } o = p; } else { div += c; } } return(l); } void rle_expand(void *dst, void *src, int len) { __asm { xor eax, eax xor ecx, ecx mov edx, len mov ESI, src mov EDI, dst main_expand_loop: lodsb cmp AL, 0 jg copy_loop neg AL mov ECX, EAX sub EDX, EAX lodsb rep stosb and EDX, EDX jnz main_expand_loop copy_loop: mov ECX, EAX rep movsb sub EDX, EAX jnz main_expand_loop } /* int c; char *s, *d; d = (char*)ds; s = (char*)sr; while (len > 0) { c = *s++; if (c > 0) { len -= c; while (c--) *d++ = *s++; } else { len += c; while (c++) *d++ = *s; s++; } } */ } void main(void) { int len; printf("original: %s\n", orig); len = rle_compress(comp,orig,31); printf("compressed size: %d\n", len); memset(orig,0,31); rle_expand(orig,comp,31); printf("expanded: %s\n", orig); }