home · contact · privacy
Test return values of _all_ *printf() calls.
[plomrogue] / src / client / control.c
1 /* src/client/control.c */
2
3 #include "control.h"
4 #include <stdint.h> /* uint8_t, uint16_t, uint32_t, UINT32_MAX */
5 #include <stdlib.h> /* free() */
6 #include <stdio.h> /* sprintf() */
7 #include <string.h> /* strlen() */
8 #include "../common/rexit.h" /* exit_err(), exit_trouble() */
9 #include "../common/try_malloc.h" /* try_malloc() */
10 #include "interface_conf.h" /* reload_interface_conf(), save_interface_conf() */
11 #include "io.h" /* send() */
12 #include "keybindings.h" /* get_command_to_keycode(), get_keycode_to_command(),
13                           * mod_selected_keyb(), move_keyb_selection()
14                           */
15 #include "map.h" /* map_scroll(), map_center(), toggle_autofocus() */
16 #include "wincontrol.h" /* shift_active_win(), resize_active_win(),
17                          * toggle_win_size_type(), toggle_window(),
18                          * cycle_active_win(), scroll_v_screen(),
19                          * toggle_linebreak_type(), toggle_winconfig()
20                          */
21 #include "windows.h" /* get_win_by_id() */
22 #include "world.h" /* world */
23
24
25
26 /* Move world.inventory_sel up ("dir"="u") or down (else) as far as possible. */
27 static void nav_inventory(char dir);
28
29 /* If "command"'s .dsc_short fits "match", apply "f" with provided char
30  * arguments and return 1; else, return 0.
31  */
32 static uint8_t try_0args(struct Command * command, char * match, void (* f) ());
33 static uint8_t try_1args(struct Command * command, char * match,
34                          void (* f) (char), char c);
35 static uint8_t try_2args(struct Command * command, char * match,
36                          void (* f) (char, char), char c1, char c2);
37
38 /* Try if "command" matches a hard-coded list of client-only commands and, if
39  * successful, execute the match and return 1. Else, return 0.
40  */
41 static uint8_t try_client_commands(struct Command * command);
42
43 /* Try out "command" as one for server messaging; sending is .server_msg,
44  * followed by either a string representing "command"'s .arg, or, if .arg is
45  * 'i', world.player_inventory_select. Return 1 on success, 0 on failure.
46  */
47 static uint8_t try_server_commands(struct Command * command);
48
49
50
51 static void nav_inventory(char dir)
52 {
53     if ('u' == dir)
54     {
55         world.player_inventory_select = world.player_inventory_select
56                                         - (world.player_inventory_select > 0);
57         return;
58     }
59     uint8_t n_elems = 0;
60     uint32_t i;
61     char * err = "Inventory string is too large.";
62     exit_err(UINT32_MAX <= strlen(world.player_inventory), err);
63     for (i = 0; '\0' != world.player_inventory[i]; i++)
64     {
65         n_elems = n_elems + ('\n' == world.player_inventory[i]);
66     }
67     world.player_inventory_select = world.player_inventory_select
68                                     + (world.player_inventory_select < n_elems);
69 }
70
71
72
73 static uint8_t try_0args(struct Command * command, char * match, void (* f) ())
74 {
75     if (!strcmp(command->dsc_short, match))
76     {
77         f();
78         return 1;
79     }
80     return 0;
81 }
82
83 static uint8_t try_1args(struct Command * command, char * match,
84                              void (* f) (char), char c)
85 {
86     if (!strcmp(command->dsc_short, match))
87     {
88         f(c);
89         return 1;
90     }
91     return 0;
92 }
93
94
95
96 static uint8_t try_2args(struct Command * command, char * match,
97                              void (* f) (char, char), char c1, char c2)
98 {
99     if (!strcmp(command->dsc_short, match))
100     {
101         f(c1, c2);
102         return 1;
103     }
104     return 0;
105 }
106
107
108
109 static uint8_t try_client_commands(struct Command * command)
110 {
111     return (   try_0args(command, "map_c", map_center)
112             || try_0args(command, "to_autofocus", toggle_autofocus)
113             || try_1args(command, "map_u", map_scroll, '8')
114             || try_1args(command, "map_d", map_scroll, '2')
115             || try_1args(command, "map_r", map_scroll, '6')
116             || try_1args(command, "map_l", map_scroll, '4')
117             || try_1args(command, "inv_u", nav_inventory, 'u')
118             || try_1args(command, "inv_d", nav_inventory, 'd')
119             || try_1args(command, "cyc_win_f", cycle_active_win, 'f')
120             || try_1args(command, "cyc_win_b", cycle_active_win, 'b')
121             || try_1args(command, "scrl_r", scroll_v_screen, '+')
122             || try_1args(command, "scrl_l", scroll_v_screen, '-')
123             || try_1args(command, "to_a_keywin", toggle_window, 'k')
124             || try_1args(command, "to_g_keywin", toggle_window, '0')
125             || try_1args(command, "to_wg_keywin", toggle_window, '1')
126             || try_1args(command, "to_wk_keywin", toggle_window, '2')
127             || try_1args(command, "to_mapwin", toggle_window, 'm')
128             || try_1args(command, "to_infowin", toggle_window, 'i')
129             || try_1args(command, "to_inv", toggle_window, 'c')
130             || try_1args(command, "to_logwin", toggle_window, 'l')
131             || try_0args(command, "winconf", toggle_winconfig)
132             || try_1args(command, "grow_h", resize_active_win, '*')
133             || try_1args(command, "shri_h", resize_active_win, '_')
134             || try_1args(command, "grow_v", resize_active_win, '+')
135             || try_1args(command, "shri_v", resize_active_win, '-')
136             || try_0args(command, "to_break", toggle_linebreak_type)
137             || try_1args(command, "to_height_t", toggle_win_size_type, 'y')
138             || try_1args(command, "to_width_t", toggle_win_size_type, 'x')
139             || try_1args(command, "shift_f", shift_active_win, 'f')
140             || try_1args(command, "shift_b", shift_active_win, 'b')
141             || try_0args(command, "reload_conf", reload_interface_conf)
142             || try_0args(command, "save_conf", save_interface_conf)
143             || try_1args(command, "g_keys_m", mod_selected_keyb, 'G')
144             || try_2args(command, "g_keys_u", move_keyb_selection, 'G', 'u')
145             || try_2args(command, "g_keys_d", move_keyb_selection, 'G', 'd')
146             || try_1args(command, "w_keys_m", mod_selected_keyb, 'w')
147             || try_2args(command, "w_keys_u", move_keyb_selection, 'w', 'u')
148             || try_2args(command, "w_keys_d", move_keyb_selection, 'w', 'd')
149             || try_1args(command, "wg_keys_m", mod_selected_keyb, 'g')
150             || try_2args(command, "wg_keys_u", move_keyb_selection, 'g', 'u')
151             || try_2args(command, "wg_keys_d", move_keyb_selection, 'g', 'd')
152             || try_1args(command, "wk_keys_m", mod_selected_keyb, 'k')
153             || try_2args(command, "wk_keys_u", move_keyb_selection, 'k', 'u')
154             || try_2args(command, "wk_keys_d", move_keyb_selection, 'k', 'd'));
155 }
156
157
158
159 static uint8_t try_server_commands(struct Command * command)
160 {
161     char * f_name = "try_server_commands()";
162     if (command->server_msg)
163     {
164         uint8_t arg = (uint8_t) command->arg;
165         if ('i' == arg)
166         {
167             arg = world.player_inventory_select;
168         }
169         uint8_t command_size = strlen(command->server_msg);
170         uint8_t arg_size = 3;
171         char * msg = try_malloc(command_size + 1 + arg_size + 1, f_name);
172         int test = sprintf(msg, "%s %d", command->server_msg, arg);
173         exit_trouble(test < 0, f_name, "sprintf()");
174         send(msg);
175         free(msg);
176         return 1;
177     }
178     return 0;
179 }
180
181
182
183 extern uint8_t try_key(uint16_t key)
184 {
185     struct Command * command = get_command_to_keycode(&world.kb_global, key);
186     if (!command && world.winDB.active)
187     {
188         struct Win * w = get_win_by_id(world.winDB.active);
189         if      (0 == w->view)
190         {
191             command = get_command_to_keycode(&w->kb, key);
192         }
193         else if (1 == w->view)
194         {
195             command = get_command_to_keycode(&world.kb_wingeom, key);
196         }
197         else if (2 == w->view)
198         {
199             command = get_command_to_keycode(&world.kb_winkeys, key);
200         }
201     }
202     if (command)
203     {
204         if      (try_server_commands(command))
205         {
206             return 1;
207         }
208         else if (try_client_commands(command))
209         {
210             return 1;
211         }
212         else if (!strcmp("quit", command->dsc_short))
213         {
214             return 2;
215         }
216     }
217     return 0;
218 }