Lab_10.8

#include <cstdio>
#include <cstdlib>
#include <windows.h>
#include <conio.h>

struct Book
{
    char* author;
    char* name;
    int pages;
    int price;
};

Book DefaultBook()
{
    Book book;
    book.author = (char*)"author";
    book.name = (char*)"name";
    book.pages = 0;
    book.price = 0;
    return book;
}

Book* DefaultBook(int &Size)
{
    Size = 1;
    Book* books = new Book[Size];
    books[0] = DefaultBook();
    return books;
}

///////////////////////////////////////////
//Перегрузка функции strcpy в другом виде//
///////////////////////////////////////////
char* myStrCpy(char* str, int &start, char symbol_stop) //Строка которую читаем, позиция с которой необходимо считать, символ на котором чтение будет закончено
{
    char* buffer = NULL;
    int bufferSize = 0;
    while(str[start + bufferSize] != symbol_stop)
    {
        bufferSize++;
    }
    buffer = new char[bufferSize + 1];
    for(int currentCursor = 0; currentCursor < bufferSize; currentCursor++)
        buffer[currentCursor] = str[start + currentCursor];
    buffer[bufferSize] = '\0';
    start += bufferSize + 1;
    return buffer;
}

int LengthNumber(int a)
{
    int length = 0;
    while(a){
        a/=10;
        length++;
    }
    return length;
}

Book* FileRead(int &booksSize, char* fileName)
{
    FILE* f = fopen(fileName, "rb"); //Открываем файл в бинарном виде
    char* buffer = NULL;
    int bufferSize = 0;

    ////////////////////////////
    //Чтение из файла в строку//
    ////////////////////////////
    if(f == NULL)
        fputs("Ошибка файла", stderr);
    else
    {
        fseek(f, 0, SEEK_END); // переместить внутренний указатель в конец файла
        long lSize = ftell(f); // вернуть текущее положение внутреннего указателя
        rewind(f); // установить внутренний указатель файла в начало

        bufferSize = sizeof(char) * lSize; // вычисляем размер будущей строки для хранения данных из файла
        buffer = new char[bufferSize];
        if(buffer == NULL)
            fputs("Ошибка памяти", stderr);
        else
        {
            size_t result = fread(buffer, 1, lSize, f); // считываем файл в буфер
            if(result != lSize)
                fputs("Ошибка чтения", stderr);
        }
    }
    fclose(f);

    //////////////////////////////////
    //Разбивание буфера на структуры//
    //////////////////////////////////
    booksSize = 0;
    for(int i = 0; i < bufferSize; i++) //Считаем будущее количество структур типа Book
        if(buffer[i] == '\n')
            booksSize++;
    Book* books = new Book[booksSize];
    printf("Считанные данные:\n");
    int start = 0;
    for(int i = 0; i < booksSize; i++)
    {
        books[i].author = myStrCpy(buffer, start, ',');
        books[i].name = myStrCpy(buffer, start, ',');
        books[i].pages = atoi(myStrCpy(buffer, start, ','));
        books[i].price = atoi(myStrCpy(buffer, start, '\n'));
        printf("[%d] %s %s %d %d\n", i, books[i].author, books[i].name, books[i].pages, books[i].price);
    }

    delete buffer;
    printf("Для продолжения нажмите любую клавишу...\n");
    _getch();
    return books;
}

int FileWrite(char* fileName, Book* books, int Size)
{
    if(Size <= 0)
    {
        printf("Список книг пуст - нет смысла записывать данные.\nДля продолжения нажмите любую клавишу...\n");
        _getch();
        return 0;
    }
    else
    {
        FILE* f = fopen(fileName, "wb");
        rewind(f);
        for(int i = 0; i < Size; i++)
        {
            int bufferSize = strlen(books[i].author) + strlen(books[i].name) + LengthNumber(books[i].pages) + LengthNumber(books[i].price) + 6;
            char* buffer = new char[bufferSize];
            sprintf(buffer, "%s,%s,%d,%d\n", books[i].author, books[i].name, books[i].pages, books[i].price);
            fwrite(buffer, sizeof(char), sizeof(char) * bufferSize, f);
            delete[] buffer;
        }
        fclose(f);
        printf("В файл с именем %s было записано.\nДля продолжения нажмите любую клавишу...\n", fileName);
        _getch();
    }
    return 1;
}

int Write_int(bool zero = false)
{
    char str[10];
    int value;
    while(true)
    {
        scanf("%s", str);
        value = abs(atoi(str))? abs(atoi(str)) : 0;
        if (zero) break;
        if (!zero && value > 0)
            break;
        else
            printf("Введите значение |n| > 0: ");
    }
    return value;
}

