#include <stdio.h>
#include <locale.h>
#include <string.h>
#include <stdlib.h>
#include <string.h>
#include "Header.h"

int strlenght(int &lines)
{
    lines = 0;
    char s[200];
    FILE *f;
    if (!(f = fopen("binaryfile", "r")))
    {
        printf("Ошибка открытия файлап.\n");
        return 0;
    }
    while (fgets(s, 300, f) != NULL)if (feof(f)) break; { lines++; }lines++;
    fclose(f);
    return lines;
}

int processing1(int &checker1)
{
        {
            printf("\nВыберите дальнейшее действие : \n");
            printf("\n1. Чтение из бинарного файла  \n2. Отображение любой строки\n3. Поиск самого низкого студента   (рост)\n4. Поиск самого высокого студента  (рост)\n5. Поиск самого тяжелого студента  (вес)\n6. Поиск самого худого студента    (вес)\n0 - Закрытие программы\n"); // реализация повторного запуска программы
            printf("Ваш выбор: ");
            scanf_s("%d", &checker1);
            system("cls");
            if (checker1 != 0)                                                  // если не 0
            {
                cases1(checker1);                                           // вызов функции выбора
            }
        }
        return checker1;                                                                    // иначе конец программы
}

int cases1(int checker1)                            // функция выбора действия
{
    rewind(stdin);
    int m = 0, i = 0;
    switch (checker1)
    {
    case 1:
        read1();
        break;
    case 2:
        vivodstr1();
        break;
    case 3 :
        poiskminrost();
        break;
    case 4 :
        poiskmaxrost();
        break;
    case 5 :
        poiskmaxweight();
        break;
    case 6 :
        poiskminweight();
        break;
    case 0: break;
    }
    return checker1;
}

void read1()
{
    int a=0;
    FILE *f;
    if (!(f = fopen("binaryfile", "rb")))
    {
        printf("Ошибка открытия файла.\n");
        return;
    }
    struct inform inf;
    printf(" Пол  | Группа | Фамилия | Имя | Отчество |  Рост  |    Вес ");
    while (1)
    {
        fread(&inf, sizeof(struct inform), 1, f);
        if (feof(f)) break;
        printf("\n%5s   %5s   %5s   %5s   %5s       %.3lf    %.3lf",            // вывод на экран
            inf.pol, inf.group, inf.familia, inf.imya,
            inf.otchestvo, inf.rost, inf.ves); a++;
    }
    if (a == 0) printf("\nФайл пуст\n");
    fclose(f);
}

void vivodstr1()
{
    printf("\nДля корректной работы, введенные данные были записаны в файл\n");
    FILE *f;
    int str;
    if (!(f = fopen("binaryfile", "rb")))                                   // открытие файла для чтения
    {
        printf("Ошибка открытия файла.\n");
        return;
    }
    printf("\nВыберите строку, содержимое которой хотите увидеть: ");
    scanf_s("%d", &str);                                                    // чтение того, что мы хотим вывести
    int lines;
    strlenght(lines);
    if (str > lines){ printf("\nТакой строки не существует\n"); return; }
    fseek(f, ((str - 1)*sizeof(struct inform)), 0);                     // переход на "нужную" позицию
    struct inform inf2;
    fread(&inf2, sizeof(struct inform), 1, f);                              // запись интересующей строки в inf2
    printf("\nСодержимое %d строки:\n\n", str);
    printf(" Пол  | Группа | Фамилия | Имя | Отчество |  Рост  |    Вес ");
    printf("\n%5s   %5s   %5s   %5s   %5s       %.3lf    %.3lf",            // вывод на экран
        inf2.pol, inf2.group, inf2.familia, inf2.imya,
        inf2.otchestvo, inf2.rost, inf2.ves);                                                           // вывод
    printf("\n");
    fclose(f);
}

