c代码
$cat main.c
#define SIGN_BIT (0x80) /* Sign bit for a A-law byte. */
#define QUANT_MASK (0xf) /* Quantization field mask. */
#define NSEGS (8) /* Number of A-law segments. */
#define SEG_SHIFT (4) /* Left shift for segment number. */
#define SEG_MASK (0x70) /* Segment field mask. */
static short seg_end[8] = {0xFF, 0x1FF, 0x3FF, 0x7FF,
0xFFF, 0x1FFF, 0x3FFF, 0x7FFF}; //分成不均匀的8个分段,算上负数,总共是16个分段
/* copy from CCITT G.711 specifications */
unsigned char _u2a[128] = { /* u- to A-law conversions */
1, 1, 2, 2, 3, 3, 4, 4,
5, 5, 6, 6, 7, 7, 8, 8,
9, 10, 11, 12, 13, 14, 15, 16,
17, 18, 19, 20, 21, 22, 23, 24,
25, 27, 29, 31, 33, 34, 35, 36,
37, 38, 39, 40, 41, 42, 43, 44,
46, 48, 49, 50, 51, 52, 53, 54,
55, 56, 57, 58, 59, 60, 61, 62,
64, 65, 66, 67, 68, 69, 70, 71,
72, 73, 74, 75, 76, 77, 78, 79,
81, 82, 83, 84, 85, 86, 87, 88,
89, 90, 91, 92, 93, 94, 95, 96,
97, 98, 99, 100,101,102,103,104,
105,106,107,108,109,110,111,112,
113,114,115,116,117,118,119,120,
121,122,123,124,125,126,127,128
};
unsigned char _a2u[128] = { /* A- to u-law conversions */
1, 3, 5, 7, 9, 11, 13, 15,
16, 17, 18, 19, 20, 21, 22, 23,
24, 25, 26, 27, 28, 29, 30, 31,
32, 32, 33, 33, 34, 34, 35, 35,
36, 37, 38, 39, 40, 41, 42, 43,
44, 45, 46, 47, 48, 48, 49, 49,
50, 51, 52, 53, 54, 55, 56, 57,
58, 59, 60, 61, 62, 63, 64, 64,
65, 66, 67, 68, 69, 70, 71, 72,
73, 74, 75, 76, 77, 78, 79, 79,
80, 81, 82, 83, 84, 85, 86, 87,
88, 89, 90, 91, 92, 93, 94, 95,
96, 97, 98, 99, 100,101,102,103,
104,105,106,107,108,109,110,111,
112,113,114,115,116,117,118,119,
120,121,122,123,124,125,126,127
};
static int search(int val,short *table,int size)
{
int i;
for (i = 0; i < size; i++) {
if (val <= *table++)
return (i);
}
return (size);
}
/*********************************************************************
* 输入参数范围 :-32768~32767
* 返回8位无符号整数
* linear2alaw() - Convert a 16-bit linear PCM value to 8-bit A-law
*
* linear2alaw() accepts an 16-bit integer and encodes it as A-law data.
*
* Linear Input Code Compressed Code
* ----------------- ------------------
* 0000000wxyza 000wxyz
* 0000001wxyza 001wxyz
* 000001wxyzab 010wxyz
* 00001wxyzabc 011wxyz
* 0001wxyzabcd 100wxyz
* 001wxyzabcde 101wxyz
* 01wxyzabcdef 110wxyz
* 1wxyzabcdefg 111wxyz
*
* For further information see John C. Bellamy's Digital Telephony, 1982,
* John Wiley & Sons, pps 98-111 and 472-476.
*********************************************************************/
unsigned char linear2alaw(int pcm_val) /* 2's complement (16-bit range) */
{
int mask;
int seg;
unsigned char aval;
if (pcm_val >= 0) {
mask = 0xD5; /* sign (7th) bit = 1 */
} else {
mask = 0x55; /* sign bit = 0 */
//pcm_val = -pcm_val - 8;
pcm_val = -pcm_val - 1;
}
/* Convert the scaled magnitude to segment number. */
seg = search(pcm_val, seg_end, 8); //返回pcm_val属于哪个分段
/* Combine the sign, segment, and quantization bits. */
if (seg >= 8) /* out of range, return maximum value. */
return (0x7F ^ mask);
else {
aval = seg << SEG_SHIFT; //aval为每一段的偏移,分段量化后的数据需要加上该偏移(aval)
//分段量化
//量化方法: (pcm_val-分段值),然后取有效的高4位 (0分段例外)
//比如 pcm_val = 0x7000 ,那么seg=7 ,第7段的范围是0x4000~0x7FFF ,段偏移aval=7<<4=0x7F
//0x7000-0x4000=0x3000 ,然后取有效的高4位,即右移10(seg+3),0x3000>>10=0xC
//上一步等效为:(0x7000>>10)&0xF=0xC 。也就是: (pcm_val >> (seg + 3)) & QUANT_MASK
//然后加上段偏移 0x7F(aval) ,加法等效于或运算,即 |aval
if (seg < 2)
aval |= (pcm_val >> 4) & QUANT_MASK; //0、1段折线的斜率一样
else
aval |= (pcm_val >> (seg + 3)) & QUANT_MASK;
return (aval ^ mask); //异或0x55,目的是尽量避免出现连续的0,或连续的1,提高传输过程的可靠性
}
}
/*********************************************************************
* alaw2linear() - Convert an A-law value to 16-bit linear PCM
*********************************************************************/
int alaw2linear(unsigned char a_val)
{
int t;
int seg;
a_val ^= 0x55;
t = (a_val & QUANT_MASK) << 4;
seg = ((unsigned)a_val & SEG_MASK) >> SEG_SHIFT;
switch (seg) {
case 0:
t += 8;
break;
case 1:
t += 0x108;
break;
default:
t += 0x108;
t <<= seg - 1;
}
return ((a_val & SIGN_BIT) ? t : -t);
}
int main(int argc, char* argv[])
{
int cmp;
int dcmp;
int d;
int i,j;
for(i=0;i<argc;i++)
printf("%s\n",argv[i]);
//return 0;
printf("start\n");
for(j=-32760;j<32760;j+=2000)
{
// scanf("%d",&d); //输入16位的整数
// printf("input:%d \n",d);
cmp=linear2alaw(j); //压缩成8位整数
dcmp=alaw2linear(cmp); //解压缩为16位整数
printf("ori=%d,cmp:%d , dcmp:%d \n",j,cmp,dcmp);
}
printf("j=%d i=%d over\n",j,i);
return 0;
}
c#代码:
$cat Program.cs
using System;
namespace l2a
{
class Program
{
readonly static int SIGN_BIT = (0x80) ; /* Sign bit for a A-law byte. */
readonly static int QUANT_MASK = (0xf); /* Quantization field mask. */
readonly static int SEG_SHIFT = (4); /* Left shift for segment number. */
readonly static int SEG_MASK = (0x70); /* Segment field mask. */
static short[] seg_end = {0xFF, 0x1FF, 0x3FF, 0x7FF,
0xFFF, 0x1FFF, 0x3FFF, 0x7FFF}; //分成不均匀的8个分段,算上负数,总共是16个分段
static byte[] _u2a = { /* u- to A-law conversions */
1, 1, 2, 2, 3, 3, 4, 4,
5, 5, 6, 6, 7, 7, 8, 8,
9, 10, 11, 12, 13, 14, 15, 16,
17, 18, 19, 20, 21, 22, 23, 24,
25, 27, 29, 31, 33, 34, 35, 36,
37, 38, 39, 40, 41, 42, 43, 44,
46, 48, 49, 50, 51, 52, 53, 54,
55, 56, 57, 58, 59, 60, 61, 62,
64, 65, 66, 67, 68, 69, 70, 71,
72, 73, 74, 75, 76, 77, 78, 79,
81, 82, 83, 84, 85, 86, 87, 88,
89, 90, 91, 92, 93, 94, 95, 96,
97, 98, 99, 100,101,102,103,104,
105,106,107,108,109,110,111,112,
113,114,115,116,117,118,119,120,
121,122,123,124,125,126,127,128
};
static byte[] _a2u = { /* A- to u-law conversions */
1, 3, 5, 7, 9, 11, 13, 15,
16, 17, 18, 19, 20, 21, 22, 23,
24, 25, 26, 27, 28, 29, 30, 31,
32, 32, 33, 33, 34, 34, 35, 35,
36, 37, 38, 39, 40, 41, 42, 43,
44, 45, 46, 47, 48, 48, 49, 49,
50, 51, 52, 53, 54, 55, 56, 57,
58, 59, 60, 61, 62, 63, 64, 64,
65, 66, 67, 68, 69, 70, 71, 72,
73, 74, 75, 76, 77, 78, 79, 79,
80, 81, 82, 83, 84, 85, 86, 87,
88, 89, 90, 91, 92, 93, 94, 95,
96, 97, 98, 99, 100,101,102,103,
104,105,106,107,108,109,110,111,
112,113,114,115,116,117,118,119,
120,121,122,123,124,125,126,127
};
static int search(int val,short []table,int size)
{
int i;
for (i = 0; i < size; i++) {
if (val <= table[i])
return (i);
}
return (size);
}
/*********************************************************************
* 输入参数范围 :-32768~32767
* 返回8位无符号整数
* linear2alaw() - Convert a 16-bit linear PCM value to 8-bit A-law
*
* linear2alaw() accepts an 16-bit integer and encodes it as A-law data.
*
* Linear Input Code Compressed Code
* ----------------- ------------------
* 0000000wxyza 000wxyz
* 0000001wxyza 001wxyz
* 000001wxyzab 010wxyz
* 00001wxyzabc 011wxyz
* 0001wxyzabcd 100wxyz
* 001wxyzabcde 101wxyz
* 01wxyzabcdef 110wxyz
* 1wxyzabcdefg 111wxyz
*
* For further information see John C. Bellamy's Digital Telephony, 1982,
* John Wiley & Sons, pps 98-111 and 472-476.
*********************************************************************/
static byte linear2alaw(int pcm_val) /* 2's complement (16-bit range) */
{
int mask;
int seg;
byte aval;
if (pcm_val >= 0) {
mask = 0xD5; /* sign (7th) bit = 1 */
} else {
mask = 0x55; /* sign bit = 0 */
//pcm_val = -pcm_val - 8;
pcm_val = -pcm_val - 1;
}
/* Convert the scaled magnitude to segment number. */
seg = search(pcm_val, seg_end, 8); //返回pcm_val属于哪个分段
/* Combine the sign, segment, and quantization bits. */
if (seg >= 8) /* out of range, return maximum value. */
return (byte)(0x7F ^ mask);
else {
aval = (byte)(seg << SEG_SHIFT); //aval为每一段的偏移,分段量化后的数据需要加上该偏移(aval)
//分段量化
//量化方法: (pcm_val-分段值),然后取有效的高4位 (0分段例外)
//比如 pcm_val = 0x7000 ,那么seg=7 ,第7段的范围是0x4000~0x7FFF ,段偏移aval=7<<4=0x7F
//0x7000-0x4000=0x3000 ,然后取有效的高4位,即右移10(seg+3),0x3000>>10=0xC
//上一步等效为:(0x7000>>10)&0xF=0xC 。也就是: (pcm_val >> (seg + 3)) & QUANT_MASK
//然后加上段偏移 0x7F(aval) ,加法等效于或运算,即 |aval
if (seg < 2)
aval |= (byte) ( (pcm_val >> 4) & QUANT_MASK); //0、1段折线的斜率一样
else
aval |= (byte)( (pcm_val >> (seg + 3)) & QUANT_MASK);
return (byte)(aval ^ mask); //异或0x55,目的是尽量避免出现连续的0,或连续的1,提高传输过程的可靠性
}
}
/*********************************************************************
* alaw2linear() - Convert an A-law value to 16-bit linear PCM
*********************************************************************/
static int alaw2linear(byte a_val)
{
int t;
int seg;
a_val ^= 0x55;
t = (a_val & QUANT_MASK) << 4;
seg = (a_val & SEG_MASK) >> SEG_SHIFT;
switch (seg) {
case 0:
t += 8;
break;
case 1:
t += 0x108;
break;
default:
t += 0x108;
t <<= seg - 1;
break;
}
return ((a_val & SIGN_BIT)!=0 ? t : -t);
}
static void Main(string[] args)
{
int cmp;
int dcmp;
int d;
int i,j;
for(i=0;i<args.Length;i++)
Console.WriteLine("%s\n",args[i]);
//return 0;
Console.WriteLine("start\n");
for(j=-32760;j<32760;j++)
{
// scanf("%d",&d); //输入16位的整数
// printf("input:%d \n",d);
cmp=linear2alaw(j); //压缩成8位整数
dcmp=alaw2linear((byte)cmp); //解压缩为16位整数
//Console.WriteLine(string.Format("ori={0} cmp={1} dcmp={2}",j,cmp,dcmp));
}
Console.WriteLine(string.Format("j={0} i={1} over",j,i));
}
}
}