Book* Book_Add(Book* books, int &Size, Book newBook)
{
    Size++;
    Book* copyBooks = new Book[Size];
    for (int i = 0; i < Size - 1; i++)
        copyBooks[i] = books[i];
    copyBooks[Size - 1].author = newBook.author;
    copyBooks[Size - 1].name = newBook.name;
    copyBooks[Size - 1].pages = newBook.pages;
    copyBooks[Size - 1].price = newBook.price;
    delete[] books;
    return copyBooks;
}

Book* Book_Remove(Book* books, int &Size, int Index)
{
    Size--;
    Book* copyBooks = new Book[Size];
    for (int i = 0; i < Index; ++i)
        copyBooks[i] = books[i];
    for (int i = Index; i < Size; ++i)
        copyBooks[i] = books[i + 1];
    delete[] books;
    return copyBooks;
}

//Редактор строки
char* strEdit(bool Number = false)
{
    system("cls");

    HANDLE hConsole = GetStdHandle(STD_OUTPUT_HANDLE);
    COORD pos;
    pos.Y = 1;
    pos.X = 0;
    char* cloneStr = NULL;
    char* str = NULL;

    printf("Строка:\n");

    while(true)
    {
        int symbol = _getch();

        cloneStr = new char[pos.X + 1];
        for (int i = 0; i < pos.X; i++)
            if (str[i] != '\0')
                cloneStr[i] = str[i];
        str = new char[pos.X + 1];
        for (int i = 0; i < pos.X; i++)
            str[i] = cloneStr[i];
        delete[] cloneStr;

        if (symbol >= 97 && symbol <= 122 && !Number && pos.X < 50)
        {
            str[pos.X] = symbol;
            printf("%c", str[pos.X]);
            pos.X++;
        }

        if(symbol == 32 && !Number && pos.X < 50)
        {
            str[pos.X] = ' ';
            printf("%c", ' ');
            pos.X++;
        }

        if(symbol >= 48 && symbol <= 58 && pos.X < 50 && Number)
        {
            str[pos.X] = symbol;
            printf("%c", str[pos.X]);
            pos.X++;
        }

        if (symbol == 8 && pos.X > 0)
        {
            str[pos.X] = ' ';
            pos.X--;
            SetConsoleCursorPosition(hConsole, pos);
            printf("%s", " ");
        }

        SetConsoleCursorPosition(hConsole, pos);
        if (symbol == 13)
        {
            str[pos.X] = '\0';
            break;
        }
    }
    delete[] cloneStr;
    return str;
}

//Редактор
Book Book_Edit(Book book, bool isCreated = false)
{
    Book copyBook;
    if(isCreated)
        copyBook = book;
    else
        copyBook = DefaultBook();
    bool RUN = true;
    while(RUN)
    {
        system("cls");
        printf("[Редактор книг]\n1.Автор\n2.Название\n3.Кол. стр.\n4.Цена\n5.Сохранить\n6.Не сохранять.\nВыбор: ");
        switch(Write_int())
        {
            case 1:
                copyBook.author = strEdit();
                break;
            case 2:
                copyBook.name = strEdit();
                break;
            case 3:
                copyBook.pages = atoi(strEdit(true));
                break;
            case 4:
                copyBook.price = atoi(strEdit(true));
                break;
            case 5:
                book = copyBook;
                RUN = false;
                break;
            case 6:
                if(!isCreated)
                    book = DefaultBook();
                RUN = false;
                break;
            default:
                break;
        }
    }
    return book;
}

Book* InputBook(Book* books, int &Size)
{
    bool RUN = true;
    while(RUN){
        system("cls");
        printf("[Редактирование списка]\n1.Добавить\n2.Изменить\n3.Удалить\n4.Назад\nВыбор: ");
        switch(Write_int())
        {
            case 1:
            {
                system("cls");
                Book newBook = DefaultBook();
                newBook = Book_Edit(newBook);
                books = Book_Add(books, Size, newBook);
                printf("Книга успешно была добавлена в список книг.\nДля продолжения нажмите любую клавишу...\n");
                _getch();
                break;
            }
            case 2:
            {
                system("cls");
                printf("[Изменить]\nИндекс: ");
                int index = Write_int(true);
                if(index >= Size)
                {
                    printf("Вы ввели индекс, который привышает размер списка книг.\nДля продолжения нажмите любую клавишу...\n");
                    _getch();
                    break;
                }
                books[index] = Book_Edit(books[index], true);
                printf("Книга успешно была изменена в списке книг.\nДля продолжения нажмите любую клавишу...\n");
                _getch();
                break;
            }
            case 3:
            {
                printf("[Удаление]\nВведите индекс:\n");
                int index = Write_int(true);
                if(index >= Size)
                {
                    printf("Вы ввели индекс, который привышает размер списка книг.\nДля продолжения нажмите любую клавишу...\n");
                    _getch();
                    break;
                }
                books = Book_Remove(books, Size, index);
                printf("Книга была удалена.\nДля продолжения нажмите любую клавишу...\n");
                _getch();
                break;
            }
            case 4:
                RUN = false;
                break;
            default:
                break;
        }
    }
    return books;
}

