/*
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 *(at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.

 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <http://www.gnu.org/licenses/>.
 */

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <unistd.h>
#include <time.h>
#include <X11/Xlib.h>

#define MAXLENGTH 256

int
dectobin(int dec)
{
	if (dec == 0) return 0;
	if (dec == 1) return 1;
	return (dec % 2) + 10 * dectobin(dec / 2);
}

void
gettime(int *store)
{
	time_t t = time(NULL);
	struct tm *tm = localtime(&t);
	store[0] = tm->tm_hour;
	store[1] = tm->tm_min;
}

void
formatstring(char *status, int *time)
{
	char *env = getenv("binstatus");
	if (strcmp(env, "dec") == 0)
	{
		snprintf(status, MAXLENGTH, "%02d:%02d", time[0], time[1]);
	}
	else
	{
		snprintf(status, MAXLENGTH, "%05d %06d", dectobin(time[0]),
		dectobin(time[1]));
	}
}

int
main(void)
{
	int exitflag = EXIT_SUCCESS;
	char status[MAXLENGTH];
	int time[2];
	Display *dsp = XOpenDisplay(NULL);
	if(!dsp)
	{
		fprintf(stderr, "cannot open X display\n");
		exit(EXIT_FAILURE);
	}
	while (1)
	{
		gettime(time);
		formatstring(status, time);
		int res = XStoreName(dsp, DefaultRootWindow(dsp), status);
		if (res == BadAlloc)
		{
			fprintf(stderr, "X: unable to allocate source"
						" or server memory.\n");
			exitflag = EXIT_FAILURE;
			break;
		}
		else if (res == BadWindow)
		{
			fprintf(stderr, "X: No default window found\n");
			exitflag = EXIT_FAILURE;
			break;
		}
		XFlush(dsp);
		sleep(1);
	}
	XCloseDisplay(dsp);
	return exitflag;
}