conky/conky.c

/* Conky, a system monitor, based on torsmo
 *
 * This program is licensed under BSD license, read COPYING
 */

#include "conky.h"
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <time.h>
#include <locale.h>
#include <signal.h>
#include <unistd.h>
#include <string.h>
#include <errno.h>
#include <string.h>
#include <limits.h>
#if HAVE_DIRENT_H
#include <dirent.h>
#endif
#include <sys/time.h>
#include <X11/Xutil.h>
#include <sys/types.h>
#include <sys/stat.h>

#define CONFIG_FILE "$HOME/.conkyrc"
#define MAIL_FILE "$MAIL"
#define MAX_IF_BLOCK_DEPTH 5

/* alignments */
enum alignment {
	TOP_LEFT = 1,
	TOP_RIGHT,
	BOTTOM_LEFT,
	BOTTOM_RIGHT,
};

/* default config file */
static char *current_config;

/* set to 1 if you want all text to be in uppercase */
static unsigned int stuff_in_upper_case;

/* Position on the screen */
static int text_alignment;
static int gap_x, gap_y;

/* Font used */
static char *font_name;

/* Update interval */
static double update_interval;

/* Run how many times? */
static unsigned long total_run_times;

/* fork? */
static int fork_to_background;

/* border */
static int draw_borders;
static int stippled_borders;

static int draw_shades, draw_outline;

static int border_margin, border_width;

static long default_fg_color, default_bg_color, default_out_color;

static int cpu_avg_samples, net_avg_samples;

/*#ifdef OWN_WINDOW*/
/* create own window or draw stuff to root? */
static int own_window = 0;

/* fixed size/pos is set if wm/user changes them */
static int fixed_size = 0, fixed_pos = 0;
/*#endif*/

static int minimum_width, minimum_height;

/* no buffers in used memory? */
int no_buffers;

/* pad percentages to decimals? */
static int pad_percents = 0;

/* UTF-8 */
int utf8_mode = 0;


/* Text that is shown */
static char original_text[] =
    "$nodename - $sysname $kernel on $machine\n"
    "$hr\n"
    "${color grey}Uptime:$color $uptime\n"
    "${color grey}Frequency (in MHz):$color $freq\n"
    "${color grey}RAM Usage:$color $mem/$memmax - $memperc% ${membar 4}\n"
    "${color grey}Swap Usage:$color $swap/$swapmax - $swapperc% ${swapbar 4}\n"
    "${color grey}CPU Usage:$color $cpu% ${cpubar 4}\n"
    "${color grey}Processes:$color $processes  ${color grey}Running:$color $running_processes\n"
    "$hr\n"
    "${color grey}File systems:\n"
    " / $color${fs_free /}/${fs_size /} ${fs_bar 6 /}\n"
    "${color grey}Networking:\n"
    " Up:$color ${upspeed eth0} k/s${color grey} - Down:$color ${downspeed eth0} k/s\n"
    "${color grey}Temperatures:\n"
    " CPU:$color ${i2c temp 1}<7D>C${color grey} - MB:$color ${i2c temp 2}<7D>C\n"
    "$hr\n"
#ifdef SETI
    "${color grey}SETI@Home Statistics:\n"
    "${color grey}Seti Unit Number:$color $seti_credit\n"
    "${color grey}Seti Progress:$color $seti_prog% $seti_progbar\n"
#endif
#ifdef MPD
    "${color grey}MPD: $mpd_status $mpd_artist - $mpd_title from $mpd_album at $mpd_vol\n"
    "Bitrate: $mpd_bitrate\n" "Progress: $mpd_bar\n"
#endif
    "${color grey}Name		PID	CPU%	MEM%\n"
    " ${color lightgrey} ${top name 1} ${top pid 1} ${top cpu 1} ${top mem 1}\n"
    " ${color lightgrey} ${top name 2} ${top pid 2} ${top cpu 2} ${top mem 2}\n"
    " ${color lightgrey} ${top name 3} ${top pid 3} ${top cpu 3} ${top mem 3}\n"
    " ${color lightgrey} ${top name 4} ${top pid 4} ${top cpu 4} ${top mem 4}\n"
    "${tail /var/log/Xorg.0.log 3}";

static char *text = original_text;

static int total_updates;

/* font stuff */

static XFontStruct *font;

#ifdef XFT
static XftFont *xftfont;
static int font_alpha = 65535;
#endif

/* if-blocks */
static int blockdepth = 0;
static int if_jumped = 0;
static int blockstart[MAX_IF_BLOCK_DEPTH];

int check_mount(char *s)
{
	int ret = 0;
	FILE *mtab = fopen("/etc/mtab", "r");
	if (mtab) {
		char buf1[256], buf2[128];
		while (fgets(buf1, 256, mtab)) {
			sscanf(buf1, "%*s %128s", buf2);
			if (!strcmp(s, buf2)) {
				ret = 1;
				break;
			}
		}
		fclose(mtab);
	} else {
		ERR("Could not open mtab");
	}
	return ret;
}



static inline int calc_text_width(const char *s, unsigned int l)
{
#ifdef XFT
	if (use_xft) {
		XGlyphInfo gi;
		if (utf8_mode) {
			XftTextExtentsUtf8(display, xftfont, s, l, &gi);
		} else {
			XftTextExtents8(display, xftfont, s, l, &gi);
		}
		return gi.xOff;
	} else
#endif
	{
		return XTextWidth(font, s, l);
	}
}

#ifdef XFT

#define font_height() use_xft ? (xftfont->ascent + xftfont->descent) : \
    (font->max_bounds.ascent + font->max_bounds.descent)
#define font_ascent() use_xft ? xftfont->ascent : font->max_bounds.ascent
#define font_descent() use_xft ? xftfont->descent : font->max_bounds.descent

#else

#define font_height() (font->max_bounds.ascent + font->max_bounds.descent)
#define font_ascent() font->max_bounds.ascent
#define font_descent() font->max_bounds.descent

#endif

/* formatted text to render on screen, generated in generate_text(),
 * drawn in draw_stuff() */

static char text_buffer[TEXT_BUFFER_SIZE * 4];

/* special stuff in text_buffer */

#define SPECIAL_CHAR '\x01'

enum {
	HORIZONTAL_LINE,
	STIPPLED_HR,
	BAR,
	FG,
	BG,
	OUTLINE,
	ALIGNR,
	ALIGNC,
	GRAPH,
};

static struct special_t {
	int type;
	short height;
	short width;
	long arg;
	unsigned int *graph;
	int graph_width;
} specials[128];

static int special_count;
static int special_index;	/* used when drawing */

#define MAX_GRAPH_DEPTH 256 /* why 256? who knows. */

static struct special_t *new_special(char *buf, int t)
{
	if (special_count >= 128)
		CRIT_ERR("too many special things in text");

	buf[0] = SPECIAL_CHAR;
	buf[1] = '\0';
	if (t == GRAPH && specials[special_count].graph == NULL) {
		if (specials[special_count].height > 0)
			specials[special_count].graph_width = specials[special_count].height;
		else
			specials[special_count].graph_width = MAX_GRAPH_DEPTH;
		specials[special_count].graph = calloc(specials[special_count].graph_width, sizeof(long));
	}
	specials[special_count].type = t;
	return &specials[special_count++];
}

typedef struct tailstring_list {
	char data[TEXT_BUFFER_SIZE];
	struct tailstring_list *next;
} tailstring;

void addtail(tailstring ** head, char *data_in)
{
	tailstring *tmp;
	if ((tmp = malloc(sizeof(*tmp))) == NULL) {
		CRIT_ERR("malloc");
	}
	strncpy(tmp->data, data_in, TEXT_BUFFER_SIZE);
	tmp->next = *head;
	*head = tmp;
}

void freetail(tailstring * head)
{
	tailstring *tmp;

	while (head != NULL) {
		tmp = head->next;
		free(head);
		head = tmp;
	}
}



static void new_bar(char *buf, int w, int h, int usage)
{
	struct special_t *s = new_special(buf, BAR);
	s->arg = (usage > 255) ? 255 : ((usage < 0) ? 0 : usage);
	s->width = w;
	s->height = h;
}

static const char *scan_bar(const char *args, int *w, int *h)
{
	*w = 0;			/* zero width means all space that is available */
	*h = 6;
	/* bar's argument is either height or height,width */
	if (args) {
		int n = 0;
		if (sscanf(args, "%d,%d %n", h, w, &n) <= 1)
			sscanf(args, "%d %n", h, &n);
		args += n;
	}

	return args;
}

void graph_append(unsigned int *graph, long width, unsigned int f) {
	int i;
	for (i=0;i<width-1;i++) {
		graph[i] = graph[i+1];
	}
	graph[width-1] = f;
}

static void new_graph(char *buf, int w, int h, unsigned int i)
{
	struct special_t *s = new_special(buf, GRAPH);
	s->width = w;
	s->height = h;
	graph_append(s->graph, s->graph_width, i);
}

static const char *scan_graph(const char *args, int *w, int *h)
{
	*w = 0;			/* zero width means all space that is available */
	*h = 25;
	/* graph's argument is either height or height,width */
	if (args) {
		int n = 0;
		if (sscanf(args, "%d,%d %n", h, w, &n) <= 1)
			sscanf(args, "%d %n", h, &n);
		args += n;
	}

	return args;
}


static inline void new_hr(char *buf, int a)
{
	new_special(buf, HORIZONTAL_LINE)->height = a;
}

static inline void new_stippled_hr(char *buf, int a, int b)
{
	struct special_t *s = new_special(buf, STIPPLED_HR);
	s->height = b;
	s->arg = a;
}

static inline void new_fg(char *buf, long c)
{
	new_special(buf, FG)->arg = c;
}

static inline void new_bg(char *buf, long c)
{
	new_special(buf, BG)->arg = c;
}

static inline void new_outline(char *buf, long c)
{
	new_special(buf, OUTLINE)->arg = c;
}

static inline void new_alignr(char *buf, long c)
{
	new_special(buf, ALIGNR)->arg = c;
}

static inline void new_alignc(char *buf, long c)
{
	new_special(buf, ALIGNC)->arg = c;
}

/* quite boring functions */

static inline void for_each_line(char *b, void (*f) (char *))
{
	char *ps, *pe;

	for (ps = b, pe = b; *pe; pe++) {
		if (*pe == '\n') {
			*pe = '\0';
			f(ps);
			*pe = '\n';
			ps = pe + 1;
		}
	}

	if (ps < pe)
		f(ps);
}

static void convert_escapes(char *buf)
{
	char *p = buf, *s = buf;

	while (*s) {
		if (*s == '\\') {
			s++;
			if (*s == 'n')
				*p++ = '\n';
			else if (*s == '\\')
				*p++ = '\\';
			s++;
		} else
			*p++ = *s++;
	}
	*p = '\0';
}

/* converts from bytes to human readable format (k, M, G) */
static void human_readable(long long a, char *buf, int size)
{
	if (a >= 1024 * 1024 * 1024)
		snprintf(buf, size, "%.2fG", (a / 1024 / 1024) / 1024.0);
	else if (a >= 1024 * 1024) {
		double m = (a / 1024) / 1024.0;
		if (m >= 100.0)
			snprintf(buf, size, "%.0fM", m);
		else
			snprintf(buf, size, "%.1fM", m);
	} else if (a >= 1024)
		snprintf(buf, size, "%Ldk", a / (long long) 1024);
	else
		snprintf(buf, size, "%Ld", a);
}

/* text handling */

enum text_object_type {
	OBJ_acpiacadapter,
	OBJ_adt746xcpu,
	OBJ_adt746xfan,
	OBJ_acpifan,
	OBJ_addr,
	OBJ_linkstatus,
	OBJ_acpitemp,
	OBJ_battery,
	OBJ_buffers,
	OBJ_cached,
	OBJ_color,
	OBJ_cpu,
	OBJ_cpubar,
	OBJ_cpugraph,
	OBJ_downspeed,
	OBJ_downspeedf,
	OBJ_downspeedgraph,
	OBJ_else,
	OBJ_endif,
	OBJ_exec,
	OBJ_execi,
	OBJ_execbar,
	OBJ_execgraph,
	OBJ_freq,
	OBJ_fs_bar,
	OBJ_fs_bar_free,
	OBJ_fs_free,
	OBJ_fs_free_perc,
	OBJ_fs_size,
	OBJ_fs_used,
	OBJ_fs_used_perc,
	OBJ_hr,
	OBJ_alignr,
	OBJ_alignc,
	OBJ_i2c,
	OBJ_if_existing,
	OBJ_if_mounted,
	OBJ_if_running,
	OBJ_top,
	OBJ_top_mem,
	OBJ_tail,
	OBJ_kernel,
	OBJ_loadavg,
	OBJ_machine,
	OBJ_mails,
	OBJ_mem,
	OBJ_membar,
	OBJ_memgraph,
	OBJ_memmax,
	OBJ_memperc,
	OBJ_mixer,
	OBJ_mixerl,
	OBJ_mixerr,
	OBJ_mixerbar,
	OBJ_mixerlbar,
	OBJ_mixerrbar,
	OBJ_new_mails,
	OBJ_nodename,
	OBJ_pre_exec,
#ifdef MLDONKEY
	OBJ_ml_upload_counter,
	OBJ_ml_download_counter,
	OBJ_ml_nshared_files,
	OBJ_ml_shared_counter,
	OBJ_ml_tcp_upload_rate,
	OBJ_ml_tcp_download_rate,
	OBJ_ml_udp_upload_rate,
	OBJ_ml_udp_download_rate,
	OBJ_ml_ndownloaded_files,
	OBJ_ml_ndownloading_files,
#endif
	OBJ_processes,
	OBJ_running_processes,
	OBJ_shadecolor,
	OBJ_outlinecolor,
	OBJ_stippled_hr,
	OBJ_swap,
	OBJ_swapbar,
	OBJ_swapmax,
	OBJ_swapperc,
	OBJ_sysname,
	OBJ_temp1,		/* i2c is used instead in these */
	OBJ_temp2,
	OBJ_text,
	OBJ_time,
	OBJ_utime,
	OBJ_totaldown,
	OBJ_totalup,
	OBJ_updates,
	OBJ_upspeed,
	OBJ_upspeedf,
	OBJ_upspeedgraph,
	OBJ_uptime,
	OBJ_uptime_short,
#ifdef SETI
	OBJ_seti_prog,
	OBJ_seti_progbar,
	OBJ_seti_credit,
#endif
#ifdef MPD
	OBJ_mpd_title,
	OBJ_mpd_artist,
	OBJ_mpd_album,
	OBJ_mpd_vol,
	OBJ_mpd_bitrate,
	OBJ_mpd_status,
	OBJ_mpd_host,
	OBJ_mpd_port,
	OBJ_mpd_bar,
	OBJ_mpd_elapsed,
	OBJ_mpd_length,
	OBJ_mpd_percent,
#endif
#ifdef METAR
	OBJ_metar_ob_time,
	OBJ_metar_temp,
	OBJ_metar_tempf,
	OBJ_metar_windchill,
	OBJ_metar_dew_point,
	OBJ_metar_rh,
	OBJ_metar_windspeed,
	OBJ_metar_winddir,
	OBJ_metar_swinddir,
	OBJ_metar_cloud,
	OBJ_metar_u2d_time,
#endif
};