void vvod(struct inform *inf, int n)                                        // функция ввода данных о студентах
{
    for (int i = 0; i < n; i++)                                             // цикл ввода
    {
        rewind(stdin);                                                      // очистка входного потока
        printf("\nПол студента: ");                                          // интерфейс
        gets_s(inf[i].pol);                                                 // ввод
        rewind(stdin);                                                      // очистка входного потока
        printf("\nГруппа студента: ");                                        // интерфейс
        gets_s(inf[i].group);                                               // ввод
        rewind(stdin);                                                      // очистка входного потока
        printf("\nФамилия студента: ");                                  // интерфейс
        gets_s(inf[i].familia);                                             // ввод
        rewind(stdin);                                                      // очистка входного потока
        printf("\nИмя студента: ");                                          // интерфейс
        gets_s(inf[i].imya);                                                // ввод
        rewind(stdin);                                                      // очистка входного потока
        printf("\nОтчество студента: ");                                    // интерфейс
        gets_s(inf[i].otchestvo);                                           // ввод
        rewind(stdin);                                                      // очистка входного потока
        printf("\nРост студента: ");                                        // интерфейс
        scanf_s("%lf", &(inf[i].rost));                                     // ввод
        rewind(stdin);                                                      // очистка входного потока
        printf("\nВес студента: ");                                          // интерфейс
        scanf_s("%lf", &(inf[i].ves));                                      // ввод
        rewind(stdin);                                                      // очистка входного потока
        system("cls");                                                      // очистка экрана
    }
}

int cases(struct inform *inf, int checker, int n)                           // функция выбора действия
{
    rewind(stdin);
    int m = 0, i=0;
    switch (checker)
    {
    case 1:                                                                 // функция записи в бинарный файл
        write(inf, n, i);
    break;
    case 2:
        write(inf, n, i);                                                   // запись имеющихся данных в файл для корректной работы
        printf("\nДля корректной работы, введенные данные были записаны в файл\n");
        read(inf, n, i);                                                    // функция вывода данных из бинарного файла
    break;
    case 3:
        write(inf, n, i);                                                   // запись имеющихся данных в файл для корректной работы
        printf("\nДля корректной работы, введенные данные были записаны в файл\n");
        vivodstr(inf,n,i);                                                  // функция вывода любой строки из структуры
        break;
    case 4:
        write(inf, n, i);                                                   // запись имеющихся данных в файл для корректной работы
        printf("\nДля корректной работы, введенные данные были записаны в файл\n");
        poiskminrost();                                                     // функция поиска самого низкого студента
        break;
    case 5 :
        write(inf, n, i);                                                   // запись имеющихся данных в файл для корректной работы
        printf("\nДля корректной работы, введенные данные были записаны в файл\n");
        poiskmaxrost();                                                     // функция поиска самого высокого студента
        break;
    case 6 :
        write(inf, n, i);                                                   // запись имеющихся данных в файл для корректной работы
        printf("\nДля корректной работы, введенные данные были записаны в файл\n");
        poiskminweight();                                                   // функция поиска самого лёгкого студента
        break;
    case 7 :
        write(inf, n, i);                                                   // запись имеющихся данных в файл для корректной работы
        printf("\nДля корректной работы, введенные данные были записаны в файл\n");
        poiskmaxweight();                                                       // функция поиска самого тяжелого студента
        break;
    case 0:
        break;                                                              // возможность закрытия программы
    }
    return checker;
}

int processing(int &checker, struct inform *inf, int n)                     // функция диалогового окна и выбора действий
{
    {
        printf("\nВыберите дальнейшее действие:\n1. Запись в бинарный файл\n2. Вывести на экран содержимоке файла\n3. Отображение любой строки\n4. Поиск самого низкого студента   (рост)\n5. Поиск самого высокого студента  (рост)\n6. Поиск самого худого студента    (вес)\n7. Поиск самого тяжелого студента  (вес)\n0. Закрыть программу\n"); // реализация повторного запуска программы
        printf("Ваш выбор: ");
        scanf_s("%d", &checker);
        system("cls");
        if (checker != 0)                                                   // если не 0
        {
            cases(inf, checker, n);                                         // вызов функции выбора
        }
    }
    return checker;                                                         // иначе конец программы
}

