#include <iostream>
#include <stdlib.h>
#include <string>
#include <iomanip>
#include <conio.h>
#include <fstream>
#include <locale.h>
#include <windows.h>
using namespace std;
//----КОНСТАНТЫ----------
const int up = 72,
down = 80,
right_btn = 77,
left_btn = 75,
enter = 13,
esc = 27,
del = 83,
d_n = 20;
//-------------------------------------------
struct info {
	string autor;
	string name;
	string izdatelstvo;
	string janr;
	int d = 0, m = 0, g = 0, cost = 0;
};
struct book {
	info inf;
	book* next;
	book* pred;
};
//-------------------------------------------
book vvod_book();
book* dob(book* end, const book& s);
book* dob_first(const book& s);
book* udal(book* beg);
void print(const book& s);
void prosmotr(book* beg);
void old_book(book beg);
void sort_cost(book **beg);
void sort_data(book* book);
void searchname(book* beg);
void searchautor(book* beg);
int change(book* beg, string& user_autor, string& new_user_autor);
int read_file(char* filename, book** beg, book** end);
int write_file(char* filename, book* temp);
int menu();
int menu2();
//--------основная программа-----------------------------------
int main()
{
	ShowWindow(GetConsoleWindow(), SW_MAXIMIZE); // полноэкранный режим
	setlocale(LC_ALL, "Rus");
	system( "color 8F" );
	book* beg = NULL,
		* end = NULL, input;
	char filename[20];
	int Num;
	string user_autor, new_user_autor;
	while (1) {
		switch (menu())
		{
		case 1://создание списка или добовление нового эл-та в список
			if (beg)
				end = dob(end, vvod_book());
			else
			{
				beg = dob_first(vvod_book());
				end = beg;
			}
			break;
		case 2://удаление всех элементов в списке
			beg = udal(beg);
			cout << "Нажмите любую клавишу" << endl;
			cin.get();
			break;
		case 3://просмотр
			prosmotr(beg);
			cin.get();
			break;
		case 4://запись в файл
			write_file(filename, beg);
			break;
		case 5://чтение из файла
			read_file(filename, &beg, &end);
			break;
		case 6://редактирование списка
			cout << "Введите автора, которого вы хотите изменить: " << endl;
			cin >> user_autor;
			cout << "Введите нового атвора: " << endl;
			cin >> new_user_autor;
			Num = change(beg, user_autor, new_user_autor);
			if (Num == 1) cout << "Автор успешно перезаписан." << endl;
			else cout << "Автор не найден!" << endl;
			system("pause");
			change(beg, user_autor, new_user_autor);
			cin.get();
			break;
		case 7://поиск
		{
			switch (menu2()) {
			case 1://поск по автору
				searchautor(beg);
				cin.get();
				break;
			case 2:
				searchname(beg);//поиск по названию книги
				cin.get();
				break;
			case 3:
			case 9:break;
			}
			break;
		}
		case 8: sort_cost(&beg); break;
		case 9: return 0;
		}
	}
	return 0;
}

//-----------------------------------------------------------------------------
int menu()
{
	char buf[7];
	int k;
	do
	{
		system("CLS");
		cout << "============================" << endl;
		cout << "            МЕНЮ            " << endl;
		cout << "============================" << endl;
		cout << "Введите номер пункта меню" << endl;
		cout << "1 - Создать список или добавить новый эл-т" << endl;
		cout << "2 - Удаление всех элементов списка" << endl;
		cout << "3 - Просмотр списка" << endl;
		cout << "4 - Запись данных в файл" << endl;
		cout << "5 - Чтение из файла" << endl;
		cout << "6 - Изменить" << endl;
		cout << "7 - Поиск" << endl;
		cout << "8 - Сортировка по дате" << endl;
		cout << "9 - Выход" << endl;
		cout << "============================" << endl;
		cin >> buf;
		cin.get();
		k = atoi(buf);
		if (!k)
		{
			cout << "Вам следует вводить число от 1 до 7" << endl;
			cin.get();
		}
	} while (!k);
	return k;
}
//-----------------------------------------------------------------------------
int menu2()
{
	char buf[7];
	int m;
	do
	{
		system("CLS");
		cout << "============================" << endl;
		cout << "Выберите поле по которому хотите осуществить поиск" << endl;
		cout << "1 - Автор книги" << endl;
		cout << "2 - Название книги" << endl;
		cout << "9 - Выход в главное меню" << endl;
		cout << "============================" << endl;
		cin >> buf;
		cin.get();
		m = atoi(buf);
		if (!m)
		{
			cout << "Вам следует вводить число от 1 до 7" << endl;
			cin.get();
		}
	} while (!m);
	return m;
}

