efront 4.29.1 → 4.30.0

package/coms/basic/encodeRange.js

@@ -1,107 +0,0 @@
-// 部分算法参考 https://www.cnblogs.com/jackyzzy/archive/2012/04/26/2471165.html
-"include ./encodeRange.h";
-var __dist, // buff
-	L = R_max, // low Cardinal
-	R = R_max, // range Cardinal
-	d = 0, // digits Cardinal
-	n = 0; // follow
-
-function OutputCode(t) {
-	t = t & 0xff;
-	__dist.push(t);
-}
-function init() {
-	L = R_max;
-	R = R_max;
-	n = 0;
-	d = 0;
-}
-function encode(cf, f, T) {
-	var i, H;
-	// 区间计算
-	R = R / T | 0;
-	L += cf * R;
-	R = f * R;
-	// 调整区间
-	while (R <= R_min) {
-		H = L + R - 1;
-		// 判断是否有延迟数字
-		if (n !== 0) {
-			if (H <= R_max) {
-				// 区间下沿
-				OutputCode(d);
-				for (i = 1; i < n; i++)OutputCode(0xff);
-				n = 0;
-				L += R_max;
-			}
-			else if (L >= R_max) {
-				// 区间上沿
-				OutputCode(d + 1);
-				for (i = 1; i < n; i++)OutputCode(0x00);
-				n = 0;
-			}
-			else {
-				// 趋向未定
-				n++;
-				// 扩展区间
-				L = shl(L, 8) & R_max - 1;
-				R = shl(R, 8);
-				continue;
-			}
-		}
-		// 判断最高位数字
-		if (((L ^ H) & shl(0xff, shift_bits)) === 0) {
-			// 出现不变数字
-			OutputCode(shr(L, shift_bits));
-		}
-		else {
-			// 出现延迟数字
-			L -= R_max;
-			d = shr(L, shift_bits);
-			n = 1;
-		}
-		// 扩展区间
-		L = shl(L, 8) & R_max - 1 | L & R_max;
-		L = shl(L, 0);
-		R = shl(R, 8);
-	}
-}
-function finish() {
-	var i;
-	if (n !== 0) {
-		if (L < R_max) {
-			// 趋向下沿
-			OutputCode(d);
-			for (i = 1; i < n; i++)OutputCode(0xff);
-		}
-		else {
-			// 走向上沿
-			OutputCode(d + 1);
-			for (i = 1; i < n; i++)OutputCode(0x00);
-		}
-	}
-	// 输出剩余编码
-	L = shl(L, 1);
-	i = code_bits + 1;
-	do {
-		i -= 8;
-		OutputCode(shr(L, i) & 0xff);
-	} while (i > 0);
-}
-function main(buff) {
-	init();
-	var tree = new BitTree(symbol_no);
-	var dist = __dist = [];
-	writeLEB128(dist, 0, buff.length);
-	for (var cx = 0, dx = buff.length; cx < dx; cx++) {
-		var b = buff[cx];
-		var f = tree.counts[b];
-		var cf = tree.sumTo(b);
-		encode(cf, f, tree.total);
-		tree.count(b);
-	}
-	finish();
-	__dist = null;
-	return dist;
-}
-module.exports = main;

package/coms/basic/encodeRange_test.js

@@ -1,40 +0,0 @@
-function test(size) {
-    var source = Array(size);
-    for (var cx = 0, dx = source.length; cx < dx; cx++)source[cx] = 32 + Math.random() * 80 | 0;
-    var time = new Date;
-    var encoded = encodeRange(source);
-    var d1 = new Date - time;
-    time = new Date;
-    var decoded = decodeRange(encoded);
-    var d2 = new Date - time;
-    for (var cx = 0, dx = size + 1; cx < dx; cx++) {
-        if (decoded[cx] !== source[cx]) {
-            console.log({
-                size,
-                source,
-                encoded,
-                decoded,
-                cx,
-                scx: source[cx],
-                ecx: encoded[cx],
-                dcx: decoded[cx],
-            })
-            throw new Error(i18n`解码异常！`);
-        }
-    }
-    console.log({
-        数据大小: source.length,
-        压缩后大小: encoded.length,
-        编码用时: d1,
-        解码用时: d2,
-    })
-}
-test(20);
-test(200);
-test(1024);
-test(2048);
-test(20480);
-test(204800);
-test(2048000);
-// test(20480000);
-// test(80000000);

package/coms/basic/readBinary.asm

