/**
 * @file lv_group.c
 *
 */

/*********************
 *      INCLUDES
 *********************/
#include <stddef.h>
#include "lv_group.h"

/*********************
 *      DEFINES
 *********************/

/**********************
 *      TYPEDEFS
 **********************/

/**********************
 *  STATIC PROTOTYPES
 **********************/
static void style_activate_def(lv_style_t * style);

/**********************
 *  STATIC VARIABLES
 **********************/

/**********************
 *      MACROS
 **********************/

/**********************
 *   GLOBAL FUNCTIONS
 **********************/

lv_group_t * lv_group_create(void)
{
    lv_group_t * group = dm_alloc(sizeof(lv_group_t));
    ll_init(&group->obj_ll, sizeof(lv_obj_t *));

    group->style_activate = style_activate_def;
    group->actve_obj = NULL;

    return group;
}

void lv_group_add(lv_group_t * group, lv_obj_t * obj)
{
    obj->group_p = group;
    lv_obj_t ** next = ll_ins_tail(&group->obj_ll);
    *next = obj;

    /* If the head and the tail is equal then there is only one object in the linked list.
     * In this case automatically activate it*/
    if(ll_get_head(&group->obj_ll) == next) {
        lv_group_activate_next(group);
    }
}

void lv_group_activate_obj(lv_group_t * group, lv_obj_t * obj)
{

}

void lv_group_set_style_cb(lv_group_t * group, void (*style_cb)(lv_style_t * style))
{
    group->style_activate = style_cb;
}

void lv_group_activate_next(lv_group_t * group)
{
    if(group->actve_obj != NULL) {
        (*group->actve_obj)->signal_f(*group->actve_obj, LV_SIGNAL_DEACTIVATE, NULL);
        lv_obj_inv(*group->actve_obj);
    }

    lv_obj_t ** obj_next;
    if(group->actve_obj == NULL) obj_next = ll_get_head(&group->obj_ll);
    else obj_next = ll_get_next(&group->obj_ll, group->actve_obj);

    if(obj_next == NULL) obj_next = ll_get_head(&group->obj_ll);
    group->actve_obj = obj_next;

    if(group->actve_obj != NULL){
        (*group->actve_obj)->signal_f(*group->actve_obj, LV_SIGNAL_ACTIVATE, NULL);
        lv_obj_inv(*group->actve_obj);
    }
}

void lv_group_activate_prev(lv_group_t * group)
{
    if(group->actve_obj != NULL) lv_obj_inv(*group->actve_obj);

    lv_obj_t ** obj_next;
    if(group->actve_obj == NULL) obj_next = ll_get_tail(&group->obj_ll);
    else obj_next = ll_get_prev(&group->obj_ll, group->actve_obj);

    if(obj_next == NULL) obj_next = ll_get_tail(&group->obj_ll);
    group->actve_obj = obj_next;

    if(group->actve_obj != NULL) lv_obj_inv(*group->actve_obj);

}

lv_style_t * lv_group_activate_style(lv_group_t * group, lv_style_t * style)
{
    lv_style_cpy(&group->style_tmp, style);

    if(group->style_activate != NULL) group->style_activate(&group->style_tmp);
    else style_activate_def(&group->style_tmp);

    return &group->style_tmp;
}


void lv_group_inc_active(lv_group_t * group)
{
    lv_obj_t * act = lv_group_get_active(group);
    if(act == NULL) return;

    act->signal_f(act, LV_SIGNAL_INCREASE, NULL);
}

void lv_group_dec_active(lv_group_t * group)
{
    lv_obj_t * act = lv_group_get_active(group);
    if(act == NULL) return;

    act->signal_f(act, LV_SIGNAL_DECREASE, NULL);
}

void lv_group_sel_active(lv_group_t * group)
{
    lv_obj_t * act = lv_group_get_active(group);
    if(act == NULL) return;

    act->signal_f(act, LV_SIGNAL_SELECT, NULL);
}

lv_obj_t * lv_group_get_active(lv_group_t * group)
{
    if(group == NULL) return NULL;
    if(group->actve_obj == NULL) return NULL;

    return *group->actve_obj;
}

/**********************
 *   STATIC FUNCTIONS
 **********************/

static void style_activate_def(lv_style_t * style)
{
    style->bcolor = COLOR_ORANGE;
    style->bopa = OPA_COVER;
    if(style->bwidth == 0 && style->empty == 0) style->bwidth = 2 * LV_DOWNSCALE;   /*Add border to not transparent styles*/
    else style->bwidth = style->bwidth * 2;                                         /*Make the border thicker*/
    style->mcolor = color_mix(style->mcolor, COLOR_ORANGE, OPA_80);
    style->gcolor = color_mix(style->gcolor, COLOR_ORANGE, OPA_80);
}