//-----------------------------------------------------------------------------
int change(book* beg, string& user_autor, string& new_user_autor)
{
	book* temp = beg;
	while (temp != NULL)
	{
		if (temp->inf.autor == user_autor)
		{
			temp->inf.autor = new_user_autor;
			return 1;
		}
		else
		{
			temp = temp->next;

		}
	}
	return 0;
}
//------------------------------------------------------------------------------
void searchname(book* beg)
{
	book* temp = beg;
	char fname[d_n];

	system("cls");

	if (!beg)
	{
		MessageBox(0, L"Список пуст", L"Уведомление", MB_ICONINFORMATION | MB_SETFOREGROUND);
		return;
	}

	cout << "Введите название книги для поиска" << endl;
	cin >> fname;

	while (temp)
	{
		if (fname == temp->inf.name)
		{
			cout << "+———————————————————+————————————————————+——————————————————+————————————————+——————————————————+———————————————+" << endl;
			cout << "|       Автор       |      Название      |   Издательство   |      Жанр      | Дата поступления |   Стоимость   |" << endl;
			cout << "+———————————————————+————————————————————+——————————————————+————————————————+——————————————————+———————————————+" << endl;
			print(*temp);
			system("pause");
			return;
		}
		temp = temp->next;

	}
	cout << "Книги с таким названием не найдено" << endl;
	system("pause");
}
//-----------------------------------------------------------------------------
void searchautor(book* beg)
{
	book* temp = beg;
	char fa[d_n];
	system("cls");
	if (!beg)
	{
		MessageBox(0, L"Список пуст", L"Уведомление", MB_ICONINFORMATION | MB_SETFOREGROUND);
		return;
	}
	cout << "Введите автора для поиска" << endl;
	cin >> fa;
	while (temp)
	{
		if (fa == temp->inf.autor)
		{
			cout << "+———————————————————+————————————————————+——————————————————+————————————————+——————————————————+———————————————+" << endl;
			cout << "|       Автор       |      Название      |   Издательство   |      Жанр      | Дата поступления |   Стоимость   |" << endl;
			cout << "+———————————————————+————————————————————+——————————————————+————————————————+——————————————————+———————————————+" << endl;
			print(*temp);
			system("pause");
			return;
		}
		temp = temp->next;
	}
	cout << "Книги с таким автором не найдено" << endl;
	system("pause");
}
//-----------------------------------------------------------------------------
void old_book(book beg)
{
	sort_data(&beg);
	system("cls");
	if (!beg)
	{
		MessageBox(0, L"Список пуст", L"Уведомление",
			MB_ICONINFORMATION | MB_SETFOREGROUND);
		return;
	}
	cout << "+———————————————————+————————————————————+——————————————————+————————————————+——————————————————+———————————————+" << endl;
	cout << "|       Автор       |      Название      |   Издательство   |      Жанр      | Дата поступления |   Стоимость   |" << endl;
	cout << "+———————————————————+————————————————————+——————————————————+————————————————+——————————————————+———————————————+" << endl;
	for (int i = 0; i < 5; i++)
		print(temp);
	system("pause");
	return;
	temp = temp->next;

cout <<"+———————————————————+————————————————————+——————————————————+————————————————+——————————————————+———————————————+"<<endl;
cin.get();

}
//-----------------------------------------------------------------------------
void prosmotr(book* beg)
{
	if (!beg)
	{
		cout << "список пустой" << endl;
		cin.get();
		return;
	}
	book* temp = beg;
	cout << "+———————————————————+————————————————————+——————————————————+————————————————+——————————————————+———————————————+" << endl;
	cout << "|       Автор       |      Название      |   Издательство   |      Жанр      | Дата поступления |   Стоимость   |" << endl;
	cout << "+———————————————————+————————————————————+——————————————————+————————————————+——————————————————+———————————————+" << endl;
	while (temp)
	{
		print(*temp);
		temp = temp->next;
	}
	cout << "+———————————————————+————————————————————+——————————————————+————————————————+——————————————————+———————————————+" << endl;
	cin.get();
}
//-----------------------------------------------------------------------------
book vvod_book()
{
	book s;
	cout << "Введите автора:" << endl;
	while (1)
	{
		cin >> s.inf.autor;
		//if (atoi(s.autor)==0)
	//	if((s.autor[0] <= '0') && (s.autor[0] >= '9' ) )
		break;
		cout << "Ошибка ввода!" << endl;
	}
	cout << "Введите название книги:" << endl;
	while (1)
	{
		cin >> s.inf.name;
		//if (atoi(s.name)==0)
		break;
		cout << "Ошибка ввода!" << endl;
	}
	cout << "Введите издательство:" << endl;
	while (1)
	{
		cin >> s.inf.izdatelstvo;
		//if (atoi(s.izdatelstvo) == 0)
			break;
		cout << "Ошибка ввода!" << endl;
	}
	cout << "Введите жанр:" << endl;
	while (1)
	{
		cin >> s.inf.janr;
		//if (atoi(s.janr) == 0)
			break;
		cout << "Ошибка ввода!" << endl;
	}
	cout << "Введите дату поступления:" << endl;
	cout << "Введите день:";
	while (1)
	{
		cin >> s.inf.d;
		if ((s.inf.d >= 1) && (s.inf.d <= 31))
			break;
		cout << "Ошибка ввода!Ведите правильную дату!" << endl;
	}
	cout << "Введите месяц:";
	while (1)
	{
		cin >> s.inf.m;
		if ((s.inf.m >= 1) && (s.inf.m <= 12))
			break;
		cout << "Ошибка ввода!Ведите правильную дату!" << endl;
	}
	cout << "Введите год:";
	while (1)
	{
		cin >> s.inf.g;
		if ((s.inf.g >= 1900) && (s.inf.g <= 2050))
			break;
		cout << "Ошибка ввода!Ведите правильную дату!" << endl;
	}
	cout << "Введите стоимость книги:" << endl;
	cin >> s.inf.cost;
	return s;
}
//-----------------------------------------------------------------------------
void print(const book& s)
{
	cout << "|" << s.inf.autor << setw(20 - (s.inf.autor).length()) << "|";
	cout << s.inf.name << setw(21 - (s.inf.name).length()) << "|";
	cout << s.inf.izdatelstvo << setw(19 - (s.inf.izdatelstvo).length()) << "|";
	cout << s.inf.janr << setw(17 - (s.inf.janr).length()) << "|";
	if (s.inf.d < 10) cout << 0 << s.inf.d << ".";
	if (s.inf.m < 10) cout << 0 << s.inf.m << "." << s.inf.g << setw(19) << "|";
	cout << s.inf.cost << setw(16) << "|" << endl;

}
//--------------ф-я добавления или создания эл-та-------------------------------
book* dob(book* end, const book& s)
{
	book* newE = new book;
	*newE = s;
	newE->next = 0;
	end->next = newE;
	end = newE;
	return end;
}
//--------------создание первого эл-та------------------------------
book* dob_first(const book& s)
{
	book* beg = new book;
	*beg = s;
	beg->next = 0;
	return beg;
}
//-----------------------------------------------------------------------------
int read_file(char* filename, book** beg, book** end)
{
	cout << "Введите название файла" << endl;
	cin >> filename;
	ifstream fin(filename, ios::in);
	if (!fin) {

		MessageBox(0, L"Невозможно открыть файл!", L"Ошибка", MB_ICONERROR | MB_SETFOREGROUND);
		return 0;

	}
	book s;
	*beg = 0;
	fin.seekg(0, ios::beg);
	while (fin >> s.inf.autor)
	{
		fin >> s.inf.name;
		fin >> s.inf.izdatelstvo;
		fin >> s.inf.janr;
		fin >> s.inf.d;
		fin >> s.inf.m;
		fin >> s.inf.g;
		fin >> s.inf.cost;
		if (*beg)
			*end = dob(*end, s);
		else
		{
			*beg = dob_first(s); *end = *beg;
		}
	}
	cout << "Считывание прошло успешно" << endl;
	cin.get();
	cin.get();
	return 0;
}
//-----------------------------------------------------------------------------
int write_file(char* filename, book* temp)
{
	cout << "Введите название файла" << endl;
	cin >> filename;
	ofstream fout(filename, ios_base::app); // открытие файла
	if (!fout)
	{
		cout << "Не могу открыть файл для записи" << endl;
		return 1;
	}
	while (temp)// пока temp!=0 выводим эл-ты в файл
	{
		fout << temp->inf.autor << endl;
		fout << temp->inf.name << endl;
		fout << temp->inf.izdatelstvo << endl;
		fout << temp->inf.janr << endl;
		fout << temp->inf.d << endl;
		fout << temp->inf.m << endl;
		fout << temp->inf.g << endl;
		fout << temp->inf.cost << endl;
		temp = temp->next;
	}
	cout << "Данные сохранены в файле: " << filename << endl;
	cout << "==============================" << endl;
	cout << "Нажмите любую клавишу" << endl;
	cin.get();
	return 0;
}
//-----------------------------------------------------------------------------
book* udal(book* beg)
{
	book* temp;
	if (!beg)
	{
		cout << "список пустой" << endl;
		cin.get();
		return 0;
	}
	while (beg)
	{
		temp = beg;
		beg = beg->next;
		delete temp;
	}
	cout << "==============================" << endl;
	cout << "====удаление прошло успешно===" << endl;
	cout << "==============================" << endl;
	return beg;
}
//----------------------------------------------------------------
void sort_data(book** beg)
{
	book* temp_i = *beg, * temp_j = *beg;
	for (; temp_i; temp_i = temp_i->next)
	{
		for (temp_j = temp_i; temp_j; temp_j = temp_j->next)
		{
			if (temp_i->inf.g != temp_j->inf.g)
			{
				if (temp_i->inf.g > temp_j->inf.g)
				{
					swap(temp_i->inf, temp_j->inf);
					continue;
				}
			}
			else if (temp_i->inf.m != temp_j->inf.m)
			{
				if (temp_i->inf.m > temp_j->inf.m)
				{
					swap(temp_i->inf, temp_j->inf);
					continue;
				}
			}
			else if (temp_i->inf.d > temp_j->inf.d)
			{
				swap(temp_i->inf, temp_j->inf);
				continue;
			}
		}
	}
	cout << "Сортировка прошла успешно" << endl;
	system("pause");
}
//----------------------------------------
void sort_cost(book** beg) {
	book* temp_i = *beg,
		* temp_j = *beg;

	for (; temp_i; temp_i = temp_i->next) {
		for (temp_j = temp_i; temp_j; temp_j = temp_j->next) {
			if (temp_i->inf.cost > temp_j->inf.cost) {
				swap(temp_i->inf, temp_j->inf);
			}
		}
	}

	cout << "Сортировка прошла успешно" << endl;
	system("pause");
}