struct text_object {
	int type;
	union {
		char *s;	/* some string */
		int i;		/* some integer */
		long l;		/* some other integer */
		struct net_stat *net;
		struct fs_stat *fs;
		unsigned char loadavg[3];

		struct {
			struct fs_stat *fs;
			int w, h;
		} fsbar;	/* 3 */

		struct {
			int l;
			int w, h;
		} mixerbar;	/* 3 */

		struct {
			int fd;
			int arg;
			char devtype[256];
			char type[64];
		} i2c;		/* 2 */
		struct {
			int pos;
			char *s;
		} ifblock;
		struct {
			int num;
			int type;
		} top;

		struct {
			int wantedlines;
			int readlines;
			char *logfile;
			double last_update;
			float interval;
			char buffer[TEXT_BUFFER_SIZE];
		} tail;

		struct {
			double last_update;
			float interval;
			char *cmd;
			char *buffer;
		} execi;	/* 5 */

		struct {
			int a, b;
		} pair;		/* 2 */
		
	} data;
};

static unsigned int text_object_count;
static struct text_object *text_objects;

/* new_text_object() allocates a new zeroed text_object */
static struct text_object *new_text_object()
{
	text_object_count++;
	text_objects = (struct text_object *) realloc(text_objects,
						      sizeof(struct
							     text_object) *
						      text_object_count);
	memset(&text_objects[text_object_count - 1], 0,
	       sizeof(struct text_object));

	return &text_objects[text_object_count - 1];
}

static void free_text_objects()
{
	unsigned int i;

	for (i = 0; i < text_object_count; i++) {
		switch (text_objects[i].type) {
		case OBJ_acpitemp:
			close(text_objects[i].data.i);
			break;

		case OBJ_i2c:
			close(text_objects[i].data.i2c.fd);
			break;
		case OBJ_time:
		case OBJ_utime:
		case OBJ_if_existing:
		case OBJ_if_mounted:
		case OBJ_if_running:
			free(text_objects[i].data.ifblock.s);
			break;
		case OBJ_text:
		case OBJ_exec:
		case OBJ_execbar:
		case OBJ_execgraph:
#ifdef MPD
		case OBJ_mpd_title:
		case OBJ_mpd_artist:
		case OBJ_mpd_album:
		case OBJ_mpd_status:
		case OBJ_mpd_host:
#endif
		case OBJ_pre_exec:
		case OBJ_battery:
			free(text_objects[i].data.s);
			break;

		case OBJ_execi:
			free(text_objects[i].data.execi.cmd);
			free(text_objects[i].data.execi.buffer);
			break;
		}
	}

	free(text_objects);
	text_objects = NULL;
	text_object_count = 0;
}

void scan_mixer_bar(const char *arg, int *a, int *w, int *h)
{
	char buf1[64];
	int n;

	if (arg && sscanf(arg, "%63s %n", buf1, &n) >= 1) {
		*a = mixer_init(buf1);
		(void) scan_bar(arg + n, w, h);
	} else {
		*a = mixer_init(0);
		(void) scan_bar(arg, w, h);
	}
}

