home · contact · privacy
f2315d92c2a662dcbff0e1ee0acfd668208ed8a7
[plomrogue] / windows.c
1 #include <stdlib.h>
2 #include <stdint.h>
3 #include <ncurses.h>
4 #include <string.h>
5 #include "windows.h"
6
7 struct Corners {
8   struct yx_uint16 tl;
9   struct yx_uint16 tr;
10   struct yx_uint16 bl;
11   struct yx_uint16 br; };
12
13 static void refit_pad (struct WinMeta *);
14 static void place_window (struct WinMeta *, struct Win *);
15 static void update_windows (struct WinMeta *, struct Win *);
16 static void destroy_window (struct Win *);
17 static void draw_wins_borders (struct Win *, struct Win *, struct Corners *, uint16_t);
18 static void draw_win_borders (struct Win *, char);
19 static void draw_windows (struct Win *);
20
21 extern struct WinMeta init_win_meta (WINDOW * screen) {
22 // Create and populate WinMeta struct with sane default values.
23   struct WinMeta win_meta;
24   win_meta.screen = screen;
25   win_meta.pad.size.y = getmaxy(screen);
26   win_meta.pad.size.x = getmaxx(screen);
27   win_meta.chain_start = 0;
28   win_meta.chain_end = 0;
29   win_meta.pad_offset = 0;
30   win_meta.pad.curses_win = newpad(win_meta.pad.size.y, 1);
31   win_meta.active = 0;
32   return win_meta; }
33
34 extern struct Win init_window (struct WinMeta * win_meta, char * title, void * data, void * func) {
35 // Create and populate Win struct with sane default values.
36   struct Win win;
37   win.prev = 0;
38   win.next = 0;
39   win.frame.curses_win = 0;
40   win.title = title;
41   win.frame.size.x = 20;
42   win.frame.size.y = win_meta->pad.size.y - 1;
43   win.data = data;
44   win.draw = func;
45   return win; }
46
47 extern void append_window (struct WinMeta * win_meta, struct Win * win) {
48 // Append win to window chain. Set active, if first window. Update geometry of windows from new window on.
49   if (0 != win_meta->chain_start) {
50     win->prev = win_meta->chain_end;
51     win_meta->chain_end->next = win; }
52   else {
53     win_meta->active = win;
54     win_meta->chain_start = win; }
55   win_meta->chain_end = win;
56   update_windows(win_meta, win); }
57
58 static void refit_pad (struct WinMeta * win_meta) {
59 // Fit pad width to minimum width demanded by current windows' geometries.
60   uint16_t lastwincol = 0;
61   struct Win * win_p = win_meta->chain_start;
62   while (win_p != 0) {
63     if (win_p->start.x + win_p->frame.size.x > lastwincol + 1)
64       lastwincol = win_p->start.x + win_p->frame.size.x - 1;
65     win_p = win_p->next; }
66   if (getmaxx(win_meta->pad.curses_win) != lastwincol)
67     wresize(win_meta->pad.curses_win, getmaxy(win_meta->pad.curses_win), lastwincol + 2); }
68
69 extern void suspend_window (struct WinMeta * win_meta, struct Win * win) {
70 // Destroy win, suspend from chain. Update geometry of following rows and pad, as well as activity selection.
71   destroy_window(win);
72   if (win_meta->chain_start != win)    // Give win's position in the chain to element next to it in the chain.
73     win->prev->next = win->next;
74   else
75     win_meta->chain_start = win->next;
76   char pad_refitted = 0;
77   if (win_meta->chain_end != win) {                 // Let chain element next to win know its new predecessor.
78     win->next->prev = win->prev;
79     if (win_meta->active == win)                          // If win was active, shift active window pointer to
80       win_meta->active = win->next;                       // the next chain element, if that is a window ...
81     update_windows(win_meta, win->next);
82     pad_refitted = 1; }
83   else {
84     win_meta->chain_end = win->prev;
85     if (win_meta->active == win)                                       // ... or else to the previous element.
86       win_meta->active = win->prev; }
87   win->prev = 0;
88   win->next = 0;
89   if (0 == pad_refitted)                                                            // Refit pad if necessary.
90     refit_pad(win_meta); }
91
92 static void place_window (struct WinMeta * win_meta, struct Win * w) {
93 // Based on position and sizes of previous window, find fitting place for current window.
94   w->start.x = 0;                                  // if window is first in chain, place it on top-left corner
95   w->start.y = 1;
96   if (0 != w->prev) {
97     struct Win * w_top = w->prev;
98     while (w_top->start.y != 1)
99       w_top = w_top->prev;                                       // else, default to placing window in new top
100     w->start.x = w_top->start.x + w_top->frame.size.x + 1;       // column to the right of the last one
101     uint16_t w_prev_maxy = w->prev->start.y + getmaxy(w->prev->frame.curses_win);
102     if (w->frame.size.x <= w->prev->frame.size.x && w->frame.size.y < win_meta->pad.size.y - w_prev_maxy) {
103       w->start.x = w->prev->start.x;                       // place window below previous window if it fits
104       w->start.y = w_prev_maxy + 1; }                      // vertically and is not wider than its predecessor
105     else {
106       struct Win * w_up = w->prev;
107       struct Win * w_upup = w_up;
108       uint16_t widthdiff;
109       while (w_up != w_top) {
110         w_upup = w_up->prev;
111         while (1) {
112           if (w_up->start.y != w_upup->start.y)
113             break;
114           w_upup = w_upup->prev; }
115         w_prev_maxy = w_upup->start.y + getmaxy(w_upup->frame.curses_win);
116         widthdiff = (w_upup->start.x + w_upup->frame.size.x) - (w_up->start.x + w_up->frame.size.x);
117         if (w->frame.size.y < win_meta->pad.size.y - w_prev_maxy && w->frame.size.x < widthdiff) {
118           w->start.x = w_up->start.x + w_up->frame.size.x + 1 ; // else try to open new sub column under
119           w->start.y = w_prev_maxy + 1;                        // last window below which enough space remains
120           break; }
121         w_up = w_upup; } } } }
122
123 static void update_windows (struct WinMeta * wmeta, struct Win * w) {
124 // Update geometry of win and its next of kin. Destroy (if visible), (re-)build window. If need, resize pad.
125   if (0 != w->frame.curses_win)
126     destroy_window (w);
127   place_window(wmeta, w);
128   refit_pad(wmeta);
129   w->frame.curses_win=subpad(wmeta->pad.curses_win, w->frame.size.y, w->frame.size.x, w->start.y, w->start.x);
130   if (0 != w->next)
131     update_windows (wmeta, w->next); }
132
133 static void destroy_window (struct Win * win) {
134 // Delete window.
135   delwin(win->frame.curses_win);
136   win->frame.curses_win = 0; }
137
138 static void draw_win_borders (struct Win * win, char active) {
139 // Draw borders of window win, including title. Decorate in a special way if window is marked as active.
140   uint16_t y, x;
141   for (y = win->start.y; y <= win->start.y + win->frame.size.y; y++) {
142     mvwaddch(wgetparent(win->frame.curses_win), y, win->start.x - 1, '|');
143     mvwaddch(wgetparent(win->frame.curses_win), y, win->start.x + win->frame.size.x, '|'); }
144   for (x = win->start.x; x <= win->start.x + win->frame.size.x; x++) {
145     mvwaddch(wgetparent(win->frame.curses_win), win->start.y - 1, x, '-');
146     mvwaddch(wgetparent(win->frame.curses_win), win->start.y + win->frame.size.y, x, '-'); }
147   char min_title_length_visible = 3;        // 1 char minimal, plus 2 chars for decoration left/right of title
148   if (win->frame.size.x >= min_title_length_visible) {
149     uint16_t title_offset = 0;
150     if (win->frame.size.x > strlen(win->title) + 2)
151       title_offset = (win->frame.size.x - (strlen(win->title) + 2)) / 2;              // + 2 is for decoration
152     uint16_t length_visible = strnlen(win->title, win->frame.size.x - 2);
153     char title[length_visible + 3];
154     char decoration = ' ';
155     if (1 == active)
156       decoration = '$';
157     memcpy(title + 1, win->title, length_visible);
158     title[0] = title[length_visible + 1] = decoration;
159     title[length_visible + 2] = '\0';
160     mvwaddstr(wgetparent(win->frame.curses_win), win->start.y - 1, win->start.x + title_offset, title); } }
161
162 static void draw_wins_borders (struct Win * w, struct Win * w_active, struct Corners * corners, uint16_t i) {
163 // Call draw_win_borders() for all windows in chain from win on. Save current window's border corners.
164   char active = 0;
165   if (w == w_active)
166     active = 1;
167   draw_win_borders(w, active);
168   corners[i].tl.y = w->start.y - 1;
169   corners[i].tl.x = w->start.x - 1;
170   corners[i].tr.y = w->start.y - 1;
171   corners[i].tr.x = w->start.x + w->frame.size.x;
172   corners[i].bl.y = w->start.y + w->frame.size.y;
173   corners[i].bl.x = w->start.x - 1;
174   corners[i].br.y = w->start.y + w->frame.size.y;
175   corners[i].br.x = w->start.x + w->frame.size.x;
176   if (0 != w->next) {
177     draw_wins_borders (w->next, w_active, corners, i + 1); } }
178
179 static void draw_windows (struct Win * win) {
180 // Draw contents of all windows in window chain from win on.
181   win->draw(win);
182   if (0 != win->next) {
183     draw_windows (win->next); } }
184
185 extern void draw_scroll_hint (struct Frame * frame, uint16_t pos, uint32_t dist, char dir) {
186 // Draw scroll hint into frame at pos (row or col dependend on dir), mark distance of dist cells into dir.
187   char more[] = "more";
188   char unit_cols[] = "columns";
189   char unit_rows[] = "lines";
190   uint16_t dsc_space = frame->size.x;
191   char * unit = unit_rows;
192   if ('<' == dir || '>' == dir) {
193     dsc_space = frame->size.y;
194     unit = unit_cols; }
195   char * scrolldsc = malloc((4 * sizeof(char)) + strlen(more) + strlen(unit) + 10);  // 10 = uint32 max strlen
196   sprintf(scrolldsc, " %d %s %s ", dist, more, unit);
197   char offset = 1, q;
198   if (dsc_space > strlen(scrolldsc) + 1)
199     offset = (dsc_space - strlen(scrolldsc)) / 2;
200   chtype symbol;
201   for (q = 0; q < dsc_space; q++) {
202     if (q >= offset && q < strlen(scrolldsc) + offset)
203       symbol = scrolldsc[q - offset] | A_REVERSE;
204     else
205       symbol = dir | A_REVERSE;
206     if ('<' == dir || '>' == dir)
207       mvwaddch(frame->curses_win, q, pos, symbol);
208     else
209       mvwaddch(frame->curses_win, pos, q, symbol); }
210   free(scrolldsc); }
211
212 extern void draw_all_windows (struct WinMeta * wmeta) {
213 // Draw pad with all windows and their borders, plus scrolling hints.
214   erase();
215   wnoutrefresh(wmeta->screen);
216   werase(wmeta->pad.curses_win);
217   if (wmeta->chain_start) {
218     uint16_t n_wins = 1, i, y;
219     struct Win * win_p = wmeta->chain_start;
220     while (0 != win_p->next) {
221       win_p = win_p->next;
222       n_wins++; }
223     struct Corners * all_corners = malloc(sizeof(struct Corners) * n_wins);
224     draw_windows (wmeta->chain_start);
225     draw_wins_borders (wmeta->chain_start, wmeta->active, all_corners, 0);
226     for (i = 0; i < n_wins; i++) {
227       mvwaddch(wmeta->pad.curses_win, all_corners[i].tl.y, all_corners[i].tl.x, '+');
228       mvwaddch(wmeta->pad.curses_win, all_corners[i].tr.y, all_corners[i].tr.x, '+');
229       mvwaddch(wmeta->pad.curses_win, all_corners[i].bl.y, all_corners[i].bl.x, '+');
230       mvwaddch(wmeta->pad.curses_win, all_corners[i].br.y, all_corners[i].br.x, '+'); }
231     free(all_corners);
232     if (wmeta->pad_offset > 0)
233       draw_scroll_hint(&wmeta->pad, wmeta->pad_offset, wmeta->pad_offset + 1, '<');
234     if (wmeta->pad_offset + wmeta->pad.size.x < getmaxx(wmeta->pad.curses_win) - 1)
235       draw_scroll_hint(&wmeta->pad, wmeta->pad_offset + wmeta->pad.size.x - 1,
236                        getmaxx(wmeta->pad.curses_win) - (wmeta->pad_offset + wmeta->pad.size.x), '>');
237     pnoutrefresh(wmeta->pad.curses_win, 0, wmeta->pad_offset, 0, 0, wmeta->pad.size.y, wmeta->pad.size.x-1); }
238   doupdate(); }
239
240 extern void resize_active_window (struct WinMeta * win_meta, uint16_t height, uint16_t width) {
241 // Grow or shrink currently active window. Correct its geometry and that of its followers.
242   if (0 != win_meta->active && width > 0 && height > 0 && height < win_meta->pad.size.y) {
243     win_meta->active->frame.size.y = height;
244     win_meta->active->frame.size.x = width;
245     update_windows(win_meta, win_meta->chain_start); } }
246
247 extern void cycle_active_window (struct WinMeta * win_meta, char dir) {
248 // Cycle active window selection forwards (dir = 'n') or backwards.
249   if (0 != win_meta->active) {
250     if ('n' == dir) {
251       if (win_meta->active->next != 0)
252         win_meta->active = win_meta->active->next;
253       else
254         win_meta->active = win_meta->chain_start; }
255     else {
256       if (win_meta->active->prev != 0)
257         win_meta->active = win_meta->active->prev;
258       else
259         win_meta->active = win_meta->chain_end; } } }
260
261 extern void shift_active_window (struct WinMeta * win_meta, char dir) {
262 // Move active window forward/backward in window chain. If jumping beyond start/end, move to other chain end.
263   if (0 != win_meta->active && win_meta->chain_start != win_meta->chain_end && (dir == 'f' || dir == 'b')) {
264     struct Win * win_shift = win_meta->active, * win_p, * win_p_next;
265     char wrap = 0;
266     if ((dir == 'f' && win_shift == win_meta->chain_end)
267         || (dir == 'b' && win_shift == win_meta->chain_start))
268       wrap = 1;
269     uint16_t i, i_max;
270     for (i_max = 1, win_p = win_meta->chain_start; win_p != win_meta->chain_end; i_max++)
271       win_p = win_p->next;
272     struct Win ** wins = malloc(i_max * sizeof(struct Win *));
273     for (i = 0, win_p = win_meta->chain_start; i < i_max; i++) {
274       win_p_next = win_p->next;
275       suspend_window(win_meta, win_p);
276       wins[i] = win_p;
277       win_p = win_p_next; }
278     if (wrap)
279       if (dir == 'f') {
280         append_window(win_meta, win_shift);
281         for (i = 0; i < i_max - 1; i++)
282           append_window(win_meta, wins[i]); }
283       else {
284         for (i = 1; i < i_max; i++)
285           append_window(win_meta, wins[i]);
286         append_window(win_meta, win_shift); }
287     else
288       for (i = 0; i < i_max; i++)
289         if ((dir == 'f' && win_shift == wins[i]) || (dir == 'b' && win_shift == wins[i+1])) {
290           append_window(win_meta, wins[i+1]);
291           append_window(win_meta, wins[i]);
292           i++; }
293         else
294           append_window(win_meta, wins[i]);
295     free(wins);
296     win_meta->active = win_shift; } }
297
298 extern void reset_pad_offset(struct WinMeta * win_meta, uint16_t new_offset) {
299 // Apply new_offset to windows pad, if it proves to be sane.
300   if (new_offset >= 0 && new_offset + win_meta->pad.size.x < getmaxx(win_meta->pad.curses_win))
301     win_meta->pad_offset = new_offset; }