Linux Audio

Check our new training course

Loading...
  1#include <linux/ctype.h>
  2#include "spk_types.h"
  3#include "spk_priv.h"
  4#include "speakup.h"
  5
  6static struct st_var_header var_headers[] = {
  7	{ "version", VERSION, VAR_PROC, NULL, NULL },
  8	{ "synth_name", SYNTH, VAR_PROC, NULL, NULL },
  9	{ "keymap", KEYMAP, VAR_PROC, NULL, NULL },
 10	{ "silent", SILENT, VAR_PROC, NULL, NULL },
 11	{ "punc_some", PUNC_SOME, VAR_PROC, NULL, NULL },
 12	{ "punc_most", PUNC_MOST, VAR_PROC, NULL, NULL },
 13	{ "punc_all", PUNC_ALL, VAR_PROC, NULL, NULL },
 14	{ "delimiters", DELIM, VAR_PROC, NULL, NULL },
 15	{ "repeats", REPEATS, VAR_PROC, NULL, NULL },
 16	{ "ex_num", EXNUMBER, VAR_PROC, NULL, NULL },
 17	{ "characters", CHARS, VAR_PROC, NULL, NULL },
 18	{ "synth_direct", SYNTH_DIRECT, VAR_PROC, NULL, NULL },
 19	{ "caps_start", CAPS_START, VAR_STRING, str_caps_start, NULL },
 20	{ "caps_stop", CAPS_STOP, VAR_STRING, str_caps_stop, NULL },
 21	{ "delay_time", DELAY, VAR_TIME, NULL, NULL },
 22	{ "trigger_time", TRIGGER, VAR_TIME, NULL, NULL },
 23	{ "jiffy_delta", JIFFY, VAR_TIME, NULL, NULL },
 24	{ "full_time", FULL, VAR_TIME, NULL, NULL },
 25	{ "spell_delay", SPELL_DELAY, VAR_NUM, &spell_delay, NULL },
 26	{ "bleeps", BLEEPS, VAR_NUM, &bleeps, NULL },
 27	{ "attrib_bleep", ATTRIB_BLEEP, VAR_NUM, &attrib_bleep, NULL },
 28	{ "bleep_time", BLEEP_TIME, VAR_TIME, &bleep_time, NULL },
 29	{ "cursor_time", CURSOR_TIME, VAR_TIME, NULL, NULL },
 30	{ "punc_level", PUNC_LEVEL, VAR_NUM, &punc_level, NULL },
 31	{ "reading_punc", READING_PUNC, VAR_NUM, &reading_punc, NULL },
 32	{ "say_control", SAY_CONTROL, VAR_NUM, &say_ctrl, NULL },
 33	{ "say_word_ctl", SAY_WORD_CTL, VAR_NUM, &say_word_ctl, NULL },
 34	{ "no_interrupt", NO_INTERRUPT, VAR_NUM, &no_intr, NULL },
 35	{ "key_echo", KEY_ECHO, VAR_NUM, &key_echo, NULL },
 36	{ "bell_pos", BELL_POS, VAR_NUM, &bell_pos, NULL },
 37	{ "rate", RATE, VAR_NUM, NULL, NULL },
 38	{ "pitch", PITCH, VAR_NUM, NULL, NULL },
 39	{ "vol", VOL, VAR_NUM, NULL, NULL },
 40	{ "tone", TONE, VAR_NUM, NULL, NULL },
 41	{ "punct", PUNCT, VAR_NUM, NULL, NULL   },
 42	{ "voice", VOICE, VAR_NUM, NULL, NULL },
 43	{ "freq", FREQUENCY, VAR_NUM, NULL, NULL },
 44	{ "lang", LANG, VAR_NUM, NULL, NULL },
 45	{ "chartab", CHARTAB, VAR_PROC, NULL, NULL },
 46	{ "direct", DIRECT, VAR_NUM, NULL, NULL },
 47};
 48
 49static struct st_var_header *var_ptrs[MAXVARS] = { 0, 0, 0 };
 50
 51static struct punc_var_t punc_vars[] = {
 52	{ PUNC_SOME, 1 },
 53	{ PUNC_MOST, 2 },
 54	{ PUNC_ALL, 3 },
 55	{ DELIM, 4 },
 56	{ REPEATS, 5 },
 57	{ EXNUMBER, 6 },
 58	{ -1, -1 },
 59};
 60
 61int chartab_get_value(char *keyword)
 62{
 63	int value = 0;
 64
 65	if (!strcmp(keyword, "ALPHA"))
 66		value = ALPHA;
 67	else if (!strcmp(keyword, "B_CTL"))
 68		value = B_CTL;
 69	else if (!strcmp(keyword, "WDLM"))
 70		value = WDLM;
 71	else if (!strcmp(keyword, "A_PUNC"))
 72		value = A_PUNC;
 73	else if (!strcmp(keyword, "PUNC"))
 74		value = PUNC;
 75	else if (!strcmp(keyword, "NUM"))
 76		value = NUM;
 77	else if (!strcmp(keyword, "A_CAP"))
 78		value = A_CAP;
 79	else if (!strcmp(keyword, "B_CAPSYM"))
 80		value = B_CAPSYM;
 81	else if (!strcmp(keyword, "B_SYM"))
 82		value = B_SYM;
 83	return value;
 84}
 85
 86void speakup_register_var(struct var_t *var)
 87{
 88	static char nothing[2] = "\0";
 89	int i;
 90	struct st_var_header *p_header;
 91
 92	BUG_ON(!var || var->var_id < 0 || var->var_id >= MAXVARS);
 93	if (var_ptrs[0] == NULL) {
 94		for (i = 0; i < MAXVARS; i++) {
 95			p_header = &var_headers[i];
 96			var_ptrs[p_header->var_id] = p_header;
 97			p_header->data = NULL;
 98		}
 99	}
100	p_header = var_ptrs[var->var_id];
101	if (p_header->data != NULL)
102		return;
103	p_header->data = var;
104	switch (p_header->var_type) {
105	case VAR_STRING:
106		set_string_var(nothing, p_header, 0);
107		break;
108	case VAR_NUM:
109	case VAR_TIME:
110		set_num_var(0, p_header, E_DEFAULT);
111		break;
112	default:
113		break;
114	}
115	return;
116}
117
118void speakup_unregister_var(enum var_id_t var_id)
119{
120	struct st_var_header *p_header;
121	BUG_ON(var_id < 0 || var_id >= MAXVARS);
122	p_header = var_ptrs[var_id];
123	p_header->data = NULL;
124}
125
126struct st_var_header *get_var_header(enum var_id_t var_id)
127{
128	struct st_var_header *p_header;
129	if (var_id < 0 || var_id >= MAXVARS)
130		return NULL;
131	p_header = var_ptrs[var_id];
132	if (p_header->data == NULL)
133		return NULL;
134	return p_header;
135}
136
137struct st_var_header *var_header_by_name(const char *name)
138{
139	int i;
140	struct st_var_header *where = NULL;
141
142	if (name != NULL) {
143		i = 0;
144		while ((i < MAXVARS) && (where == NULL)) {
145			if (strcmp(name, var_ptrs[i]->name) == 0)
146				where = var_ptrs[i];
147			else
148				i++;
149		}
150	}
151	return where;
152}
153
154struct var_t *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}
160EXPORT_SYMBOL_GPL(get_var);
161
162struct punc_var_t *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 == NULL)) {
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 */
178int set_num_var(int input, struct st_var_header *var, int how)
179{
180	int val;
181	short ret = 0;
182	int *p_val = var->p_val;
183	int l;
184	char buf[32];
185	char *cp;
186	struct var_t *var_data = var->data;
187	if (var_data == NULL)
188		return E_UNDEF;
189
190	if (how == E_NEW_DEFAULT) {
191		if (input < var_data->u.n.low || input > var_data->u.n.high)
192			ret = E_RANGE;
193		else
194			var_data->u.n.default_val = input;
195		return ret;
196	}
197	if (how == E_DEFAULT) {
198		val = var_data->u.n.default_val;
199		ret = SET_DEFAULT;
200	} else {
201		if (how == E_SET)
202			val = input;
203		else
204			val = var_data->u.n.value;
205		if (how == E_INC)
206			val += input;
207		else if (how == E_DEC)
208			val -= input;
209		if (val < var_data->u.n.low || val > var_data->u.n.high)
210			return E_RANGE;
211	}
212	var_data->u.n.value = val;
213	if (var->var_type == VAR_TIME && p_val != NULL) {
214		*p_val = msecs_to_jiffies(val);
215		return ret;
216	}
217	if (p_val != NULL)
218		*p_val = val;
219	if (var->var_id == PUNC_LEVEL) {
220		punc_mask = punc_masks[val];
221		return ret;
222	}
223	if (var_data->u.n.multiplier != 0)
224		val *= var_data->u.n.multiplier;
225	val += var_data->u.n.offset;
226	if (var->var_id < FIRST_SYNTH_VAR || synth == NULL)
227		return ret;
228	if (synth->synth_adjust != NULL) {
229		int status = synth->synth_adjust(var);
230		return (status != 0) ? status : ret;
231	}
232	if (!var_data->u.n.synth_fmt)
233		return ret;
234	if (var->var_id == PITCH)
235		cp = pitch_buff;
236	else
237		cp = buf;
238	if (!var_data->u.n.out_str)
239		l = sprintf(cp, var_data->u.n.synth_fmt, (int)val);
240	else
241		l = sprintf(cp,
242			var_data->u.n.synth_fmt, var_data->u.n.out_str[val]);
243	synth_printf("%s", cp);
244	return ret;
245}
246
247int set_string_var(const char *page, struct st_var_header *var, int len)
248{
249	int ret = 0;
250	struct var_t *var_data = var->data;
251	if (var_data == NULL)
252		return E_UNDEF;
253	if (len > MAXVARLEN)
254		return -E_TOOLONG;
255	if (!len) {
256		if (!var_data->u.s.default_val)
257			return 0;
258		ret = SET_DEFAULT;
259		if (!var->p_val)
260			var->p_val = var_data->u.s.default_val;
261		if (var->p_val != var_data->u.s.default_val)
262			strcpy((char *)var->p_val, var_data->u.s.default_val);
263	} else if (var->p_val)
264		strcpy((char *)var->p_val, page);
265	else
266		return -E_TOOLONG;
267	return ret;
268}
269
270/* set_mask_bits sets or clears the punc/delim/repeat bits,
271 * if input is null uses the defaults.
272 * values for how: 0 clears bits of chars supplied,
273 * 1 clears allk, 2 sets bits for chars */
274int set_mask_bits(const char *input, const int which, const int how)
275{
276	u_char *cp;
277	short mask = punc_info[which].mask;
278	if (how&1) {
279		for (cp = (u_char *)punc_info[3].value; *cp; cp++)
280			spk_chartab[*cp] &= ~mask;
281	}
282	cp = (u_char *)input;
283	if (cp == 0)
284		cp = punc_info[which].value;
285	else {
286		for ( ; *cp; cp++) {
287			if (*cp < SPACE)
288				break;
289			if (mask < PUNC) {
290				if (!(spk_chartab[*cp]&PUNC))
291					break;
292			} else if (spk_chartab[*cp]&B_NUM)
293				break;
294		}
295		if (*cp)
296			return -EINVAL;
297		cp = (u_char *)input;
298	}
299	if (how&2) {
300		for ( ; *cp; cp++)
301			if (*cp > SPACE)
302				spk_chartab[*cp] |= mask;
303	} else {
304		for ( ; *cp; cp++)
305			if (*cp > SPACE)
306				spk_chartab[*cp] &= ~mask;
307	}
308	return 0;
309}
310
311char *strlwr(char *s)
312{
313	char *p;
314	if (s == NULL)
315		return NULL;
316
317	for (p = s; *p; p++)
318		*p = tolower(*p);
319	return s;
320}
321
322char *speakup_s2i(char *start, int *dest)
323{
324	int val;
325	char ch = *start;
326	if (ch == '-' || ch == '+')
327		start++;
328	if (*start < '0' || *start > '9')
329		return start;
330	val = (*start) - '0';
331	start++;
332	while (*start >= '0' && *start <= '9') {
333		val *= 10;
334		val += (*start) - '0';
335		start++;
336	}
337	if (ch == '-')
338		*dest = -val;
339	else
340		*dest = val;
341	return start;
342}
343
344char *s2uchar(char *start, char *dest)
345{
346	int val = 0;
347	while (*start && *start <= SPACE)
348		start++;
349	while (*start >= '0' && *start <= '9') {
350		val *= 10;
351		val += (*start) - '0';
352		start++;
353	}
354	if (*start == ',')
355		start++;
356	*dest = (u_char)val;
357	return start;
358}
359
360char *xlate(char *s)
361{
362	static const char finds[] = "nrtvafe";
363	static const char subs[] = "\n\r\t\013\001\014\033";
364	static const char hx[] = "0123456789abcdefABCDEF";
365	char *p = s, *p1, *p2, c;
366	int num;
367	while ((p = strchr(p, '\\'))) {
368		p1 = p+1;
369		p2 = strchr(finds, *p1);
370		if (p2) {
371			*p++ = subs[p2-finds];
372			p1++;
373		} else if (*p1 >= '0' && *p1 <= '7') {
374			num = (*p1++)&7;
375			while (num < 256 && *p1 >= '0' && *p1 <= '7') {
376				num <<= 3;
377				num = (*p1++)&7;
378			}
379			*p++ = num;
380		} else if (*p1 == 'x' &&
381				strchr(hx, p1[1]) && strchr(hx, p1[2])) {
382			p1++;
383			c = *p1++;
384			if (c > '9')
385				c = (c - '7') & 0x0f;
386			else
387				c -= '0';
388			num = c << 4;
389			c = *p1++;
390			if (c > '9')
391				c = (c-'7')&0x0f;
392			else
393				c -= '0';
394			num += c;
395			*p++ = num;
396		} else
397			*p++ = *p1++;
398		p2 = p;
399		while (*p1)
400			*p2++ = *p1++;
401		*p2 = '\0';
402	}
403	return s;
404}