/* construct_text_object() creates a new text_object */
static void construct_text_object(const char *s, const char *arg)
{
	struct text_object *obj = new_text_object();

#define OBJ(a, n) if (strcmp(s, #a) == 0) { obj->type = OBJ_##a; need_mask |= (1 << n); {
#define END ; } } else

	if (s[0] == '#') {
		obj->type = OBJ_color;
		obj->data.l = get_x11_color(s);
	} else
		OBJ(acpitemp, 0) obj->data.i = open_acpi_temperature(arg);
	END OBJ(acpiacadapter, 0)
	END OBJ(freq, 0) END OBJ(acpifan, 0) END OBJ(battery,
						     0) char bat[64];
	if (arg)
		sscanf(arg, "%63s", bat);
	else
		strcpy(bat, "BAT0");
	obj->data.s = strdup(bat);
	END OBJ(buffers, INFO_BUFFERS)
	END OBJ(cached, INFO_BUFFERS)
	END OBJ(cpu, INFO_CPU)
	END OBJ(cpubar, INFO_CPU)
	 (void) scan_bar(arg, &obj->data.pair.a, &obj->data.pair.b);
	END OBJ(cpugraph, INFO_CPU)
			(void) scan_graph(arg, &obj->data.pair.a, &obj->data.pair.b);
	END OBJ(color, 0) obj->data.l =
	    arg ? get_x11_color(arg) : default_fg_color;
	END OBJ(downspeed, INFO_NET) obj->data.net = get_net_stat(arg);
	END OBJ(downspeedf, INFO_NET) obj->data.net = get_net_stat(arg);
	END OBJ(downspeedgraph, INFO_CPU)
			(void) scan_graph(arg, &obj->data.pair.a, &obj->data.pair.b);
	END OBJ(else, 0)
	    if (blockdepth) {
		text_objects[blockstart[blockdepth - 1] -
			     1].data.ifblock.pos = text_object_count;
		blockstart[blockdepth - 1] = text_object_count;
		obj->data.ifblock.pos = text_object_count + 2;
	} else {
		ERR("$else: no matching $if_*");
	}
	END OBJ(endif, 0)
	    if (blockdepth) {
		blockdepth--;
		text_objects[blockstart[blockdepth] - 1].data.ifblock.pos =
		    text_object_count;
	} else {
		ERR("$endif: no matching $if_*");
	}
	END
#ifdef HAVE_POPEN
	    OBJ(exec, 0) obj->data.s = strdup(arg ? arg : "");
	END OBJ(execbar, 0)
	    obj->data.s = strdup(arg ? arg : "");
	END OBJ(execgraph, 0)
	    obj->data.s = strdup(arg ? arg : "");
	END OBJ(execi, 0) unsigned int n;

	if (!arg
	    || sscanf(arg, "%f %n", &obj->data.execi.interval, &n) <= 0) {
		char buf[256];
		ERR("${execi <interval> command}");
		obj->type = OBJ_text;
		snprintf(buf, 256, "${%s}", s);
		obj->data.s = strdup(buf);
	} else {
		obj->data.execi.cmd = strdup(arg + n);
		obj->data.execi.buffer =
		    (char *) calloc(1, TEXT_BUFFER_SIZE);
	}
	END OBJ(pre_exec, 0) obj->type = OBJ_text;
	if (arg) {
		FILE *fp = popen(arg, "r");
		unsigned int n;
		char buf[2048];

		n = fread(buf, 1, 2048, fp);
		buf[n] = '\0';

		if (n && buf[n - 1] == '\n')
			buf[n - 1] = '\0';

		(void) pclose(fp);

		obj->data.s = strdup(buf);
	} else
		obj->data.s = strdup("");
	END
#endif
	    OBJ(fs_bar, INFO_FS) obj->data.fsbar.h = 4;
	arg = scan_bar(arg, &obj->data.fsbar.w, &obj->data.fsbar.h);
	if (arg) {
		while (isspace(*arg))
			arg++;
		if (*arg == '\0')
			arg = "/";
	} else
		arg = "/";
	obj->data.fsbar.fs = prepare_fs_stat(arg);
	END OBJ(fs_bar_free, INFO_FS) obj->data.fsbar.h = 4;
	if (arg) {
		unsigned int n;
		if (sscanf(arg, "%d %n", &obj->data.fsbar.h, &n) >= 1)
			arg += n;
	} else
		arg = "/";
	obj->data.fsbar.fs = prepare_fs_stat(arg);
	END OBJ(fs_free, INFO_FS) if (!arg)
		 arg = "/";
	obj->data.fs = prepare_fs_stat(arg);
	END OBJ(fs_used_perc, INFO_FS) if (!arg)
		 arg = "/";
	obj->data.fs = prepare_fs_stat(arg);
	END OBJ(fs_free_perc, INFO_FS) if (!arg)
		 arg = "/";
	obj->data.fs = prepare_fs_stat(arg);
	END OBJ(fs_size, INFO_FS) if (!arg)
		 arg = "/";
	obj->data.fs = prepare_fs_stat(arg);
	END OBJ(fs_used, INFO_FS) if (!arg)
		 arg = "/";
	obj->data.fs = prepare_fs_stat(arg);
	END OBJ(hr, 0) obj->data.i = arg ? atoi(arg) : 1;
	END OBJ(i2c, INFO_I2C) char buf1[64], buf2[64];
	int n;

	if (!arg) {
		ERR("i2c needs arguments");
		obj->type = OBJ_text;
		obj->data.s = strdup("${i2c}");
		return;
	}

	if (sscanf(arg, "%63s %63s %d", buf1, buf2, &n) != 3) {
		/* if scanf couldn't read three values, read type and num and use
		 * default device */
		sscanf(arg, "%63s %d", buf2, &n);
		obj->data.i2c.fd =
		    open_i2c_sensor(0, buf2, n, &obj->data.i2c.arg,
				    obj->data.i2c.devtype);
		strcpy(obj->data.i2c.type, buf2);
	} else {
		obj->data.i2c.fd =
		    open_i2c_sensor(buf1, buf2, n, &obj->data.i2c.arg,
				    obj->data.i2c.devtype);
		strcpy(obj->data.i2c.type, buf2);
	}

	END OBJ(top, INFO_TOP)
	char buf[64];
	int n;
	if (!arg) {
		ERR("top needs arguments");
		obj->type = OBJ_text;
		obj->data.s = strdup("${top}");
		return;
	}
	if (sscanf(arg, "%63s %i", buf, &n) == 2) {
		if (strcmp(buf, "name") == 0) {
			obj->data.top.type = TOP_NAME;
		} else if (strcmp(buf, "cpu") == 0) {
			obj->data.top.type = TOP_CPU;
		} else if (strcmp(buf, "pid") == 0) {
			obj->data.top.type = TOP_PID;
		} else if (strcmp(buf, "mem") == 0) {
			obj->data.top.type = TOP_MEM;
		} else {
			ERR("invalid arg for top");
			return;
		}
		if (n < 1 || n > 10) {
			CRIT_ERR("invalid arg for top");
			return;
		} else {
			obj->data.top.num = n - 1;
			top_cpu = 1;
		}
	} else {
		ERR("invalid args given for top");
		return;
	}
	END OBJ(top_mem, INFO_TOP)
	char buf[64];
	int n;
	if (!arg) {
		ERR("top_mem needs arguments");
		obj->type = OBJ_text;
		obj->data.s = strdup("${top_mem}");
		return;
	}
	if (sscanf(arg, "%63s %i", buf, &n) == 2) {
		if (strcmp(buf, "name") == 0) {
			obj->data.top.type = TOP_NAME;
		} else if (strcmp(buf, "cpu") == 0) {
			obj->data.top.type = TOP_CPU;
		} else if (strcmp(buf, "pid") == 0) {
			obj->data.top.type = TOP_PID;
		} else if (strcmp(buf, "mem") == 0) {
			obj->data.top.type = TOP_MEM;
		} else {
			ERR("invalid arg for top");
			return;
		}
		if (n < 1 || n > 10) {
			CRIT_ERR("invalid arg for top");
			return;
		} else {
			obj->data.top.num = n - 1;
			top_mem = 1;
		}
	} else {
		ERR("invalid args given for top");
		return;
	}
	END OBJ(addr, INFO_NET)
	    obj->data.net = get_net_stat(arg);
	END OBJ(linkstatus, INFO_WIFI)
	    obj->data.net = get_net_stat(arg);
	END OBJ(tail, 0)
	char buf[64];
	int n1, n2;
	if (!arg) {
		ERR("tail needs arguments");
		obj->type = OBJ_text;
		obj->data.s = strdup("${tail}");
		return;
	}
	if (sscanf(arg, "%63s %i %i", buf, &n1, &n2) == 2) {
		if (n1 < 1 || n1 > 30) {
			CRIT_ERR
			    ("invalid arg for tail, number of lines must be between 1 and 30");
			return;
		} else {
			FILE *fp;
			fp = fopen(buf, "rt");
			if (fp != NULL) {
				obj->data.tail.logfile =
				    malloc(TEXT_BUFFER_SIZE);
				strcpy(obj->data.tail.logfile, buf);
				obj->data.tail.wantedlines = n1 - 1;
				obj->data.tail.interval =
				    update_interval * 2;
				fclose(fp);
			} else {
				//fclose (fp);
				CRIT_ERR
				    ("tail logfile does not exist, or you do not have correct permissions");
			}
		}
	} else if (sscanf(arg, "%63s %i %i", buf, &n1, &n2) == 3) {
		if (n1 < 1 || n1 > 30) {
			CRIT_ERR
			    ("invalid arg for tail, number of lines must be between 1 and 30");
			return;
		} else if (n2 < 1 || n2 < update_interval) {
			CRIT_ERR
			    ("invalid arg for tail, interval must be greater than 0 and Conky's interval");
			return;
		} else {
			FILE *fp;
			fp = fopen(buf, "rt");
			if (fp != NULL) {
				obj->data.tail.logfile =
				    malloc(TEXT_BUFFER_SIZE);
				strcpy(obj->data.tail.logfile, buf);
				obj->data.tail.wantedlines = n1 - 1;
				obj->data.tail.interval = n2;
				fclose(fp);
			} else {
				//fclose (fp);
				CRIT_ERR
				    ("tail logfile does not exist, or you do not have correct permissions");
			}
		}
	}

	else {
		ERR("invalid args given for tail");
		return;
	}
	END OBJ(loadavg, INFO_LOADAVG) int a = 1, b = 2, c = 3, r = 3;
	if (arg) {
		r = sscanf(arg, "%d %d %d", &a, &b, &c);
		if (r >= 3 && (c < 1 || c > 3))
			r--;
		if (r >= 2 && (b < 1 || b > 3))
			r--, b = c;
		if (r >= 1 && (a < 1 || a > 3))
			r--, a = b, b = c;
	}
	obj->data.loadavg[0] = (r >= 1) ? (unsigned char) a : 0;
	obj->data.loadavg[1] = (r >= 2) ? (unsigned char) b : 0;
	obj->data.loadavg[2] = (r >= 3) ? (unsigned char) c : 0;
	END OBJ(if_existing, 0)
	    if (blockdepth >= MAX_IF_BLOCK_DEPTH) {
		CRIT_ERR("MAX_IF_BLOCK_DEPTH exceeded");
	}
	if (!arg) {
		ERR("if_existing needs an argument");
		obj->data.ifblock.s = 0;
	} else
		obj->data.ifblock.s = strdup(arg);
	blockstart[blockdepth] = text_object_count;
	obj->data.ifblock.pos = text_object_count + 2;
	blockdepth++;
	END OBJ(if_mounted, 0)
	    if (blockdepth >= MAX_IF_BLOCK_DEPTH) {
		CRIT_ERR("MAX_IF_BLOCK_DEPTH exceeded");
	}
	if (!arg) {
		ERR("if_mounted needs an argument");
		obj->data.ifblock.s = 0;
	} else
		obj->data.ifblock.s = strdup(arg);
	blockstart[blockdepth] = text_object_count;
	obj->data.ifblock.pos = text_object_count + 2;
	blockdepth++;
	END OBJ(if_running, 0)
	    if (blockdepth >= MAX_IF_BLOCK_DEPTH) {
		CRIT_ERR("MAX_IF_BLOCK_DEPTH exceeded");
	}
	if (arg) {
		char buf[256];
		snprintf(buf, 256, "pidof %s >/dev/null", arg);
		obj->data.ifblock.s = strdup(buf);
	} else {
		ERR("if_running needs an argument");
		obj->data.ifblock.s = 0;
	}
	blockstart[blockdepth] = text_object_count;
	obj->data.ifblock.pos = text_object_count + 2;
	blockdepth++;
	END OBJ(kernel, 0)
	END OBJ(machine, 0)
	END OBJ(mails, INFO_MAIL)
	END OBJ(mem, INFO_MEM)
	END OBJ(memmax, INFO_MEM)
	END OBJ(memperc, INFO_MEM)
	END OBJ(membar, INFO_MEM)
	 (void) scan_bar(arg, &obj->data.pair.a, &obj->data.pair.b);
	END OBJ(membar, INFO_MEM)
	(void) scan_graph(arg, &obj->data.pair.a, &obj->data.pair.b);
	END OBJ(mixer, INFO_MIXER) obj->data.l = mixer_init(arg);
	END OBJ(mixerl, INFO_MIXER) obj->data.l = mixer_init(arg);
	END OBJ(mixerr, INFO_MIXER) obj->data.l = mixer_init(arg);
	END OBJ(mixerbar, INFO_MIXER)
	    scan_mixer_bar(arg, &obj->data.mixerbar.l,
			   &obj->data.mixerbar.w, &obj->data.mixerbar.h);
	END OBJ(mixerlbar, INFO_MIXER)
	    scan_mixer_bar(arg, &obj->data.mixerbar.l,
			   &obj->data.mixerbar.w, &obj->data.mixerbar.h);
	END OBJ(mixerrbar, INFO_MIXER)
	    scan_mixer_bar(arg, &obj->data.mixerbar.l,
			   &obj->data.mixerbar.w, &obj->data.mixerbar.h);
	END
#ifdef MLDONKEY
	    OBJ(ml_upload_counter, INFO_MLDONKEY)
	    END OBJ(ml_download_counter, INFO_MLDONKEY)
	    END OBJ(ml_nshared_files, INFO_MLDONKEY)
	    END OBJ(ml_shared_counter, INFO_MLDONKEY)
	    END OBJ(ml_tcp_upload_rate, INFO_MLDONKEY)
	    END OBJ(ml_tcp_download_rate, INFO_MLDONKEY)
	    END OBJ(ml_udp_upload_rate, INFO_MLDONKEY)
	    END OBJ(ml_udp_download_rate, INFO_MLDONKEY)
	    END OBJ(ml_ndownloaded_files, INFO_MLDONKEY)
	    END OBJ(ml_ndownloading_files, INFO_MLDONKEY)
	    END
#endif
	    OBJ(new_mails, INFO_MAIL)
	END OBJ(nodename, 0)
	END OBJ(processes, INFO_PROCS)
	END OBJ(running_processes, INFO_RUN_PROCS)
	END OBJ(shadecolor, 0)
	    obj->data.l = arg ? get_x11_color(arg) : default_bg_color;
	END OBJ(outlinecolor, 0)
	    obj->data.l = arg ? get_x11_color(arg) : default_out_color;
	END OBJ(stippled_hr, 0) int a = stippled_borders, b = 1;
	if (arg) {
		if (sscanf(arg, "%d %d", &a, &b) != 2)
			sscanf(arg, "%d", &b);
	}
	if (a <= 0)
		a = 1;
	obj->data.pair.a = a;
	obj->data.pair.b = b;
	END OBJ(swap, INFO_MEM)
	END OBJ(swapmax, INFO_MEM)
	END OBJ(swapperc, INFO_MEM)
	END OBJ(swapbar, INFO_MEM)
	 (void) scan_bar(arg, &obj->data.pair.a, &obj->data.pair.b);
	END OBJ(sysname, 0) END OBJ(temp1, INFO_I2C) obj->type = OBJ_i2c;
	obj->data.i2c.fd =
	    open_i2c_sensor(0, "temp", 1, &obj->data.i2c.arg,
			    obj->data.i2c.devtype);
	END OBJ(temp2, INFO_I2C) obj->type = OBJ_i2c;
	obj->data.i2c.fd =
	    open_i2c_sensor(0, "temp", 2, &obj->data.i2c.arg,
			    obj->data.i2c.devtype);
	END OBJ(time, 0) obj->data.s = strdup(arg ? arg : "%F %T");
	END OBJ(utime, 0) obj->data.s = strdup(arg ? arg : "%F %T");
	END OBJ(totaldown, INFO_NET) obj->data.net = get_net_stat(arg);
	END OBJ(totalup, INFO_NET) obj->data.net = get_net_stat(arg);
	END OBJ(updates, 0)
	    END OBJ(alignr, 0) obj->data.i = arg ? atoi(arg) : 1;
	END OBJ(alignc, 0)
	    obj->data.i = arg ? atoi(arg) : 1;
	END OBJ(upspeed, INFO_NET) obj->data.net = get_net_stat(arg);
	END OBJ(upspeedf, INFO_NET) obj->data.net = get_net_stat(arg);
	END OBJ(upspeedgraph, INFO_CPU)
			(void) scan_graph(arg, &obj->data.pair.a, &obj->data.pair.b);
	END OBJ(uptime_short, INFO_UPTIME) END OBJ(uptime, INFO_UPTIME) END
	    OBJ(adt746xcpu, 0) END OBJ(adt746xfan, 0) END
#ifdef SETI
	 OBJ(seti_prog, INFO_SETI) END OBJ(seti_progbar, INFO_SETI)
	 (void) scan_bar(arg, &obj->data.pair.a, &obj->data.pair.b);
	END OBJ(seti_credit, INFO_SETI) END
#endif
#ifdef METAR
	 OBJ(metar_ob_time, INFO_METAR)
	    END
	    OBJ(metar_temp, INFO_METAR)
	    END
	    OBJ(metar_tempf, INFO_METAR)
	    END
	    OBJ(metar_windchill, INFO_METAR)
	    END
	    OBJ(metar_dew_point, INFO_METAR)
	    END
	    OBJ(metar_rh, INFO_METAR)
	    END
	    OBJ(metar_windspeed, INFO_METAR)
	    END
	    OBJ(metar_winddir, INFO_METAR)
	    END
	    OBJ(metar_swinddir, INFO_METAR)
	    END
	    OBJ(metar_cloud, INFO_METAR)
	    END OBJ(metar_u2d_time, INFO_METAR) END
#endif
#ifdef MPD
	 OBJ(mpd_artist, INFO_MPD)
	END OBJ(mpd_title, INFO_MPD)
			END OBJ(mpd_elapsed, INFO_MPD)
			END OBJ(mpd_length, INFO_MPD)
			END OBJ(mpd_percent, INFO_MPD)
			END OBJ(mpd_album, INFO_MPD) END OBJ(mpd_vol,
					     INFO_MPD) END OBJ(mpd_bitrate,
							       INFO_MPD)
	    END OBJ(mpd_status, INFO_MPD) END OBJ(mpd_bar, INFO_MPD)
	 (void) scan_bar(arg, &obj->data.pair.a, &obj->data.pair.b);
	END
#endif
	{
		char buf[256];
		ERR("unknown variable %s", s);
		obj->type = OBJ_text;
		snprintf(buf, 256, "${%s}", s);
		obj->data.s = strdup(buf);
	}
#undef OBJ
}

/* append_text() appends text to last text_object if it's text, if it isn't
 * it creates a new text_object */
static void append_text(const char *s)
{
	struct text_object *obj;

	if (s == NULL || *s == '\0')
		return;

	obj = text_object_count ? &text_objects[text_object_count - 1] : 0;

	/* create a new text object? */
	if (!obj || obj->type != OBJ_text) {
		obj = new_text_object();
		obj->type = OBJ_text;
		obj->data.s = strdup(s);
	} else {
		/* append */
		obj->data.s = (char *) realloc(obj->data.s,
					       strlen(obj->data.s) +
					       strlen(s) + 1);
		strcat(obj->data.s, s);
	}
}

static void extract_variable_text(const char *p)
{
	const char *s = p;

	free_text_objects();

	while (*p) {
		if (*p == '$') {
			*(char *) p = '\0';
			append_text(s);
			*(char *) p = '$';
			p++;
			s = p;

			if (*p != '$') {
				char buf[256];
				const char *var;
				unsigned int len;

				/* variable is either $foo or ${foo} */
				if (*p == '{') {
					p++;
					s = p;
					while (*p && *p != '}')
						p++;
				} else {
					s = p;
					if (*p == '#')
						p++;
					while (*p && (isalnum((int) *p)
						      || *p == '_'))
						p++;
				}

				/* copy variable to buffer */
				len = (p - s > 255) ? 255 : (p - s);
				strncpy(buf, s, len);
				buf[len] = '\0';

				if (*p == '}')
					p++;
				s = p;

				var = getenv(buf);

				/* if variable wasn't found from environment, use some special */
				if (!var) {
					char *p;
					char *arg = 0;

					/* split arg */
					if (strchr(buf, ' ')) {
						arg = strchr(buf, ' ');
						*arg = '\0';
						arg++;
						while (isspace((int) *arg))
							arg++;
						if (!*arg)
							arg = 0;
					}

					/* lowercase variable name */
					p = buf;
					while (*p) {
						*p = tolower(*p);
						p++;
					}

					construct_text_object(buf, arg);
				}
				continue;
			} else
				append_text("$");
		}

		p++;
	}
	append_text(s);
	if (blockdepth)
		ERR("one or more $endif's are missing");
}

double current_update_time, last_update_time;

