[linux.git] / drivers / serial / suncore.c

/* suncore.c
 *
 * Common SUN serial routines.  Based entirely
 * upon drivers/sbus/char/sunserial.c which is:
 *
 * Copyright (C) 1997  Eddie C. Dost  ([email protected])
 *
 * Adaptation to new UART layer is:
 *
 * Copyright (C) 2002 David S. Miller ([email protected])
 */

#include <linux/module.h>
#include <linux/kernel.h>
#include <linux/console.h>
#include <linux/tty.h>
#include <linux/errno.h>
#include <linux/string.h>
#include <linux/init.h>

#include <asm/oplib.h>

#include "suncore.h"

int sunserial_current_minor = 64;

EXPORT_SYMBOL(sunserial_current_minor);

void
sunserial_console_termios(struct console *con)
{
	char mode[16], buf[16], *s;
	char mode_prop[] = "ttyX-mode";
	char cd_prop[]   = "ttyX-ignore-cd";
	char dtr_prop[]  = "ttyX-rts-dtr-off";
	char *ssp_console_modes_prop = "ssp-console-modes";
	int baud, bits, stop, cflag;
	char parity;
	int carrier = 0;
	int rtsdtr = 1;
	int topnd, nd;

	if (!serial_console)
		return;

	switch (serial_console) {
	case PROMDEV_OTTYA:
		mode_prop[3] = 'a';
		cd_prop[3] = 'a';
		dtr_prop[3] = 'a';
		break;

	case PROMDEV_OTTYB:
		mode_prop[3] = 'b';
		cd_prop[3] = 'b';
		dtr_prop[3] = 'b';
		break;

	case PROMDEV_ORSC:

		nd = prom_pathtoinode("rsc");
		if (!nd) {
			strcpy(mode, "115200,8,n,1,-");
			goto no_options;
		}

		if (!prom_node_has_property(nd, ssp_console_modes_prop)) {
			strcpy(mode, "115200,8,n,1,-");
			goto no_options;
		}

		memset(mode, 0, sizeof(mode));
		prom_getstring(nd, ssp_console_modes_prop, mode, sizeof(mode));
		goto no_options;

	default:
		strcpy(mode, "9600,8,n,1,-");
		goto no_options;
	}

	topnd = prom_getchild(prom_root_node);
	nd = prom_searchsiblings(topnd, "options");
	if (!nd) {
		strcpy(mode, "9600,8,n,1,-");
		goto no_options;
	}

	if (!prom_node_has_property(nd, mode_prop)) {
		strcpy(mode, "9600,8,n,1,-");
		goto no_options;
	}

	memset(mode, 0, sizeof(mode));
	prom_getstring(nd, mode_prop, mode, sizeof(mode));

	if (prom_node_has_property(nd, cd_prop)) {
		memset(buf, 0, sizeof(buf));
		prom_getstring(nd, cd_prop, buf, sizeof(buf));
		if (!strcmp(buf, "false"))
			carrier = 1;

		/* XXX: this is unused below. */
	}

	if (prom_node_has_property(nd, dtr_prop)) {
		memset(buf, 0, sizeof(buf));
		prom_getstring(nd, dtr_prop, buf, sizeof(buf));
		if (!strcmp(buf, "false"))
			rtsdtr = 0;

		/* XXX: this is unused below. */
	}

no_options:
	cflag = CREAD | HUPCL | CLOCAL;

	s = mode;
	baud = simple_strtoul(s, NULL, 0);
	s = strchr(s, ',');
	bits = simple_strtoul(++s, NULL, 0);
	s = strchr(s, ',');
	parity = *(++s);
	s = strchr(s, ',');
	stop = simple_strtoul(++s, NULL, 0);
	s = strchr(s, ',');
	/* XXX handshake is not handled here. */

	switch (baud) {
		case 150: cflag |= B150; break;
		case 300: cflag |= B300; break;
		case 600: cflag |= B600; break;
		case 1200: cflag |= B1200; break;
		case 2400: cflag |= B2400; break;
		case 4800: cflag |= B4800; break;
		case 9600: cflag |= B9600; break;
		case 19200: cflag |= B19200; break;
		case 38400: cflag |= B38400; break;
		case 57600: cflag |= B57600; break;
		case 115200: cflag |= B115200; break;
		case 230400: cflag |= B230400; break;
		case 460800: cflag |= B460800; break;
		default: baud = 9600; cflag |= B9600; break;
	}

	switch (bits) {
		case 5: cflag |= CS5; break;
		case 6: cflag |= CS6; break;
		case 7: cflag |= CS7; break;
		case 8: cflag |= CS8; break;
		default: cflag |= CS8; break;
	}

	switch (parity) {
		case 'o': cflag |= (PARENB | PARODD); break;
		case 'e': cflag |= PARENB; break;
		case 'n': default: break;
	}

	switch (stop) {
		case 2: cflag |= CSTOPB; break;
		case 1: default: break;
	}

	con->cflag = cflag;
}

