-/*
-
-- [ ] Switch from regular files to named pipes
- - [ ] poll with select
-
-*/
+#include <sys/select.h>
+#include <sys/stat.h>
#include <assert.h>
#include <ctype.h>
+#include <errno.h>
+#include <fcntl.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
-
-#include <fcntl.h>
#include <unistd.h>
+#include <X11/Xlib.h>
+
#define debug(args...) {fprintf(stderr, "[debug] " args);}
#define info( args...) {fprintf(stderr, "[info] " args);}
#define error(args...) {fprintf(stderr, "[error] " args);}
char *argv0;
-typedef struct File File;
-struct File {
+/* TODO: Convert fifo list to fifo array. */
+typedef struct Fifo Fifo;
+struct Fifo {
char *name;
int fd;
int width;
int last_read;
int ttl;
int pos; /* Position on the output buffer. */
- File *next;
+ Fifo *next;
};
typedef struct Config Config;
struct Config {
int interval;
char * separator;
- char * timefmt;
- File * files;
- int file_count;
+ Fifo * fifos;
+ int fifo_count;
int total_width;
+ int output_to_x_root_window;
} defaults = {
.interval = 1,
.separator = "|",
- .timefmt = "%Y-%m-%d %H:%M:%S",
- .files = NULL,
- .file_count = 0,
+ .fifos = NULL,
+ .fifo_count = 0,
.total_width = 0,
+ .output_to_x_root_window = 0,
};
+void
+fifo_print_one(Fifo *f)
+{
+ debug(
+ "Fifo "
+ "{"
+ " name = %s,"
+ " fd = %d,"
+ " width = %d,"
+ " last_read = %d,"
+ " ttl = %d,"
+ " pos = %d,"
+ " next = %p,"
+ " }\n",
+ f->name,
+ f->fd,
+ f->width,
+ f->last_read,
+ f->ttl,
+ f->pos,
+ f->next
+ );
+}
+
+void
+fifo_print_all(Fifo *head)
+{
+ for (Fifo *f = head; f; f = f->next) {
+ fifo_print_one(f);
+ }
+}
+
+void
+config_print(Config *c)
+{
+ debug(
+ "Config "
+ "{"
+ " interval = %d,"
+ " separator = %s,"
+ " fifo_count = %d,"
+ " total_width = %d,"
+ " fifos = ..."
+ " }\n",
+ c->interval,
+ c->separator,
+ c->fifo_count,
+ c->total_width
+ );
+ fifo_print_all(c->fifos);
+}
int
is_pos_num(char *s)
parse_opts_opt_s(Config *cfg, int argc, char *argv[], int i)
{
if (i < argc) {
- cfg->separator = malloc((strlen(argv[i]) + 1) * sizeof(char));
+ cfg->separator = calloc((strlen(argv[i]) + 1), sizeof(char));
strcpy(cfg->separator, argv[i]);
opts_parse_any(cfg, argc, argv, ++i);
} else {
}
}
-void
-parse_opts_opt_t(Config *cfg, int argc, char *argv[], int i)
-{
- if (i < argc) {
- cfg->timefmt = malloc((strlen(argv[i]) + 1) * sizeof(char));
- strcpy(cfg->timefmt, argv[i]);
- opts_parse_any(cfg, argc, argv, ++i);
- } else {
- usage("Option -t parameter is missing.\n");
- }
-}
-
void
parse_opts_opt(Config *cfg, int argc, char *argv[], int i)
{
switch (argv[i][1]) {
case 'i': parse_opts_opt_i(cfg, argc, argv, ++i); break; /* TODO: Generic set_int */
case 's': parse_opts_opt_s(cfg, argc, argv, ++i); break; /* TODO: Generic set_str */
- case 't': parse_opts_opt_t(cfg, argc, argv, ++i); break; /* TODO: Generic set_str */
+ case 'x': {
+ cfg->output_to_x_root_window = 1;
+ opts_parse_any(cfg, argc, argv, ++i);
+ break;
+ }
default : usage("Option \"%s\" is invalid\n", argv[i]);
}
}
parse_opts_spec(Config *cfg, int argc, char *argv[], int i)
{
if ((i + 3) > argc)
- usage("[spec] Parameter(s) missing for file \"%s\".\n", argv[i]);
+ usage("[spec] Parameter(s) missing for fifo \"%s\".\n", argv[i]);
char *n = argv[i++];
char *w = argv[i++];
char *t = argv[i++];
if (!is_pos_num(w))
- usage("[spec] Invalid width: \"%s\", for file \"%s\"\n", w, n);
+ usage("[spec] Invalid width: \"%s\", for fifo \"%s\"\n", w, n);
if (!is_pos_num(t))
- usage("[spec] Invalid TTL: \"%s\", for file \"%s\"\n", t, n);
- File *f = malloc(sizeof(struct File));
+ usage("[spec] Invalid TTL: \"%s\", for fifo \"%s\"\n", t, n);
+ Fifo *f = calloc(1, sizeof(struct Fifo));
if (f) {
f->name = n;
f->fd = -1;
f->ttl = atoi(t);
f->last_read = 0;
f->pos = cfg->total_width;
- f->next = cfg->files;
+ f->next = cfg->fifos;
- cfg->files = f;
+ cfg->fifos = f;
cfg->total_width += f->width;
- cfg->file_count++;
+ cfg->fifo_count++;
} else {
fatal("[memory] Allocation failure.");
}
}
void
-opts_parse(Config *cfg, int argc, char *argv[], int i)
+opts_parse(Config *cfg, int argc, char *argv[])
{
opts_parse_any(cfg, argc, argv, 1);
- File *last = cfg->files;
- cfg->files = NULL;
- for (File *f = last; f; ) {
- File *next = f->next;
- f->next = cfg->files;
- cfg->files = f;
+ Fifo *last = cfg->fifos;
+ cfg->fifos = NULL;
+ for (Fifo *f = last; f; ) {
+ Fifo *next = f->next;
+ f->next = cfg->fifos;
+ cfg->fifos = f;
f = next;
}
}
+void
+read_one(Fifo *f, char *buf)
+{
+ ssize_t current;
+ ssize_t total;
+ char *b;
+ char c;
+
+ current = 0;
+ total = 0;
+ c = '\0';
+ b = buf + f->pos;
+ memset(b, ' ', f->width);
+ while ((current = read(f->fd, &c, 1)) && c != '\n' && c != '\0' && total++ < f->width)
+ *b++ = c;
+ if (current == -1)
+ error("Failed to read: \"%s\". Error: %s\n", f->name, strerror(errno));
+ /* TODO Record timestamp read */
+ close(f->fd);
+ f->fd = -1;
+}
+
void
read_all(Config *cfg, char *buf)
{
- /* TODO: stat then check TTL */
- for (File *f = cfg->files; f; f = f->next) {
+ fd_set fds;
+ int maxfd = -1;
+ int ready;
+ struct stat st;
+
+ FD_ZERO(&fds);
+ /* TODO: Check TTL */
+ for (Fifo *f = cfg->fifos; f; f = f->next) {
+ /* TODO: Create the FIFO if it doesn't already exist. */
+ if (lstat(f->name, &st) < 0)
+ fatal("Cannot stat \"%s\". Error: %s\n", f->name, strerror(errno));
+ if (!(st.st_mode & S_IFIFO))
+ fatal("\"%s\" is not a FIFO\n", f->name);
+ debug("opening: %s\n", f->name);
if (f->fd < 0)
- f->fd = open(f->name, O_RDONLY);
- if (f->fd == -1) {
- /* TODO: Consider backing off retries for failed files. */
+ f->fd = open(f->name, O_RDONLY | O_NONBLOCK);
+ if (f->fd == -1)
+ /* TODO: Consider backing off retries for failed fifos. */
fatal("Failed to open \"%s\"\n", f->name);
- } else {
- lseek(f->fd, 0, 0);
- ssize_t n = read(f->fd, buf + f->pos, f->width);
- int lasti = n + f->pos - 1;
- char lastc = buf[lasti];
- if (lastc == '\n')
- buf[lasti] = ' ';
+ if (f->fd > maxfd)
+ maxfd = f->fd;
+ FD_SET(f->fd, &fds);
+ }
+ debug("selecting...\n");
+ ready = select(maxfd + 1, &fds, NULL, NULL, NULL);
+ debug("ready: %d\n", ready);
+ assert(ready != 0);
+ if (ready < 0)
+ fatal("%s", strerror(errno));
+ for (Fifo *f = cfg->fifos; f; f = f->next) {
+ if (FD_ISSET(f->fd, &fds)) {
+ debug("reading: %s\n", f->name);
+ read_one(f, buf);
}
}
}
main(int argc, char *argv[])
{
int width;
- int nfiles = 0;
+ int nfifos = 0;
int seplen;
int prefix = 0;
char *buf;
Config *cfg = &defaults;
+ Display *display = NULL;
argv0 = argv[0];
- opts_parse(cfg, argc, argv, 1);
+ opts_parse(cfg, argc, argv);
debug("argv0 = %s\n", argv0);
- debug("[config] interval = %d\n", cfg->interval);
- debug("[config] separator = %s\n", cfg->separator);
- debug("[config] file_count = %d\n", cfg->file_count);
- debug("[config] total_width = %d\n", cfg->total_width);
- if (cfg->files == NULL)
- usage("No file specs were given!\n");
- for (File *f = cfg->files; f; f = f->next) {
- debug(
- "[config] file = "
- "{"
- " name = %s,"
- " pos = %d,"
- " width = %d,"
- " ttl = %d,"
- " last_read = %d,"
- " }\n",
- f->name,
- f->pos,
- f->width,
- f->ttl,
- f->last_read
- );
- }
+ config_print(cfg);
+ if (cfg->fifos == NULL)
+ usage("No fifo specs were given!\n");
width = cfg->total_width;
seplen = strlen(cfg->separator);
/* 1st pass to make space for separators */
- for (File *f = cfg->files; f; f = f->next) {
+ for (Fifo *f = cfg->fifos; f; f = f->next) {
f->pos += prefix;
prefix += seplen;
- nfiles++;
+ nfifos++;
}
- width += (seplen * (nfiles - 1));
- buf = malloc(width + 1);
+ width += (seplen * (nfifos - 1));
+ buf = calloc(1, width + 1);
if (buf == NULL)
fatal("[memory] Failed to allocate buffer of %d bytes", width);
memset(buf, ' ', width);
buf[width] = '\0';
/* 2nd pass to set the separators */
- for (File *f = cfg->files; f; f = f->next) {
+ for (Fifo *f = cfg->fifos; f; f = f->next) {
if (f->pos) { /* Skip the first, left-most */
- strcpy(buf + (f->pos - seplen), cfg->separator);
+ /* Copying only seplen ensures we omit the '\0' byte. */
+ strncpy(buf + (f->pos - seplen), cfg->separator, seplen);
}
}
+ if (cfg->output_to_x_root_window && !(display = XOpenDisplay(NULL)))
+ fatal("XOpenDisplay failed with: %p\n", display);
/* TODO: nanosleep and nano time diff */
for (;;) {
+ /* TODO: Check TTL and maybe blank-out */
+ /* TODO: How to trigger TTL check? On select? Alarm signal? */
+ /* TODO: Set timeout on read_all based on diff of last time of
+ * read_all and desired time of next TTL check.
+ * */
read_all(cfg, buf);
- printf("%s\n", buf);
- sleep(cfg->interval);
+ if (cfg->output_to_x_root_window) {
+ if (XStoreName(display, DefaultRootWindow(display), buf) < 0)
+ fatal("XStoreName failed.\n");
+ XFlush(display);
+ } else {
+ puts(buf);
+ fflush(stdout);
+ }
}
+
+ return EXIT_SUCCESS;
}
home / code / khatus.git / blobdiff