home · contact · privacy
Client: Fix memory leak.
[plomrogue] / src / client / draw_wins.c
1 /* src/client/draw_wins.c */
2
3 #define _POSIX_C_SOURCE 200809L /* strdup() */
4 #include "draw_wins.h"
5 #include <ncurses.h> /* attr_t, chtype, init_pair(), A_REVERSE, COLOR_PAIR() */
6 #include <stddef.h> /* NULL */
7 #include <stdint.h> /* uint8_t, uint16_t, uint32_t, UINT16_MAX */
8 #include <stdio.h> /* sprintf() */
9 #include <stdlib.h> /* free() */
10 #include <string.h> /* memset(), strchr(), strdup/(), strlen() */
11 #include "../common/rexit.h" /* exit_err(), exit_trouble() */
12 #include "../common/try_malloc.h" /* try_malloc() */
13 #include "keybindings.h" /* struct KeyBindingDB, get_keyname_to_keycode() */
14 #include "windows.h" /* yx_uint16, Win, get_win_by_id() */
15 #include "world.h" /* global world */
16
17
18
19 /* Apply to the winmap of Win "w" the new sizes "new_size_y" and "new_size_x"
20  * to the degree that they extend it. Re-shape the window content accordingly.
21  */
22 static void try_resize_winmap(struct Win * w, int new_size_y, int new_size_x);
23
24 /* In Win "w", write "ch" to coordinate "y"/"x". */
25 static void set_ch_on_yx(struct Win * w, int y, int x, chtype ch);
26
27 /* Add "line" into window "w" with "attri" set on all chars. add_line() selects
28  * one of the other three functions based on the "win"->linebreak mode.
29  *
30  * "wide" writes lines to full width without in-between breaks. "long" breaks
31  * lines on the right window border. "compact" replaces newlines with printable
32  * separator characters. "offset" and "last" are only relevant to the "compact"
33  * mode. "offset" reports the horizontal offset at which the line is drawn from
34  * the lowest existing winmap line on; it is updated to the next offset after
35  * the new line, to be used by the next add_line_compact() call. "last" marks
36  * the line to add as the last in the window, so no further separator is added.
37  */
38 static void add_line(struct Win * win, char * line, attr_t attri,
39                      uint16_t * offset, uint8_t last);
40 static void add_line_wide(struct Win * win, char * line, attr_t attri);
41 static void add_line_long(struct Win * win, char * line, attr_t attri);
42 static void add_line_compact(struct Win * win, char * line, attr_t attri,
43                              uint16_t * offset, uint8_t last);
44
45 /* Add linebreaks-containing "text" to "win", formatted as per "win"->linebreak.
46  *
47  * draw_text_from_bottom() prepends empty lines to "text" to push its last line
48  * to the low frame edge when the frame is of greater height than the winmap
49  * would be otherwise; else, set "win"->center.y to the winmap's lowest line.
50  */
51 static void add_text_with_linebreaks(struct Win * win, char * text);
52 static void draw_text_from_bottom(struct Win * win, char * text);
53
54 /* Return a properly formatted keybinding list line for "kb". */
55 static char * get_kb_line(struct KeyBinding * kb);
56
57 /* Draw from line "start" on config view for keybindings defined at "kb". */
58 static void draw_keybinding_config(struct Win * win, struct KeyBindingDB * kbdb,
59                                    uint16_t offset);
60
61 /* Draw into window "w" from line "start" on a "title" followed by an empty
62  * line followed by a list of all keybindings starting in "kbdb".
63  */
64 static void draw_titled_keybinding_list(char * title, struct Win * win,
65                                         uint16_t * offset, uint8_t last,
66                                         struct KeyBindingDB * kbdb);
67
68
69
70 static void try_resize_winmap(struct Win * win, int new_size_y, int new_size_x)
71 {
72     if (win->winmap_size.y >= new_size_y && win->winmap_size.x >= new_size_x)
73     {
74         return;
75     }
76     if      (win->winmap_size.y > new_size_y)
77     {
78         new_size_y = win->winmap_size.y;
79     }
80     else if (win->winmap_size.x > new_size_x)
81     {
82         new_size_x = win->winmap_size.x;
83     }
84     chtype * old_winmap = win->winmap;
85     uint32_t new_size = sizeof(chtype) * new_size_y * new_size_x;
86     win->winmap = try_malloc(new_size, __func__);
87     uint16_t y, x;
88     for (y = 0; y < new_size_y; y++)
89     {
90         for (x = 0; y < win->winmap_size.y && x < win->winmap_size.x; x++)
91         {
92             chtype ch = old_winmap[(y * win->winmap_size.x) + x];
93             win->winmap[(y * new_size_x) + x] = ch;
94         }
95         for (; x < new_size_x; x++)
96         {
97             win->winmap[(y * new_size_x) + x] = ' ';
98         }
99     }
100     free(old_winmap);
101     win->winmap_size.y = new_size_y;
102     win->winmap_size.x = new_size_x;
103 }
104
105
106
107 static void set_ch_on_yx(struct Win * win, int y, int x, chtype ch)
108 {
109     win->winmap[(y * win->winmap_size.x) + x] = ch;
110 }
111
112
113
114 static void add_line(struct Win * win, char * line, attr_t attri,
115                      uint16_t * offset, uint8_t last)
116 {
117     exit_err(strlen(line) > UINT16_MAX, "Line in add_line() too big.");
118     if      (0 == win->linebreak)
119     {
120         add_line_long(win, line, attri);
121     }
122     else if (1 == win->linebreak)
123     {
124         add_line_wide(win, line, attri);
125     }
126     else if (2 == win->linebreak)
127     {
128         add_line_compact(win, line, attri, offset, last);
129     }
130 }
131
132
133
134 static void add_line_wide(struct Win * win, char * line, attr_t attri)
135 {
136     uint16_t y_start = win->winmap_size.y;
137     uint16_t len_line = strlen(line);
138     try_resize_winmap(win, y_start + 1, win->frame_size.x);
139     try_resize_winmap(win, y_start + 1, len_line);
140     uint16_t x;
141     for (x = 0; x < len_line; x++)
142     {
143         set_ch_on_yx(win, y_start, x, line[x] | attri);
144     }
145     if (attri)
146     {
147         for (; x < win->frame_size.x; x++)
148         {
149             set_ch_on_yx(win, y_start, x, ' ' | attri);
150         }
151     }
152 }
153
154
155
156 static void add_line_long(struct Win * win, char * line, attr_t attri)
157 {
158     uint16_t y_start = win->winmap_size.y;
159     uint16_t len_line = strlen(line);
160     try_resize_winmap(win, y_start + 1, win->frame_size.x);
161     uint16_t x, y, z;
162     for (z = 0, y = y_start; z < len_line; y++)
163     {
164         for (x = 0; x < win->winmap_size.x && z < len_line; x++, z++)
165         {
166             set_ch_on_yx(win, y, x, line[z] | attri);
167         }
168         if (z < len_line)
169         {
170             try_resize_winmap(win, y + 1 + 1, win->winmap_size.x);
171         }
172     }
173 }
174
175
176
177 static void add_line_compact(struct Win * win, char * line, attr_t attri,
178                              uint16_t * offset, uint8_t last)
179 {
180     uint16_t y_start = win->winmap_size.y - (win->winmap_size.y > 0);
181     try_resize_winmap(win, y_start + 1, win->frame_size.x);
182     uint16_t len_line = strlen(line);
183     char * separator = last ? "" : " / ";
184     uint32_t len_line_new = len_line + strlen(separator);
185     char * line_new = try_malloc(len_line_new + 1, __func__);
186     int test = sprintf(line_new, "%s%s", line, separator);
187     exit_trouble(test < 0, __func__, "sprintf");
188     uint16_t x = 0;
189     uint16_t y;
190     uint32_t z;
191     for (z = 0, y = y_start; z < len_line_new; y++)
192     {
193         for (x = * offset; x < win->winmap_size.x && z < len_line_new; x++, z++)
194         {
195             set_ch_on_yx(win, y, x, line_new[z] | attri);
196             if (z + 1 == (uint32_t) len_line)
197             {
198                attri = 0;
199             }
200         }
201         * offset = 0;
202         if (z < len_line_new)
203         {
204             try_resize_winmap(win, y + 1 + 1, win->winmap_size.x);
205         }
206     }
207     free(line_new);
208     *offset = x;
209 }
210
211
212
213 static void add_text_with_linebreaks(struct Win * win, char * text)
214 {
215     char * limit;
216     uint16_t offset = 0;
217     char * text_copy = strdup(text);
218     char * start = text_copy;
219     while (NULL != (limit = strchr(start, '\n')))
220     {
221         (* limit) = '\0';
222         add_line(win, start, 0, &offset, 0);
223         start = limit + 1;
224     }
225     add_line(win, start, 0, &offset, 1);
226     free(text_copy);
227 }
228
229
230
231 static void draw_text_from_bottom(struct Win * win, char * text)
232 {
233     add_text_with_linebreaks(win, text);
234     if (win->winmap_size.y > win->frame_size.y)
235     {
236         win->center.y = win->winmap_size.y - 1;
237     }
238     else if (win->winmap_size.y < win->frame_size.y)
239     {
240         uint16_t new_y_start = win->frame_size.y - win->winmap_size.y;
241         memset(&win->winmap_size, 0, sizeof(struct yx_uint16));
242         free(win->winmap);
243         win->winmap = NULL;
244         do
245         {
246             add_line_wide(win, " ", 0);
247         }
248         while (new_y_start > win->winmap_size.y);
249         if (2 == win->linebreak) /* add_text_with_linebreaks() will start not */
250         {                        /* not after, but within the last line then. */
251             add_line_wide(win, " ", 0);
252         }
253         add_text_with_linebreaks(win, text);
254     }
255 }
256
257
258
259 static char * get_kb_line(struct KeyBinding * kb)
260 {
261     char * keyname = get_keyname_to_keycode(kb->keycode);
262     uint16_t size = strlen(keyname) + 3 + strlen(kb->command->dsc_long) + 1;
263     char * kb_line = try_malloc(size, __func__);
264     int test = sprintf(kb_line, "%s - %s", keyname, kb->command->dsc_long);
265     exit_trouble(test < 0, __func__, "sprintf");
266     free(keyname);
267     return kb_line;
268 }
269
270
271
272 static void draw_keybinding_config(struct Win * win, struct KeyBindingDB * kbdb,
273                                    uint16_t offset)
274 {
275     if (0 == kbdb->n_of_kbs)
276     {
277         add_line(win, "(none)", 0, &offset, 0);
278         return;
279     }
280     uint8_t kb_n;
281     for (kb_n = 0; kb_n < kbdb->n_of_kbs; kb_n++)
282     {
283         attr_t attri = 0;
284         if (kb_n == kbdb->select)
285         {
286             attri = A_REVERSE;
287             if (1 == kbdb->edit)
288             {
289                 attri = attri | A_BLINK;
290             }
291             win->center.y = win->winmap_size.y;
292         }
293         char * kb_line = get_kb_line(&kbdb->kbs[kb_n]);
294         add_line(win, kb_line, attri, &offset, (kbdb->n_of_kbs == kb_n + 1));
295         free(kb_line);
296     }
297 }
298
299
300
301 static void draw_titled_keybinding_list(char * title, struct Win * win,
302                                         uint16_t * offset, uint8_t last,
303                                         struct KeyBindingDB * kbdb)
304 {
305     uint8_t state = 0;
306     uint8_t kb_n = 0;
307     while (0 == state || kb_n < kbdb->n_of_kbs)
308     {
309         if (0 == state)
310         {
311             add_line(win, title, 0, offset, 0);
312             add_line(win, " ", 0, offset, 0);
313             state = 1 + (0 == kbdb->n_of_kbs);
314             continue;
315         }
316         char * kb_line = get_kb_line(&kbdb->kbs[kb_n]);
317         add_line(win, kb_line, 0, offset, (last * kbdb->n_of_kbs == kb_n + 1));
318         free(kb_line);
319         kb_n++;
320     }
321     if (2 == state)
322     {
323         add_line(win, "(none)", 0, offset, last);
324     }
325 }
326
327
328
329 extern void draw_win_log(struct Win * win)
330 {
331     if (!world.log)
332     {
333         return;
334     }
335     draw_text_from_bottom(win, world.log);
336 }
337
338
339
340 extern void draw_win_map(struct Win * win)
341 {
342     init_pair(1, COLOR_WHITE, COLOR_BLUE);
343     init_pair(2, COLOR_BLUE, COLOR_BLACK);
344     attr_t attr_fov = 0;
345     attr_t attr_mem = COLOR_PAIR(2);
346     attr_t attr_sha = COLOR_PAIR(1);
347     try_resize_winmap(win, world.map.length, world.map.length * 2);
348     uint16_t x, y, z;
349     for (y = 0, z = 0; y < world.map.length; y++)
350     {
351         for (x = 0; x < world.map.length; x++)
352         {
353             attr_t attr_c = ' ' == world.mem_map[z] ? attr_sha : attr_mem;
354             chtype c = world.mem_map[z] | attr_c;
355             set_ch_on_yx(win, y, x * 2 + (y % 2), c);
356             if (x + (y % 2) < world.map.length)
357             {
358                 set_ch_on_yx(win, y, x * 2 + (y % 2) + 1, ' ' | attr_c);
359             }
360             z++;
361         }
362     }
363     for (y = 0, z = 0; y < world.map.length; y++)
364     {
365         for (x = 0; x < world.map.length; x++)
366         {
367             if (' ' != world.map.cells[z])
368             {
369                 chtype c = world.map.cells[z] | attr_fov;
370                 set_ch_on_yx(win, y, x * 2 + (y % 2), c);
371                 if (x + (y % 2) < world.map.length)
372                 {
373                     set_ch_on_yx(win, y, x * 2 + (y % 2) + 1, ' ' | attr_fov);
374                 }
375             }
376             z++;
377         }
378     }
379 }
380
381
382
383 extern void draw_win_info(struct Win * win)
384 {
385     char * dsc_turn      = "Turn: ";
386     char * dsc_hitpoints = "\nHitpoints: ";
387     uint16_t maxl = strlen(dsc_turn) + 5 + strlen(dsc_hitpoints) + 3;
388     char * text = try_malloc(maxl + 1, __func__);
389     int test = sprintf(text, "%s%d%s%d", dsc_turn, world.turn, dsc_hitpoints,
390                                          world.player_lifepoints);
391     exit_trouble(test < 0, __func__, "sprintf");
392     add_text_with_linebreaks(win, text);
393     free(text);
394 }
395
396
397
398 extern void draw_win_inventory(struct Win * win)
399 {
400     char * limit;
401     char * text_copy = strdup(world.player_inventory);
402     char * start = text_copy;
403     uint8_t i = 0;
404     uint8_t found_selection = 0;
405     uint16_t offset = 0;
406     while (NULL != (limit = strchr(start, '\n')))
407     {
408         (* limit) = '\0';
409         attr_t attri = 0;
410         if (i == world.player_inventory_select)
411         {
412             found_selection = 1;
413             attri = A_REVERSE;
414             win->center.y = win->winmap_size.y;
415         }
416         add_line(win, start, attri, &offset, 0);
417         start = limit + 1;
418         i++;
419     }
420     win->center.y = !found_selection ? win->winmap_size.y : win->center.y;
421     add_line(win, start, !found_selection * A_REVERSE, &offset, 1);
422     free(text_copy);
423 }
424
425
426
427 extern void draw_win_available_keybindings(struct Win * win)
428 {
429     char * title = "Active window's keys:";
430     struct Win * win_active = get_win_by_id(world.winDB.active);
431     struct KeyBindingDB * kbdb = &win_active->kb;
432     if      (1 == win_active->view)
433     {
434         kbdb = &world.kb_wingeom;
435     }
436     else if (2 == win_active->view)
437     {
438         kbdb = &world.kb_winkeys;
439     }
440     uint16_t offset = 0;
441     draw_titled_keybinding_list(title, win, &offset, 0, kbdb);
442     add_line(win, " ", 0, &offset, 0);
443     title = "Global keys:";
444     draw_titled_keybinding_list(title, win, &offset, 1, &world.kb_global);
445 }
446
447
448
449
450 extern void draw_win_keybindings_global(struct Win * win)
451 {
452     win->center.y = world.kb_global.select;
453     draw_keybinding_config(win, &world.kb_global, 0);
454 }
455
456
457
458 extern void draw_win_keybindings_winconf_geometry(struct Win * win)
459 {
460     win->center.y = world.kb_wingeom.select;
461     draw_keybinding_config(win, &world.kb_wingeom, 0);
462 }
463
464
465
466 extern void draw_win_keybindings_winconf_keybindings(struct Win * win)
467 {
468     win->center.y = world.kb_winkeys.select;
469     draw_keybinding_config(win, &world.kb_winkeys, 0);
470 }
471
472
473
474 extern void draw_winconf_keybindings(struct Win * win)
475 {
476     char * title = "Window's keys:";
477     uint16_t offset = 0;
478     add_line(win, title, 0, &offset, 0);
479     add_line(win, " ", 0, &offset, 0);
480     draw_keybinding_config(win, &win->kb, offset);
481 }
482
483
484
485 extern void draw_winconf_geometry(struct Win * win)
486 {
487     char * title = "Window's geometry:\n\n";
488     char * h_title = "Height to save: ";
489     char h_value[6 + 1];                       /* 6: int16_t value max strlen */
490     int test = sprintf(h_value, "%d", win->target_height);
491     exit_trouble(test < 0, __func__, "sprintf");
492     char * h_plus = " (width in cells)\n\n";
493     char * h_minus = " (negative diff: cells to screen width)\n\n";
494     char * h_type = (1 == win->target_height_type) ? h_minus : h_plus;
495     char * w_title = "Width to save: ";
496     char w_value[6 + 1];
497     test = sprintf(w_value, "%d", win->target_width);
498     exit_trouble(test < 0, __func__, "sprintf");
499     char * w_plus = "(height in cells)\n\n";
500     char * w_minus = " (negative diff: cells to screen height)\n\n";
501     char * w_type = (1 == win->target_width_type)  ? w_minus : w_plus;
502     char * breaks_title = "Linebreak type: ";
503     char * breaks_type = (1 == win->linebreak) ? "wide" : "long";
504     breaks_type        = (2 == win->linebreak) ? "compact" : breaks_type;
505     uint16_t text_size =   strlen(title)
506                          + strlen(h_title) + strlen(h_value) + strlen(h_type)
507                          + strlen(w_title) + strlen(w_value) + strlen(w_type)
508                          + strlen(breaks_title) + strlen(breaks_type);
509     char * text = try_malloc(text_size + 1, __func__);
510     test = sprintf(text, "%s%s%s%s%s%s%s%s%s", title, h_title, h_value, h_type,
511                         w_title, w_value, w_type, breaks_title, breaks_type);
512     exit_trouble(test < 0, __func__, "sprintf");
513     add_text_with_linebreaks(win, text);
514     free(text);
515 }