/*
 * (C)opyright MMIV-MMVI Anselm R. Garbe <garbeam at gmail dot com>
 * See LICENSE file for license details.
 */

#include <stdlib.h>
#include <string.h>

#include "wm.h"

Frame *
create_frame(Area *a, Client *c)
{
	static unsigned short id = 1;
	Frame *f = cext_emallocz(sizeof(Frame));
	Frame **fa = a->sel ? &a->sel->anext : &a->frame;
	Frame **fc = c->sel ? &c->sel->cnext : &c->frame;

	f->id = id++;
	f->area = a;
	f->client = c;
	f->revert = f->rect = c->rect;
	f->rect.width += 2 * def.border;
	f->rect.height += def.border + height_of_bar();
	f->collapsed = False;

	f->tile = blitz_create_tile(c->framewin, c->gc);
	f->tagbar = blitz_create_input(c->framewin, c->gc, &def.font);
	f->titlebar = blitz_create_input(c->framewin, c->gc, &def.font);
	f->posbar = blitz_create_input(c->framewin, c->gc, &def.font);
	f->tile->notch = &c->rect;
	f->tagbar->text = c->tags;
	f->titlebar->text = c->name;
	f->titlebar->align = WEST;
	f->tagbar->align = f->posbar->align = CENTER;

	a->sel = f;
	c->sel = f;

	f->anext = *fa;
	*fa = f;
	f->cnext = *fc;
	*fc = f;

	return f;
}

void
remove_frame(Frame *f)
{
	Area *a = f->area;
	Frame **ft = &a->frame;

	for(; *ft && *ft != f; ft=&(*ft)->anext);
	cext_assert(*ft == f);
	*ft = f->anext;
}

void
insert_frame(Frame *pos, Frame *f, Bool before)
{
	Area *a = f->area;
	if(before) {
		Frame *ft;
		for(ft=a->frame; ft && ft->anext != pos; ft=ft->anext);
		pos=ft;
	}
	Frame **p = pos ? &pos->anext : &a->frame;
	f->anext = *p;
	*p = f;
}

void
destroy_frame(Frame *f)
{
	Client *c = f->client;
	Area *a = f->area;
	Frame **ft, *pr = nil;

	blitz_destroy_tile(f->tile);
	blitz_destroy_input(f->tagbar);
	blitz_destroy_input(f->titlebar);
	if(f->posbar->text)
		free(f->posbar->text);
	blitz_destroy_input(f->posbar);

	for(ft=&c->frame; *ft && *ft != f; pr = *ft, ft=&(*ft)->cnext);
	cext_assert(*ft == f);
	*ft = f->cnext;
	if(c->sel == f)
		c->sel = pr ? pr : *ft;

	for(ft=&a->frame; *ft && *ft != f; pr = *ft, ft=&(*ft)->anext);
	cext_assert(*ft == f);
	*ft = f->anext;
	if(a->sel == f)
		a->sel = pr ? pr : *ft;

	free(f);
}

Frame *
frame_of_id(Area *a, unsigned short id)
{
	Frame *f;
	for(f=a->frame; f && f->id != id; f=f->anext);
	return f;
}

int
idx_of_frame(Frame *f)
{
	Frame *t;
	int i = 0;
	for(t=f->area->frame; t && t != f; t=t->anext);
	return t ? i : -1;
}

Client *
frame_of_win(Window w)
{
	Client *c;
	for(c=client; c && c->framewin != w; c=c->next);
	return c;
}

void
update_frame_widget_colors(Frame *f)
{
 	if(sel_screen && (f->client == sel_client()))
		f->tile->color = f->tagbar->color = f->titlebar->color
			= def.selcolor;
	else
		f->tile->color = f->tagbar->color = f->titlebar->color
			= def.normcolor;

	if(f->area->sel == f)
		f->posbar->color = def.selcolor;
	else
		f->posbar->color = def.normcolor;
}

void
resize_frame(Frame *f)
{

	Frame *p;
	unsigned int fidx, size, w;
	char buf[256];

	for(fidx=0, p=f->area->frame; p && p != f; p=p->anext, fidx++);
	for(size=fidx; p; p=p->anext, size++);

	if(def.border) {
		f->tile->rect = f->rect;
		f->tile->rect.x = f->tile->rect.y = 0;
	}

	f->posbar->rect = f->tile->rect;
	f->posbar->rect.height = height_of_bar();

	snprintf(buf, sizeof(buf), "%s%d/%d",
		(f->area == f->area->view->area) ? "~" : "", fidx + 1, size);
	if(f->posbar->text)
		free(f->posbar->text);
	f->posbar->text = strdup(buf);

	w = f->posbar->rect.width =
		f->posbar->rect.height + blitz_textwidth(&def.font, f->posbar->text);

	f->posbar->rect.x = f->rect.width - f->posbar->rect.width; 
	
	/* tag bar */
	f->tagbar->rect = f->posbar->rect;
	f->tagbar->rect.x = 0;
	f->tagbar->rect.width =
		f->tagbar->rect.height + blitz_textwidth(&def.font, f->tagbar->text);

	if(f->tagbar->rect.width > f->rect.width / 3)
		f->tagbar->rect.width = f->rect.width / 3;

	f->titlebar->rect = f->tagbar->rect;
	f->titlebar->rect.x = f->tagbar->rect.x + f->tagbar->rect.width;
	f->titlebar->rect.width = f->rect.width - (f->tagbar->rect.width + f->posbar->rect.width);
}

void
draw_frame(Frame *f)
{
	f->tile->draw(f->tile);
	f->tagbar->draw(f->tagbar);
	f->titlebar->draw(f->titlebar);
	f->posbar->draw(f->posbar);
}