Nico Golde:
[apps/madmutt.git] / sidebar.c
1 /*
2  * Copyright (C) ????-2004 Justin Hibbits <jrh29@po.cwru.edu>
3  * Copyright (C) 2004 Thomer M. Gil <mutt@thomer.com>
4  * 
5  *     This program is free software; you can redistribute it and/or modify
6  *     it under the terms of the GNU General Public License as published by
7  *     the Free Software Foundation; either version 2 of the License, or
8  *     (at your option) any later version.
9  * 
10  *     This program is distributed in the hope that it will be useful,
11  *     but WITHOUT ANY WARRANTY; without even the implied warranty of
12  *     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  *     GNU General Public License for more details.
14  * 
15  *     You should have received a copy of the GNU General Public License
16  *     along with this program; if not, write to the Free Software
17  *     Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
18  */ 
19
20
21
22 #include "mutt.h"
23 #include "mutt_menu.h"
24 #include "mutt_curses.h"
25 #include "sidebar.h"
26 #include "buffy.h"
27 #include <libgen.h>
28 #include "keymap.h"
29 #include <ctype.h>
30
31 /*BUFFY *CurBuffy = 0;*/
32 static BUFFY *TopBuffy = 0;
33 static BUFFY *BottomBuffy = 0;
34 static int known_lines = 0;
35 static short initialized = 0;
36 static int prev_show_value;
37 static short saveSidebarWidth;
38 static char *entry = 0;
39
40 static int quick_log10(int n)
41 {
42   int len = 0;
43   for (; n > 9; len++, n /= 10)
44     ;
45   return (++len);
46 }
47
48 /* CurBuffy should contain a valid buffy 
49  * mailbox before calling this function!!! */
50 void calc_boundaries (int menu)
51 {
52   BUFFY *tmp = Incoming;
53   int position;
54   int i,count, mailbox_position;
55
56   /* correct known_lines if it has changed because of a window resize */
57   if ( known_lines != LINES ) {
58     known_lines = LINES;
59   }
60   /* fix all the prev links on all the mailboxes
61    * FIXME move this over to buffy.c where it belongs */
62   for ( ; tmp->next != 0; tmp = tmp->next )
63     tmp->next->prev = tmp;
64
65   /* calculate the position of the current mailbox */
66   position = 1;
67   tmp = Incoming;
68   while (tmp != CurBuffy)
69   {
70     position++;
71     tmp = tmp->next;
72   }
73   /* calculate the size of the screen we can use */
74   count = LINES - 2 - (menu != MENU_PAGER || option (OPTSTATUSONTOP));
75   /* calculate the position of the current mailbox on the screen */
76   mailbox_position = position%count;
77   if (mailbox_position == 0) mailbox_position=count;
78   /* determine topbuffy */
79   TopBuffy = CurBuffy;
80   for(i = mailbox_position; i >1; i--) TopBuffy = TopBuffy->prev;
81   /* determine bottombuffy */
82   BottomBuffy = CurBuffy;
83   for(i = mailbox_position; i < count && BottomBuffy->next; i++)
84     BottomBuffy = BottomBuffy->next;
85 }
86
87 static char * shortened_hierarchy(char * box) {
88   int dots = 0;
89   char * last_dot;
90   int i,j;
91   char * new_box;
92   for (i=0;i<strlen(box);++i) {
93     if (box[i] == '.') ++dots;
94     else if (isupper (box[i])) 
95       return (safe_strdup (box));
96   }
97   last_dot = strrchr(box,'.');
98   if (last_dot) {
99     ++last_dot;
100     new_box = safe_malloc(strlen(last_dot)+2*dots+1);
101     new_box[0] = box[0];
102     for (i=1,j=1;i<strlen(box);++i) {
103       if (box[i] == '.') {
104         new_box[j++] = '.';
105         new_box[j] = 0;
106         if (&box[i+1] != last_dot) {
107           new_box[j++] = box[i+1];
108           new_box[j] = 0;
109         } else {
110           strcat(&new_box[j],last_dot);
111           break;
112         }
113       }
114     }
115     return new_box;
116   }
117   return safe_strdup(box);
118 }
119
120 char *make_sidebar_entry(char *box, int size, int new, int flagged)
121 {
122   int i = 0, dlen, max, shortened = 0;
123   int offset;
124
125   if (SidebarWidth > COLS)
126     SidebarWidth = COLS;
127
128   dlen = mutt_strlen(SidebarDelim);
129   max = SidebarWidth - dlen - 1;
130
131   safe_realloc(&entry, SidebarWidth + 1);
132   entry[SidebarWidth] = 0;
133   for (; i < SidebarWidth; entry[i++] = ' ' );
134 #if USE_IMAP
135   if (ImapHomeNamespace && strlen(ImapHomeNamespace)>0) {
136     if (strncmp(box,ImapHomeNamespace,strlen(ImapHomeNamespace))==0 && strcmp(box,ImapHomeNamespace)!=0) {
137       box+=strlen(ImapHomeNamespace)+1;
138     }
139   }
140 #endif
141   max -= quick_log10(size);
142   if (new)
143     max -= quick_log10(new) + 2;
144   if (flagged > 0)
145     max -= quick_log10(flagged) + 2;
146   if (option(OPTSHORTENHIERARCHY) && mutt_strlen(box) > max) {
147     box = shortened_hierarchy(box);
148     shortened = 1;
149   }
150   i = strlen(box);
151   strncpy( entry, box, i < SidebarWidth - dlen ? i :SidebarWidth - dlen);
152
153   if ( new ) {
154     if (flagged>0) {
155       offset = SidebarWidth - 5 - quick_log10(size) - dlen - quick_log10(new) - quick_log10(flagged);
156       if (offset<0) offset = 0;
157       snprintf(entry + offset, SidebarWidth - dlen - offset + 1,
158               "% d(%d)[%d]", size, new, flagged);
159     } else {
160       offset = SidebarWidth - 3 - quick_log10(size) - dlen - quick_log10(new);
161       if (offset<0) offset = 0;
162       snprintf(entry + offset, SidebarWidth - dlen - offset + 1,
163               "% d(%d)", size, new);
164     }
165   } else {
166     if (flagged>0) {
167       offset = SidebarWidth - 3 - quick_log10(size) - dlen - quick_log10(flagged);
168       if (offset<0) offset = 0;
169       snprintf( entry + offset, SidebarWidth - dlen - offset + 1,
170               "% d[%d]", size,flagged);
171     } else {
172       offset = SidebarWidth - 1 - quick_log10(size) - dlen;
173       if (offset<0) offset = 0;
174       snprintf( entry + offset, SidebarWidth - dlen - offset + 1,
175               "% d", size);
176     }
177   }
178
179   if (option(OPTSHORTENHIERARCHY) && shortened) {
180     free(box);
181   }
182   return entry;
183 }
184
185 void set_curbuffy(char buf[LONG_STRING])
186 {
187   BUFFY* tmp = CurBuffy = Incoming;
188
189   if (!Incoming)
190     return;
191
192   while(1) {
193     if(!strcmp(tmp->path, buf)) {
194       CurBuffy = tmp;
195       break;
196     }
197
198     if(tmp->next)
199       tmp = tmp->next;
200     else
201       break;
202   }
203 }
204
205 void set_buffystats (CONTEXT* Context)
206 {
207   BUFFY* tmp = Incoming;
208   if (!Context)
209     return;
210   while (tmp)
211   {
212     if (strcmp (tmp->path, Context->path) == 0)
213     {
214       tmp->new = Context->new;
215       tmp->msg_unread = Context->unread;
216       tmp->msgcount = Context->msgcount;
217       tmp->msg_flagged = Context->flagged;
218       break;
219     }
220     tmp = tmp->next;
221   }
222 }
223
224 int draw_sidebar(int menu) {
225
226   int lines = option(OPTHELP) ? 1 : 0;
227   BUFFY *tmp;
228   short delim_len = mutt_strlen (SidebarDelim);
229
230   /* initialize first time */
231   if(!initialized) {
232     prev_show_value = option(OPTMBOXPANE);
233     saveSidebarWidth = SidebarWidth;
234     if(!option(OPTMBOXPANE)) SidebarWidth = 0;
235     initialized = 1;
236   }
237
238   /* save or restore the value SidebarWidth */
239   if(prev_show_value != option(OPTMBOXPANE)) {
240     if(prev_show_value && !option(OPTMBOXPANE)) {
241       saveSidebarWidth = SidebarWidth;
242       SidebarWidth = 0;
243     } else if(!prev_show_value && option(OPTMBOXPANE)) {
244       SidebarWidth = saveSidebarWidth;
245       /* after toggle: force recounting of all mail */
246       mutt_buffy_check(2);
247     }
248     prev_show_value = option(OPTMBOXPANE);
249   }
250
251   if ( SidebarWidth == 0 ) return 0;
252
253   /* draw the divider */
254   /* SETCOLOR(MT_COLOR_STATUS); */
255     SETCOLOR(MT_COLOR_SIDEBAR);
256   for (lines = 1;
257        lines < LINES-1-(menu != MENU_PAGER || option (OPTSTATUSONTOP)); lines++ ) {
258     move(lines, SidebarWidth - delim_len);
259     addstr (NONULL (SidebarDelim));
260   }
261   SETCOLOR(MT_COLOR_NORMAL);
262
263   if ( Incoming == 0 ) return 0;
264   lines = option(OPTHELP) ? 1 : 0; /* go back to the top */
265
266   if ( CurBuffy == 0 ) CurBuffy = Incoming;
267 #if 0
268   if ( known_lines != LINES || TopBuffy == 0 || BottomBuffy == 0 ) 
269 #endif
270     calc_boundaries(menu);
271
272   tmp = TopBuffy;
273
274   for ( ; tmp && lines < LINES-1 - (menu != MENU_PAGER || option (OPTSTATUSONTOP)); tmp = tmp->next ) {
275     if ( tmp == CurBuffy )
276       SETCOLOR(MT_COLOR_INDICATOR);
277     else if ( tmp->msg_flagged > 0 )
278       SETCOLOR(MT_COLOR_FLAGGED);
279     else if ( tmp->msg_unread > 0 )
280       SETCOLOR(MT_COLOR_NEW);
281     else
282       SETCOLOR(MT_COLOR_NORMAL);
283
284     move( lines, 0 );
285     if (option(OPTSIDEBARNEWMAILONLY)) {
286       if (tmp->msg_unread > 0) {
287         if ( Context && !strcmp( tmp->path, Context->path ) ) {
288           printw( "%.*s", SidebarWidth - delim_len,
289                   make_sidebar_entry(basename(tmp->path),
290                                      Context->msgcount, Context->unread, Context->flagged));
291           tmp->msg_unread = Context->unread;
292           tmp->msgcount = Context->msgcount;
293           tmp->msg_flagged = Context->flagged;
294         }
295         else
296           printw( "%.*s", SidebarWidth - delim_len,
297                   make_sidebar_entry(basename(tmp->path),
298                                      tmp->msgcount,tmp->msg_unread, tmp->msg_flagged));
299         lines++;
300       }
301     } else {
302       if ( Context && !strcmp( tmp->path, Context->path ) ) {
303         printw( "%.*s", SidebarWidth - delim_len,
304                 make_sidebar_entry(basename(tmp->path),
305                                    Context->msgcount, Context->unread, Context->flagged));
306         tmp->msg_unread = Context->unread;
307         tmp->msgcount = Context->msgcount;
308         tmp->msg_flagged = Context->flagged;
309       }
310       else
311         printw( "%.*s", SidebarWidth - delim_len,
312                 make_sidebar_entry(basename(tmp->path),
313                                    tmp->msgcount,tmp->msg_unread, tmp->msg_flagged));
314       lines++;
315     }
316   }
317   SETCOLOR(MT_COLOR_NORMAL);
318   for ( ; lines < LINES - 1 - (menu != MENU_PAGER || option (OPTSTATUSONTOP)); lines++ ) {
319     int i = 0;
320     move( lines, 0 );
321     for ( ; i < SidebarWidth - delim_len; i++ )
322       addch(' ');
323   }
324   return 0;
325 }
326
327 BUFFY * exist_next_new()
328 {
329         BUFFY *tmp = CurBuffy;
330         if(tmp == NULL) return NULL;
331         while (tmp->next != NULL)
332         {
333                 tmp = tmp->next;
334                 if(tmp->msg_unread) return tmp;
335         }
336         return NULL;
337 }
338
339 BUFFY * exist_prev_new()
340 {
341         BUFFY *tmp = CurBuffy;
342         if(tmp == NULL) return NULL;
343         while (tmp->prev != NULL)
344         {
345                 tmp = tmp->prev;
346                 if(tmp->msg_unread) return tmp;
347         }
348         return NULL;
349 }     
350
351
352 void scroll_sidebar(int op, int menu)
353 {
354   BUFFY *tmp;
355
356   if(!SidebarWidth) return;
357   if(!CurBuffy) return;
358
359   switch (op) {
360     case OP_SIDEBAR_NEXT:
361       if (!option(OPTSIDEBARNEWMAILONLY)) {
362         if ( CurBuffy->next == NULL ) {
363           mutt_error (_("You are on the last mailbox."));
364           return;
365         }
366         CurBuffy = CurBuffy->next;
367         break;
368       } /* the fall-through is intentional */
369     case OP_SIDEBAR_NEXT_NEW:
370       if ( (tmp = exist_next_new()) == NULL) {
371         mutt_error (_("No next mailboxes with new mail."));
372         return;
373       }
374       else CurBuffy = tmp;
375       break;
376     case OP_SIDEBAR_PREV:
377       if (!option(OPTSIDEBARNEWMAILONLY)) {
378         if ( CurBuffy->prev == NULL ) {
379           mutt_error (_("You are on the first mailbox."));
380           return;
381         }
382         CurBuffy = CurBuffy->prev;
383        break;
384      } /* the fall-through is intentional */
385     case OP_SIDEBAR_PREV_NEW:
386       if ( (tmp = exist_prev_new()) == NULL) {
387         mutt_error (_("No previous mailbox with new mail."));
388         return;
389       }
390       else CurBuffy = tmp;
391       break;
392      
393     case OP_SIDEBAR_SCROLL_UP:
394       CurBuffy = TopBuffy;
395       if ( CurBuffy != Incoming ) {
396         calc_boundaries(menu);
397         CurBuffy = CurBuffy->prev;
398       }
399       break;
400     case OP_SIDEBAR_SCROLL_DOWN:
401       CurBuffy = BottomBuffy;
402       if ( CurBuffy->next ) {
403         calc_boundaries(menu);
404         CurBuffy = CurBuffy->next;
405       }
406       break;
407     default:
408       return;
409   }
410   calc_boundaries(menu);
411   draw_sidebar(menu);
412 }