drivers/staging/speakup/varhandlers.c

   1 #include <linux/ctype.h>
   2 #include "spk_types.h"
   3 #include "spk_priv.h"
   4 #include "speakup.h"
   5
   6 static 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
  49 static struct st_var_header *var_ptrs[MAXVARS] = { 0, 0, 0 };
  50
  51 static 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
  61 int 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
  86 void 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
 118 void 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
 126 struct 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
 137 struct 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
 154 struct 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 }
 160 EXPORT_SYMBOL_GPL(get_var);
 161
 162 struct 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 */
 178 int 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
 247 int 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 */
 274 int 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
 311 char *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
 322 char *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
 344 char *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
 360 char *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 }