plomlompom.com Git - plomrogue/blob - 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(), memset() */
  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     memset(&w->winmap_size, 0, sizeof(struct yx_uint16));
 489     if (offset_y > 0)
 490     {
 491         winscroll_hint(w, '^', offset_y + 1);
 492     }
 493     if (size_y > offset_y + w->frame_size.y)
 494     {
 495         winscroll_hint(w, 'v', size_y - ((offset_y + w->frame_size.y) - 1));
 496     }
 497     if (offset_x > 0)
 498     {
 499         winscroll_hint(w, '<', offset_x + 1);
 500     }
 501     if (size_x > offset_x + w->frame_size.x)
 502     {
 503         winscroll_hint(w, '>', size_x - ((offset_x + w->frame_size.x) - 1));
 504     }
 505     struct Win * next = get_win_after(w->id);
 506     if (next)
 507     {
 508         return draw_wins(next);
 509     }
 510 }
 511
 512
 513
 514 static void append_win(struct Win * w)
 515 {
 516     char * f_name = "append_win()";
 517     uint8_t old_size = strlen(world.windb.order) + 1;
 518     char * new_order = try_malloc(old_size + 1, f_name);
 519     memcpy(new_order, world.windb.order, old_size - 1);
 520     new_order[old_size - 1] = w->id;
 521     new_order[old_size] = '\0';
 522     free(world.windb.order);
 523     world.windb.order = new_order;
 524     world.windb.active = w->id;
 525     update_wins(w);
 526 }
 527
 528
 529
 530 static void suspend_win(struct Win * w)
 531 {
 532     char * f_name = "suspend_win()";
 533     uint8_t new_size = strlen(world.windb.order);
 534     char * new_order = try_malloc(new_size, f_name);
 535     uint8_t i = get_pos_in_order(w->id);
 536     char next_char = world.windb.order[i + 1];
 537     world.windb.order[i] = '\0';
 538     char * second_part = &world.windb.order[i + 1];
 539     sprintf(new_order, "%s%s", world.windb.order, second_part);
 540     free(world.windb.order);
 541     world.windb.order = new_order;
 542     world.windb.active = world.windb.order[i];
 543     if (!world.windb.order[i] && 0 < i)
 544     {
 545         world.windb.active = world.windb.order[i - 1];
 546     }
 547     if (world.windb.order[i])
 548     {
 549         update_wins(get_win_by_id(next_char)); /* Already calls               */
 550         return;                                /* refit_v_screen(), so leave. */
 551     }
 552     refit_v_screen();
 553 }
 554
 555
 556
 557 static void add_win_to_windb(struct Win * win)
 558 {
 559     char * f_name = "add_win_to_windb()";
 560     if (world.windb.ids)
 561     {
 562         uint8_t old_ids_size = strlen(world.windb.ids);
 563         char * new_ids = try_malloc(old_ids_size + 1 + 1, f_name);
 564         sprintf(new_ids, "%s%c", world.windb.ids, win->id);
 565         free(world.windb.ids);
 566         world.windb.ids = new_ids;
 567         uint16_t old_wins_size = old_ids_size * sizeof(struct Win);
 568         uint16_t new_wins_size = old_wins_size + sizeof(struct Win);
 569         struct Win * new_wins = try_malloc(new_wins_size, f_name);
 570         memcpy(new_wins, world.windb.wins, old_wins_size);
 571         new_wins[old_ids_size] = *win;
 572         free(world.windb.wins);
 573         world.windb.wins = new_wins;
 574         return;
 575     }
 576     world.windb.ids = try_malloc(2, f_name);
 577     sprintf(world.windb.ids, "%c", win->id);
 578     world.windb.wins = try_malloc(sizeof(struct Win), f_name);
 579     world.windb.wins[0] = *win;
 580 }
 581
 582
 583
 584 extern uint16_t center_offset(uint16_t position, uint16_t mapsize,
 585                               uint16_t frame_size)
 586 {
 587     uint16_t offset = 0;
 588     if (mapsize > frame_size)
 589     {
 590         if (position > frame_size / 2)
 591         {
 592             if (position < mapsize - (frame_size / 2))
 593             {
 594                 offset = position - (frame_size / 2);
 595             }
 596             else
 597             {
 598                 offset = mapsize - frame_size;
 599             }
 600         }
 601     }
 602     return offset;
 603 }
 604
 605
 606
 607 extern struct Win * get_win_by_id(char id)
 608 {
 609     uint8_t i = 0;
 610     while ('\0' != world.windb.ids[i])
 611     {
 612         if (id == world.windb.ids[i])
 613         {
 614             return &world.windb.wins[i];
 615         }
 616         i++;
 617     }
 618     return NULL;
 619 }
 620
 621
 622
 623 extern uint8_t read_winconf_from_file(char * line, uint32_t linemax,
 624                                       FILE * file)
 625 {
 626     char * f_name = "read_winconf_from_file()";
 627     int test = try_fgetc(file, f_name);
 628     if (EOF == test)
 629     {
 630         return 0;
 631     }
 632     struct Win win;
 633     memset(&win, 0, sizeof(struct 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     add_win_to_windb(&win);
 648     return 1;
 649 }
 650
 651
 652
 653 extern void write_winconf_of_id_to_file(FILE * file, char c, char * delim)
 654 {
 655     char * f_name = "write_winconf_of_id_to_file()";
 656     struct Win * wc = get_win_by_id(c);
 657     uint8_t size = strlen(wc->title) + 2;
 658     if (size < 7)  /* Ensure that at least 5 + 2 char fit into line so that   */
 659     {              /* the digit representation of any uint16_t may be stored. */
 660         size = 7;
 661     }
 662     char line[size];
 663     sprintf(line, "%c\n", wc->id);
 664     try_fwrite(line, sizeof(char), strlen(line), file, f_name);
 665     sprintf(line, "%s\n", wc->title);
 666     try_fwrite(line, sizeof(char), strlen(line), file, f_name);
 667     sprintf(line, "%d\n", wc->target_height);
 668     try_fwrite(line, sizeof(char), strlen(line), file, f_name);
 669     sprintf(line, "%d\n", wc->target_width);
 670     try_fwrite(line, sizeof(char), strlen(line), file, f_name);
 671     write_keybindings_to_file(file, &wc->kb, delim);
 672 }
 673
 674
 675
 676 extern void read_order_wins_visible_active(char * line, uint32_t linemax,
 677                                            FILE * file)
 678 {
 679     char * f_name = "read_order_wins_visible_active()";
 680     char win_order[linemax + 1];
 681     try_fgets(win_order, linemax + 1, file, f_name);
 682     win_order[strlen(win_order) - 1] = '\0';
 683     world.windb.order = try_malloc(strlen(win_order) + 1, f_name);
 684     sprintf(world.windb.order, "%s", win_order);
 685     int char_or_eof = try_fgetc(file, f_name);
 686     char * err_eof = "fgetc() unexpectedly hitting EOF";
 687     exit_trouble(EOF == char_or_eof, f_name, err_eof);
 688     world.windb.active = (uint8_t) char_or_eof;
 689     exit_trouble(EOF == try_fgetc(file, f_name), f_name, err_eof);
 690     try_fgets(line, linemax + 1, file, f_name);
 691 }
 692
 693
 694
 695 extern void write_order_wins_visible_active(FILE * file, char * delim)
 696 {
 697     char * f_name = "write_order_wins_visible_active()";
 698     try_fwrite(world.windb.order, strlen(world.windb.order), 1, file, f_name);
 699     try_fputc('\n', file, f_name);
 700     try_fputc(world.windb.active, file, f_name);
 701     try_fputc('\n', file, f_name);
 702     try_fwrite(delim, strlen(delim), 1, file, f_name);
 703 }
 704
 705
 706
 707 extern void make_v_screen_and_init_win_sizes()
 708 {
 709     char * f_name = "make_v_screen_and_init_win_sizes()";
 710     char * err_s = "creating an illegaly large virtual screen";
 711     char * err_m = "triggering a memory allocation error via newpad()";
 712     uint32_t maxy_test = getmaxy(world.windb.t_screen);
 713     uint32_t maxx_test = getmaxx(world.windb.t_screen);
 714     exit_trouble(maxy_test>UINT16_MAX || maxx_test>UINT16_MAX, f_name, err_s);
 715     world.windb.v_screen_size.y = maxy_test;
 716     world.windb.v_screen_size.x = maxx_test;
 717     world.windb.v_screen = newpad(world.windb.v_screen_size.y, 1);
 718     exit_trouble(NULL == world.windb.v_screen, f_name, err_m);
 719     char id;
 720     while (0 != (id = get_next_win_id()))
 721     {
 722         init_win_size_from_winconf_and_v_screen_size(id);
 723     }
 724 }
 725
 726
 727
 728 extern void free_windb()
 729 {
 730     char id;
 731     while (0 != (id = get_next_win_id()))
 732     {
 733         struct Win * wc = get_win_by_id(id);
 734         free(wc->title);
 735         free_keybindings(wc->kb.kbs);
 736     }
 737     free(world.windb.ids);
 738     world.windb.ids = NULL;
 739     free(world.windb.wins);
 740     world.windb.wins = NULL;
 741     free(world.windb.order);
 742     world.windb.order = NULL;
 743 }
 744
 745
 746
 747 extern void winch_called(int signal)
 748 {
 749     world.winch = 1;
 750 }
 751
 752
 753
 754 extern void reset_windows_on_winch()
 755 {
 756     endwin();  /* "[S]tandard way" to recalibrate ncurses post SIGWINCH, says */
 757     refresh(); /* <http://invisible-island.net/ncurses/ncurses-intro.html>.   */
 758     char tmp_order[strlen(world.windb.order) + 1];
 759     sprintf(tmp_order, "%s", world.windb.order);
 760     uint8_t i;
 761     char tmp_active = world.windb.active;
 762     for (i = 0; i < strlen(tmp_order); toggle_window(tmp_order[i]), i++);
 763     delwin(world.windb.v_screen);
 764     make_v_screen_and_init_win_sizes();
 765     for (i = 0; i < strlen(tmp_order); toggle_window(tmp_order[i]), i++);
 766     world.windb.active = tmp_active;
 767 }
 768
 769
 770
 771 extern void draw_all_wins()
 772 {
 773     /* Empty everything before filling it a-new. */
 774     erase();
 775     wnoutrefresh(world.windb.t_screen);
 776     werase(world.windb.v_screen);
 777     if (world.windb.active)
 778     {
 779
 780         /* Draw borders, wins. Order matters: corners should overwrite lines. */
 781         draw_wins_borderlines(get_win_by_id(world.windb.order[0]));
 782         draw_wins_bordercorners(get_win_by_id(world.windb.order[0]));
 783         draw_wins(get_win_by_id(world.windb.order[0]));
 784
 785         /* Draw .v_screen scroll hints. */
 786         struct yx_uint16 start;
 787         start.y = 0;
 788         start.x = world.windb.v_screen_offset;
 789         char * cols_string = "columns";
 790         if (world.windb.v_screen_offset > 0)
 791         {
 792             scroll_hint(world.windb.v_screen_size, '<',
 793                         world.windb.v_screen_offset + 1, cols_string, start);
 794         }
 795         uint16_t size_x = getmaxx(world.windb.v_screen);
 796         uint16_t right_edge =   world.windb.v_screen_offset
 797                               + world.windb.v_screen_size.x;
 798         if (right_edge < size_x - 1)
 799         {
 800             scroll_hint(world.windb.v_screen_size, '>',
 801                         size_x - right_edge, cols_string, start);
 802         }
 803
 804         /* Put .v_screen segment to be shown on .t_screen to .t_screen buffer.*/
 805         pnoutrefresh(world.windb.v_screen, 0, world.windb.v_screen_offset, 0, 0,
 806                      world.windb.v_screen_size.y,
 807                      world.windb.v_screen_size.x - 1);
 808     }
 809
 810     /* Only at the end write accumulated changes to .t_screen. */
 811     doupdate();
 812 }
 813
 814
 815
 816 extern void toggle_window(char id)
 817 {
 818     struct Win * win = get_win_by_id(id);
 819     if (NULL == strchr(world.windb.order, id))
 820     {
 821         append_win(win);
 822         return;
 823     }
 824     suspend_win(win);
 825 }
 826
 827
 828
 829 extern void toggle_winconfig()
 830 {
 831     if (!world.windb.active)
 832     {
 833         return;
 834     }
 835     struct Win * w = get_win_by_id(world.windb.active);
 836     if      (0 == w->view)
 837     {
 838         w->view          = 1;
 839         w->target_center = w->center;
 840         memset(&w->center, 0, sizeof(struct yx_uint16));
 841         return;
 842     }
 843     else if (1 == w->view)
 844     {
 845         w->view          = 2;
 846         w->center.x      = 0;
 847         return;
 848     }
 849     w->view          = 0;
 850     w->center        = w->target_center;
 851 }
 852
 853
 854
 855 extern void toggle_win_size_type(char axis)
 856 {
 857     struct Win * w = get_win_by_id(world.windb.active);
 858     if ('y' == axis)
 859     {
 860         w->target_height_type = (0 == w->target_height_type);
 861         set_win_target_size(w);
 862         return;
 863     }
 864     w->target_width_type = (   0 == w->target_width_type
 865                             && w->frame_size.x <= world.windb.v_screen_size.x);
 866     set_win_target_size(w);
 867 }
 868
 869
 870
 871 extern void resize_active_win(char change)
 872 {
 873     if (world.windb.active)
 874     {
 875         struct Win * w = get_win_by_id(world.windb.active);
 876         if      (change == '-' && w->frame_size.y > 1)
 877         {
 878             w->frame_size.y--;
 879         }
 880         else if (change == '_' && w->frame_size.y > 1)
 881         {
 882             w->frame_size.x--;
 883         }
 884         else if (   change == '+'
 885                  && w->frame_size.y < world.windb.v_screen_size.y - 1)
 886         {
 887             w->frame_size.y++;
 888         }
 889         else if (change == '*' && w->frame_size.y < UINT16_MAX)
 890         {
 891             w->frame_size.x++;
 892         }
 893         if (   1 == w->target_width_type
 894             && w->frame_size.x > world.windb.v_screen_size.x)
 895         {
 896             w->target_width_type = 0;
 897         }
 898         set_win_target_size(w);
 899         update_wins(w);
 900     }
 901 }
 902
 903
 904
 905 extern void shift_active_win(char dir)
 906 {
 907     uint8_t len_order = strlen(world.windb.order);
 908     if (1 < len_order)
 909     {
 910         char tmp[len_order + 1];
 911         tmp[len_order] = '\0';
 912         uint8_t pos = get_pos_in_order(world.windb.active);
 913         if ('f' == dir)
 914         {
 915             if (pos == len_order - 1)
 916             {
 917                 memcpy(tmp + 1, world.windb.order, len_order - 1);
 918                 tmp[0] = world.windb.active;
 919                 memcpy(world.windb.order, tmp, len_order + 1);
 920             }
 921             else
 922             {
 923                 world.windb.order[pos] = world.windb.order[pos + 1];
 924                 world.windb.order[pos + 1] = world.windb.active;
 925             }
 926         }
 927         else
 928         {
 929             if (pos == 0)
 930             {
 931                 memcpy(tmp, world.windb.order + 1, len_order - 1);
 932                 tmp[len_order - 1] = world.windb.active;
 933                 memcpy(world.windb.order, tmp, len_order + 1);
 934             }
 935             else
 936             {
 937                 world.windb.order[pos] = world.windb.order[pos - 1];
 938                 world.windb.order[pos - 1] = world.windb.active;
 939             }
 940         }
 941         update_wins(get_win_by_id(world.windb.order[0]));
 942     }
 943 }
 944
 945
 946
 947 extern void scroll_v_screen(char dir)
 948 {
 949     if      (   '+' == dir
 950              &&   world.windb.v_screen_offset + world.windb.v_screen_size.x + 1
 951                 < getmaxx(world.windb.v_screen))
 952     {
 953         world.windb.v_screen_offset++;
 954     }
 955     else if (   '-' == dir
 956              && world.windb.v_screen_offset > 0)
 957     {
 958         world.windb.v_screen_offset--;
 959     }
 960 }
 961
 962
 963
 964 extern void cycle_active_win(char dir)
 965 {
 966     uint8_t len_order = strlen(world.windb.order);
 967     if (1 < len_order)
 968     {
 969         uint8_t pos = get_pos_in_order(world.windb.active);
 970         if ('f' == dir)
 971         {
 972             world.windb.active = world.windb.order[pos + 1];
 973             if ('\0' == world.windb.active)
 974             {
 975                 world.windb.active = world.windb.order[0];
 976             }
 977             return;
 978         }
 979         if (pos > 0)
 980         {
 981             world.windb.active = world.windb.order[pos - 1];
 982             return;
 983         }
 984         world.windb.active = world.windb.order[len_order - 1];
 985     }
 986 }