[linux-2.6-block.git] / drivers / staging / speakup / speakup_dtlk.c

/*
 * originally written by: Kirk Reiser <kirk@braille.uwo.ca>
* this version considerably modified by David Borowski, david575@rogers.com
 *
 * Copyright (C) 1998-99  Kirk Reiser.
 * Copyright (C) 2003 David Borowski.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 * specificly written as a driver for the speakup screenreview
 * package it's not a general device driver.
 * This driver is for the RC Systems DoubleTalk PC internal synthesizer.
 */
#include <linux/jiffies.h>
#include <linux/sched.h>
#include <linux/timer.h>
#include <linux/kthread.h>

#include "spk_priv.h"
#include "serialio.h"
#include "speakup_dtlk.h" /* local header file for DoubleTalk values */
#include "speakup.h"

#define DRV_VERSION "2.10"
#define PROCSPEECH 0x00

static int synth_probe(struct spk_synth *synth);
static void dtlk_release(void);
static const char *synth_immediate(struct spk_synth *synth, const char *buf);
static void do_catch_up(struct spk_synth *synth);
static void synth_flush(struct spk_synth *synth);

static int synth_lpc;
static int port_forced;
static unsigned int synth_portlist[] = {
		 0x25e, 0x29e, 0x2de, 0x31e, 0x35e, 0x39e, 0
};
static u_char synth_status;

static struct var_t vars[] = {
	{ CAPS_START, .u.s = {"\x01+35p" } },
	{ CAPS_STOP, .u.s = {"\x01-35p" } },
	{ RATE, .u.n = {"\x01%ds", 8, 0, 9, 0, 0, NULL } },
	{ PITCH, .u.n = {"\x01%dp", 50, 0, 99, 0, 0, NULL } },
	{ VOL, .u.n = {"\x01%dv", 5, 0, 9, 0, 0, NULL } },
	{ TONE, .u.n = {"\x01%dx", 1, 0, 2, 0, 0, NULL } },
	{ PUNCT, .u.n = {"\x01%db", 7, 0, 15, 0, 0, NULL } },
	{ VOICE, .u.n = {"\x01%do", 0, 0, 7, 0, 0, NULL } },
	{ FREQUENCY, .u.n = {"\x01%df", 5, 0, 9, 0, 0, NULL } },
	{ DIRECT, .u.n = {NULL, 0, 0, 1, 0, 0, NULL } },
	V_LAST_VAR
};

/*
 * These attributes will appear in /sys/accessibility/speakup/dtlk.
 */