void read(inform *inf, int n, int i)                                        // функция вывода данных из бинарного файла
{
    rewind(stdin);
    FILE *f;
    if (!(f = fopen("binaryfile", "rb")))                                   // открытие файла для чтения
    {
        printf("error");
        return;
    }
    inf = (inform *)calloc(n, sizeof(inform));                              // выделение памяти под структуру
    fread(inf, sizeof(inform), n , f);                                      // чтение из бинарного файла с записью в inf
    printf("\nСодержимое бинарного файла:\n");
    printf(" Пол  | Группа | Фамилия | Имя | Отчество |  Рост  |    Вес ");
    for (i = 0; i < n; i++)                                                 // вывод содержимого inf
    {
        vivod(inf[i]);
        if (feof(f)) break;
    }
    printf("\n");
    fclose(f);                                                              // закрытие файла
}

void write(inform *inf, int n, int i)                                       // функция записи данных в бинарный файл
{
    FILE *f;
    if ((f = fopen("binaryfile", "wb")) == NULL)                            // открытие файла
    {                                                                       // если файл не открылся
        printf("Ошибка открытия файла.\n");                                  // то вывести соответствующее сообщение
        return ;
    }
    else printf("\nДанные в бинарный файл успешно записаны\n");
    fwrite(inf, sizeof(inform), n, f);                                      // вывод из бинарного файла
    fclose(f);                                                              // закрытие файла
}

void vivodstr(inform *inf, int n,int i)                                     // функция вывода любой строки
{
    FILE *f;
    int str;
    if (!(f = fopen("binaryfile", "rb")))                                   // открытие файла для чтения
    {
        printf("Ошибка открытия файла.\n");
        return;
    }
    printf("\nВыберите строку, содержимое которой хотите увидеть: ");
    scanf_s("%d", &str);                                                    // чтение того, что мы хотим вывести
    if (str > n)                                                            // проверка на наличие данной строки
    {
        printf("\nТакой строки не существует\n");
        return;
    }
    fseek(f,  ((str - 1)*sizeof(struct inform)), 0);                        // переход на "нужную" позицию
    struct inform inf2;
    fread(&inf2, sizeof(struct inform), 1, f);                              // запись интересующей строки в inf2
    printf("\nСодержимое %d строки:\n\n", str);
    printf(" Пол  | Группа | Фамилия | Имя | Отчество |  Рост  |    Вес ");
    vivod(inf2);                                                            // вывод
    printf("\n");
    fclose(f);
}

void poiskmaxrost()                                                         // функция поиска самого высокого студента
{
    FILE *f;
    fpos_t i1, i2;                                                          // позиция в файле
    if (!(f = fopen("binaryfile", "rb")))                                   // открытие файла для чтения
    {
        puts("Ошибка открытия файла.\n");
        return;
    }
    int max = 0;
    struct inform inf;
    while (1)
    {
        fgetpos(f, &i1);                                                    // начальная позиция
        fread(&inf, sizeof(struct inform), 1, f);                           // чтение из файла
        if (feof(f)) break;
        if ((inf.rost) > max)                                               // сравнение текущего и того, который запомнил
        {
            max = (inf.rost);                                               // если более высокий рост найдет
            i2 = i1;                                                        // то запоминаем где он находится
        }
    }
    fsetpos(f, &i2);                                                        // после завершения цикла ищем самый большой
    fread(&inf, sizeof(inform), 1, f);                                      // переписываем его в inf
    printf("\nПараметры самого высокого студента:\n");
    printf("\n");
    printf(" Пол  | Группа | Фамилия | Имя | Отчество |  Рост  |    Вес ");
    vivod(inf);                                                             // и соответствующий вывод
    fclose(f);
}

