xmmv.c

/* See LICENSE file for copyright and license details. */
#include <xcb/xcb.h>
#include <stdlib.h>
#include <stdio.h>
#include <err.h>

#include "util.h"

#define CLEANMASK(m)	((m & ~0x80))

static xcb_connection_t	*conn;
static xcb_screen_t	*scr;

static void usage(char *);
static xcb_window_t get_focuswin(void);
static void cleanup(void);

static void
cleanup(void)
{
	kill_xcb(&conn);
}

static void
usage(char *name)
{
	fprintf(stderr, "usage: %s <wid>\n", name);
	exit(1);
}

static xcb_window_t
get_focuswin(void) {
	xcb_window_t w = 0;

	xcb_get_input_focus_cookie_t  c;
	xcb_get_input_focus_reply_t  *r;

	c = xcb_get_input_focus(conn);
	r = xcb_get_input_focus_reply(conn, c, NULL);

	if (r == NULL)
		errx(1, "failed to get focused window");

	w = r->focus;
	free(r);
	return w;
}

static void
mmove(xcb_window_t win) {
	uint32_t values[3];
	xcb_get_geometry_reply_t *geom;
	xcb_query_pointer_reply_t *ptr;
	xcb_generic_event_t *ev = NULL;
	int orig_x, orig_y;

	geom = xcb_get_geometry_reply(conn, xcb_get_geometry(conn, win), NULL);
	xcb_warp_pointer(conn, XCB_NONE, win, 0, 0, 0, 0,
			geom->width/2, geom->height/2);

	if (!geom)
		errx(1, "could not get window size");

	orig_x = geom->x;
	orig_y = geom->y;

	if (!scr->root)
		return;

	xcb_grab_pointer(conn, 0, scr->root,
			XCB_EVENT_MASK_BUTTON_RELEASE
			| XCB_EVENT_MASK_BUTTON_PRESS,
			XCB_GRAB_MODE_ASYNC, XCB_GRAB_MODE_ASYNC,
			scr->root, XCB_NONE, XCB_CURRENT_TIME);

	xcb_flush(conn);


	for (;;) {
		ev = xcb_poll_for_event(conn);

		if (geom->x != orig_x || geom->y != orig_y)
			if (ev != NULL) {
				if (ev->response_type == XCB_MOTION_NOTIFY)
					break;
				exit(0);
			}

		geom = xcb_get_geometry_reply(conn,
				xcb_get_geometry(conn, win), NULL);
		if (!geom)
			errx(1, "could not get window size");


		ptr = xcb_query_pointer_reply(conn,
				xcb_query_pointer(conn, scr->root), 0);

		if (!ptr)
			errx(1, "could not get pointer location");

		values[0] = ptr->root_x + geom->width/2;
		values[1] = ptr->root_y + geom->height/2;

		values[0] = (ptr->root_x + geom->width / 2
			> scr->width_in_pixels
			- (geom->border_width*2))
			? scr->width_in_pixels - geom->width
			- (geom->border_width*2)
			: ptr->root_x - geom->width / 2;
		values[1] = (ptr->root_y + geom->height / 2
			> scr->height_in_pixels
			- (geom->border_width*2))
			? (scr->height_in_pixels - geom->height
			- (geom->border_width*2))
			: ptr->root_y - geom->height / 2;

		if (ptr->root_x < geom->width/2)
			values[0] = 0;
		if (ptr->root_y < geom->height/2)
			values[1] = 0;

		xcb_configure_window(conn, win, XCB_CONFIG_WINDOW_X
				| XCB_CONFIG_WINDOW_Y, values);
		xcb_flush(conn);
	}

	xcb_ungrab_pointer(conn, XCB_CURRENT_TIME);
}

int
main(int argc, char **argv)
{
	xcb_window_t win;

	if (argc > 2)
		usage(argv[0]);
	
	init_xcb(&conn);
	get_screen(conn, &scr);
	atexit(cleanup);

	if (argc == 2)
		win = strtoul(argv[1], NULL, 16);
	else
		win = get_focuswin();

	mmove(win);

	return 0;
}