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