/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   sorting.c                                          :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: apommier <apommier@student.42.fr>          +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2022/01/07 19:14:03 by apommier          #+#    #+#             */
/*   Updated: 2022/01/07 19:14:03 by apommier         ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */

#include "push_swap.h"


void	find_loop_index(t_list *list)
{
	t_list	*start;
	t_list	*save;
	int		loop_size;
	int		loop_size2;

	loop_size2 = 0;
	loop_size = 0;
	start = list;
	while (list)
	{
		loop_size = find_loop(start, list, 0);
		if (loop_size > loop_size2)
		{
			loop_size2 = loop_size;
			save = list;
		}
		list = list->next;
	}
	find_loop(start, save, 1);
	swap_to_b(start, save, loop_size2);
	printf("loop_size = %d\n", loop_size2);
}

int	find_loop(t_list *start, t_list *list, int setswap)
{
	int countdown;
	int	loop_size;
	t_list	*swap;

	loop_size = 0;
	swap = list->next;
	countdown = ft_lstsize(start) - 1;
	while (countdown)
	{	
		if (swap)
		{	
			if (list->index == swap->index - 1 - loop_size)
				loop_size++;
			else if (setswap)
				swap->swap = 1;
			countdown--;
			swap = swap->next;
		}
		else
			swap = start;
	}
	printf("------------return= %d\n", loop_size);
	return (loop_size);
}		

void	swap_to_b(t_list *list, t_list *best, int loop)
{
	s_list *action;
	int	swap;
	int lst_size;
	t_list *b;

	b = 0;
	action = 0;
	lst_size = ft_lstsize(list);
	swap = 0;
	printf_list(list);
	while (lst_size)
	{
		ft_sa_sb(&list, &action, 'a', 0);
		swap = find_loop(list, best, 0);
		if (swap > loop)
		{
			loop = swap;
			s_lstadd_back(&action, new_slist("sa"));
		}
		else
			ft_sa_sb(&list, &action, 'a', 0);
		if(list->swap)
			ft_pb(&list, &b, &action);
		else if (!list->swap)
			ft_ra_rb(&list, &action, 'a');
		lst_size--;
		printf_list(list);
	}
	printf("\nswap done\n");
}



/*while (countdown - 1)
		{	
			if (swap)
			{	
				if (list->index == swap->index - 1 - loop_size)
				{
					printf("swap= %d index= %d so ++++++\n", *(int*)swap->nbr, swap->index);
					loop_size++;
				}
				else
					printf("nop swap = %d index = %d\n", *(int*)swap->nbr, swap->index);
				countdown--;
				swap = swap->next;
			}
			else
				swap = start;
		}*/