drivers/staging/speakup/speakup_soft.c

   1 // SPDX-License-Identifier: GPL-2.0+
   2 /* speakup_soft.c - speakup driver to register and make available
   3  * a user space device for software synthesizers.  written by: Kirk
   4  * Reiser <[email protected]>
   5  *
   6  * Copyright (C) 2003  Kirk Reiser.
   7  *
   8  * this code is specificly written as a driver for the speakup screenreview
   9  * package and is not a general device driver.
  10  */
  11
  12 #include <linux/unistd.h>
  13 #include <linux/miscdevice.h>   /* for misc_register, and SYNTH_MINOR */
  14 #include <linux/poll.h>         /* for poll_wait() */
  15
  16 /* schedule(), signal_pending(), TASK_INTERRUPTIBLE */
  17 #include <linux/sched/signal.h>
  18
  19 #include "spk_priv.h"
  20 #include "speakup.h"
  21
  22 #define DRV_VERSION "2.6"
  23 #define SOFTSYNTH_MINOR 26 /* might as well give it one more than /dev/synth */
  24 #define SOFTSYNTHU_MINOR 27 /* might as well give it one more than /dev/synth */
  25 #define PROCSPEECH 0x0d
  26 #define CLEAR_SYNTH 0x18
  27
  28 static int softsynth_probe(struct spk_synth *synth);
  29 static void softsynth_release(void);
  30 static int softsynth_is_alive(struct spk_synth *synth);
  31 static unsigned char get_index(struct spk_synth *synth);
  32
  33 static struct miscdevice synth_device, synthu_device;
  34 static int init_pos;
  35 static int misc_registered;
  36
  37 static struct var_t vars[] = {
  38         { CAPS_START, .u.s = {"\x01+3p" } },
  39         { CAPS_STOP, .u.s = {"\x01-3p" } },
  40         { PAUSE, .u.n = {"\x01P" } },
  41         { RATE, .u.n = {"\x01%ds", 2, 0, 9, 0, 0, NULL } },
  42         { PITCH, .u.n = {"\x01%dp", 5, 0, 9, 0, 0, NULL } },
  43         { VOL, .u.n = {"\x01%dv", 5, 0, 9, 0, 0, NULL } },
  44         { TONE, .u.n = {"\x01%dx", 1, 0, 2, 0, 0, NULL } },
  45         { PUNCT, .u.n = {"\x01%db", 0, 0, 2, 0, 0, NULL } },
  46         { VOICE, .u.n = {"\x01%do", 0, 0, 7, 0, 0, NULL } },
  47         { FREQUENCY, .u.n = {"\x01%df", 5, 0, 9, 0, 0, NULL } },
  48         { DIRECT, .u.n = {NULL, 0, 0, 1, 0, 0, NULL } },
  49         V_LAST_VAR
  50 };
  51
  52 /* These attributes will appear in /sys/accessibility/speakup/soft. */
  53
  54 static struct kobj_attribute caps_start_attribute =
  55         __ATTR(caps_start, 0644, spk_var_show, spk_var_store);
  56 static struct kobj_attribute caps_stop_attribute =
  57         __ATTR(caps_stop, 0644, spk_var_show, spk_var_store);
  58 static struct kobj_attribute freq_attribute =
  59         __ATTR(freq, 0644, spk_var_show, spk_var_store);
  60 static struct kobj_attribute pitch_attribute =
  61         __ATTR(pitch, 0644, spk_var_show, spk_var_store);
  62 static struct kobj_attribute punct_attribute =
  63         __ATTR(punct, 0644, spk_var_show, spk_var_store);
  64 static struct kobj_attribute rate_attribute =
  65         __ATTR(rate, 0644, spk_var_show, spk_var_store);
  66 static struct kobj_attribute tone_attribute =
  67         __ATTR(tone, 0644, spk_var_show, spk_var_store);
  68 static struct kobj_attribute voice_attribute =
  69         __ATTR(voice, 0644, spk_var_show, spk_var_store);
  70 static struct kobj_attribute vol_attribute =
  71         __ATTR(vol, 0644, spk_var_show, spk_var_store);
  72
  73 /*
  74  * We should uncomment the following definition, when we agree on a
  75  * method of passing a language designation to the software synthesizer.
  76  * static struct kobj_attribute lang_attribute =
  77  *      __ATTR(lang, 0644, spk_var_show, spk_var_store);
  78  */
  79
  80 static struct kobj_attribute delay_time_attribute =
  81         __ATTR(delay_time, 0644, spk_var_show, spk_var_store);
  82 static struct kobj_attribute direct_attribute =
  83         __ATTR(direct, 0644, spk_var_show, spk_var_store);
  84 static struct kobj_attribute full_time_attribute =
  85         __ATTR(full_time, 0644, spk_var_show, spk_var_store);
  86 static struct kobj_attribute jiffy_delta_attribute =
  87         __ATTR(jiffy_delta, 0644, spk_var_show, spk_var_store);
  88 static struct kobj_attribute trigger_time_attribute =
  89         __ATTR(trigger_time, 0644, spk_var_show, spk_var_store);
  90
  91 /*
  92  * Create a group of attributes so that we can create and destroy them all
  93  * at once.
  94  */
  95 static struct attribute *synth_attrs[] = {
  96         &caps_start_attribute.attr,
  97         &caps_stop_attribute.attr,
  98         &freq_attribute.attr,
  99 /*      &lang_attribute.attr, */
 100         &pitch_attribute.attr,
 101         &punct_attribute.attr,
 102         &rate_attribute.attr,
 103         &tone_attribute.attr,
 104         &voice_attribute.attr,
 105         &vol_attribute.attr,
 106         &delay_time_attribute.attr,
 107         &direct_attribute.attr,
 108         &full_time_attribute.attr,
 109         &jiffy_delta_attribute.attr,
 110         &trigger_time_attribute.attr,
 111         NULL,   /* need to NULL terminate the list of attributes */
 112 };
 113
 114 static struct spk_synth synth_soft = {
 115         .name = "soft",
 116         .version = DRV_VERSION,
 117         .long_name = "software synth",
 118         .init = "\01@\x01\x31y\n",
 119         .procspeech = PROCSPEECH,
 120         .delay = 0,
 121         .trigger = 0,
 122         .jiffies = 0,
 123         .full = 0,
 124         .startup = SYNTH_START,
 125         .checkval = SYNTH_CHECK,
 126         .vars = vars,
 127         .io_ops = NULL,
 128         .probe = softsynth_probe,
 129         .release = softsynth_release,
 130         .synth_immediate = NULL,
 131         .catch_up = NULL,
 132         .flush = NULL,
 133         .is_alive = softsynth_is_alive,
 134         .synth_adjust = NULL,
 135         .read_buff_add = NULL,
 136         .get_index = get_index,
 137         .indexing = {
 138                 .command = "\x01%di",
 139                 .lowindex = 1,
 140                 .highindex = 5,
 141                 .currindex = 1,
 142         },
 143         .attributes = {
 144                 .attrs = synth_attrs,
 145                 .name = "soft",
 146         },
 147 };
 148
 149 static char *get_initstring(void)
 150 {
 151         static char buf[40];
 152         char *cp;
 153         struct var_t *var;
 154
 155         memset(buf, 0, sizeof(buf));
 156         cp = buf;
 157         var = synth_soft.vars;
 158         while (var->var_id != MAXVARS) {
 159                 if (var->var_id != CAPS_START && var->var_id != CAPS_STOP &&
 160                     var->var_id != PAUSE && var->var_id != DIRECT)
 161                         cp = cp + sprintf(cp, var->u.n.synth_fmt,
 162                                           var->u.n.value);
 163                 var++;
 164         }
 165         cp = cp + sprintf(cp, "\n");
 166         return buf;
 167 }
 168
 169 static int softsynth_open(struct inode *inode, struct file *fp)
 170 {
 171         unsigned long flags;
 172         /*if ((fp->f_flags & O_ACCMODE) != O_RDONLY) */
 173         /*      return -EPERM; */
 174         spin_lock_irqsave(&speakup_info.spinlock, flags);
 175         if (synth_soft.alive) {
 176                 spin_unlock_irqrestore(&speakup_info.spinlock, flags);
 177                 return -EBUSY;
 178         }
 179         synth_soft.alive = 1;
 180         spin_unlock_irqrestore(&speakup_info.spinlock, flags);
 181         return 0;
 182 }
 183
 184 static int softsynth_close(struct inode *inode, struct file *fp)
 185 {
 186         unsigned long flags;
 187
 188         spin_lock_irqsave(&speakup_info.spinlock, flags);
 189         synth_soft.alive = 0;
 190         init_pos = 0;
 191         spin_unlock_irqrestore(&speakup_info.spinlock, flags);
 192         /* Make sure we let applications go before leaving */
 193         speakup_start_ttys();
 194         return 0;
 195 }
 196
 197 static ssize_t softsynthx_read(struct file *fp, char __user *buf, size_t count,
 198                                loff_t *pos, int unicode)
 199 {
 200         int chars_sent = 0;
 201         char __user *cp;
 202         char *init;
 203         size_t bytes_per_ch = unicode ? 3 : 1;
 204         u16 ch;
 205         int empty;
 206         unsigned long flags;
 207         DEFINE_WAIT(wait);
 208
 209         if (count < bytes_per_ch)
 210                 return -EINVAL;
 211
 212         spin_lock_irqsave(&speakup_info.spinlock, flags);
 213         while (1) {
 214                 prepare_to_wait(&speakup_event, &wait, TASK_INTERRUPTIBLE);
 215                 if (!unicode)
 216                         synth_buffer_skip_nonlatin1();
 217                 if (!synth_buffer_empty() || speakup_info.flushing)
 218                         break;
 219                 spin_unlock_irqrestore(&speakup_info.spinlock, flags);
 220                 if (fp->f_flags & O_NONBLOCK) {
 221                         finish_wait(&speakup_event, &wait);
 222                         return -EAGAIN;
 223                 }
 224                 if (signal_pending(current)) {
 225                         finish_wait(&speakup_event, &wait);
 226                         return -ERESTARTSYS;
 227                 }
 228                 schedule();
 229                 spin_lock_irqsave(&speakup_info.spinlock, flags);
 230         }
 231         finish_wait(&speakup_event, &wait);
 232
 233         cp = buf;
 234         init = get_initstring();
 235
 236         /* Keep 3 bytes available for a 16bit UTF-8-encoded character */
 237         while (chars_sent <= count - bytes_per_ch) {
 238                 if (speakup_info.flushing) {
 239                         speakup_info.flushing = 0;
 240                         ch = '\x18';
 241                 } else if (init[init_pos]) {
 242                         ch = init[init_pos++];
 243                 } else {
 244                         if (!unicode)
 245                                 synth_buffer_skip_nonlatin1();
 246                         if (synth_buffer_empty())
 247                                 break;
 248                         ch = synth_buffer_getc();
 249                 }
 250                 spin_unlock_irqrestore(&speakup_info.spinlock, flags);
 251
 252                 if ((!unicode && ch < 0x100) || (unicode && ch < 0x80)) {
 253                         u_char c = ch;
 254
 255                         if (copy_to_user(cp, &c, 1))
 256                                 return -EFAULT;
 257
 258                         chars_sent++;
 259                         cp++;
 260                 } else if (unicode && ch < 0x800) {
 261                         u_char s[2] = {
 262                                 0xc0 | (ch >> 6),
 263                                 0x80 | (ch & 0x3f)
 264                         };
 265
 266                         if (copy_to_user(cp, s, sizeof(s)))
 267                                 return -EFAULT;
 268
 269                         chars_sent += sizeof(s);
 270                         cp += sizeof(s);
 271                 } else if (unicode) {
 272                         u_char s[3] = {
 273                                 0xe0 | (ch >> 12),
 274                                 0x80 | ((ch >> 6) & 0x3f),
 275                                 0x80 | (ch & 0x3f)
 276                         };
 277
 278                         if (copy_to_user(cp, s, sizeof(s)))
 279                                 return -EFAULT;
 280
 281                         chars_sent += sizeof(s);
 282                         cp += sizeof(s);
 283                 }
 284
 285                 spin_lock_irqsave(&speakup_info.spinlock, flags);
 286         }
 287         *pos += chars_sent;
 288         empty = synth_buffer_empty();
 289         spin_unlock_irqrestore(&speakup_info.spinlock, flags);
 290         if (empty) {
 291                 speakup_start_ttys();
 292                 *pos = 0;
 293         }
 294         return chars_sent;
 295 }
 296
 297 static ssize_t softsynth_read(struct file *fp, char __user *buf, size_t count,
 298                               loff_t *pos)
 299 {
 300         return softsynthx_read(fp, buf, count, pos, 0);
 301 }
 302
 303 static ssize_t softsynthu_read(struct file *fp, char __user *buf, size_t count,
 304                                loff_t *pos)
 305 {
 306         return softsynthx_read(fp, buf, count, pos, 1);
 307 }
 308
 309 static int last_index;
 310
 311 static ssize_t softsynth_write(struct file *fp, const char __user *buf,
 312                                size_t count, loff_t *pos)
 313 {
 314         unsigned long supplied_index = 0;
 315         int converted;
 316
 317         converted = kstrtoul_from_user(buf, count, 0, &supplied_index);
 318
 319         if (converted < 0)
 320                 return converted;
 321
 322         last_index = supplied_index;
 323         return count;
 324 }
 325
 326 static __poll_t softsynth_poll(struct file *fp, struct poll_table_struct *wait)
 327 {
 328         unsigned long flags;
 329         __poll_t ret = 0;
 330
 331         poll_wait(fp, &speakup_event, wait);
 332
 333         spin_lock_irqsave(&speakup_info.spinlock, flags);
 334         if (!synth_buffer_empty() || speakup_info.flushing)
 335                 ret = EPOLLIN | EPOLLRDNORM;
 336         spin_unlock_irqrestore(&speakup_info.spinlock, flags);
 337         return ret;
 338 }
 339
 340 static unsigned char get_index(struct spk_synth *synth)
 341 {
 342         int rv;
 343
 344         rv = last_index;
 345         last_index = 0;
 346         return rv;
 347 }
 348
 349 static const struct file_operations softsynth_fops = {
 350         .owner = THIS_MODULE,
 351         .poll = softsynth_poll,
 352         .read = softsynth_read,
 353         .write = softsynth_write,
 354         .open = softsynth_open,
 355         .release = softsynth_close,
 356 };
 357
 358 static const struct file_operations softsynthu_fops = {
 359         .owner = THIS_MODULE,
 360         .poll = softsynth_poll,
 361         .read = softsynthu_read,
 362         .write = softsynth_write,
 363         .open = softsynth_open,
 364         .release = softsynth_close,
 365 };
 366
 367 static int softsynth_probe(struct spk_synth *synth)
 368 {
 369         if (misc_registered != 0)
 370                 return 0;
 371         memset(&synth_device, 0, sizeof(synth_device));
 372         synth_device.minor = SOFTSYNTH_MINOR;
 373         synth_device.name = "softsynth";
 374         synth_device.fops = &softsynth_fops;
 375         if (misc_register(&synth_device)) {
 376                 pr_warn("Couldn't initialize miscdevice /dev/softsynth.\n");
 377                 return -ENODEV;
 378         }
 379
 380         memset(&synthu_device, 0, sizeof(synthu_device));
 381         synthu_device.minor = SOFTSYNTHU_MINOR;
 382         synthu_device.name = "softsynthu";
 383         synthu_device.fops = &softsynthu_fops;
 384         if (misc_register(&synthu_device)) {
 385                 pr_warn("Couldn't initialize miscdevice /dev/softsynth.\n");
 386                 return -ENODEV;
 387         }
 388
 389         misc_registered = 1;
 390         pr_info("initialized device: /dev/softsynth, node (MAJOR 10, MINOR 26)\n");
 391         pr_info("initialized device: /dev/softsynthu, node (MAJOR 10, MINOR 27)\n");
 392         return 0;
 393 }
 394
 395 static void softsynth_release(void)
 396 {
 397         misc_deregister(&synth_device);
 398         misc_deregister(&synthu_device);
 399         misc_registered = 0;
 400         pr_info("unregistered /dev/softsynth\n");
 401         pr_info("unregistered /dev/softsynthu\n");
 402 }
 403
 404 static int softsynth_is_alive(struct spk_synth *synth)
 405 {
 406         if (synth_soft.alive)
 407                 return 1;
 408         return 0;
 409 }
 410
 411 module_param_named(start, synth_soft.startup, short, 0444);
 412
 413 MODULE_PARM_DESC(start, "Start the synthesizer once it is loaded.");
 414
 415 module_spk_synth(synth_soft);
 416
 417 MODULE_AUTHOR("Kirk Reiser <[email protected]>");
 418 MODULE_DESCRIPTION("Speakup userspace software synthesizer support");
 419 MODULE_LICENSE("GPL");
 420 MODULE_VERSION(DRV_VERSION);