#include<stdlib.h>
#include<stdio.h>
#include<string.h>
#include<unistd.h>
#include<signal.h>
//#include<X11/Xutil.h>
#include<X11/Xlib.h>
//#include <X11/Xatom.h>
#define LENGTH(X)               (sizeof(X) / sizeof (X[0]))
typedef struct {
	char* command;
	unsigned int interval;
	unsigned int signal;
} Block;
void sighandler(int num);

#include "blocks.h"

static Display *dpy;
static int screen;
static Window root;
static char statusbar[LENGTH(blocks)][50] = {0};
static char setrootcmd[256];
static char *statuscat;
static const char *volupcmd[]  = { "volup", NULL };
static const char *voldowncmd[]  = { "voldown", NULL };
static const char *volmutecmd[]  = { "volmute", NULL };
static int statusContinue = 1,volmuted = 0;

void replace(char *str, char old, char new)
{
	int N = strlen(str);
	for(int i = 0; i < N; i++)
		if(str[i] == old)
			str[i] = new;
}


void getcmd(char *cmd, char *output)
{
	FILE *cmdf = popen(cmd,"r");
	if (!cmdf)
		return;
	int N = strlen(output);
	char c;
	int i = 0;
	while((c = fgetc(cmdf)) != EOF)
		output[i++] = c;
	output[i++] = '\0';
	pclose(cmdf);
}

void getcmds(int time)
{
	const Block* current;
	for(int i = 0; i < LENGTH(blocks); i++)
	{	
		current = blocks + i;
		if ((current->interval != 0 && time % current->interval == 0) || time == -1)
			getcmd(current->command,statusbar[i]);
	}
}

void getsigcmds(int signal)
{
	const Block *current;
	for (int i = 0; i < LENGTH(blocks); i++)
	{
		current = blocks + i;
		if (current->signal == signal)
			getcmd(current->command,statusbar[i]);
	}
}

void setupsignals()
{
	for(int i = 0; i < LENGTH(blocks); i++)
	{	  
		if (blocks[i].signal > 0)
			signal(SIGRTMIN+blocks[i].signal, sighandler);
	}

}

void getstatus(char *str)
{
	int j = 0;//15;
	for(int i = 0; i < 5; j+=strlen(statusbar[i++]))
	{	
		strcpy(str + j, statusbar[i]);
	}
	//for (;j < LENGTH(str);j++)
	str[j] = '\0';

}

void setroot()
{
	Display *d = XOpenDisplay(NULL);
	if (d) {
		dpy = d;
	}
	screen = DefaultScreen(dpy);
	root = RootWindow(dpy, screen);
	getstatus(setrootcmd);
	replace(setrootcmd,'\n',' ');
	replace(setrootcmd,EOF,' ');
	//printf("%s\n",setrootcmd);
	XStoreName(dpy, root, setrootcmd);
	XCloseDisplay(dpy);
}


void *statusloop()
{
	setupsignals();
	int i = 0;
	getcmds(-1);
	while(statusContinue)
	{
		getcmds(i);
		setroot();
		sleep(1.0);
		i++;
	}
}

void statusinit()
{
	statusloop();
}


void sighandler(int signum)
{
	getsigcmds(signum-SIGRTMIN);
	setroot();
}

void termhandler(int signum)
{
	statusContinue = 0;
	exit(0);
}

int main()
{
	signal(SIGTERM, termhandler);
	signal(SIGINT, termhandler);
	statusinit();
}