apps/plugins/calendar.c

   1 /***************************************************************************
   2  *             __________               __   ___.
   3  *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
   4  *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
   5  *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
   6  *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
   7  *                     \/            \/     \/    \/            \/
   8  * $Id$
   9  * (based upon 1.1 by calpefrosch) updated by www.HuwSy.ukhackers.net
  10  *
  11  * Copyright (C) 2002
  12  *
  13  * This program is free software; you can redistribute it and/or
  14  * modify it under the terms of the GNU General Public License
  15  * as published by the Free Software Foundation; either version 2
  16  * of the License, or (at your option) any later version.
  17  *
  18  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  19  * KIND, either express or implied.
  20  *
  21  ****************************************************************************/
  22 #include "plugin.h"
  23
  24 #if defined(HAVE_LCD_BITMAP) && (CONFIG_RTC != 0)
  25
  26 #include <timefuncs.h>
  27
  28 PLUGIN_HEADER
  29
  30 #if CONFIG_KEYPAD == RECORDER_PAD
  31 #define CALENDAR_QUIT       BUTTON_OFF
  32 #define CALENDAR_SELECT     BUTTON_PLAY
  33 #define CALENDAR_NEXT_WEEK  BUTTON_DOWN
  34 #define CALENDAR_PREV_WEEK  BUTTON_UP
  35 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
  36 #define CALENDAR_PREV_DAY   BUTTON_LEFT
  37 #define CALENDAR_NEXT_MONTH (BUTTON_ON|BUTTON_DOWN)
  38 #define CALENDAR_PREV_MONTH (BUTTON_ON|BUTTON_UP)
  39
  40 #elif CONFIG_KEYPAD == ARCHOS_AV300_PAD
  41 #define CALENDAR_QUIT       BUTTON_OFF
  42 #define CALENDAR_SELECT     BUTTON_SELECT
  43 #define CALENDAR_NEXT_WEEK  BUTTON_DOWN
  44 #define CALENDAR_PREV_WEEK  BUTTON_UP
  45 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
  46 #define CALENDAR_PREV_DAY   BUTTON_LEFT
  47 #define CALENDAR_NEXT_MONTH (BUTTON_ON|BUTTON_DOWN)
  48 #define CALENDAR_PREV_MONTH (BUTTON_ON|BUTTON_UP)
  49
  50 #elif (CONFIG_KEYPAD == IRIVER_H100_PAD) || \
  51       (CONFIG_KEYPAD == IRIVER_H300_PAD)
  52 #define CALENDAR_QUIT       BUTTON_OFF
  53 #define CALENDAR_SELECT     BUTTON_SELECT
  54 #define CALENDAR_NEXT_WEEK  BUTTON_DOWN
  55 #define CALENDAR_PREV_WEEK  BUTTON_UP
  56 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
  57 #define CALENDAR_PREV_DAY   BUTTON_LEFT
  58 #define CALENDAR_NEXT_MONTH BUTTON_MODE
  59 #define CALENDAR_PREV_MONTH BUTTON_REC
  60
  61 #elif (CONFIG_KEYPAD == IPOD_4G_PAD) || \
  62       (CONFIG_KEYPAD == IPOD_3G_PAD) || \
  63       (CONFIG_KEYPAD == IPOD_1G2G_PAD)
  64 #define CALENDAR_QUIT       (BUTTON_SELECT|BUTTON_MENU)
  65 #define CALENDAR_SELECT     (BUTTON_SELECT|BUTTON_REL)
  66 #define CALENDAR_NEXT_WEEK  BUTTON_SCROLL_FWD
  67 #define CALENDAR_PREV_WEEK  BUTTON_SCROLL_BACK
  68 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
  69 #define CALENDAR_PREV_DAY   BUTTON_LEFT
  70 #define CALENDAR_NEXT_MONTH BUTTON_PLAY
  71 #define CALENDAR_PREV_MONTH (BUTTON_MENU|BUTTON_REL)
  72
  73 #elif (CONFIG_KEYPAD == IAUDIO_X5M5_PAD)
  74 #define CALENDAR_QUIT       BUTTON_POWER
  75 #define CALENDAR_SELECT     BUTTON_SELECT
  76 #define CALENDAR_NEXT_WEEK  BUTTON_DOWN
  77 #define CALENDAR_PREV_WEEK  BUTTON_UP
  78 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
  79 #define CALENDAR_PREV_DAY   BUTTON_LEFT
  80 #define CALENDAR_NEXT_MONTH BUTTON_PLAY
  81 #define CALENDAR_PREV_MONTH BUTTON_REC
  82
  83 #elif CONFIG_KEYPAD == GIGABEAT_PAD
  84 #define CALENDAR_QUIT       BUTTON_POWER
  85 #define CALENDAR_SELECT     BUTTON_SELECT
  86 #define CALENDAR_NEXT_WEEK  BUTTON_DOWN
  87 #define CALENDAR_PREV_WEEK  BUTTON_UP
  88 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
  89 #define CALENDAR_PREV_DAY   BUTTON_LEFT
  90 #define CALENDAR_NEXT_MONTH BUTTON_VOL_DOWN
  91 #define CALENDAR_PREV_MONTH BUTTON_VOL_UP
  92
  93 #elif CONFIG_KEYPAD == SANSA_E200_PAD
  94 #define CALENDAR_QUIT       BUTTON_POWER
  95 #define CALENDAR_SELECT     BUTTON_SELECT
  96 #define CALENDAR_NEXT_WEEK  BUTTON_SCROLL_FWD
  97 #define CALENDAR_PREV_WEEK  BUTTON_SCROLL_BACK
  98 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
  99 #define CALENDAR_PREV_DAY   BUTTON_LEFT
 100 #define CALENDAR_NEXT_MONTH BUTTON_DOWN
 101 #define CALENDAR_PREV_MONTH BUTTON_UP
 102
 103 #elif CONFIG_KEYPAD == SANSA_FUZE_PAD
 104 #define CALENDAR_QUIT       (BUTTON_HOME|BUTTON_REPEAT)
 105 #define CALENDAR_SELECT     BUTTON_SELECT
 106 #define CALENDAR_NEXT_WEEK  BUTTON_SCROLL_FWD
 107 #define CALENDAR_PREV_WEEK  BUTTON_SCROLL_BACK
 108 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
 109 #define CALENDAR_PREV_DAY   BUTTON_LEFT
 110 #define CALENDAR_NEXT_MONTH BUTTON_DOWN
 111 #define CALENDAR_PREV_MONTH BUTTON_UP
 112
 113 #elif CONFIG_KEYPAD == SANSA_C200_PAD || \
 114 CONFIG_KEYPAD == SANSA_CLIP_PAD || \
 115 CONFIG_KEYPAD == SANSA_M200_PAD
 116 #define CALENDAR_QUIT       BUTTON_POWER
 117 #define CALENDAR_SELECT     BUTTON_SELECT
 118 #define CALENDAR_NEXT_WEEK  BUTTON_DOWN
 119 #define CALENDAR_PREV_WEEK  BUTTON_UP
 120 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
 121 #define CALENDAR_PREV_DAY   BUTTON_LEFT
 122 #define CALENDAR_NEXT_MONTH BUTTON_VOL_UP
 123 #define CALENDAR_PREV_MONTH BUTTON_VOL_DOWN
 124
 125 #elif CONFIG_KEYPAD == IRIVER_H10_PAD
 126 #define CALENDAR_QUIT       BUTTON_POWER
 127 #define CALENDAR_SELECT     BUTTON_PLAY
 128 #define CALENDAR_NEXT_WEEK  BUTTON_SCROLL_DOWN
 129 #define CALENDAR_PREV_WEEK  BUTTON_SCROLL_UP
 130 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
 131 #define CALENDAR_PREV_DAY   BUTTON_LEFT
 132 #define CALENDAR_NEXT_MONTH BUTTON_FF
 133 #define CALENDAR_PREV_MONTH BUTTON_REW
 134
 135 #elif CONFIG_KEYPAD == GIGABEAT_S_PAD
 136 #define CALENDAR_QUIT       BUTTON_BACK
 137 #define CALENDAR_SELECT     BUTTON_SELECT
 138 #define CALENDAR_NEXT_WEEK  BUTTON_DOWN
 139 #define CALENDAR_PREV_WEEK  BUTTON_UP
 140 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
 141 #define CALENDAR_PREV_DAY   BUTTON_LEFT
 142 #define CALENDAR_NEXT_MONTH BUTTON_NEXT
 143 #define CALENDAR_PREV_MONTH BUTTON_PREV
 144
 145 #elif CONFIG_KEYPAD == MROBE100_PAD
 146 #define CALENDAR_QUIT       BUTTON_POWER
 147 #define CALENDAR_SELECT     BUTTON_SELECT
 148 #define CALENDAR_NEXT_WEEK  BUTTON_DOWN
 149 #define CALENDAR_PREV_WEEK  BUTTON_UP
 150 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
 151 #define CALENDAR_PREV_DAY   BUTTON_LEFT
 152 #define CALENDAR_NEXT_MONTH (BUTTON_MENU|BUTTON_DOWN)
 153 #define CALENDAR_PREV_MONTH (BUTTON_MENU|BUTTON_UP)
 154
 155 #elif CONFIG_KEYPAD == IAUDIO_M3_PAD
 156 #define CALENDAR_QUIT       BUTTON_RC_REC
 157 #define CALENDAR_SELECT     BUTTON_RC_PLAY
 158 #define CALENDAR_NEXT_WEEK  BUTTON_RC_VOL_DOWN
 159 #define CALENDAR_PREV_WEEK  BUTTON_RC_VOL_UP
 160 #define CALENDAR_NEXT_DAY   BUTTON_RC_FF
 161 #define CALENDAR_PREV_DAY   BUTTON_RC_REW
 162 #define CALENDAR_NEXT_MONTH BUTTON_RC_MODE
 163 #define CALENDAR_PREV_MONTH BUTTON_RC_MENU
 164
 165 #elif (CONFIG_KEYPAD == COWOND2_PAD)
 166 #define CALENDAR_QUIT       BUTTON_POWER
 167 #define CALENDAR_SELECT     BUTTON_CENTER
 168 #define CALENDAR_NEXT_WEEK  BUTTON_DOWN
 169 #define CALENDAR_PREV_WEEK  BUTTON_UP
 170 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
 171 #define CALENDAR_PREV_DAY   BUTTON_LEFT
 172 #define CALENDAR_NEXT_MONTH BUTTON_BOTTOMRIGHT
 173 #define CALENDAR_PREV_MONTH BUTTON_BOTTOMLEFT
 174
 175 #elif CONFIG_KEYPAD == PHILIPS_HDD1630_PAD
 176 #define CALENDAR_QUIT       BUTTON_POWER
 177 #define CALENDAR_SELECT     BUTTON_SELECT
 178 #define CALENDAR_NEXT_WEEK  BUTTON_DOWN
 179 #define CALENDAR_PREV_WEEK  BUTTON_UP
 180 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
 181 #define CALENDAR_PREV_DAY   BUTTON_LEFT
 182 #define CALENDAR_NEXT_MONTH BUTTON_VOL_DOWN
 183 #define CALENDAR_PREV_MONTH BUTTON_VOL_UP
 184
 185 #elif (CONFIG_KEYPAD == ONDAVX747_PAD)
 186 #define CALENDAR_QUIT       BUTTON_POWER
 187 #define CALENDAR_SELECT     BUTTON_MENU
 188 #define CALENDAR_NEXT_WEEK  BUTTON_VOL_DOWN
 189 #define CALENDAR_PREV_WEEK  BUTTON_VOL_UP
 190 #define CALENDAR_NEXT_DAY   BUTTON_RIGHT
 191 #define CALENDAR_PREV_DAY   BUTTON_LEFT
 192 #define CALENDAR_NEXT_MONTH BUTTON_BOTTOMRIGHT
 193 #define CALENDAR_PREV_MONTH BUTTON_BOTTOMLEFT
 194
 195 #elif CONFIG_KEYPAD == MROBE500_PAD
 196 #define CALENDAR_QUIT       BUTTON_POWER
 197
 198 #else
 199 #error "No keypad setting."
 200 #endif
 201
 202 #ifdef HAVE_TOUCHSCREEN
 203 #ifndef CALENDAR_QUIT
 204 #define CALENDAR_QUIT       BUTTON_MIDLEFT
 205 #endif
 206 #ifndef CALENDAR_SELECT
 207 #define CALENDAR_SELECT     BUTTON_CENTER
 208 #endif
 209 #ifndef CALENDAR_NEXT_DAY
 210 #define CALENDAR_NEXT_DAY   BUTTON_TOPLEFT
 211 #endif
 212 #ifndef CALENDAR_PREV_DAY
 213 #define CALENDAR_PREV_DAY   BUTTON_BOTTOMLEFT
 214 #endif
 215 #ifndef CALENDAR_NEXT_WEEK
 216 #define CALENDAR_NEXT_WEEK  BUTTON_TOPMIDDLE
 217 #endif
 218 #ifndef CALENDAR_PREV_WEEK
 219 #define CALENDAR_PREV_WEEK  BUTTON_BOTTOMMIDDLE
 220 #endif
 221 #ifndef CALENDAR_NEXT_MONTH
 222 #define CALENDAR_NEXT_MONTH BUTTON_TOPRIGHT
 223 #endif
 224 #ifndef CALENDAR_PREV_MONTH
 225 #define CALENDAR_PREV_MONTH BUTTON_BOTTOMRIGHT
 226 #endif
 227 #endif
 228
 229 #define X_OFFSET ((LCD_WIDTH%7)/2)
 230 #if LCD_HEIGHT <= 80
 231 #define Y_OFFSET 1
 232 #else
 233 #define Y_OFFSET 4
 234 #endif
 235 #define CELL_WIDTH  (LCD_WIDTH / 7)
 236 #define CELL_HEIGHT (LCD_HEIGHT / 7)
 237
 238 static bool leap_year;
 239 /* days_in_month[][0] is for December */
 240 static const int days_in_month[2][13] = {
 241     {31, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31},
 242     {31, 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31},
 243 };
 244
 245 static const char *dayname_long[7] = {"Mon","Tue","Wed","Thu","Fri","Sat","Sun"};
 246 static const char *dayname_short[7] = {"M","T","W","T","F","S","S"};
 247
 248 struct today {
 249     int     mday;        /* day of the month */
 250     int     mon;         /* month */
 251     int     year;        /* year since 1900 */
 252     int     wday;        /* day of the week */
 253 };
 254
 255 struct shown {
 256     int     mday;        /* day of the month */
 257     int     mon;         /* month */
 258     int     year;        /* year since 1900 */
 259     int     wday;        /* day of the week */
 260     int     firstday;    /* first (w)day of month */
 261     int     lastday;     /* last (w)day of month */
 262 };
 263
 264 static bool use_system_font = false;
 265
 266 static bool been_in_usb_mode = false;
 267
 268 /* leap year -- account for gregorian reformation in 1752 */
 269 static int is_leap_year(int yr)
 270 {
 271     return ((yr) <= 1752 ? !((yr) % 4) : \
 272     (!((yr) % 4) && ((yr) % 100)) || !((yr) % 400))  ? 1:0 ;
 273 }
 274
 275 /* searches the weekday of the first day in month,
 276  * relative to the given values */
 277 static int calc_weekday( struct shown *shown )
 278 {
 279     return ( shown->wday + 36 - shown->mday ) % 7 ;
 280
 281 }
 282
 283 static void calendar_init(struct today *today, struct shown *shown)
 284 {
 285     int w,h;
 286 #if CONFIG_RTC
 287     struct tm *tm;
 288 #else
 289     (void)today;
 290 #endif
 291     rb->lcd_getstringsize("A",&w,&h);
 292     if ( ((w * 14) > LCD_WIDTH) || ((h * 7) > LCD_HEIGHT) )
 293     {
 294         rb->lcd_setfont(FONT_SYSFIXED);
 295         use_system_font = true;
 296     }
 297     rb->lcd_clear_display();
 298 #if CONFIG_RTC
 299     tm = rb->get_time();
 300     today->mon = tm->tm_mon +1;
 301     today->year = 2000+tm->tm_year%100;
 302     today->wday = tm->tm_wday-1;
 303     today->mday = tm->tm_mday;
 304     shown->mday = today->mday;
 305     shown->mon = today->mon;
 306     shown->year = today->year;
 307     shown->wday = today->wday;
 308 #endif
 309     shown->firstday = calc_weekday(shown);
 310     leap_year = is_leap_year(shown->year);
 311 }
 312
 313 static void draw_headers(void)
 314 {
 315     int i,w,h;
 316     int x = X_OFFSET;
 317     const char **dayname = (const char**)&dayname_long;
 318
 319     for (i = 0; i < 7; i++)
 320     {
 321         rb->lcd_getstringsize(dayname[i],&w,&h);
 322         if (w > CELL_WIDTH)
 323         {
 324             dayname = (const char**)&dayname_short;
 325             break;
 326         }
 327     }
 328
 329     rb->lcd_getstringsize("A",&w,&h);
 330     for (i = 0; i < 7; i++)
 331     {
 332         rb->lcd_putsxy(x, 0 , dayname[i]);
 333         x += CELL_WIDTH;
 334     }
 335     rb->lcd_hline(0, LCD_WIDTH-1 ,h);
 336 }
 337
 338 static bool day_has_memo[32];
 339 static bool wday_has_memo[7];
 340 static void draw_calendar(struct shown *shown)
 341 {
 342     int w,h;
 343     int x,y,pos,days_per_month,j;
 344     char buffer[9];
 345     const char *monthname[] = {
 346         "Jan", "Feb", "Mar", "Apr", "May", "Jun",
 347         "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"
 348     };
 349     if(use_system_font)
 350         rb->lcd_setfont(FONT_SYSFIXED);
 351     rb->lcd_getstringsize("A",&w,&h);
 352     rb->lcd_clear_display();
 353     draw_headers();
 354     if (shown->firstday > 6)
 355         shown->firstday -= 7;
 356     pos = shown->firstday;
 357     days_per_month = days_in_month[leap_year][shown->mon];
 358     x = X_OFFSET + (pos * CELL_WIDTH);
 359     y = Y_OFFSET + h;
 360     for (j = 1; j <= days_per_month; j++)
 361     {
 362         if ( (day_has_memo[j]) || (wday_has_memo[pos]) )
 363             rb->snprintf(buffer,4,"%02d.", j);
 364         else
 365             rb->snprintf(buffer,4,"%02d", j);
 366         if (shown->mday == j)
 367         {
 368             rb->lcd_set_drawmode(DRMODE_SOLID);
 369             rb->lcd_fillrect(x, y - 1, CELL_WIDTH - 1, CELL_HEIGHT);
 370             rb->lcd_set_drawmode(DRMODE_SOLID|DRMODE_INVERSEVID);
 371             shown->wday = pos;
 372         }
 373         else
 374         {
 375             rb->lcd_set_drawmode(DRMODE_SOLID);
 376         }
 377         rb->lcd_putsxy(x, y, buffer);
 378         x += CELL_WIDTH;
 379         pos++;
 380         if (pos >= 7)
 381         {
 382             pos = 0;
 383             x = X_OFFSET;
 384             y += CELL_HEIGHT;
 385         }
 386     }
 387     rb->lcd_set_drawmode(DRMODE_SOLID);
 388     rb->lcd_vline(LCD_WIDTH-w*8-10,LCD_HEIGHT-h-3,LCD_HEIGHT-1);
 389     rb->lcd_hline(LCD_WIDTH-w*8-10,LCD_WIDTH-1,LCD_HEIGHT-h-3);
 390     rb->snprintf(buffer,9,"%s %04d",monthname[shown->mon-1],shown->year);
 391     rb->lcd_putsxy(LCD_WIDTH-w*8-8,LCD_HEIGHT-h-1,buffer);
 392     shown->lastday = pos;
 393     rb->lcd_update();
 394 }
 395
 396 #define MAX_CHAR_MEMO_LEN 64
 397 #define MAX_MEMOS_IN_A_MONTH 128
 398 struct memo {
 399     char    message[MAX_CHAR_MEMO_LEN];
 400     int     day;
 401     int     month;
 402     int     file_pointer_start;
 403     int     file_pointer_end;
 404     int     year;
 405     int     wday;
 406     int     type;
 407 } memos[MAX_MEMOS_IN_A_MONTH];
 408 static int pointer_array[MAX_MEMOS_IN_A_MONTH];
 409 static int memos_in_memory = 0;
 410 static int memos_in_shown_memory = 0;
 411
 412 static void load_memo(struct shown *shown)
 413 {
 414     int k, fp;
 415     bool exit = false;
 416     char temp_memo1[2];
 417     char temp_memo2[3];
 418     char temp_memo4[5];
 419     temp_memo1[1] = 0;
 420     temp_memo2[2] = 0;
 421     temp_memo4[4] = 0;
 422     for (k = 1; k < 32; k++)
 423         day_has_memo[k] = false;
 424     for (k = 0; k < 7; k++)
 425         wday_has_memo[k] = false;
 426     memos_in_memory = 0;
 427     fp = rb->open(ROCKBOX_DIR "/.memo",O_RDONLY);
 428     if (fp > -1)
 429     {
 430         rb->lseek(fp, 0, SEEK_SET);
 431         while (!exit)
 432         {
 433             bool load_to_memory;
 434             rb->memset(&memos[memos_in_memory].message, 0, MAX_CHAR_MEMO_LEN);
 435             memos[memos_in_memory].file_pointer_start =
 436                                                     rb->lseek(fp, 0, SEEK_CUR);
 437             if (rb->read(fp, temp_memo2, 2) == 2)
 438                 memos[memos_in_memory].day = rb->atoi(&temp_memo2[0]);
 439             else
 440                 memos[memos_in_memory].day = 0;
 441             if (rb->read(fp, temp_memo2, 2) == 2)
 442                 memos[memos_in_memory].month = rb->atoi(&temp_memo2[0]);
 443             else
 444                 memos[memos_in_memory].month = 0;
 445             if (rb->read(fp, temp_memo4, 4) == 4)
 446                 memos[memos_in_memory].year = rb->atoi(&temp_memo4[0]);
 447             else
 448                 memos[memos_in_memory].year = 0;
 449             /* as the year returned is sometimes yearmonth, ie if yr should =
 450                2003, and month = 06, then it returns 200306 */
 451             if (memos[memos_in_memory].year > (shown->year * 10))
 452                 memos[memos_in_memory].year = (memos[memos_in_memory].year -
 453                                                memos[memos_in_memory].month) /
 454                                                100;
 455             if (rb->read(fp, temp_memo1, 1) == 1)
 456                 memos[memos_in_memory].wday = rb->atoi(&temp_memo1[0]);
 457             else
 458                 memos[memos_in_memory].wday = 0;
 459             if (rb->read(fp, temp_memo1, 1) == 1)
 460                 memos[memos_in_memory].type = rb->atoi(&temp_memo1[0]);
 461             else
 462                 memos[memos_in_memory].type = 0;
 463             load_to_memory = ((memos[memos_in_memory].type < 2) ||
 464                               ((memos[memos_in_memory].type == 2) &&
 465                                   (memos[memos_in_memory].month == shown->mon)) ||
 466                               ((memos[memos_in_memory].type > 2) &&
 467                                   (memos[memos_in_memory].month == shown->mon) &&
 468                                   (memos[memos_in_memory].year == shown->year)));
 469             k = 0;
 470             while (1)
 471             {
 472                 if (rb->read(fp, temp_memo1, 1) != 1)
 473                 {
 474                     memos[memos_in_memory].day = 0;
 475                     memos[memos_in_memory].month = 0;
 476                     memos[memos_in_memory].file_pointer_start = 0;
 477                     memos[memos_in_memory].file_pointer_end = 0;
 478                     memos[memos_in_memory].year = 0;
 479                     memos[memos_in_memory].type = 0;
 480                     memos[memos_in_memory].wday = 0;
 481                     memos[memos_in_memory].message[0] = 0;
 482                     exit = true;
 483                     break;
 484                 }
 485                 if (load_to_memory)
 486                 {
 487                     if (temp_memo1[0] == '\n')
 488                     {
 489                         if (memos[memos_in_memory].type > 0)
 490                             day_has_memo[memos[memos_in_memory].day] =
 491                                 true;
 492                         else
 493                             wday_has_memo[memos[memos_in_memory].wday] =
 494                                 true;
 495                         memos[memos_in_memory++].file_pointer_end =
 496                             rb->lseek(fp, 0, SEEK_CUR);
 497                     }
 498                     else if ( (temp_memo1[0] != '\r') &&
 499                               (temp_memo1[0] != '\t') &&
 500                               k < MAX_CHAR_MEMO_LEN-1 )
 501                         memos[memos_in_memory].message[k++] = temp_memo1[0];
 502                 }
 503                 if (temp_memo1[0] == '\n')
 504                     break;
 505             }
 506         }
 507     }
 508     rb->close(fp);
 509 }
 510
 511 static bool save_memo(int changed, bool new_mod, struct shown *shown)
 512 {
 513     int fp,fq;
 514     fp = rb->open(ROCKBOX_DIR "/.memo",O_RDONLY | O_CREAT);
 515     fq = rb->creat(ROCKBOX_DIR "/~temp");
 516     if ( (fq > -1) && (fp > -1) )
 517     {
 518         int i;
 519         char temp[MAX_CHAR_MEMO_LEN];
 520         rb->lseek(fp, 0, SEEK_SET);
 521         for (i = 0; i < memos[changed].file_pointer_start; i++)
 522         {
 523             rb->read(fp, temp, 1);
 524             rb->write(fq,temp,1);
 525         }
 526         if (new_mod)
 527         {
 528             rb->fdprintf(fq, "%02d%02d%04d%01d%01d%s\n",
 529                          memos[changed].day,
 530                          memos[changed].month,
 531                          memos[changed].year,
 532                          memos[changed].wday,
 533                          memos[changed].type,
 534                          memos[changed].message);
 535         }
 536         rb->lseek(fp, memos[changed].file_pointer_end, SEEK_SET);
 537         while(rb->read(fp, temp, 1) == 1)
 538         {
 539             rb->write(fq,temp,1);
 540         }
 541         rb->close(fp);
 542         rb->close(fq);
 543         rb->remove(ROCKBOX_DIR "/.memo");
 544         rb->rename(ROCKBOX_DIR "/~temp", ROCKBOX_DIR "/.memo");
 545         load_memo(shown);
 546         return true;
 547     }
 548     else if (fp > -1)
 549         rb->close(fp);
 550     else if (fq > -1)
 551         rb->close(fq);
 552     return false;
 553 }
 554
 555 static void add_memo(struct shown *shown, int type)
 556 {
 557     bool saved = false;
 558     if (rb->kbd_input(memos[memos_in_memory].message,
 559                       sizeof memos[memos_in_memory].message) != -1)
 560     {
 561         if (rb->strlen(memos[memos_in_memory].message))
 562         {
 563             memos[memos_in_memory].file_pointer_start = 0;
 564             memos[memos_in_memory].file_pointer_end = 0;
 565             memos[memos_in_memory].day = shown->mday;
 566             memos[memos_in_memory].month = shown->mon;
 567             memos[memos_in_memory].wday = shown->wday;
 568             memos[memos_in_memory].year = shown->year;
 569             memos[memos_in_memory].type = type;
 570             if (save_memo(memos_in_memory,true,shown))
 571             {
 572                 saved = true;
 573             }
 574             else
 575             {
 576                 memos[memos_in_memory].file_pointer_start = 0;
 577                 memos[memos_in_memory].file_pointer_end = 0;
 578                 memos[memos_in_memory].day = 0;
 579                 memos[memos_in_memory].month = 0;
 580                 memos[memos_in_memory].year = 0;
 581                 memos[memos_in_memory].type = 0;
 582                 memos[memos_in_memory].wday = 0;
 583             }
 584         }
 585     }
 586     rb->lcd_clear_display();
 587     if(use_system_font)
 588         rb->lcd_setfont(FONT_SYSFIXED);
 589     if (saved)
 590         rb->splash(HZ/2,"Event added");
 591     else
 592         rb->splash(HZ/2,"Event not added");
 593 }
 594
 595 static int edit_menu_cb(int action, const struct menu_item_ex *this_item)
 596 {
 597     int i = (intptr_t)this_item;
 598     if (action == ACTION_REQUEST_MENUITEM
 599         && memos_in_shown_memory <= 0 && (i==0 || i==1))
 600         return ACTION_EXIT_MENUITEM;
 601     return action;
 602 }
 603
 604 static bool edit_memo(int change, struct shown *shown)
 605 {
 606     bool exit = false;
 607     int selected = 0;
 608
 609     MENUITEM_STRINGLIST(edit_menu, "Edit menu", edit_menu_cb,
 610                         "Remove", "Edit",
 611                         "New Weekly", "New Monthly",
 612                         "New Yearly", "New One off");
 613
 614     while (!exit)
 615     {
 616         switch (rb->do_menu(&edit_menu, &selected, NULL, false))
 617         {
 618             case 0: /* remove */
 619                 save_memo(pointer_array[change],false,shown);
 620                 return false;
 621
 622             case 1: /* edit */
 623                 if(rb->kbd_input(memos[pointer_array[change]].message,
 624                            sizeof memos[pointer_array[change]].message) != -1)
 625                     save_memo(pointer_array[change],true,shown);
 626                 return false;
 627
 628             case 2: /* weekly */
 629                 add_memo(shown,0);
 630                 return false;
 631
 632             case 3: /* monthly */
 633                 add_memo(shown,1);
 634                 return false;
 635
 636             case 4: /* yearly */
 637                 add_memo(shown,2);
 638                 return false;
 639
 640             case 5: /* one off */
 641                 add_memo(shown,3);
 642                 return false;
 643
 644             case GO_TO_PREVIOUS:
 645                 return false;
 646
 647             case MENU_ATTACHED_USB:
 648                 been_in_usb_mode = true;
 649                 break;
 650         }
 651     }
 652     return false;
 653 }
 654
 655 static char * get_event_text(int selected, void *data,
 656                                   char *buffer, size_t buffer_len)
 657 {
 658     struct shown *shown = (struct shown *) data;
 659     if (selected < 0 || memos_in_shown_memory <= selected)
 660     {
 661         return NULL;
 662     }
 663     if (memos[pointer_array[selected]].type == 2)
 664         rb->snprintf(buffer, buffer_len, "%s (%d yrs)",
 665                      memos[pointer_array[selected]].message,
 666                      shown->year - memos[pointer_array[selected]].year);
 667     else
 668         rb->snprintf(buffer, buffer_len, "%s",
 669                      memos[pointer_array[selected]].message);
 670     return buffer;
 671 }
 672
 673 static bool view_events(int selected, struct shown *shown)
 674 {
 675     struct gui_synclist gui_memos;
 676     bool exit=false;
 677     int button;
 678
 679     rb->gui_synclist_init(&gui_memos, &get_event_text, shown, false, 1, NULL);
 680     rb->gui_synclist_set_title(&gui_memos, "Events (play : menu)", NOICON);
 681     rb->gui_synclist_set_nb_items(&gui_memos, memos_in_shown_memory);
 682     rb->gui_synclist_select_item(&gui_memos, selected);
 683     rb->gui_synclist_draw(&gui_memos);
 684
 685     while (!exit)
 686     {
 687         button = rb->get_action(CONTEXT_LIST,TIMEOUT_BLOCK);
 688         rb->gui_synclist_do_button(&gui_memos,&button,LIST_WRAP_UNLESS_HELD);
 689
 690         switch (button)
 691         {
 692             case ACTION_STD_OK:
 693                 selected = rb->gui_synclist_get_sel_pos(&gui_memos);
 694                 return edit_memo(selected, shown);
 695                 break;
 696
 697             case ACTION_STD_CANCEL:
 698                 return false;
 699                 break;
 700
 701             default:
 702                 if(rb->default_event_handler(button) == SYS_USB_CONNECTED)
 703                     been_in_usb_mode = true;
 704                 break;
 705         }
 706     }
 707
 708     return false;
 709 }
 710
 711 static void update_memos_shown(struct shown *shown)
 712 {
 713     int i;
 714     memos_in_shown_memory = 0;
 715     for (i = 0; i < memos_in_memory; i++)
 716         if (((memos[i].type >= 1) &&
 717                 (memos[i].day == shown->mday)) ||
 718             ((memos[i].type < 1) &&
 719                 (memos[i].wday == shown->wday)))
 720             pointer_array[memos_in_shown_memory++] = i;
 721 }
 722
 723 static bool any_events(struct shown *shown, bool force)
 724 {
 725     update_memos_shown(shown);
 726
 727     if (memos_in_shown_memory > 0)
 728         return view_events(0, shown);
 729     else if (force)
 730         return edit_memo(0, shown);
 731     else
 732         return false;
 733
 734     return false;
 735 }
 736
 737 static void next_month(struct shown *shown, int step)
 738 {
 739     shown->mon++;
 740     if (shown->mon > 12)
 741     {
 742         shown->mon=1;
 743         shown->year++;
 744         leap_year = is_leap_year(shown->year);
 745     }
 746     if (step > 0)
 747         shown->mday = shown->mday - days_in_month[leap_year][shown->mon-1];
 748     else if (shown->mday > days_in_month[leap_year][shown->mon])
 749         shown->mday = days_in_month[leap_year][shown->mon];
 750     shown->firstday = shown->lastday;
 751     load_memo(shown);
 752     draw_calendar(shown);
 753 }
 754
 755 static void prev_month(struct shown *shown, int step)
 756 {
 757     shown->mon--;
 758     if (shown->mon < 1)
 759     {
 760         shown->mon = 12;
 761         shown->year--;
 762         leap_year = is_leap_year(shown->year);
 763     }
 764     if (step > 0)
 765         shown->mday = shown->mday + days_in_month[leap_year][shown->mon];
 766     else if (shown->mday > days_in_month[leap_year][shown->mon])
 767         shown->mday = days_in_month[leap_year][shown->mon];
 768     shown->firstday += 7 - (days_in_month[leap_year][shown->mon] % 7);
 769     load_memo(shown);
 770     draw_calendar(shown);
 771 }
 772
 773 static void next_day(struct shown *shown, int step)
 774 {
 775     shown->mday += step;
 776     if (shown->mday > days_in_month[leap_year][shown->mon])
 777         next_month(shown, step);
 778     else
 779         draw_calendar(shown);
 780 }
 781
 782 static void prev_day(struct shown *shown, int step)
 783 {
 784     shown->mday -= step;
 785     if (shown->mday < 1)
 786         prev_month(shown, step);
 787     else
 788         draw_calendar(shown);
 789 }
 790
 791 enum plugin_status plugin_start(const void* parameter)
 792 {
 793     struct today today;
 794     struct shown shown;
 795     bool exit = false;
 796     int button;
 797
 798     (void)(parameter);
 799
 800     calendar_init(&today, &shown);
 801     load_memo(&shown);
 802     any_events(&shown, false);
 803     draw_calendar(&shown);
 804     while (!exit)
 805     {
 806         button = rb->button_get(true);
 807         switch (button)
 808         {
 809             case CALENDAR_QUIT:
 810                 return PLUGIN_OK;
 811
 812             case CALENDAR_NEXT_MONTH:
 813             case CALENDAR_NEXT_MONTH | BUTTON_REPEAT:
 814                 next_month(&shown, 0);
 815                 break;
 816
 817             case CALENDAR_PREV_MONTH:
 818             case CALENDAR_PREV_MONTH | BUTTON_REPEAT:
 819                 prev_month(&shown, 0);
 820                 break;
 821
 822             case CALENDAR_NEXT_WEEK:
 823             case CALENDAR_NEXT_WEEK | BUTTON_REPEAT:
 824                 next_day(&shown, 7);
 825                 break;
 826
 827             case CALENDAR_PREV_WEEK:
 828             case CALENDAR_PREV_WEEK | BUTTON_REPEAT:
 829                 prev_day(&shown, 7);
 830                 break;
 831
 832             case CALENDAR_PREV_DAY:
 833             case CALENDAR_PREV_DAY | BUTTON_REPEAT:
 834                 prev_day(&shown, 1);
 835                 break;
 836
 837             case CALENDAR_NEXT_DAY:
 838             case CALENDAR_NEXT_DAY | BUTTON_REPEAT:
 839                 next_day(&shown, 1);
 840                 break;
 841
 842             case CALENDAR_SELECT:
 843                 any_events(&shown, true);
 844                 draw_calendar(&shown);
 845                 break;
 846
 847             default:
 848                 if(rb->default_event_handler(button) == SYS_USB_CONNECTED)
 849                     been_in_usb_mode = true;
 850                 draw_calendar(&shown);
 851                 break;
 852         }
 853     }
 854     return been_in_usb_mode?PLUGIN_USB_CONNECTED:PLUGIN_OK;
 855 }
 856
 857 #endif