blob: bfe5ea948f6a51a4acb6687efe4f45ab05d441ff [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2 * drivers/char/vme_scc.c: MVME147, MVME162, BVME6000 SCC serial ports
3 * implementation.
4 * Copyright 1999 Richard Hirst <richard@sleepie.demon.co.uk>
5 *
6 * Based on atari_SCC.c which was
7 * Copyright 1994-95 Roman Hodek <Roman.Hodek@informatik.uni-erlangen.de>
8 * Partially based on PC-Linux serial.c by Linus Torvalds and Theodore Ts'o
9 *
10 * This file is subject to the terms and conditions of the GNU General Public
11 * License. See the file COPYING in the main directory of this archive
12 * for more details.
13 *
14 */
15
16#include <linux/module.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070017#include <linux/kdev_t.h>
18#include <asm/io.h>
19#include <linux/kernel.h>
20#include <linux/sched.h>
21#include <linux/ioport.h>
22#include <linux/interrupt.h>
23#include <linux/errno.h>
24#include <linux/tty.h>
25#include <linux/tty_flip.h>
26#include <linux/mm.h>
27#include <linux/serial.h>
28#include <linux/fcntl.h>
29#include <linux/major.h>
30#include <linux/delay.h>
31#include <linux/slab.h>
32#include <linux/miscdevice.h>
33#include <linux/console.h>
34#include <linux/init.h>
35#include <asm/setup.h>
36#include <asm/bootinfo.h>
37
38#ifdef CONFIG_MVME147_SCC
39#include <asm/mvme147hw.h>
40#endif
41#ifdef CONFIG_MVME162_SCC
42#include <asm/mvme16xhw.h>
43#endif
44#ifdef CONFIG_BVME6000_SCC
45#include <asm/bvme6000hw.h>
46#endif
47
48#include <linux/generic_serial.h>
49#include "scc.h"
50
51
52#define CHANNEL_A 0
53#define CHANNEL_B 1
54
55#define SCC_MINOR_BASE 64
56
57/* Shadows for all SCC write registers */
58static unsigned char scc_shadow[2][16];
59
60/* Location to access for SCC register access delay */
61static volatile unsigned char *scc_del = NULL;
62
63/* To keep track of STATUS_REG state for detection of Ext/Status int source */
64static unsigned char scc_last_status_reg[2];
65
66/***************************** Prototypes *****************************/
67
68/* Function prototypes */
69static void scc_disable_tx_interrupts(void * ptr);
70static void scc_enable_tx_interrupts(void * ptr);
71static void scc_disable_rx_interrupts(void * ptr);
72static void scc_enable_rx_interrupts(void * ptr);
73static int scc_get_CD(void * ptr);
74static void scc_shutdown_port(void * ptr);
75static int scc_set_real_termios(void *ptr);
76static void scc_hungup(void *ptr);
77static void scc_close(void *ptr);
78static int scc_chars_in_buffer(void * ptr);
79static int scc_open(struct tty_struct * tty, struct file * filp);
80static int scc_ioctl(struct tty_struct * tty, struct file * filp,
81 unsigned int cmd, unsigned long arg);
82static void scc_throttle(struct tty_struct *tty);
83static void scc_unthrottle(struct tty_struct *tty);
84static irqreturn_t scc_tx_int(int irq, void *data, struct pt_regs *fp);
85static irqreturn_t scc_rx_int(int irq, void *data, struct pt_regs *fp);
86static irqreturn_t scc_stat_int(int irq, void *data, struct pt_regs *fp);
87static irqreturn_t scc_spcond_int(int irq, void *data, struct pt_regs *fp);
88static void scc_setsignals(struct scc_port *port, int dtr, int rts);
89static void scc_break_ctl(struct tty_struct *tty, int break_state);
90
91static struct tty_driver *scc_driver;
92
93struct scc_port scc_ports[2];
94
95int scc_initialized = 0;
96
97/*---------------------------------------------------------------------------
98 * Interface from generic_serial.c back here
99 *--------------------------------------------------------------------------*/
100
101static struct real_driver scc_real_driver = {
102 scc_disable_tx_interrupts,
103 scc_enable_tx_interrupts,
104 scc_disable_rx_interrupts,
105 scc_enable_rx_interrupts,
106 scc_get_CD,
107 scc_shutdown_port,
108 scc_set_real_termios,
109 scc_chars_in_buffer,
110 scc_close,
111 scc_hungup,
112 NULL
113};
114
115
116static struct tty_operations scc_ops = {
117 .open = scc_open,
118 .close = gs_close,
119 .write = gs_write,
120 .put_char = gs_put_char,
121 .flush_chars = gs_flush_chars,
122 .write_room = gs_write_room,
123 .chars_in_buffer = gs_chars_in_buffer,
124 .flush_buffer = gs_flush_buffer,
125 .ioctl = scc_ioctl,
126 .throttle = scc_throttle,
127 .unthrottle = scc_unthrottle,
128 .set_termios = gs_set_termios,
129 .stop = gs_stop,
130 .start = gs_start,
131 .hangup = gs_hangup,
132 .break_ctl = scc_break_ctl,
133};
134
135/*----------------------------------------------------------------------------
136 * vme_scc_init() and support functions
137 *---------------------------------------------------------------------------*/
138
139static int scc_init_drivers(void)
140{
141 int error;
142
143 scc_driver = alloc_tty_driver(2);
144 if (!scc_driver)
145 return -ENOMEM;
146 scc_driver->owner = THIS_MODULE;
147 scc_driver->driver_name = "scc";
148 scc_driver->name = "ttyS";
Linus Torvalds1da177e2005-04-16 15:20:36 -0700149 scc_driver->major = TTY_MAJOR;
150 scc_driver->minor_start = SCC_MINOR_BASE;
151 scc_driver->type = TTY_DRIVER_TYPE_SERIAL;
152 scc_driver->subtype = SERIAL_TYPE_NORMAL;
153 scc_driver->init_termios = tty_std_termios;
154 scc_driver->init_termios.c_cflag =
155 B9600 | CS8 | CREAD | HUPCL | CLOCAL;
156 scc_driver->flags = TTY_DRIVER_REAL_RAW;
157 tty_set_operations(scc_driver, &scc_ops);
158
159 if ((error = tty_register_driver(scc_driver))) {
160 printk(KERN_ERR "scc: Couldn't register scc driver, error = %d\n",
161 error);
162 put_tty_driver(scc_driver);
163 return 1;
164 }
165
166 return 0;
167}
168
169
170/* ports[] array is indexed by line no (i.e. [0] for ttyS0, [1] for ttyS1).
171 */
172
173static void scc_init_portstructs(void)
174{
175 struct scc_port *port;
176 int i;
177
178 for (i = 0; i < 2; i++) {
179 port = scc_ports + i;
180 port->gs.magic = SCC_MAGIC;
181 port->gs.close_delay = HZ/2;
182 port->gs.closing_wait = 30 * HZ;
183 port->gs.rd = &scc_real_driver;
184#ifdef NEW_WRITE_LOCKING
Ingo Molnar81861d72006-03-23 03:00:44 -0800185 port->gs.port_write_mutex = MUTEX;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700186#endif
187 init_waitqueue_head(&port->gs.open_wait);
188 init_waitqueue_head(&port->gs.close_wait);
189 }
190}
191
192
193#ifdef CONFIG_MVME147_SCC
194static int mvme147_scc_init(void)
195{
196 struct scc_port *port;
197
198 printk(KERN_INFO "SCC: MVME147 Serial Driver\n");
199 /* Init channel A */
200 port = &scc_ports[0];
201 port->channel = CHANNEL_A;
202 port->ctrlp = (volatile unsigned char *)M147_SCC_A_ADDR;
203 port->datap = port->ctrlp + 1;
204 port->port_a = &scc_ports[0];
205 port->port_b = &scc_ports[1];
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700206 request_irq(MVME147_IRQ_SCCA_TX, scc_tx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700207 "SCC-A TX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700208 request_irq(MVME147_IRQ_SCCA_STAT, scc_stat_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700209 "SCC-A status", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700210 request_irq(MVME147_IRQ_SCCA_RX, scc_rx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700211 "SCC-A RX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700212 request_irq(MVME147_IRQ_SCCA_SPCOND, scc_spcond_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700213 "SCC-A special cond", port);
214 {
215 SCC_ACCESS_INIT(port);
216
217 /* disable interrupts for this channel */
218 SCCwrite(INT_AND_DMA_REG, 0);
219 /* Set the interrupt vector */
220 SCCwrite(INT_VECTOR_REG, MVME147_IRQ_SCC_BASE);
221 /* Interrupt parameters: vector includes status, status low */
222 SCCwrite(MASTER_INT_CTRL, MIC_VEC_INCL_STAT);
223 SCCmod(MASTER_INT_CTRL, 0xff, MIC_MASTER_INT_ENAB);
224 }
225
226 /* Init channel B */
227 port = &scc_ports[1];
228 port->channel = CHANNEL_B;
229 port->ctrlp = (volatile unsigned char *)M147_SCC_B_ADDR;
230 port->datap = port->ctrlp + 1;
231 port->port_a = &scc_ports[0];
232 port->port_b = &scc_ports[1];
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700233 request_irq(MVME147_IRQ_SCCB_TX, scc_tx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700234 "SCC-B TX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700235 request_irq(MVME147_IRQ_SCCB_STAT, scc_stat_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700236 "SCC-B status", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700237 request_irq(MVME147_IRQ_SCCB_RX, scc_rx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700238 "SCC-B RX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700239 request_irq(MVME147_IRQ_SCCB_SPCOND, scc_spcond_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700240 "SCC-B special cond", port);
241 {
242 SCC_ACCESS_INIT(port);
243
244 /* disable interrupts for this channel */
245 SCCwrite(INT_AND_DMA_REG, 0);
246 }
247
248 /* Ensure interrupts are enabled in the PCC chip */
249 m147_pcc->serial_cntrl=PCC_LEVEL_SERIAL|PCC_INT_ENAB;
250
251 /* Initialise the tty driver structures and register */
252 scc_init_portstructs();
253 scc_init_drivers();
254
255 return 0;
256}
257#endif
258
259
260#ifdef CONFIG_MVME162_SCC
261static int mvme162_scc_init(void)
262{
263 struct scc_port *port;
264
265 if (!(mvme16x_config & MVME16x_CONFIG_GOT_SCCA))
266 return (-ENODEV);
267
268 printk(KERN_INFO "SCC: MVME162 Serial Driver\n");
269 /* Init channel A */
270 port = &scc_ports[0];
271 port->channel = CHANNEL_A;
272 port->ctrlp = (volatile unsigned char *)MVME_SCC_A_ADDR;
273 port->datap = port->ctrlp + 2;
274 port->port_a = &scc_ports[0];
275 port->port_b = &scc_ports[1];
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700276 request_irq(MVME162_IRQ_SCCA_TX, scc_tx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700277 "SCC-A TX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700278 request_irq(MVME162_IRQ_SCCA_STAT, scc_stat_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700279 "SCC-A status", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700280 request_irq(MVME162_IRQ_SCCA_RX, scc_rx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700281 "SCC-A RX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700282 request_irq(MVME162_IRQ_SCCA_SPCOND, scc_spcond_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700283 "SCC-A special cond", port);
284 {
285 SCC_ACCESS_INIT(port);
286
287 /* disable interrupts for this channel */
288 SCCwrite(INT_AND_DMA_REG, 0);
289 /* Set the interrupt vector */
290 SCCwrite(INT_VECTOR_REG, MVME162_IRQ_SCC_BASE);
291 /* Interrupt parameters: vector includes status, status low */
292 SCCwrite(MASTER_INT_CTRL, MIC_VEC_INCL_STAT);
293 SCCmod(MASTER_INT_CTRL, 0xff, MIC_MASTER_INT_ENAB);
294 }
295
296 /* Init channel B */
297 port = &scc_ports[1];
298 port->channel = CHANNEL_B;
299 port->ctrlp = (volatile unsigned char *)MVME_SCC_B_ADDR;
300 port->datap = port->ctrlp + 2;
301 port->port_a = &scc_ports[0];
302 port->port_b = &scc_ports[1];
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700303 request_irq(MVME162_IRQ_SCCB_TX, scc_tx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700304 "SCC-B TX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700305 request_irq(MVME162_IRQ_SCCB_STAT, scc_stat_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700306 "SCC-B status", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700307 request_irq(MVME162_IRQ_SCCB_RX, scc_rx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700308 "SCC-B RX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700309 request_irq(MVME162_IRQ_SCCB_SPCOND, scc_spcond_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700310 "SCC-B special cond", port);
311
312 {
313 SCC_ACCESS_INIT(port); /* Either channel will do */
314
315 /* disable interrupts for this channel */
316 SCCwrite(INT_AND_DMA_REG, 0);
317 }
318
319 /* Ensure interrupts are enabled in the MC2 chip */
320 *(volatile char *)0xfff4201d = 0x14;
321
322 /* Initialise the tty driver structures and register */
323 scc_init_portstructs();
324 scc_init_drivers();
325
326 return 0;
327}
328#endif
329
330
331#ifdef CONFIG_BVME6000_SCC
332static int bvme6000_scc_init(void)
333{
334 struct scc_port *port;
335
336 printk(KERN_INFO "SCC: BVME6000 Serial Driver\n");
337 /* Init channel A */
338 port = &scc_ports[0];
339 port->channel = CHANNEL_A;
340 port->ctrlp = (volatile unsigned char *)BVME_SCC_A_ADDR;
341 port->datap = port->ctrlp + 4;
342 port->port_a = &scc_ports[0];
343 port->port_b = &scc_ports[1];
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700344 request_irq(BVME_IRQ_SCCA_TX, scc_tx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700345 "SCC-A TX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700346 request_irq(BVME_IRQ_SCCA_STAT, scc_stat_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700347 "SCC-A status", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700348 request_irq(BVME_IRQ_SCCA_RX, scc_rx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700349 "SCC-A RX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700350 request_irq(BVME_IRQ_SCCA_SPCOND, scc_spcond_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700351 "SCC-A special cond", port);
352 {
353 SCC_ACCESS_INIT(port);
354
355 /* disable interrupts for this channel */
356 SCCwrite(INT_AND_DMA_REG, 0);
357 /* Set the interrupt vector */
358 SCCwrite(INT_VECTOR_REG, BVME_IRQ_SCC_BASE);
359 /* Interrupt parameters: vector includes status, status low */
360 SCCwrite(MASTER_INT_CTRL, MIC_VEC_INCL_STAT);
361 SCCmod(MASTER_INT_CTRL, 0xff, MIC_MASTER_INT_ENAB);
362 }
363
364 /* Init channel B */
365 port = &scc_ports[1];
366 port->channel = CHANNEL_B;
367 port->ctrlp = (volatile unsigned char *)BVME_SCC_B_ADDR;
368 port->datap = port->ctrlp + 4;
369 port->port_a = &scc_ports[0];
370 port->port_b = &scc_ports[1];
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700371 request_irq(BVME_IRQ_SCCB_TX, scc_tx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700372 "SCC-B TX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700373 request_irq(BVME_IRQ_SCCB_STAT, scc_stat_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700374 "SCC-B status", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700375 request_irq(BVME_IRQ_SCCB_RX, scc_rx_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700376 "SCC-B RX", port);
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700377 request_irq(BVME_IRQ_SCCB_SPCOND, scc_spcond_int, IRQF_DISABLED,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700378 "SCC-B special cond", port);
379
380 {
381 SCC_ACCESS_INIT(port); /* Either channel will do */
382
383 /* disable interrupts for this channel */
384 SCCwrite(INT_AND_DMA_REG, 0);
385 }
386
387 /* Initialise the tty driver structures and register */
388 scc_init_portstructs();
389 scc_init_drivers();
390
391 return 0;
392}
393#endif
394
395
396static int vme_scc_init(void)
397{
398 int res = -ENODEV;
399
400#ifdef CONFIG_MVME147_SCC
401 if (MACH_IS_MVME147)
402 res = mvme147_scc_init();
403#endif
404#ifdef CONFIG_MVME162_SCC
405 if (MACH_IS_MVME16x)
406 res = mvme162_scc_init();
407#endif
408#ifdef CONFIG_BVME6000_SCC
409 if (MACH_IS_BVME6000)
410 res = bvme6000_scc_init();
411#endif
412 return res;
413}
414
415module_init(vme_scc_init);
416
417
418/*---------------------------------------------------------------------------
419 * Interrupt handlers
420 *--------------------------------------------------------------------------*/
421
422static irqreturn_t scc_rx_int(int irq, void *data, struct pt_regs *fp)
423{
424 unsigned char ch;
425 struct scc_port *port = data;
426 struct tty_struct *tty = port->gs.tty;
427 SCC_ACCESS_INIT(port);
428
429 ch = SCCread_NB(RX_DATA_REG);
430 if (!tty) {
431 printk(KERN_WARNING "scc_rx_int with NULL tty!\n");
432 SCCwrite_NB(COMMAND_REG, CR_HIGHEST_IUS_RESET);
433 return IRQ_HANDLED;
434 }
Alan Cox33f0f882006-01-09 20:54:13 -0800435 tty_insert_flip_char(tty, ch, 0);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700436
437 /* Check if another character is already ready; in that case, the
438 * spcond_int() function must be used, because this character may have an
439 * error condition that isn't signalled by the interrupt vector used!
440 */
441 if (SCCread(INT_PENDING_REG) &
442 (port->channel == CHANNEL_A ? IPR_A_RX : IPR_B_RX)) {
443 scc_spcond_int (irq, data, fp);
444 return IRQ_HANDLED;
445 }
446
447 SCCwrite_NB(COMMAND_REG, CR_HIGHEST_IUS_RESET);
448
449 tty_flip_buffer_push(tty);
450 return IRQ_HANDLED;
451}
452
453
454static irqreturn_t scc_spcond_int(int irq, void *data, struct pt_regs *fp)
455{
456 struct scc_port *port = data;
457 struct tty_struct *tty = port->gs.tty;
458 unsigned char stat, ch, err;
459 int int_pending_mask = port->channel == CHANNEL_A ?
460 IPR_A_RX : IPR_B_RX;
461 SCC_ACCESS_INIT(port);
462
463 if (!tty) {
464 printk(KERN_WARNING "scc_spcond_int with NULL tty!\n");
465 SCCwrite(COMMAND_REG, CR_ERROR_RESET);
466 SCCwrite_NB(COMMAND_REG, CR_HIGHEST_IUS_RESET);
467 return IRQ_HANDLED;
468 }
469 do {
470 stat = SCCread(SPCOND_STATUS_REG);
471 ch = SCCread_NB(RX_DATA_REG);
472
473 if (stat & SCSR_RX_OVERRUN)
474 err = TTY_OVERRUN;
475 else if (stat & SCSR_PARITY_ERR)
476 err = TTY_PARITY;
477 else if (stat & SCSR_CRC_FRAME_ERR)
478 err = TTY_FRAME;
479 else
480 err = 0;
481
Alan Cox33f0f882006-01-09 20:54:13 -0800482 tty_insert_flip_char(tty, ch, err);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700483
484 /* ++TeSche: *All* errors have to be cleared manually,
485 * else the condition persists for the next chars
486 */
487 if (err)
488 SCCwrite(COMMAND_REG, CR_ERROR_RESET);
489
490 } while(SCCread(INT_PENDING_REG) & int_pending_mask);
491
492 SCCwrite_NB(COMMAND_REG, CR_HIGHEST_IUS_RESET);
493
494 tty_flip_buffer_push(tty);
495 return IRQ_HANDLED;
496}
497
498
499static irqreturn_t scc_tx_int(int irq, void *data, struct pt_regs *fp)
500{
501 struct scc_port *port = data;
502 SCC_ACCESS_INIT(port);
503
504 if (!port->gs.tty) {
505 printk(KERN_WARNING "scc_tx_int with NULL tty!\n");
506 SCCmod (INT_AND_DMA_REG, ~IDR_TX_INT_ENAB, 0);
507 SCCwrite(COMMAND_REG, CR_TX_PENDING_RESET);
508 SCCwrite_NB(COMMAND_REG, CR_HIGHEST_IUS_RESET);
509 return IRQ_HANDLED;
510 }
511 while ((SCCread_NB(STATUS_REG) & SR_TX_BUF_EMPTY)) {
512 if (port->x_char) {
513 SCCwrite(TX_DATA_REG, port->x_char);
514 port->x_char = 0;
515 }
516 else if ((port->gs.xmit_cnt <= 0) || port->gs.tty->stopped ||
517 port->gs.tty->hw_stopped)
518 break;
519 else {
520 SCCwrite(TX_DATA_REG, port->gs.xmit_buf[port->gs.xmit_tail++]);
521 port->gs.xmit_tail = port->gs.xmit_tail & (SERIAL_XMIT_SIZE-1);
522 if (--port->gs.xmit_cnt <= 0)
523 break;
524 }
525 }
526 if ((port->gs.xmit_cnt <= 0) || port->gs.tty->stopped ||
527 port->gs.tty->hw_stopped) {
528 /* disable tx interrupts */
529 SCCmod (INT_AND_DMA_REG, ~IDR_TX_INT_ENAB, 0);
530 SCCwrite(COMMAND_REG, CR_TX_PENDING_RESET); /* disable tx_int on next tx underrun? */
531 port->gs.flags &= ~GS_TX_INTEN;
532 }
533 if (port->gs.tty && port->gs.xmit_cnt <= port->gs.wakeup_chars)
534 tty_wakeup(port->gs.tty);
535
536 SCCwrite_NB(COMMAND_REG, CR_HIGHEST_IUS_RESET);
537 return IRQ_HANDLED;
538}
539
540
541static irqreturn_t scc_stat_int(int irq, void *data, struct pt_regs *fp)
542{
543 struct scc_port *port = data;
544 unsigned channel = port->channel;
545 unsigned char last_sr, sr, changed;
546 SCC_ACCESS_INIT(port);
547
548 last_sr = scc_last_status_reg[channel];
549 sr = scc_last_status_reg[channel] = SCCread_NB(STATUS_REG);
550 changed = last_sr ^ sr;
551
552 if (changed & SR_DCD) {
553 port->c_dcd = !!(sr & SR_DCD);
554 if (!(port->gs.flags & ASYNC_CHECK_CD))
555 ; /* Don't report DCD changes */
556 else if (port->c_dcd) {
557 wake_up_interruptible(&port->gs.open_wait);
558 }
559 else {
560 if (port->gs.tty)
561 tty_hangup (port->gs.tty);
562 }
563 }
564 SCCwrite(COMMAND_REG, CR_EXTSTAT_RESET);
565 SCCwrite_NB(COMMAND_REG, CR_HIGHEST_IUS_RESET);
566 return IRQ_HANDLED;
567}
568
569
570/*---------------------------------------------------------------------------
571 * generic_serial.c callback funtions
572 *--------------------------------------------------------------------------*/
573
574static void scc_disable_tx_interrupts(void *ptr)
575{
576 struct scc_port *port = ptr;
577 unsigned long flags;
578 SCC_ACCESS_INIT(port);
579
580 local_irq_save(flags);
581 SCCmod(INT_AND_DMA_REG, ~IDR_TX_INT_ENAB, 0);
582 port->gs.flags &= ~GS_TX_INTEN;
583 local_irq_restore(flags);
584}
585
586
587static void scc_enable_tx_interrupts(void *ptr)
588{
589 struct scc_port *port = ptr;
590 unsigned long flags;
591 SCC_ACCESS_INIT(port);
592
593 local_irq_save(flags);
594 SCCmod(INT_AND_DMA_REG, 0xff, IDR_TX_INT_ENAB);
595 /* restart the transmitter */
596 scc_tx_int (0, port, 0);
597 local_irq_restore(flags);
598}
599
600
601static void scc_disable_rx_interrupts(void *ptr)
602{
603 struct scc_port *port = ptr;
604 unsigned long flags;
605 SCC_ACCESS_INIT(port);
606
607 local_irq_save(flags);
608 SCCmod(INT_AND_DMA_REG,
609 ~(IDR_RX_INT_MASK|IDR_PARERR_AS_SPCOND|IDR_EXTSTAT_INT_ENAB), 0);
610 local_irq_restore(flags);
611}
612
613
614static void scc_enable_rx_interrupts(void *ptr)
615{
616 struct scc_port *port = ptr;
617 unsigned long flags;
618 SCC_ACCESS_INIT(port);
619
620 local_irq_save(flags);
621 SCCmod(INT_AND_DMA_REG, 0xff,
622 IDR_EXTSTAT_INT_ENAB|IDR_PARERR_AS_SPCOND|IDR_RX_INT_ALL);
623 local_irq_restore(flags);
624}
625
626
627static int scc_get_CD(void *ptr)
628{
629 struct scc_port *port = ptr;
630 unsigned channel = port->channel;
631
632 return !!(scc_last_status_reg[channel] & SR_DCD);
633}
634
635
636static void scc_shutdown_port(void *ptr)
637{
638 struct scc_port *port = ptr;
639
640 port->gs.flags &= ~ GS_ACTIVE;
641 if (port->gs.tty && port->gs.tty->termios->c_cflag & HUPCL) {
642 scc_setsignals (port, 0, 0);
643 }
644}
645
646
647static int scc_set_real_termios (void *ptr)
648{
649 /* the SCC has char sizes 5,7,6,8 in that order! */
650 static int chsize_map[4] = { 0, 2, 1, 3 };
651 unsigned cflag, baud, chsize, channel, brgval = 0;
652 unsigned long flags;
653 struct scc_port *port = ptr;
654 SCC_ACCESS_INIT(port);
655
656 if (!port->gs.tty || !port->gs.tty->termios) return 0;
657
658 channel = port->channel;
659
660 if (channel == CHANNEL_A)
661 return 0; /* Settings controlled by boot PROM */
662
663 cflag = port->gs.tty->termios->c_cflag;
664 baud = port->gs.baud;
665 chsize = (cflag & CSIZE) >> 4;
666
667 if (baud == 0) {
668 /* speed == 0 -> drop DTR */
669 local_irq_save(flags);
670 SCCmod(TX_CTRL_REG, ~TCR_DTR, 0);
671 local_irq_restore(flags);
672 return 0;
673 }
674 else if ((MACH_IS_MVME16x && (baud < 50 || baud > 38400)) ||
675 (MACH_IS_MVME147 && (baud < 50 || baud > 19200)) ||
676 (MACH_IS_BVME6000 &&(baud < 50 || baud > 76800))) {
677 printk(KERN_NOTICE "SCC: Bad speed requested, %d\n", baud);
678 return 0;
679 }
680
681 if (cflag & CLOCAL)
682 port->gs.flags &= ~ASYNC_CHECK_CD;
683 else
684 port->gs.flags |= ASYNC_CHECK_CD;
685
686#ifdef CONFIG_MVME147_SCC
687 if (MACH_IS_MVME147)
688 brgval = (M147_SCC_PCLK + baud/2) / (16 * 2 * baud) - 2;
689#endif
690#ifdef CONFIG_MVME162_SCC
691 if (MACH_IS_MVME16x)
692 brgval = (MVME_SCC_PCLK + baud/2) / (16 * 2 * baud) - 2;
693#endif
694#ifdef CONFIG_BVME6000_SCC
695 if (MACH_IS_BVME6000)
696 brgval = (BVME_SCC_RTxC + baud/2) / (16 * 2 * baud) - 2;
697#endif
698 /* Now we have all parameters and can go to set them: */
699 local_irq_save(flags);
700
701 /* receiver's character size and auto-enables */
702 SCCmod(RX_CTRL_REG, ~(RCR_CHSIZE_MASK|RCR_AUTO_ENAB_MODE),
703 (chsize_map[chsize] << 6) |
704 ((cflag & CRTSCTS) ? RCR_AUTO_ENAB_MODE : 0));
705 /* parity and stop bits (both, Tx and Rx), clock mode never changes */
706 SCCmod (AUX1_CTRL_REG,
707 ~(A1CR_PARITY_MASK | A1CR_MODE_MASK),
708 ((cflag & PARENB
709 ? (cflag & PARODD ? A1CR_PARITY_ODD : A1CR_PARITY_EVEN)
710 : A1CR_PARITY_NONE)
711 | (cflag & CSTOPB ? A1CR_MODE_ASYNC_2 : A1CR_MODE_ASYNC_1)));
712 /* sender's character size, set DTR for valid baud rate */
713 SCCmod(TX_CTRL_REG, ~TCR_CHSIZE_MASK, chsize_map[chsize] << 5 | TCR_DTR);
714 /* clock sources never change */
715 /* disable BRG before changing the value */
716 SCCmod(DPLL_CTRL_REG, ~DCR_BRG_ENAB, 0);
717 /* BRG value */
718 SCCwrite(TIMER_LOW_REG, brgval & 0xff);
719 SCCwrite(TIMER_HIGH_REG, (brgval >> 8) & 0xff);
720 /* BRG enable, and clock source never changes */
721 SCCmod(DPLL_CTRL_REG, 0xff, DCR_BRG_ENAB);
722
723 local_irq_restore(flags);
724
725 return 0;
726}
727
728
729static int scc_chars_in_buffer (void *ptr)
730{
731 struct scc_port *port = ptr;
732 SCC_ACCESS_INIT(port);
733
734 return (SCCread (SPCOND_STATUS_REG) & SCSR_ALL_SENT) ? 0 : 1;
735}
736
737
738/* Comment taken from sx.c (2.4.0):
739 I haven't the foggiest why the decrement use count has to happen
740 here. The whole linux serial drivers stuff needs to be redesigned.
741 My guess is that this is a hack to minimize the impact of a bug
742 elsewhere. Thinking about it some more. (try it sometime) Try
743 running minicom on a serial port that is driven by a modularized
744 driver. Have the modem hangup. Then remove the driver module. Then
745 exit minicom. I expect an "oops". -- REW */
746
747static void scc_hungup(void *ptr)
748{
749 scc_disable_tx_interrupts(ptr);
750 scc_disable_rx_interrupts(ptr);
751}
752
753
754static void scc_close(void *ptr)
755{
756 scc_disable_tx_interrupts(ptr);
757 scc_disable_rx_interrupts(ptr);
758}
759
760
761/*---------------------------------------------------------------------------
762 * Internal support functions
763 *--------------------------------------------------------------------------*/
764
765static void scc_setsignals(struct scc_port *port, int dtr, int rts)
766{
767 unsigned long flags;
768 unsigned char t;
769 SCC_ACCESS_INIT(port);
770
771 local_irq_save(flags);
772 t = SCCread(TX_CTRL_REG);
773 if (dtr >= 0) t = dtr? (t | TCR_DTR): (t & ~TCR_DTR);
774 if (rts >= 0) t = rts? (t | TCR_RTS): (t & ~TCR_RTS);
775 SCCwrite(TX_CTRL_REG, t);
776 local_irq_restore(flags);
777}
778
779
780static void scc_send_xchar(struct tty_struct *tty, char ch)
781{
782 struct scc_port *port = (struct scc_port *)tty->driver_data;
783
784 port->x_char = ch;
785 if (ch)
786 scc_enable_tx_interrupts(port);
787}
788
789
790/*---------------------------------------------------------------------------
791 * Driver entrypoints referenced from above
792 *--------------------------------------------------------------------------*/
793
794static int scc_open (struct tty_struct * tty, struct file * filp)
795{
796 int line = tty->index;
797 int retval;
798 struct scc_port *port = &scc_ports[line];
799 int i, channel = port->channel;
800 unsigned long flags;
801 SCC_ACCESS_INIT(port);
802#if defined(CONFIG_MVME162_SCC) || defined(CONFIG_MVME147_SCC)
803 static const struct {
804 unsigned reg, val;
805 } mvme_init_tab[] = {
806 /* Values for MVME162 and MVME147 */
807 /* no parity, 1 stop bit, async, 1:16 */
808 { AUX1_CTRL_REG, A1CR_PARITY_NONE|A1CR_MODE_ASYNC_1|A1CR_CLKMODE_x16 },
809 /* parity error is special cond, ints disabled, no DMA */
810 { INT_AND_DMA_REG, IDR_PARERR_AS_SPCOND | IDR_RX_INT_DISAB },
811 /* Rx 8 bits/char, no auto enable, Rx off */
812 { RX_CTRL_REG, RCR_CHSIZE_8 },
813 /* DTR off, Tx 8 bits/char, RTS off, Tx off */
814 { TX_CTRL_REG, TCR_CHSIZE_8 },
815 /* special features off */
816 { AUX2_CTRL_REG, 0 },
817 { CLK_CTRL_REG, CCR_RXCLK_BRG | CCR_TXCLK_BRG },
818 { DPLL_CTRL_REG, DCR_BRG_ENAB | DCR_BRG_USE_PCLK },
819 /* Start Rx */
820 { RX_CTRL_REG, RCR_RX_ENAB | RCR_CHSIZE_8 },
821 /* Start Tx */
822 { TX_CTRL_REG, TCR_TX_ENAB | TCR_RTS | TCR_DTR | TCR_CHSIZE_8 },
823 /* Ext/Stat ints: DCD only */
824 { INT_CTRL_REG, ICR_ENAB_DCD_INT },
825 /* Reset Ext/Stat ints */
826 { COMMAND_REG, CR_EXTSTAT_RESET },
827 /* ...again */
828 { COMMAND_REG, CR_EXTSTAT_RESET },
829 };
830#endif
831#if defined(CONFIG_BVME6000_SCC)
832 static const struct {
833 unsigned reg, val;
834 } bvme_init_tab[] = {
835 /* Values for BVME6000 */
836 /* no parity, 1 stop bit, async, 1:16 */
837 { AUX1_CTRL_REG, A1CR_PARITY_NONE|A1CR_MODE_ASYNC_1|A1CR_CLKMODE_x16 },
838 /* parity error is special cond, ints disabled, no DMA */
839 { INT_AND_DMA_REG, IDR_PARERR_AS_SPCOND | IDR_RX_INT_DISAB },
840 /* Rx 8 bits/char, no auto enable, Rx off */
841 { RX_CTRL_REG, RCR_CHSIZE_8 },
842 /* DTR off, Tx 8 bits/char, RTS off, Tx off */
843 { TX_CTRL_REG, TCR_CHSIZE_8 },
844 /* special features off */
845 { AUX2_CTRL_REG, 0 },
846 { CLK_CTRL_REG, CCR_RTxC_XTAL | CCR_RXCLK_BRG | CCR_TXCLK_BRG },
847 { DPLL_CTRL_REG, DCR_BRG_ENAB },
848 /* Start Rx */
849 { RX_CTRL_REG, RCR_RX_ENAB | RCR_CHSIZE_8 },
850 /* Start Tx */
851 { TX_CTRL_REG, TCR_TX_ENAB | TCR_RTS | TCR_DTR | TCR_CHSIZE_8 },
852 /* Ext/Stat ints: DCD only */
853 { INT_CTRL_REG, ICR_ENAB_DCD_INT },
854 /* Reset Ext/Stat ints */
855 { COMMAND_REG, CR_EXTSTAT_RESET },
856 /* ...again */
857 { COMMAND_REG, CR_EXTSTAT_RESET },
858 };
859#endif
860 if (!(port->gs.flags & ASYNC_INITIALIZED)) {
861 local_irq_save(flags);
862#if defined(CONFIG_MVME147_SCC) || defined(CONFIG_MVME162_SCC)
863 if (MACH_IS_MVME147 || MACH_IS_MVME16x) {
Tobias Klauserfe971072006-01-09 20:54:02 -0800864 for (i = 0; i < ARRAY_SIZE(mvme_init_tab); ++i)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700865 SCCwrite(mvme_init_tab[i].reg, mvme_init_tab[i].val);
866 }
867#endif
868#if defined(CONFIG_BVME6000_SCC)
869 if (MACH_IS_BVME6000) {
Tobias Klauserfe971072006-01-09 20:54:02 -0800870 for (i = 0; i < ARRAY_SIZE(bvme_init_tab); ++i)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700871 SCCwrite(bvme_init_tab[i].reg, bvme_init_tab[i].val);
872 }
873#endif
874
875 /* remember status register for detection of DCD and CTS changes */
876 scc_last_status_reg[channel] = SCCread(STATUS_REG);
877
878 port->c_dcd = 0; /* Prevent initial 1->0 interrupt */
879 scc_setsignals (port, 1,1);
880 local_irq_restore(flags);
881 }
882
883 tty->driver_data = port;
884 port->gs.tty = tty;
885 port->gs.count++;
886 retval = gs_init_port(&port->gs);
887 if (retval) {
888 port->gs.count--;
889 return retval;
890 }
891 port->gs.flags |= GS_ACTIVE;
892 retval = gs_block_til_ready(port, filp);
893
894 if (retval) {
895 port->gs.count--;
896 return retval;
897 }
898
899 port->c_dcd = scc_get_CD (port);
900
901 scc_enable_rx_interrupts(port);
902
903 return 0;
904}
905
906
907static void scc_throttle (struct tty_struct * tty)
908{
909 struct scc_port *port = (struct scc_port *)tty->driver_data;
910 unsigned long flags;
911 SCC_ACCESS_INIT(port);
912
913 if (tty->termios->c_cflag & CRTSCTS) {
914 local_irq_save(flags);
915 SCCmod(TX_CTRL_REG, ~TCR_RTS, 0);
916 local_irq_restore(flags);
917 }
918 if (I_IXOFF(tty))
919 scc_send_xchar(tty, STOP_CHAR(tty));
920}
921
922
923static void scc_unthrottle (struct tty_struct * tty)
924{
925 struct scc_port *port = (struct scc_port *)tty->driver_data;
926 unsigned long flags;
927 SCC_ACCESS_INIT(port);
928
929 if (tty->termios->c_cflag & CRTSCTS) {
930 local_irq_save(flags);
931 SCCmod(TX_CTRL_REG, 0xff, TCR_RTS);
932 local_irq_restore(flags);
933 }
934 if (I_IXOFF(tty))
935 scc_send_xchar(tty, START_CHAR(tty));
936}
937
938
939static int scc_ioctl(struct tty_struct *tty, struct file *file,
940 unsigned int cmd, unsigned long arg)
941{
942 return -ENOIOCTLCMD;
943}
944
945
946static void scc_break_ctl(struct tty_struct *tty, int break_state)
947{
948 struct scc_port *port = (struct scc_port *)tty->driver_data;
949 unsigned long flags;
950 SCC_ACCESS_INIT(port);
951
952 local_irq_save(flags);
953 SCCmod(TX_CTRL_REG, ~TCR_SEND_BREAK,
954 break_state ? TCR_SEND_BREAK : 0);
955 local_irq_restore(flags);
956}
957
958
959/*---------------------------------------------------------------------------
960 * Serial console stuff...
961 *--------------------------------------------------------------------------*/
962
963#define scc_delay() do { __asm__ __volatile__ (" nop; nop"); } while (0)
964
965static void scc_ch_write (char ch)
966{
967 volatile char *p = NULL;
968
969#ifdef CONFIG_MVME147_SCC
970 if (MACH_IS_MVME147)
971 p = (volatile char *)M147_SCC_A_ADDR;
972#endif
973#ifdef CONFIG_MVME162_SCC
974 if (MACH_IS_MVME16x)
975 p = (volatile char *)MVME_SCC_A_ADDR;
976#endif
977#ifdef CONFIG_BVME6000_SCC
978 if (MACH_IS_BVME6000)
979 p = (volatile char *)BVME_SCC_A_ADDR;
980#endif
981
982 do {
983 scc_delay();
984 }
985 while (!(*p & 4));
986 scc_delay();
987 *p = 8;
988 scc_delay();
989 *p = ch;
990}
991
992/* The console must be locked when we get here. */
993
994static void scc_console_write (struct console *co, const char *str, unsigned count)
995{
996 unsigned long flags;
997
998 local_irq_save(flags);
999
1000 while (count--)
1001 {
1002 if (*str == '\n')
1003 scc_ch_write ('\r');
1004 scc_ch_write (*str++);
1005 }
1006 local_irq_restore(flags);
1007}
1008
1009static struct tty_driver *scc_console_device(struct console *c, int *index)
1010{
1011 *index = c->index;
1012 return scc_driver;
1013}
1014
1015
1016static int __init scc_console_setup(struct console *co, char *options)
1017{
1018 return 0;
1019}
1020
1021
1022static struct console sercons = {
1023 .name = "ttyS",
1024 .write = scc_console_write,
1025 .device = scc_console_device,
1026 .setup = scc_console_setup,
1027 .flags = CON_PRINTBUFFER,
1028 .index = -1,
1029};
1030
1031
1032static int __init vme_scc_console_init(void)
1033{
1034 if (vme_brdtype == VME_TYPE_MVME147 ||
1035 vme_brdtype == VME_TYPE_MVME162 ||
1036 vme_brdtype == VME_TYPE_MVME172 ||
1037 vme_brdtype == VME_TYPE_BVME4000 ||
1038 vme_brdtype == VME_TYPE_BVME6000)
1039 register_console(&sercons);
1040 return 0;
1041}
1042console_initcall(vme_scc_console_init);