#include "Header.h"

/// <summary>
/// То, как выглядит элемент списка
/// </summary>
struct ElementList
{
	int value;
	struct ElementList* nextElement;
};

typedef struct ElementList ElementList; //определение имени структуры
typedef ElementList* List; //определение имени типа листа (головы списка)

/// <summary>
/// Генерация линейного односвязного списка.
/// </summary>
/// <param name="length">Кол-во элемента списка.</param>
/// <returns>Голова линейного односвязного списка.</returns>
List createIntList(int length)
{
	if (!length)
		return 1;
	List headOfList = calloc(1, sizeof(ElementList));
	headOfList->value = 1;
	headOfList->nextElement = NULL;
	List currentElement = headOfList, newElement;
	for (int i = 2; i <= length; i++)
	{
		newElement = calloc(1, sizeof(ElementList));
		newElement->value = i;
		currentElement->nextElement = newElement;
		currentElement = newElement;
	}
	currentElement->nextElement = NULL;
	return headOfList;
}

/// <summary>
/// Удаление линейного односвязного списка.
/// </summary>
/// <param name="list">Голова линейного односвязного списка.</param>
void deleteIntList(List list)
{
	while (list)
	{
		List nextList = list->nextElement;
		free(list);
		list = nextList;
	}
	free(list);
}

/// <summary>
/// Вывод линейного односвязного списка на консоль.
/// </summary>
/// <param name="list">Голова линейного односвязного списка.</param>
void printIntList(List list)
{
	while (list)
	{
		printf("%d ", list->value);
		list = list->nextElement;
	}
	printf("\n");
}

/// <summary>
/// Добавление эелемента в линейный односвязный список.
/// </summary>
/// <param name="list">Голова линейного односвязного списка.</param>
/// <param name="numberElemnt">Позиция для вставки.</param>
/// <param name="insertedElement">Вставляемый элемент.</param>
/// <returns>Голова измененного линейного односвязного списка.</returns>
List insertIntElementInList(List list, int numberElemnt, List insertedElement)
{
	List headOfList = list;
	if (numberElemnt > 1)
	{
		for (int i = 1; i < numberElemnt - 1; i++)
		{
			list = list->nextElement;
		}
		insertedElement->nextElement = list->nextElement;
		list->nextElement = insertedElement;
	}
	else if (numberElemnt == 1)
	{
		insertedElement->nextElement = list;
		headOfList = insertedElement;
	}
	return headOfList;
}

/// <summary>
/// Удаление элемента линейного односвязнного списка.
/// </summary>
/// <param name="list">Голова линейного односвязного списка.</param>
/// <param name="numberElemnt">Порядковый номер удаляемого элемента.</param>
/// <returns>Голова измененного линейного односвязного списка.</returns>
List deletIntElementInList(List list, int numberElemnt)
{
	List headOfList = list;
	if (numberElemnt > 1)
	{
		for (int i = 1; i < numberElemnt - 1; i++)
		{
			list = list->nextElement;
		}
		list->nextElement = list->nextElement->nextElement;
	}
	else if (numberElemnt == 1)
	{
		headOfList = list->nextElement;
		free(list);
	}
	return headOfList;
}

/// <summary>
/// Смена элементов линейного односвязнного списка местами.
/// </summary>
/// <param name="list">Голова линейного односвязного списка.</param>
/// <param name="numberFirstElement">Номер первого элемента.</param>
/// <param name="numberSecondElement">Номер второго элемента.</param>
/// <returns>Голова измененного линейного односвязного списка.</returns>
List swapElementIntList(List list, int numberFirstElement, int numberSecondElement)
{
	List headOfList = list;
	//если указаны одинаковые номера
	if (numberFirstElement == numberSecondElement)
	{
		return headOfList;
	}
	//смена номеров местами, если первым указан больший
	if (numberFirstElement > numberSecondElement)
	{
		int temp = numberFirstElement;
		numberFirstElement = numberSecondElement;
		numberSecondElement = temp;
	}
	//если нужно поменять голову списка
	if (numberFirstElement == 1)
	{
		for (int i = 1; i < numberSecondElement - 1; i++)
		{
			list = list->nextElement;
		}
		List currentElement = list->nextElement;
		List nextAfterCurrentElement = currentElement->nextElement;
		currentElement->nextElement = headOfList->nextElement;
		list->nextElement = headOfList;
		headOfList->nextElement = nextAfterCurrentElement;
		return currentElement;
	}
	//иные случаи swap'а
	else
	{
		for (int i = 1; i < numberFirstElement - 1; i++)
		{
			list = list->nextElement;
		}
		List prefFirstCurrentElement = list; //Элемент перед первым целевым элементом
		for (int i = numberFirstElement - 1; i < numberSecondElement - 1; i++)
		{
			list = list->nextElement;
		}
		List prefSecondCurrentElement = list;  //Элемент перед вторым целевым элементом
		List nextFirstCurrentElemnt = prefFirstCurrentElement->nextElement->nextElement; //Сохранение адреса-ссылки первого элемента для обмена
		prefFirstCurrentElement->nextElement->nextElement = prefSecondCurrentElement->nextElement->nextElement;
		prefSecondCurrentElement->nextElement->nextElement = nextFirstCurrentElemnt;
		List firstCurrentElemnt = prefFirstCurrentElement->nextElement; //Сохранение адреса-ссылки второго элемента для обмена
		prefFirstCurrentElement->nextElement = prefSecondCurrentElement->nextElement;
		prefSecondCurrentElement->nextElement = firstCurrentElemnt;
		return headOfList;
	}
}

int startWorkWithLinelist()
{
	
	//Создание листа
	List MyList = createIntList(10);
	printIntList(MyList);

	//Добавление элемента
	List newElemnt = calloc(1, sizeof(ElementList));
	newElemnt->value = 99;
	MyList = insertIntElementInList(MyList, 1, newElemnt);

	printIntList(MyList);

	//Удаление эдемента
	MyList = deletIntElementInList(MyList, 1);
	printIntList(MyList);

	//Поменять элементы местами
	MyList = swapElementIntList(MyList, 10, 1);
	printIntList(MyList);

	//Удаление списка
	deleteIntList(MyList);
	return 0;
}