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

 * See LICENSE file for license details.

 */

#include "dwm.h"

#include <stdlib.h>

#include <string.h>

#include <X11/Xatom.h>

#include <X11/Xutil.h>

/* static */

static void

detachstack(Client *c) {

	Client **tc;

	for(tc=&stack; *tc && *tc != c; tc=&(*tc)->snext);

	*tc = c->snext;

}

static void

grabbuttons(Client *c, Bool focused) {

	XUngrabButton(dpy, AnyButton, AnyModifier, c->win);

	if(focused) {

		XGrabButton(dpy, Button1, MODKEY, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

		XGrabButton(dpy, Button1, MODKEY | LockMask, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

		XGrabButton(dpy, Button1, MODKEY | numlockmask, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

		XGrabButton(dpy, Button1, MODKEY | numlockmask | LockMask, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

		XGrabButton(dpy, Button2, MODKEY, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

		XGrabButton(dpy, Button2, MODKEY | LockMask, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

		XGrabButton(dpy, Button2, MODKEY | numlockmask, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

		XGrabButton(dpy, Button2, MODKEY | numlockmask | LockMask, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

		XGrabButton(dpy, Button3, MODKEY, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

		XGrabButton(dpy, Button3, MODKEY | LockMask, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

		XGrabButton(dpy, Button3, MODKEY | numlockmask, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

		XGrabButton(dpy, Button3, MODKEY | numlockmask | LockMask, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

	}

	else

		XGrabButton(dpy, AnyButton, AnyModifier, c->win, False, BUTTONMASK,

				GrabModeAsync, GrabModeSync, None, None);

}

static void

setclientstate(Client *c, long state) {

	long data[] = {state, None};

	XChangeProperty(dpy, c->win, wmatom[WMState], wmatom[WMState], 32,

			PropModeReplace, (unsigned char *)data, 2);

}

static int

xerrordummy(Display *dsply, XErrorEvent *ee) {

	return 0;

}

/* extern */

void

configure(Client *c) {

	XEvent synev;

	synev.type = ConfigureNotify;

	synev.xconfigure.display = dpy;

	synev.xconfigure.event = c->win;

	synev.xconfigure.window = c->win;

	synev.xconfigure.x = c->x;

	synev.xconfigure.y = c->y;

	synev.xconfigure.width = c->w;

	synev.xconfigure.height = c->h;

	synev.xconfigure.border_width = c->border;

	synev.xconfigure.above = None;

	XSendEvent(dpy, c->win, True, NoEventMask, &synev);

}

void

focus(Client *c) {

	if(c && !isvisible(c))

		return;

	if(sel && sel != c) {

		grabbuttons(sel, False);

		XSetWindowBorder(dpy, sel->win, dc.norm[ColBorder]);

	}

	if(c) {

		detachstack(c);

		c->snext = stack;

		stack = c;

		grabbuttons(c, True);

	}

	sel = c;

	drawstatus();

	if(!selscreen)

		return;

	if(c) {

		XSetWindowBorder(dpy, c->win, dc.sel[ColBorder]);

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

	}

	else

		XSetInputFocus(dpy, root, RevertToPointerRoot, CurrentTime);

}

Client *

getclient(Window w) {

	Client *c;

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

		if(c->win == w)

			return c;

	return NULL;

}

void

killclient(Arg *arg) {

	if(!sel)

		return;

	if(sel->proto & PROTODELWIN)

		sendevent(sel->win, wmatom[WMProtocols], wmatom[WMDelete]);

	else

		XKillClient(dpy, sel->win);

}

void

manage(Window w, XWindowAttributes *wa) {

	Client *c;

	Window trans;

	c = emallocz(sizeof(Client));

	c->tags = emallocz(ntags * sizeof(Bool));

	c->win = w;

	c->x = wa->x;

	c->y = wa->y;

	c->w = wa->width;

	c->h = wa->height;

	if(c->w == sw && c->h == sh) {

		c->border = 0;

		c->x = sx;

		c->y = sy;

	}

	else {

		c->border = BORDERPX;

		if(c->x + c->w + 2 * c->border > wax + waw)

			c->x = wax + waw - c->w - 2 * c->border;

		if(c->y + c->h + 2 * c->border > way + wah)

			c->y = way + wah - c->h - 2 * c->border;

		if(c->x < wax)

			c->x = wax;

		if(c->y < way)

			c->y = way;

	}

	updatesizehints(c);

	c->proto = getproto(c->win);

	XSelectInput(dpy, c->win,

		StructureNotifyMask | PropertyChangeMask | EnterWindowMask);

	XGetTransientForHint(dpy, c->win, &trans);

	grabbuttons(c, False);

	XSetWindowBorder(dpy, c->win, dc.norm[ColBorder]);

	updatetitle(c);

	settags(c, getclient(trans));

	if(!c->isfloat)

		c->isfloat = trans || c->isfixed;

	if(clients)

		clients->prev = c;

	c->next = clients;

	c->snext = stack;

	stack = clients = c;

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

	XMapWindow(dpy, c->win);

	setclientstate(c, NormalState);

	if(isvisible(c))

		focus(c);

	arrange();

}

void

resize(Client *c, Bool sizehints) {

	XWindowChanges wc;

	if(c->w <= 0 || c->h <= 0)

		return;

	if(sizehints) {

		if(c->minw && c->w < c->minw)

			c->w = c->minw;

		if(c->minh && c->h < c->minh)

			c->h = c->minh;

		if(c->maxw && c->w > c->maxw)

			c->w = c->maxw;

		if(c->maxh && c->h > c->maxh)

			c->h = c->maxh;

		/* inspired by algorithm from fluxbox */

		if(c->minay > 0 && c->maxay && (c->h - c->baseh) > 0) {

			dx = (float)(c->w - c->basew);

			dy = (float)(c->h - c->baseh);

			min = (float)(c->minax) / (float)(c->minay);

			max = (float)(c->maxax) / (float)(c->maxay);

			actual = dx / dy;

			if(max > 0 && min > 0 && actual > 0) {

				if(actual < min) {

					dy = (dx * min + dy) / (min * min + 1);

					dx = dy * min;

					c->w = (int)dx + c->basew;

					c->h = (int)dy + c->baseh;

				}

				else if(actual > max) {

					dy = (dx * min + dy) / (max * max + 1);

					dx = dy * min;

					c->w = (int)dx + c->basew;

					c->h = (int)dy + c->baseh;

				}

			}

		}

		if(c->incw)

			c->w -= (c->w - c->basew) % c->incw;

		if(c->inch)

			c->h -= (c->h - c->baseh) % c->inch;

	}

	if(c->w == sw && c->h == sh)

		c->border = 0;

	else

		c->border = BORDERPX;

	/* offscreen appearance fixes */

	if(c->x > sw)

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

	if(c->y > sh)

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

	if(c->x + c->w + 2 * c->border < sx)

		c->x = sx;

	if(c->y + c->h + 2 * c->border < sy)

		c->y = sy;

	wc.x = c->x;

	wc.y = c->y;

	wc.width = c->w;

	wc.height = c->h;

	wc.border_width = c->border;

	XConfigureWindow(dpy, c->win, CWX | CWY | CWWidth | CWHeight | CWBorderWidth, &wc);

	configure(c);

	XSync(dpy, False);

}

void

updatesizehints(Client *c) {

	long msize;

	XSizeHints size;

	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 & PAspect) {

		c->minax = size.min_aspect.x;

		c->minay = size.min_aspect.y;

		c->maxax = size.max_aspect.x;

		c->maxay = size.max_aspect.y;

	}

	else

		c->minax = c->minay = c->maxax = c->maxay = 0;

	c->isfixed = (c->maxw && c->minw && c->maxh && c->minh &&

				c->maxw == c->minw && c->maxh == c->minh);

}

void

updatetitle(Client *c) {

	char **list = NULL;