e16-epplets/epplets/E-Biff.c

/*
 * Copyright (C) 1999-2000, Michael Jennings
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to
 * deal in the Software without restriction, including without limitation the
 * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
 * sell copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies of the Software, its documentation and marketing & publicity
 * materials, and acknowledgment shall be given in the documentation, materials
 * and software packages that this Software was used.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
 * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 */

static const char cvs_ident[] = "$Id$";

#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_data/E-Biff/nomail.png"
#define NEWMAIL_IMAGE   EROOT "/epplet_data/E-Biff/newmail.png"
#define SEVEN_IMAGE     EROOT "/epplet_data/E-Biff/7of9.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, cfg_button, nomail, newmail, seven, label, box_button;
Epplet_gadget cfg_tb_mbox, cfg_tb_mailprog, cfg_tb_interval, cfg_tb_nomail, cfg_tb_newmail, cfg_tb_seven, cfg_tb_sound, cfg_tb_boxname;
Window config_win = None;
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,
  *seven_image = SEVEN_IMAGE, *boxname = NULL;
int mp_pid = 0;
int beep = 1, cfg_beep;
int show_total = 1, cfg_total;
double interval = 2.0;

static void mailcheck_cb(void *data);
static void close_cb(void *data);
static void mailprog_cb(void *data);
static void in_cb(void *data, Window w);
static void out_cb(void *data, Window w);
static int delete_cb(void *data, Window win);
static void apply_config(void);
static void ok_cb(void *data);
static void apply_cb(void *data);
static void cancel_cb(void *data);
static void config_cb(void *data);
static void process_conf(void);
extern int mbox_folder_count(char *, int);

void display_label(void)
{
  char label_text[64];
  
  if (show_total)
    Esnprintf(label_text, sizeof(label_text), "%lu / %lu", new_cnt, total_cnt);
  else
    Esnprintf(label_text, sizeof(label_text), "%lu", new_cnt);
  Epplet_change_label(label, label_text);
}

