326 lines
6.5 KiB
C
326 lines
6.5 KiB
C
/* ************************************************************************** */
|
|
/* */
|
|
/* ::: :::::::: */
|
|
/* push_swap.c :+: :+: :+: */
|
|
/* +:+ +:+ +:+ */
|
|
/* By: tmaze <tmaze@student.42.fr> +#+ +:+ +#+ */
|
|
/* +#+#+#+#+#+ +#+ */
|
|
/* Created: 2019/03/03 11:41:49 by tmaze #+# #+# */
|
|
/* Updated: 2019/03/11 16:30:23 by tmaze ### ########.fr */
|
|
/* */
|
|
/* ************************************************************************** */
|
|
|
|
#include "push_swap.h"
|
|
|
|
void mark_groups(t_psdata *data)
|
|
{
|
|
t_stack *ptr;
|
|
int inds;
|
|
|
|
ptr = data->a;
|
|
inds = 1;
|
|
while (ptr)
|
|
{
|
|
ptr->ind = inds;
|
|
if (ptr->next && ptr->nb > ptr->next->nb)
|
|
inds++;
|
|
ptr = ptr->next;
|
|
}
|
|
}
|
|
|
|
void get_min_max(t_psdata *data, int *min_max, int *ind_min_max)
|
|
{
|
|
t_stack *ptr;
|
|
int i;
|
|
|
|
min_max[0] = FT_INT_MAX;
|
|
min_max[1] = FT_INT_MIN;
|
|
ptr = data->a;
|
|
i = 0;
|
|
while (ptr)
|
|
{
|
|
if (ptr->nb < min_max[0] && (ind_min_max[0] = i) == i)
|
|
min_max[0] = ptr->nb;
|
|
if (ptr->nb > min_max[1] && (ind_min_max[1] = i) == i)
|
|
min_max[1] = ptr->nb;
|
|
i++;
|
|
ptr = ptr->next;
|
|
}
|
|
}
|
|
|
|
void sortfor3(t_psdata *data)
|
|
{
|
|
int min_max[2];
|
|
int ind_min_max[2];
|
|
|
|
get_min_max(data, min_max, ind_min_max);
|
|
while (ind_min_max[0] != 0 || ind_min_max[1] != 2)
|
|
{
|
|
if (ind_min_max[0] == ind_min_max[1] - 1)
|
|
ft_printf("sa\n");
|
|
if (ind_min_max[0] == ind_min_max[1] - 1)
|
|
ps_swap(data, 'a');
|
|
if (ind_min_max[1] == 0)
|
|
ft_printf("ra\n");
|
|
if (ind_min_max[1] == 0)
|
|
ps_rot(data, 'a');
|
|
if (ind_min_max[0] == 2 && ind_min_max[1] == 1)
|
|
ft_printf("rra\n");
|
|
if (ind_min_max[0] == 2 && ind_min_max[1] == 1)
|
|
ps_rerot(data, 'a');
|
|
get_min_max(data, min_max, ind_min_max);
|
|
}
|
|
}
|
|
|
|
void sortfor5(t_psdata *data)
|
|
{
|
|
ft_printf("pb\n");
|
|
ps_push(data, 'b');
|
|
ft_printf("pb\n");
|
|
ps_push(data, 'b');
|
|
if (data->b->nb > data->b->next->nb)
|
|
ft_printf("sb\n");
|
|
if (data->b->nb > data->b->next->nb)
|
|
ps_swap(data, 'b');
|
|
sortfor3(data);
|
|
data->b->ind = 1;
|
|
data->b->next->ind = 1;
|
|
data->a->ind = 2;
|
|
data->a->next->ind = 2;
|
|
data->a->next->next->ind = 2;
|
|
while (data->a->ind == 2 || data->size_b > 0)
|
|
{
|
|
if (data->a->ind != 2
|
|
|| (data->size_b > 0 && data->b->nb < data->a->nb))
|
|
ft_printf("pa\n");
|
|
if (data->a->ind != 2
|
|
|| (data->size_b > 0 && data->b->nb < data->a->nb))
|
|
ps_push(data, 'a');
|
|
data->a->ind = 3;
|
|
ft_printf("ra\n");
|
|
ps_rot(data, 'a');
|
|
}
|
|
}
|
|
|
|
t_stack *get_last_a(t_psdata *data)
|
|
{
|
|
t_stack *ptr;
|
|
|
|
ptr = data->a;
|
|
while (ptr && ptr->next)
|
|
ptr = ptr->next;
|
|
return (ptr);
|
|
}
|
|
|
|
int get_size_firsts(t_psdata *data)
|
|
{
|
|
t_stack *ptr;
|
|
int inds;
|
|
int i;
|
|
|
|
inds = data->a->ind;
|
|
i = 0;
|
|
ptr = data->a;
|
|
while (ptr && ptr->ind == inds && (i += 1))
|
|
ptr = ptr->next;
|
|
if (ptr)
|
|
{
|
|
inds = ptr->ind;
|
|
while (ptr && ptr->ind == inds && (i += 1))
|
|
ptr = ptr->next;
|
|
}
|
|
return (i);
|
|
}
|
|
|
|
int get_size_last(t_psdata *data)
|
|
{
|
|
t_stack *ptr;
|
|
int inds;
|
|
int i;
|
|
|
|
i = 0;
|
|
ptr = data->a;
|
|
while (ptr && ptr->next)
|
|
ptr = ptr->next;
|
|
inds = ptr->ind;
|
|
ptr = data->a;
|
|
while (ptr)
|
|
{
|
|
i += (ptr->ind == inds) ? 1 : 0;
|
|
ptr = ptr->next;
|
|
}
|
|
return (i);
|
|
}
|
|
|
|
int get_nb_groups(t_psdata *data)
|
|
{
|
|
t_stack *ptr;
|
|
int ind;
|
|
int ret;
|
|
|
|
ret = 0;
|
|
ptr = data->a;
|
|
ind = ptr->ind;
|
|
while (ptr)
|
|
{
|
|
if (ret == 0 || ptr->ind != ind)
|
|
{
|
|
ret++;
|
|
ind = ptr->ind;
|
|
}
|
|
ptr = ptr->next;
|
|
}
|
|
return (ret);
|
|
}
|
|
|
|
int sort(t_psdata *data)
|
|
{
|
|
t_list *tmp;
|
|
t_stack *last;
|
|
int inds;
|
|
int inds2;
|
|
|
|
last = get_last_a(data);
|
|
inds = last->ind + 1;
|
|
while (data->a->ind != last->ind)
|
|
{
|
|
inds2 = data->a->ind;
|
|
while (data->a->ind == inds2 && (tmp = add_op(data, "pb\0")) != NULL)
|
|
ps_push(data, 'b');
|
|
if (tmp == NULL)
|
|
return (0);
|
|
inds2 = last->ind;
|
|
while (last->ind == inds2 || data->size_b > 0)
|
|
{
|
|
if ((last->ind != inds2 && data->size_b > 0) || (data->b && data->b->nb > last->nb))
|
|
{
|
|
if (add_op(data, "pa\0") == NULL)
|
|
return (0);
|
|
ps_push(data, 'a');
|
|
data->a->ind = inds;
|
|
}
|
|
else if (data->size_b == 0 || data->b->nb < last->nb)
|
|
{
|
|
if (add_op(data, "rra") == NULL)
|
|
return (0);
|
|
ps_rerot(data, 'a');
|
|
data->a->ind = inds;
|
|
last = get_last_a(data);
|
|
}
|
|
}
|
|
// if (get_nb_groups(data) > 2)
|
|
// {
|
|
if (get_nb_groups(data) != 2 && data->a->ind != last->ind && add_op(data, "rra") == NULL)
|
|
return (0);
|
|
else if (get_nb_groups(data) != 2 && data->a->ind != last->ind)
|
|
{
|
|
ps_rerot(data, 'a');
|
|
last = get_last_a(data);
|
|
while (last->ind == data->a->ind && (tmp = add_op(data, "rra")) != NULL)
|
|
{
|
|
ps_rerot(data, 'a');
|
|
last = get_last_a(data);
|
|
}
|
|
}
|
|
// }
|
|
inds++;
|
|
}
|
|
return (1);
|
|
}
|
|
|
|
void clean_op(t_psdata *data)
|
|
{
|
|
t_list *it;
|
|
t_list **prec;
|
|
char *ct1;
|
|
char *ct2;
|
|
char *ct3;
|
|
|
|
it = data->op;
|
|
prec = &(data->op);
|
|
while (it && it->next)
|
|
{
|
|
ct1 = (char*)(it->content);
|
|
ct2 = (char*)(it->next->content);
|
|
if (ct1 && ct2 && ct1[0] == 'p' && ct2[0] == 'p' && ct1[1] != ct2[1])
|
|
{
|
|
*prec = it->next->next;
|
|
ft_memdel(&(it->next->content));
|
|
ft_memdel((void**)(&(it->next)));
|
|
ft_memdel(&(it->content));
|
|
ft_memdel((void**)(&it));
|
|
it = data->op;
|
|
prec = &(data->op);
|
|
}
|
|
else if (it->next->next)
|
|
{
|
|
ct3 = (char*)(it->next->next->content);
|
|
if (ct1[0] == 'p' && ct1[1] == 'b' && ct3[0] == 'p' && ct3[1] == 'a' && ft_strcmp(ct2, "rra") == 0)
|
|
{
|
|
*prec = it->next;
|
|
ft_strcpy((char*)(it->next->next->content), "sa");
|
|
ft_memdel(&(it->content));
|
|
ft_memdel((void**)&it);
|
|
it = data->op;
|
|
prec = &(data->op);
|
|
}
|
|
else
|
|
{
|
|
prec = &(it->next);
|
|
it = it->next;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
prec = &(it->next);
|
|
it = it->next;
|
|
}
|
|
}
|
|
}
|
|
|
|
int main(int ac, char **av)
|
|
{
|
|
t_list *it;
|
|
t_stack *ptr;
|
|
t_psdata data;
|
|
|
|
ps_initdata(&data);
|
|
if (!get_params(&data, ac, av))
|
|
return (0);
|
|
ptr = data.a;
|
|
if (ptr == NULL)
|
|
ft_putendl("Empty");
|
|
while (ptr)
|
|
{
|
|
ptr->ind = 0;
|
|
ptr = ptr->next;
|
|
}
|
|
if (data.size_a == 3)
|
|
{
|
|
sortfor3(&data);
|
|
ps_stkclean(&data);
|
|
return (0);
|
|
}
|
|
else if (data.size_a == 5)
|
|
{
|
|
sortfor5(&data);
|
|
ps_stkclean(&data);
|
|
return (0);
|
|
}
|
|
mark_groups(&data);
|
|
if (sort(&data) == 0)
|
|
ft_putendl_fd("Error\n", 2);
|
|
else
|
|
{
|
|
clean_op(&data);
|
|
it = data.op;
|
|
while (it)
|
|
{
|
|
ft_printf("%s\n", (char*)(it->content));
|
|
it = it->next;
|
|
}
|
|
}
|
|
ps_stkclean(&data);
|
|
return (0);
|
|
}
|