#define _CRT_SECURE_NO_WARNINGS
// Вывести информацию для заданного пункта назначения в порядке возрастаняи времени вылета. Ключ: пункт назначения
#include <iostream>
#include <io.h>
#include <conio.h>
#include<cstdio>

using namespace std;

void Add();
void Watching();
void Searching();
void Sorting();

struct Stack
{
	int left,right;
	Stack* next;
};

struct air
{
	int number;
	char type[36];
	char area[36];
	double time;
};


int main()
{
	setlocale(LC_ALL, "rus");
	int choice;
	while (true)
	{
		cout << "1. Добавление\n2. Просмотр\n3. Сортировка\n4. Поиск\n5. Выход" << endl;
		cin >> choice;
		switch (choice)
		{
		case 1:
			Add();
			cout << "Информация сохранена, нажмите любую кнопку" << endl;
			_getch();
			break;
		case 2:
			Watching();
			_getch();
			break;
		case 3:
			Sorting();
			break;
		case 4:
			Searching();
			_getch();
			break;
		case 5:
			cout << "Программа завершена" << endl;
			return 0;
			break;
		default:
			cout << "Повторите еще раз" << endl;
			break;
		}
		system("cls");

	}
}

void Add()
{
	FILE* f;
	air one;
	char filename[81];
	cout << "Введите имя файла" << endl;
	cin >> filename;
	f = fopen(filename, "a");
	if (f == NULL)
	{
		cout << "Данного файла не существует" << endl;
		return;
	}
	cout << "Введите номер рейса" << endl;
	cin >> one.number;
	cout << "Ведите тип самолета" << endl;
	cin >> one.type;
	cout << "Ведите пункт назначения" << endl;
	cin >> one.area;
	cout << "Ведите время вылета" << endl;
	cin >> one.time;
	fwrite(&one, sizeof(air), 1, f);
	fclose(f);
}

void Watching()
{
	FILE* f;
	air one;
	char filename[81];
	cout << "Введите имя файла" << endl;
	cin >> filename;
	f = fopen(filename, "r");
	if (f == NULL)
	{
		cout << "Данного файла не существует" << endl;
		return;
	}
	while (fread(&one, sizeof(air), 1, f) == 1)
	{
		cout << "Номер рейса " << one.number << endl;
		cout << "Тип самолета " << one.type << endl;
		cout << "Пункт назначения " << one.area << endl;
		cout << "Время вылета " << one.time << endl<<endl;
	}
	fclose(f);
	return;
}

void Searching()
{
	FILE* f;
	air a1;
	char filename[81];
	int choice;
	cout << "Введите имя файла" << endl;
	cin >> filename;
	f = fopen(filename, "r+");
	if (f == NULL)
	{
		cout << "Данного файла не существует" << endl;
		return;
	}
	fseek(f, 0, 0);
	int size = _filelength(_fileno(f));
	size /= sizeof(air);
	air* mas = new air[size];
	fread(mas, sizeof(air), size, f);
	/*int i, j, m, middle, choice;
	for (i = 0; i < size - 1; i++)
	{
		m = i;
		for (j = i + 1; j < size; j++)
			if (mas[i].time > mas[j].time) m = j;
		if (m != i)
		{
			air r = mas[m];
			mas[m] = mas[i];
			mas[i] = r;
		}
	}*/
	cout << "1.Линейный поиск"<< "\n2.Бинарный поиск" << endl;
	cin >> choice;
	cout << "Введите пункт назначения" << endl;
	char* k = new char[20];
	cin >> k;
	switch (choice)
	{
	case 1:
	{
		int i_key = 0, kod = 0;
		for (int i = 0; i < size; i++)
			if (mas[i].area == k)
			{
				kod = 1;
				i_key = i;
				cout << "Интересуемый Вас элемент расположен в ячейке под номером: " << i_key << endl;
				return;

			}
		if (kod == 0)
			cout << "По вашему запросу ничего не найдено" << endl;
		return;
	}
		break;
	case 2:
		break;
	}
}

void Sorting()
{
	FILE* f;
	char filename[81];
	char place[81];
	int choice, cnt=0, g = 0;
	cout << "Введите имя файла" << endl;
	cin >> filename;
	f = fopen(filename, "r+");
	if (f == NULL)
	{
		cout << "Такого файла не обнаружено!" << endl;
		return;
	}
	fseek(f, 0, 0);
	int size = _filelength(_fileno(f));
	size /= sizeof(air);
	cout << "Введите ключ";
	cin >> place[81];
	air temp;
	for (int i = 0; i < size - 1; i++)
	{
		fread(&temp, sizeof(air), size, f);
		if (strcmp(temp.area, place) == 0) cnt++;
	}
	air* array = new air[cnt];
	fseek(f, 0, SEEK_SET);
	for (int i = 0; i < size; i++)
	{
		fread(&temp, sizeof(air), size, f);
		if (strcmp(temp.area, place) == 0) array[g++];
	}
	cout << "1.QuickSort\n" << "2.Сортировка прямым выбором\n" << endl;
	cin >> choice;
	switch (choice)
	{
	case 1:
	{
		Stack* begin = new Stack;
		begin->left = 0;
		begin->right = size;
		begin->next = NULL;
		int i, j, l1, r1;
		do
		{
			i = begin->left;
			j = begin->right;
			double x = array[(i + j) / 2].time;
			do
			{
				while (x > array[i].time) i++;
				while (x < array[j].time) j--;
				if (i <= j)
				{
					air k = array[j];
					array[j] = array[i];
					array[i] = k;
					i++;
					j--;
				}
			} while (i < j);
			l1 = begin->left;
			r1 = begin->right;
			Stack* t = begin;
			begin = begin->next;
			delete t;
			if (l1 < j)
			{
				Stack* t = new Stack;
				t->next = begin;
				t->left = l1;
				t->right = j;
				begin = t;
			}
			if (i < r1)
			{
				Stack* t = new Stack;
				t->next = begin;
				t->left = i;
				t->right = r1;
				begin = t;
			}
		} while (begin != NULL);
	}
		break;
	case 2:
		for ( int i = 0; i < size - 1; i++)
		{
			int m = i;
			for (int j = i + 1; j < size; j++)
				if (array[i].time > array[j].time) m = j;
			if (m != i)
			{
				air r = array[m];
				array[m] = array[i];
				array[i] = r;
			}
		}
		break;
	default:
		cout << "Неверный ввод" << endl;
		return;
		break;
	}
	fseek(f, 0, 0);
	fwrite(&temp, sizeof(air), size, f);
	fclose(f);
	delete[]array;
}