?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
start of the tsc2100 driver.
[Rockbox.git] / apps / plugins / calendar.c
blob8ed6122c3f368992b5421c2414df070d47eb31cc
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 * All files in this archive are subject to the GNU General Public License.
14 * See the file COPYING in the source tree root for full license agreement.
15 *
16 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
17 * KIND, either express or implied.
18 *
19 ****************************************************************************/
20 #include "plugin.h"
21
22 #if defined(HAVE_LCD_BITMAP) && (CONFIG_RTC != 0)
23
24 #include <timefuncs.h>
25
26 PLUGIN_HEADER
27
28 static struct plugin_api* rb;
29
30 static bool leap_year;
31 static int days_in_month[2][13] = {
32 {0, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31},
33 {0, 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31},
34 };
35
36 struct today {
37 int mday; /* day of the month */
38 int mon; /* month */
39 int year; /* year since 1900 */
40 int wday; /* day of the week */
41 };
42
43 struct shown {
44 int mday; /* day of the month */
45 int mon; /* month */
46 int year; /* year since 1900 */
47 int wday; /* day of the week */
48 int firstday; /* first (w)day of month */
49 int lastday; /* last (w)day of month */
50 };
51
52 static bool use_system_font = false;
53
54 static bool been_in_usb_mode = false;
55
56 /* leap year -- account for gregorian reformation in 1752 */
57 static int is_leap_year(int yr)
58 {
59 return ((yr) <= 1752 ? !((yr) % 4) : \
60 (!((yr) % 4) && ((yr) % 100)) || !((yr) % 400)) ? 1:0 ;
61 }
62
63 /* searches the weekday of the first day in month,
64 * relative to the given values */
65 static int calc_weekday( struct shown *shown )
66 {
67 return ( shown->wday + 36 - shown->mday ) % 7 ;
68
69 }
70
71 static void calendar_init(struct today *today, struct shown *shown)
72 {
73 int w,h;
74 #if CONFIG_RTC
75 struct tm *tm;
76 #else
77 (void)today;
78 #endif
79 rb->lcd_getstringsize("A",&w,&h);
80 if ( ((w * 14) > LCD_WIDTH) || ((h * 7) > LCD_HEIGHT) )
81 {
82 rb->lcd_setfont(FONT_SYSFIXED);
83 use_system_font = true;
84 }
85 rb->lcd_clear_display();
86 #if CONFIG_RTC
87 tm = rb->get_time();
88 today->mon = tm->tm_mon +1;
89 today->year = 2000+tm->tm_year%100;
90 today->wday = tm->tm_wday-1;
91 today->mday = tm->tm_mday;
92 #ifdef SIMULATOR
93 today->wday = 3;
94 today->mday = 13;
95 #endif
96 shown->mday = today->mday;
97 shown->mon = today->mon;
98 shown->year = today->year;
99 shown->wday = today->wday;
100 #endif
101 shown->firstday = calc_weekday(shown);
102 leap_year = is_leap_year(shown->year);
103 }
104
105 static int space = LCD_WIDTH / 7;
106 static void draw_headers(void)
107 {
108 int i,w,h;
109 char *Dayname[7] = {"M","T","W","T","F","S","S"};
110 int ws = 2;
111 rb->lcd_getstringsize("A",&w,&h);
112 for (i = 0; i < 8;)
113 {
114 rb->lcd_putsxy(ws, 0 , Dayname[i++]);
115 ws += space;
116 }
117 rb->lcd_drawline(0 ,h ,LCD_WIDTH-1 ,h);
118 }
119
120 static bool day_has_memo[31];
121 static bool wday_has_memo[6];
122 static void draw_calendar(struct shown *shown)
123 {
124 int w,h;
125 int ws,row,pos,days_per_month,j;
126 char buffer[9];
127 char *Monthname[] = {
128 "Jan",
129 "Feb",
130 "Mar",
131 "Apr",
132 "May",
133 "Jun",
134 "Jul",
135 "Aug",
136 "Sep",
137 "Oct",
138 "Nov",
139 "Dec"
140 };
141 rb->lcd_getstringsize("A",&w,&h);
142 rb->lcd_clear_display();
143 draw_headers();
144 if (shown->firstday > 6)
145 shown->firstday -= 7;
146 row = 1;
147 pos = shown->firstday;
148 days_per_month = days_in_month[leap_year][shown->mon];
149 ws = 2 + (pos * space);
150 for (j = 0; j < days_per_month;)
151 {
152 if ( (day_has_memo[++j]) || (wday_has_memo[pos]) )
153 rb->snprintf(buffer,4,"%02d.", j);
154 else
155 rb->snprintf(buffer,4,"%02d", j);
156 rb->lcd_putsxy(ws, (row * h) + 5 ,buffer);
157 if (shown->mday == j)
158 {
159 rb->lcd_set_drawmode(DRMODE_COMPLEMENT);
160 rb->lcd_fillrect(ws, row*h+5, space, h);
161 rb->lcd_set_drawmode(DRMODE_SOLID);
162 shown->wday = pos;
163 }
164 ws += space;
165 pos++;
166 if (pos >= 7)
167 {
168 row++;
169 pos = 0;
170 ws = 2;
171 }
172 }
173 rb->lcd_drawline(60,LCD_HEIGHT-h-3,60,LCD_HEIGHT-1);
174 rb->lcd_drawline(60,LCD_HEIGHT-h-3,LCD_WIDTH-1,LCD_HEIGHT-h-3);
175 rb->snprintf(buffer,9,"%s %04d",Monthname[shown->mon-1],shown->year);
176 rb->lcd_putsxy(62,(LCD_HEIGHT-h-1),buffer);
177 shown->lastday = pos;
178 rb->lcd_update();
179 }
180
181 #define MAX_CHAR_MEMO_LEN 63
182 #define MAX_MEMOS_IN_A_MONTH 127
183 struct memo {
184 char message[MAX_CHAR_MEMO_LEN];
185 int day;
186 int month;
187 int file_pointer_start;
188 int file_pointer_end;
189 int year;
190 int wday;
191 int type;
192 } memos[MAX_MEMOS_IN_A_MONTH];
193 static int pointer_array[MAX_MEMOS_IN_A_MONTH];
194 static int memos_in_memory = 0;
195 static int memos_in_shown_memory = 0;
196
197 static void load_memo(struct shown *shown)
198 {
199 int i, k, fp;
200 bool exit = false;
201 char temp_memo1[2];
202 char temp_memo2[3];
203 char temp_memo4[5];
204 for (k = 0; k < memos_in_memory; k++)
205 {
206 memos[k].day = 0;
207 memos[k].month = 0;
208 memos[k].file_pointer_start = 0;
209 memos[k].file_pointer_end = 0;
210 memos[k].year = 0;
211 memos[k].type = 0;
212 memos[k].wday = 0;
213 for (i = 0; i <= MAX_CHAR_MEMO_LEN; i++)
214 rb->strcpy(&memos[k].message[i],"");
215 }
216 for (k = 1; k < 32; k++)
217 day_has_memo[k] = false;
218 for (k = 0; k < 7; k++)
219 wday_has_memo[k] = false;
220 memos_in_memory = 0;
221 fp = rb->open(ROCKBOX_DIR "/.memo",O_RDONLY);
222 if (fp > -1)
223 {
224 int count = rb->filesize(fp);
225 rb->lseek(fp, 0, SEEK_SET);
226 while (!exit)
227 {
228 memos[memos_in_memory].file_pointer_start = rb->lseek(fp, 0,
229 SEEK_CUR);
230 if (rb->read(fp, temp_memo2, 2) == 2)
231 memos[memos_in_memory].day = rb->atoi(&temp_memo2[0]);
232 else
233 memos[memos_in_memory].day = 0;
234 if (rb->read(fp, temp_memo2, 2) == 2)
235 memos[memos_in_memory].month = rb->atoi(&temp_memo2[0]);
236 else
237 memos[memos_in_memory].month = 0;
238 if (rb->read(fp, temp_memo4, 4) == 4)
239 memos[memos_in_memory].year = rb->atoi(&temp_memo4[0]);
240 else
241 memos[memos_in_memory].year = 0;
242 /* as the year returned is sometimes yearmonth, ie if yr should =
243 2003, and month = 06, then it returns 200306 */
244 if (memos[memos_in_memory].year > (shown->year * 10))
245 memos[memos_in_memory].year = (memos[memos_in_memory].year -
246 memos[memos_in_memory].month) /
247 100;
248 if (rb->read(fp, temp_memo1, 1) == 1)
249 memos[memos_in_memory].wday = rb->atoi(&temp_memo1[0]);
250 else
251 memos[memos_in_memory].wday = 0;
252 if (rb->read(fp, temp_memo1, 1) == 1)
253 memos[memos_in_memory].type = rb->atoi(&temp_memo1[0]);
254 else
255 memos[memos_in_memory].type = 0;
256 for (k = 0; k <= count; k++)
257 {
258 if (rb->read(fp, temp_memo1, 1) == 1)
259 {
260 if (
261 (memos[memos_in_memory].type < 2)
262 ||
263 (
264 (memos[memos_in_memory].type == 2)
265 &&
266 (memos[memos_in_memory].month == shown->mon)
267 )
268 ||
269 (
270 (memos[memos_in_memory].type > 2)
271 &&
272 (memos[memos_in_memory].month == shown->mon)
273 &&
274 (memos[memos_in_memory].year == shown->year)
275 )
276 )
277 {
278 if (temp_memo1[0] == '\n')
279 {
280 if (memos[memos_in_memory].type > 0)
281 day_has_memo[memos[memos_in_memory].day] =
282 true;
283 else
284 wday_has_memo[memos[memos_in_memory].wday] =
285 true;
286 memos[memos_in_memory++].file_pointer_end =
287 rb->lseek(fp, 0, SEEK_CUR);
288 }
289 else if ( (temp_memo1[0] != '\r') &&
290 (temp_memo1[0] != '\t') )
291 memos[memos_in_memory].message[k] = temp_memo1[0];
292 }
293 if (temp_memo1[0] == '\n')
294 break;
295 }
296 else
297 {
298 memos[memos_in_memory].day = 0;
299 memos[memos_in_memory].month = 0;
300 memos[memos_in_memory].file_pointer_start = 0;
301 memos[memos_in_memory].file_pointer_end = 0;
302 memos[memos_in_memory].year = 0;
303 memos[memos_in_memory].type = 0;
304 memos[memos_in_memory].wday = 0;
305 rb->strcpy(&memos[memos_in_memory].message[0], "");
306 exit = true;
307 break;
308 }
309 }
310 }
311 }
312 rb->close(fp);
313 }
314
315 static bool save_memo(int changed, bool new_mod, struct shown *shown)
316 {
317 int fp,fq;
318 fp = rb->open(ROCKBOX_DIR "/.memo",O_RDONLY | O_CREAT);
319 fq = rb->creat(ROCKBOX_DIR "/~temp");
320 if ( (fq != -1) && (fp != -1) )
321 {
322 int i;
323 char temp[MAX_CHAR_MEMO_LEN + 1];
324 rb->lseek(fp, 0, SEEK_SET);
325 for (i = 0; i < memos[changed].file_pointer_start; i++)
326 {
327 rb->read(fp, temp, 1);
328 rb->write(fq,temp,1);
329 }
330 if (new_mod)
331 {
332 rb->fdprintf(fq, "%02d%02d%04d%01d%01d%s\n",
333 memos[changed].day,
334 memos[changed].month,
335 memos[changed].year,
336 memos[changed].wday,
337 memos[changed].type,
338 memos[changed].message);
339 }
340 rb->lseek(fp, memos[changed].file_pointer_end, SEEK_SET);
341 for (i = memos[changed].file_pointer_end;
342 i < rb->filesize(fp); i++)
343 {
344 rb->read(fp, temp, 1);
345 rb->write(fq,temp,1);
346 }
347 rb->close(fp);
348 fp = rb->creat(ROCKBOX_DIR "/.memo");
349 rb->lseek(fp, 0, SEEK_SET);
350 rb->lseek(fq, 0, SEEK_SET);
351 for (i = 0; i < rb->filesize(fq); i++)
352 {
353 rb->read(fq, temp, 1);
354 rb->write(fp,temp,1);
355 }
356 rb->close(fp);
357 rb->close(fq);
358 rb->remove(ROCKBOX_DIR "/~temp");
359 load_memo(shown);
360 return true;
361 }
362 else if (fp != -1)
363 rb->close(fp);
364 else if (fq != -1)
365 rb->close(fq);
366 return false;
367 }
368
369 static void add_memo(struct shown *shown, int type)
370 {
371 bool saved = false;
372 if (rb->kbd_input(memos[memos_in_memory].message,
373 sizeof memos[memos_in_memory].message) != -1)
374 {
375 if (rb->strlen(memos[memos_in_memory].message))
376 {
377 memos[memos_in_memory].file_pointer_start = 0;
378 memos[memos_in_memory].file_pointer_end = 0;
379 memos[memos_in_memory].day = shown->mday;
380 memos[memos_in_memory].month = shown->mon;
381 memos[memos_in_memory].wday = shown->wday;
382 memos[memos_in_memory].year = shown->year;
383 memos[memos_in_memory].type = type;
384 if (save_memo(memos_in_memory,true,shown))
385 {
386 saved = true;
387 memos_in_memory++;
388 }
389 else
390 {
391 memos[memos_in_memory].file_pointer_start = 0;
392 memos[memos_in_memory].file_pointer_end = 0;
393 memos[memos_in_memory].day = 0;
394 memos[memos_in_memory].month = 0;
395 memos[memos_in_memory].year = 0;
396 memos[memos_in_memory].type = 0;
397 memos[memos_in_memory].wday = 0;
398 }
399 }
400 }
401 rb->lcd_clear_display();
402 if(use_system_font)
403 rb->lcd_setfont(FONT_SYSFIXED);
404 if (saved)
405 rb->lcd_puts(0,0,"Event added");
406 else
407 rb->lcd_puts(0,0,"Event not added");
408 rb->lcd_update();
409 rb->sleep(HZ/2);
410 }
411
412 static bool edit_memo(int change, struct shown *shown)
413 {
414 bool exit = false;
415 int button;
416
417 while (!exit)
418 {
419 rb->lcd_clear_display();
420 if (memos_in_shown_memory > 0)
421 {
422 rb->lcd_puts(0,0,"Remove : Up");
423 rb->lcd_puts(0,1,"Edit : Down");
424 rb->lcd_puts(0,2,"New :");
425 rb->lcd_puts(2,3,"weekly : Left");
426 rb->lcd_puts(2,4,"monthly : Play");
427 rb->lcd_puts(2,5,"annually : Right");
428 rb->lcd_puts(2,6,"one off : On");
429 }
430 else
431 {
432 rb->lcd_puts(0,0,"New :");
433 rb->lcd_puts(2,1,"weekly : Left");
434 rb->lcd_puts(2,2,"monthly : Play");
435 rb->lcd_puts(2,3,"anualy : Right");
436 rb->lcd_puts(2,4,"one off : On");
437 }
438 rb->lcd_update();
439 button = rb->button_get(true);
440 switch (button)
441 {
442 case BUTTON_OFF:
443 return false;
444
445 case BUTTON_LEFT:
446 add_memo(shown,0);
447 return false;
448
449 case BUTTON_PLAY:
450 add_memo(shown,1);
451 return false;
452
453 case BUTTON_RIGHT:
454 add_memo(shown,2);
455 return false;
456
457 case BUTTON_ON:
458 add_memo(shown,3);
459 return false;
460
461 case BUTTON_DOWN:
462 if (memos_in_shown_memory > 0)
463 {
464 if(rb->kbd_input(memos[pointer_array[change]].message,
465 sizeof memos[pointer_array[change]].message) != -1)
466 save_memo(pointer_array[change],true,shown);
467 if(use_system_font)
468 rb->lcd_setfont(FONT_SYSFIXED);
469 exit = true;
470 }
471 break;
472
473 case BUTTON_UP:
474 if (memos_in_shown_memory > 0)
475 {
476 save_memo(pointer_array[change],false,shown);
477 exit = true;
478 }
479 break;
480
481 default:
482 if(rb->default_event_handler(button) == SYS_USB_CONNECTED)
483 been_in_usb_mode = true;
484 break;
485 }
486 }
487 return false;
488 }
489
490 static int start = 0;
491
492 static void show_lines(int selected, struct shown *shown)
493 {
494 int lines,j = 1,w,h,i,k = 0, pos = 1,m = 0;
495 char temp[MAX_CHAR_MEMO_LEN + 12];
496 rb->lcd_getstringsize("A",&w,&h);
497 lines = (LCD_HEIGHT / h) - 1;
498
499 rb->lcd_clear_display();
500 rb->lcd_puts(0,0,"Events (play : menu)");
501
502 while (selected >= (lines + start))
503 start++;
504 while (selected < start)
505 start--;
506 i = start;
507 while ( (i < memos_in_shown_memory) && (k < lines) )
508 {
509 if (memos[pointer_array[i]].type == 2)
510 rb->snprintf(temp, sizeof temp, "%s (%d yrs)",
511 memos[pointer_array[i]].message,
512 shown->year - memos[pointer_array[i]].year);
513 else
514 rb->snprintf(temp, sizeof temp, "%s",
515 memos[pointer_array[i]].message);
516 m = 0;
517 if (i == selected)
518 {
519 pos = k + 1;
520 rb->lcd_puts_scroll(m,j++,temp);
521 }
522 else
523 rb->lcd_puts(m,j++,temp);
524 k++;
525 i++;
526 }
527 rb->lcd_set_drawmode(DRMODE_COMPLEMENT);
528 rb->lcd_fillrect(0, (pos) * h, LCD_WIDTH, h);
529 rb->lcd_set_drawmode(DRMODE_SOLID);
530 }
531
532 static void update_memos_shown(struct shown *shown)
533 {
534 int i;
535 memos_in_shown_memory = 0;
536 start = 0;
537 for (i = 0; i < memos_in_memory; i++)
538 if (
539 (memos[i].day == shown->mday)
540 ||
541 (
542 (memos[i].type < 1)
543 &&
544 (memos[i].wday == shown->wday)
545 )
546 )
547 pointer_array[memos_in_shown_memory++] = i;
548 }
549
550 static bool any_events(struct shown *shown, bool force)
551 {
552 int lines_displayed = 0;
553 bool exit=false;
554 int button;
555
556 update_memos_shown(shown);
557 if (memos_in_shown_memory > 0)
558 show_lines(lines_displayed,shown);
559 else if (force)
560 return edit_memo(lines_displayed, shown);
561 else
562 return false;
563 rb->lcd_update();
564 while (!exit)
565 {
566 button = rb->button_get(true);
567 switch (button)
568 {
569 case BUTTON_DOWN:
570 if (memos_in_shown_memory > 0)
571 {
572 lines_displayed++;
573 if (lines_displayed >= memos_in_shown_memory)
574 lines_displayed = memos_in_shown_memory - 1;
575 show_lines(lines_displayed,shown);
576 rb->lcd_update();
577 }
578 break;
579
580 case BUTTON_UP:
581 if (memos_in_shown_memory > 0)
582 {
583 lines_displayed--;
584 if (lines_displayed < 0)
585 lines_displayed = 0;
586 show_lines(lines_displayed,shown);
587 rb->lcd_update();
588 }
589 break;
590
591 case BUTTON_PLAY:
592 return edit_memo(lines_displayed, shown);
593
594 case BUTTON_OFF:
595 return false;
596
597 default:
598 if(rb->default_event_handler(button) == SYS_USB_CONNECTED)
599 been_in_usb_mode = true;
600 show_lines(lines_displayed,shown);
601 rb->lcd_update();
602 break;
603 }
604 }
605 return false;
606 }
607
608 static void next_month(struct shown *shown, int step)
609 {
610 shown->mon++;
611 if (shown->mon > 12)
612 {
613 shown->mon=1;
614 shown->year++;
615 leap_year = is_leap_year(shown->year);
616 }
617 else if (step > 0)
618 shown->mday = shown->mday - days_in_month[leap_year][shown->mon-1];
619 else if (shown->mday > days_in_month[leap_year][shown->mon])
620 shown->mday = days_in_month[leap_year][shown->mon];
621 shown->firstday = shown->lastday;
622 load_memo(shown);
623 draw_calendar(shown);
624 }
625
626 static void prev_month(struct shown *shown, int step)
627 {
628 shown->mon--;
629 if (shown->mon < 1)
630 {
631 shown->mon = 12;
632 shown->year--;
633 leap_year = is_leap_year(shown->year);
634 }
635 if (step > 0)
636 shown->mday = shown->mday + days_in_month[leap_year][shown->mon];
637 else if (shown->mday > days_in_month[leap_year][shown->mon])
638 shown->mday = days_in_month[leap_year][shown->mon];
639 shown->firstday += 7 - (days_in_month[leap_year][shown->mon] % 7);
640 load_memo(shown);
641 draw_calendar(shown);
642 }
643
644 static void next_day(struct shown *shown, int step)
645 {
646 shown->mday += step;
647 if (shown->mday > days_in_month[leap_year][shown->mon])
648 next_month(shown, step);
649 else
650 draw_calendar(shown);
651 }
652
653 static void prev_day(struct shown *shown, int step)
654 {
655 shown->mday -= step;
656 if (shown->mday < 1)
657 prev_month(shown, step);
658 else
659 draw_calendar(shown);
660 }
661
662 enum plugin_status plugin_start(struct plugin_api* api, void* parameter)
663 {
664 struct today today;
665 struct shown shown;
666 bool exit = false;
667 int button;
668
669 (void)(parameter);
670
671 rb = api;
672
673 calendar_init(&today, &shown);
674 load_memo(&shown);
675 any_events(&shown, false);
676 draw_calendar(&shown);
677 while (!exit)
678 {
679 button = rb->button_get(true);
680 switch (button)
681 {
682 case BUTTON_OFF:
683 return false;
684
685 case BUTTON_ON | BUTTON_DOWN:
686 case BUTTON_ON | BUTTON_DOWN | BUTTON_REPEAT:
687 next_month(&shown, 0);
688 break;
689
690 case BUTTON_ON | BUTTON_UP:
691 case BUTTON_ON | BUTTON_UP | BUTTON_REPEAT:
692 prev_month(&shown, 0);
693 break;
694
695 case BUTTON_DOWN:
696 case BUTTON_DOWN | BUTTON_REPEAT:
697 next_day(&shown, 7);
698 break;
699
700 case BUTTON_UP:
701 case BUTTON_UP | BUTTON_REPEAT:
702 prev_day(&shown, 7);
703 break;
704
705 case BUTTON_LEFT:
706 case BUTTON_LEFT | BUTTON_REPEAT:
707 prev_day(&shown, 1);
708 break;
709
710 case BUTTON_RIGHT:
711 case BUTTON_RIGHT | BUTTON_REPEAT:
712 next_day(&shown, 1);
713 break;
714
715 case BUTTON_PLAY:
716 any_events(&shown, true);
717 draw_calendar(&shown);
718 break;
719
720 default:
721 if(rb->default_event_handler(button) == SYS_USB_CONNECTED)
722 been_in_usb_mode = true;
723 draw_calendar(&shown);
724 break;
725 }
726 }
727 return been_in_usb_mode?PLUGIN_USB_CONNECTED:PLUGIN_OK;
728 }
729
730 #endif
Open Source Jukebox Firmware