static void generate_text()
{
	unsigned int i, n;
	struct information *cur = &info;
	char *p;

	special_count = 0;

	/* update info */

	current_update_time = get_time();

	update_stuff(cur);

	/* generate text */

	n = TEXT_BUFFER_SIZE * 4 - 2;
	p = text_buffer;

	for (i = 0; i < text_object_count; i++) {
		struct text_object *obj = &text_objects[i];

#define OBJ(a) break; case OBJ_##a:

		switch (obj->type) {
		default:
			{
				ERR("not implemented obj type %d",
				    obj->type);
			}
			OBJ(acpitemp) {
				/* does anyone have decimals in acpi temperature? */
				if (!use_spacer)
					snprintf(p, n, "%d",
						 (int)
						 get_acpi_temperature(obj->
								      data.
								      i));
				else
					snprintf(p, 5, "%d    ",
						 (int)
						 get_acpi_temperature(obj->
								      data.
								      i));
			}
			OBJ(freq) {
				snprintf(p, n, "%s", get_freq());
			}
			OBJ(adt746xcpu) {
				snprintf(p, n, "%s", get_adt746x_cpu());
			}
			OBJ(adt746xfan) {
				snprintf(p, n, "%s", get_adt746x_fan());
			}
			OBJ(acpifan) {
				snprintf(p, n, "%s", get_acpi_fan());
			}
			OBJ(acpiacadapter) {
				snprintf(p, n, "%s",
					 get_acpi_ac_adapter());
			}
			OBJ(battery) {
				get_battery_stuff(p, n, obj->data.s);
			}
			OBJ(buffers) {
				human_readable(cur->buffers * 1024, p,
					       255);
			}
			OBJ(cached) {
				human_readable(cur->cached * 1024, p, 255);
			}
			OBJ(cpu) {
				if (!use_spacer)
					snprintf(p, n, "%*d", pad_percents,
						 (int) (cur->cpu_usage *
							100.0));
				else
					snprintf(p, 4, "%*d    ",
						 pad_percents,
						 (int) (cur->cpu_usage *
							100.0));
			}
			OBJ(cpubar) {
				new_bar(p, obj->data.pair.a,
					obj->data.pair.b,
					(int) (cur->cpu_usage * 255.0));
			}
			OBJ(cpugraph) {
				new_graph(p, obj->data.pair.a,
						obj->data.pair.b,
						(unsigned int) (cur->cpu_usage * 100));
			}
			OBJ(color) {
				new_fg(p, obj->data.l);
			}
			OBJ(downspeed) {
				if (!use_spacer)
					snprintf(p, n, "%d",
						 (int) (obj->data.net->
							recv_speed /
							1024));
				else
					snprintf(p, 6, "%d     ",
						 (int) (obj->data.net->
							recv_speed /
							1024));
			}
			OBJ(downspeedf) {
				if (!use_spacer)
					snprintf(p, n, "%.1f",
						 obj->data.net->
						 recv_speed / 1024.0);
				else
					snprintf(p, 8, "%.1f       ",
						 obj->data.net->
						 recv_speed / 1024.0);
			}
			OBJ(downspeedgraph) {
				new_graph(p, obj->data.pair.a,
					  obj->data.pair.b,
					  (unsigned int) (obj->data.net->recv_speed / 1024.0));
			}
			OBJ(else) {
				if (!if_jumped) {
					i = obj->data.ifblock.pos - 2;
				} else {
					if_jumped = 0;
				}
			}
			OBJ(endif) {
				if_jumped = 0;
			}
#ifdef HAVE_POPEN
			OBJ(addr) {
	snprintf(p, n, "%u.%u.%u.%u",
		 obj->data.net->addr.
				 sa_data[2] & 255,
		 obj->data.net->addr.
				 sa_data[3] & 255,
		 obj->data.net->addr.
				 sa_data[4] & 255,
		 obj->data.net->addr.
				 sa_data[5] & 255);

			}
			OBJ(linkstatus) {
				snprintf(p, n, "%d",
					 obj->data.net->
							 linkstatus);
			}

			OBJ(exec) {
				char *p2 = p;
				FILE *fp = popen(obj->data.s, "r");
				int n2 = fread(p, 1, n, fp);
				(void) pclose(fp);

				p[n2] = '\0';
				if (n2 && p[n2 - 1] == '\n')
					p[n2 - 1] = '\0';

				while (*p2) {
					if (*p2 == '\001')
						*p2 = ' ';
					p2++;
				}
			}
			OBJ(execbar) {
				char *p2 = p;
				FILE *fp = popen(obj->data.s, "r");
				int n2 = fread(p, 1, n, fp);
				(void) pclose(fp);

				p[n2] = '\0';
				if (n2 && p[n2 - 1] == '\n')
					p[n2 - 1] = '\0';

				while (*p2) {
					if (*p2 == '\001')
						*p2 = ' ';
					p2++;
				}
				double barnum;
				if (sscanf(p, "%lf", &barnum) == 0) {
					ERR("reading execbar value failed (perhaps it's not the correct format?)");
				}
				if (barnum > 100 || barnum < 0) {
					ERR("your execbar value is not between 0 and 100, therefore it will be ignored");
				} else {
					barnum = barnum / 100.0;
					new_bar(p, 0,
						4, (int) (barnum * 255.0));
				}

			}
			OBJ(execgraph) {
				char *p2 = p;
				FILE *fp = popen(obj->data.s, "r");
				int n2 = fread(p, 1, n, fp);
				(void) pclose(fp);

				p[n2] = '\0';
				if (n2 && p[n2 - 1] == '\n')
					p[n2 - 1] = '\0';

				while (*p2) {
					if (*p2 == '\001')
						*p2 = ' ';
					p2++;
				}
				double barnum;
				if (sscanf(p, "%lf", &barnum) == 0) {
					ERR("reading execgraph value failed (perhaps it's not the correct format?)");
				}
				if (barnum > 100 || barnum < 0) {
					ERR("your execgraph value is not between 0 and 100, therefore it will be ignored");
				} else {
					barnum = barnum / 100.0;
					new_graph(p, 0,
							4, (int) (barnum));
				}

			}
			OBJ(execi) {
				if (current_update_time -
				    obj->data.execi.last_update <
				    obj->data.execi.interval) {
					snprintf(p, n, "%s",
						 obj->data.execi.buffer);
				} else {
					char *p2 = obj->data.execi.buffer;
					FILE *fp =
					    popen(obj->data.execi.cmd,
						  "r");
					int n2 =
					    fread(p2, 1, TEXT_BUFFER_SIZE,
						  fp);
					(void) pclose(fp);

					p2[n2] = '\0';
					if (n2 && p2[n2 - 1] == '\n')
						p2[n2 - 1] = '\0';

					while (*p2) {
						if (*p2 == '\001')
							*p2 = ' ';
						p2++;
					}

					snprintf(p, n, "%s",
						 obj->data.execi.buffer);

					obj->data.execi.last_update =
					    current_update_time;
				}
			}
#endif
			OBJ(fs_bar) {
				if (obj->data.fs != NULL) {
					if (obj->data.fs->size == 0)
						new_bar(p,
							obj->data.fsbar.w,
							obj->data.fsbar.h,
							255);
					else
						new_bar(p,
							obj->data.fsbar.w,
							obj->data.fsbar.h,
							(int) (255 -
							       obj->data.
							       fsbar.fs->
							       avail *
							       255 /
							       obj->data.
							       fs->size));
				}
			}
			OBJ(fs_free) {
				if (obj->data.fs != NULL)
					human_readable(obj->data.fs->avail,
						       p, 255);
			}
			OBJ(fs_free_perc) {
				if (obj->data.fs != NULL) {
					if (obj->data.fs->size)
						snprintf(p, n, "%*d",
							 pad_percents,
							 (int) ((obj->data.
								 fs->
								 avail *
								 100) /
								obj->data.
								fs->size));
					else
						snprintf(p, n, "0");
				}
			}
			OBJ(fs_size) {
				if (obj->data.fs != NULL)
					human_readable(obj->data.fs->size,
						       p, 255);
			}
			OBJ(fs_used) {
				if (obj->data.fs != NULL)
					human_readable(obj->data.fs->size -
						       obj->data.fs->avail,
						       p, 255);
			}
			OBJ(fs_bar_free) {
				if (obj->data.fs != NULL) {
					if (obj->data.fs->size == 0)
						new_bar(p,
							obj->data.fsbar.w,
							obj->data.fsbar.h,
							255);
					else
						new_bar(p,
							obj->data.fsbar.w,
							obj->data.fsbar.h,
							(int) (obj->data.
							       fsbar.fs->
							       avail *
							       255 /
							       obj->data.
							       fs->size));
				}
			}
			OBJ(fs_used_perc) {
				if (obj->data.fs != NULL) {
					if (obj->data.fs->size)
						snprintf(p, 4, "%d",
							 100 - ((int)
								((obj->
								  data.fs->
								  avail *
								  100) /
								 obj->data.
								 fs->
								 size)));
					else
						snprintf(p, n, "0");
				}
			}
			OBJ(loadavg) {
				float *v = info.loadavg;

				if (obj->data.loadavg[2])
					snprintf(p, n, "%.2f %.2f %.2f",
						 v[obj->data.loadavg[0] -
						   1],
						 v[obj->data.loadavg[1] -
						   1],
						 v[obj->data.loadavg[2] -
						   1]);
				else if (obj->data.loadavg[1])
					snprintf(p, n, "%.2f %.2f",
						 v[obj->data.loadavg[0] -
						   1],
						 v[obj->data.loadavg[1] -
						   1]);
				else if (obj->data.loadavg[0])
					snprintf(p, n, "%.2f",
						 v[obj->data.loadavg[0] -
						   1]);
			}
			OBJ(hr) {
				new_hr(p, obj->data.i);
			}
			OBJ(i2c) {
				double r;

				r = get_i2c_info(&obj->data.i2c.fd,
						 obj->data.i2c.arg,
						 obj->data.i2c.devtype,
						 obj->data.i2c.type);

				if (r >= 100.0 || r == 0)
					snprintf(p, n, "%d", (int) r);
				else
					snprintf(p, n, "%.1f", r);
			}
			OBJ(alignr) {
				new_alignr(p, obj->data.i);
			}
			OBJ(alignc) {
				new_alignc(p, obj->data.i);
			}
			OBJ(if_existing) {
				struct stat tmp;
				if ((obj->data.ifblock.s)
				    && (stat(obj->data.ifblock.s, &tmp) ==
					-1)) {
					i = obj->data.ifblock.pos - 2;
					if_jumped = 1;
				} else
					if_jumped = 0;
			}
			OBJ(if_mounted) {
				if ((obj->data.ifblock.s)
				    && (!check_mount(obj->data.ifblock.s)))
				{
					i = obj->data.ifblock.pos - 2;
					if_jumped = 1;
				} else
					if_jumped = 0;
			}
			OBJ(if_running) {
				if ((obj->data.ifblock.s)
				    && system(obj->data.ifblock.s)) {
					i = obj->data.ifblock.pos - 2;
					if_jumped = 1;
				} else
					if_jumped = 0;
			}
			OBJ(kernel) {
				snprintf(p, n, "%s", cur->uname_s.release);
			}
			OBJ(machine) {
				snprintf(p, n, "%s", cur->uname_s.machine);
			}

			/* memory stuff */
			OBJ(mem) {
				human_readable(cur->mem * 1024, p, 6);
			}
			OBJ(memmax) {
				human_readable(cur->memmax * 1024, p, 255);
			}
			OBJ(memperc) {
				if (cur->memmax) {
					if (!use_spacer)
						snprintf(p, n, "%*d",
							 pad_percents,
							 (cur->mem * 100) /
							 (cur->memmax));
					else
						snprintf(p, 4, "%*d   ",
							 pad_percents,
							 (cur->mem * 100) /
							 (cur->memmax));
				}
			}
			OBJ(membar) {
				new_bar(p, obj->data.pair.a,
					obj->data.pair.b,
					cur->memmax ? (cur->mem * 255) /
					(cur->memmax) : 0);
			}

			OBJ(memgraph) {
				new_graph(p, obj->data.pair.a,
					obj->data.pair.b,
					cur->memmax ? (cur->mem) /
							(cur->memmax) : 0);
			}
			/* mixer stuff */
			OBJ(mixer) {
				snprintf(p, n, "%d",
					 mixer_get_avg(obj->data.l));
			}
			OBJ(mixerl) {
				snprintf(p, n, "%d",
					 mixer_get_left(obj->data.l));
			}
			OBJ(mixerr) {
				snprintf(p, n, "%d",
					 mixer_get_right(obj->data.l));
			}
			OBJ(mixerbar) {
				new_bar(p, obj->data.mixerbar.w,
					obj->data.mixerbar.h,
					mixer_get_avg(obj->data.mixerbar.
						      l) * 255 / 100);
			}
			OBJ(mixerlbar) {
				new_bar(p, obj->data.mixerbar.w,
					obj->data.mixerbar.h,
					mixer_get_left(obj->data.mixerbar.
						       l) * 255 / 100);
			}
			OBJ(mixerrbar) {
				new_bar(p, obj->data.mixerbar.w,
					obj->data.mixerbar.h,
					mixer_get_right(obj->data.mixerbar.
							l) * 255 / 100);
			}

			/* mail stuff */
			OBJ(mails) {
				snprintf(p, n, "%d", cur->mail_count);
			}
			OBJ(new_mails) {
				snprintf(p, n, "%d", cur->new_mail_count);
			}
#ifdef MLDONKEY
			OBJ(ml_upload_counter) {
				snprintf(p, n, "%lld",
					 mlinfo.upload_counter / 1048576);
			}
			OBJ(ml_download_counter) {
				snprintf(p, n, "%lld",
					 mlinfo.download_counter /
					 1048576);
			}
			OBJ(ml_nshared_files) {
				snprintf(p, n, "%i", mlinfo.nshared_files);
			}
			OBJ(ml_shared_counter) {
				snprintf(p, n, "%lld",
					 mlinfo.shared_counter / 1048576);
			}
			OBJ(ml_tcp_upload_rate) {
				snprintf(p, n, "%.2f",
					 (float) mlinfo.tcp_upload_rate /
					 1024);
			}
			OBJ(ml_tcp_download_rate) {
				snprintf(p, n, "%.2f",
					 (float) mlinfo.tcp_download_rate /
					 1024);
			}
			OBJ(ml_udp_upload_rate) {
				snprintf(p, n, "%.2f",
					 (float) mlinfo.udp_upload_rate /
					 1024);
			}
			OBJ(ml_udp_download_rate) {
				snprintf(p, n, "%.2f",
					 (float) mlinfo.udp_download_rate /
					 1024);
			}
			OBJ(ml_ndownloaded_files) {
				snprintf(p, n, "%i",
					 mlinfo.ndownloaded_files);
			}
			OBJ(ml_ndownloading_files) {
				snprintf(p, n, "%i",
					 mlinfo.ndownloading_files);
			}
#endif

			OBJ(nodename) {
				snprintf(p, n, "%s",
					 cur->uname_s.nodename);
			}
			OBJ(outlinecolor) {
				new_outline(p, obj->data.l);
			}
			OBJ(processes) {
				if (!use_spacer)
					snprintf(p, n, "%d", cur->procs);
				else
					snprintf(p, 5, "%d    ",
						 cur->procs);
			}
			OBJ(running_processes) {
				if (!use_spacer)
					snprintf(p, n, "%d",
						 cur->run_procs);
				else
					snprintf(p, 3, "%d     ",
						 cur->run_procs);
			}
			OBJ(text) {
				snprintf(p, n, "%s", obj->data.s);
			}
			OBJ(shadecolor) {
				new_bg(p, obj->data.l);
			}
			OBJ(stippled_hr) {
				new_stippled_hr(p, obj->data.pair.a,
						obj->data.pair.b);
			}
			OBJ(swap) {
				human_readable(cur->swap * 1024, p, 255);
			}
			OBJ(swapmax) {
				human_readable(cur->swapmax * 1024, p,
					       255);
			}
			OBJ(swapperc) {
				if (cur->swapmax == 0) {
					strncpy(p, "No swap", 255);
				} else {
					if (!use_spacer)
						snprintf(p, 255, "%*u",
							 pad_percents,
							 (cur->swap *
							  100) /
							 cur->swapmax);
					else
						snprintf(p, 4, "%*u   ",
							 pad_percents,
							 (cur->swap *
							  100) /
							 cur->swapmax);
				}
			}
			OBJ(swapbar) {
				new_bar(p, obj->data.pair.a,
					obj->data.pair.b,
					cur->swapmax ? (cur->swap * 255) /
					(cur->swapmax) : 0);
			}
			OBJ(sysname) {
				snprintf(p, n, "%s", cur->uname_s.sysname);
			}
			OBJ(time) {
				time_t t = time(NULL);
				struct tm *tm = localtime(&t);
				setlocale(LC_TIME, "");
				strftime(p, n, obj->data.s, tm);
			}
			OBJ(utime) {
				time_t t = time(NULL);
				struct tm *tm = gmtime(&t);
				strftime(p, n, obj->data.s, tm);
			}
			OBJ(totaldown) {
				human_readable(obj->data.net->recv, p,
					       255);
			}
			OBJ(totalup) {
				human_readable(obj->data.net->trans, p,
					       255);
			}
			OBJ(updates) {
				snprintf(p, n, "%d", total_updates);
			}
			OBJ(upspeed) {
				if (!use_spacer)
					snprintf(p, n, "%d",
						 (int) (obj->data.net->
							trans_speed /
							1024));
				else
					snprintf(p, 5, "%d     ",
						 (int) (obj->data.net->
							trans_speed /
							1024));
			}
			OBJ(upspeedf) {
				if (!use_spacer)
					snprintf(p, n, "%.1f",
						 obj->data.net->
						 trans_speed / 1024.0);
				else
					snprintf(p, 8, "%.1f       ",
						 obj->data.net->
						 trans_speed / 1024.0);
			}
			OBJ(upspeedgraph) {
				new_graph(p, obj->data.pair.a,
					  obj->data.pair.b,
					  (unsigned int) (obj->data.net->trans_speed / 1024.0));
			}
			OBJ(uptime_short) {
				format_seconds_short(p, n,
						     (int) cur->uptime);
			}
			OBJ(uptime) {
				format_seconds(p, n, (int) cur->uptime);
			}

#ifdef SETI
			OBJ(seti_prog) {
				snprintf(p, n, "%.2f",
					 cur->seti_prog * 100.0f);
			}
			OBJ(seti_progbar) {
				new_bar(p, obj->data.pair.a,
					obj->data.pair.b,
					(int) (cur->seti_prog * 255.0f));
			}
			OBJ(seti_credit) {
				snprintf(p, n, "%.0f", cur->seti_credit);
			}
#endif

#ifdef MPD
			OBJ(mpd_title) {
				snprintf(p, n, "%s", cur->mpd.title);
			}
			OBJ(mpd_artist) {
				snprintf(p, n, "%s", cur->mpd.artist);
			}
			OBJ(mpd_album) {
				snprintf(p, n, "%s", cur->mpd.album);
			}
			OBJ(mpd_vol) {
				snprintf(p, n, "%i", cur->mpd.volume);
			}
			OBJ(mpd_bitrate) {
				snprintf(p, n, "%i", cur->mpd.bitrate);
			}
			OBJ(mpd_status) {
				snprintf(p, n, "%s", cur->mpd.status);
			}
			OBJ(mpd_elapsed) {
				int days=0, hours=0, minutes=0, seconds=0;
				int tmp = cur->mpd.elapsed;
				while (tmp >= 86400) {
					tmp -= 86400;
					days++;
				}
				while (tmp >= 3600) {
					tmp -= 3600;
					hours++;
				}
				while (tmp >= 60) {
					tmp -= 60;
					minutes++;
				}
				seconds = tmp;
				if (days > 0)
					snprintf(p, n, "%i days %i:%i:%2i", days, hours, minutes, seconds);
				else if (days > 0)
					snprintf(p, n, "%i:%i:%02i", hours, minutes, seconds);
				else
					snprintf(p, n, "%i:%02i", minutes, seconds);
			}
			OBJ(mpd_length) {
				int days=0, hours=0, minutes=0, seconds=0;
				int tmp = cur->mpd.length;
				while (tmp >= 86400) {
					tmp -= 86400;
					days++;
				}
				while (tmp >= 3600) {
					tmp -= 3600;
					hours++;
				}
				while (tmp >= 60) {
					tmp -= 60;
					minutes++;
				}
				seconds = tmp;
				if (days > 0)
					snprintf(p, n, "%i days %i:%i:%i", days, hours, minutes, seconds);
				else if (days > 0)
					snprintf(p, n, "%i:%i:%i", hours, minutes, seconds);
				else
					snprintf(p, n, "%i:%i", minutes, seconds);
			}
			OBJ(mpd_percent) {
				snprintf(p, n, "%2.0f", cur->mpd.progress*100);
			}
			OBJ(mpd_bar) {
				new_bar(p, obj->data.pair.a,
					obj->data.pair.b,
					(int) (cur->mpd.progress *
					       255.0f));
			}
#endif
			OBJ(top) {
				if (obj->data.top.type == TOP_NAME
				    && obj->data.top.num >= 0
				    && obj->data.top.num < 10) {
					// if we limit the buffer and add a bunch of space after, it stops the thing from
					// moving other shit around, which is really fucking annoying
					snprintf(p, 17,
						 "%s                              ",
						 cur->cpu[obj->data.top.
							  num]->name);
				} else if (obj->data.top.type == TOP_CPU
					   && obj->data.top.num >= 0
					   && obj->data.top.num < 10) {
					snprintf(p, 7, "%3.2f      ",
						 cur->cpu[obj->data.top.
							  num]->amount);
				} else if (obj->data.top.type == TOP_PID
					   && obj->data.top.num >= 0
					   && obj->data.top.num < 10) {
					snprintf(p, 8, "%i           ",
						 cur->cpu[obj->data.top.
							  num]->pid);
				} else if (obj->data.top.type == TOP_MEM
					   && obj->data.top.num >= 0
					   && obj->data.top.num < 10) {
					snprintf(p, 7, "%3.2f       ",
						 cur->cpu[obj->data.top.
							  num]->totalmem);
				}
			}
			OBJ(top_mem) {
				if (obj->data.top.type == TOP_NAME
				    && obj->data.top.num >= 0
				    && obj->data.top.num < 10) {
					// if we limit the buffer and add a bunch of space after, it stops the thing from
					// moving other shit around, which is really fucking annoying
					snprintf(p, 17,
						 "%s                              ",
						 cur->memu[obj->data.top.
							   num]->name);
				} else if (obj->data.top.type == TOP_CPU
					   && obj->data.top.num >= 0
					   && obj->data.top.num < 10) {
					snprintf(p, 7, "%3.2f      ",
						 cur->memu[obj->data.top.
							   num]->amount);
				} else if (obj->data.top.type == TOP_PID
					   && obj->data.top.num >= 0
					   && obj->data.top.num < 10) {
					snprintf(p, 8, "%i           ",
						 cur->memu[obj->data.top.
							   num]->pid);
				} else if (obj->data.top.type == TOP_MEM
					   && obj->data.top.num >= 0
					   && obj->data.top.num < 10) {
					snprintf(p, 7, "%3.2f       ",
						 cur->memu[obj->data.top.
							   num]->totalmem);
				}
			}



			/*
			 * I'm tired of everything being packed in
			 * pee
			 * poop
			 */


			OBJ(tail) {
				if (current_update_time -
				    obj->data.tail.last_update <
				    obj->data.tail.interval) {
					snprintf(p, n, "%s",
						 obj->data.tail.buffer);
				} else {

					obj->data.tail.last_update =
					    current_update_time;

					FILE *fp;
					int i;
					tailstring *head = NULL;
					tailstring *headtmp1 = NULL;
					tailstring *headtmp2 = NULL;
					tailstring *headtmp2tmp = NULL;
					fp = fopen(obj->data.tail.logfile,
						   "rt");
					if (fp == NULL)
						ERR("tail logfile failed to open");
					else {
						obj->data.tail.readlines =
						    0;

						while (fgets
						       (obj->data.tail.
							buffer,
							TEXT_BUFFER_SIZE *
							4, fp) != NULL) {
							addtail(&head,
								obj->data.
								tail.
								buffer);
							obj->data.tail.
							    readlines++;
						}

						fclose(fp);

						headtmp1 = head;
						if (obj->data.tail.
						    readlines > 0) {
							for (i = 0;
							     i <
							     obj->data.
							     tail.
							     wantedlines;
							     i++) {
								if (head) {
									addtail
									    (&headtmp2,
									     head->
									     data);
									head = head->next;
								} else
									break;
							}
							headtmp2tmp =
							    headtmp2;
							for (i = 0;
							     i <
							     obj->data.
							     tail.
							     wantedlines;
							     i++) {
								if (headtmp2) {
									strncat
									    (obj->
									     data.
									     tail.
									     buffer,
									     headtmp2->
									     data,
									     TEXT_BUFFER_SIZE
									     *
									     4
									     /
									     obj->
									     data.
									     tail.
									     wantedlines);
									headtmp2
									    =
									    headtmp2->
									    next;
								}
							}

							/* this is good enough for now. */
							snprintf(p, n,
								 "%s",
								 obj->data.
								 tail.
								 buffer);

							freetail
							    (headtmp2tmp);
						}
						freetail(headtmp1);
					}
				}
			}


#ifdef METAR
			// Hmm, it's expensive to calculate this shit every time FIXME
			OBJ(metar_ob_time) {
				if (data.ob_hour != INT_MAX
				    && data.ob_minute != INT_MAX
				    && metar_worked)
					format_seconds(p, n,
						       data.ob_hour *
						       3600 +
						       data.ob_minute *
						       60);
				else
					format_seconds(p, n, 0);
			}
			OBJ(metar_temp) {
				if (data.temp != INT_MAX && metar_worked)
					snprintf(p, n, "%i", data.temp);
				else
					snprintf(p, n, "-");
			}
			OBJ(metar_tempf) {
				if (data.temp != INT_MAX && metar_worked)
					snprintf(p, n, "%3.1f",
						 (data.temp +
						  40) * 9.0 / 5 - 40);
				else
					snprintf(p, n, "-");
			}
			OBJ(metar_windchill) {
				if (data.temp != INT_MAX
				    && data.winData.windSpeed != INT_MAX
				    && metar_worked)
					snprintf(p, n, "%i",
						 calculateWindChill(data.
								    temp,
								    data.
								    winData.
								    windSpeed));
				else
					snprintf(p, n, "-");
			}
			OBJ(metar_dew_point) {
				if (data.dew_pt_temp != INT_MAX
				    && metar_worked)
					snprintf(p, n, "%i",
						 data.dew_pt_temp);
				else
					snprintf(p, n, "-");
			}
			OBJ(metar_rh) {
				if (data.temp != INT_MAX
				    && data.dew_pt_temp != INT_MAX
				    && metar_worked)
					snprintf(p, n, "%i",
						 calculateRelativeHumidity
						 (data.temp,
						  data.dew_pt_temp));
				else
					snprintf(p, n, "-");
			}

			OBJ(metar_windspeed) {
				if (data.winData.windSpeed != INT_MAX
				    && metar_worked)
					snprintf(p, n, "%i",
						 knTokph(data.winData.
							 windSpeed));
				else
					snprintf(p, n, "-");
			}
			OBJ(metar_winddir) {
				if (data.winData.windDir != INT_MAX
				    && metar_worked)
					snprintf(p, n, "%s",
						 calculateWindDirectionString
						 (data.winData.windDir));
				else
					snprintf(p, n, "-");
			}
			OBJ(metar_swinddir) {
				if (data.winData.windDir != INT_MAX
				    && metar_worked)
					snprintf(p, n, "%s",
						 calculateShortWindDirectionString
						 (data.winData.windDir));
				else
					snprintf(p, n, "-");
			}

			OBJ(metar_cloud) {
				if (data.cldTypHgt[0].cloud_type[0] != '\0'
				    && metar_worked) {
					if (strcmp
					    (&data.cldTypHgt[0].
					     cloud_type[0], "SKC") == 0)
						snprintf(p, n,
							 "Clear Sky");
					else if (strcmp
						 (&data.cldTypHgt[0].
						  cloud_type[0],
						  "CLR") == 0)
						snprintf(p, n,
							 "Clear Sky");
					else if (strcmp
						 (&data.cldTypHgt[0].
						  cloud_type[0],
						  "FEW") == 0)
						snprintf(p, n,
							 "Few clouds");
					else if (strcmp
						 (&data.cldTypHgt[0].
						  cloud_type[0],
						  "SCT") == 0)
						snprintf(p, n,
							 "Scattered clouds");
					else if (strcmp
						 (&data.cldTypHgt[0].
						  cloud_type[0],
						  "BKN") == 0)
						snprintf(p, n,
							 "Broken clouds");
					else if (strcmp
						 (&data.cldTypHgt[0].
						  cloud_type[0],
						  "OVC") == 0)
						snprintf(p, n, "Overcast");
					else
						snprintf(p, n,
							 "Checking...");
				} else
					snprintf(p, n, "Checking...");
			}
			OBJ(metar_u2d_time) {
				format_seconds(p, n,
					       (int) last_metar_update %
					       (3600 * 24) + 3600);
			}
#endif

			break;
		}

		{
			unsigned int a = strlen(p);
			p += a;
			n -= a;
		}
	}

	if (stuff_in_upper_case) {
		char *p;

		p = text_buffer;
		while (*p) {
			*p = toupper(*p);
			p++;
		}
	}

	last_update_time = current_update_time;
	total_updates++;
	//free(p);
}

