本文格式為Word版，下載可任意編輯——哈夫曼文本壓縮C語言實現/*文件中有些參數定義的比較大，主要是為了適應較大文件的壓縮*/#include#include#include

#include//用以刪除多余的中間文件#defineM100000000000//最大字符數

intop,co[100];//編碼表的掃描指針，簡易棧co[]typedefstructHfnode//哈弗曼樹結點類型{

intdata;//權值域charzimu;//存儲字母

structHfnode*Lson,*Rson,*next;//兒子鏈域和森林鏈域

}Hfnode,*Hfptr;

typedefstructsnode//靜態數組結點類型{

charc;//字符intf1;//頻度}snode;

typedefstructLnode//編碼表結點類型{charc;structLnode*next;}Lnode,*Lptr;

voidgotoxy(intx,inty){COORDcoord;coord.X=x;coord.Y=y;

SetConsoleCursorPosition(GetStdHandle(STD_OUTPUT_HANDLE),coord);}

voidpaint1(){

inti,j;for(j=0;jc=fgetc(fp)p->next=newLnode;p=p->next;

/*putchar(ch[i]);*/i++;

}

putchar(10);fclose(fp);return(i-1);}

intstat(Lptrp,snodech2[],intnum)//統計函數{

inti,j,last=0;for(i=0;ic)j++;if(j==last){}

ch2[j].c=p->c;ch2[j].f1=1;last++;

elsech2[j].f1++;p=p->next;}

return(last);}

voidorder(snodech2[],intn)//冒泡排序{inti,j,k,t;

chara;

for(i=0;idata=M;//構造監視原結點for(i=0;inext=newHfnode;//申請結點

p=p->next;p->Lson=p->Rson=NULL;//做葉節點}

p->zimu=ch2[i].c;

p->data=ch2[i].f1;//讀入葉之權wi

p->next=h;//構成循環鏈returnh;

}

HfptrcreatHftree(Hfptrhead,intn)//構造樹{

inti;

Hfptrp,q,r,t1,t2;

for(i=1;inext;//t1,t2指向兩棵權最小的樹根t2=t1->next;

r->data=t1->data+t2->data;//權值相加r->Lson=t1;//t1,t2做新根r的左右兒子

r->Rson=t2;head->next=t2->next;//從森林中刪去t1,t2

q=head;//準備進行有序插入

p=head->next;//p是探尋指針，q是p的前驅while(1)//循環的為r尋覓有序位置

if(p->datadata)

{q=p;p=p->next;}//尚未找到時，繼續循環

else{r->next=p;q->next=r;break;}//找到后，插入p}//終止for循環

p=head->next;

deletehead;//刪去監視元

return(p);//返回huffman樹之根}

//構造完畢

Lptrpop(intlast){}

voidcodelist(Hfptrp,Lnodelist[],intlast,inta)//造編碼表的函數{if(p->Lson==NULL}

chartrans(inta[])//8位01整數轉換為10進制數{

intj=0,y=0;do

{

y=y+a[j]*(int)pow(2,7-j%8);j++;

list[op].next=pop(last);op++;

return;}

codelist(p->Lson,list,last+1,co[last]=0);codelist(p->Rson,list,last+1,co[last]=1);inti;Lptrhead,p;head=p=newLnode;for(i=0;ic=co[i];

p->next=newLnode;p=p->next;

}

p->c=-1;

return(head);

}while(j%8);return(y);

}

intrestoretree(snodech2[],intnum2,intnum1,charoutfile[])

{}

FILE*out1;inti=0,j=0;

if((out1=fopen(outfile,\{

printf(\文件開啟錯誤！\\n\exit(0);

}

fwrite(fwrite(j=j+4;

for(i=0;ic!=list[j].c)j++;p=list[j].next;i++;

q=q->next;j=0;

while(p->c!=-1p=p->next;

top++;if(top==8)

{fputc(trans(a),out);

top=0;

n++;}}}

if(topLson;elsep=p->Rson;

}

if(!feof(out1)fclose(out2);

DeleteFile(\if(i==-1)return0;elsereturn1;

voidmain(){

intnum1,num2,num3,choice,choice2;charoutfile[30];Lptrstrhead;

snodech2[300];

Lnodelist[3000];//編碼表HfptrHfroot,head;do

{gotoxy(25,0);

printf(\小型文本壓縮器\\n\

printf(\請輸入需要進行的操作：\\n1——壓縮；2——解壓\\n\strhead=newLnode;op=0;

scanf(\gotoxy(0,3);

if(choice==1)//壓縮部分{paint1();//優化界面函數

num1=putdata(strhead);//輸入函數，num1記錄字符總數num2=stat(strhead,ch2,num1);//統計函數，num2記錄葉子數order(ch2,num2);//排序函數

head=inition(num2,ch2);//調用初始化函數

Hfroot=creatHftree(head,num2);//調用造樹函數codelist(Hfroot,list,0,0);//造編碼表gotoxy(0,8);

scanf(\

gotoxy(0,11);

printf(\請稍后...\

num3=restoretree(ch2,num2,num1,outfile);//存儲哈夫曼樹

num3=num3+compress(strhead,list,num1,outfile);//壓縮函數，num3記錄壓縮后的字gotoxy(0,11);

printf(\計算壓縮率gotoxy(0,13);

符數

}{

elseif(choice==2)//還原部分

paint2();//優化界面函數if(recover(ch2))

printf(\操作成功！\

gotoxy(0,1