void OutputBooks(Book* books, int Size)
{
    int* index = new int[Size];
    for(int i = 0; i < Size; i++)
        index[i] = i;
    int temp = 0; //Временная переменная, чтобы менять индексы местами
    bool RUN = true, output = false;
    while(RUN)
    {
        system("cls");
        printf("[Вывод списка книг]\n1.По индексу\n2.По автору\n3.По названию\n4.По кол. стр.\n5.По Дате\n6.Рекомендация\n7.Назад\nВыбор: ");
        switch(Write_int())
        {
            case 1:
                RUN = false;
                output = true;
                break;
            case 2: //Сортировка по автору
                for (int i = 0; i < Size - 1; i++)
                    for (int j = 0; j < Size - i - 1; j++)
                        if (strcmp(books[index[j]].author, books[index[j + 1]].author)> 0)
                        {
                            temp = index[j];
                            index[j] = index[j + 1];
                            index[j + 1] = temp;
                        }
                RUN = false;
                output = true;
                break;
            case 3: //Сортировка по названию
                for (int i = 0; i < Size - 1; i++)
                    for (int j = 0; j < Size - i - 1; j++)
                        if (strcmp(books[index[j]].name, books[index[j + 1]].name)> 0)
                        {
                            temp = index[j];
                            index[j] = index[j + 1];
                            index[j + 1] = temp;
                        }
                RUN = false;
                output = true;
                break;
            case 4: //Сортировка по количеству страниц
                for (int i = 0; i < Size - 1; i++)
                    for (int j = 0; j < Size - i - 1; j++)
                        if (books[index[j]].pages > books[index[j + 1]].pages)
                        {
                            temp = index[j];
                            index[j] = index[j + 1];
                            index[j + 1] = temp;
                        }
                RUN = false;
                output = true;
                break;
            case 5: //Сортировка по цене
                for (int i = 0; i < Size - 1; i++)
                    for (int j = 0; j < Size - i - 1; j++)
                        if (books[index[j]].price > books[index[j + 1]].price)
                        {
                            temp = index[j];
                            index[j] = index[j + 1];
                            index[j + 1] = temp;
                        }
                RUN = false;
                output = true;
                break;
            case 6:
                printf("[Вывод списка/Рекомендация]\n");
                for(int i = 0; i < Size; i++)
                    if(books[i].pages <= 100)
                        printf("[%d] %s %s %d %d\n", index[i], books[index[i]].author,
                            books[index[i]].name, books[index[i]].pages, books[index[i]].price);
                RUN = false;
                break;
            case 7:
                RUN = false;
                break;
            default:
                break;
        }
        if(output)
        {
            system("cls");
            printf("[Вывод списка/По индексу]\n");
            for (int i = 0; i < Size; i++)
                printf("[%d] %s %s %d %d\n", index[i], books[index[i]].author,
                       books[index[i]].name, books[index[i]].pages, books[index[i]].price);
        }
    delete[] index;
    }
    printf("Для продолжения нажмите любую клавишу...\n");
    _getch();
}

int main()
{
    SetConsoleCP(1251);
    SetConsoleOutputCP(1251);

    int Size = 0;
    Book* books = NULL;

    bool RUN = true;
    while(RUN){
        system("cls");
        printf("[Меню]\n1.Загрузить список\n2.Сохранить список\n3.Вывод списка\n4.Редактирование списка\n5.Выход\nВыбор: ");
        switch(Write_int()){
            case 1:
            {
                system("cls");
                books = FileRead(Size, "test.txt"); //Загружаем данные из файла.
                break;
            }
            case 2:
            {
                system("cls");
                FileWrite("test.txt", books, Size);
                break;
            }
            case 3:
            {
                OutputBooks(books, Size);
                break;
            }
            case 4:
            {
                books = InputBook(books, Size);
                break;
            }
            case 5:
                RUN = false;
                break;
            case 6:
                printf("Тест функции lengthNumber:\n");
                printf("1234 - %d\n", LengthNumber(1234));
                printf("12345 - %d\n", LengthNumber(12345));
                printf("1234567 - %d\n", LengthNumber(1234567));
                _getch();
                break;
        }
    }

    delete[] books;
    return 0;
}