/*
 * text size
 */

static int text_start_x, text_start_y;	/* text start position in window */
static int text_width, text_height;

static inline int get_string_width(const char *s)
{
	return *s ? calc_text_width(s, strlen(s)) : 0;
}

static void text_size_updater(char *s)
{
	int w = 0;
	char *p;

	/* get string widths and skip specials */
	p = s;
	while (*p) {
		if (*p == SPECIAL_CHAR) {
			*p = '\0';
			w += get_string_width(s);
			*p = SPECIAL_CHAR;

			if (specials[special_index].type == BAR || specials[special_index].type == GRAPH) {
				w += specials[special_index].width;
			}

			special_index++;
			s = p + 1;
		}
		p++;
	}

	w += get_string_width(s);

	if (w > text_width)
		text_width = w;

	text_height += font_height();
}

static void update_text_area()
{
	int x, y;

	/* update text size if it isn't fixed */
#ifdef OWN_WINDOW
	if (!fixed_size)
#endif
	{
		text_width = minimum_width;
		text_height = 0;
		special_index = 0;
		for_each_line(text_buffer, text_size_updater);
		text_width += 1;
		if (text_height < minimum_height)
			text_height = minimum_height;
	}

	/* get text position on workarea */
	switch (text_alignment) {
	case TOP_LEFT:
		x = gap_x;
		y = gap_y;
		break;

	case TOP_RIGHT:
		x = workarea[2] - text_width - gap_x;
		y = gap_y;
		break;

	default:
	case BOTTOM_LEFT:
		x = gap_x;
		y = workarea[3] - text_height - gap_y;
		break;

	case BOTTOM_RIGHT:
		x = workarea[2] - text_width - gap_x;
		y = workarea[3] - text_height - gap_y;
		break;
	}

#ifdef OWN_WINDOW
	if (own_window) {
		x += workarea[0];
		y += workarea[1];
		text_start_x = border_margin + 1;
		text_start_y = border_margin + 1;
		window.x = x - border_margin - 1;
		window.y = y - border_margin - 1;
	} else
#endif
	{
		/* If window size doesn't match to workarea's size, then window
		 * probably includes panels (gnome).
		 * Blah, doesn't work on KDE. */
		if (workarea[2] != window.width
		    || workarea[3] != window.height) {
			y += workarea[1];
			x += workarea[0];
		}

		text_start_x = x;
		text_start_y = y;
	}
}