@@ -1,77 +0,0 @@
-readBinary proc buff,bitoffset,bitlength
-    local num,index,bitdelta,delta
-    mov eax,90007h
-    mov num,0
-    mov eax,bitoffset
-    shr eax,3
-    mov index,eax
-    mov ebx,bitoffset
-    shl eax,3
-    sub ebx,eax
-    mov bitdelta,ebx
-    .if bitdelta
-        mov eax,8
-        sub eax,ebx
-        mov bitdelta,eax
-        mov ebx,buff
-        add ebx,index
-        mov eax,0
-        mov al,BYTE ptr[ebx]
-        mov delta,eax
-        mov eax,index
-        inc eax
-        mov index,eax
-        mov eax,bitlength
-        sub eax,bitdelta
-        mov bitlength,eax
-        mov eax,1
-        mov ecx,bitdelta
-        shl eax,cl
-        sub eax,1
-        and eax,delta
-        mov num,eax
-        mov eax,bitlength
-        and eax,07fffffffh
-        .if bitlength !=eax
-            mov eax,0
-            sub eax,bitlength
-            mov ecx,eax
-            mov eax,num
-            shr eax,cl
-            mov num,eax
-            mov bitlength,0
-        .endif
-    .endif
-    .while bitlength>=8
-        mov eax,bitlength
-        sub eax,8
-        mov bitlength,eax
-        mov eax,num
-        shl eax,8
-        mov ebx,buff
-        add ebx,index
-        mov al,BYTE ptr[ebx]
-        mov num,eax
-        mov eax,index
-        inc eax
-        mov index,eax
-    .endw
-    .if bitlength
-        mov ebx,buff
-        add ebx,index
-        mov al,BYTE ptr[ebx]
-        and eax,0ffh
-        mov delta,eax
-        mov eax,num
-        mov ecx,bitlength
-        shl eax,cl
-        mov ecx,8
-        sub ecx,bitlength
-        mov ebx,delta
-        shr ebx,cl
-        or eax,ebx
-        mov num,eax
-    .endif
-    mov eax,num
-    ret
-readBinary endp

package/coms/basic/readBinary.js

@@ -1,31 +0,0 @@
-/**
- * 从二进制读取指定长度的数据
- * @param {Buffer} buff 
- * @param {number} bitoffset 
- * @param {number} bitlength 不大于31
- * @returns 0x7fffffff以内的正整数
- */
-function readBinary(buff, bitoffset, bitlength) {
-    var num = 0, index = bitoffset >> 3;
-    var bitdelta = bitoffset - (index << 3);
-    if (bitdelta > 0) {
-        bitdelta = 8 - bitdelta;
-        var delta = buff[index++];
-        bitlength -= bitdelta;
-        num = delta & (1 << bitdelta) - 1;
-        if (bitlength < 0) {
-            num = num >> -bitlength;
-            bitlength = 0;
-        }
-    }
-    while (bitlength >= 8) {
-        bitlength -= 8;
-        num = num << 8 | buff[index++];
-    }
-    if (bitlength > 0) {
-        var delta = buff[index];
-        num = num << bitlength | delta >> 8 - bitlength;
-    }
-    return num;
-}
-module.exports = readBinary;

package/coms/basic/writeBinary.js

@@ -1,37 +0,0 @@
-/**
- * 写入指定长度的二进制数据
- * @param {Buffer} buff 
- * @param {number} bitoffset 
- * @param {number} bitlength 不大于31
- * @param {number} binary 不大于0x7fffffff
- */
-function writeBinary(buff, bitoffset, bitlength, binary) {
-    var index = bitoffset >> 3;
-    var bitdelta = bitoffset - (index << 3);
-    if (bitdelta > 0) {
-        bitdelta = 8 - bitdelta;
-        var delta = buff[index];
-        bitlength -= bitdelta;
-        var rest = 0;
-        if (bitlength < 0) {
-            rest = -bitlength;
-            bitlength = 0;
-        }
-        delta = delta & (1 << 8) - (1 << bitdelta) | binary >> bitlength << rest | delta & (1 << rest) - 1;
-        buff[index] = delta;
-        binary = binary & (1 << bitlength) - 1;
-        index++;
-    }
-    while (bitlength >= 8) {
-        bitlength -= 8;
-        buff[index++] = binary >> bitlength;
-        binary = binary & (1 << bitlength) - 1;
-    }
-    if (bitlength > 0) {
-        var delta = buff[index];
-        bitdelta = 8 - bitlength;
-        delta = delta & (1 << bitdelta) - 1 | binary << bitdelta
-        buff[index] = delta;
-    }
-}
-module.exports = writeBinary;