home · contact · privacy
Merged Win and WinConf structs, windows.h and wincontrol.h. Also lots of refactoring...
[plomrogue] / src / client / windows.c
1 /* src/client/windows.c */
2
3 #include "windows.h"
4 #include <ncurses.h> /* chtype, getmaxx(), getmaxy(), erase(), werase(),
5                       * endwin(), delwin(), wnoutrefresh(), pnoutrefresh(),
6                       * doupdate(), refresh(), delwin(), newpad(), mvwaddch(),
7                       * mvwaddstr(), wresize()
8                       */
9 #include <stddef.h> /* NULL */
10 #include <stdlib.h> /* free(), atoi() */
11 #include <stdint.h> /* uint8_t, uint16_t, uint32_t, UINT16_MAX */
12 #include <stdio.h> /* sprintf() */
13 #include <string.h> /* memcpy(), strlen(), strnlen(), strchr() */
14 #include "../common/rexit.h" /* exit_trouble(), exit_err() */
15 #include "../common/readwrite.h" /* try_fputc(), try_write(), try_fgets(),
16                                   * try_fgetc()
17                                   */
18 #include "../common/try_malloc.h" /* try_malloc() */
19 #include "../common/yx_uint16.h" /* struct yx_uint16 */
20 #include "draw_wins.h" /* draw_winconf_geometry(), draw_winconf_keybindings(),
21                         * draw_win_inventory(), draw_win_info(), draw_win_log(),
22                         * draw_win_available_keybindings(), draw_win_map(),
23                         * draw_win_keybindings_winconf_keybindings(),
24                         * draw_win_keybindings_winconf_geometry(),
25                         * draw_win_keybindings_global()
26                         */
27 #include "keybindings.h" /* free_keybindings(), write_keybidings_to_file(),
28                           * read_keybindings_from_file()
29                           */
30 #include "world.h" /* global world */
31
32
33
34 /* Get position of id "c" in world.windb.order or return Win before/after (or
35  * NULL if there is no window before/after).
36  */
37 static uint8_t get_pos_in_order(char c);
38 static struct Win * get_win_after(char c);
39 static struct Win * get_win_before(char c);
40
41 /* Calculate "id"'s window's size from v_screen size and .target_(height/width).
42  * A .target_width == 0 makes the window as wide as .t_screen. .target_height ==
43  * 0 sets the maximum allowed height: one cell smaller than that of .v_screen.
44  * Negative values make width/height so many cells smaller than what 0 would
45  * set. Values that would reduce the window height or width to less than 1 cell
46  * according to the aforementioned rules set the height/width as if they were 0.
47  */
48 static void init_win_size_from_winconf_and_v_screen_size(char id);
49
50 /* Get (Win->draw) function identified by "c"; NULL if c not mapped to one.
51  * match_func() is just a little helper to it.
52  */
53 static uint8_t match_func(char c, void (** f) (), char c_m, void (* f_m) ());
54 static void * get_drawfunc_by_char(char c);
55
56 /* Write "win"'s size back to .target_(height/width) as per .target_*_type. */
57 static void set_win_target_size(struct Win * win);
58
59 /* Iterate over chars of world.windb.ids array / string. Restart after \0.*/
60 static char get_next_win_id();
61
62 /* Make .v_screen just wide enough to contain all visible windows. */
63 static void refit_v_screen();
64
65 /* Update geometry (sizes, positions) of window "w" and its successors in the
66  * window chain. Use place_win() for the positioning algorithm.
67  */
68 static void update_wins(struct Win * w);
69 static void place_win(struct Win * w);
70
71 /* Draw scroll hint (a line saying that there are "dist" more elements of "unit"
72  * further into the direction symbolized by "dir") into .v_screen, onto an
73  * appropriate edge of a window or .v_screen; the left/right edge if "dir" is
74  * "<"/">", or the top/bottom edge if it is "^"/"v". Use "start" as the start
75  * coordinate of the frame that is to contain the scroll hints. winscroll_hint()
76  * is a wrapper that uses the border of window "w" as this frame.
77  */
78 static void scroll_hint(struct yx_uint16 fsize, char dir, uint16_t dist,
79                         char * unit, struct yx_uint16 start);
80 static void winscroll_hint(struct Win * w, char dir, uint16_t dist);
81
82 /* draw_win_borderlines() draws vertical/horizontal borders of window "w" sans
83  * corners into .v_screen. It draws the top border line as the windows' title
84  * bar (highlighted if the window is selected as active). It is called
85  * recursively by draw_wins_borderlines() on all windows from "w" on.
86  * draw_wins_bordercorners() draws the border corners of "w" and its successors.
87  */
88 static void draw_win_borderlines(struct Win * w);
89 static void draw_wins_borderlines(struct Win * w);
90 static void draw_wins_bordercorners(struct Win * w);
91
92 /* Draw contents of all windows in window chain from window "w" onwards. */
93 static void draw_wins(struct Win * w);
94
95 /* Append/suspend window "w" to/from chain of visible windows. Appended windows
96  * will become active. Suspended active windows will move the active window
97  * selection to their successor in the window chain or, failing that, their
98  * predecessor, or, failing that, to 0 (no window active).
99  */
100 static void append_win(struct Win * w);
101 static void suspend_win(struct Win * w);
102
103 /* Copy Win content pointed to by "win" into appendend world.windb.wins area. */
104 static void add_win_to_windb(struct Win * win);
105
106
107
108 static uint8_t get_pos_in_order(char c)
109 {
110     uint8_t i;
111     for (i = 0; c != world.windb.order[i]; i++);
112     return i;
113 }
114
115
116
117 static struct Win * get_win_after(char c)
118 {
119     return get_win_by_id(world.windb.order[get_pos_in_order(c) + 1]);
120 }
121
122
123
124 static struct Win * get_win_before(char c)
125 {
126     uint8_t i = get_pos_in_order(c);
127     if (i > 0)
128     {
129         return get_win_by_id(world.windb.order[i - 1]);
130     }
131     return NULL;
132 }
133
134
135
136 static void init_win_size_from_winconf_and_v_screen_size(char id)
137 {
138     struct Win * w = get_win_by_id(id);
139     w->frame_size.y  = world.windb.v_screen_size.y - 1;
140     if      (   0 < w->target_height
141              && w->target_height <= world.windb.v_screen_size.y - 1)
142     {
143         w->frame_size.y = w->target_height;
144     }
145     else if (   0 > w->target_height
146              && world.windb.v_screen_size.y + (w->target_height - 1) > 0)
147     {
148         w->frame_size.y = world.windb.v_screen_size.y + (w->target_height - 1);
149     }
150     w->frame_size.x  = world.windb.v_screen_size.x;
151     if      (0 < w->target_width)
152     {
153         w->frame_size.x = w->target_width;
154     }
155     else if (   0 > w->target_width
156              && world.windb.v_screen_size.x + w->target_width > 0)
157     {
158         w->frame_size.x = world.windb.v_screen_size.x + w->target_width;
159     }
160 }
161
162
163
164 static uint8_t match_func(char c, void (** f) (), char c_m, void (* f_m) ())
165 {
166     if (c == c_m)
167     {
168         * f = f_m;
169         return 1;
170     }
171     return 0;
172 }
173
174
175
176 static void * get_drawfunc_by_char(char c)
177 {
178     void (* f) (struct Win *) = NULL;
179     if (   match_func(c, &f, 'c', draw_win_inventory)
180         || match_func(c, &f, 'i', draw_win_info)
181         || match_func(c, &f, 'l', draw_win_log)
182         || match_func(c, &f, 'k', draw_win_available_keybindings)
183         || match_func(c, &f, 'm', draw_win_map)
184         || match_func(c, &f, '0', draw_win_keybindings_global)
185         || match_func(c, &f, '1', draw_win_keybindings_winconf_geometry)
186         || match_func(c, &f, '2', draw_win_keybindings_winconf_keybindings));
187     return f;
188 }
189
190
191
192 static void set_win_target_size(struct Win * wcp)
193 {
194     if      (0 == wcp->target_height_type)
195     {
196         wcp->target_height = wcp->frame_size.y;
197     }
198     else if (1 == wcp->target_height_type)
199     {
200         wcp->target_height = wcp->frame_size.y - world.windb.v_screen_size.y +1;
201     }
202     if      (0 == wcp->target_width_type)
203     {
204         wcp->target_width = wcp->frame_size.x;
205     }
206     else if (1 == wcp->target_width_type)
207     {
208         wcp->target_width = wcp->frame_size.x - world.windb.v_screen_size.x;
209     }
210 }
211
212
213
214 static char get_next_win_id()
215 {
216     static uint8_t i = 0;
217     char c = world.windb.ids[i];
218     if (0 == c)
219     {
220         i = 0;
221         return c;
222     }
223     i++;
224     return c;
225 }
226
227
228
229 static void refit_v_screen()
230 {
231     /* Determine rightmost window column. */
232     uint32_t lastwcol = 0;
233     struct Win * wp = get_win_by_id(world.windb.order[0]);
234     while (wp != 0)
235     {
236         if ((uint32_t) wp->start.x + (uint32_t) wp->frame_size.x > lastwcol + 1)
237         {
238             lastwcol = (uint32_t) wp->start.x + (uint32_t) wp->frame_size.x - 1;
239         }
240         wp = get_win_after(wp->id);
241     }
242
243     /* Only resize .v_screen if the rightmost window column has changed. */
244     char * err_s = "refit_v_screen() grows virtual screen beyond legal sizes.";
245     char * err_m = "refit_v_screen() triggers memory alloc error in wresize().";
246     if (getmaxx(world.windb.v_screen) + 1 != lastwcol)
247     {
248         uint8_t t = (lastwcol + 2 > UINT16_MAX);
249         exit_err(t, err_s);
250         t = wresize(world.windb.v_screen, getmaxy(world.windb.v_screen),
251                     lastwcol + 2);
252         exit_err(t, err_m);
253     }
254 }
255
256
257
258 static void update_wins(struct Win * w)
259 {
260     place_win(w);
261     refit_v_screen();
262     struct Win * next = get_win_after(w->id);
263     if (next)
264     {
265         update_wins(next);
266     }
267 }
268
269
270
271 static void place_win(struct Win * w)
272 {
273     /* If w is first window, it goes into the top left corner. */
274     w->start.x = 0;
275     w->start.y = 1;                             /* Leave space for title bar. */
276     struct Win * w_prev = get_win_before(w->id);
277     if (w_prev)
278     {
279
280         /* If not, fit w's top left to top right of last top predecessor. */
281         struct Win * w_top = w_prev;
282         for (;
283              w_top->start.y != 1;
284              w_top = get_win_before(w_top->id));
285         w->start.x = w_top->start.x + w_top->frame_size.x + 1;
286
287         /* Fit w's top left to bottom left of its ->prev if enough space. */
288         uint16_t w_prev_maxy = w_prev->start.y + w_prev->frame_size.y;
289         if (   w->frame_size.x <= w_prev->frame_size.x
290             && w->frame_size.y <  world.windb.v_screen_size.y - w_prev_maxy)
291         {
292             w->start.x = w_prev->start.x;
293             w->start.y = w_prev_maxy + 1;
294             return;
295         }
296
297         /* Failing that, try to fit w' top left to the top right of the last
298          * predecessor w_test 1) not followed by windows with a left corner
299          * further rightwards than its own 2) with enough space rightwards for w
300          * until the bottom right of w_thr directly throning over it 3) and with
301          * this same space extending far enough to the bottom for fitting in w.
302          */
303         struct Win * w_test = w_prev;
304         struct Win * w_thr;
305         while (w_test != w_top)
306         {
307             for (w_thr = get_win_before(w_test->id);
308                  w_test->start.y <= w_thr->start.y;
309                  w_thr = get_win_before(w_thr->id));
310             uint16_t w_thr_bottom = w_thr->start.y + w_thr->frame_size.y;
311             uint16_t free_width =   (w_thr->start.x + w_thr->frame_size.x)
312                                   - (w_test->start.x + w_test->frame_size.x);
313             if (   w->frame_size.y < world.windb.v_screen_size.y - w_thr_bottom
314                 && w->frame_size.x < free_width)
315             {
316                 w->start.x = w_test->start.x + w_test->frame_size.x + 1;
317                 w->start.y = w_thr_bottom + 1;
318                 break;
319             }
320             w_test = w_thr;
321         }
322     }
323 }
324
325
326
327 static void scroll_hint(struct yx_uint16 fsize, char dir, uint16_t dist,
328                         char * unit, struct yx_uint16 start)
329 {
330     /* Decide on alignment (vertical/horizontal?), thereby hint text space. */
331     char * more = "more";
332     uint16_t dsc_space = fsize.x;
333     if ('<' == dir || '>' == dir)
334     {
335         dsc_space = fsize.y;
336     }                                  /* vv-- 10 = max strlen for uint16_t */
337     char scrolldsc[1 + strlen(more) + 1 + 10 + 1 + strlen(unit) + 1 + 1];
338     sprintf(scrolldsc, " %d %s %s ", dist, more, unit);
339
340     /* Decide on offset of the description text inside the scroll hint line. */
341     uint16_t dsc_offset = 1;
342     if (dsc_space > strlen(scrolldsc) + 1)
343     {
344         dsc_offset = (dsc_space - strlen(scrolldsc)) / 2;
345     }
346
347     /* Draw scroll hint line as dir symbols bracketing description text. */
348     uint16_t draw_offset = 0;
349     if      ('>' == dir)
350     {
351         draw_offset = fsize.x - 1;
352     }
353     else if ('v' == dir)
354     {
355         draw_offset = fsize.y - 1;
356     }
357     uint16_t q = 0;
358     for (; q < dsc_space; q++)
359     {
360         chtype c = dir | A_REVERSE;
361         if (q >= dsc_offset && q < strlen(scrolldsc) + dsc_offset)
362         {
363             c = scrolldsc[q - dsc_offset] | A_REVERSE;
364         }
365         if ('<' == dir || '>' == dir)
366         {
367             mvwaddch(world.windb.v_screen, start.y+q, start.x+draw_offset, c);
368             continue;
369         }
370         mvwaddch(world.windb.v_screen, start.y + draw_offset, start.x + q, c);
371     }
372 }
373
374
375
376 static void winscroll_hint(struct Win * w, char dir, uint16_t dist)
377 {
378     char * unit = "lines";
379     if ('<' == dir || '>' == dir)
380     {
381         unit = "columns";
382     }
383     struct yx_uint16 start = w->start;
384     scroll_hint(w->frame_size, dir, dist, unit, start);
385 }
386
387
388
389 static void draw_win_borderlines(struct Win * w)
390 {
391     /* Draw vertical and horizontal border lines. */
392     uint16_t y, x;
393     for (y = w->start.y; y <= w->start.y + w->frame_size.y; y++)
394     {
395         mvwaddch(world.windb.v_screen, y, w->start.x - 1,              '|');
396         mvwaddch(world.windb.v_screen, y, w->start.x + w->frame_size.x, '|');
397     }
398     for (x = w->start.x; x <= w->start.x + w->frame_size.x; x++)
399     {
400         mvwaddch(world.windb.v_screen, w->start.y - 1,              x, '-');
401         mvwaddch(world.windb.v_screen, w->start.y + w->frame_size.y, x, '-');
402     }
403
404     /* Draw as much as possible of the title into center of top border line. */
405     uint8_t min_title_length_visible = 3;/* min. 1 char +2 padding/decoration*/
406     if (w->frame_size.x >= min_title_length_visible)
407     {
408         uint16_t offset = 0;
409         if (w->frame_size.x > strlen(w->title) + 2)
410         {
411             offset = (w->frame_size.x - (strlen(w->title) + 2)) / 2;
412         }                                    /* +2 is for padding/decoration */
413         uint16_t length_visible = strnlen(w->title, w->frame_size.x - 2);
414         char title[length_visible + 3];
415         char decoration = ' ';
416         if (w->id == world.windb.active)
417         {
418             decoration = '$';
419         }
420         memcpy(title + 1, w->title, length_visible);
421         title[0] = title[length_visible + 1] = decoration;
422         title[length_visible + 2] = '\0';
423         mvwaddstr(world.windb.v_screen, w->start.y-1, w->start.x+offset, title);
424     }
425 }
426
427
428
429 static void draw_wins_borderlines(struct Win * w)
430 {
431     draw_win_borderlines(w);
432     struct Win * next = get_win_after(w->id);
433     if (next)
434     {
435         draw_wins_borderlines(next);
436     }
437 }
438
439
440
441 static void draw_wins_bordercorners(struct Win * w)
442 {
443     mvwaddch(world.windb.v_screen,
444              w->start.y - 1, w->start.x - 1,              '+');
445     mvwaddch(world.windb.v_screen,
446              w->start.y - 1, w->start.x + w->frame_size.x, '+');
447     mvwaddch(world.windb.v_screen,
448              w->start.y + w->frame_size.y, w->start.x - 1, '+');
449     mvwaddch(world.windb.v_screen, w->start.y + w->frame_size.y,
450              w->start.x + w->frame_size.x,                 '+');
451     struct Win * next = get_win_after(w->id);
452     if (next)
453     {
454         draw_wins_bordercorners(next);
455     }
456 }
457
458
459
460 static void draw_wins(struct Win * w)
461 {
462     void (* drawfunc) (struct Win *) = get_drawfunc_by_char(w->id);
463     if      (1 == w->view)
464     {
465         drawfunc = draw_winconf_geometry;
466     }
467     else if (2 == w->view)
468     {
469         drawfunc = draw_winconf_keybindings;
470     }
471     drawfunc(w);
472     uint16_t size_y = w->winmap_size.y;
473     uint16_t size_x = w->winmap_size.x;
474     uint16_t offset_y = center_offset(w->center.y, size_y, w->frame_size.y);
475     uint16_t offset_x = center_offset(w->center.x, size_x, w->frame_size.x);
476     uint16_t y, x;
477     for (y = offset_y; y < w->frame_size.y + offset_y && y < size_y; y++)
478     {
479         for (x = offset_x; x < w->frame_size.x + offset_x && x < size_x; x++)
480         {
481             chtype ch = w->winmap[(y * w->winmap_size.x) + x];
482             mvwaddch(world.windb.v_screen, w->start.y + (y - offset_y),
483                                       w->start.x + (x - offset_x), ch);
484         }
485     }
486     free(w->winmap);
487     w->winmap = NULL;
488     w->winmap_size.y = 0;
489     w->winmap_size.x = 0;
490     if (offset_y > 0)
491     {
492         winscroll_hint(w, '^', offset_y + 1);
493     }
494     if (size_y > offset_y + w->frame_size.y)
495     {
496         winscroll_hint(w, 'v', size_y - ((offset_y + w->frame_size.y) - 1));
497     }
498     if (offset_x > 0)
499     {
500         winscroll_hint(w, '<', offset_x + 1);
501     }
502     if (size_x > offset_x + w->frame_size.x)
503     {
504         winscroll_hint(w, '>', size_x - ((offset_x + w->frame_size.x) - 1));
505     }
506     struct Win * next = get_win_after(w->id);
507     if (next)
508     {
509         return draw_wins(next);
510     }
511 }
512
513
514
515 static void append_win(struct Win * w)
516 {
517     char * f_name = "append_win()";
518     uint8_t old_size = strlen(world.windb.order) + 1;
519     char * new_order = try_malloc(old_size + 1, f_name);
520     memcpy(new_order, world.windb.order, old_size - 1);
521     new_order[old_size - 1] = w->id;
522     new_order[old_size] = '\0';
523     free(world.windb.order);
524     world.windb.order = new_order;
525     world.windb.active = w->id;
526     update_wins(w);
527 }
528
529
530
531 static void suspend_win(struct Win * w)
532 {
533     char * f_name = "suspend_win()";
534     uint8_t new_size = strlen(world.windb.order);
535     char * new_order = try_malloc(new_size, f_name);
536     uint8_t i = get_pos_in_order(w->id);
537     char next_char = world.windb.order[i + 1];
538     world.windb.order[i] = '\0';
539     char * second_part = &world.windb.order[i + 1];
540     sprintf(new_order, "%s%s", world.windb.order, second_part);
541     free(world.windb.order);
542     world.windb.order = new_order;
543     world.windb.active = world.windb.order[i];
544     if (!world.windb.order[i] && 0 < i)
545     {
546         world.windb.active = world.windb.order[i - 1];
547     }
548     if (world.windb.order[i])
549     {
550         update_wins(get_win_by_id(next_char)); /* Already calls               */
551         return;                                /* refit_v_screen(), so leave. */
552     }
553     refit_v_screen();
554 }
555
556
557
558 static void add_win_to_windb(struct Win * win)
559 {
560     char * f_name = "add_win_to_windb()";
561     if (world.windb.ids)
562     {
563         uint8_t old_ids_size = strlen(world.windb.ids);
564         char * new_ids = try_malloc(old_ids_size + 1 + 1, f_name);
565         sprintf(new_ids, "%s%c", world.windb.ids, win->id);
566         free(world.windb.ids);
567         world.windb.ids = new_ids;
568         uint16_t old_wins_size = old_ids_size * sizeof(struct Win);
569         uint16_t new_wins_size = old_wins_size + sizeof(struct Win);
570         struct Win * new_wins = try_malloc(new_wins_size, f_name);
571         memcpy(new_wins, world.windb.wins, old_wins_size);
572         new_wins[old_ids_size] = *win;
573         free(world.windb.wins);
574         world.windb.wins = new_wins;
575         return;
576     }
577     world.windb.ids = try_malloc(2, f_name);
578     sprintf(world.windb.ids, "%c", win->id);
579     world.windb.wins = try_malloc(sizeof(struct Win), f_name);
580     world.windb.wins[0] = *win;
581 }
582
583
584
585 extern uint16_t center_offset(uint16_t position, uint16_t mapsize,
586                               uint16_t frame_size)
587 {
588     uint16_t offset = 0;
589     if (mapsize > frame_size)
590     {
591         if (position > frame_size / 2)
592         {
593             if (position < mapsize - (frame_size / 2))
594             {
595                 offset = position - (frame_size / 2);
596             }
597             else
598             {
599                 offset = mapsize - frame_size;
600             }
601         }
602     }
603     return offset;
604 }
605
606
607
608 extern struct Win * get_win_by_id(char id)
609 {
610     uint8_t i = 0;
611     while ('\0' != world.windb.ids[i])
612     {
613         if (id == world.windb.ids[i])
614         {
615             return &world.windb.wins[i];
616         }
617         i++;
618     }
619     return NULL;
620 }
621
622
623
624 extern uint8_t read_winconf_from_file(char * line, uint32_t linemax,
625                                       FILE * file)
626 {
627     char * f_name = "read_winconf_from_file()";
628     int test = try_fgetc(file, f_name);
629     if (EOF == test)
630     {
631         return 0;
632     }
633     struct Win win;
634     win.id = (char) test;
635     try_fgetc(file, f_name);
636     try_fgets(line, linemax + 1, file, f_name);
637     win.title = try_malloc(strlen(line), f_name);
638     memcpy(win.title, line, strlen(line) - 1);  /* Eliminate newline char */
639     win.title[strlen(line) - 1] = '\0';         /* char at end of string. */
640     try_fgets(line, linemax + 1, file, f_name);
641     win.target_height = atoi(line);
642     win.target_height_type = (0 >= win.target_height);
643     try_fgets(line, linemax + 1, file, f_name);
644     win.target_width = atoi(line);
645     win.target_width_type = (0 >= win.target_width);
646     read_keybindings_from_file(line, linemax, file, &win.kb);
647     win.view = 0;
648     win.target_center.y = 0;
649     win.target_center.x = 0;
650     win.winmap_size.y = 0;
651     win.winmap_size.x = 0;
652     win.winmap       = NULL;
653     win.center.y     = 0;
654     win.center.x     = 0;
655     add_win_to_windb(&win);
656     return 1;
657 }
658
659
660
661 extern void write_winconf_of_id_to_file(FILE * file, char c, char * delim)
662 {
663     char * f_name = "write_winconf_of_id_to_file()";
664     struct Win * wc = get_win_by_id(c);
665     uint8_t size = strlen(wc->title) + 2;
666     if (size < 7)  /* Ensure that at least 5 + 2 char fit into line so that   */
667     {              /* the digit representation of any uint16_t may be stored. */
668         size = 7;
669     }
670     char line[size];
671     sprintf(line, "%c\n", wc->id);
672     try_fwrite(line, sizeof(char), strlen(line), file, f_name);
673     sprintf(line, "%s\n", wc->title);
674     try_fwrite(line, sizeof(char), strlen(line), file, f_name);
675     sprintf(line, "%d\n", wc->target_height);
676     try_fwrite(line, sizeof(char), strlen(line), file, f_name);
677     sprintf(line, "%d\n", wc->target_width);
678     try_fwrite(line, sizeof(char), strlen(line), file, f_name);
679     write_keybindings_to_file(file, &wc->kb, delim);
680 }
681
682
683
684 extern void read_order_wins_visible_active(char * line, uint32_t linemax,
685                                            FILE * file)
686 {
687     char * f_name = "read_order_wins_visible_active()";
688     char win_order[linemax + 1];
689     try_fgets(win_order, linemax + 1, file, f_name);
690     win_order[strlen(win_order) - 1] = '\0';
691     world.windb.order = try_malloc(strlen(win_order) + 1, f_name);
692     sprintf(world.windb.order, "%s", win_order);
693     int char_or_eof = try_fgetc(file, f_name);
694     char * err_eof = "fgetc() unexpectedly hitting EOF";
695     exit_trouble(EOF == char_or_eof, f_name, err_eof);
696     world.windb.active = (uint8_t) char_or_eof;
697     exit_trouble(EOF == try_fgetc(file, f_name), f_name, err_eof);
698     try_fgets(line, linemax + 1, file, f_name);
699 }
700
701
702
703 extern void write_order_wins_visible_active(FILE * file, char * delim)
704 {
705     char * f_name = "write_order_wins_visible_active()";
706     try_fwrite(world.windb.order, strlen(world.windb.order), 1, file, f_name);
707     try_fputc('\n', file, f_name);
708     try_fputc(world.windb.active, file, f_name);
709     try_fputc('\n', file, f_name);
710     try_fwrite(delim, strlen(delim), 1, file, f_name);
711 }
712
713
714
715 extern void make_v_screen_and_init_win_sizes()
716 {
717     char * f_name = "make_v_screen_and_init_win_sizes()";
718     char * err_s = "creating an illegaly large virtual screen";
719     char * err_m = "triggering a memory allocation error via newpad()";
720     uint32_t maxy_test = getmaxy(world.windb.t_screen);
721     uint32_t maxx_test = getmaxx(world.windb.t_screen);
722     exit_trouble(maxy_test>UINT16_MAX || maxx_test>UINT16_MAX, f_name, err_s);
723     world.windb.v_screen_size.y = maxy_test;
724     world.windb.v_screen_size.x = maxx_test;
725     world.windb.v_screen = newpad(world.windb.v_screen_size.y, 1);
726     exit_trouble(NULL == world.windb.v_screen, f_name, err_m);
727     char id;
728     while (0 != (id = get_next_win_id()))
729     {
730         init_win_size_from_winconf_and_v_screen_size(id);
731     }
732 }
733
734
735
736 extern void free_windb()
737 {
738     char id;
739     while (0 != (id = get_next_win_id()))
740     {
741         struct Win * wc = get_win_by_id(id);
742         free(wc->title);
743         free_keybindings(wc->kb.kbs);
744     }
745     free(world.windb.ids);
746     world.windb.ids = NULL;
747     free(world.windb.wins);
748     world.windb.wins = NULL;
749     free(world.windb.order);
750     world.windb.order = NULL;
751 }
752
753
754
755 extern void winch_called(int signal)
756 {
757     world.winch = 1;
758 }
759
760
761
762 extern void reset_windows_on_winch()
763 {
764     endwin();  /* "[S]tandard way" to recalibrate ncurses post SIGWINCH, says */
765     refresh(); /* <http://invisible-island.net/ncurses/ncurses-intro.html>.   */
766     char tmp_order[strlen(world.windb.order) + 1];
767     sprintf(tmp_order, "%s", world.windb.order);
768     uint8_t i;
769     char tmp_active = world.windb.active;
770     for (i = 0; i < strlen(tmp_order); toggle_window(tmp_order[i]), i++);
771     delwin(world.windb.v_screen);
772     make_v_screen_and_init_win_sizes();
773     for (i = 0; i < strlen(tmp_order); toggle_window(tmp_order[i]), i++);
774     world.windb.active = tmp_active;
775 }
776
777
778
779 extern void draw_all_wins()
780 {
781     /* Empty everything before filling it a-new. */
782     erase();
783     wnoutrefresh(world.windb.t_screen);
784     werase(world.windb.v_screen);
785     if (world.windb.active)
786     {
787
788         /* Draw borders, wins. Order matters: corners should overwrite lines. */
789         draw_wins_borderlines(get_win_by_id(world.windb.order[0]));
790         draw_wins_bordercorners(get_win_by_id(world.windb.order[0]));
791         draw_wins(get_win_by_id(world.windb.order[0]));
792
793         /* Draw .v_screen scroll hints. */
794         struct yx_uint16 start;
795         start.y = 0;
796         start.x = world.windb.v_screen_offset;
797         char * cols_string = "columns";
798         if (world.windb.v_screen_offset > 0)
799         {
800             scroll_hint(world.windb.v_screen_size, '<',
801                         world.windb.v_screen_offset + 1, cols_string, start);
802         }
803         uint16_t size_x = getmaxx(world.windb.v_screen);
804         uint16_t right_edge =   world.windb.v_screen_offset
805                               + world.windb.v_screen_size.x;
806         if (right_edge < size_x - 1)
807         {
808             scroll_hint(world.windb.v_screen_size, '>',
809                         size_x - right_edge, cols_string, start);
810         }
811
812         /* Put .v_screen segment to be shown on .t_screen to .t_screen buffer.*/
813         pnoutrefresh(world.windb.v_screen, 0, world.windb.v_screen_offset, 0, 0,
814                      world.windb.v_screen_size.y,
815                      world.windb.v_screen_size.x - 1);
816     }
817
818     /* Only at the end write accumulated changes to .t_screen. */
819     doupdate();
820 }
821
822
823
824 extern void toggle_window(char id)
825 {
826     struct Win * win = get_win_by_id(id);
827     if (NULL == strchr(world.windb.order, id))
828     {
829         append_win(win);
830         return;
831     }
832     suspend_win(win);
833 }
834
835
836
837 extern void toggle_winconfig()
838 {
839     if (!world.windb.active)
840     {
841         return;
842     }
843     struct Win * w = get_win_by_id(world.windb.active);
844     if      (0 == w->view)
845     {
846         w->view          = 1;
847         w->target_center = w->center;
848         w->center.y      = 0;
849         w->center.x      = 0;
850         return;
851     }
852     else if (1 == w->view)
853     {
854         w->view          = 2;
855         w->center.x      = 0;
856         return;
857     }
858     w->view          = 0;
859     w->center        = w->target_center;
860 }
861
862
863
864 extern void toggle_win_size_type(char axis)
865 {
866     struct Win * w = get_win_by_id(world.windb.active);
867     if ('y' == axis)
868     {
869         w->target_height_type = (0 == w->target_height_type);
870         set_win_target_size(w);
871         return;
872     }
873     w->target_width_type = (   0 == w->target_width_type
874                             && w->frame_size.x <= world.windb.v_screen_size.x);
875     set_win_target_size(w);
876 }
877
878
879
880 extern void resize_active_win(char change)
881 {
882     if (world.windb.active)
883     {
884         struct Win * w = get_win_by_id(world.windb.active);
885         if      (change == '-' && w->frame_size.y > 1)
886         {
887             w->frame_size.y--;
888         }
889         else if (change == '_' && w->frame_size.y > 1)
890         {
891             w->frame_size.x--;
892         }
893         else if (   change == '+'
894                  && w->frame_size.y < world.windb.v_screen_size.y - 1)
895         {
896             w->frame_size.y++;
897         }
898         else if (change == '*' && w->frame_size.y < UINT16_MAX)
899         {
900             w->frame_size.x++;
901         }
902         if (   1 == w->target_width_type
903             && w->frame_size.x > world.windb.v_screen_size.x)
904         {
905             w->target_width_type = 0;
906         }
907         set_win_target_size(w);
908         update_wins(w);
909     }
910 }
911
912
913
914 extern void shift_active_win(char dir)
915 {
916     uint8_t len_order = strlen(world.windb.order);
917     if (1 < len_order)
918     {
919         char tmp[len_order + 1];
920         tmp[len_order] = '\0';
921         uint8_t pos = get_pos_in_order(world.windb.active);
922         if ('f' == dir)
923         {
924             if (pos == len_order - 1)
925             {
926                 memcpy(tmp + 1, world.windb.order, len_order - 1);
927                 tmp[0] = world.windb.active;
928                 memcpy(world.windb.order, tmp, len_order + 1);
929             }
930             else
931             {
932                 world.windb.order[pos] = world.windb.order[pos + 1];
933                 world.windb.order[pos + 1] = world.windb.active;
934             }
935         }
936         else
937         {
938             if (pos == 0)
939             {
940                 memcpy(tmp, world.windb.order + 1, len_order - 1);
941                 tmp[len_order - 1] = world.windb.active;
942                 memcpy(world.windb.order, tmp, len_order + 1);
943             }
944             else
945             {
946                 world.windb.order[pos] = world.windb.order[pos - 1];
947                 world.windb.order[pos - 1] = world.windb.active;
948             }
949         }
950         update_wins(get_win_by_id(world.windb.order[0]));
951     }
952 }
953
954
955
956 extern void scroll_v_screen(char dir)
957 {
958     if      (   '+' == dir
959              &&   world.windb.v_screen_offset + world.windb.v_screen_size.x + 1
960                 < getmaxx(world.windb.v_screen))
961     {
962         world.windb.v_screen_offset++;
963     }
964     else if (   '-' == dir
965              && world.windb.v_screen_offset > 0)
966     {
967         world.windb.v_screen_offset--;
968     }
969 }
970
971
972
973 extern void cycle_active_win(char dir)
974 {
975     uint8_t len_order = strlen(world.windb.order);
976     if (1 < len_order)
977     {
978         uint8_t pos = get_pos_in_order(world.windb.active);
979         if ('f' == dir)
980         {
981             world.windb.active = world.windb.order[pos + 1];
982             if ('\0' == world.windb.active)
983             {
984                 world.windb.active = world.windb.order[0];
985             }
986             return;
987         }
988         if (pos > 0)
989         {
990             world.windb.active = world.windb.order[pos - 1];
991             return;
992         }
993         world.windb.active = world.windb.order[len_order - 1];
994     }
995 }