/*
 * drawing stuff
 */

static int cur_x, cur_y;	/* current x and y for drawing */
static int draw_mode;		/* FG, BG or OUTLINE */
static long current_color;

static inline void set_foreground_color(long c)
{
	current_color = c;
	XSetForeground(display, window.gc, c);
}

static void draw_string(const char *s)
{
	if (s[0] == '\0')
		return;
	int i, i2, pos, width_of_s;
	int max, added;
	width_of_s = get_string_width(s);
	if (out_to_console) {
		printf("%s\n", s);
	}
	strcpy(tmpstring1, s);
	pos = 0;
	added = 0;
	char space[2];
	snprintf(space, 2, " ");
	max = ((text_width - width_of_s) / get_string_width(space));
	/*
	 * This code looks for tabs in the text and coverts them to spaces.
	 * The trick is getting the correct number of spaces,
	 * and not going over the window's size without forcing
	 * the window larger.
	 */
	for (i = 0; i < TEXT_BUFFER_SIZE; i++) {
		if (tmpstring1[i] == '\t')	// 9 is ascii tab
		{
			i2 = 0;
			for (i2 = 0;
			     i2 < (8 - (1 + pos) % 8) && added <= max;
			     i2++) {
				tmpstring2[pos + i2] = ' ';
				added++;
			}
			pos += i2;
		} else {
			if (tmpstring1[i] != 9) {
				tmpstring2[pos] = tmpstring1[i];
				pos++;
			}
		}
	}
	s = tmpstring2;
#ifdef XFT
	if (use_xft) {
		XColor c;
		XftColor c2;
		c.pixel = current_color;
		XQueryColor(display, DefaultColormap(display, screen), &c);

		c2.pixel = c.pixel;
		c2.color.red = c.red;
		c2.color.green = c.green;
		c2.color.blue = c.blue;
		c2.color.alpha = font_alpha;
		if (utf8_mode) {
			XftDrawStringUtf8(window.xftdraw, &c2, xftfont,
					  cur_x, cur_y, (XftChar8 *) s,
					  strlen(s));
		} else {
			XftDrawString8(window.xftdraw, &c2, xftfont,
				       cur_x, cur_y, (XftChar8 *) s,
				       strlen(s));
		}
	} else
#endif
	{
		XDrawString(display, window.drawable, window.gc,
			    cur_x, cur_y, s, strlen(s));
	}
	memcpy(tmpstring1, s, TEXT_BUFFER_SIZE);
	cur_x += width_of_s;


}

static void draw_line(char *s)
{
	char *p;

	cur_x = text_start_x;
	cur_y += font_ascent();

	/* find specials and draw stuff */
	p = s;
	while (*p) {
		if (*p == SPECIAL_CHAR) {
			int w = 0;

			/* draw string before special */
			*p = '\0';
			draw_string(s);
			*p = SPECIAL_CHAR;
			s = p + 1;

			/* draw special */
			switch (specials[special_index].type) {
			case HORIZONTAL_LINE:
				{
					int h =
					    specials[special_index].height;
					int mid = font_ascent() / 2;
					w = text_start_x + text_width -
					    cur_x;

					XSetLineAttributes(display,
							   window.gc, h,
							   LineSolid,
							   CapButt,
							   JoinMiter);
					XDrawLine(display, window.drawable,
						  window.gc, cur_x,
						  cur_y - mid / 2,
						  cur_x + w,
						  cur_y - mid / 2);
				}
				break;

			case STIPPLED_HR:
				{
					int h =
					    specials[special_index].height;
					int s =
					    specials[special_index].arg;
					int mid = font_ascent() / 2;
					char ss[2] = { s, s };
					w = text_start_x + text_width -
					    cur_x - 1;

					XSetLineAttributes(display,
							   window.gc, h,
							   LineOnOffDash,
							   CapButt,
							   JoinMiter);
					XSetDashes(display, window.gc, 0,
						   ss, 2);
					XDrawLine(display, window.drawable,
						  window.gc, cur_x,
						  cur_y - mid / 2,
						  cur_x + w,
						  cur_y - mid / 2);
				}
				break;

			case BAR:
				{
					int h =
					    specials[special_index].height;
					int bar_usage =
					    specials[special_index].arg;
					int by =
					    cur_y - (font_ascent() +
						     h) / 2 - 1;
					w = specials[special_index].width;
					if (w == 0)
						w = text_start_x +
						    text_width - cur_x - 1;
					if (w < 0)
						w = 0;

					XSetLineAttributes(display,
							   window.gc, 1,
							   LineSolid,
							   CapButt,
							   JoinMiter);

					XDrawRectangle(display,
						       window.drawable,
						       window.gc, cur_x,
						       by, w, h);
					XFillRectangle(display,
						       window.drawable,
						       window.gc, cur_x,
						       by,
						       w * bar_usage / 255,
						       h);
				}
				break;

			case GRAPH:
				{
					int h =
							specials[special_index].height;
					int by =
							cur_y - (font_ascent() +
							h) / 2 - 1;
					int line;
					w = specials[special_index].width;
					if (w == 0)
						w = text_start_x +
								text_width - cur_x - 1;
					if (w < 0)
						w = 0;
					if (w >= specials[special_index].graph_width)
						line = w/specials[special_index].graph_width+1;
					else
						line = 1;
					XSetLineAttributes(display,
							window.gc, 1,
							LineSolid,
							CapButt,
							JoinMiter);
					XDrawRectangle(display,
							window.drawable,
							window.gc, cur_x,
							by, w, h);
					XSetLineAttributes(display,
							window.gc, line,
							LineSolid,
							CapButt,
							JoinMiter);
					int i;
					for (i=0;i<specials[special_index].graph_width;i++) {
						XDrawLine(display, window.drawable, window.gc, cur_x+(i*w*1.0/specials[special_index].graph_width)+2, by+h, cur_x+(i*w*1.0/specials[special_index].graph_width)+2, by+h-specials[special_index].graph[i]*h/100.0); /* this is mugfugly, but it works */
					}
					cur_y += h;
				}
				break;

			case FG:
				if (draw_mode == FG)
					set_foreground_color(specials
							     [special_index].
							     arg);
				break;

			case BG:
				if (draw_mode == BG)
					set_foreground_color(specials
							     [special_index].
							     arg);
				break;

			case OUTLINE:
				if (draw_mode == OUTLINE)
					set_foreground_color(specials
							     [special_index].
							     arg);
				break;

			case ALIGNR:
				{
					int pos_x =
					    text_start_x + text_width -
					    cur_x - 1 -
					    get_string_width(p);
					if (pos_x >
					    specials[special_index].arg)
						w = pos_x -
						    specials
						    [special_index].arg;
				}
				break;

			case ALIGNC:
				{
					int pos_x =
					    text_start_x + text_width -
					    cur_x - 1 -
					    get_string_width(p) / 2 -
					    (text_width / 2);
					if (pos_x >
					    specials[special_index].arg)
						w = pos_x -
						    specials
						    [special_index].arg;
				}
				break;

			}

			cur_x += w;

			special_index++;
		}

		p++;
	}

	draw_string(s);

	cur_y += font_descent();
}

static void draw_text()
{
	cur_y = text_start_y;

	/* draw borders */
	if (draw_borders && border_width > 0) {
		unsigned int b = (border_width + 1) / 2;

		if (stippled_borders) {
			char ss[2] =
			    { stippled_borders, stippled_borders };
			XSetLineAttributes(display, window.gc,
					   border_width, LineOnOffDash,
					   CapButt, JoinMiter);
			XSetDashes(display, window.gc, 0, ss, 2);
		} else {
			XSetLineAttributes(display, window.gc,
					   border_width, LineSolid,
					   CapButt, JoinMiter);
		}

		XDrawRectangle(display, window.drawable, window.gc,
			       text_start_x - border_margin + b,
			       text_start_y - border_margin + b,
			       text_width + border_margin * 2 - 1 - b * 2,
			       text_height + border_margin * 2 - 1 -
			       b * 2);
	}

	/* draw text */
	special_index = 0;
	for_each_line(text_buffer, draw_line);
}

static void draw_stuff()
{
	if (draw_shades && !draw_outline) {
		text_start_x++;
		text_start_y++;
		set_foreground_color(default_bg_color);
		draw_mode = BG;
		draw_text();
		text_start_x--;
		text_start_y--;
	}

	if (draw_outline) {
		int i, j;
		for (i = -1; i < 2; i++)
			for (j = -1; j < 2; j++) {
				if (i == 0 && j == 0)
					continue;
				text_start_x += i;
				text_start_y += j;
				set_foreground_color(default_out_color);
				draw_mode = OUTLINE;
				draw_text();
				text_start_x -= i;
				text_start_y -= j;
			}
	}

	set_foreground_color(default_fg_color);
	draw_mode = FG;
	draw_text();

#ifdef XDBE
	if (use_xdbe) {
		XdbeSwapInfo swap;
		swap.swap_window = window.window;
		swap.swap_action = XdbeBackground;
		XdbeSwapBuffers(display, &swap, 1);
	}
#endif
/*#ifdef METAR wtf is this for exactly? aside from trying to cause segfaults?
if (metar_station != NULL) {
	free(metar_station);
	metar_station = NULL;
}
if (metar_server != NULL) {
	free(metar_server);
	metar_server = NULL;
}
if (metar_path != NULL) {
	free(metar_path);
	metar_path = NULL;
}
#endif*/

}

static void clear_text(int exposures)
{
#ifdef XDBE
	if (use_xdbe)
		return;		/* The swap action is XdbeBackground, which clears */
#endif
	/* there is some extra space for borders and outlines */
	XClearArea(display, window.drawable,
		   text_start_x - border_margin - 1,
		   text_start_y - border_margin - 1,
		   text_width + border_margin * 2 + 2,
		   text_height + border_margin * 2 + 2,
		   exposures ? True : 0);
}

static int need_to_update;

/* update_text() generates new text and clears old text area */
static void update_text()
{
	generate_text();
	clear_text(1);
	need_to_update = 1;
}

