wmail/src/wmail.c

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // wmail.c
   3 // email indicator tool designed as docklet for Window Maker
   4 // main c source-file
   5 //
   6 // Copyright 2000-2002, Sven Geisenhainer <sveng@informatik.uni-jena.de>.
   7 // Copyright 2016-2017, Doug Torrance <dtorrance@piedmont.edu>.
   8 // Copyright 2019, Jeremy Sowden <jeremy@azazel.net>.
   9 //
  10 // Redistribution and use in source and binary forms, with or without
  11 // modification, are permitted provided that the following conditions
  12 // are met:
  13 // 1. Redistributions of source code must retain the above copyright
  14 //    notice, this list of conditions, and the following disclaimer.
  15 // 2. Redistributions in binary form must reproduce the above copyright
  16 //    notice, this list of conditions, and the following disclaimer in the
  17 //    documentation and/or other materials provided with the distribution.
  18 // 3. The name of the author may not be used to endorse or promote products
  19 //    derived from this software without specific prior written permission.
  20 //
  21 // THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  22 // IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  23 // OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  24 // IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  25 // INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  26 // NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  27 // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  28 // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  29 // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  30 // THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  31
  32
  33 ///////////////////////////////////////////////////////////////////////////////
  34 // includes
  35
  36 #ifdef HAVE_CONFIG_H
  37 #ifndef CONFIG_H_INCLUDED
  38 #include "../config.h"
  39 #define CONFIG_H_INCLUDED
  40 #endif
  41 #endif
  42
  43 #include <ctype.h>
  44 #include <stdio.h>
  45 #include <stdlib.h>
  46 #include <stdarg.h>
  47 #include <string.h>
  48 #ifdef HAVE_STRINGS_H
  49 #include <strings.h>
  50 #endif
  51 #include <signal.h>
  52 #include <utime.h>
  53 #include <fnmatch.h>
  54 #include <sys/time.h>
  55 #include <sys/stat.h>
  56 #include <dirent.h>
  57 #include <X11/Xlib.h>
  58 #ifdef HAVE_LIBDOCKAPP_DOCKAPP_H
  59 #include <libdockapp/dockapp.h>
  60 #else
  61 #include <dockapp.h>
  62 #endif
  63
  64 #include "common.h"
  65 #include "config.h"
  66
  67 // pixmaps
  68 #ifdef USE_DELT_XPMS
  69 #include "xpm_delt/main.xpm"
  70 #include "xpm_delt/symbols.xpm"
  71 #include "xpm_delt/numbers.xpm"
  72 #include "xpm_delt/button.xpm"
  73 #include "xpm_delt/chars.xpm"
  74 #else
  75 #include "xpm/main.xpm"
  76 #include "xpm/symbols.xpm"
  77 #include "xpm/numbers.xpm"
  78 #include "xpm/button.xpm"
  79 #include "xpm/chars.xpm"
  80 #endif
  81
  82
  83 ///////////////////////////////////////////////////////////////////////////////
  84 // typedefs
  85
  86 typedef enum
  87 {
  88     FLAG_INITIAL = 0,
  89     FLAG_READ    = 1
  90 } flag_t;
  91
  92 typedef struct _name_t
  93 {
  94     char *name;
  95     unsigned long checksum;
  96     flag_t flag;
  97     bool visited;
  98     struct _name_t *next;
  99 } name_t;
 100
 101 typedef enum
 102 {
 103     STATE_NOMAIL,
 104     STATE_NEWMAIL,
 105     STATE_READMAIL
 106 } mail_state_t;
 107
 108 typedef enum
 109 {
 110     STATE_ADDRESS,
 111     STATE_QUOTED_ADDRESS,
 112     STATE_FULLNAME,
 113     STATE_QUOTED_FULLNAME,
 114     STATE_ENCODED_FULLNAME,
 115     STATE_COMMENT
 116 } parse_state_t;
 117
 118
 119 ///////////////////////////////////////////////////////////////////////////////
 120 // data
 121
 122 static char *configFile;
 123 static unsigned long lastTimeOut;
 124 static sig_atomic_t caughtSig;
 125 static mail_state_t state;
 126 static unsigned numMails;
 127 static bool namesChanged;
 128 static bool buttonPressed;
 129 static bool readConfigFile;
 130 static bool isMaildir;
 131 static bool forceRead;
 132 static bool forceRedraw = true;
 133 static time_t lastModifySeconds;
 134 static time_t lastAccessSeconds;
 135 static Pixmap mainPixmap;
 136 static Pixmap mainPixmap_mask;
 137 static Pixmap symbolsPixmap;
 138 static Pixmap charsPixmap;
 139 static Pixmap numbersPixmap;
 140 static Pixmap buttonPixmap;
 141 static Pixmap outPixmap;
 142 static GC tickerGC;
 143 static XFontStruct *tickerFS;
 144 static name_t *names;
 145 static name_t *curTickerName;
 146
 147 enum
 148 {
 149       OPT_INDEX_DISPLAY,
 150       OPT_INDEX_COMMAND,
 151       OPT_INDEX_INTERVAL,
 152       OPT_INDEX_FAMILY_NAME,
 153       OPT_INDEX_FRAMES,
 154       OPT_INDEX_SHORT_NAME,
 155       OPT_INDEX_SYMBOL_COLOR,
 156       OPT_INDEX_FONT_COLOR,
 157       OPT_INDEX_BACK_COLOR,
 158       OPT_INDEX_OFF_COLOR,
 159       OPT_INDEX_BACKGROUND,
 160       OPT_INDEX_NO_SHAPE,
 161       OPT_INDEX_NEW,
 162       OPT_INDEX_MAILBOX,
 163       OPT_INDEX_EXECUTE,
 164       OPT_INDEX_STATUS_FIELD,
 165       OPT_INDEX_READ_STATUS,
 166       OPT_INDEX_TICKER_FONT,
 167       OPT_INDEX_CONFIG_FILE,
 168 };
 169
 170 static DAProgramOption options[] =
 171 {
 172     [OPT_INDEX_DISPLAY] =
 173     {
 174         .shortForm   = "-display",
 175         .description = "display to use",
 176         .type        = DOString,
 177         .value       = { .string = &config.display }
 178     },
 179     [OPT_INDEX_COMMAND] =
 180     {
 181         .shortForm   = "-c",
 182         .longForm    = "--command",
 183         .description = "cmd to run on btn-click (\"xterm -e mail\" is default)",
 184         .type        = DOString,
 185         .value       = { .string = &config.runCmd }
 186     },
 187     [OPT_INDEX_INTERVAL] =
 188     {
 189         .shortForm   = "-i",
 190         .longForm    = "--interval",
 191         .description = "number of secs between mail-status updates (1 is default)",
 192         .type        = DONatural,
 193         .value       = { .integer = &config.checkInterval }
 194     },
 195     [OPT_INDEX_FAMILY_NAME] =
 196     {
 197         .shortForm   = "-f",
 198         .longForm    = "--familyname",
 199         .description = "tickers the family-name if available",
 200     },
 201     [OPT_INDEX_FRAMES] =
 202     {
 203         .shortForm   = "-fps",
 204         .longForm    = "--frames",
 205         .description = "ticker frames per second",
 206         .type        = DONatural,
 207         .value       = { .integer = &config.fps }
 208     },
 209     [OPT_INDEX_SHORT_NAME] =
 210     {
 211         .shortForm   = "-s",
 212         .longForm    = "--shortname",
 213         .description = "tickers the nickname (all before the '@')",
 214     },
 215     [OPT_INDEX_SYMBOL_COLOR] =
 216     {
 217         .shortForm   = "-sc",
 218         .longForm    = "--symbolcolor",
 219         .description = "symbol color-name",
 220         .type        = DOString,
 221         .value       = { .string = &config.symbolColor }
 222     },
 223     [OPT_INDEX_FONT_COLOR] =
 224     {
 225         .shortForm   = "-fc",
 226         .longForm    = "--fontcolor",
 227         .description = "ticker-font color-name",
 228         .type        = DOString,
 229         .value       = { .string = &config.fontColor }
 230     },
 231     [OPT_INDEX_BACK_COLOR] =
 232     {
 233         .shortForm   = "-bc",
 234         .longForm    = "--backcolor",
 235         .description = "backlight color-name",
 236         .type        = DOString,
 237         .value       = { .string = &config.backColor }
 238     },
 239     [OPT_INDEX_OFF_COLOR] =
 240     {
 241         .shortForm   = "-oc",
 242         .longForm    = "--offcolor",
 243         .description = "off-light color-name",
 244         .type        = DOString,
 245         .value       = { .string = &config.offlightColor }
 246     },
 247     [OPT_INDEX_BACKGROUND] =
 248     {
 249         .shortForm   = "-bg",
 250         .longForm    = "--background",
 251         .description = "frame-background for non-shaped window",
 252         .type        = DOString,
 253         .value       = { .string = &config.backgroundColor }
 254     },
 255     [OPT_INDEX_NO_SHAPE] =
 256     {
 257         .shortForm   = "-ns",
 258         .longForm    = "--noshape",
 259         .description = "make the dockapp non-shaped (combine with -w)",
 260     },
 261     [OPT_INDEX_NEW] =
 262     {
 263         .shortForm   = "-n",
 264         .longForm    = "--new",
 265         .description = "forces wmail to show new mail exclusively",
 266     },
 267     [OPT_INDEX_MAILBOX] =
 268     {
 269         .shortForm   = "-mb",
 270         .longForm    = "--mailbox",
 271         .description = "specify another mailbox ($MAIL is default)",
 272         .type        = DOString,
 273         .value       = { .string = &config.mailBox }
 274     },
 275     [OPT_INDEX_EXECUTE] =
 276     {
 277         .shortForm   = "-e",
 278         .longForm    = "--execute",
 279         .description = "command to execute when receiving a new mail",
 280         .type        = DOString,
 281         .value       = { .string = &config.cmdOnMail }
 282     },
 283     [OPT_INDEX_STATUS_FIELD] =
 284     {
 285         .shortForm   = "-sf",
 286         .longForm    = "--statusfield",
 287         .description = "consider the status-field of the mail header to distinguish unread mails",
 288     },
 289     [OPT_INDEX_READ_STATUS] =
 290     {
 291         .shortForm   = "-rs",
 292         .longForm    = "--readstatus",
 293         .description = "status field content that your client uses to mark read mails",
 294         .type        = DOString,
 295         .value       = { .string = &config.readStatus }
 296     },
 297     [OPT_INDEX_TICKER_FONT] =
 298     {
 299         .shortForm   = "-fn",
 300         .longForm    = "--tickerfont",
 301         .description = "use specified X11 font to draw the ticker",
 302         .type        = DOString,
 303         .value       = { .string = &config.useX11Font }
 304     },
 305     [OPT_INDEX_CONFIG_FILE] =
 306     {
 307         .shortForm   = "-rc",
 308         .longForm    = "--rcfile",
 309         .description = "specify another rc-file ($HOME/.wmailrc is default)",
 310         .type        = DOString,
 311         .value       = { .string = &configFile }
 312     }
 313 };
 314
 315
 316 ///////////////////////////////////////////////////////////////////////////////
 317 // prototypes
 318
 319 static int  PreparePixmaps( bool freeMem );
 320 static void ExitHandler( int sig );
 321 static void TimedOut( void );
 322 static void CheckTimeOut( bool force );
 323 static void CheckMBox( void );
 324 static void CheckMaildir( void );
 325 static int TraverseDirectory( const char *name, bool isNewMail );
 326 static name_t *GetMail( unsigned long checksum );
 327 static void UpdatePixmap( bool flashMailSymbol );
 328 static void ParseMBoxFile( struct stat *fileStat );
 329 static void ParseMaildirFile( const char *fileName, unsigned long checksum,
 330                               struct stat *fileStat, bool isNewMail );
 331 static char *ParseFromField( char *buf );
 332 static bool SkipSender( char *address );
 333 static int  InsertName( char *name, unsigned long checksum, flag_t flag );
 334 static void RemoveLastName( void );
 335 static void ClearAllNames( void );
 336 static void DrawTickerX11Font( void );
 337 static void DrawTickerBuildinFont( void );
 338 static void ButtonPressed( int button, int state, int x, int y );
 339 static void ButtonReleased( int button, int state, int x, int y );
 340 static int  XpmColorLine( const char *colorName, char **colorLine,
 341                            bool disposeLine );
 342 static void ReadChecksumFile( void );
 343 static void WriteChecksumFile( bool writeAll );
 344 static void UpdateChecksum( unsigned long *checksum, const char *buf );
 345 static void RemoveChecksumFile( void );
 346 static void SetMailFlags( flag_t flag );
 347 static void MarkName( unsigned long checksum );
 348 static void DetermineState( void );
 349 static void UpdateConfiguration( void );
 350 static void CleanupNames( void );
 351 static bool HasTickerWork( void );
 352
 353
 354 ///////////////////////////////////////////////////////////////////////////////
 355 // implementation
 356
 357
 358 int main( int argc, char **argv )
 359 {
 360     char *usersHome = getenv( "HOME" );
 361     struct sigaction sa = { .sa_handler = ExitHandler };
 362     struct stat fileStat;
 363     XTextProperty windowName;
 364     char *name = argv[0];
 365     DACallbacks callbacks = { NULL, &ButtonPressed, &ButtonReleased,
 366                               NULL, NULL, NULL, &TimedOut };
 367
 368     // parse cmdline-args
 369     DAParseArguments( argc, argv, options, sizeof options / sizeof *options,
 370                       PACKAGE_NAME, PACKAGE_STRING );
 371
 372     if( options[OPT_INDEX_DISPLAY].used )
 373         config.givenOptions |= CL_DISPLAY;
 374     if( options[OPT_INDEX_COMMAND].used )
 375         config.givenOptions |= CL_RUNCMD;
 376     if( options[OPT_INDEX_INTERVAL].used )
 377         config.givenOptions |= CL_CHECKINTERVAL;
 378     if( options[OPT_INDEX_FAMILY_NAME].used )
 379     {
 380         config.givenOptions |= CL_TICKERMODE;
 381         config.tickerMode = TICKER_FAMILYNAME;
 382     }
 383     if( options[OPT_INDEX_FRAMES].used )
 384         config.givenOptions |= CL_FPS;
 385     if( options[OPT_INDEX_SHORT_NAME].used )
 386     {
 387         config.givenOptions |= CL_TICKERMODE;
 388         config.tickerMode = TICKER_NICKNAME;
 389     }
 390     if( options[OPT_INDEX_SYMBOL_COLOR].used )
 391         config.givenOptions |= CL_SYMBOLCOLOR;
 392     if( options[OPT_INDEX_FONT_COLOR].used )
 393         config.givenOptions |= CL_FONTCOLOR;
 394     if( options[OPT_INDEX_BACK_COLOR].used )
 395         config.givenOptions |= CL_BACKCOLOR;
 396     if( options[OPT_INDEX_OFF_COLOR].used )
 397         config.givenOptions |= CL_OFFLIGHTCOLOR;
 398     if( options[OPT_INDEX_BACK_COLOR].used )
 399         config.givenOptions |= CL_BACKGROUNDCOLOR;
 400     if( options[OPT_INDEX_NO_SHAPE].used )
 401     {
 402         config.givenOptions |= CL_NOSHAPE;
 403         config.noshape = true;
 404     }
 405     if( options[OPT_INDEX_NEW].used )
 406     {
 407         config.givenOptions |= CL_NEWMAILONLY;
 408         config.newMailsOnly = true;
 409     }
 410     if( options[OPT_INDEX_MAILBOX].used )
 411         config.givenOptions |= CL_MAILBOX;
 412     if( options[OPT_INDEX_EXECUTE].used )
 413         config.givenOptions |= CL_CMDONMAIL;
 414     if( options[OPT_INDEX_STATUS_FIELD].used )
 415     {
 416         config.givenOptions |= CL_CONSIDERSTATUSFIELD;
 417         config.considerStatusField = true;
 418     }
 419     if( options[OPT_INDEX_READ_STATUS].used )
 420         config.givenOptions |= CL_READSTATUS;
 421     if( options[OPT_INDEX_TICKER_FONT].used )
 422         config.givenOptions |= CL_USEX11FONT;
 423
 424     if( configFile == NULL)
 425     {
 426         if( usersHome == NULL)
 427         {
 428             WARNING( "HOME environment-variable is not set, looking for %s in current directory!\n",
 429                      WMAIL_RC_FILE );
 430             configFile = strdup( WMAIL_RC_FILE );
 431         }
 432         else
 433             configFile = MakePathName( usersHome, WMAIL_RC_FILE );
 434
 435         if( configFile == NULL )
 436         {
 437             WARNING( "Cannot allocate config file-name.\n");
 438             exit( EXIT_FAILURE );
 439         }
 440
 441     }
 442
 443     TRACE( "%s: configFile = %s\n", __func__, configFile );
 444
 445     // read the config file
 446     ReadConfigFile( configFile, false );
 447
 448     if( config.checksumFileName == NULL )
 449     {
 450         if( usersHome == NULL )
 451         {
 452             WARNING( "HOME environment-variable is not set, placing %s in current directory!\n",
 453                      WMAIL_CHECKSUM_FILE );
 454             config.checksumFileName = strdup( WMAIL_CHECKSUM_FILE );
 455         }
 456         else
 457             config.checksumFileName = MakePathName( usersHome, WMAIL_CHECKSUM_FILE );
 458
 459         if( config.checksumFileName == NULL )
 460         {
 461             WARNING( "Cannot allocate checksum file-name.\n");
 462             exit( EXIT_FAILURE );
 463         }
 464     }
 465
 466     TRACE( "using checksum-file \"%s\"\n", config.checksumFileName );
 467
 468     if( config.mailBox == NULL )
 469         ABORT( "no mailbox specified - please define at least your $MAIL environment-variable!\n" );
 470     else if( stat( config.mailBox, &fileStat ) == 0 )
 471         isMaildir = S_ISDIR( fileStat.st_mode ) != 0;
 472
 473     TRACE( "mailbox is of type %s\n", isMaildir ? "maildir" : "mbox" );
 474
 475     // dockapp size hard wired - sorry...
 476     DAInitialize( config.display, "wmail", 64, 64, argc, argv );
 477
 478     outPixmap = DAMakePixmap();
 479     if( PreparePixmaps( false ) < 0 )
 480     {
 481         WARNING( "Cannot allocate color.\n" );
 482         exit( EXIT_FAILURE );
 483     }
 484
 485     if( sigaction( SIGINT, &sa, NULL ) == -1 )
 486     {
 487         perror( "wmail error: sigaction" );
 488         exit( EXIT_FAILURE );
 489     }
 490
 491     if( sigaction( SIGTERM, &sa, NULL ) == -1 )
 492     {
 493         perror( "wmail error: sigaction" );
 494         exit( EXIT_FAILURE );
 495     }
 496
 497     DASetCallbacks( &callbacks );
 498     DASetTimeout( 1000 / config.fps );
 499
 500     XStringListToTextProperty( &name, 1, &windowName );
 501     XSetWMName( DADisplay, DAWindow, &windowName );
 502     XSetCommand( DADisplay, DAWindow, argv, argc );
 503
 504     UpdatePixmap( false );
 505     DAShow();
 506
 507     DAEventLoop();
 508
 509     return 0;
 510 }
 511
 512 static int PreparePixmaps( bool freeMem )
 513 {
 514     // simple recoloring of the raw xpms befor creating Pixmaps of them
 515     // this works as long as you don't "touch" the images...
 516
 517     bool freeSymColor = freeMem && ( config.colorsUsed & SYM_COLOR );
 518     bool freeFntColor = freeMem && ( config.colorsUsed & FNT_COLOR );
 519     bool freeBckColor = freeMem && ( config.colorsUsed & BCK_COLOR );
 520     bool freeOffColor = freeMem && ( config.colorsUsed & OFF_COLOR );
 521     bool freeBgrColor = freeMem && ( config.colorsUsed & BGR_COLOR );
 522
 523 #if DA_VERSION < 20030126
 524     unsigned dummy;
 525 #else
 526     unsigned short dummy;
 527 #endif
 528
 529     XGCValues values;
 530
 531     /*
 532      * Symbol color?
 533      */
 534     if( config.symbolColor != NULL )
 535     {
 536         if( XpmColorLine( config.symbolColor, &symbols_xpm[2], freeSymColor) < 0 )
 537             return -1;
 538
 539         config.colorsUsed |= SYM_COLOR;
 540     }
 541     else
 542     {
 543         if( XpmColorLine( "#20B2AA", &symbols_xpm[2], freeSymColor) < 0 )
 544             return -1;
 545
 546         config.colorsUsed |= SYM_COLOR;
 547     }
 548
 549     /*
 550      * Font color?
 551      */
 552     if( config.fontColor != NULL )
 553     {
 554         if( XpmColorLine( config.fontColor, &chars_xpm[3], freeFntColor) < 0 )
 555             return -1;
 556
 557         if( XpmColorLine( config.fontColor, &numbers_xpm[3], freeFntColor) < 0 )
 558             return -1;
 559
 560         config.colorsUsed |= FNT_COLOR;
 561     }
 562     else
 563     {
 564         if( XpmColorLine( "#D3D3D3", &chars_xpm[3], freeFntColor) < 0 )
 565             return -1;
 566
 567         if( XpmColorLine( "#D3D3D3", &numbers_xpm[3], freeFntColor) < 0 )
 568             return -1;
 569
 570         config.colorsUsed |= FNT_COLOR;
 571     }
 572
 573     /*
 574      * Backlight color?
 575      */
 576     if( config.backColor != NULL )
 577     {
 578         if( XpmColorLine( config.backColor, &main_xpm[3], freeBckColor) < 0 )
 579             return -1;
 580
 581         if( XpmColorLine( config.backColor, &symbols_xpm[3], freeBckColor) < 0 )
 582             return -1;
 583
 584         if( XpmColorLine( config.backColor, &chars_xpm[2], freeBckColor) < 0 )
 585             return -1;
 586
 587         if( XpmColorLine( config.backColor, &numbers_xpm[2], freeBckColor) < 0 )
 588             return -1;
 589
 590         config.colorsUsed |= BCK_COLOR;
 591     }
 592     else
 593     {
 594         if( XpmColorLine( "#282828", &main_xpm[3], freeBckColor) < 0 )
 595             return -1;
 596
 597         if( XpmColorLine( "#282828", &symbols_xpm[3], freeBckColor) < 0 )
 598             return -1;
 599
 600         if( XpmColorLine( "#282828", &chars_xpm[2], freeBckColor) < 0 )
 601             return -1;
 602
 603         if( XpmColorLine( "#282828", &numbers_xpm[2], freeBckColor) < 0 )
 604             return -1;
 605
 606         config.colorsUsed |= BCK_COLOR;
 607     }
 608
 609     /*
 610      * Off-light color?
 611      */
 612     if( config.offlightColor != NULL )
 613     {
 614         if( XpmColorLine( config.offlightColor, &main_xpm[2], freeOffColor) < 0 )
 615             return -1;
 616
 617         if( XpmColorLine( config.offlightColor, &numbers_xpm[4], freeOffColor) < 0 )
 618             return -1;
 619
 620         config.colorsUsed |= OFF_COLOR;
 621     }
 622     else
 623     {
 624         if( XpmColorLine( "#000000", &main_xpm[2], freeOffColor) < 0 )
 625             return -1;
 626
 627         if( XpmColorLine( "#000000", &numbers_xpm[4], freeOffColor) < 0 )
 628             return -1;
 629
 630         config.colorsUsed |= OFF_COLOR;
 631     }
 632
 633     /*
 634      * Window-frame background (only seen if nonshaped)?
 635      */
 636     if( config.backgroundColor != NULL )
 637     {
 638         if( XpmColorLine( config.backgroundColor, &main_xpm[1], freeBgrColor) < 0 )
 639             return -1;
 640
 641         config.colorsUsed |= BGR_COLOR;
 642     }
 643
 644     if( freeMem )
 645     {
 646         XFreePixmap( DADisplay, mainPixmap );
 647         XFreePixmap( DADisplay, mainPixmap_mask );
 648         XFreePixmap( DADisplay, symbolsPixmap );
 649         XFreePixmap( DADisplay, charsPixmap );
 650         XFreePixmap( DADisplay, numbersPixmap );
 651         XFreePixmap( DADisplay, buttonPixmap );
 652
 653         if( tickerGC != NULL )
 654         {
 655             XFreeGC( DADisplay, tickerGC );
 656             tickerGC = NULL;
 657             if( tickerFS != NULL )
 658             {
 659                 XFreeFont( DADisplay, tickerFS );
 660                 tickerFS = NULL;
 661             }
 662         }
 663     }
 664
 665     DAMakePixmapFromData( main_xpm, &mainPixmap, &mainPixmap_mask, &dummy,  &dummy );
 666     DAMakePixmapFromData( symbols_xpm, &symbolsPixmap, NULL, &dummy, &dummy );
 667     DAMakePixmapFromData( chars_xpm, &charsPixmap, NULL, &dummy, &dummy );
 668     DAMakePixmapFromData( numbers_xpm, &numbersPixmap, NULL, &dummy, &dummy );
 669     DAMakePixmapFromData( button_xpm, &buttonPixmap, NULL, &dummy, &dummy );
 670
 671     if( config.useX11Font != NULL )
 672     {
 673         XRectangle clipRect;
 674
 675         if( config.fontColor != NULL )
 676             values.foreground = DAGetColor( config.fontColor );
 677         else
 678             values.foreground = DAGetColor( "#D3D3D3" );
 679
 680         tickerFS = XLoadQueryFont( DADisplay, config.useX11Font );
 681         if( tickerFS == NULL )
 682             ABORT( "Cannot load font \"%s\"", config.useX11Font );
 683
 684         values.font = tickerFS->fid;
 685         tickerGC = XCreateGC( DADisplay, DAWindow, GCForeground | GCFont,
 686                               &values );
 687         clipRect.x = 6;
 688         clipRect.y = 19;
 689         clipRect.width = 52;
 690         clipRect.height = 23;
 691
 692         XSetClipRectangles( DADisplay, tickerGC, 0, 0, &clipRect, 1, Unsorted );
 693     }
 694
 695     if( config.noshape ) // non-shaped dockapp ?
 696         DASetShape( None );
 697     else
 698         DASetShape( mainPixmap_mask );
 699
 700     return 0;
 701 }
 702
 703 static void MarkName( unsigned long checksum )
 704 {
 705     name_t *name;
 706
 707     for( name = names; name != NULL; name = name->next )
 708     {
 709         if( name->checksum == checksum )
 710         {
 711             name->flag |= FLAG_READ;
 712             if( config.newMailsOnly )
 713                 numMails--;
 714             break;
 715         }
 716     }
 717 }
 718
 719 static void DetermineState( void )
 720 {
 721     name_t *name;
 722
 723     for( name = names; name != NULL; name = name->next )
 724         if(!( name->flag & FLAG_READ ))
 725         {
 726             state = STATE_NEWMAIL;
 727
 728             if( config.cmdOnMail != NULL )
 729             {
 730                 int ret = system( config.cmdOnMail );
 731
 732                 if( ret == 127 || ret == -1 )
 733                     WARNING( "execution of command \"%s\" failed.\n", config.cmdOnMail );
 734             }
 735
 736             break;
 737         }
 738 }
 739
 740 static void ReadChecksumFile( void )
 741 {
 742     FILE *f = fopen( config.checksumFileName, "rb" );
 743     if( f != NULL )
 744         while( !feof( f ))
 745         {
 746             unsigned long checksum;
 747             if( fread( &checksum, sizeof(long), 1, f ) != 1 )
 748                 continue;
 749
 750             MarkName( checksum );
 751         }
 752     else
 753         return;
 754
 755     fclose( f );
 756 }
 757
 758 static void WriteChecksumFile( bool writeAll )
 759 {
 760     FILE *f;
 761     TRACE( "writing checksums:" );
 762
 763     if(( f = fopen( config.checksumFileName, "wb" )) != NULL )
 764     {
 765         name_t *name;
 766         for( name = names; name != NULL; name = name->next )
 767         {
 768             if( writeAll || (name->flag & FLAG_READ))
 769             {
 770                 fwrite( &name->checksum, sizeof(long), 1, f );
 771                 TRACE( " %X", name->checksum );
 772             }
 773         }
 774     }
 775     else
 776         return;
 777
 778     TRACE( "\n" );
 779
 780     fclose( f );
 781 }
 782
 783 static void UpdateChecksum( unsigned long *checksum, const char *buf )
 784 {
 785     if( buf != NULL )
 786     {
 787         size_t i, len = strlen( buf );
 788
 789         for( i = 0; i < len; ++i )
 790             *checksum += buf[i] << (( i % sizeof(long) ) * 8 );
 791     }
 792 }
 793
 794 static void RemoveChecksumFile( void )
 795 {
 796     TRACE( "removing checksum-file\n" );
 797     remove( config.checksumFileName );
 798 }
 799
 800 static void ExitHandler( int sig )
 801 {
 802     (void) sig;
 803     caughtSig = 1;
 804 }
 805
 806 static void TimedOut( void )
 807 {
 808     if( caughtSig )
 809     {
 810         ClearAllNames();
 811         ResetConfigStrings();
 812         if( !options[OPT_INDEX_CONFIG_FILE].used )
 813             free( configFile );
 814         exit( EXIT_SUCCESS );
 815     }
 816
 817     CheckTimeOut( true );
 818 }
 819
 820 static void CheckTimeOut( bool force )
 821 {
 822     static int checkMail = 0;
 823
 824     struct timeval now;
 825     gettimeofday(&now, NULL);
 826
 827     unsigned long nowMs = now.tv_sec * 1000UL + now.tv_usec / 1000UL;
 828
 829     if( !force && nowMs - lastTimeOut < 1000UL / config.fps )
 830         return;
 831
 832     lastTimeOut = nowMs;
 833
 834     if( readConfigFile )
 835     {
 836         readConfigFile = false;
 837         UpdateConfiguration();
 838         checkMail = 0;
 839         forceRead = true;
 840     }
 841
 842     if( checkMail == 0 )
 843     {
 844         TRACE( "checking for new mail...\n" );
 845
 846         if( isMaildir )
 847             CheckMaildir();
 848         else
 849             CheckMBox();
 850     }
 851
 852     UpdatePixmap( checkMail % config.fps < config.fps/2 );
 853
 854     if( ++checkMail >= config.fps * config.checkInterval )
 855         checkMail = 0;
 856 }
 857
 858 static void CheckMBox( void )
 859 {
 860     struct stat fileStat;
 861
 862     if( stat( config.mailBox, &fileStat ) == -1 || fileStat.st_size == 0 )
 863     {
 864         /*
 865          * Error retrieving file-stats or file is empty -> no new/read mails
 866          * available.
 867          */
 868         if( state != STATE_NOMAIL )
 869         {
 870             state = STATE_NOMAIL;
 871             ClearAllNames();
 872             RemoveChecksumFile();
 873             forceRedraw = true;
 874         }
 875     }
 876     else
 877     {
 878         if( lastModifySeconds != fileStat.st_mtime || forceRead )
 879         {
 880             /*
 881              * File has been updated -> new mails arrived or some mails removed
 882              */
 883             forceRead = false;
 884             ParseMBoxFile( &fileStat );
 885             stat( config.mailBox, &fileStat );
 886             forceRedraw = true;
 887         }
 888         else if( lastAccessSeconds != fileStat.st_atime )
 889         {
 890             /*
 891              * File has been accessed (read) -> mark all mails as "read", because it
 892              * cannot be decided which mails the user has read...
 893              */
 894             state = STATE_READMAIL;
 895             WriteChecksumFile( true );
 896             if( config.newMailsOnly )
 897             {
 898                 numMails = 0;
 899                 SetMailFlags( FLAG_READ );
 900             }
 901             forceRedraw = true;
 902         }
 903
 904         lastModifySeconds = fileStat.st_mtime;
 905         lastAccessSeconds = fileStat.st_atime;
 906     }
 907 }
 908
 909 static void CheckMaildir( void )
 910 {
 911     DIR *dir = NULL;
 912     mail_state_t lastState = state;
 913     unsigned lastMailCount = numMails;
 914
 915     if( forceRead )
 916     {
 917         forceRead = false;
 918         ClearAllNames();
 919         TRACE( "all names cleared\n" );
 920     }
 921
 922     state = STATE_NOMAIL;
 923
 924     if(( dir = opendir( config.mailBox )) != NULL )
 925     {
 926         struct dirent *dirEnt = NULL;
 927         name_t *name;
 928
 929         for( name = names; name != NULL; name = name->next )
 930             name->visited = false;
 931
 932         while(( dirEnt = readdir( dir )) != NULL )
 933         {
 934             char *fullName = MakePathName( config.mailBox, dirEnt->d_name );
 935             struct stat fileStat;
 936
 937             if( fullName == NULL )
 938             {
 939                 WARNING( "Cannot allocate file/path\n" );
 940                 break;
 941             }
 942
 943             if( stat( fullName, &fileStat ) == -1 )
 944                 WARNING( "Can't stat file/path \"%s\"\n", fullName );
 945             else if( S_ISDIR( fileStat.st_mode ))
 946             {
 947                 if( strcmp( dirEnt->d_name, "new" ) == 0 )
 948                 {
 949                     if( TraverseDirectory( fullName, true ) > 0 )
 950                         state = STATE_NEWMAIL;
 951                 }
 952                 else if( strcmp( dirEnt->d_name, "cur" ) == 0 )
 953                 {
 954                     if( TraverseDirectory( fullName, false ) > 0 )
 955                         if( state != STATE_NEWMAIL )
 956                             state = STATE_READMAIL;
 957                 }
 958                 // directories ".", ".." and "tmp" discarded
 959             }
 960             free( fullName );
 961         }
 962
 963         closedir( dir );
 964         CleanupNames();
 965     }
 966     else
 967         WARNING( "can't open directory \"%s\"\n", config.mailBox );
 968
 969     if( lastState != state || lastMailCount != numMails )
 970         forceRedraw = true;
 971 }
 972
 973 static int TraverseDirectory( const char *name, bool isNewMail )
 974 {
 975     DIR *dir = NULL;
 976     int mails = 0;
 977
 978     if(( dir = opendir( name )) != NULL )
 979     {
 980         struct dirent *dirEnt = NULL;
 981
 982         while(( dirEnt = readdir( dir )) != NULL )
 983         {
 984             char *fullName = MakePathName( name, dirEnt->d_name );
 985             struct stat fileStat;
 986             unsigned long checksum = 0;
 987             name_t *name;
 988
 989             if( fullName == NULL )
 990             {
 991                 WARNING( "Cannot allocate file/path\n" );
 992                 break;
 993             }
 994
 995             if( stat( fullName, &fileStat ) == -1 )
 996                 WARNING( "Can't stat file/path \"%s\"\n", fullName );
 997             else if( !S_ISDIR( fileStat.st_mode ))
 998             {
 999                 TRACE( "found email-file \"%s\"\n", fullName );
1000                 UpdateChecksum( &checksum, dirEnt->d_name );
1001
1002                 if(( name = GetMail( checksum )) == NULL )
1003                 {
1004                     TRACE( "-> new file - parsing it\n" );
1005                     ParseMaildirFile( fullName, checksum, &fileStat, isNewMail );
1006                 }
1007                 else
1008                 {
1009                     name->flag = isNewMail ? FLAG_INITIAL : FLAG_READ;
1010                     name->visited = true;
1011                 }
1012                 ++mails;
1013             }
1014             free( fullName );
1015         }
1016
1017         closedir( dir );
1018     }
1019
1020     return mails;
1021 }
1022
1023 static name_t *GetMail( unsigned long checksum )
1024 {
1025     name_t *name;
1026
1027     for( name = names; name != NULL; name = name->next )
1028         if( name->checksum == checksum )
1029             return name;
1030
1031     return NULL;
1032 }
1033
1034 static void UpdatePixmap( bool flashMailSymbol )
1035 {
1036     int drawCount, i;
1037
1038     if( !forceRedraw && !HasTickerWork() )
1039         return;
1040
1041     forceRedraw = false;
1042
1043     XCopyArea( DADisplay, mainPixmap, outPixmap, DAGC,
1044                0, 0, 64, 64, 0, 0 );
1045
1046     if( numMails > 999 )
1047     {
1048         XCopyArea( DADisplay, numbersPixmap, outPixmap, DAGC,
1049                    50, 0, 5, 9, 6, 49 );
1050         drawCount = 999;
1051     }
1052     else
1053         drawCount = numMails;
1054
1055     for( i = 0; i < 3; ++i, drawCount /= 10 )
1056     {
1057         XCopyArea( DADisplay, numbersPixmap, outPixmap, DAGC,
1058                    (drawCount%10)*5, 0, 5, 9, 24-i*6, 49 );
1059         if( drawCount <= 9 )
1060             break;
1061     }
1062
1063     if( buttonPressed )
1064         XCopyArea( DADisplay, buttonPixmap, outPixmap, DAGC,
1065                    0, 0, 23, 11, 36, 48 );
1066
1067     switch( state )
1068     {
1069     case STATE_NEWMAIL:
1070         if( flashMailSymbol )
1071             XCopyArea( DADisplay, symbolsPixmap, outPixmap, DAGC,
1072                        13, 0, 37, 12, 20, 7 );
1073         /* fall through */
1074     case STATE_READMAIL:
1075         XCopyArea( DADisplay, symbolsPixmap, outPixmap, DAGC,
1076                    0, 0, 13, 12, 7, 7 );
1077
1078         if( config.useX11Font == NULL )
1079             DrawTickerBuildinFont();
1080         else
1081             DrawTickerX11Font();
1082         break;
1083     default: // make compiler happy
1084         break;
1085     }
1086
1087     DASetPixmap( outPixmap );
1088 }
1089
1090 static void ParseMBoxFile( struct stat *fileStat )
1091 {
1092     char buf[1024];
1093     struct utimbuf timeStruct;
1094     int fromFound = 0;
1095     FILE *f = fopen( config.mailBox, "r" );
1096     unsigned long checksum;
1097
1098     state = STATE_READMAIL;
1099     ClearAllNames();
1100
1101     numMails = 0;
1102
1103     if( f == NULL )
1104     {
1105         WARNING( "can't open mbox \"%s\"\n", config.mailBox );
1106         return;
1107     }
1108
1109     while( fgets( buf, sizeof buf, f ) != NULL )
1110     {
1111         if( PREFIX_MATCHES( buf, "From ", true ))
1112         {
1113             fromFound = 1;
1114             checksum = 0;
1115             continue;
1116         }
1117
1118         if( fromFound )
1119             UpdateChecksum( &checksum, buf );
1120
1121         if( fromFound && PREFIX_MATCHES( buf, "From:", false ))
1122         {
1123             char *addr = buf + sizeof "From:";
1124
1125             if( SkipSender( addr ))
1126                 continue;
1127
1128             char *name;
1129             if(( name = ParseFromField( addr )) == NULL )
1130             {
1131                 WARNING( "Could not parse From field\n" );
1132                 break;
1133             }
1134             if ( InsertName( name, checksum, FLAG_INITIAL ) < 0 )
1135             {
1136                 WARNING( "Could not allocate name\n" );
1137                 break;
1138             }
1139
1140             ++numMails;
1141             fromFound = 0;
1142             checksum = 0;
1143         }
1144         else if( config.considerStatusField &&
1145                    PREFIX_MATCHES( buf, "Status:", false ) &&
1146                    strstr( buf + sizeof "Status:", config.readStatus ) == NULL )
1147         {
1148             RemoveLastName();
1149             --numMails;
1150         }
1151     }
1152
1153     fclose( f );
1154     ReadChecksumFile();
1155
1156     DetermineState();
1157
1158     timeStruct.actime = fileStat->st_atime;
1159     timeStruct.modtime = fileStat->st_mtime;
1160     utime( config.mailBox, &timeStruct );
1161 }
1162
1163 static void ParseMaildirFile( const char *fileName, unsigned long checksum,
1164                               struct stat *fileStat, bool isNewMail )
1165 {
1166     char buf[1024];
1167     struct utimbuf timeStruct;
1168     FILE *f = fopen( fileName, "r" );
1169
1170     if( f == NULL )
1171     {
1172         WARNING( "can't open maildir file \"%s\"\n", fileName );
1173         return;
1174     }
1175
1176     while( fgets( buf, sizeof buf, f ) != NULL )
1177     {
1178         if( PREFIX_MATCHES( buf, "From:", false ))
1179         {
1180             char *addr = buf + sizeof "From:";
1181
1182             if( SkipSender( addr ))
1183                 break;
1184
1185             char *name;
1186             if(( name = ParseFromField( addr )) == NULL )
1187             {
1188                 WARNING( "Could not parse From field\n" );
1189                 break;
1190             }
1191             if ( InsertName( name, checksum,
1192                              isNewMail ? FLAG_INITIAL : FLAG_READ ) < 0 )
1193             {
1194                 WARNING( "Could not allocate name\n" );
1195                 break;
1196             }
1197
1198             //++numMails;
1199         }
1200     }
1201
1202     fclose( f );
1203
1204     timeStruct.actime = fileStat->st_atime;
1205     timeStruct.modtime = fileStat->st_mtime;
1206     utime( fileName, &timeStruct );
1207 }
1208
1209 static char *ParseFromField( char *buf )
1210 {
1211     parse_state_t state = STATE_FULLNAME;
1212     int fullNameEncoded = 0;
1213     int saveAtCharPos = -1;
1214     char *fullName;
1215     char *addressName;
1216     char *atChar = NULL;
1217     char *c;
1218     size_t maxLen = strlen( buf ) + 1;
1219     char *comment;
1220     size_t fullNameLen = 0, addressNameLen = 0, commentLen = 0;
1221
1222     if(( fullName = calloc( maxLen, sizeof *fullName )) == NULL )
1223         return NULL;
1224     if(( addressName = calloc( maxLen, sizeof *addressName )) == NULL )
1225     {
1226         free( fullName );
1227         return NULL;
1228     }
1229     if(( comment = calloc( maxLen, sizeof *comment )) == NULL )
1230     {
1231         free( fullName );
1232         free( addressName );
1233         return NULL;
1234     }
1235
1236     // FIXME: Don't do that "encoded" dance.  It's not intended by
1237     // RFC2047, and it's better to just do it in the end.
1238     // Cleaner.
1239
1240     for( c = buf; *c != '\0'; ++c )
1241     {
1242         switch( state )
1243         {
1244         case STATE_FULLNAME:
1245
1246             switch( *c )
1247             {
1248             case '"':
1249                 state = STATE_QUOTED_FULLNAME;
1250                 continue;
1251             case '<':
1252                 while( fullNameLen > 0 &&
1253                        isspace( fullName[ fullNameLen - 1 ] ))
1254                     fullNameLen--;
1255                 fullName[ fullNameLen ] = '\0';
1256                 state = STATE_ADDRESS;
1257                 continue;
1258             case '@':
1259                 saveAtCharPos = fullNameLen;
1260                 fullName[ fullNameLen++ ] = *c;
1261                 continue;
1262             case '(':
1263                 state = STATE_COMMENT;
1264                 continue;
1265             case '=':
1266                 if( *(c+1) == '?' )
1267                 {
1268                     ++c;
1269                     fullNameEncoded = 1;
1270                     state = STATE_ENCODED_FULLNAME;
1271                     continue;
1272                 }
1273                 /* else fall through */
1274             default:
1275                 if( fullName[0] != '\0' || !isspace( *c ))
1276                     fullName[ fullNameLen++ ] = *c;
1277             }
1278             continue;
1279
1280         case STATE_QUOTED_FULLNAME:
1281
1282             switch( *c )
1283             {
1284             case '\\':
1285                 fullName[ fullNameLen++ ] = *(++c);
1286                 continue;
1287             case '"':
1288                 state = STATE_FULLNAME;
1289                 continue;
1290             default:
1291                 fullName[ fullNameLen++ ] = *c;
1292             }
1293             continue;
1294
1295         case STATE_ENCODED_FULLNAME:
1296
1297             switch( *c )
1298             {
1299             case '?':
1300                 if( *(c+1) == '=' )
1301                 {
1302                     ++c;
1303                     state = STATE_FULLNAME;
1304                     continue;
1305                 }
1306             default:
1307                 ; // do nothing... COMING SOON: decode at least latin1
1308             }
1309             continue;
1310
1311         case STATE_ADDRESS:
1312
1313             switch( *c )
1314             {
1315             case '"':
1316                 state = STATE_QUOTED_ADDRESS;
1317             case '>':
1318             case '\n':
1319                 // FIXME: Shouldn't it break here?
1320                 // Since the address is finished?
1321                 continue;
1322             case '@':
1323                 atChar = addressName + addressNameLen;
1324                 addressName[ addressNameLen++ ] = *c;
1325                 continue;
1326             default:
1327                 addressName[ addressNameLen++ ] = *c;
1328             }
1329             continue;
1330
1331         case STATE_QUOTED_ADDRESS:
1332
1333             switch( *c )
1334             {
1335             case '"':
1336                 state = STATE_ADDRESS;
1337                 continue;
1338             case '\\':
1339                 addressName[ addressNameLen++ ] = *(++c);
1340                 continue;
1341             default:
1342                 addressName[ addressNameLen++ ] = *c;
1343             }
1344             continue;
1345         case STATE_COMMENT:
1346             switch( *c )
1347             {
1348             case ')':
1349                     state = STATE_FULLNAME;
1350                     continue;
1351             default:
1352                     comment[ commentLen++ ] = *c;
1353             }
1354             continue;
1355         }
1356     }
1357
1358     if( *comment )
1359     {
1360         //WARNING("Comment seen: %s\nIn: %s\nFullname: %s\nAddress: %s\n", comment, buf, fullName, addressName);
1361         // Comment seen: if there's an address, append to
1362         // fullname.  If no address, copy fullname to address
1363         // and comment to fullname.
1364         if( *addressName )
1365         {
1366             strcat(fullName, "(");
1367             strcat(fullName, comment);
1368             strcat(fullName, ")");
1369         }
1370         else
1371         {
1372             strcpy(addressName, fullName);
1373             strcpy(fullName, comment);
1374         }
1375     }
1376     free( comment );
1377
1378     //WARNING("Fullname: %s\nAddress: %s\n", fullName, addressName);
1379
1380     // what name should be tickered
1381     if( config.tickerMode == TICKER_FAMILYNAME && fullName[0] != '\0' && !fullNameEncoded )
1382     {
1383         free( addressName );
1384         return fullName;
1385     }
1386     else
1387     {
1388         if( state == STATE_FULLNAME )
1389         {
1390             strcpy( addressName, fullName );
1391             if( saveAtCharPos != -1 )
1392                 atChar = &addressName[saveAtCharPos];
1393         }
1394         if( config.tickerMode == TICKER_NICKNAME )
1395         {
1396             if( atChar != NULL )
1397                 *atChar = '\0';
1398         }
1399         free( fullName );
1400         return addressName;
1401     }
1402 }
1403
1404 static bool SkipSender( char *address )
1405 {
1406     char **skipName;
1407     size_t len = strlen( address );
1408
1409     // remove trailing '\n' got from fgets
1410     if( address[len - 1] == '\n' )
1411         address[len - 1] = '\0';
1412
1413     while( isspace( *address ))
1414         address++;
1415
1416     for( skipName = config.skipNames;
1417          skipName != NULL && *skipName != NULL; skipName++ )
1418     {
1419         TRACE( "comparing \"%s\" and \"%s\"\n", *skipName, address );
1420
1421         // call libc-fnmatch (wildcard-match :-) !
1422         if( !fnmatch( *skipName, address, 0 ))
1423         {
1424             TRACE( "skipping sender \"%s\"\n", *skipName );
1425             return true;
1426         }
1427     }
1428
1429     return false;
1430 }
1431
1432 static int InsertName( char *name, unsigned long checksum, flag_t flag )
1433 {
1434     name_t *item;
1435
1436     TRACE( "insertName: %X, \"%s\"\n", checksum, name );
1437     if(( item = malloc( sizeof( name_t ))) == NULL )
1438     {
1439         free( name );
1440         return -1;
1441     }
1442
1443     item->name = name;
1444     item->checksum = checksum;
1445     item->flag = flag;
1446     item->visited = true;
1447     item->next = names;
1448     names = item;
1449
1450     namesChanged = true;
1451     return 0;
1452 }
1453
1454 static void RemoveLastName( void )
1455 {
1456     if( names != NULL )
1457     {
1458         name_t *name = names;
1459         names = names->next;
1460         free( name->name );
1461         free( name );
1462     }
1463 }
1464
1465 static void ClearAllNames( void )
1466 {
1467     name_t *name, *nextName;
1468
1469     for( name = names; name != NULL; name = nextName )
1470     {
1471         nextName = name->next;
1472
1473         free( name->name );
1474         free( name );
1475     }
1476
1477     names = NULL;
1478     numMails = 0;
1479
1480     namesChanged = true;
1481 }
1482
1483 static void SetMailFlags( flag_t flag )
1484 {
1485     name_t *name;
1486
1487     for( name = names; name != NULL; name = name->next )
1488         name->flag |= flag;
1489 }
1490
1491 static void DrawTickerX11Font( void )
1492 {
1493     // 49 x 21 + 7 + 20 out-drawable size
1494
1495     static int insertAt;
1496
1497     if( curTickerName == NULL || namesChanged )
1498     {
1499         for( curTickerName = names;
1500              curTickerName != NULL && config.newMailsOnly &&
1501                  ( curTickerName->flag & FLAG_READ );
1502              curTickerName = curTickerName->next )
1503             ;
1504
1505         if( curTickerName == NULL )
1506             return;
1507
1508         namesChanged = false;
1509         insertAt = 54;
1510     }
1511
1512     XDrawString( DADisplay, outPixmap, tickerGC, insertAt,
1513                  41-tickerFS->max_bounds.descent,
1514                  curTickerName->name, strlen( curTickerName->name ));
1515
1516     --insertAt;
1517
1518     if( insertAt < -XTextWidth( tickerFS, curTickerName->name,
1519                                 strlen( curTickerName->name )) + 6 )
1520     {
1521         do
1522             curTickerName = curTickerName->next;
1523         while( curTickerName != NULL && config.newMailsOnly &&
1524                    ( curTickerName->flag & FLAG_READ ));
1525
1526         if( curTickerName != NULL )
1527             insertAt = 54;
1528     }
1529 }
1530
1531 static void DrawTickerBuildinFont( void )
1532 {
1533     // 49 x 21 + 7 + 20 out-drawable size
1534     // 14 x 21 font-character size
1535
1536     static unsigned insertAt;
1537     static unsigned takeItFrom;
1538
1539     unsigned leftSpace;
1540     unsigned drawTo;
1541     unsigned char *currentChar;
1542
1543     if( names == NULL )
1544         return;
1545
1546     if( curTickerName == NULL || namesChanged )
1547     {
1548         for( curTickerName = names;
1549              curTickerName != NULL && config.newMailsOnly && ( curTickerName->flag & FLAG_READ );
1550              curTickerName = curTickerName->next )
1551             ;
1552
1553         if( curTickerName == NULL )
1554             return;
1555
1556         insertAt = 57;
1557         takeItFrom = 0;
1558         namesChanged = false;
1559     }
1560
1561     leftSpace = takeItFrom % 14;
1562
1563     for( currentChar = (unsigned char *)&curTickerName->name[takeItFrom/14],
1564          drawTo = insertAt; *currentChar != '\0'; ++currentChar )
1565     {
1566         int outChar = (*currentChar < 32 || *currentChar >= 128) ? '?' :
1567             *currentChar;
1568         int charWidth = 57 - drawTo >= 14 ? 14 - leftSpace : 57 - drawTo;
1569
1570         XCopyArea( DADisplay, charsPixmap, outPixmap, DAGC,
1571                    (outChar - 32) * 14 + leftSpace, 0, charWidth, 21, drawTo, 20 );
1572
1573         leftSpace = 0;
1574         drawTo += charWidth;
1575
1576         if( drawTo > 57 )
1577             break;
1578     }
1579
1580     if( --insertAt < 7 )
1581     {
1582         insertAt = 7;
1583         takeItFrom++;
1584
1585         if( takeItFrom/14 >= strlen( curTickerName->name ))
1586         {
1587             do
1588                 curTickerName = curTickerName->next;
1589             while( curTickerName != NULL && config.newMailsOnly &&
1590                    ( curTickerName->flag & FLAG_READ ));
1591
1592             if( curTickerName != NULL )
1593             {
1594                 takeItFrom = 0;
1595                 insertAt = 57;
1596             }
1597         }
1598     }
1599 }
1600
1601 static void ButtonPressed( int button, int state, int x, int y )
1602 {
1603     (void) button;
1604     (void) state;
1605
1606     if( x >= 35 && x <= 59 && y >= 47 && y <= 59 )
1607     {
1608         buttonPressed = true;
1609         forceRedraw = true;
1610     }
1611     else
1612         // reread the config file
1613         readConfigFile = true;
1614
1615     CheckTimeOut( false );
1616 }
1617
1618 static void ButtonReleased( int button, int state, int x, int y )
1619 {
1620     (void) button;
1621     (void) state;
1622
1623     buttonPressed = false;
1624     forceRedraw = true;
1625
1626     if( x >= 35 && x <= 59 && y >= 47 && y <= 59 )
1627     {
1628         int ret = system( config.runCmd );
1629
1630         if( ret == 127 || ret == -1 )
1631             WARNING( "execution of command \"%s\" failed.\n", config.runCmd );
1632     }
1633
1634     CheckTimeOut( false );
1635 }
1636
1637 static void GetHexColorString( const char *colorName, char *xpmLine )
1638 {
1639     XColor color;
1640
1641     if( XParseColor( DADisplay,
1642                      DefaultColormap( DADisplay, DefaultScreen( DADisplay )),
1643                      colorName, &color ))
1644         sprintf( xpmLine, "%02X%02X%02X", color.red>>8, color.green>>8,
1645                   color.blue>>8 );
1646     else
1647         WARNING( "unknown colorname: \"%s\"\n", colorName );
1648 }
1649
1650 static int XpmColorLine( const char *colorName, char **colorLine,
1651                            bool disposeLine )
1652 {
1653     char *newLine, *from;
1654
1655     newLine = strdup( *colorLine );
1656     if ( newLine == NULL )
1657         return -1;
1658
1659     from = strrchr( newLine, '#' );
1660     if( from == NULL &&
1661         strcasecmp( &(*colorLine)[ strlen( *colorLine ) - 4 ], "none" ) == 0 )
1662     {
1663         /*
1664          * if no # found, it should be a None-color line
1665          */
1666         free( newLine );
1667         newLine = malloc( 12 );
1668         if ( newLine != NULL )
1669         {
1670             strcpy( newLine, " \tc #" );
1671             newLine[11] = '\0';
1672             from = newLine + 4;
1673         }
1674     }
1675
1676     if( newLine == NULL)
1677         return -1;
1678
1679     if( disposeLine )
1680         free( *colorLine );
1681
1682     GetHexColorString( colorName, from + 1 );
1683
1684     *colorLine = newLine;
1685     return 0;
1686 }
1687
1688 static void UpdateConfiguration( void )
1689 {
1690     struct stat fileStat;
1691
1692     TRACE( "reading configuration file...\n" );
1693
1694     ReadConfigFile( configFile, true );
1695
1696     // if no path/name to an mbox or maildir inbox directory was given,
1697     // use the environment
1698     if( config.mailBox == NULL )
1699         config.mailBox = getenv( "MAIL" );
1700
1701     // mbox or maildir ?
1702     if( config.mailBox != NULL && stat( config.mailBox, &fileStat ) == 0 )
1703         isMaildir = S_ISDIR( fileStat.st_mode ) != 0;
1704     else
1705         isMaildir = false;
1706
1707     TRACE( "mailbox is of type %s\n", isMaildir ? "maildir" : "mbox" );
1708
1709     if( PreparePixmaps( true ) < 0 )
1710         WARNING( "Cannot allocate color.\n" );
1711
1712     DASetTimeout( 1000 / config.fps );
1713 }
1714
1715 static void CleanupNames( void )
1716 {
1717     name_t *name, *last = NULL, *nextName;
1718
1719     numMails = 0;
1720
1721     for( name = names; name != NULL; name = nextName )
1722     {
1723         nextName = name->next;
1724
1725         if( !name->visited )
1726         {
1727             if( last == NULL )
1728                 names = name->next;
1729             else
1730                 last->next = name->next;
1731
1732             free( name->name );
1733             free( name );
1734
1735             namesChanged = true;
1736         }
1737         else
1738         {
1739             last = name;
1740
1741             if( !config.newMailsOnly || (name->flag & FLAG_READ) == 0 )
1742                 ++numMails;
1743         }
1744     }
1745 }
1746
1747 static bool HasTickerWork( void )
1748 {
1749     name_t *nextTickerName;
1750
1751     if( names == NULL )
1752         return false;
1753
1754     if( curTickerName == NULL || namesChanged )
1755     {
1756
1757         for( nextTickerName = names;
1758              nextTickerName != NULL && config.newMailsOnly &&
1759                 ( nextTickerName->flag & FLAG_READ );
1760              nextTickerName = nextTickerName->next )
1761             ;
1762
1763         if( nextTickerName == NULL )
1764             return false;
1765     }
1766
1767     return true;
1768 }