Pileus Git - lackey/blob - view/week.c

   1 /*
   2  * Copyright (C) 2012 Andy Spencer <andy753421@gmail.com>
   3  *
   4  * This program is free software: you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation, either version 3 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  16  */
  17
  18 #define _XOPEN_SOURCE_EXTENDED
  19
  20 #include <string.h>
  21 #include <ncurses.h>
  22
  23 #include "util.h"
  24 #include "date.h"
  25 #include "event.h"
  26 #include "screen.h"
  27
  28 /* Static data */
  29 static int     line;
  30 static WINDOW *win;
  31 static WINDOW *head;
  32 static WINDOW *times;
  33 static WINDOW *body;
  34
  35 /* Local functions */
  36 static void print_event(event_t *event, wday_t day, hour_t hour, min_t min, float hstep)
  37 {
  38         int x = ROUND(day*hstep);
  39         int y = hour*4 + min/15 - line;
  40         int w = ROUND((day+1)*hstep) - 1 - x;
  41         int h = (get_mins(&event->start, &event->end)-1)/15+1;
  42         int l = 0;
  43         int s = y < 0 ? -y-1 : 0;
  44
  45         int color = event->cat == NULL           ? 0           :
  46                     !strcmp(event->cat, "class") ? COLOR_CLASS :
  47                     !strcmp(event->cat, "ec")    ? COLOR_EC    :
  48                     !strcmp(event->cat, "work")  ? COLOR_WORK  : COLOR_OTHER ;
  49
  50         if (color) wattron(body, COLOR_PAIR(color));
  51
  52         if (h <= 1) mvwadd_wch(body,   y,     x, WACS_BULLET);
  53         if (h >= 2) mvwadd_wch(body,   y,     x, WACS_T_ULCORNER);
  54         if (h >= 3) mvwvline_set(body, y+1+s, x, WACS_T_VLINE, h-2-s);
  55         if (h >= 2) mvwadd_wch(body,   y+h-1, x, WACS_T_LLCORNER);
  56
  57         if (color) wattroff(body, COLOR_PAIR(color));
  58
  59         if (l<h && event->name) mvwprintw(body, y+l++, x+1, "%-*.*s",   w-1, w-1, event->name);
  60         if (l<h && event->loc)  mvwprintw(body, y+l++, x+1, "@ %-*.*s", w-3, w-3, event->loc);
  61         if (l<h && event->desc) mvwprintw(body, y+l++, x+1, "%-*.*s",   w-1, w-1, event->desc);
  62
  63         debug("week: event = %s\n", event->name);
  64 }
  65
  66 /* Week init */
  67 void week_init(WINDOW *_win)
  68 {
  69         win   = _win; //  lines  cols  y  x
  70         head  = derwin(win,         2, COLS,   0, 0);
  71         times = derwin(win, LINES-2-3,      5, 3, 0);
  72         body  = derwin(win, LINES-2-3, COLS-6, 3, 6);
  73         line  = 10*4; // 10:00
  74 }
  75
  76 /* Week size */
  77 void week_size(int rows, int cols)
  78 {
  79         wresize(head,       2, cols  );
  80         wresize(times, rows-3,      5);
  81         wresize(body,  rows-3, cols-6);
  82 }
  83
  84 /* Week draw */
  85 void week_draw(void)
  86 {
  87         int x = 6;
  88         int y = 3;
  89         const float hstep = (float)(COLS-x)/7.0;
  90
  91         /* Clear */
  92         werase(win);
  93
  94         /* Get start of week */
  95         year_t  year  = YEAR;
  96         month_t month = MONTH;
  97         day_t   day   = DAY;
  98         int shift = day_of_week(year, month, day);
  99         add_days(&year, &month, &day, -shift);
 100
 101         /* Print Header */
 102         mvwprintw(head, 0, 0, "%s",   month_to_str(MONTH));
 103         mvwprintw(head, 1, 0, "%04d", YEAR);
 104         for (int d = 0; d < 7; d++) {
 105                 const char *str = hstep >= 10 ? day_to_string(d) : day_to_str(d);
 106                 if (d == shift) wattron(head, A_BOLD);
 107                 mvwprintw(head, 0, x+ROUND(d*hstep), "%s", str);
 108                 mvwprintw(head, 1, x+ROUND(d*hstep), "%02d/%02d", month+1, day+1);
 109                 if (d == shift) wattroff(head, A_BOLD);
 110                 add_days(&year, &month, &day, 1);
 111         }
 112
 113         /* Print times */
 114         mvwprintw(times, 0, 0, "%02d:%02d", ((line/4)-1)%12+1, (line*15)%60);
 115         for (int h = 0; h < 24; h++)
 116                 mvwprintw(times, h*4-line, 0, "%02d:%02d", (h-1)%12+1, 0);
 117
 118         /* Print events */
 119         event_t *event = EVENTS;
 120         add_days(&year, &month, &day, -7);
 121         for (int d = 0; d <  7; d++, add_days(&year,&month,&day,1))
 122         for (int h = 0; h < 24; h++)
 123         for (int m = 0; m < 60; m+=15)
 124         while (event && before(&event->start,
 125                         year, month, day, h+(m+15)/60, (m+15)%60)) {
 126                 if (!before(&event->start, year, month, day, h, m))
 127                         print_event(event, d, h, m, hstep);
 128                 event = event->next;
 129         }
 130
 131         /* Print lines */
 132         mvwhline(win, y-1, 0, ACS_HLINE, COLS);
 133         for (int d = 0; d < 7; d++)
 134                 mvwvline(win, y, x+ROUND(d*hstep)-1, ACS_VLINE, LINES-y-2);
 135
 136         /* Draw today */
 137         int l = x+ROUND((shift+0)*hstep)-1;
 138         int r = x+ROUND((shift+1)*hstep)-1;
 139         mvwhline    (win, y-1, l, ACS_BLOCK, r-l+1);
 140         mvwvline_set(win, y,   l, WACS_T_VLINE, LINES-y-2);
 141         mvwvline_set(win, y,   r, WACS_T_VLINE, LINES-y-2);
 142 }
 143
 144 /* Week run */
 145 int week_run(int key, mmask_t btn, int row, int col)
 146 {
 147         int days = 0, ref = 0;
 148         switch (key)
 149         {
 150                 case 'h': ref = 1; days = -1; break;
 151                 case 'l': ref = 1; days =  1; break;
 152                 case 'i': ref = 1; days = -7; break;
 153                 case 'o': ref = 1; days =  7; break;
 154                 case 'k': ref = 1; line--;    break;
 155                 case 'j': ref = 1; line++;    break;
 156         }
 157         line = CLAMP(line, 0, 24*4);
 158         if (days)
 159                 add_days(&YEAR, &MONTH, &DAY, days);
 160         if (ref) {
 161                 week_draw();
 162                 wrefresh(win);
 163         }
 164         return 0;
 165 }