/*

 * (C)opyright MMVI Anselm R. Garbe <garbeam at gmail dot com>

 * See LICENSE file for license details.

 */

#include <stdlib.h>

#include <stdio.h>

#include <string.h>

#include <X11/Xatom.h>

#include <X11/Xutil.h>

#include "dwm.h"

void (*arrange)(Arg *) = tiling;

static Rule rule[] = {

	/* class			instance	tags						floating */

	{ "Firefox-bin",	"Gecko",	{ [Twww] = "www" },			False },

};

static Client *

next(Client *c)

{

	for(; c && !c->tags[tsel]; c = c->next);

	return c;

}

void

zoom(Arg *arg)

{

	Client **l, *old;

	if(!(old = sel))

		return;

	for(l = &clients; *l && *l != sel; l = &(*l)->next);

	*l = sel->next;

	old->next = clients; /* pop */

	clients = old;

	sel = old;

	arrange(NULL);

	focus(sel);

}

void

max(Arg *arg)

{

	if(!sel)

		return;

	sel->x = sx;

	sel->y = sy + bh;

	sel->w = sw - 2 * sel->border;

	sel->h = sh - 2 * sel->border - bh;

	craise(sel);

	resize(sel, False);

	discard_events(EnterWindowMask);

}

void

view(Arg *arg)

{

	Client *c;

	tsel = arg->i;

	arrange(NULL);

	for(c = clients; c; c = next(c->next))

		draw_client(c);

	draw_bar();

}

void

tappend(Arg *arg)

{

	if(!sel)

		return;

	sel->tags[arg->i] = tags[arg->i];

	arrange(NULL);

}

void

ttrunc(Arg *arg)

{

	int i;

	if(!sel)

		return;

	for(i = 0; i < TLast; i++)

		sel->tags[i] = NULL;

	tappend(arg);

}

static void

ban_client(Client *c)

{

	XMoveWindow(dpy, c->win, c->x + 2 * sw, c->y);

	XMoveWindow(dpy, c->title, c->tx + 2 * sw, c->ty);

}

void

floating(Arg *arg)

{

	Client *c;

	arrange = floating;

	for(c = clients; c; c = c->next) {

		if(c->tags[tsel])

			resize(c, True);

		else

			ban_client(c);

	}

	if(sel && !sel->tags[tsel]) {

		if((sel = next(clients))) {

			craise(sel);

			focus(sel);

		}

	}

	discard_events(EnterWindowMask);

}

void

tiling(Arg *arg)

{

	Client *c;

	int n, i, w, h;

	w = sw - mw;

	arrange = tiling;

	for(n = 0, c = clients; c; c = c->next)

		if(c->tags[tsel] && !c->floating)

			n++;

	if(n > 1)

		h = (sh - bh) / (n - 1);

	else

		h = sh - bh;

	for(i = 0, c = clients; c; c = c->next) {

		if(c->tags[tsel]) {

			if(c->floating) {

				craise(c);

				resize(c, True);

				continue;

			}

			if(n == 1) {

				c->x = sx;

				c->y = sy + bh;

				c->w = sw - 2 * c->border;

				c->h = sh - 2 * c->border - bh;

			}

			else if(i == 0) {

				c->x = sx;

				c->y = sy + bh;

				c->w = mw - 2 * c->border;

				c->h = sh - 2 * c->border - bh;

			}

			else {

				c->x = sx + mw;

				c->y = sy + (i - 1) * h + bh;

				c->w = w - 2 * c->border;

				c->h = h - 2 * c->border;

			}

			resize(c, False);

			i++;

		}

		else

			ban_client(c);

	}

	if(sel && !sel->tags[tsel]) {

		if((sel = next(clients))) {

			craise(sel);

			focus(sel);

		}

	}

	discard_events(EnterWindowMask);

}

void

prevc(Arg *arg)

{

	Client *c;

	if(!sel)

		return;

	if((c = sel->revert && sel->revert->tags[tsel] ? sel->revert : NULL)) {

		craise(c);

		focus(c);

	}

}

void

nextc(Arg *arg)

{

	Client *c;

	if(!sel)

		return;

	if(!(c = next(sel->next)))

		c = next(clients);

	if(c) {

		craise(c);

		c->revert = sel;

		focus(c);

	}

}

void

ckill(Arg *arg)

{

	if(!sel)

		return;

	if(sel->proto & WM_PROTOCOL_DELWIN)

		send_message(sel->win, wm_atom[WMProtocols], wm_atom[WMDelete]);

	else

		XKillClient(dpy, sel->win);

}

static void

resize_title(Client *c)

{

	int i;

	c->tw = 0;

	for(i = 0; i < TLast; i++)

		if(c->tags[i])

			c->tw += textw(c->tags[i]) + dc.font.height;

	c->tw += textw(c->name) + dc.font.height;

	if(c->tw > c->w)

		c->tw = c->w + 2;

	c->tx = c->x + c->w - c->tw + 2;

	c->ty = c->y;

	XMoveResizeWindow(dpy, c->title, c->tx, c->ty, c->tw, c->th);

}

void

update_name(Client *c)

{

	XTextProperty name;

	int n;

	char **list = NULL;

	name.nitems = 0;

	c->name[0] = 0;

	XGetTextProperty(dpy, c->win, &name, net_atom[NetWMName]);

	if(!name.nitems)

		XGetWMName(dpy, c->win, &name);

	if(!name.nitems)

		return;

	if(name.encoding == XA_STRING)

		strncpy(c->name, (char *)name.value, sizeof(c->name));

	else {

		if(XmbTextPropertyToTextList(dpy, &name, &list, &n) >= Success

				&& n > 0 && *list)

		{

			strncpy(c->name, *list, sizeof(c->name));

			XFreeStringList(list);

		}

	}

	XFree(name.value);

	resize_title(c);

}

void

update_size(Client *c)

{

	XSizeHints size;

	long msize;

	if(!XGetWMNormalHints(dpy, c->win, &size, &msize) || !size.flags)

		size.flags = PSize;

	c->flags = size.flags;

	if(c->flags & PBaseSize) {

		c->basew = size.base_width;

		c->baseh = size.base_height;

	}

	else

		c->basew = c->baseh = 0;

	if(c->flags & PResizeInc) {

		c->incw = size.width_inc;

		c->inch = size.height_inc;

	}

	else

		c->incw = c->inch = 0;

	if(c->flags & PMaxSize) {

		c->maxw = size.max_width;

		c->maxh = size.max_height;

	}

	else

		c->maxw = c->maxh = 0;

	if(c->flags & PMinSize) {

		c->minw = size.min_width;

		c->minh = size.min_height;

	}

	else

		c->minw = c->minh = 0;

	if(c->flags & PWinGravity)

		c->grav = size.win_gravity;

	else

		c->grav = NorthWestGravity;

}

void

craise(Client *c)

{

	XRaiseWindow(dpy, c->win);

	XRaiseWindow(dpy, c->title);

}

void

lower(Client *c)

{

	XLowerWindow(dpy, c->title);

	XLowerWindow(dpy, c->win);

}

void

focus(Client *c)

{

	Client *old = sel;

	sel = c;

	if(old && old != c)

		draw_client(old);

	draw_client(c);

	XSetInputFocus(dpy, c->win, RevertToPointerRoot, CurrentTime);

	XFlush(dpy);

	discard_events(EnterWindowMask);

}

static void

init_tags(Client *c)

{

	XClassHint ch;

	static unsigned int len = rule ? sizeof(rule) / sizeof(rule[0]) : 0;

	unsigned int i, j;