Huffma编码经典程序.docVIP

Huffman编码经典程序（C语言版本） #include stdio.h #include stdlib.h #include string.h #define N 100 #define M 2*N-1 typedef char * HuffmanCode[2*M];//haffman编码 typedef struct { int weight;//权值 int parent;//父节节点 int LChild;//左子节点 int RChild;//右子节点 }HTNode,Huffman[M+1];//huffman树 typedef struct Node { int weight; //叶子结点的权值 char c; //叶子结点 int num; //叶子结点的二进制码的长度 }WNode,WeightNode[N]; /***产生叶子结点的字符和权值***/ void CreateWeight(char ch[],int *s,WeightNode CW,int *p) { int i,j,k; int tag; *p=0;//叶子节点个数 //统计字符出现个数,放入CW for(i=0;ch[i]!=\0;i++) { tag=1; for(j=0;ji;j++) if(ch[j]==ch[i]) { tag=0; break; } if(tag) { CW[++*p].c=ch[i]; CW[*p].weight=1; for(k=i+1;ch[k]!=\0;k++) if(ch[i]==ch[k]) CW[*p].weight++;//权值累加 } } *s=i;//字符串长度 } /********创建HuffmanTree********/ void CreateHuffmanTree(Huffman ht,WeightNode w,int n) { int i,j; int s1,s2; //初始化哈夫曼树 for(i=1;i=n;i++) { ht[i].weight =w[i].weight; ht[i].parent=0; ht[i].LChild=0; ht[i].RChild=0; } for(i=n+1;i=2*n-1;i++) { ht[i].weight=0; ht[i].parent=0; ht[i].LChild=0; ht[i].RChild=0; } for(i=n+1;i=2*n-1;i++) { for(j=1;j=i-1;j++) if(!ht[j].parent) break; s1=j; //找到第一个双亲不为零的结点 for(;j=i-1;j++) if(!ht[j].parent) s1=ht[s1].weightht[j].weight?j:s1; ht[s1].parent=i; ht[i].LChild=s1; for(j=1;j=i-1;j++) if(!ht[j].parent) break; s2=j; //找到第二个双亲不为零的结点 for(;j=i-1;j++) if(!ht[j].parent) s2=ht[s2].weightht[j].weight?j:s2; ht[s2].parent=i; ht[i].RChild=s2; ht[i].weight=ht[s1].weight+ht[s2].weight;//权值累加 } } /***********叶子结点的编码***********/ void CrtHuffmanNodeCode(Huffman ht,char ch[],HuffmanCode h,WeightNode weight,int m,int n) { int i,c,p,start; char *cd; cd=(char *)malloc(n*sizeof(char)); cd[n-1]=\0;//末尾置0 for(i=1;i=n;i++) { start=n-1; //cd串每次从末尾开始 c=i; p=ht[i].parent;//p在n+1至2n-1 while(p) //沿父亲方向遍历,直到为0 { start--;//依次向前置值 if(ht[p].LChild==c)//与左子相同,置0 cd[start]=0; else //否则置1 cd[start]=1; c=p; p=ht[p].parent; } weight[i].num=n-start; //二进制码的长度(包含末尾0) h[i]=(char *)malloc((n-start)*sizeof(char)); strcpy(h[i],cd[start]);//将二进制字符串拷贝到指针数组h中 } free(cd);//释放cd内存 syst