static struct kobj_attribute caps_start_attribute =
	__ATTR(caps_start, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute caps_stop_attribute =
	__ATTR(caps_stop, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute freq_attribute =
	__ATTR(freq, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute pitch_attribute =
	__ATTR(pitch, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute punct_attribute =
	__ATTR(punct, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute rate_attribute =
	__ATTR(rate, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute tone_attribute =
	__ATTR(tone, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute voice_attribute =
	__ATTR(voice, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute vol_attribute =
	__ATTR(vol, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);

static struct kobj_attribute delay_time_attribute =
	__ATTR(delay_time, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute direct_attribute =
	__ATTR(direct, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute full_time_attribute =
	__ATTR(full_time, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute jiffy_delta_attribute =
	__ATTR(jiffy_delta, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);
static struct kobj_attribute trigger_time_attribute =
	__ATTR(trigger_time, S_IWUSR|S_IRUGO, spk_var_show, spk_var_store);

/*
 * Create a group of attributes so that we can create and destroy them all
 * at once.
 */
static struct attribute *synth_attrs[] = {
	&caps_start_attribute.attr,
	&caps_stop_attribute.attr,
	&freq_attribute.attr,
	&pitch_attribute.attr,
	&punct_attribute.attr,
	&rate_attribute.attr,
	&tone_attribute.attr,
	&voice_attribute.attr,
	&vol_attribute.attr,
	&delay_time_attribute.attr,
	&direct_attribute.attr,
	&full_time_attribute.attr,
	&jiffy_delta_attribute.attr,
	&trigger_time_attribute.attr,
	NULL,	/* need to NULL terminate the list of attributes */
};

static struct spk_synth synth_dtlk = {
	.name = "dtlk",
	.version = DRV_VERSION,
	.long_name = "DoubleTalk PC",
	.init = "\x01@\x01\x31y",
	.procspeech = PROCSPEECH,
	.clear = SYNTH_CLEAR,
	.delay = 500,
	.trigger = 30,
	.jiffies = 50,
	.full = 1000,
	.startup = SYNTH_START,
	.checkval = SYNTH_CHECK,
	.vars = vars,
	.probe = synth_probe,
	.release = dtlk_release,
	.synth_immediate = synth_immediate,
	.catch_up = do_catch_up,
	.flush = synth_flush,
	.is_alive = spk_synth_is_alive_nop,
	.synth_adjust = NULL,
	.read_buff_add = NULL,
	.get_index = spk_serial_in_nowait,
	.indexing = {
		.command = "\x01%di",
		.lowindex = 1,
		.highindex = 5,
		.currindex = 1,
	},
	.attributes = {
		.attrs = synth_attrs,
		.name = "dtlk",
	},
};

static inline bool synth_readable(void)
{
	synth_status = inb_p(speakup_info.port_tts + UART_RX);
	return (synth_status & TTS_READABLE) != 0;
}

static inline bool synth_writable(void)
{
	synth_status = inb_p(speakup_info.port_tts + UART_RX);
	return (synth_status & TTS_WRITABLE) != 0;
}

static inline bool synth_full(void)
{
	synth_status = inb_p(speakup_info.port_tts + UART_RX);
	return (synth_status & TTS_ALMOST_FULL) != 0;
}

static void spk_out(const char ch)
{
	int timeout = SPK_XMITR_TIMEOUT;

	while (!synth_writable()) {
		if (!--timeout)
			break;
		udelay(1);
	}
	outb_p(ch, speakup_info.port_tts);
	timeout = SPK_XMITR_TIMEOUT;
	while (synth_writable()) {
		if (!--timeout)
			break;
		udelay(1);
	}
}

static void do_catch_up(struct spk_synth *synth)
{
	u_char ch;
	unsigned long flags;
	unsigned long jiff_max;
	struct var_t *jiffy_delta;
	struct var_t *delay_time;
	int jiffy_delta_val;
	int delay_time_val;

	jiffy_delta = spk_get_var(JIFFY);
	delay_time = spk_get_var(DELAY);
	spin_lock_irqsave(&speakup_info.spinlock, flags);
	jiffy_delta_val = jiffy_delta->u.n.value;
	spin_unlock_irqrestore(&speakup_info.spinlock, flags);
	jiff_max = jiffies + jiffy_delta_val;
	while (!kthread_should_stop()) {
		spin_lock_irqsave(&speakup_info.spinlock, flags);
		if (speakup_info.flushing) {
			speakup_info.flushing = 0;
			spin_unlock_irqrestore(&speakup_info.spinlock, flags);
			synth->flush(synth);
			continue;
		}
		if (synth_buffer_empty()) {
			spin_unlock_irqrestore(&speakup_info.spinlock, flags);
			break;
		}
		set_current_state(TASK_INTERRUPTIBLE);
		delay_time_val = delay_time->u.n.value;
		spin_unlock_irqrestore(&speakup_info.spinlock, flags);
		if (synth_full()) {
			schedule_timeout(msecs_to_jiffies(delay_time_val));
			continue;
		}
		set_current_state(TASK_RUNNING);
		spin_lock_irqsave(&speakup_info.spinlock, flags);
		ch = synth_buffer_getc();
		spin_unlock_irqrestore(&speakup_info.spinlock, flags);
		if (ch == '\n')
			ch = PROCSPEECH;
		spk_out(ch);
		if (time_after_eq(jiffies, jiff_max) && (ch == SPACE)) {
			spk_out(PROCSPEECH);
			spin_lock_irqsave(&speakup_info.spinlock, flags);
			delay_time_val = delay_time->u.n.value;
			jiffy_delta_val = jiffy_delta->u.n.value;
			spin_unlock_irqrestore(&speakup_info.spinlock, flags);
			schedule_timeout(msecs_to_jiffies(delay_time_val));
			jiff_max = jiffies + jiffy_delta_val;
		}
	}
	spk_out(PROCSPEECH);
}

static const char *synth_immediate(struct spk_synth *synth, const char *buf)
{
	u_char ch;

	while ((ch = (u_char)*buf)) {
		if (synth_full())
			return buf;
		if (ch == '\n')
			ch = PROCSPEECH;
		spk_out(ch);
		buf++;
	}
	return NULL;
}

static void synth_flush(struct spk_synth *synth)
{
	outb_p(SYNTH_CLEAR, speakup_info.port_tts);
	while (synth_writable())
		cpu_relax();
}

static char synth_read_tts(void)
{
	u_char ch;

	while (!synth_readable())
		cpu_relax();
	ch = synth_status & 0x7f;
	outb_p(ch, speakup_info.port_tts);
	while (synth_readable())
		cpu_relax();
	return (char) ch;
}

/* interrogate the DoubleTalk PC and return its settings */
static struct synth_settings *synth_interrogate(struct spk_synth *synth)
{
	u_char *t;
	static char buf[sizeof(struct synth_settings) + 1];
	int total, i;
	static struct synth_settings status;

	synth_immediate(synth, "\x18\x01?");
	for (total = 0, i = 0; i < 50; i++) {
		buf[total] = synth_read_tts();
		if (total > 2 && buf[total] == 0x7f)
			break;
		if (total < sizeof(struct synth_settings))
			total++;
	}
	t = buf;
	/* serial number is little endian */
	status.serial_number = t[0] + t[1]*256;
	t += 2;
	for (i = 0; *t != '\r'; t++) {
		status.rom_version[i] = *t;
		if (i < sizeof(status.rom_version)-1)
			i++;
	}
	status.rom_version[i] = 0;
	t++;
	status.mode = *t++;
	status.punc_level = *t++;
	status.formant_freq = *t++;
	status.pitch = *t++;
	status.speed = *t++;
	status.volume = *t++;
	status.tone = *t++;
	status.expression = *t++;
	status.ext_dict_loaded = *t++;
	status.ext_dict_status = *t++;
	status.free_ram = *t++;
	status.articulation = *t++;
	status.reverb = *t++;
	status.eob = *t++;
	return &status;
}

static int synth_probe(struct spk_synth *synth)
{
		unsigned int port_val = 0;
	int i = 0;
	struct synth_settings *sp;

	pr_info("Probing for DoubleTalk.\n");
	if (port_forced) {
		speakup_info.port_tts = port_forced;
		pr_info("probe forced to %x by kernel command line\n",
				speakup_info.port_tts);
		if ((port_forced & 0xf) != 0xf)
			pr_info("warning: port base should probably end with f\n");
		if (synth_request_region(speakup_info.port_tts-1,
					SYNTH_IO_EXTENT)) {
			pr_warn("sorry, port already reserved\n");
			return -EBUSY;
		}
		port_val = inw(speakup_info.port_tts-1);
		synth_lpc = speakup_info.port_tts-1;
	} else {
		for (i = 0; synth_portlist[i]; i++) {
			if (synth_request_region(synth_portlist[i],
						SYNTH_IO_EXTENT))
				continue;
			port_val = inw(synth_portlist[i]) & 0xfbff;
			if (port_val == 0x107f) {
				synth_lpc = synth_portlist[i];
				speakup_info.port_tts = synth_lpc+1;
				break;
			}
			synth_release_region(synth_portlist[i],
					SYNTH_IO_EXTENT);
		}
	}
	port_val &= 0xfbff;
	if (port_val != 0x107f) {
		pr_info("DoubleTalk PC: not found\n");
		synth_release_region(synth_lpc, SYNTH_IO_EXTENT);
		return -ENODEV;
	}
	while (inw_p(synth_lpc) != 0x147f)
		cpu_relax(); /* wait until it's ready */
	sp = synth_interrogate(synth);
	pr_info("%s: %03x-%03x, ROM ver %s, s/n %u, driver: %s\n",
		synth->long_name, synth_lpc, synth_lpc+SYNTH_IO_EXTENT - 1,
	 sp->rom_version, sp->serial_number, synth->version);
	synth->alive = 1;
	return 0;
}

static void dtlk_release(void)
{
	if (speakup_info.port_tts)
		synth_release_region(speakup_info.port_tts-1, SYNTH_IO_EXTENT);
	speakup_info.port_tts = 0;
}

module_param_named(port, port_forced, int, S_IRUGO);
module_param_named(start, synth_dtlk.startup, short, S_IRUGO);

MODULE_PARM_DESC(port, "Set the port for the synthesizer (override probing).");
MODULE_PARM_DESC(start, "Start the synthesizer once it is loaded.");

static int __init dtlk_init(void)
{
	return synth_add(&synth_dtlk);
}

static void __exit dtlk_exit(void)
{
	synth_remove(&synth_dtlk);
}

module_init(dtlk_init);
module_exit(dtlk_exit);
MODULE_AUTHOR("Kirk Reiser <kirk@braille.uwo.ca>");
MODULE_AUTHOR("David Borowski");
MODULE_DESCRIPTION("Speakup support for DoubleTalk PC synthesizers");
MODULE_LICENSE("GPL");
MODULE_VERSION(DRV_VERSION);
Commit	Line	Data
c6e3fd22 WH	1	/*
	2	* originally written by: Kirk Reiser <kirk@braille.uwo.ca>
	3	* this version considerably modified by David Borowski, david575@rogers.com
	4	*
	5	* Copyright (C) 1998-99 Kirk Reiser.
	6	* Copyright (C) 2003 David Borowski.
	7	*
	8	* This program is free software; you can redistribute it and/or modify
	9	* it under the terms of the GNU General Public License as published by
	10	* the Free Software Foundation; either version 2 of the License, or
	11	* (at your option) any later version.
	12	*
	13	* This program is distributed in the hope that it will be useful,
	14	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	16	* GNU General Public License for more details.
	17	*
	18	* You should have received a copy of the GNU General Public License
	19	* along with this program; if not, write to the Free Software
	20	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	21	*
	22	* specificly written as a driver for the speakup screenreview
	23	* package it's not a general device driver.
	24	* This driver is for the RC Systems DoubleTalk PC internal synthesizer.
	25	*/
	26	#include <linux/jiffies.h>
	27	#include <linux/sched.h>
	28	#include <linux/timer.h>
	29	#include <linux/kthread.h>
	30
	31	#include "spk_priv.h"
	32	#include "serialio.h"
	33	#include "speakup_dtlk.h" /* local header file for DoubleTalk values */
	34	#include "speakup.h"
	35
	36	#define DRV_VERSION "2.10"
	37	#define PROCSPEECH 0x00
c6e3fd22 WH	38
	39	static int synth_probe(struct spk_synth *synth);
	40	static void dtlk_release(void);
	41	static const char synth_immediate(struct spk_synth synth, const char *buf);
	42	static void do_catch_up(struct spk_synth *synth);
	43	static void synth_flush(struct spk_synth *synth);
	44
	45	static int synth_lpc;
	46	static int port_forced;
2c9e0cb0 CB	47	static unsigned int synth_portlist[] = {
	48	0x25e, 0x29e, 0x2de, 0x31e, 0x35e, 0x39e, 0
	49	};
c6e3fd22 WH	50	static u_char synth_status;
	51
	52	static struct var_t vars[] = {
2c9e0cb0 CB	53	{ CAPS_START, .u.s = {"\x01+35p" } },
	54	{ CAPS_STOP, .u.s = {"\x01-35p" } },
	55	{ RATE, .u.n = {"\x01%ds", 8, 0, 9, 0, 0, NULL } },
	56	{ PITCH, .u.n = {"\x01%dp", 50, 0, 99, 0, 0, NULL } },
	57	{ VOL, .u.n = {"\x01%dv", 5, 0, 9, 0, 0, NULL } },
	58	{ TONE, .u.n = {"\x01%dx", 1, 0, 2, 0, 0, NULL } },
	59	{ PUNCT, .u.n = {"\x01%db", 7, 0, 15, 0, 0, NULL } },
	60	{ VOICE, .u.n = {"\x01%do", 0, 0, 7, 0, 0, NULL } },
	61	{ FREQUENCY, .u.n = {"\x01%df", 5, 0, 9, 0, 0, NULL } },
	62	{ DIRECT, .u.n = {NULL, 0, 0, 1, 0, 0, NULL } },
c6e3fd22 WH	63	V_LAST_VAR
	64	};
	65
	66	/*
	67	* These attributes will appear in /sys/accessibility/speakup/dtlk.
	68	*/
	69	static struct kobj_attribute caps_start_attribute =
d901aaa7	70	__ATTR(caps_start, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	71	static struct kobj_attribute caps_stop_attribute =
d901aaa7	72	__ATTR(caps_stop, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	73	static struct kobj_attribute freq_attribute =
d901aaa7	74	__ATTR(freq, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	75	static struct kobj_attribute pitch_attribute =
d901aaa7	76	__ATTR(pitch, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	77	static struct kobj_attribute punct_attribute =
d901aaa7	78	__ATTR(punct, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	79	static struct kobj_attribute rate_attribute =
d901aaa7	80	__ATTR(rate, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	81	static struct kobj_attribute tone_attribute =
d901aaa7	82	__ATTR(tone, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	83	static struct kobj_attribute voice_attribute =
d901aaa7	84	__ATTR(voice, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	85	static struct kobj_attribute vol_attribute =
d901aaa7	86	__ATTR(vol, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22 WH	87
c6e3fd22 WH	88	static struct kobj_attribute delay_time_attribute =
22c9bcad	89	__ATTR(delay_time, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	90	static struct kobj_attribute direct_attribute =
d901aaa7	91	__ATTR(direct, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	92	static struct kobj_attribute full_time_attribute =
22c9bcad	93	__ATTR(full_time, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	94	static struct kobj_attribute jiffy_delta_attribute =
22c9bcad	95	__ATTR(jiffy_delta, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22	96	static struct kobj_attribute trigger_time_attribute =
22c9bcad	97	__ATTR(trigger_time, S_IWUSR\|S_IRUGO, spk_var_show, spk_var_store);
c6e3fd22 WH	98
	99	/*
	100	* Create a group of attributes so that we can create and destroy them all
	101	* at once.
	102	*/
	103	static struct attribute *synth_attrs[] = {
	104	&caps_start_attribute.attr,
	105	&caps_stop_attribute.attr,
	106	&freq_attribute.attr,
	107	&pitch_attribute.attr,
	108	&punct_attribute.attr,
	109	&rate_attribute.attr,
	110	&tone_attribute.attr,
	111	&voice_attribute.attr,
	112	&vol_attribute.attr,
	113	&delay_time_attribute.attr,
	114	&direct_attribute.attr,
	115	&full_time_attribute.attr,
	116	&jiffy_delta_attribute.attr,
	117	&trigger_time_attribute.attr,
	118	NULL, /* need to NULL terminate the list of attributes */
	119	};
	120
	121	static struct spk_synth synth_dtlk = {
	122	.name = "dtlk",
	123	.version = DRV_VERSION,
	124	.long_name = "DoubleTalk PC",
	125	.init = "\x01@\x01\x31y",
	126	.procspeech = PROCSPEECH,
	127	.clear = SYNTH_CLEAR,
	128	.delay = 500,
	129	.trigger = 30,
	130	.jiffies = 50,
	131	.full = 1000,
	132	.startup = SYNTH_START,
	133	.checkval = SYNTH_CHECK,
	134	.vars = vars,
	135	.probe = synth_probe,
	136	.release = dtlk_release,
	137	.synth_immediate = synth_immediate,
	138	.catch_up = do_catch_up,
	139	.flush = synth_flush,
	140	.is_alive = spk_synth_is_alive_nop,
	141	.synth_adjust = NULL,
	142	.read_buff_add = NULL,
	143	.get_index = spk_serial_in_nowait,
	144	.indexing = {
	145	.command = "\x01%di",
	146	.lowindex = 1,
	147	.highindex = 5,
	148	.currindex = 1,
	149	},
	150	.attributes = {
	151	.attrs = synth_attrs,
	152	.name = "dtlk",
	153	},
	154	};
	155
2c9e0cb0 CB	156	static inline bool synth_readable(void)
	157	{
	158	synth_status = inb_p(speakup_info.port_tts + UART_RX);
	159	return (synth_status & TTS_READABLE) != 0;
	160	}
	161
	162	static inline bool synth_writable(void)
	163	{
	164	synth_status = inb_p(speakup_info.port_tts + UART_RX);
	165	return (synth_status & TTS_WRITABLE) != 0;
	166	}
	167
	168	static inline bool synth_full(void)
	169	{
	170	synth_status = inb_p(speakup_info.port_tts + UART_RX);
	171	return (synth_status & TTS_ALMOST_FULL) != 0;
	172	}
	173
c6e3fd22 WH	174	static void spk_out(const char ch)
	175	{
	176	int timeout = SPK_XMITR_TIMEOUT;
8e69a811	177
2c9e0cb0	178	while (!synth_writable()) {
c6e3fd22 WH	179	if (!--timeout)
	180	break;
	181	udelay(1);
	182	}
	183	outb_p(ch, speakup_info.port_tts);
	184	timeout = SPK_XMITR_TIMEOUT;
2c9e0cb0	185	while (synth_writable()) {
c6e3fd22 WH	186	if (!--timeout)
	187	break;
	188	udelay(1);
	189	}
	190	}
	191
	192	static void do_catch_up(struct spk_synth *synth)
	193	{
	194	u_char ch;
	195	unsigned long flags;
	196	unsigned long jiff_max;
	197	struct var_t *jiffy_delta;
	198	struct var_t *delay_time;
	199	int jiffy_delta_val;
	200	int delay_time_val;
	201
ca2beaf8 ST	202	jiffy_delta = spk_get_var(JIFFY);
ca2beaf8 ST	203	delay_time = spk_get_var(DELAY);
62c8c835	204	spin_lock_irqsave(&speakup_info.spinlock, flags);
c6e3fd22	205	jiffy_delta_val = jiffy_delta->u.n.value;
62c8c835	206	spin_unlock_irqrestore(&speakup_info.spinlock, flags);
c6e3fd22 WH	207	jiff_max = jiffies + jiffy_delta_val;
c6e3fd22 WH	208	while (!kthread_should_stop()) {
62c8c835	209	spin_lock_irqsave(&speakup_info.spinlock, flags);
c6e3fd22 WH	210	if (speakup_info.flushing) {
c6e3fd22 WH	211	speakup_info.flushing = 0;
62c8c835	212	spin_unlock_irqrestore(&speakup_info.spinlock, flags);
c6e3fd22 WH	213	synth->flush(synth);
	214	continue;
	215	}
	216	if (synth_buffer_empty()) {
62c8c835	217	spin_unlock_irqrestore(&speakup_info.spinlock, flags);
c6e3fd22 WH	218	break;
	219	}
	220	set_current_state(TASK_INTERRUPTIBLE);
	221	delay_time_val = delay_time->u.n.value;
62c8c835	222	spin_unlock_irqrestore(&speakup_info.spinlock, flags);
c6e3fd22 WH	223	if (synth_full()) {
	224	schedule_timeout(msecs_to_jiffies(delay_time_val));
	225	continue;
	226	}
	227	set_current_state(TASK_RUNNING);
62c8c835	228	spin_lock_irqsave(&speakup_info.spinlock, flags);
c6e3fd22	229	ch = synth_buffer_getc();
62c8c835	230	spin_unlock_irqrestore(&speakup_info.spinlock, flags);
c6e3fd22 WH	231	if (ch == '\n')
	232	ch = PROCSPEECH;
	233	spk_out(ch);
c65cfb5e	234	if (time_after_eq(jiffies, jiff_max) && (ch == SPACE)) {
c6e3fd22	235	spk_out(PROCSPEECH);
62c8c835	236	spin_lock_irqsave(&speakup_info.spinlock, flags);
c6e3fd22 WH	237	delay_time_val = delay_time->u.n.value;
c6e3fd22 WH	238	jiffy_delta_val = jiffy_delta->u.n.value;
62c8c835	239	spin_unlock_irqrestore(&speakup_info.spinlock, flags);
c6e3fd22 WH	240	schedule_timeout(msecs_to_jiffies(delay_time_val));
	241	jiff_max = jiffies + jiffy_delta_val;
	242	}
	243	}
	244	spk_out(PROCSPEECH);
	245	}
	246
	247	static const char synth_immediate(struct spk_synth synth, const char *buf)
	248	{
	249	u_char ch;
8e69a811	250
c6e3fd22 WH	251	while ((ch = (u_char)*buf)) {
	252	if (synth_full())
	253	return buf;
	254	if (ch == '\n')
	255	ch = PROCSPEECH;
	256	spk_out(ch);
	257	buf++;
	258	}
61b7a284	259	return NULL;
c6e3fd22 WH	260	}
	261
	262	static void synth_flush(struct spk_synth *synth)
	263	{
	264	outb_p(SYNTH_CLEAR, speakup_info.port_tts);
2c9e0cb0	265	while (synth_writable())
c6e3fd22 WH	266	cpu_relax();
	267	}
	268
	269	static char synth_read_tts(void)
	270	{
	271	u_char ch;
8e69a811	272
2c9e0cb0	273	while (!synth_readable())
c6e3fd22 WH	274	cpu_relax();
	275	ch = synth_status & 0x7f;
	276	outb_p(ch, speakup_info.port_tts);
2c9e0cb0	277	while (synth_readable())
c6e3fd22 WH	278	cpu_relax();
	279	return (char) ch;
	280	}
	281
	282	/* interrogate the DoubleTalk PC and return its settings */
	283	static struct synth_settings synth_interrogate(struct spk_synth synth)
	284	{
	285	u_char *t;
	286	static char buf[sizeof(struct synth_settings) + 1];
	287	int total, i;
	288	static struct synth_settings status;
8e69a811	289
c6e3fd22 WH	290	synth_immediate(synth, "\x18\x01?");
	291	for (total = 0, i = 0; i < 50; i++) {
	292	buf[total] = synth_read_tts();
	293	if (total > 2 && buf[total] == 0x7f)
	294	break;
	295	if (total < sizeof(struct synth_settings))
	296	total++;
	297	}
	298	t = buf;
	299	/* serial number is little endian */
	300	status.serial_number = t[0] + t[1]*256;
	301	t += 2;
	302	for (i = 0; *t != '\r'; t++) {
	303	status.rom_version[i] = *t;
	304	if (i < sizeof(status.rom_version)-1)
	305	i++;
	306	}
	307	status.rom_version[i] = 0;
	308	t++;
	309	status.mode = *t++;
	310	status.punc_level = *t++;
	311	status.formant_freq = *t++;
	312	status.pitch = *t++;
	313	status.speed = *t++;
	314	status.volume = *t++;
	315	status.tone = *t++;
	316	status.expression = *t++;
	317	status.ext_dict_loaded = *t++;
	318	status.ext_dict_status = *t++;
	319	status.free_ram = *t++;
	320	status.articulation = *t++;
	321	status.reverb = *t++;
	322	status.eob = *t++;
	323	return &status;
	324	}
	325
	326	static int synth_probe(struct spk_synth *synth)
	327	{
	328	unsigned int port_val = 0;
	329	int i = 0;
	330	struct synth_settings *sp;
8e69a811	331
c6e3fd22 WH	332	pr_info("Probing for DoubleTalk.\n");
	333	if (port_forced) {
	334	speakup_info.port_tts = port_forced;
	335	pr_info("probe forced to %x by kernel command line\n",
	336	speakup_info.port_tts);
	337	if ((port_forced & 0xf) != 0xf)
	338	pr_info("warning: port base should probably end with f\n");
	339	if (synth_request_region(speakup_info.port_tts-1,
	340	SYNTH_IO_EXTENT)) {
	341	pr_warn("sorry, port already reserved\n");
	342	return -EBUSY;
	343	}
	344	port_val = inw(speakup_info.port_tts-1);
	345	synth_lpc = speakup_info.port_tts-1;
	346	} else {
	347	for (i = 0; synth_portlist[i]; i++) {
	348	if (synth_request_region(synth_portlist[i],
	349	SYNTH_IO_EXTENT))
	350	continue;
	351	port_val = inw(synth_portlist[i]) & 0xfbff;
	352	if (port_val == 0x107f) {
	353	synth_lpc = synth_portlist[i];
	354	speakup_info.port_tts = synth_lpc+1;
	355	break;
	356	}
	357	synth_release_region(synth_portlist[i],
	358	SYNTH_IO_EXTENT);
	359	}
	360	}
	361	port_val &= 0xfbff;
	362	if (port_val != 0x107f) {
	363	pr_info("DoubleTalk PC: not found\n");
	364	synth_release_region(synth_lpc, SYNTH_IO_EXTENT);
	365	return -ENODEV;
	366	}
	367	while (inw_p(synth_lpc) != 0x147f)
	368	cpu_relax(); /* wait until it's ready */
	369	sp = synth_interrogate(synth);
	370	pr_info("%s: %03x-%03x, ROM ver %s, s/n %u, driver: %s\n",
	371	synth->long_name, synth_lpc, synth_lpc+SYNTH_IO_EXTENT - 1,
	372	sp->rom_version, sp->serial_number, synth->version);
	373	synth->alive = 1;
	374	return 0;
	375	}
	376
	377	static void dtlk_release(void)
	378	{
	379	if (speakup_info.port_tts)
	380	synth_release_region(speakup_info.port_tts-1, SYNTH_IO_EXTENT);
	381	speakup_info.port_tts = 0;
	382	}
	383
	384	module_param_named(port, port_forced, int, S_IRUGO);
	385	module_param_named(start, synth_dtlk.startup, short, S_IRUGO);
	386
	387	MODULE_PARM_DESC(port, "Set the port for the synthesizer (override probing).");
	388	MODULE_PARM_DESC(start, "Start the synthesizer once it is loaded.");
	389
	390	static int __init dtlk_init(void)
	391	{
	392	return synth_add(&synth_dtlk);
	393	}
	394
	395	static void __exit dtlk_exit(void)
396	{
397	synth_remove(&synth_dtlk);
398	}
399
400	module_init(dtlk_init);
401	module_exit(dtlk_exit);
402	MODULE_AUTHOR("Kirk Reiser <kirk@braille.uwo.ca>");
403	MODULE_AUTHOR("David Borowski");
404	MODULE_DESCRIPTION("Speakup support for DoubleTalk PC synthesizers");
405	MODULE_LICENSE("GPL");
406	MODULE_VERSION(DRV_VERSION);
407