Бинарное дерево.Нужно исправить код - C++ - Ответ 3063323

#include <fstream.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <iomanip.h>
 
const char* filename = "dbase";
enum Action {INSERT, DEL, INFO};
enum Dir {LEFT, RIGHT};
const int l_time = 20, l_type = 40, l_number = 12;
 
struct Fine {                   //Штраф (элемент списка)
    char time[l_time];          //Время нарушения
    char type[l_type];          //Вид нарушения
    float price;                //Размер шрафа
    Fine* next;                 //Указатель на следующий элемент
};
 
struct Node {                   //Узел дерева
    char number[l_number];      //Номер автомобиля
    Fine* beg;                  //Указатель на начало списка нарушений
    Node* left;                 //Указатель на левое поддерево
    Node* right;                //Указатель на правое поддерево
};
 
struct Data{                    //Исходные данные
    char number[l_number];      //Номер автомобиля
    char time[l_time];          //Время нарушения
    char type[l_type];          //Вид нарушения
    float price;
};
 
 
Node*   descent(Node* p);
Node*   first(Data data);
Data    input(Action action);
int     menu();
void    print_node(const Node& node);
void    print_dbase(Node* p);
Node*   read_dbase(char* filename);
int     read_fine(ifstream f, Data& data);
int     remove_fine(Node* p, const Data& data);
void    remove_fines(Node* p);
 
Node* remove_node(Node* root,Node* p,Node* parent,Dir dir) ;
Node* remove_three(Node* p);
Node* search_insert(Node* root,const Data&data,Action action,Dir& dir,Node*& parent);
void    write_dbase(ofstream f, const Node* root);
void    write_node(ofstream f, const Node& node);
 
 
//--------------------------------------------
 
 
int main(){
    Node* p, *parent;
    Node* root = read_dbase(filename);
    ofstream fout;
 
    Dir dir;
    while (true){
        switch (menu()){
        case 1:                         //Ввод сведений о нарушении
            if (!root) root = first(input(INSERT));
            else search_insert(root, input(INSERT), INSERT, dir, parent);
            break;
 
        case 2:                         //Ввод сведений об уплате штрафа
            if (!root) {cout << "The base is empty" << endl;
            break;}
 
            Data data = input(DEL);
            if (!(p = search_insert(root, data, DEL, dir, parent)))
                cout << "There is no the info about a car" << endl;
            else
                if (remove_fine(p, data) == 2)              //Удалены все нарушения
                    root = remove_node(root, p, parent, dir);
            break;
 
        case 3:                             //Справка
            if (!root) {cout << "The base is empty" << endl;
            break;}
 
            if (!(p = search_insert(root, input(INFO), INFO, dir, parent)))
                cout << "There is no the info" << endl;
            else print_node(*p);
            break;
 
        case 4:                             //Выход
            fout.open(filename);
            if (!fout.is_open()) {
                cout << "Opening file error" << filename << endl;
                return 1;
            }
            //write_dbase(fout, root);
            return 0;
 
        case 5:                              //Отладка
            print_dbase(root);
            break;
        default:
            cout << "You must enter numbers from 1 to 4" << endl;
            break;
        }
 
    }
 
return 0;
 
}
 
//---------------------------Спуск по дереву
 
Node* descent(Node* p){
    Node* prev, *y = p->right;
    if(!y->left) y->left = p->left;         //1
    else {
        do { prev= y; y = y->left;}         //2
        while (y->left);
        y->left     = p->left;              //3
        prev->left  = y->right;             //4
        y->right    = p->right;             //5
    }
    return y;
 
}
 
//----------------------Формирование корневого элемента дерева
 
Node* first(Data data);
{
    //Создание записи о нарушении
    Fine* beg = new Fine;
    strncpy(beg->time, data.time, l_time);
    strncpy(beg->type, data.type, l_type);
    beg->price = data.price;
    beg->next = 0;
    //Создание первого узла дерева
    Node* root = new Node;
    strncpy(root->number, data.number, l_number);
    root->beg = beg;
    root->left = root->right = 0;
    return root;
 
}
 
//--------------------------Ввод нарушения
 
Data input(Action action) {
    Data data;
    char buf[10], temp1[3], temp2[3];
    int day, month, hour, min;
    cout << "Enter the number of the car" << endl;
    cin.getline(data.number, l_number);
    if (action == INFO) return data;
 
    do {
        cout << "Vvedite datu narusheniya v formate DD.MM.GG: "<< endl;
        cin >> buf;
        strncpy(temp1, buf, 2);
        strncpy(temp2, &buf[3], 2);
        day = atoi(temp1);
        month = atoi(temp2);
        }
    while (!(day > 0 && day < 32 && month > 0 && month < 13));
 
    strncpy(data.time, buf);
    strcat(data.time , " ");
 
    do {
        cout << "Vvedite vremya narusheniya v formate CHCH:MM : " << endl;
        cin >> buf;
        strncpy(temp1, buf, 2);
        strncpy(temp2, &buf[3], 2);;
        hour = atoi(temp1);
        min = atoi(temp2);
        }
    while (!(hour >= 0 && hour < 24 && min >= 0 && min < 60 ));
 
    strcat(data.time, buf);
    cin.get();
    if (action == DEL) return data;
 
    cout << "Vvedite tip narusheniya type" << endl;
    cin.getline(data.type, l_type);
 
    do{
        cout << "Vvedite razmer shtrafa: " << endl;
        cin >> buf;
        }
    while (!(data.price = (float)atof(buf)));
    cin.get();
    return data;
 
}
 
//---------------------------------------Вывод меню
 