EXPORT_SYMBOL(sunserial_console_termios);

/* Sun serial MOUSE auto baud rate detection.  */
static struct mouse_baud_cflag {
	int baud;
	unsigned int cflag;
} mouse_baud_table[] = {
	{ 1200, B1200 },
	{ 2400, B2400 },
	{ 4800, B4800 },
	{ 9600, B9600 },
	{ -1, ~0 },
	{ -1, ~0 },
};

unsigned int suncore_mouse_baud_cflag_next(unsigned int cflag, int *new_baud)
{
	int i;

	for (i = 0; mouse_baud_table[i].baud != -1; i++)
		if (mouse_baud_table[i].cflag == (cflag & CBAUD))
			break;

	i += 1;
	if (mouse_baud_table[i].baud == -1)
		i = 0;

	*new_baud = mouse_baud_table[i].baud;
	return mouse_baud_table[i].cflag;
}

EXPORT_SYMBOL(suncore_mouse_baud_cflag_next);

/* Basically, when the baud rate is wrong the mouse spits out
 * breaks to us.
 */
int suncore_mouse_baud_detection(unsigned char ch, int is_break)
{
	static int mouse_got_break = 0;
	static int ctr = 0;

	if (is_break) {
		/* Let a few normal bytes go by before we jump the gun
		 * and say we need to try another baud rate.
		 */
		if (mouse_got_break && ctr < 8)
			return 1;

		/* Ok, we need to try another baud. */
		ctr = 0;
		mouse_got_break = 1;
		return 2;
	}
	if (mouse_got_break) {
		ctr++;
		if (ch == 0x87) {
			/* Correct baud rate determined. */
			mouse_got_break = 0;
		}
		return 1;
	}
	return 0;
}

EXPORT_SYMBOL(suncore_mouse_baud_detection);

static int __init suncore_init(void)
{
	return 0;
}

static void __exit suncore_exit(void)
{
}

module_init(suncore_init);
module_exit(suncore_exit);

MODULE_AUTHOR("Eddie C. Dost, David S. Miller");
MODULE_DESCRIPTION("Sun serial common layer");
MODULE_LICENSE("GPL");
Commit	Line	Data
1da177e4 LT	1	/* suncore.c
	2	*
	3	* Common SUN serial routines. Based entirely
	4	* upon drivers/sbus/char/sunserial.c which is:
	5	*
	6	* Copyright (C) 1997 Eddie C. Dost ([email protected])
	7	*
	8	* Adaptation to new UART layer is:
	9	*
	10	* Copyright (C) 2002 David S. Miller ([email protected])
	11	*/
	12
