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

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

#include "wm.h"

static int
comp_label(const void *l1, const void *l2)
{
	Label *ll1 = *(Label **)l1;
	Label *ll2 = *(Label **)l2;
	return strcmp(ll1->name, ll2->name);
}

Label *
get_label(char *name)
{
	static unsigned int id = 1;
	Label *l = name2label(name);
   
	if(l)
		return l;
	l = cext_emallocz(sizeof(Label));
	l->id = id++;
	cext_strlcpy(l->name, name, sizeof(l->name));
	cext_strlcpy(l->colstr, def.selcolor, sizeof(l->colstr));
	l->color = def.sel;
	label = (Label **)cext_array_attach((void **)label, l, sizeof(Label *), &labelsz);
	nlabel++;
	qsort(label, nlabel, sizeof(Label *), comp_label);

	return l;
}

void
destroy_label(Label *l)
{
	cext_array_detach((void **)label, l, &labelsz);
	nlabel--;
}

unsigned int
bar_height()
{
	return xfont->ascent + xfont->descent + 4;
}

void
update_bar_geometry()
{
	unsigned int i, j;
    brect = rect;
    brect.height = bar_height();
    brect.y = rect.height - brect.height;
    XMoveResizeWindow(dpy, barwin, brect.x, brect.y, brect.width, brect.height);
    XSync(dpy, False);
    XFreePixmap(dpy, barpmap);
    barpmap = XCreatePixmap(dpy, barwin, brect.width, brect.height, DefaultDepth(dpy, screen));
    XSync(dpy, False);
	draw_bar();
	for(i = 0; i < ntag; i++)
		for(j = 1; j < tag[i]->narea; j++) {
			update_area_geometry(tag[i]->area[j]);
			arrange_area(tag[i]->area[j]);
		}
}

void
draw_bar()
{
	unsigned int i, iexp = 0;
	unsigned int w = 0;
	Label *exp = name2label(expand);
	Draw d = { 0 };

	if(exp)
		iexp = label2index(exp);

	d.align = WEST;
    d.gc = bargc;
    d.drawable = barpmap;
    d.rect = brect;
    d.rect.y = 0;
	d.font = xfont;

	if(!nlabel) { /* /default only */
		d.color = def.sel;
		blitz_drawlabel(dpy, &d);
		blitz_drawborder(dpy, &d);
	}
	else {
		for(i = 0; i < nlabel; i++) {
			Label *l = label[i];
			l->rect.x = l->rect.y = 0;
			l->rect.height = brect.height;
			if(i == iexp)
		   		continue;
			l->rect.width = brect.height;
			if(strlen(l->data))
				l->rect.width += XTextWidth(xfont, l->data, strlen(l->data));
			w += l->rect.width;
		}

		if(w >= brect.width) {
			/* failsafe mode, give all labels same width */
			w = brect.width / nlabel;
			for(i = 0; i < nlabel; i++) {
				label[i]->rect.x = i * w;
				label[i]->rect.width = w;
			}
			i--;
			label[i]->rect.width = brect.width - label[i]->rect.x;
		}
		else {
			label[iexp]->rect.width = brect.width - w;
			for(i = 1; i < nlabel; i++)
				label[i]->rect.x = label[i - 1]->rect.x + label[i - 1]->rect.width;
		}

		for(i = 0; i < nlabel; i++) {
			d.color = label[i]->color;
			d.rect = label[i]->rect;
			d.data = label[i]->data;
			blitz_drawlabel(dpy, &d);
			blitz_drawborder(dpy, &d);
		}
	}
    XCopyArea(dpy, barpmap, barwin, bargc, 0, 0, brect.width, brect.height, 0, 0);
    XSync(dpy, False);
}

int
label2index(Label *l)
{
	int i;
	for(i = 0; i < nlabel; i++)
		if(label[i] == l)
			return i;
	return -1;
}

int
lid2index(unsigned short id)
{
	int i;
	for(i = 0; i < nlabel; i++)
		if(label[i]->id == id)
			return i;
	return -1;
}

Label *
name2label(const char *name)
{
	char buf[256];
	unsigned int i;

 	cext_strlcpy(buf, name, sizeof(buf));	
	for(i = 0; i < nlabel; i++)
		if(!strncmp(label[i]->name, name, sizeof(label[i]->name)))
			return label[i];
	return nil;
}