1 // SPDX-License-Identifier: GPL-2.0
2 #include <linux/ctype.h>
3 #include "spk_types.h"
4 #include "spk_priv.h"
5 #include "speakup.h"
6 
7 static struct st_var_header var_headers[] = {
8 	{ "version", VERSION, VAR_PROC, NULL, NULL },
9 	{ "synth_name", SYNTH, VAR_PROC, NULL, NULL },
10 	{ "keymap", KEYMAP, VAR_PROC, NULL, NULL },
11 	{ "silent", SILENT, VAR_PROC, NULL, NULL },
12 	{ "punc_some", PUNC_SOME, VAR_PROC, NULL, NULL },
13 	{ "punc_most", PUNC_MOST, VAR_PROC, NULL, NULL },
14 	{ "punc_all", PUNC_ALL, VAR_PROC, NULL, NULL },
15 	{ "delimiters", DELIM, VAR_PROC, NULL, NULL },
16 	{ "repeats", REPEATS, VAR_PROC, NULL, NULL },
17 	{ "ex_num", EXNUMBER, VAR_PROC, NULL, NULL },
18 	{ "characters", CHARS, VAR_PROC, NULL, NULL },
19 	{ "synth_direct", SYNTH_DIRECT, VAR_PROC, NULL, NULL },
20 	{ "caps_start", CAPS_START, VAR_STRING, spk_str_caps_start, NULL },
21 	{ "caps_stop", CAPS_STOP, VAR_STRING, spk_str_caps_stop, NULL },
22 	{ "delay_time", DELAY, VAR_TIME, NULL, NULL },
23 	{ "trigger_time", TRIGGER, VAR_TIME, NULL, NULL },
24 	{ "jiffy_delta", JIFFY, VAR_TIME, NULL, NULL },
25 	{ "full_time", FULL, VAR_TIME, NULL, NULL },
26 	{ "spell_delay", SPELL_DELAY, VAR_NUM, &spk_spell_delay, NULL },
27 	{ "bleeps", BLEEPS, VAR_NUM, &spk_bleeps, NULL },
28 	{ "attrib_bleep", ATTRIB_BLEEP, VAR_NUM, &spk_attrib_bleep, NULL },
29 	{ "bleep_time", BLEEP_TIME, VAR_TIME, &spk_bleep_time, NULL },
30 	{ "cursor_time", CURSOR_TIME, VAR_TIME, NULL, NULL },
31 	{ "punc_level", PUNC_LEVEL, VAR_NUM, &spk_punc_level, NULL },
32 	{ "reading_punc", READING_PUNC, VAR_NUM, &spk_reading_punc, NULL },
33 	{ "say_control", SAY_CONTROL, VAR_NUM, &spk_say_ctrl, NULL },
34 	{ "say_word_ctl", SAY_WORD_CTL, VAR_NUM, &spk_say_word_ctl, NULL },
35 	{ "no_interrupt", NO_INTERRUPT, VAR_NUM, &spk_no_intr, NULL },
36 	{ "key_echo", KEY_ECHO, VAR_NUM, &spk_key_echo, NULL },
37 	{ "bell_pos", BELL_POS, VAR_NUM, &spk_bell_pos, NULL },
38 	{ "rate", RATE, VAR_NUM, NULL, NULL },
39 	{ "pitch", PITCH, VAR_NUM, NULL, NULL },
40 	{ "vol", VOL, VAR_NUM, NULL, NULL },
41 	{ "tone", TONE, VAR_NUM, NULL, NULL },
42 	{ "punct", PUNCT, VAR_NUM, NULL, NULL   },
43 	{ "voice", VOICE, VAR_NUM, NULL, NULL },
44 	{ "freq", FREQUENCY, VAR_NUM, NULL, NULL },
45 	{ "lang", LANG, VAR_NUM, NULL, NULL },
46 	{ "chartab", CHARTAB, VAR_PROC, NULL, NULL },
47 	{ "direct", DIRECT, VAR_NUM, NULL, NULL },
48 	{ "pause", PAUSE, VAR_STRING, spk_str_pause, NULL },
49 };
50 
51 static struct st_var_header *var_ptrs[MAXVARS] = { NULL, NULL, NULL };
52 
53 static struct punc_var_t punc_vars[] = {
54 	{ PUNC_SOME, 1 },
55 	{ PUNC_MOST, 2 },
56 	{ PUNC_ALL, 3 },
57 	{ DELIM, 4 },
58 	{ REPEATS, 5 },
59 	{ EXNUMBER, 6 },
60 	{ -1, -1 },
61 };
62 
spk_chartab_get_value(char * keyword)63 int spk_chartab_get_value(char *keyword)
64 {
65 	int value = 0;
66 
67 	if (!strcmp(keyword, "ALPHA"))
68 		value = ALPHA;
69 	else if (!strcmp(keyword, "B_CTL"))
70 		value = B_CTL;
71 	else if (!strcmp(keyword, "WDLM"))
72 		value = WDLM;
73 	else if (!strcmp(keyword, "A_PUNC"))
74 		value = A_PUNC;
75 	else if (!strcmp(keyword, "PUNC"))
76 		value = PUNC;
77 	else if (!strcmp(keyword, "NUM"))
78 		value = NUM;
79 	else if (!strcmp(keyword, "A_CAP"))
80 		value = A_CAP;
81 	else if (!strcmp(keyword, "B_CAPSYM"))
82 		value = B_CAPSYM;
83 	else if (!strcmp(keyword, "B_SYM"))
84 		value = B_SYM;
85 	return value;
86 }
87 
speakup_register_var(struct var_t * var)88 void speakup_register_var(struct var_t *var)
89 {
90 	static char nothing[2] = "\0";
91 	int i;
92 	struct st_var_header *p_header;
93 
94 	BUG_ON(!var || var->var_id < 0 || var->var_id >= MAXVARS);
95 	if (!var_ptrs[0]) {
96 		for (i = 0; i < MAXVARS; i++) {
97 			p_header = &var_headers[i];
98 			var_ptrs[p_header->var_id] = p_header;
99 			p_header->data = NULL;
100 		}
101 	}
102 	p_header = var_ptrs[var->var_id];
103 	if (p_header->data)
104 		return;
105 	p_header->data = var;
106 	switch (p_header->var_type) {
107 	case VAR_STRING:
108 		spk_set_string_var(nothing, p_header, 0);
109 		break;
110 	case VAR_NUM:
111 	case VAR_TIME:
112 		spk_set_num_var(0, p_header, E_DEFAULT);
113 		break;
114 	default:
115 		break;
116 	}
117 }
118 
speakup_unregister_var(enum var_id_t var_id)119 void speakup_unregister_var(enum var_id_t var_id)
120 {
121 	struct st_var_header *p_header;
122 
123 	BUG_ON(var_id < 0 || var_id >= MAXVARS);
124 	p_header = var_ptrs[var_id];
125 	p_header->data = NULL;
126 }
127 
spk_get_var_header(enum var_id_t var_id)128 struct st_var_header *spk_get_var_header(enum var_id_t var_id)
129 {
130 	struct st_var_header *p_header;
131 
132 	if (var_id < 0 || var_id >= MAXVARS)
133 		return NULL;
134 	p_header = var_ptrs[var_id];
135 	if (!p_header->data)
136 		return NULL;
137 	return p_header;
138 }
139 
spk_var_header_by_name(const char * name)140 struct st_var_header *spk_var_header_by_name(const char *name)
141 {
142 	int i;
143 
144 	if (!name)
145 		return NULL;
146 
147 	for (i = 0; i < MAXVARS; i++) {
148 		if (strcmp(name, var_ptrs[i]->name) == 0)
149 			return var_ptrs[i];
150 	}
151 	return NULL;
152 }
153 
spk_get_var(enum var_id_t var_id)154 struct var_t *spk_get_var(enum var_id_t var_id)
155 {
156 	BUG_ON(var_id < 0 || var_id >= MAXVARS);
157 	BUG_ON(!var_ptrs[var_id]);
158 	return var_ptrs[var_id]->data;
159 }
160 EXPORT_SYMBOL_GPL(spk_get_var);
161 
spk_get_punc_var(enum var_id_t var_id)162 struct punc_var_t *spk_get_punc_var(enum var_id_t var_id)
163 {
164 	struct punc_var_t *rv = NULL;
165 	struct punc_var_t *where;
166 
167 	where = punc_vars;
168 	while ((where->var_id != -1) && (!rv)) {
169 		if (where->var_id == var_id)
170 			rv = where;
171 		else
172 			where++;
173 	}
174 	return rv;
175 }
176 
177 /* handlers for setting vars */
spk_set_num_var(int input,struct st_var_header * var,int how)178 int spk_set_num_var(int input, struct st_var_header *var, int how)
179 {
180 	int val;
181 	int *p_val = var->p_val;
182 	char buf[32];
183 	char *cp;
184 	struct var_t *var_data = var->data;
185 
186 	if (!var_data)
187 		return -ENODATA;
188 
189 	val = var_data->u.n.value;
190 	switch (how) {
191 	case E_NEW_DEFAULT:
192 		if (input < var_data->u.n.low || input > var_data->u.n.high)
193 			return -ERANGE;
194 		var_data->u.n.default_val = input;
195 		return 0;
196 	case E_DEFAULT:
197 		val = var_data->u.n.default_val;
198 		break;
199 	case E_SET:
200 		val = input;
201 		break;
202 	case E_INC:
203 		val += input;
204 		break;
205 	case E_DEC:
206 		val -= input;
207 		break;
208 	}
209 
210 	if (val < var_data->u.n.low || val > var_data->u.n.high)
211 		return -ERANGE;
212 
213 	var_data->u.n.value = val;
214 	if (var->var_type == VAR_TIME && p_val) {
215 		*p_val = msecs_to_jiffies(val);
216 		return 0;
217 	}
218 	if (p_val)
219 		*p_val = val;
220 	if (var->var_id == PUNC_LEVEL) {
221 		spk_punc_mask = spk_punc_masks[val];
222 		return 0;
223 	}
224 	if (var_data->u.n.multiplier != 0)
225 		val *= var_data->u.n.multiplier;
226 	val += var_data->u.n.offset;
227 	if (var->var_id < FIRST_SYNTH_VAR || !synth)
228 		return 0;
229 	if (synth->synth_adjust)
230 		return synth->synth_adjust(var);
231 
232 	if (!var_data->u.n.synth_fmt)
233 		return 0;
234 	if (var->var_id == PITCH)
235 		cp = spk_pitch_buff;
236 	else
237 		cp = buf;
238 	if (!var_data->u.n.out_str)
239 		sprintf(cp, var_data->u.n.synth_fmt, (int)val);
240 	else
241 		sprintf(cp, var_data->u.n.synth_fmt, var_data->u.n.out_str[val]);
242 	synth_printf("%s", cp);
243 	return 0;
244 }
245 
spk_set_string_var(const char * page,struct st_var_header * var,int len)246 int spk_set_string_var(const char *page, struct st_var_header *var, int len)
247 {
248 	struct var_t *var_data = var->data;
249 
250 	if (!var_data)
251 		return -ENODATA;
252 	if (len > MAXVARLEN)
253 		return -E2BIG;
254 	if (!len) {
255 		if (!var_data->u.s.default_val)
256 			return 0;
257 		if (!var->p_val)
258 			var->p_val = var_data->u.s.default_val;
259 		if (var->p_val != var_data->u.s.default_val)
260 			strcpy((char *)var->p_val, var_data->u.s.default_val);
261 		return -ERESTART;
262 	} else if (var->p_val) {
263 		strcpy((char *)var->p_val, page);
264 	} else {
265 		return -E2BIG;
266 	}
267 	return 0;
268 }
269 
270 /*
271  * spk_set_mask_bits sets or clears the punc/delim/repeat bits,
272  * if input is null uses the defaults.
273  * values for how: 0 clears bits of chars supplied,
274  * 1 clears allk, 2 sets bits for chars
275  */
spk_set_mask_bits(const char * input,const int which,const int how)276 int spk_set_mask_bits(const char *input, const int which, const int how)
277 {
278 	u_char *cp;
279 	short mask = spk_punc_info[which].mask;
280 
281 	if (how & 1) {
282 		for (cp = (u_char *)spk_punc_info[3].value; *cp; cp++)
283 			spk_chartab[*cp] &= ~mask;
284 	}
285 	cp = (u_char *)input;
286 	if (!cp) {
287 		cp = spk_punc_info[which].value;
288 	} else {
289 		for (; *cp; cp++) {
290 			if (*cp < SPACE)
291 				break;
292 			if (mask < PUNC) {
293 				if (!(spk_chartab[*cp] & PUNC))
294 					break;
295 			} else if (spk_chartab[*cp] & B_NUM) {
296 				break;
297 			}
298 		}
299 		if (*cp)
300 			return -EINVAL;
301 		cp = (u_char *)input;
302 	}
303 	if (how & 2) {
304 		for (; *cp; cp++)
305 			if (*cp > SPACE)
306 				spk_chartab[*cp] |= mask;
307 	} else {
308 		for (; *cp; cp++)
309 			if (*cp > SPACE)
310 				spk_chartab[*cp] &= ~mask;
311 	}
312 	return 0;
313 }
314 
spk_strlwr(char * s)315 char *spk_strlwr(char *s)
316 {
317 	char *p;
318 
319 	if (!s)
320 		return NULL;
321 
322 	for (p = s; *p; p++)
323 		*p = tolower(*p);
324 	return s;
325 }
326 
spk_s2uchar(char * start,char * dest)327 char *spk_s2uchar(char *start, char *dest)
328 {
329 	int val;
330 
331 	val = simple_strtoul(skip_spaces(start), &start, 10);
332 	if (*start == ',')
333 		start++;
334 	*dest = (u_char)val;
335 	return start;
336 }
337