static void
mailcheck_cb(void *data)
{
  D(("mailcheck_cb() called.\n"));
  if ((mbox_folder_count(folder_path, 0)) != 0) {
    if (new_cnt != 0) {
      if (new_cnt == 7 && total_cnt == 9) {
        Epplet_gadget_hide(nomail);
        Epplet_gadget_hide(newmail);
        Epplet_gadget_show(seven);
      } else {
        Epplet_gadget_hide(nomail);
        Epplet_gadget_hide(seven);
        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_hide(seven);
      Epplet_gadget_show(nomail);
    }
    display_label();
  }
  Epplet_timer(mailcheck_cb, NULL, interval, "TIMER");
  return;
  data = NULL;
}

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

static void
mailprog_cb(void *data)
{
  mp_pid = Epplet_spawn_command(mailprog);
  return;
  data = NULL;
}

static void
in_cb(void *data, Window w)
{
  if (w == Epplet_get_main_window()) {
    Epplet_gadget_show(close_button);
    if (!boxname)
      Epplet_gadget_show(mp_button);
    else
      Epplet_gadget_show(box_button);      
    Epplet_gadget_show(cfg_button);
  }
  return;
  data = NULL;
}

static void
out_cb(void *data, Window w)
{
  if (w == Epplet_get_main_window()) {
    Epplet_gadget_hide(close_button);
    if (!boxname)
      Epplet_gadget_hide(mp_button);
    else
      Epplet_gadget_hide(box_button);      
    Epplet_gadget_hide(cfg_button);
  }
  return;
  data = NULL;
}

static int
delete_cb(void *data, Window win)
{
  config_win = None;
  return 1;
  win = (Window) 0;
  data = NULL;
}

static void
apply_config(void)
{
  char buff[1024];

  strcpy(buff, Epplet_textbox_contents(cfg_tb_mbox));
  if (strcmp(folder_path, buff)) {
    Epplet_modify_config("mailbox", buff);
    folder_path = Epplet_query_config("mailbox");
    mailcheck_cb(NULL);
  }

  strcpy(buff, Epplet_textbox_contents(cfg_tb_interval));
  if ((interval = atof(buff)) != 0.0) {
    Epplet_modify_config("interval", buff);
  } else {
    interval = atof(Epplet_query_config_def("interval", "2.0"));
  }

  strcpy(buff, Epplet_textbox_contents(cfg_tb_mailprog));
  if (strcmp(mailprog, buff)) {
    Epplet_modify_config("mailprog", buff);
    mailprog = Epplet_query_config("mailprog");
  }

  strcpy(buff, Epplet_textbox_contents(cfg_tb_newmail));
  if (strcmp(newmail_image, buff)) {
    Epplet_modify_config("new_mail_image", buff);
    newmail_image = Epplet_query_config("new_mail_image");
  }

  strcpy(buff, Epplet_textbox_contents(cfg_tb_nomail));
  if (strcmp(nomail_image, buff)) {
    Epplet_modify_config("no_mail_image", buff);
    nomail_image = Epplet_query_config("no_mail_image");
  }

  strcpy(buff, Epplet_textbox_contents(cfg_tb_seven));
  if (strcmp(seven_image, buff)) {
    Epplet_modify_config("seven_image", buff);
    newmail_image = Epplet_query_config("seven_image");
  }

  strcpy(buff, Epplet_textbox_contents(cfg_tb_sound));
  if (strlen(buff)) {
    if (!sound || strcmp(sound, buff)) {
      Epplet_modify_config("sound", buff);
      sound = Epplet_query_config("sound");
    }
  } else if (sound) {
    Epplet_modify_config("sound", NULL);
    sound = NULL;
  }

  if (beep != cfg_beep) {
    beep = cfg_beep;
    sprintf(buff, "%d", beep);
    Epplet_modify_config("beep", buff);
  }

  strcpy(buff, Epplet_textbox_contents(cfg_tb_boxname));
  if (strlen(buff)) {
    if (!boxname || strcmp(boxname, buff)) {
      Epplet_modify_config("boxname", buff);
      boxname = Epplet_query_config("boxname");
      Epplet_change_button_label(box_button, boxname);
    }
  } else if (boxname) {
    Epplet_modify_config("boxname", NULL);
    boxname = NULL;
  }

  if (show_total != cfg_total) {
    show_total = cfg_total;
    sprintf(buff, "%d", show_total);
    Epplet_modify_config("show_total", buff);
    if (show_total)
      Epplet_gadget_move(label, 6, 34);
    else
      Epplet_gadget_move(label, -6, 34);
    display_label();
  }

}

static void
ok_cb(void *data)
{
  Epplet_window_destroy(config_win);
  config_win = None;
  apply_config();
  Epplet_save_config();
  return;
  data = NULL;
}

static void
apply_cb(void *data)
{
  apply_config();
  return;
  data = NULL;
}

static void
cancel_cb(void *data)
{
  Epplet_window_destroy(config_win);
  config_win = None;
  return;
  data = NULL;
}

static void
config_cb(void *data)
{
  char buff[128];

  if (config_win) {
    return;
  }

  config_win = Epplet_create_window_config(300, 432, "E-Biff Configuration", ok_cb, NULL, apply_cb, NULL, cancel_cb, NULL);

  Epplet_gadget_show(Epplet_create_label(4, 4, "Mailbox path:", 2));
  Epplet_gadget_show(cfg_tb_mbox = Epplet_create_textbox(NULL, folder_path, 4, 18, 292, 20, 2, NULL, NULL));

  sprintf(buff, "%3.2f", interval);
  Epplet_gadget_show(Epplet_create_label(4, 50, "Polling interval (seconds):", 2));
  Epplet_gadget_show(cfg_tb_interval = Epplet_create_textbox(NULL, buff, 4, 64, 292, 20, 2, NULL, NULL));

  Epplet_gadget_show(Epplet_create_label(4, 96, "Mail reader command line:", 2));
  Epplet_gadget_show(cfg_tb_mailprog = Epplet_create_textbox(NULL, mailprog, 4, 110, 292, 20, 2, NULL, NULL));

  Epplet_gadget_show(Epplet_create_label(4, 142, "Image to display with new mail:", 2));
  Epplet_gadget_show(cfg_tb_newmail = Epplet_create_textbox(NULL, newmail_image, 4, 156, 292, 20, 2, NULL, NULL));

  Epplet_gadget_show(Epplet_create_label(4, 188, "Image to display with no new mail:", 2));
  Epplet_gadget_show(cfg_tb_nomail = Epplet_create_textbox(NULL, nomail_image, 4, 202, 292, 20, 2, NULL, NULL));

  Epplet_gadget_show(Epplet_create_label(4, 234, "Seven of Nine Image:", 2));
  Epplet_gadget_show(cfg_tb_seven = Epplet_create_textbox(NULL, seven_image, 4, 248, 292, 20, 2, NULL, NULL));

  Epplet_gadget_show(Epplet_create_label(4, 280, "Sound command for new mail:", 2));
  Epplet_gadget_show(cfg_tb_sound = Epplet_create_textbox(NULL, sound, 4, 294, 292, 20, 2, NULL, NULL));

  cfg_beep = beep;
  Epplet_gadget_show(Epplet_create_togglebutton(NULL, NULL, 4, 326, 12, 12, &cfg_beep, NULL, NULL));
  Epplet_gadget_show(Epplet_create_label(20, 326, "Beep when new mail arrives?", 2));

  Epplet_gadget_show(Epplet_create_label(4, 346, "Text for mailbox button (leave empty for eject button):", 2));
  Epplet_gadget_show(cfg_tb_boxname = Epplet_create_textbox(NULL, boxname, 4, 360, 292, 20, 2, NULL, NULL));

  cfg_total = show_total;
  Epplet_gadget_show(Epplet_create_togglebutton(NULL, NULL, 4, 392, 12, 12, &cfg_total, NULL, NULL));
  Epplet_gadget_show(Epplet_create_label(20, 392, "Show total number of messages?", 2));

  Epplet_window_show(config_win);
  Epplet_window_pop_context();

  return;
  data = NULL;
}

static void
process_conf(void) {

  char *s;

  s = Epplet_query_config("mailbox");
  folder_path = s;
  s = Epplet_query_config_def("mailprog", MAIL_PROG);
  mailprog = s;
  s = Epplet_query_config_def("interval", POLL_INTERVAL);
  interval = (double) atof(s);
  s = Epplet_query_config_def("beep", "1");
  beep = (!strcasecmp(s, "1"));
  s = Epplet_query_config_def("show_total", "1");
  show_total = (!strcasecmp(s, "1"));
  s = Epplet_query_config_def("no_mail_image", NOMAIL_IMAGE);
  nomail_image = s;
  s = Epplet_query_config_def("new_mail_image", NEWMAIL_IMAGE);
  newmail_image = s;
  s = Epplet_query_config_def("seven_image", SEVEN_IMAGE);
  seven_image = s;
  s = Epplet_query_config("sound");
  sound = s;
  s = Epplet_query_config("boxname");
  boxname = s;
}

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

  prio = getpriority(PRIO_PROCESS, getpid());
  setpriority(PRIO_PROCESS, getpid(), prio + 10);
  atexit(Epplet_cleanup);
  Epplet_Init("E-Biff", "0.5", "Enlightenment Mailbox Checker Epplet", 3, 3, argc, argv, 0);
  Epplet_load_config();
  process_conf();
  if (folder_path == NULL) {
    if ((folder_path = getenv("MAIL")) != NULL) {
      Epplet_modify_config("mailbox", folder_path);
      folder_path = Epplet_query_config("mailbox");
    } else {
      char *username = getenv("LOGNAME");

      if (!username) {
        username = getenv("USER");
        if (!username) {
          return -1;
        }
      }
      folder_path = (char *) malloc(sizeof(MAIL_PATH "/") + strlen(username) + 1);
      /* Whoever changed the next line to Esnprintf(), DON'T.  The size has already been calculated.
         Besides, the sizeof() operator returns sizeof(char *) here, not the array size.  -- mej */
      sprintf(folder_path, MAIL_PATH "/%s", username);
      D(("Generated folder path of \"%s\"\n", folder_path));
      Epplet_modify_config("mailbox", folder_path);
      free(folder_path);
      folder_path = Epplet_query_config("mailbox");
    }
  }
  close_button = Epplet_create_button(NULL, NULL, 2, 2, 0, 0, "CLOSE", 0, NULL, close_cb, NULL);
  cfg_button = Epplet_create_button(NULL, NULL, 34, 2, 0, 0, "CONFIGURE", 0, NULL, config_cb, NULL);
  mp_button = Epplet_create_button(NULL, NULL, 18, 2, 0, 0, "EJECT", 0, NULL, mailprog_cb, NULL);

  box_button = Epplet_create_button(boxname, NULL, 2, 15, 42, 12, NULL, 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);
  seven = Epplet_create_image(2, 3, 44, 30, seven_image);
  Epplet_gadget_show(nomail);

  if (show_total)
    label = Epplet_create_label(6, 34, "- / -", 2);
  else {
    label = Epplet_create_label(6, 34, "-", 2);
    Epplet_gadget_move(label, -4, 34);
  }
  Epplet_gadget_show(label);
  Epplet_show();

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

  return 0;
}