static void main_loop()
{
	Region region = XCreateRegion();
	info.looped = 0;
	while (total_run_times == 0 || info.looped < total_run_times - 1) {
		info.looped++;
		XFlush(display);

		/* wait for X event or timeout */

		if (!XPending(display)) {
			fd_set fdsr;
			struct timeval tv;
			int s;
			double t =
			    update_interval - (get_time() -
					       last_update_time);

			if (t < 0)
				t = 0;

			tv.tv_sec = (long) t;
			tv.tv_usec = (long) (t * 1000000) % 1000000;

			FD_ZERO(&fdsr);
			FD_SET(ConnectionNumber(display), &fdsr);

			s = select(ConnectionNumber(display) + 1, &fdsr, 0,
				   0, &tv);
			if (s == -1) {
				if (errno != EINTR)
					ERR("can't select(): %s",
					    strerror(errno));
			} else {
				/* timeout */
				if (s == 0)
					update_text();
			}
		}

		if (need_to_update) {
#ifdef OWN_WINDOW
			int wx = window.x, wy = window.y;
#endif

			need_to_update = 0;

			update_text_area();

#ifdef OWN_WINDOW
			if (own_window) {
				/* resize window if it isn't right size */
				if (!fixed_size &&
				    (text_width + border_margin * 2 !=
				     window.width
				     || text_height + border_margin * 2 !=
				     window.height)) {
					window.width =
					    text_width +
					    border_margin * 2 + 1;
					window.height =
					    text_height +
					    border_margin * 2 + 1;
					XResizeWindow(display,
						      window.window,
						      window.width,
						      window.height);
				}

				/* move window if it isn't in right position */
				if (!fixed_pos
				    && (window.x != wx
					|| window.y != wy)) {
					XMoveWindow(display, window.window,
						    window.x, window.y);
				}
			}
#endif

			clear_text(1);

#ifdef XDBE
			if (use_xdbe) {
				XRectangle r;
				r.x = text_start_x - border_margin;
				r.y = text_start_y - border_margin;
				r.width = text_width + border_margin * 2;
				r.height = text_height + border_margin * 2;
				XUnionRectWithRegion(&r, region, region);
			}
#endif
		}

		/* handle X events */

		while (XPending(display)) {
			XEvent ev;
			XNextEvent(display, &ev);

			switch (ev.type) {
			case Expose:
				{
					XRectangle r;
					r.x = ev.xexpose.x;
					r.y = ev.xexpose.y;
					r.width = ev.xexpose.width;
					r.height = ev.xexpose.height;
					XUnionRectWithRegion(&r, region,
							     region);
				}
				break;

#ifdef OWN_WINDOW
			case ReparentNotify:
				/* set background to ParentRelative for all parents */
				if (own_window)
					set_transparent_background(window.
								   window);
				break;

			case ConfigureNotify:
				if (own_window) {
					/* if window size isn't what expected, set fixed size */
					if (ev.xconfigure.width !=
					    window.width
					    || ev.xconfigure.height !=
					    window.height) {
						if (window.width != 0
						    && window.height != 0)
							fixed_size = 1;

						/* clear old stuff before screwing up size and pos */
						clear_text(1);

						{
							XWindowAttributes
							    attrs;
							if (XGetWindowAttributes(display, window.window, &attrs)) {
								window.
								    width =
								    attrs.
								    width;
								window.
								    height
								    =
								    attrs.
								    height;
							}
						}

						text_width =
						    window.width -
						    border_margin * 2 - 1;
						text_height =
						    window.height -
						    border_margin * 2 - 1;
					}

					/* if position isn't what expected, set fixed pos, total_updates
					 * avoids setting fixed_pos when window is set to weird locations
					 * when started */
					if (total_updates >= 2
					    && !fixed_pos
					    && (window.x != ev.xconfigure.x
						|| window.y !=
						ev.xconfigure.y)
					    && (ev.xconfigure.x != 0
						|| ev.xconfigure.y != 0)) {
						fixed_pos = 1;
					}
				}
				break;
#endif

			default:
				break;
			}
		}

		/* XDBE doesn't seem to provide a way to clear the back buffer without
		 * interfering with the front buffer, other than passing XdbeBackground
		 * to XdbeSwapBuffers. That means that if we're using XDBE, we need to
		 * redraw the text even if it wasn't part of the exposed area. OTOH,
		 * if we're not going to call draw_stuff at all, then no swap happens
		 * and we can safely do nothing.
		 */

		if (!XEmptyRegion(region)) {
#ifdef XDBE
			if (use_xdbe) {
				XRectangle r;
				r.x = text_start_x - border_margin;
				r.y = text_start_y - border_margin;
				r.width = text_width + border_margin * 2;
				r.height = text_height + border_margin * 2;
				XUnionRectWithRegion(&r, region, region);
			}
#endif
			XSetRegion(display, window.gc, region);
#ifdef XFT
			if (use_xft)
				XftDrawSetClip(window.xftdraw, region);
#endif
			draw_stuff();
			XDestroyRegion(region);
			region = XCreateRegion();
		}
	}
}

static void load_font()
{
#ifdef XFT
	/* load Xft font */
	if (use_xft) {
		if (xftfont != NULL)
			XftFontClose(display, xftfont);

		if ((xftfont =
		     XftFontOpenName(display, screen, font_name)) != NULL)
			return;

		ERR("can't load Xft font '%s'", font_name);
		if ((xftfont =
		     XftFontOpenName(display, screen,
				     "courier-12")) != NULL)
			return;

		ERR("can't load Xft font '%s'", "courier-12");

		if ((font = XLoadQueryFont(display, "fixed")) == NULL) {
			CRIT_ERR("can't load font '%s'", "fixed");
		}
		use_xft = 0;

		return;
	}
#endif

	/* load normal font */
	if (font != NULL)
		XFreeFont(display, font);

	if ((font = XLoadQueryFont(display, font_name)) == NULL) {
		ERR("can't load font '%s'", font_name);
		if ((font = XLoadQueryFont(display, "fixed")) == NULL) {
			CRIT_ERR("can't load font '%s'", "fixed");
		}
	}
}

static void set_font()
{
#ifdef XFT
	if (use_xft) {
		if (window.xftdraw != NULL)
			XftDrawDestroy(window.xftdraw);
		window.xftdraw = XftDrawCreate(display, window.drawable,
					       DefaultVisual(display,
							     screen),
					       DefaultColormap(display,
							       screen));
	} else
#endif
	{
		XSetFont(display, window.gc, font->fid);
	}
}

static void load_config_file(const char *);

/* signal handler that reloads config file */
static void reload_handler(int a)
{
	fprintf(stderr, "Conky: received signal %d, reloading config\n",
		a);

	if (current_config) {
		clear_fs_stats();
		load_config_file(current_config);
		load_font();
		set_font();
		extract_variable_text(text);
		free(text);
		text = NULL;
		update_text();
	}
}

static void clean_up()
{
#ifdef XDBE
	if (use_xdbe)
		XdbeDeallocateBackBufferName(display, window.back_buffer);
#endif
#ifdef OWN_WINDOW
	if (own_window)
		XDestroyWindow(display, window.window);
	else
#endif
	{
		clear_text(1);
		XFlush(display);
	}

	XFreeGC(display, window.gc);

	/* it is really pointless to free() memory at the end of program but ak|ra
	 * wants me to do this */

	free_text_objects();

	if (text != original_text)
		free(text);

	free(current_config);
	free(current_mail_spool);
#ifdef SETI
	free(seti_dir);
#endif
}

static void term_handler(int a)
{
	a = a;			/* to get rid of warning */
	clean_up();
	exit(0);
}

static int string_to_bool(const char *s)
{
	if (!s)
		return 1;
	if (strcasecmp(s, "yes") == 0)
		return 1;
	if (strcasecmp(s, "true") == 0)
		return 1;
	if (strcasecmp(s, "1") == 0)
		return 1;
	return 0;
}

static enum alignment string_to_alignment(const char *s)
{
	if (strcasecmp(s, "top_left") == 0)
		return TOP_LEFT;
	else if (strcasecmp(s, "top_right") == 0)
		return TOP_RIGHT;
	else if (strcasecmp(s, "bottom_left") == 0)
		return BOTTOM_LEFT;
	else if (strcasecmp(s, "bottom_right") == 0)
		return BOTTOM_RIGHT;
	else if (strcasecmp(s, "tl") == 0)
		return TOP_LEFT;
	else if (strcasecmp(s, "tr") == 0)
		return TOP_RIGHT;
	else if (strcasecmp(s, "bl") == 0)
		return BOTTOM_LEFT;
	else if (strcasecmp(s, "br") == 0)
		return BOTTOM_RIGHT;

	return TOP_LEFT;
}

static void set_default_configurations(void)
{
	text_alignment = BOTTOM_LEFT;
	fork_to_background = 0;
	border_margin = 3;
	border_width = 1;
	total_run_times = 0;
	info.cpu_avg_samples = 2;
	info.net_avg_samples = 2;
	info.memmax = 0;
	top_cpu = 0;
	top_mem = 0;
#ifdef MPD
	strcpy(info.mpd.host, "localhost");
	info.mpd.port = 6600;
	info.mpd.status = "Checking status...";
#endif
	out_to_console = 0;
	use_spacer = 0;
	default_fg_color = WhitePixel(display, screen);
	default_bg_color = BlackPixel(display, screen);
	default_out_color = BlackPixel(display, screen);
	draw_borders = 0;
	draw_shades = 1;
	draw_outline = 0;
	free(font_name);
#ifdef XFT
	use_xft = 1;
	font_name = strdup("courier-12");
#else
	font_name = strdup("6x10");
#endif
	gap_x = 5;
	gap_y = 5;

	free(current_mail_spool);
	{
		char buf[256];
		variable_substitute(MAIL_FILE, buf, 256);
		if (buf[0] != '\0')
			current_mail_spool = strdup(buf);
	}

	minimum_width = 5;
	minimum_height = 5;
	no_buffers = 1;
#ifdef OWN_WINDOW
	own_window = 0;
#endif
	stippled_borders = 0;
	update_interval = 10.0;
	stuff_in_upper_case = 0;
#ifdef MLDONKEY
	mlconfig.mldonkey_hostname = "127.0.0.1";
	mlconfig.mldonkey_port = 4001;
	mlconfig.mldonkey_login = NULL;
	mlconfig.mldonkey_password = NULL;
#endif
#ifdef METAR
	metar_station = NULL;
	metar_server = NULL;
	metar_path = NULL;
	last_metar_update = 0;
#endif
}

