Разбор кода программы

// LZ_1.cpp: главный файл проекта.
 
#include "stdafx.h" 
#include <stdio.h> 
#include <stdlib.h> 
#include <conio.h> 
#include <locale.h>
using namespace std;
 
#using <mscorlib.dll> 
 
#define MAX 65535 
#define MAXLENGTH 1000000 
 
using namespace System; 
 
 FILE* f;
struct leave //Структура данных "Бор" 
{ 
 leave* parent; 
 leave* son[256]; 
 unsigned int num; 
}; 
 
unsigned int gnum = 0; 
int i = 0, n = 0; //вспомогательные переменные 
int length = 0; //Длина текста 
char ch = 0; //Буфер для чтения символа 
unsigned char s[MAXLENGTH]; //Строка с текстом 
int state = 0; //Номер состояния 
leave* p = 0; //указатель на текущий элемент Бора 
leave* root; //указатель на корень Бора 
 
void z0(void) 
{ 
 p = root; 
} 
void z1(void) 
{ 
 p = p->son[s[i]]; 
 i++; 
} 
 
void z2(void) 
{ 
 fprintf(f, " %d %d%c\n", gnum + 1, p->num, s[i]); 
 printf(" %d %d%c\n", gnum + 1, p->num, s[i]); 
 if (gnum < MAX) 
 { 
 p->son[s[i]] = new leave; 
 p->son[s[i]]->parent = p; 
 for (int j = 0; j < 256; j++) p->son[s[i]]->son[j] = 0; 
 p = p->son[s[i]]; 
 gnum++; 
 p->num = gnum; 
 } 
 i++; 
} 
 
bool x0(void) 
{ 
 return (p->son[s[i]] != 0); 
}  
bool x1(void) 
{ 
 return (i > n); 
} 
 
int main() 
{ 
    setlocale(LC_ALL, "Russian");
 //Инициалиазация "Бора" 
 root = new leave; 
 root->parent = 0; 
 for (i = 0; i < 256; i++) 
 root->son[i] = 0; 
 root->num = 0; 
 
 //Чтение из файла ------------------ 
  f = fopen("in.txt", "rt"); 
 
 i = 0; 
 while (ch != '~') 
 { 
 fscanf(f,"%c", &ch); 
    // ch=fgetc(f);
 if ((ch != '~') && (ch != 13)) 
 { 
 if (ch == ' ') ch = '_'; 
 printf("%c", ch); 
 s[i] = ch; 
 i++; 
 length++; 
 } 
 
 
 } 
 s[i] = 0; 
 n = i; 
 printf("\n"); 
 fclose(f); 
 //---------------------------- 
 
 i = 0; 
 
 int state = 0; 
 leave* p = 0; 
 int prev = 0; 
 
 f = fopen("out.txt", "wt"); 
 
 fprintf(f, "DYNAMIC DICTIONARY \n"); 
 
 //Основной модуль 
 
 while (state != 4) 
 { 
 switch (state) 
 { 
 
 case 0: z0(); state = 1; break; 
 
 case 1: if (x0()) state = 2; 
 else state = 3; 
 
 break; 
 
 case 2:  z1(); 
 state = 1; 
 
 break; 
 
 case 3: { 
 z2(); 
 
 if ((x1())) state = 4; else state = 0; 
 } 
 break; 
 } 
 } 
 
 //Вывод коэффициента сжатия 
 fprintf(f, "COMPRESSION RATIO = %0.4f", 3 * (double) gnum / (double) 
length); 
 
 fclose(f); 
 getch(); 
 return 0; 
}