e16-epplets/epplets/E-Biff.c

#include <stdio.h>
#include <sys/time.h>
#include <sys/resource.h>
#include <signal.h>
#include <sys/wait.h>
#include <errno.h>
#include "epplet.h"

extern void Epplet_redraw(void);

#define MAIL_PATH       "/var/spool/mail"
#define MAIL_PROG       "Eterm -t mutt"
#define POLL_INTERVAL   2.0
#define NOMAIL_IMAGE    EROOT "/epplet_icons/nomail.png"
#define NEWMAIL_IMAGE   EROOT "/epplet_icons/newmail.png"

#if 0
#  define D(x) do {printf("%10s | %7d:  [debug] ", __FILE__, __LINE__); printf x; fflush(stdout);} while (0)
#else
#  define D(x) ((void) 0)
#endif
#define BEGMATCH(a, b)  (!strncasecmp((a), (b), (sizeof(b) - 1)))
#define NONULL(x)       ((x) ? (x) : (""))

Epplet_gadget close_button, mp_button, help_button, nomail, newmail, label;
unsigned long new_cnt, total_cnt;
size_t file_size;
time_t file_mtime;
char *folder_path = NULL, *mailprog = MAIL_PROG, *sound = NULL,
  *nomail_image = NOMAIL_IMAGE, *newmail_image = NEWMAIL_IMAGE;
int mp_pid = 0;
int beep = 1;
double interval = POLL_INTERVAL;

static void mailcheck_cb(void *data);
static void close_cb(void *data);
static void mailprog_cb(void *data);
static void help_cb(void *data);
static void in_cb(void *data, Window w);
static void out_cb(void *data, Window w);
static void save_conf(void);
static void load_conf(void);
static void save_cb(void *data);

static void
mailcheck_cb(void *data)
{
  char label_text[64];

  D(("mailcheck_cb() called.\n"));
  if ((mbox_folder_count(folder_path, 0)) != 0) {
    if (new_cnt != 0) {
      Epplet_gadget_hide(nomail);
      Epplet_gadget_show(newmail);
      if (beep) {
        XBell(Epplet_get_display(), 0);
      } else if (sound != NULL) {
        Epplet_run_command(sound);
      }
    } else {
      Epplet_gadget_hide(newmail);
      Epplet_gadget_show(nomail);
    }
    sprintf(label_text, "%lu / %lu", new_cnt, total_cnt);
    Epplet_change_label(label, label_text);
  }
  Epplet_timer(mailcheck_cb, NULL, POLL_INTERVAL, "TIMER");
}

static void
close_cb(void *data)
{
  Epplet_unremember();
  Esync();
  exit(0);
}

static void
mailprog_cb(void *data)
{
  mp_pid = Epplet_spawn_command(MAIL_PROG);
}

static void
help_cb(void *data)
{
  Epplet_show_about("E-Biff");
}

static void
in_cb(void *data, Window w)
{
  Epplet_gadget_show(close_button);
  Epplet_gadget_show(mp_button);
  Epplet_gadget_show(help_button);
}

static void
out_cb(void *data, Window w)
{
  Epplet_gadget_hide(close_button);
  Epplet_gadget_hide(mp_button);
  Epplet_gadget_hide(help_button);
}

static void
save_conf(void) {

  FILE *fp;
  char buff[255];
  static const char *homedir = NULL;

  if (homedir == NULL) {
    homedir = (getenv("HOME") ? getenv("HOME") : ".");
  }
  sprintf(buff, "%s/.ebiffrc", homedir);
  if ((fp = fopen(buff, "wt")) == NULL) {
    char err[255];

    sprintf(err, "Unable to open %s for writing -- %s.  Config file cannot be saved.\n",
            buff, strerror(errno));
    Epplet_dialog_ok(err);
    return;
  }
  fprintf(fp, "mailbox %s\n", folder_path);
  fprintf(fp, "mailprog %s\n", mailprog);
  fprintf(fp, "interval %3.1f\n", interval);
  fprintf(fp, "beep %d\n", beep);
  fprintf(fp, "no mail image %s\n", nomail_image);
  fprintf(fp, "new mail image %s\n", newmail_image);
  if (sound != NULL) {
    fprintf(fp, "sound %s\n", sound);
  }
  fclose(fp);
}

