Blame view

mail/from.c 3.68 KB
1
/* GNU Mailutils -- a suite of utilities for electronic mail
2
   Copyright (C) 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
3

4
   GNU Mailutils is free software; you can redistribute it and/or modify
5 6 7 8
   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.

9
   GNU Mailutils is distributed in the hope that it will be useful,
10 11 12 13 14
   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
15
   along with GNU Mailutils; if not, write to the Free Software
Wojciech Polak authored
16
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307  USA  */
17 18 19 20 21 22 23 24

#include "mail.h"

/*
 * f[rom] [msglist]
 */

int
25
mail_from0 (msgset_t *mspec, message_t msg, void *data)
26 27 28 29 30 31 32 33 34 35 36 37
{
  header_t hdr = NULL;
  envelope_t env;
  attribute_t attr;
  char *from = NULL, *subj = NULL, *fromp, *subjp;
  int froml, subjl;
  char date[80], st[10];
  int cols = util_getcols () - 6;
  int cflag;
  size_t m_size = 0, m_lines = 0;

  message_get_header (msg, &hdr);
38
  if (header_aget_value_unfold (hdr, MU_HEADER_FROM, &from) == 0)
39 40 41
    {
      address_t address = NULL;
      if (address_create (&address, from) == 0)
42
	{
43
	  char name[128];
44
	  size_t len = strlen (from) + 1;
45 46 47
	  *name = '\0';
	  address_get_personal (address, 1, name, sizeof name, NULL);
	  if (*name && len)
48
	    {
49 50
	      strncpy (from, name, len - 1);
	      from[len - 1] = '\0';
51
	    }
52
	  else
53
	    address_get_email (address, 1, from, len, NULL);
54
	  address_destroy (&address);
55
	}
56
    }
57 58
  util_rfc2047_decode (&from);

59
  header_aget_value_unfold (hdr, MU_HEADER_SUBJECT, &subj);
60
  util_rfc2047_decode (&subj);
61 62 63
  
  message_get_attribute (msg, &attr);
  
64
  if (attribute_is_userflag (attr, MAIL_ATTRIBUTE_MBOXED))
65
    cflag = 'M';
66
  else if (attribute_is_userflag (attr, MAIL_ATTRIBUTE_SAVED))
67
    cflag = '*';
68
  else if (attribute_is_userflag (attr, MAIL_ATTRIBUTE_TAGGED))
69 70 71 72 73
    cflag = 'T';
  else if (attribute_is_read (attr))
    cflag = 'R';
  else if (attribute_is_seen (attr))
    cflag = 'U';
74
  else if (attribute_is_recent (attr))
75 76 77
    cflag = 'N';
  else
    cflag = ' ';
78 79 80

  date[0] = 0;
  if (util_getenv (NULL, "datefield", Mail_env_boolean, 0) == 0
Sergey Poznyakoff authored
81
      && header_get_value (hdr, MU_HEADER_DATE, date, sizeof (date), NULL) == 0)
82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103
    {
      time_t t;
      if (mu_parse_date (date, &t, NULL) == 0)
	{
	  strftime (date, sizeof(date), "%a %b %e %H:%M", localtime (&t));
	}
      else
	date[0] = 0;
    }

  if (date[0] == 0)
    {
      const char *p;
      struct tm tm;
      mu_timezone tz;

      message_get_envelope (msg, &env);
      envelope_date (env, date, sizeof (date), NULL);
      p = date;
      if (mu_parse_ctime_date_time (&p, &tm, &tz) == 0)
	strftime (date, sizeof(date), "%a %b %e %H:%M", &tm);
    }
104 105 106 107
  
  message_size (msg, &m_size);
  message_lines (msg, &m_lines);
  
108
  snprintf (st, sizeof (st), "%3d/%-5d", m_lines, m_size);
109 110 111 112 113 114 115
  
  /* The "From" field will take a third of the screen.
     Subject will take the rest.
     FIXME: This is not quite correct that we use fixed sizes
     18, 16 for the other fields.
  */
  froml = cols / 3;
116
  subjl = cols - froml - strlen (st) - 16;
117 118 119 120
  
  fromp = from ? from : "";
  subjp = subj ? subj : fromp;
  fprintf (ofile, "%c%c%4d %-18.18s %-16.16s %s %.*s\n",
121 122
	   mspec->msg_part[0] == cursor ? '>' : ' ', cflag,
	   mspec->msg_part[0],
123 124 125 126
	   fromp, date, st, (subjl < 0) ? 0 : subjl, subjp);
  
  free (from);
  free (subj);
127

128
  return 0;
129
}
130 131 132 133

int
mail_from (int argc, char **argv)
{
134
  return util_foreach_msg (argc, argv, MSG_NODELETED|MSG_SILENT, mail_from0, NULL);
135 136
}