static void load_config_file(const char *f)
{
#define CONF_ERR ERR("%s: %d: config file error", f, line);
	int line = 0;
	FILE *fp;

	set_default_configurations();

	fp = open_file(f, 0);
	if (!fp)
		return;

	while (!feof(fp)) {
		char buf[256], *p, *p2, *name, *value;
		line++;
		if (fgets(buf, 256, fp) == NULL)
			break;

		p = buf;

		/* break at comment */
		p2 = strchr(p, '#');
		if (p2)
			*p2 = '\0';

		/* skip spaces */
		while (*p && isspace((int) *p))
			p++;
		if (*p == '\0')
			continue;	/* empty line */

		name = p;

		/* skip name */
		p2 = p;
		while (*p2 && !isspace((int) *p2))
			p2++;
		if (*p2 != '\0') {
			*p2 = '\0';	/* break at name's end */
			p2++;
		}

		/* get value */
		if (*p2) {
			p = p2;
			while (*p && isspace((int) *p))
				p++;

			value = p;

			p2 = value + strlen(value);
			while (isspace((int) *(p2 - 1)))
				*--p2 = '\0';
		} else {
			value = 0;
		}

#define CONF2(a) if (strcasecmp(name, a) == 0)
#define CONF(a) else CONF2(a)
#define CONF3(a,b) \
else if (strcasecmp(name, a) == 0 || strcasecmp(name, a) == 0)


		CONF2("alignment") {
			if (value) {
				int a = string_to_alignment(value);
				if (a <= 0)
					CONF_ERR
					else
					text_alignment = a;
			} else
				CONF_ERR}
				CONF("background") {
				fork_to_background = string_to_bool(value);
				}
			CONF("border_margin") {
				if (value)
					border_margin =
					    strtol(value, 0, 0);
				else
					CONF_ERR}
					CONF("border_width") {
					if (value)
						border_width =
						    strtol(value, 0, 0);
					else
						CONF_ERR}
						CONF("default_color") {
						if (value)
							default_fg_color =
							    get_x11_color
							    (value);
						else
							CONF_ERR}
							CONF3
							    ("default_shade_color",
							     "default_shadecolor")
						{
							if (value)
								default_bg_color
								    =
								    get_x11_color
								    (value);
							else
								CONF_ERR}
								CONF3
								    ("default_outline_color",
								     "default_outlinecolor")
							{
								if (value)
									default_out_color
									    =
									    get_x11_color
									    (value);
								else
									CONF_ERR}
#ifdef MPD
									CONF("mpd_host") {
									if (value)
										strcpy
										    (info.
										     mpd.
										     host,
										     value);
									else
										CONF_ERR}
										CONF("mpd_port") {
										if (value) {
											info.
											    mpd.
											    port
											    =
											    strtol
											    (value,
											     0,
											     0);
											if (info.mpd.port < 1 || info.mpd.port > 0xffff)
												CONF_ERR}
												}
#endif
												CONF("cpu_avg_samples") {
												if (value) {
													cpu_avg_samples
													    =
													    strtol
													    (value,
													     0,
													     0);
													if (cpu_avg_samples < 1 || cpu_avg_samples > 14)
														CONF_ERR
														else
														info.
														    cpu_avg_samples
														    =
														    cpu_avg_samples;
												} else
													CONF_ERR}
													CONF("net_avg_samples") {
													if (value) {
														net_avg_samples
														    =
														    strtol
														    (value,
														     0,
														     0);
														if (net_avg_samples < 1 || net_avg_samples > 14)
															CONF_ERR
															else
															info.
															    net_avg_samples
															    =
															    net_avg_samples;
													} else
														CONF_ERR}






#ifdef XDBE
														CONF("double_buffer") {
														use_xdbe
														    =
														    string_to_bool
														    (value);
														}
#endif
													CONF("draw_borders") {
														draw_borders
														    =
														    string_to_bool
														    (value);
													}
													CONF("draw_shades") {
														draw_shades
														    =
														    string_to_bool
														    (value);
													}
													CONF("draw_outline") {
														draw_outline
														    =
														    string_to_bool
														    (value);
													}
													CONF("out_to_console") {
														out_to_console
														    =
														    string_to_bool
														    (value);
													}
													CONF("use_spacer") {
														use_spacer
														    =
														    string_to_bool
														    (value);
													}
#ifdef XFT
													CONF("use_xft") {
														use_xft
														    =
														    string_to_bool
														    (value);
													}
													CONF("font") {
														/* font silently ignored when Xft */
													}
													CONF("xftalpha") {
														if (value)
															font_alpha
															    =
															    atof
															    (value)
															    *
															    65535.0;
														else
															CONF_ERR}
															CONF("xftfont") {
#else
													CONF("use_xft") {
														if (string_to_bool(value))
															ERR("Xft not enabled");
													}
													CONF("xftfont") {
														/* xftfont silently ignored when no Xft */
													}
													CONF("xftalpha") {
														/* xftalpha is silently ignored when no Xft */
													}
													CONF("font") {
#endif
														if (value) {
															free(font_name);
															font_name
															    =
															    strdup
															    (value);
														} else
															CONF_ERR}
															CONF("gap_x") {
															if (value)
																gap_x
																    =
																    atoi
																    (value);
															else
																CONF_ERR}
																CONF("gap_y") {
																if (value)
																	gap_y
																	    =
																	    atoi
																	    (value);
																else
																	CONF_ERR}
																	CONF("mail_spool") {
																	if (value) {
																		char buf[256];
																		variable_substitute
																		    (value,
																		     buf,
																		     256);

																		if (buf[0]
																		    !=
																		    '\0')
																		{
																			if (current_mail_spool)
																				free(current_mail_spool);
																			current_mail_spool
																			    =
																			    strdup
																			    (buf);
																		}
																	} else
																		CONF_ERR}
																		CONF("minimum_size") {
																		if (value) {
																			if (sscanf(value, "%d %d", &minimum_width, &minimum_height) != 2)
																				if (sscanf(value, "%d", &minimum_width) != 1)
																					CONF_ERR}
																					else
																					CONF_ERR}
																					CONF("no_buffers") {
																					no_buffers
																					    =
																					    string_to_bool
																					    (value);
																					}
#ifdef MLDONKEY
																			CONF("mldonkey_hostname") {
																				if (value)
																					mlconfig.
																					    mldonkey_hostname
																					    =
																					    strdup
																					    (value);
																				else
																					CONF_ERR}
																					CONF("mldonkey_port") {
																					if (value)
																						mlconfig.
																						    mldonkey_port
																						    =
																						    atoi
																						    (value);
																					else
																						CONF_ERR}
																						CONF("mldonkey_login") {
																						if (value)
																							mlconfig.
																							    mldonkey_login
																							    =
																							    strdup
																							    (value);
																						else
																							CONF_ERR}
																							CONF("mldonkey_password") {
																							if (value)
																								mlconfig.
																								    mldonkey_password
																								    =
																								    strdup
																								    (value);
																							else
																								CONF_ERR}
#endif
#ifdef OWN_WINDOW
																								CONF("own_window") {
																								own_window
																								    =
																								    string_to_bool
																								    (value);
																								}
#endif
																							CONF("pad_percents") {
																								pad_percents
																								    =
																								    atoi
																								    (value);
																							}
																							CONF("stippled_borders") {
																								if (value)
																									stippled_borders
																									    =
																									    strtol
																									    (value,
																									     0,
																									     0);
																								else
																									stippled_borders
																									    =
																									    4;
																							}
																							CONF("temp1") {
																								ERR("temp1 configuration is obsolete, use ${i2c <i2c device here> temp 1}");
																							}
																							CONF("temp1") {
																								ERR("temp2 configuration is obsolete, use ${i2c <i2c device here> temp 2}");
																							}
																							CONF("update_interval") {
																								if (value)
																									update_interval
																									    =
																									    strtod
																									    (value,
																									     0);
																								else
																									CONF_ERR}
																									    CONF
																									    ("total_run_times")
																								{
																									if (value)
																										total_run_times
																										    =
																										    strtod
																										    (value,
																										     0);
																									else
																										CONF_ERR}
																										CONF("uppercase") {
																										stuff_in_upper_case
																										    =
																										    string_to_bool
																										    (value);
																										}
#ifdef SETI
																									CONF("seti_dir") {
																										seti_dir
																										    =
																										    (char
																										     *)
																										    malloc
																										    (strlen
																										     (value)
																										     +
																										     1);
																										strcpy
																										    (seti_dir,
																										     value);
																									}
#endif
#ifdef METAR
																									CONF("metar_station") {
																										metar_station
																										    =
																										    (char
																										     *)
																										    malloc
																										    (strlen
																										     (value)
																										     +
																										     5);
																										strcpy
																										    (metar_station,
																										     value);
																										strcat
																										    (metar_station,
																										     ".TXT");
																									}
																									CONF("metar_server") {
																										metar_server
																										    =
																										    (char
																										     *)
																										    malloc
																										    (strlen
																										     (value)
																										     +
																										     1);
																										strcpy
																										    (metar_server,
																										     value);
																									}
																									CONF("metar_path") {
																										metar_path
																										    =
																										    (char
																										     *)
																										    malloc
																										    (strlen
																										     (value)
																										     +
																										     1);
																										strcpy
																										    (metar_path,
																										     value);

																									}
#endif
																									CONF("text") {
																										if (text != original_text)
																											free(text);

																										text = (char *)
																										    malloc
																										    (1);
																										text[0]
																										    =
																										    '\0';

																										while
																										    (!feof
																										     (fp))
																										{
																											unsigned
																											int
																											    l
																											    =
																											    strlen
																											    (text);
																											if (fgets(buf, 256, fp) == NULL)
																												break;
																											text = (char *)
																											    realloc
																											    (text,
																											     l
																											     +
																											     strlen
																											     (buf)
																											     +
																											     1);
																											strcat
																											    (text,
																											     buf);

																											if (strlen(text) > 1024 * 8)
																												break;
																										}
																										fclose
																										    (fp);
																										return;
																									}
																									else
																									ERR("%s: %d: no such configuration: '%s'", f, line, name);

#undef CONF
#undef CONF2
																									}

																								fclose
																								    (fp);
#undef CONF_ERR
																							}

																							/* : means that character before that takes an argument */
																							static
																							    const
																							    char
																							*getopt_string
																							    =
																							    "vVdt:f:u:i:hc:w:x:y:a:"
#ifdef OWN_WINDOW
																							    "o"
#endif
#ifdef XDBE
																							    "b"
#endif
																							    ;


																							int main(int argc, char **argv) {
																								/* handle command line parameters that don't change configs */
																								char *s;

																								if (((s = getenv("LC_ALL")) && *s) || ((s = getenv("LC_CTYPE")) && *s) || ((s = getenv("LANG")) && *s)) {
										if (strstr(s, "UTF-8") || strstr(s, "utf-8")
																									    ||
																									    strstr
																									    (s,
																									     "UTF8")
																									    ||
																									    strstr
																									    (s,
																									     "utf8"))
																										utf8_mode
																										    =
																										    1;
																								}
																								if (!setlocale(LC_CTYPE, "")) {
																									fprintf
																									    (stderr,
																									     "Can't set the specified locale! "
																									     "Check LANG, LC_CTYPE, LC_ALL.\n");
																									return
																									    1;
																								}
																								while
																								    (1)
																								{
																									int c = getopt(argc,
																										       argv,
																										       getopt_string);
																									if (c == -1)
																										break;

																									switch
																									    (c)
																									{
																									case 'v':
																									case 'V':
																										printf
																										    ("Conky "
																										     VERSION
																										     " compiled "
																										     __DATE__
																										     "\n");
																										return
																										    0;

																									case 'c':
																										/* if current_config is set to a strdup of CONFIG_FILE, free it (even
																										 * though free() does the NULL check itself;), then load optarg value */
																										if (current_config)
																											free(current_config);
																										current_config
																										    =
																										    strdup
																										    (optarg);
																										break;

																									case 'h':
																										printf
																										    ("Usage: %s [OPTION]...\n"
																										     "Conky is a system monitor that renders text on desktop or to own transparent\n"
																										     "window. Command line options will override configurations defined in config\n"
																										     "file.\n"
																										     "   -V            version\n"
																										     "   -a ALIGNMENT  text alignment on screen, {top,bottom}_{left,right}\n"
																										     "   -c FILE       config file to load instead of "
																										     CONFIG_FILE
																										     "\n"
																										     "   -d            daemonize, fork to background\n"
																										     "   -f FONT       font to use\n"
																										     "   -h            help\n"
#ifdef OWN_WINDOW
																										     "   -o            create own window to draw\n"
#endif
#ifdef XDBE
																										     "   -b            double buffer (prevents flickering)\n"
#endif
																										     "   -t TEXT       text to render, remember single quotes, like -t '$uptime'\n"
																										     "   -u SECS       update interval\n"
																										     "   -i NUM        number of times to update Conky\n"
																										     "   -w WIN_ID     window id to draw\n"
																										     "   -x X          x position\n"
																										     "   -y Y          y position\n",
																										     argv
																										     [0]);
																										return
																										    0;

																									case 'w':
																										window.
																										    window
																										    =
																										    strtol
																										    (optarg,
																										     0,
																										     0);
																										break;

																									case '?':
																										exit(EXIT_FAILURE);
																									}
																								}
																								/* initalize X BEFORE we load config. (we need to so that 'screen' is set) */
																								init_X11
																								    ();

																								tmpstring1
																								    =
																								    (char
																								     *)
																								    malloc
																								    (2
																								     *
																								     TEXT_BUFFER_SIZE);
																								tmpstring2
																								    =
																								    (char
																								     *)
																								    malloc
																								    (2
																								     *
																								     TEXT_BUFFER_SIZE);

																								/* load current_config or CONFIG_FILE */

#ifdef CONFIG_FILE
																								if (current_config == NULL) {
																									/* load default config file */
																									char buf[256];

																									variable_substitute
																									    (CONFIG_FILE,
																									     buf,
																									     256);

																									if (buf[0] != '\0')
																										current_config
																										    =
																										    strdup
																										    (buf);
																								}
#endif

																								if (current_config != NULL)
																									load_config_file
																									    (current_config);
																								else
																									set_default_configurations
																									    ();

#ifdef MAIL_FILE
																								if (current_mail_spool == NULL) {
																									char buf[256];
																									variable_substitute
																									    (MAIL_FILE,
																									     buf,
																									     256);

																									if (buf[0] != '\0')
																										current_mail_spool
																										    =
																										    strdup
																										    (buf);
																								}
#endif

																								/* handle other command line arguments */

																								optind
																								    =
																								    0;

																								while
																								    (1)
																								{
																									int c = getopt(argc,
																										       argv,
																										       getopt_string);
																									if (c == -1)
																										break;

																									switch
																									    (c)
																									{
																									case 'a':
																										text_alignment
																										    =
																										    string_to_alignment
																										    (optarg);
																										break;

																									case 'd':
																										fork_to_background
																										    =
																										    1;
																										break;

																									case 'f':
																										font_name
																										    =
																										    strdup
																										    (optarg);
																										break;

#ifdef OWN_WINDOW
																									case 'o':
																										own_window
																										    =
																										    1;
																										break;
#endif
#ifdef XDBE
																									case 'b':
																										use_xdbe
																										    =
																										    1;
																										break;
#endif

																									case 't':
																										if (text != original_text)
																											free(text);
																										text = strdup(optarg);
																										convert_escapes
																										    (text);
																										break;

																									case 'u':
																										update_interval
																										    =
																										    strtod
																										    (optarg,
																										     0);
																										break;

																									case 'i':
																										total_run_times
																										    =
																										    strtod
																										    (optarg,
																										     0);
																										break;

																									case 'x':
																										gap_x
																										    =
																										    atoi
																										    (optarg);
																										break;

																									case 'y':
																										gap_y
																										    =
																										    atoi
																										    (optarg);
																										break;

																									case '?':
																										exit(EXIT_FAILURE);
																									}
																								}

																								/* load font */
																								load_font
																								    ();

																								/* generate text and get initial size */
																								extract_variable_text
																								    (text);
																								if (text != original_text)
																									free(text);
																								text = NULL;

																								update_uname
																								    ();

																								generate_text
																								    ();
																								update_text_area();	/* to get initial size of the window */

																								init_window
																								    (own_window,
																								     text_width
																								     +
																								     border_margin
																								     *
																								     2
																								     +
																								     1,
																								     text_height
																								     +
																								     border_margin
																								     *
																								     2
																								     +
																								     1);

																								update_text_area();	/* to position text/window on screen */

#ifdef CAIRO
// why the fuck not?
//do_it();
#endif

#ifdef OWN_WINDOW
																								if (own_window)
																									XMoveWindow
																									    (display,
																									     window.
																									     window,
																									     window.
																									     x,
																									     window.
																									     y);
#endif

																								create_gc
																								    ();

																								set_font
																								    ();

																								draw_stuff
																								    ();

																								/* fork */
																								if (fork_to_background) {
																									int ret = fork();
																									switch
																									    (ret)
																									{
																									case -1:
																										ERR("can't fork() to background: %s", strerror(errno));
																										break;

																									case 0:
																										break;

																									default:
																										fprintf
																										    (stderr,
																										     "Conky: forked to background, pid is %d\n",
																										     ret);
																										return
																										    0;
																									}
																								}

																								/* set SIGUSR1, SIGINT and SIGTERM handlers */
																								{
																									struct
																									sigaction
																									    sa;

																									sa.sa_handler = reload_handler;
																									sigemptyset
																									    (&sa.
																									     sa_mask);
																									sa.sa_flags = SA_RESTART;
																									if (sigaction(SIGUSR1, &sa, NULL) != 0)
																										ERR("can't set signal handler for SIGUSR1: %s", strerror(errno));

																									sa.sa_handler = term_handler;
																									sigemptyset
																									    (&sa.
																									     sa_mask);
																									sa.sa_flags = SA_RESTART;
																									if (sigaction(SIGINT, &sa, NULL) != 0)
																										ERR("can't set signal handler for SIGINT: %s", strerror(errno));

																									sa.sa_handler = term_handler;
																									sigemptyset
																									    (&sa.
																									     sa_mask);
																									sa.sa_flags = SA_RESTART;
																									if (sigaction(SIGTERM, &sa, NULL) != 0)
																										ERR("can't set signal handler for SIGTERM: %s", strerror(errno));
																								}
																								main_loop
																								    ();
																								free(tmpstring1);
																								free(tmpstring2);
																								return
																								    0;
																							}