static void
load_conf(void) {

  FILE *fp;
  char buff[1024], name[255], *p;
  unsigned char line = 0;
  static const char *homedir = NULL;

  if (homedir == NULL) {
    homedir = (getenv("HOME") ? getenv("HOME") : ".");
  }
  sprintf(name, "%s/.ebiffrc", homedir);
  if ((fp = fopen(name, "rt")) == NULL) {
    return;
  }
  for (; fgets(buff, sizeof(buff), fp);) {
    line++;
    p = strchr(buff, '\n');
    *p = 0;
    if (BEGMATCH(buff, "mailbox ")) {
      folder_path = strdup(buff + sizeof("mailbox ") - 1);
    } else if (BEGMATCH(buff, "mailprog ")) {
      mailprog = strdup(buff + sizeof("mailprog ") - 1);
    } else if (BEGMATCH(buff, "interval ")) {
      sscanf(buff, "%*s %lf", &interval);
    } else if (BEGMATCH(buff, "beep ")) {
      sscanf(buff, "%*s %d", &beep);
    } else if (BEGMATCH(buff, "no mail image ")) {
      nomail_image = strdup(buff + sizeof("no mail image ") - 1);
    } else if (BEGMATCH(buff, "new mail image ")) {
      newmail_image = strdup(buff + sizeof("new mail image ") - 1);
    } else if (BEGMATCH(buff, "sound ")) {
      sound = strdup(buff + sizeof("sound ") - 1);
    } else {
      char err[255];

      sprintf(err, "Unrecognized identifier at line %d, file %s:  %s\n", line, name, buff);
      Epplet_dialog_ok(err);
    }
  }
  fclose(fp);
}

int
main(int argc, char **argv)
{
  int prio;

  prio = getpriority(PRIO_PROCESS, getpid());
  setpriority(PRIO_PROCESS, getpid(), prio + 10);
  atexit(save_conf);
  Epplet_Init("E-Biff", "0.3", "Enlightenment Mailbox Checker Epplet", 3, 3, argc, argv, 0);
  load_conf();
  if (folder_path == NULL) {
    if ((folder_path = getenv("MAIL")) == NULL) {
      char *username = getenv("LOGNAME");

      if (!username) {
        username = getenv("USER");
        if (!username) {
          return -1;
        }
      }
      folder_path = (char *) malloc(sizeof(MAIL_PATH "/") + strlen(username) + 1);
      sprintf(folder_path, MAIL_PATH "/%s", username);
      D(("Generated folder path of \"%s\"\n", folder_path));
    }
  }
  close_button = Epplet_create_button(NULL, NULL, 2, 2, 0, 0, "CLOSE", 0, NULL, close_cb, NULL);
  help_button = Epplet_create_button(NULL, NULL, 18, 2, 0, 0, "HELP", 0, NULL, help_cb, NULL);
  mp_button = Epplet_create_button(NULL, NULL, 34, 2, 0, 0, "CONFIGURE", 0, NULL, mailprog_cb, NULL);

  nomail = Epplet_create_image(2, 3, 44, 30, NOMAIL_IMAGE);
  newmail = Epplet_create_image(2, 3, 44, 30, NEWMAIL_IMAGE);
  Epplet_gadget_show(nomail);

  label = Epplet_create_label(6, 34, "- / -", 2);
  Epplet_gadget_show(label);
  Epplet_show();

  Epplet_register_focus_in_handler(in_cb, NULL);
  Epplet_register_focus_out_handler(out_cb, NULL);
  mailcheck_cb(NULL);  /* Set everything up */
  Epplet_Loop();

  return 0;
}