Rocco Rutte:
[apps/madmutt.git] / sidebar.c
1 /*
2  * Copyright notice from original mutt:
3  * Copyright (C) ????-2004 Justin Hibbits <jrh29@po.cwru.edu>
4  * Copyright (C) 2004 Thomer M. Gil <mutt@thomer.com>
5  *
6  * Parts were written/modified by:
7  * Rocco Rutte <pdmef@cs.tu-berlin.de>
8  * Nico Golde <nico@ngolde.de>
9  *
10  * This file is part of mutt-ng, see http://www.muttng.org/.
11  * It's licensed under the GNU General Public License,
12  * please see the file GPL in the top level source directory.
13  */
14
15 #include "mutt.h"
16 #include "mutt_menu.h"
17 #include "mutt_curses.h"
18 #include "sidebar.h"
19 #include "buffy.h"
20 #include "keymap.h"
21
22 #include "lib/mem.h"
23 #include "lib/str.h"
24 #include "lib/intl.h"
25
26 #include <libgen.h>
27 #include <ctype.h>
28
29 static int TopBuffy = 0;
30 static int CurBuffy = 0;
31 static int known_lines = 0;
32 static short initialized = 0;
33 static short prev_show_value;
34
35 /* computes first entry to be shown */
36 static void calc_boundaries (void) {
37   if (list_empty(Incoming))
38     return;
39   if (CurBuffy < 0 || CurBuffy >= Incoming->length)
40     CurBuffy = 0;
41   if (TopBuffy < 0 || TopBuffy >= Incoming->length)
42     TopBuffy = 0;
43
44   if (option (OPTSIDEBARNEWMAILONLY)) {
45     int i = CurBuffy;
46     TopBuffy = CurBuffy - 1;
47     while (i >= 0) {
48       if (((BUFFY*) Incoming->data[i])->new > 0)
49         TopBuffy = i;
50       i--;
51     }
52   } else
53     TopBuffy = CurBuffy - (CurBuffy % known_lines);
54   if (TopBuffy < 0)
55     TopBuffy = 0;
56 }
57
58 static char *shortened_hierarchy (char *box, int maxlen)
59 {
60   int dots = 0;
61   char *last_dot = NULL;
62   int i, j, len = str_len (box);
63   char *new_box;
64
65   if (!SidebarBoundary || !*SidebarBoundary)
66     return (str_dup (box));
67
68   for (i = 0; i < len; ++i) {
69     if (strchr (SidebarBoundary, box[i])) {
70       ++dots;
71       last_dot = &box[i];
72     }
73   }
74
75   if (last_dot) {
76     ++last_dot;
77     new_box = mem_malloc (maxlen + 1);
78     new_box[0] = box[0];
79     for (i = 1, j = 1; j < maxlen && i < len; ++i) {
80       if (strchr (SidebarBoundary, box[i])) {
81         new_box[j++] = box[i];
82         new_box[j] = 0;
83         if (&box[i + 1] != last_dot || j + str_len (last_dot) > maxlen) {
84           new_box[j++] = box[i + 1];
85           new_box[j] = 0;
86         } else {
87           strcat (&new_box[j], last_dot);
88           break;
89         }
90       }
91     }
92     return new_box;
93   }
94   return str_dup (box);
95 }
96
97 static const char* sidebar_number_format (char* dest, size_t destlen, char op,
98                                           const char* src, const char* fmt,
99                                           const char* ifstr, const char* elstr,
100                                           unsigned long data, format_flag flags) {
101   char tmp[SHORT_STRING];
102   BUFFY* b = (BUFFY*) Incoming->data[data];
103   int opt = flags & M_FORMAT_OPTIONAL;
104   int c = Context && str_eq (Context->path, b->path);
105
106   switch (op) {
107     /* deleted */
108     case 'd':
109       if (!opt) {
110         snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
111         snprintf (dest, destlen, tmp, c ? Context->deleted : 0);
112       } else if ((c && Context->deleted == 0) || !c)
113         opt = 0;
114       break;
115     /* flagged */
116     case 'F':
117     case 'f':                   /* for compatibility */
118       if (!opt) {
119         snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
120         snprintf (dest, destlen, tmp, c ? Context->flagged : b->msg_flagged);
121       } else if ((c && Context->flagged == 0) || (!c && b->msg_flagged == 0))
122         opt = 0;
123       break;
124     /* total */
125     case 'c':                   /* for compatibility */
126     case 'm':
127       if (!opt) {
128         snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
129         snprintf (dest, destlen, tmp, c ? Context->msgcount : b->msgcount);
130       } else if ((c && Context->msgcount == 0) || (!c && b->msgcount == 0))
131         opt = 0;
132       break;
133     /* total shown, i.e. not hidden by limit */
134     case 'M':
135       if (!opt) {
136         snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
137         snprintf (dest, destlen, tmp, c ? Context->vcount : 0);
138       } else if ((c && Context->vcount == 0) || !c)
139         opt = 0;
140       break;
141     /* new */
142     case 'n':
143       if (!opt) {
144         snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
145         snprintf (dest, destlen, tmp, c ? Context->new : b->new);
146       } else if ((c && Context->new == 0) || (!c && b->new == 0))
147         opt = 0;
148       break;
149     /* unread */
150     case 'u':
151       if (!opt) {
152         snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
153         snprintf (dest, destlen, tmp, c ? Context->unread : b->msg_unread);
154       } else if ((c && Context->unread == 0) || (!c && b->msg_unread == 0))
155         opt = 0;
156       break;
157     /* tagged */
158     case 't':
159       if (!opt) {
160         snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
161         snprintf (dest, destlen, tmp, c ? Context->tagged : 0);
162       } else if ((c && Context->tagged == 0) || !c)
163         opt = 0;
164       break;
165   }
166
167   if (opt)
168     mutt_FormatString (dest, destlen, ifstr, sidebar_number_format,
169                        data, M_FORMAT_OPTIONAL);
170   else if (flags & M_FORMAT_OPTIONAL)
171     mutt_FormatString (dest, destlen, elstr, sidebar_number_format,
172                        data, M_FORMAT_OPTIONAL);
173   return (src);
174 }
175
176 int sidebar_need_count (void) {
177   if (!option (OPTMBOXPANE) || SidebarWidth == 0 ||
178       !SidebarNumberFormat || !*SidebarNumberFormat)
179     return (0);
180   return (1);
181 }
182
183 /* print single item
184  * returns:
185  *      0       item was not printed ('cause of $sidebar_newmail_only)
186  *      1       item was printed
187  */
188 int make_sidebar_entry (char* box, int idx, size_t len)
189 {
190   int shortened = 0, lencnt = 0;
191   char no[SHORT_STRING], entry[SHORT_STRING];
192 #if USE_IMAP
193   int l = str_len (ImapHomeNamespace);
194 #endif
195   int l_m = str_len (Maildir);
196
197   if (SidebarWidth > COLS)
198     SidebarWidth = COLS;
199
200   if (option (OPTSIDEBARNEWMAILONLY) && box && Context && Context->path && 
201       !str_eq (Context->path, box) && ((BUFFY*) Incoming->data[idx])->new == 0)
202     /* if $sidebar_newmail_only is set, don't display the
203      * box only if it's not the currently opened
204      * (i.e. always display the currently opened) */
205     return (0);
206
207   mutt_FormatString (no, len, NONULL (SidebarNumberFormat),
208                      sidebar_number_format, idx, M_FORMAT_OPTIONAL);
209   lencnt = str_len (no);
210   memset (&entry, ' ', sizeof (entry));
211
212 #if USE_IMAP
213   if (l > 0 && str_ncmp (box, ImapHomeNamespace, l) == 0 && 
214       str_len (box) > l)
215     box += l + 1; /* we're trimming the ImapHomeNamespace, the "+ 1" is for the separator */
216   else
217 #endif
218   if (l_m > 0 && str_ncmp (box, Maildir, l_m) == 0 && 
219       str_len (box) > l_m) {
220     box += l_m;
221     if (Maildir[strlen(Maildir)-1]!='/') {
222       box += 1;
223     }
224   } else
225     box = basename (box);
226
227   if (option (OPTSHORTENHIERARCHY) && str_len (box) > len-lencnt-1) {
228     box = shortened_hierarchy (box, len-lencnt-1);
229     shortened = 1;
230   }
231
232   snprintf (entry, len-lencnt, "%s", box);
233   entry[str_len (entry)] = ' ';
234   strncpy (entry + (len - lencnt), no, lencnt);
235
236   addnstr (entry, len);
237
238   if (shortened)
239     mem_free(&box);
240
241   return (1);
242 }
243
244 /* returns folder name of currently 
245  * selected folder for <sidebar-open>
246  */
247 const char* sidebar_get_current (void) {
248   if (list_empty(Incoming))
249     return (NULL);
250   return ((char*) ((BUFFY*) Incoming->data[CurBuffy])->path);
251 }
252
253 /* internally sets item to buf */
254 void sidebar_set_current (const char* buf) {
255   int i = buffy_lookup (buf);
256   if (i >= 0) {
257     CurBuffy = i;
258     calc_boundaries();
259   }
260 }
261
262 /* fix counters for a context
263  * FIXME since ctx must not be of our business, move it elsewhere
264  */
265 void sidebar_set_buffystats (CONTEXT* Context) {
266   int i = 0;
267   BUFFY* tmp = NULL;
268   if (!Context || list_empty(Incoming) || (i = buffy_lookup (Context->path)) < 0)
269     return;
270   tmp = (BUFFY*) Incoming->data[i];
271   tmp->new = Context->new;
272   tmp->msg_unread = Context->unread;
273   tmp->msgcount = Context->msgcount;
274   tmp->msg_flagged = Context->flagged;
275 }
276
277 /* actually draws something
278  * FIXME this needs some clue when to do it
279  */
280 int sidebar_draw (int menu)
281 {
282   int first_line = option (OPTSTATUSONTOP) ? 1 : option (OPTHELP) ? 1 : 0;
283   int last_line = LINES-1;
284   int draw_devider = 1, i = 0;
285   int line;
286   BUFFY *tmp;
287   short delim_len = str_len (SidebarDelim);
288   char blank[SHORT_STRING];
289
290   if (option (OPTSTATUSONTOP)) {
291     last_line -= option (OPTHELP) ? 1 : 0;
292   } else {
293     last_line -= 1-(menu==MENU_PAGER);
294   }
295
296   known_lines=last_line-first_line;
297
298   /* initialize first time */
299   if (!initialized) {
300     prev_show_value = option (OPTMBOXPANE);
301     if (!option (OPTMBOXPANE))
302       draw_devider = 1;
303     initialized = 1;
304   }
305
306   if (TopBuffy==0 || CurBuffy==0)
307     calc_boundaries();
308
309   /* save or restore the value SidebarWidth */
310   if (prev_show_value != option (OPTMBOXPANE)) {
311     if (!prev_show_value && option (OPTMBOXPANE)) {
312       /* after toggle: force recounting of all mail */
313       buffy_check (2);
314     }
315     prev_show_value = option (OPTMBOXPANE);
316   }
317
318   if (SidebarWidth > 0 && option (OPTMBOXPANE)
319       && str_len (SidebarDelim) >= SidebarWidth) {
320     mutt_error (_("Value for sidebar_delim is too long. Disabling sidebar."));
321     sleep (2);
322     unset_option (OPTMBOXPANE);
323     return (0);
324   }
325
326   if (SidebarWidth == 0 || !option (OPTMBOXPANE))
327     return 0;
328   /* draw devider only if necessary (if the sidebar becomes visible e.g.)*/
329   if (draw_devider == 1){
330     /* draw the divider */
331     SETCOLOR (MT_COLOR_SIDEBAR);
332     for (line = first_line; line < last_line; line++) {
333       move (line, SidebarWidth - delim_len);
334       if (option (OPTASCIICHARS))
335         addstr (NONULL (SidebarDelim));
336       else if (!option (OPTASCIICHARS) && !str_cmp (SidebarDelim, "|"))
337         addch (ACS_VLINE);
338       else if ((Charset_is_utf8) && !str_cmp (SidebarDelim, "|"))
339         addstr ("\342\224\202");
340       else
341         addstr (NONULL (SidebarDelim));
342     }
343   }
344   SETCOLOR (MT_COLOR_NORMAL);
345
346   if (list_empty(Incoming))
347     return 0;
348
349   /* actually print items */
350   for (i = TopBuffy, line=first_line; i < Incoming->length && line < last_line; i++) {
351     tmp = (BUFFY*) Incoming->data[i];
352
353     if (i == CurBuffy)
354       SETCOLOR (MT_COLOR_INDICATOR);
355     else if (tmp->new > 0)
356       SETCOLOR (MT_COLOR_NEW);
357     else if (tmp->msg_flagged > 0)
358       SETCOLOR (MT_COLOR_FLAGGED);
359     else
360       SETCOLOR (MT_COLOR_NORMAL);
361
362     move (line, 0);
363     line += make_sidebar_entry (tmp->path, i, SidebarWidth-delim_len);
364   }
365
366   /* fill with blanks to bottom */
367   memset (&blank, ' ', sizeof (blank));
368   SETCOLOR (MT_COLOR_NORMAL);
369   for (; line < last_line; line++) {
370     move (line, 0);
371     addnstr (blank, SidebarWidth-delim_len);
372   }
373   return 0;
374 }
375
376 /* returns index of new item with new mail or -1 */
377 static int exist_next_new () {
378   int i = 0;
379   if (list_empty(Incoming))
380     return (-1);
381   i = CurBuffy + 1;
382   while (i < Incoming->length)
383     if (((BUFFY*) Incoming->data[i++])->new > 0)
384       return (i-1);
385   return (-1);
386 }
387
388 /* returns index of prev item with new mail or -1 */
389 static int exist_prev_new () {
390   int i = 0;
391   if (list_empty(Incoming))
392     return (-1);
393   i = CurBuffy - 1;
394   while (i >= 0)
395     if (((BUFFY*) Incoming->data[i--])->new > 0)
396       return (i+1);
397   return (-1);
398 }
399
400 void sidebar_scroll (int op, int menu) {
401   int i = 0;
402
403   if (!SidebarWidth || list_empty(Incoming))
404     return;
405
406   switch (op) {
407   case OP_SIDEBAR_NEXT:
408     if (!option (OPTSIDEBARNEWMAILONLY)) {
409       if (CurBuffy + 1 == Incoming->length) {
410         mutt_error (_("You are on the last mailbox."));
411         return;
412       }
413       CurBuffy++;
414       break;
415     }                           /* the fall-through is intentional */
416   case OP_SIDEBAR_NEXT_NEW:
417     if ((i = exist_next_new ()) < 0) {
418       mutt_error (_("No next mailboxes with new mail."));
419       return;
420     }
421     else
422       CurBuffy = i;
423     break;
424   case OP_SIDEBAR_PREV:
425     if (!option (OPTSIDEBARNEWMAILONLY)) {
426       if (CurBuffy == 0) {
427         mutt_error (_("You are on the first mailbox."));
428         return;
429       }
430       CurBuffy--;
431       break;
432     }                           /* the fall-through is intentional */
433   case OP_SIDEBAR_PREV_NEW:
434     if ((i = exist_prev_new ()) < 0) {
435       mutt_error (_("No previous mailbox with new mail."));
436       return;
437     }
438     else
439       CurBuffy = i;
440     break;
441
442   case OP_SIDEBAR_SCROLL_UP:
443     if (CurBuffy == 0) {
444       mutt_error (_("You are on the first mailbox."));
445       return;
446     }
447     CurBuffy -= known_lines;
448     if (CurBuffy < 0)
449       CurBuffy = 0;
450     break;
451   case OP_SIDEBAR_SCROLL_DOWN:
452     if (CurBuffy + 1 == Incoming->length) {
453       mutt_error (_("You are on the last mailbox."));
454       return;
455     }
456     CurBuffy += known_lines;
457     if (CurBuffy >= Incoming->length)
458       CurBuffy = Incoming->length - 1;
459     break;
460   default:
461     return;
462   }
463   calc_boundaries ();
464   sidebar_draw (menu);
465 }