mail.c 3.39 KB
/* GNU mailutils - a suite of utilities for electronic mail
   Copyright (C) 1999 Free Software Foundation, Inc.

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2, or (at your option)
   any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <errno.h>
#include <mailbox.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <getopt.h>

#ifdef HAVE_PATHS_H
#include <paths.h>
#endif

#ifndef _PATH_MAILDIR
#define _PATH_MAILDIR "/var/spool/mail"
#endif

static struct option long_options[] =
{
  {"help", 0, NULL, 'h'},
  {"version", 0, NULL, 'v'},
  {NULL, 0, NULL, 0}
};

int
main (int argc, char **argv)
{
  char *foo, bar[80];
  int i = 0;
  char c = 0;
  char *mboxname = 0;
  mailbox *mbox = 0;

  i = getopt_long (argc, argv, "hv", long_options, (int *)0);

  switch (i)
    {
    case 'v':
      printf("mail (GNU mailutils) %s\n", VERSION);
      exit (0);
      break;
    case 'h':
      printf("\
Usage: mail [OPTION]...\n\
Access the current users mailbox through a simple text mode interface\n\
\n\
  --version  Show version information\n\
  --help     Show this message\n\
\n\
Report bugs to <bug-mailutils@gnu.org>.\n");
      exit (0);
      break;
    default:
      break;
    }



  mboxname = getenv ("MAIL");
  if (mboxname == NULL)
    {
      foo = getenv ("LOGNAME");
      mboxname = malloc ((strlen(foo) + strlen(_PATH_MAILDIR) + 2) * sizeof(char));
      strcpy (mboxname, _PATH_MAILDIR "/");
      strcat (mboxname, foo);
      free (foo);
    }

  mbox = mbox_open (mboxname);
  if (mbox == NULL)
    {
      fprintf (stderr, "Ack, %s, reading %s\n", strerror(errno), mboxname);
	  exit (1);
    }
  printf ("Number of messages: %d\n", mbox->messages);
  while (1)
    {
      printf ("& ");
      fflush (stdout);
      fgets (bar, 80, stdin);
      c = bar[0];
      if (c == 'd' || c == 'D' || c == 'b' || c == 'B' || c == 'h' ||
	  c == 'H' || c == 'r' || c == 'R' || c == 'f' || c == 'F')
	{
	  printf ("# ");
	  fgets (bar, 80, stdin);
	}
      switch (c)
	{
	case 'q':
	case 'Q':
	  mbox_close (mbox);
	  return 0;
	  break;
	case 'f':
	case 'F':
	  foo = mbox_header_line (mbox, atoi (bar) - 1, "from");
	  printf ("%s\n", foo);
	  free (foo);
	  break;
	case 'r':
	case 'R':
 	  foo = mbox_get_header (mbox, atoi (bar) - 1);
          printf ("%s\n", foo);
	  free (foo);
	  foo = mbox_get_body (mbox, atoi (bar) - 1);
	  printf ("%s", foo);
	  free (foo);
	  break;
	case 'h':
	case 'H':
	  foo = mbox_get_header (mbox, atoi (bar) - 1);
	  printf ("%s", foo);
	  free (foo);
	  break;
	case 'b':
	case 'B':
	  foo = mbox_get_body (mbox, atoi (bar) - 1);
          printf ("%s", foo);
          free (foo);
          break;
	case 'd':
	case 'D':
	  mbox_delete (mbox, atoi (bar) - 1);
	  break;
	case 'x':
	case 'X':
	  mbox_expunge (mbox);
	  break;
	default:
	  break;
	}
    }
}