1da177e4 LT	13	#include <linux/module.h>
	14	#include <linux/kernel.h>
	15	#include <linux/console.h>
	16	#include <linux/tty.h>
	17	#include <linux/errno.h>
	18	#include <linux/string.h>
	19	#include <linux/init.h>
	20
	21	#include <asm/oplib.h>
	22
	23	#include "suncore.h"
	24
	25	int sunserial_current_minor = 64;
	26
	27	EXPORT_SYMBOL(sunserial_current_minor);
	28
	29	void
	30	sunserial_console_termios(struct console *con)
	31	{
	32	char mode[16], buf[16], *s;
b00ccd0f JE	33	char mode_prop[] = "ttyX-mode";
	34	char cd_prop[] = "ttyX-ignore-cd";
	35	char dtr_prop[] = "ttyX-rts-dtr-off";
c126cf80	36	char *ssp_console_modes_prop = "ssp-console-modes";
1da177e4 LT	37	int baud, bits, stop, cflag;
	38	char parity;
	39	int carrier = 0;
	40	int rtsdtr = 1;
	41	int topnd, nd;
	42
	43	if (!serial_console)
	44	return;
	45
c126cf80 ED	46	switch (serial_console) {
c126cf80 ED	47	case PROMDEV_OTTYA:
1da177e4 LT	48	mode_prop[3] = 'a';
	49	cd_prop[3] = 'a';
	50	dtr_prop[3] = 'a';
c126cf80 ED	51	break;
	52
	53	case PROMDEV_OTTYB:
1da177e4 LT	54	mode_prop[3] = 'b';
	55	cd_prop[3] = 'b';
	56	dtr_prop[3] = 'b';
c126cf80 ED	57	break;
	58
	59	case PROMDEV_ORSC:
	60
	61	nd = prom_pathtoinode("rsc");
	62	if (!nd) {
	63	strcpy(mode, "115200,8,n,1,-");
	64	goto no_options;
	65	}
	66
	67	if (!prom_node_has_property(nd, ssp_console_modes_prop)) {
	68	strcpy(mode, "115200,8,n,1,-");
	69	goto no_options;
	70	}
	71
	72	memset(mode, 0, sizeof(mode));
	73	prom_getstring(nd, ssp_console_modes_prop, mode, sizeof(mode));
	74	goto no_options;
	75
	76	default:
	77	strcpy(mode, "9600,8,n,1,-");
	78	goto no_options;
1da177e4 LT	79	}
	80
	81	topnd = prom_getchild(prom_root_node);
	82	nd = prom_searchsiblings(topnd, "options");
	83	if (!nd) {
	84	strcpy(mode, "9600,8,n,1,-");
	85	goto no_options;
	86	}
	87
	88	if (!prom_node_has_property(nd, mode_prop)) {
	89	strcpy(mode, "9600,8,n,1,-");
	90	goto no_options;
	91	}
	92
	93	memset(mode, 0, sizeof(mode));
	94	prom_getstring(nd, mode_prop, mode, sizeof(mode));
	95
	96	if (prom_node_has_property(nd, cd_prop)) {
	97	memset(buf, 0, sizeof(buf));
	98	prom_getstring(nd, cd_prop, buf, sizeof(buf));
	99	if (!strcmp(buf, "false"))
	100	carrier = 1;
	101
	102	/* XXX: this is unused below. */
	103	}
	104
	105	if (prom_node_has_property(nd, dtr_prop)) {
	106	memset(buf, 0, sizeof(buf));
	107	prom_getstring(nd, dtr_prop, buf, sizeof(buf));
	108	if (!strcmp(buf, "false"))
	109	rtsdtr = 0;
	110
	111	/* XXX: this is unused below. */
	112	}
	113
	114	no_options:
	115	cflag = CREAD \| HUPCL \| CLOCAL;
	116
	117	s = mode;
	118	baud = simple_strtoul(s, NULL, 0);
	119	s = strchr(s, ',');
	120	bits = simple_strtoul(++s, NULL, 0);
	121	s = strchr(s, ',');
	122	parity = *(++s);
	123	s = strchr(s, ',');
	124	stop = simple_strtoul(++s, NULL, 0);
	125	s = strchr(s, ',');
	126	/* XXX handshake is not handled here. */
	127
	128	switch (baud) {
	129	case 150: cflag \|= B150; break;
	130	case 300: cflag \|= B300; break;
	131	case 600: cflag \|= B600; break;
	132	case 1200: cflag \|= B1200; break;
	133	case 2400: cflag \|= B2400; break;
	134	case 4800: cflag \|= B4800; break;
	135	case 9600: cflag \|= B9600; break;
	136	case 19200: cflag \|= B19200; break;
	137	case 38400: cflag \|= B38400; break;
c126cf80 ED	138	case 57600: cflag \|= B57600; break;
	139	case 115200: cflag \|= B115200; break;
	140	case 230400: cflag \|= B230400; break;
	141	case 460800: cflag \|= B460800; break;
1da177e4 LT	142	default: baud = 9600; cflag \|= B9600; break;
	143	}
	144
	145	switch (bits) {
	146	case 5: cflag \|= CS5; break;
	147	case 6: cflag \|= CS6; break;
	148	case 7: cflag \|= CS7; break;
	149	case 8: cflag \|= CS8; break;
	150	default: cflag \|= CS8; break;
	151	}
	152
	153	switch (parity) {
	154	case 'o': cflag \|= (PARENB \| PARODD); break;
	155	case 'e': cflag \|= PARENB; break;
	156	case 'n': default: break;
	157	}
	158
	159	switch (stop) {
	160	case 2: cflag \|= CSTOPB; break;
	161	case 1: default: break;
	162	}
	163
	164	con->cflag = cflag;
	165	}
	166
	167	EXPORT_SYMBOL(sunserial_console_termios);
	168
	169	/* Sun serial MOUSE auto baud rate detection. */
	170	static struct mouse_baud_cflag {
	171	int baud;
	172	unsigned int cflag;
	173	} mouse_baud_table[] = {
	174	{ 1200, B1200 },
	175	{ 2400, B2400 },
	176	{ 4800, B4800 },
	177	{ 9600, B9600 },
	178	{ -1, ~0 },
	179	{ -1, ~0 },
	180	};
	181
	182	unsigned int suncore_mouse_baud_cflag_next(unsigned int cflag, int *new_baud)
	183	{
	184	int i;
	185
	186	for (i = 0; mouse_baud_table[i].baud != -1; i++)
	187	if (mouse_baud_table[i].cflag == (cflag & CBAUD))
	188	break;
	189
	190	i += 1;
	191	if (mouse_baud_table[i].baud == -1)
	192	i = 0;
	193
	194	*new_baud = mouse_baud_table[i].baud;
	195	return mouse_baud_table[i].cflag;
	196	}
	197
	198	EXPORT_SYMBOL(suncore_mouse_baud_cflag_next);
	199
	200	/* Basically, when the baud rate is wrong the mouse spits out
	201	* breaks to us.
	202	*/
	203	int suncore_mouse_baud_detection(unsigned char ch, int is_break)
	204	{
	205	static int mouse_got_break = 0;
206	static int ctr = 0;
207
208	if (is_break) {
209	/* Let a few normal bytes go by before we jump the gun
210	* and say we need to try another baud rate.
211	*/
212	if (mouse_got_break && ctr < 8)
213	return 1;
214
215	/* Ok, we need to try another baud. */
216	ctr = 0;
217	mouse_got_break = 1;
218	return 2;
219	}
220	if (mouse_got_break) {
221	ctr++;
222	if (ch == 0x87) {
223	/* Correct baud rate determined. */
224	mouse_got_break = 0;
225	}
226	return 1;
227	}
228	return 0;
229	}
230
231	EXPORT_SYMBOL(suncore_mouse_baud_detection);
232
233	static int __init suncore_init(void)
234	{
235	return 0;
236	}
237
238	static void __exit suncore_exit(void)
239	{
240	}
241
242	module_init(suncore_init);
243	module_exit(suncore_exit);
244
245	MODULE_AUTHOR("Eddie C. Dost, David S. Miller");
246	MODULE_DESCRIPTION("Sun serial common layer");
247	MODULE_LICENSE("GPL");