int menu(){
    char buf[10];
    int option;
 
    do {
        cout << "===============================" << endl;
        cout << "1 - Vvod svedeniy o narushenii" << endl;
        cout << "2 - Vvod svedeniy ob uplate shtrafa" << endl;
        cout << "3 - Spravka" << endl;
        cout << "4 - Vyhod" << endl;
        cout << "===============================" << endl;
 
        cin >> buf;
        option = atoi(buf);
    }
    while (!option);
    cin.get();
    return option;
 
}
 
//--------------------------------------Вывод на экран сведений об а/м
 
void print_node(const Node& node){
    cout << "Nomer a/m" << node.number << endl;
    Fine* pf = node.beg;
    float summa = 0;
    while (pf) {
        cout << "Vid narusheniya: " << pf->type << endl;
        cout << "Data i vremya: " << pf->time;
        cout << "Razmer shtrafa: " << pf->price << endl;
        summa += pf->price;
        pf = pf->next;
    }
 
    cout << "Obshchaya summa shtrafov: " << summa << endl;
 
}
 
//----------------------------------Вывод на экран всего дерева
 
void print_dbase(Node *p) {
    if (p) {
        print_node(*p);
        print_dbase (p->left);
        print_dbase (p->right);
        }
}
 
Node* read_dbase (char* filename){
    Node *parent;
    Dir dir;
    Data data;
    ifstream f(filename. ios::in | ios::nocreate);
    if (!f) { cout << "not file" << filename << endl;return 0;
    }
 
f.getline(data.number,l_number);
 
if(f.eof()) {
    cout << "pustoy fail (0 bit)" << endl;
    return 0;
    }
 
read_fine(f.data);                  //первое нарушение
Node* root = first(data);             //форматирование корня дерева
while (!read_fine(f. data))         //последующие нарушения
    search_insert(root, data, INSERT, dir, parent);
 
//формирование дерева
while (f.getline(data.number, l_nimber)){               //номер а/м
    read_fine(f, data);                                 //первое нарушение
    search_insert(root, data, INSERT, dir, parent);
    while (!read_fine(f, data))                         //последующие нарушения
        search_insert(root, data, INSERT, dir, parent);
}
    return root;
 
 
 
//----------------------------------чтение из файла информации о нарушении
 
int read_fine(ifstream f, Data& data) {
    f.getline(data.time, l_time);
    if(data.time[0] == '=') return 1;               //конец списка нарушений
    f.getline(data.type, l_tupe);
    f >> data.price;
    f.get();
return 0;                                           //нарушение считано успешно
}
 
//------------------------------------удаление нарушения из списка
 
int remove_fine(Node* p, const Data& data){
    Fine* prev, *pf = p->beg;
    bool found = false;
    while (pf && !found){                           //Цикл по списку нарушений
        if (!strcmp(pf->time, data.time))
            found = true;                           //Нарушение найдено
        else{
            prev = pf;
            pf = pf->next;                           //Переход к следующему элементу списка
        }
    }
 
    if (!found){
        cout << "сведения о нарушении отсутсвуют." << endl;
        return 1;
    }
 
    if (pf == p->beg)                                  //Удаление из начала
        p->beg = pf->next;
    else                                                //Удаление из середины или конца
        prev->next = pf=>next;
    delete pf;                                          //Освобождение памяти из-под элемента
 
    if (!p->beg) return 2;                              //Список пуст
    return 0;
 
//-----------------------------Удаление узла дерева
 
Node* remove_node(Node* root, Node* p, Node* parent, Dir dir){
    Node *y;                                          //Узел, замещающий удаляемый
    if (!p->left) y=p->right;
    else if (p->right) y=p->left;
    else y=descent(p);
    if (p == root) root = y;
    else {
        if (dir == LEFT) parent->left =y;
        else parent->right = y;
    }
    delete p;
    return root;
}
 
//----------------------------поиск с включением
 
Node* search_insert(Node* root, const Data& data, Action action, Dir& dir, Node*& parent){
    Node* p = root;                         //Указатель на текущий элемент
    bool found = false;                     //Признак успешного поиска
    int cmp;                                 //Результат сравнения ключей
 
    parent = 0;
    while (p && !found){                        //Цикл поиска по дереву
        cmp = strcmp(data.number, p->number);   //Сравнение ключей
        if (!cmp) found = true;                 //НАшли
        else {
            parent = p;
            if (cmp<0) {p = p->left; dir = LEFT;}     //Спуск влево
            else {p = p-> right; dir = RIGHT;}         //Спуск вправо
            }
        }
if (action != INSERT) return p;
 
//создание записи о нарушении:
Fine* pf = new Fine;
strncmp(pf->time, data.time, l_time);
strncmp(pf->type, data.type, l_type);
pf->price = data.price;
pf->next = 0;
 
if (!found) {                   //Создание нового узла
    p=new Node;
    strncpy(pf->number, data.number, l_number);
    p->beg = pf;
    p->left = p->right = 0;
    if (dir == LEFT)               //Присоединение к левому поддереву предка
        parent->left = p;
    else
        parent->right = p;          //Присоединение к правому поддереву предка
}
 
else{                               //Узел существует, добавление нарушения в список
    Fine* temp = p->beg;
    while (temp->next) temp = temp->next;       //Поиск конца списка
    temp->next = pf;
    }
return p;
}
 
//----------------------------------------Вывод из базы в файл
void while_dbase(ofstream f, const Node *p){
    if (p) {
    white_node(f, *p);
    white_dbase(f, p->left);
    white_dbase(f, p->right);
    }
}
 
//-------------------------------Вывод в файл сведений об а/м
 
void write_node(ofstream f, const Node& node){
    f << node.number << endl;
    Fine* pf = node.beg;
    while(pf) {
        f << pf->time << endl << pf->type << endl << pf->price << endl;
        pf= pf->next;
        }
    f << '=' << endl;                   //Прихнак окончания сведений об а/м
    }
}
}