void poiskminrost()                                                         // функция поиска самого низкого студента
{
    FILE *f;
    fpos_t i1, i2;                                                          // позиция в файле
    if (!(f = fopen("binaryfile", "rb")))                                   // открытие файла для чтения
    {
        puts("Ошибка открытия файла.\n");
        return;
    }
    int min = 0;
    struct inform inf;
    fread(&inf, sizeof(struct inform), 1, f);                               // чтение из файла
    min = (inf.rost);                                                       // говорю что первый элемент минимальный, затем сравниваю с ним
    while (1)
    {
        fgetpos(f, &i1);                                                    // начальная позиция
        fread(&inf, sizeof(struct inform), 1, f);                           // чтение из файла
        if (feof(f)) break;
        if ((inf.rost) < min)                                               // сравнение текущего и того, который запомнил
        {
            min = (inf.rost);                                               // если более низкий рост найде
            i2 = i1;                                                        // то запоминаем где он находится
        }
    }
    fsetpos(f, &i2);                                                        // после завершения цикла ищем самый маленький
    fread(&inf, sizeof(inform), 1, f);                                      // переписываем его в inf
    printf("\nПараметры самого высокого студента:\n");
    printf("\n");
    printf(" Пол  | Группа | Фамилия | Имя | Отчество |  Рост  |    Вес ");
    vivod(inf);                                                             // и соответствующий вывод
    fclose(f);
}

void poiskmaxweight()                                                       // функция поиска самого тяжелого студента
{
    FILE *f;
    fpos_t i1, i2;                                                          // позиция в файле
    if (!(f = fopen("binaryfile", "rb")))                                   // открытие файла для чтения
    {
        puts("Ошибка открытия файла.\n");
        return;
    }
    int max = 0;
    struct inform inf;
    while (1)
    {
        fgetpos(f, &i1);                                                    // начальная позиция
        fread(&inf, sizeof(struct inform), 1, f);                           // чтение из файла
        if (feof(f)) break;
        if ((inf.ves) > max)                                                // сравнение текущего и того, который запомнил
        {
            max = (inf.ves);                                                // если более высокий вес найдет
            i2 = i1;                                                            // то запоминаем где он находится
        }
    }
    fsetpos(f, &i2);                                                        // после завершения цикла ищем самый большой
    fread(&inf, sizeof(inform), 1, f);                                      // переписываем его в inf
    printf("\nПараметры самого высокого студента:\n");
    printf("\n");
    printf(" Пол  | Группа | Фамилия | Имя | Отчество |  Рост  |    Вес ");
    vivod(inf);                                                             // и соответствующий вывод
    fclose(f);
}

void poiskminweight()                                                       // функция поиска самого легкого студента
{
    FILE *f;
    fpos_t i1, i2;                                                          // позиция в файле
    if (!(f = fopen("binaryfile", "rb")))                                   // открытие файла для чтения
    {
        puts("Ошибка открытия файла.\n");
        return;
    }
    int min = 0;
    struct inform inf;
    fread(&inf, sizeof(struct inform), 1, f);                               // чтение из файла
    min = (inf.ves);                                                        // говорю что первый элемент минимальный, затем сравниваю с ним
    while (1)
    {
        fgetpos(f, &i1);                                                    // начальная позиция
        fread(&inf, sizeof(struct inform), 1, f);                           // чтение из файла
        if (feof(f)) break;
        if ((inf.ves) < min)                                                // сравнение текущего и того, который запомнил
        {
            min = (inf.ves);                                                // если более маленький вес найден
            i2 = i1;                                                        // то запоминаем где он находится
        }
    }
    fsetpos(f, &i2);                                                        // после завершения цикла ищем самый маленький
    fread(&inf, sizeof(inform), 1, f);                                      // переписываем его в inf
    printf("\nПараметры самого высокого студента:\n");
    printf("\n");
    printf(" Пол  | Группа | Фамилия | Имя | Отчество |  Рост  |    Вес ");
    vivod(inf);                                                             // и соответствующий вывод
    fclose(f);
}


void vivod(inform inf)                                                      // функция вывода данных на экран
{
    printf("\n%5s   %5s   %5s   %5s   %5s       %.3lf    %.3lf",            // вывод на экран
        inf.pol, inf.group, inf.familia, inf.imya,
        inf.otchestvo, inf.rost, inf.ves);
    printf("\n");
}