d751edfda8397c1c1d5791b34b7a38d0009d7866
[linux-3.10.git] / drivers / staging / ipack / devices / ipoctal.c
1 /**
2  * ipoctal.c
3  *
4  * driver for the GE IP-OCTAL boards
5  * Copyright (c) 2009 Nicolas Serafini, EIC2 SA
6  * Copyright (c) 2010,2011 Samuel Iglesias Gonsalvez <siglesia@cern.ch>, CERN
7  * Copyright (c) 2012 Samuel Iglesias Gonsalvez <siglesias@igalia.com>, Igalia
8  *
9  * This program is free software; you can redistribute it and/or modify it
10  * under the terms of the GNU General Public License as published by the Free
11  * Software Foundation; version 2 of the License.
12  */
13
14 #include <linux/device.h>
15 #include <linux/module.h>
16 #include <linux/interrupt.h>
17 #include <linux/sched.h>
18 #include <linux/tty.h>
19 #include <linux/serial.h>
20 #include <linux/tty_flip.h>
21 #include <linux/slab.h>
22 #include <linux/atomic.h>
23 #include <linux/io.h>
24 #include "../ipack.h"
25 #include "ipoctal.h"
26 #include "scc2698.h"
27
28 #define IP_OCTAL_ID_SPACE_VECTOR    0x41
29 #define IP_OCTAL_NB_BLOCKS          4
30
31 static const struct tty_operations ipoctal_fops;
32
33 struct ipoctal_channel {
34         struct ipoctal_stats            stats;
35         unsigned int                    nb_bytes;
36         wait_queue_head_t               queue;
37         spinlock_t                      lock;
38         unsigned int                    pointer_read;
39         unsigned int                    pointer_write;
40         atomic_t                        open;
41         struct tty_port                 tty_port;
42         union scc2698_channel __iomem   *regs;
43         union scc2698_block __iomem     *block_regs;
44         unsigned int                    board_id;
45         unsigned char                   *board_write;
46         u8                              isr_rx_rdy_mask;
47         u8                              isr_tx_rdy_mask;
48 };
49
50 struct ipoctal {
51         struct ipack_device             *dev;
52         unsigned int                    board_id;
53         struct ipoctal_channel          channel[NR_CHANNELS];
54         unsigned char                   write;
55         struct tty_driver               *tty_drv;
56 };
57
58 static int ipoctal_port_activate(struct tty_port *port, struct tty_struct *tty)
59 {
60         struct ipoctal_channel *channel;
61
62         channel = dev_get_drvdata(tty->dev);
63
64         iowrite8(CR_ENABLE_RX, &channel->regs->w.cr);
65         return 0;
66 }
67
68 static int ipoctal_open(struct tty_struct *tty, struct file *file)
69 {
70         int res;
71         struct ipoctal_channel *channel;
72
73         channel = dev_get_drvdata(tty->dev);
74
75         if (atomic_read(&channel->open))
76                 return -EBUSY;
77
78         tty->driver_data = channel;
79
80         res = tty_port_open(&channel->tty_port, tty, file);
81         if (res)
82                 return res;
83
84         atomic_inc(&channel->open);
85         return 0;
86 }
87
88 static void ipoctal_reset_stats(struct ipoctal_stats *stats)
89 {
90         stats->tx = 0;
91         stats->rx = 0;
92         stats->rcv_break = 0;
93         stats->framing_err = 0;
94         stats->overrun_err = 0;
95         stats->parity_err = 0;
96 }
97
98 static void ipoctal_free_channel(struct ipoctal_channel *channel)
99 {
100         ipoctal_reset_stats(&channel->stats);
101         channel->pointer_read = 0;
102         channel->pointer_write = 0;
103         channel->nb_bytes = 0;
104 }
105
106 static void ipoctal_close(struct tty_struct *tty, struct file *filp)
107 {
108         struct ipoctal_channel *channel = tty->driver_data;
109
110         tty_port_close(&channel->tty_port, tty, filp);
111
112         if (atomic_dec_and_test(&channel->open))
113                 ipoctal_free_channel(channel);
114 }
115
116 static int ipoctal_get_icount(struct tty_struct *tty,
117                               struct serial_icounter_struct *icount)
118 {
119         struct ipoctal_channel *channel = tty->driver_data;
120
121         icount->cts = 0;
122         icount->dsr = 0;
123         icount->rng = 0;
124         icount->dcd = 0;
125         icount->rx = channel->stats.rx;
126         icount->tx = channel->stats.tx;
127         icount->frame = channel->stats.framing_err;
128         icount->parity = channel->stats.parity_err;
129         icount->brk = channel->stats.rcv_break;
130         return 0;
131 }
132
133 static void ipoctal_irq_rx(struct ipoctal_channel *channel,
134                            struct tty_struct *tty, u8 sr)
135 {
136         unsigned char value;
137         unsigned char flag = TTY_NORMAL;
138         u8 isr;
139
140         do {
141                 value = ioread8(&channel->regs->r.rhr);
142                 /* Error: count statistics */
143                 if (sr & SR_ERROR) {
144                         iowrite8(CR_CMD_RESET_ERR_STATUS, &channel->regs->w.cr);
145
146                         if (sr & SR_OVERRUN_ERROR) {
147                                 channel->stats.overrun_err++;
148                                 /* Overrun doesn't affect the current character*/
149                                 tty_insert_flip_char(tty, 0, TTY_OVERRUN);
150                         }
151                         if (sr & SR_PARITY_ERROR) {
152                                 channel->stats.parity_err++;
153                                 flag = TTY_PARITY;
154                         }
155                         if (sr & SR_FRAMING_ERROR) {
156                                 channel->stats.framing_err++;
157                                 flag = TTY_FRAME;
158                         }
159                         if (sr & SR_RECEIVED_BREAK) {
160                                 iowrite8(CR_CMD_RESET_BREAK_CHANGE, &channel->regs->w.cr);
161                                 channel->stats.rcv_break++;
162                                 flag = TTY_BREAK;
163                         }
164                 }
165                 tty_insert_flip_char(tty, value, flag);
166
167                 /* Check if there are more characters in RX FIFO
168                  * If there are more, the isr register for this channel
169                  * has enabled the RxRDY|FFULL bit.
170                  */
171                 isr = ioread8(&channel->block_regs->r.isr);
172                 sr = ioread8(&channel->regs->r.sr);
173         } while (isr & channel->isr_rx_rdy_mask);
174
175         tty_flip_buffer_push(tty);
176 }
177
178 static void ipoctal_irq_tx(struct ipoctal_channel *channel)
179 {
180         unsigned char value;
181         unsigned int *pointer_write = &channel->pointer_write;
182
183         if (channel->nb_bytes <= 0) {
184                 channel->nb_bytes = 0;
185                 return;
186         }
187
188         value = channel->tty_port.xmit_buf[*pointer_write];
189         iowrite8(value, &channel->regs->w.thr);
190         channel->stats.tx++;
191         (*pointer_write)++;
192         *pointer_write = *pointer_write % PAGE_SIZE;
193         channel->nb_bytes--;
194
195         if ((channel->nb_bytes == 0) &&
196             (waitqueue_active(&channel->queue))) {
197
198                 if (channel->board_id != IPACK1_DEVICE_ID_SBS_OCTAL_485) {
199                         *channel->board_write = 1;
200                         wake_up_interruptible(&channel->queue);
201                 }
202         }
203 }
204
205 static void ipoctal_irq_channel(struct ipoctal_channel *channel)
206 {
207         u8 isr, sr;
208         struct tty_struct *tty;
209
210         /* If there is no client, skip the check */
211         if (!atomic_read(&channel->open))
212                 return;
213
214         tty = tty_port_tty_get(&channel->tty_port);
215         if (!tty)
216                 return;
217         /* The HW is organized in pair of channels.  See which register we need
218          * to read from */
219         isr = ioread8(&channel->block_regs->r.isr);
220         sr = ioread8(&channel->regs->r.sr);
221
222         /* In case of RS-485, change from TX to RX when finishing TX.
223          * Half-duplex. */
224         if ((channel->board_id == IPACK1_DEVICE_ID_SBS_OCTAL_485) &&
225             (sr & SR_TX_EMPTY) && (channel->nb_bytes == 0)) {
226                 iowrite8(CR_DISABLE_TX, &channel->regs->w.cr);
227                 iowrite8(CR_CMD_NEGATE_RTSN, &channel->regs->w.cr);
228                 iowrite8(CR_ENABLE_RX, &channel->regs->w.cr);
229                 *channel->board_write = 1;
230                 wake_up_interruptible(&channel->queue);
231         }
232
233         /* RX data */
234         if ((isr & channel->isr_rx_rdy_mask) && (sr & SR_RX_READY))
235                 ipoctal_irq_rx(channel, tty, sr);
236
237         /* TX of each character */
238         if ((isr & channel->isr_tx_rdy_mask) && (sr & SR_TX_READY))
239                 ipoctal_irq_tx(channel);
240
241         tty_flip_buffer_push(tty);
242         tty_kref_put(tty);
243 }
244
245 static irqreturn_t ipoctal_irq_handler(void *arg)
246 {
247         unsigned int i;
248         struct ipoctal *ipoctal = (struct ipoctal *) arg;
249
250         /* Check all channels */
251         for (i = 0; i < NR_CHANNELS; i++)
252                 ipoctal_irq_channel(&ipoctal->channel[i]);
253
254         /* Clear the IPack device interrupt */
255         readw(ipoctal->dev->int_space.address + ACK_INT_REQ0);
256         readw(ipoctal->dev->int_space.address + ACK_INT_REQ1);
257
258         return IRQ_HANDLED;
259 }
260
261 static int ipoctal_check_model(struct ipack_device *dev, unsigned char *id)
262 {
263         unsigned char manufacturerID;
264         unsigned char board_id;
265
266
267         manufacturerID = ioread8(dev->id_space.address + IPACK_IDPROM_OFFSET_MANUFACTURER_ID);
268         if (manufacturerID != IPACK1_VENDOR_ID_SBS)
269                 return -ENODEV;
270         board_id = ioread8(dev->id_space.address + IPACK_IDPROM_OFFSET_MODEL);
271         switch (board_id) {
272         case IPACK1_DEVICE_ID_SBS_OCTAL_232:
273         case IPACK1_DEVICE_ID_SBS_OCTAL_422:
274         case IPACK1_DEVICE_ID_SBS_OCTAL_485:
275                 *id = board_id;
276                 break;
277         default:
278                 return -ENODEV;
279         }
280
281         return 0;
282 }
283
284 static const struct tty_port_operations ipoctal_tty_port_ops = {
285         .dtr_rts = NULL,
286         .activate = ipoctal_port_activate,
287 };
288
289 static int ipoctal_inst_slot(struct ipoctal *ipoctal, unsigned int bus_nr,
290                              unsigned int slot)
291 {
292         int res = 0;
293         int i;
294         struct tty_driver *tty;
295         char name[20];
296         unsigned char board_id;
297         struct ipoctal_channel *channel;
298         union scc2698_channel __iomem *chan_regs;
299         union scc2698_block __iomem *block_regs;
300
301         res = ipoctal->dev->bus->ops->map_space(ipoctal->dev, 0,
302                                                 IPACK_ID_SPACE);
303         if (res) {
304                 dev_err(&ipoctal->dev->dev,
305                         "Unable to map slot [%d:%d] ID space!\n",
306                         bus_nr, slot);
307                 return res;
308         }
309
310         res = ipoctal_check_model(ipoctal->dev, &board_id);
311         if (res) {
312                 ipoctal->dev->bus->ops->unmap_space(ipoctal->dev,
313                                                     IPACK_ID_SPACE);
314                 goto out_unregister_id_space;
315         }
316         ipoctal->board_id = board_id;
317
318         res = ipoctal->dev->bus->ops->map_space(ipoctal->dev, 0,
319                                                 IPACK_IO_SPACE);
320         if (res) {
321                 dev_err(&ipoctal->dev->dev,
322                         "Unable to map slot [%d:%d] IO space!\n",
323                         bus_nr, slot);
324                 goto out_unregister_id_space;
325         }
326
327         res = ipoctal->dev->bus->ops->map_space(ipoctal->dev, 0,
328                                                 IPACK_INT_SPACE);
329         if (res) {
330                 dev_err(&ipoctal->dev->dev,
331                         "Unable to map slot [%d:%d] INT space!\n",
332                         bus_nr, slot);
333                 goto out_unregister_io_space;
334         }
335
336         res = ipoctal->dev->bus->ops->map_space(ipoctal->dev,
337                                            0x8000, IPACK_MEM_SPACE);
338         if (res) {
339                 dev_err(&ipoctal->dev->dev,
340                         "Unable to map slot [%d:%d] MEM space!\n",
341                         bus_nr, slot);
342                 goto out_unregister_int_space;
343         }
344
345         /* Save the virtual address to access the registers easily */
346         chan_regs =
347                 (union scc2698_channel __iomem *) ipoctal->dev->io_space.address;
348         block_regs =
349                 (union scc2698_block __iomem *) ipoctal->dev->io_space.address;
350
351         /* Disable RX and TX before touching anything */
352         for (i = 0; i < NR_CHANNELS ; i++) {
353                 struct ipoctal_channel *channel = &ipoctal->channel[i];
354                 channel->regs = chan_regs + i;
355                 channel->block_regs = block_regs + (i >> 1);
356                 channel->board_write = &ipoctal->write;
357                 channel->board_id = ipoctal->board_id;
358                 if (i & 1) {
359                         channel->isr_tx_rdy_mask = ISR_TxRDY_B;
360                         channel->isr_rx_rdy_mask = ISR_RxRDY_FFULL_B;
361                 } else {
362                         channel->isr_tx_rdy_mask = ISR_TxRDY_A;
363                         channel->isr_rx_rdy_mask = ISR_RxRDY_FFULL_A;
364                 }
365
366                 iowrite8(CR_DISABLE_RX | CR_DISABLE_TX, &channel->regs->w.cr);
367                 iowrite8(CR_CMD_RESET_RX, &channel->regs->w.cr);
368                 iowrite8(CR_CMD_RESET_TX, &channel->regs->w.cr);
369                 iowrite8(MR1_CHRL_8_BITS | MR1_ERROR_CHAR | MR1_RxINT_RxRDY,
370                          &channel->regs->w.mr); /* mr1 */
371                 iowrite8(0, &channel->regs->w.mr); /* mr2 */
372                 iowrite8(TX_CLK_9600  | RX_CLK_9600, &channel->regs->w.csr);
373         }
374
375         for (i = 0; i < IP_OCTAL_NB_BLOCKS; i++) {
376                 iowrite8(ACR_BRG_SET2, &block_regs[i].w.acr);
377                 iowrite8(OPCR_MPP_OUTPUT | OPCR_MPOa_RTSN | OPCR_MPOb_RTSN,
378                          &block_regs[i].w.opcr);
379                 iowrite8(IMR_TxRDY_A | IMR_RxRDY_FFULL_A | IMR_DELTA_BREAK_A |
380                          IMR_TxRDY_B | IMR_RxRDY_FFULL_B | IMR_DELTA_BREAK_B,
381                          &block_regs[i].w.imr);
382         }
383
384         /*
385          * IP-OCTAL has different addresses to copy its IRQ vector.
386          * Depending of the carrier these addresses are accesible or not.
387          * More info in the datasheet.
388          */
389         ipoctal->dev->bus->ops->request_irq(ipoctal->dev,
390                                        ipoctal_irq_handler, ipoctal);
391         /* Dummy write */
392         iowrite8(1, ipoctal->dev->mem_space.address + 1);
393
394         /* Register the TTY device */
395
396         /* Each IP-OCTAL channel is a TTY port */
397         tty = alloc_tty_driver(NR_CHANNELS);
398
399         if (!tty) {
400                 res = -ENOMEM;
401                 goto out_unregister_slot_unmap;
402         }
403
404         /* Fill struct tty_driver with ipoctal data */
405         tty->owner = THIS_MODULE;
406         tty->driver_name = KBUILD_MODNAME;
407         sprintf(name, KBUILD_MODNAME ".%d.%d.", bus_nr, slot);
408         tty->name = name;
409         tty->major = 0;
410
411         tty->minor_start = 0;
412         tty->type = TTY_DRIVER_TYPE_SERIAL;
413         tty->subtype = SERIAL_TYPE_NORMAL;
414         tty->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_DYNAMIC_DEV;
415         tty->init_termios = tty_std_termios;
416         tty->init_termios.c_cflag = B9600 | CS8 | CREAD | HUPCL | CLOCAL;
417         tty->init_termios.c_ispeed = 9600;
418         tty->init_termios.c_ospeed = 9600;
419
420         tty_set_operations(tty, &ipoctal_fops);
421         res = tty_register_driver(tty);
422         if (res) {
423                 dev_err(&ipoctal->dev->dev, "Can't register tty driver.\n");
424                 put_tty_driver(tty);
425                 goto out_unregister_slot_unmap;
426         }
427
428         /* Save struct tty_driver for use it when uninstalling the device */
429         ipoctal->tty_drv = tty;
430
431         for (i = 0; i < NR_CHANNELS; i++) {
432                 struct device *tty_dev;
433
434                 channel = &ipoctal->channel[i];
435                 tty_port_init(&channel->tty_port);
436                 tty_port_alloc_xmit_buf(&channel->tty_port);
437                 channel->tty_port.ops = &ipoctal_tty_port_ops;
438
439                 ipoctal_reset_stats(&channel->stats);
440                 channel->nb_bytes = 0;
441                 init_waitqueue_head(&channel->queue);
442
443                 spin_lock_init(&channel->lock);
444                 channel->pointer_read = 0;
445                 channel->pointer_write = 0;
446                 tty_dev = tty_port_register_device(&channel->tty_port, tty, i, NULL);
447                 if (IS_ERR(tty_dev)) {
448                         dev_err(&ipoctal->dev->dev, "Failed to register tty device.\n");
449                         continue;
450                 }
451                 dev_set_drvdata(tty_dev, channel);
452
453                 /*
454                  * Enable again the RX. TX will be enabled when
455                  * there is something to send
456                  */
457                 iowrite8(CR_ENABLE_RX, &channel->regs->w.cr);
458         }
459
460         return 0;
461
462 out_unregister_slot_unmap:
463         ipoctal->dev->bus->ops->unmap_space(ipoctal->dev, IPACK_ID_SPACE);
464 out_unregister_int_space:
465         ipoctal->dev->bus->ops->unmap_space(ipoctal->dev, IPACK_INT_SPACE);
466 out_unregister_io_space:
467         ipoctal->dev->bus->ops->unmap_space(ipoctal->dev, IPACK_IO_SPACE);
468 out_unregister_id_space:
469         ipoctal->dev->bus->ops->unmap_space(ipoctal->dev, IPACK_MEM_SPACE);
470         return res;
471 }
472
473 static inline int ipoctal_copy_write_buffer(struct ipoctal_channel *channel,
474                                             const unsigned char *buf,
475                                             int count)
476 {
477         unsigned long flags;
478         int i;
479         unsigned int *pointer_read = &channel->pointer_read;
480
481         /* Copy the bytes from the user buffer to the internal one */
482         for (i = 0; i < count; i++) {
483                 if (i <= (PAGE_SIZE - channel->nb_bytes)) {
484                         spin_lock_irqsave(&channel->lock, flags);
485                         channel->tty_port.xmit_buf[*pointer_read] = buf[i];
486                         *pointer_read = (*pointer_read + 1) % PAGE_SIZE;
487                         channel->nb_bytes++;
488                         spin_unlock_irqrestore(&channel->lock, flags);
489                 } else {
490                         break;
491                 }
492         }
493         return i;
494 }
495
496 static int ipoctal_write_tty(struct tty_struct *tty,
497                              const unsigned char *buf, int count)
498 {
499         struct ipoctal_channel *channel = tty->driver_data;
500         unsigned int char_copied;
501
502         char_copied = ipoctal_copy_write_buffer(channel, buf, count);
503
504         /* As the IP-OCTAL 485 only supports half duplex, do it manually */
505         if (channel->board_id == IPACK1_DEVICE_ID_SBS_OCTAL_485) {
506                 iowrite8(CR_DISABLE_RX, &channel->regs->w.cr);
507                 iowrite8(CR_CMD_ASSERT_RTSN, &channel->regs->w.cr);
508         }
509
510         /*
511          * Send a packet and then disable TX to avoid failure after several send
512          * operations
513          */
514         iowrite8(CR_ENABLE_TX, &channel->regs->w.cr);
515         wait_event_interruptible(channel->queue, *channel->board_write);
516         iowrite8(CR_DISABLE_TX, &channel->regs->w.cr);
517
518         *channel->board_write = 0;
519         return char_copied;
520 }
521
522 static int ipoctal_write_room(struct tty_struct *tty)
523 {
524         struct ipoctal_channel *channel = tty->driver_data;
525
526         return PAGE_SIZE - channel->nb_bytes;
527 }
528
529 static int ipoctal_chars_in_buffer(struct tty_struct *tty)
530 {
531         struct ipoctal_channel *channel = tty->driver_data;
532
533         return channel->nb_bytes;
534 }
535
536 static void ipoctal_set_termios(struct tty_struct *tty,
537                                 struct ktermios *old_termios)
538 {
539         unsigned int cflag;
540         unsigned char mr1 = 0;
541         unsigned char mr2 = 0;
542         unsigned char csr = 0;
543         struct ipoctal_channel *channel = tty->driver_data;
544         speed_t baud;
545
546         cflag = tty->termios.c_cflag;
547
548         /* Disable and reset everything before change the setup */
549         iowrite8(CR_DISABLE_RX | CR_DISABLE_TX, &channel->regs->w.cr);
550         iowrite8(CR_CMD_RESET_RX, &channel->regs->w.cr);
551         iowrite8(CR_CMD_RESET_TX, &channel->regs->w.cr);
552         iowrite8(CR_CMD_RESET_ERR_STATUS, &channel->regs->w.cr);
553         iowrite8(CR_CMD_RESET_MR, &channel->regs->w.cr);
554
555         /* Set Bits per chars */
556         switch (cflag & CSIZE) {
557         case CS6:
558                 mr1 |= MR1_CHRL_6_BITS;
559                 break;
560         case CS7:
561                 mr1 |= MR1_CHRL_7_BITS;
562                 break;
563         case CS8:
564         default:
565                 mr1 |= MR1_CHRL_8_BITS;
566                 /* By default, select CS8 */
567                 tty->termios.c_cflag = (cflag & ~CSIZE) | CS8;
568                 break;
569         }
570
571         /* Set Parity */
572         if (cflag & PARENB)
573                 if (cflag & PARODD)
574                         mr1 |= MR1_PARITY_ON | MR1_PARITY_ODD;
575                 else
576                         mr1 |= MR1_PARITY_ON | MR1_PARITY_EVEN;
577         else
578                 mr1 |= MR1_PARITY_OFF;
579
580         /* Mark or space parity is not supported */
581         tty->termios.c_cflag &= ~CMSPAR;
582
583         /* Set stop bits */
584         if (cflag & CSTOPB)
585                 mr2 |= MR2_STOP_BITS_LENGTH_2;
586         else
587                 mr2 |= MR2_STOP_BITS_LENGTH_1;
588
589         /* Set the flow control */
590         switch (channel->board_id) {
591         case IPACK1_DEVICE_ID_SBS_OCTAL_232:
592                 if (cflag & CRTSCTS) {
593                         mr1 |= MR1_RxRTS_CONTROL_ON;
594                         mr2 |= MR2_TxRTS_CONTROL_OFF | MR2_CTS_ENABLE_TX_ON;
595                 } else {
596                         mr1 |= MR1_RxRTS_CONTROL_OFF;
597                         mr2 |= MR2_TxRTS_CONTROL_OFF | MR2_CTS_ENABLE_TX_OFF;
598                 }
599                 break;
600         case IPACK1_DEVICE_ID_SBS_OCTAL_422:
601                 mr1 |= MR1_RxRTS_CONTROL_OFF;
602                 mr2 |= MR2_TxRTS_CONTROL_OFF | MR2_CTS_ENABLE_TX_OFF;
603                 break;
604         case IPACK1_DEVICE_ID_SBS_OCTAL_485:
605                 mr1 |= MR1_RxRTS_CONTROL_OFF;
606                 mr2 |= MR2_TxRTS_CONTROL_ON | MR2_CTS_ENABLE_TX_OFF;
607                 break;
608         default:
609                 return;
610                 break;
611         }
612
613         baud = tty_get_baud_rate(tty);
614         tty_termios_encode_baud_rate(&tty->termios, baud, baud);
615
616         /* Set baud rate */
617         switch (baud) {
618         case 75:
619                 csr |= TX_CLK_75 | RX_CLK_75;
620                 break;
621         case 110:
622                 csr |= TX_CLK_110 | RX_CLK_110;
623                 break;
624         case 150:
625                 csr |= TX_CLK_150 | RX_CLK_150;
626                 break;
627         case 300:
628                 csr |= TX_CLK_300 | RX_CLK_300;
629                 break;
630         case 600:
631                 csr |= TX_CLK_600 | RX_CLK_600;
632                 break;
633         case 1200:
634                 csr |= TX_CLK_1200 | RX_CLK_1200;
635                 break;
636         case 1800:
637                 csr |= TX_CLK_1800 | RX_CLK_1800;
638                 break;
639         case 2000:
640                 csr |= TX_CLK_2000 | RX_CLK_2000;
641                 break;
642         case 2400:
643                 csr |= TX_CLK_2400 | RX_CLK_2400;
644                 break;
645         case 4800:
646                 csr |= TX_CLK_4800  | RX_CLK_4800;
647                 break;
648         case 9600:
649                 csr |= TX_CLK_9600  | RX_CLK_9600;
650                 break;
651         case 19200:
652                 csr |= TX_CLK_19200 | RX_CLK_19200;
653                 break;
654         case 38400:
655         default:
656                 csr |= TX_CLK_38400 | RX_CLK_38400;
657                 /* In case of default, we establish 38400 bps */
658                 tty_termios_encode_baud_rate(&tty->termios, 38400, 38400);
659                 break;
660         }
661
662         mr1 |= MR1_ERROR_CHAR;
663         mr1 |= MR1_RxINT_RxRDY;
664
665         /* Write the control registers */
666         iowrite8(mr1, &channel->regs->w.mr);
667         iowrite8(mr2, &channel->regs->w.mr);
668         iowrite8(csr, &channel->regs->w.csr);
669
670         /* Enable again the RX */
671         iowrite8(CR_ENABLE_RX, &channel->regs->w.cr);
672 }
673
674 static void ipoctal_hangup(struct tty_struct *tty)
675 {
676         unsigned long flags;
677         struct ipoctal_channel *channel = tty->driver_data;
678
679         if (channel == NULL)
680                 return;
681
682         spin_lock_irqsave(&channel->lock, flags);
683         channel->nb_bytes = 0;
684         channel->pointer_read = 0;
685         channel->pointer_write = 0;
686         spin_unlock_irqrestore(&channel->lock, flags);
687
688         tty_port_hangup(&channel->tty_port);
689
690         iowrite8(CR_DISABLE_RX | CR_DISABLE_TX, &channel->regs->w.cr);
691         iowrite8(CR_CMD_RESET_RX, &channel->regs->w.cr);
692         iowrite8(CR_CMD_RESET_TX, &channel->regs->w.cr);
693         iowrite8(CR_CMD_RESET_ERR_STATUS, &channel->regs->w.cr);
694         iowrite8(CR_CMD_RESET_MR, &channel->regs->w.cr);
695
696         clear_bit(ASYNCB_INITIALIZED, &channel->tty_port.flags);
697         wake_up_interruptible(&channel->tty_port.open_wait);
698 }
699
700 static const struct tty_operations ipoctal_fops = {
701         .ioctl =                NULL,
702         .open =                 ipoctal_open,
703         .close =                ipoctal_close,
704         .write =                ipoctal_write_tty,
705         .set_termios =          ipoctal_set_termios,
706         .write_room =           ipoctal_write_room,
707         .chars_in_buffer =      ipoctal_chars_in_buffer,
708         .get_icount =           ipoctal_get_icount,
709         .hangup =               ipoctal_hangup,
710 };
711
712 static int ipoctal_probe(struct ipack_device *dev)
713 {
714         int res;
715         struct ipoctal *ipoctal;
716
717         ipoctal = kzalloc(sizeof(struct ipoctal), GFP_KERNEL);
718         if (ipoctal == NULL)
719                 return -ENOMEM;
720
721         ipoctal->dev = dev;
722         res = ipoctal_inst_slot(ipoctal, dev->bus_nr, dev->slot);
723         if (res)
724                 goto out_uninst;
725
726         dev_set_drvdata(&dev->dev, ipoctal);
727         return 0;
728
729 out_uninst:
730         kfree(ipoctal);
731         return res;
732 }
733
734 static void __ipoctal_remove(struct ipoctal *ipoctal)
735 {
736         int i;
737
738         ipoctal->dev->bus->ops->free_irq(ipoctal->dev);
739
740         for (i = 0; i < NR_CHANNELS; i++) {
741                 struct ipoctal_channel *channel = &ipoctal->channel[i];
742                 tty_unregister_device(ipoctal->tty_drv, i);
743                 tty_port_free_xmit_buf(&channel->tty_port);
744         }
745
746         tty_unregister_driver(ipoctal->tty_drv);
747         put_tty_driver(ipoctal->tty_drv);
748         ipoctal->dev->bus->ops->unmap_space(ipoctal->dev, IPACK_MEM_SPACE);
749         ipoctal->dev->bus->ops->unmap_space(ipoctal->dev, IPACK_INT_SPACE);
750         ipoctal->dev->bus->ops->unmap_space(ipoctal->dev, IPACK_IO_SPACE);
751         ipoctal->dev->bus->ops->unmap_space(ipoctal->dev, IPACK_ID_SPACE);
752         kfree(ipoctal);
753 }
754
755 static void ipoctal_remove(struct ipack_device *idev)
756 {
757         __ipoctal_remove(dev_get_drvdata(&idev->dev));
758 }
759
760 static DEFINE_IPACK_DEVICE_TABLE(ipoctal_ids) = {
761         { IPACK_DEVICE(IPACK_ID_VERSION_1, IPACK1_VENDOR_ID_SBS,
762                         IPACK1_DEVICE_ID_SBS_OCTAL_232) },
763         { IPACK_DEVICE(IPACK_ID_VERSION_1, IPACK1_VENDOR_ID_SBS,
764                         IPACK1_DEVICE_ID_SBS_OCTAL_422) },
765         { IPACK_DEVICE(IPACK_ID_VERSION_1, IPACK1_VENDOR_ID_SBS,
766                         IPACK1_DEVICE_ID_SBS_OCTAL_485) },
767         { 0, },
768 };
769
770 MODULE_DEVICE_TABLE(ipack, ipoctal_ids);
771
772 static const struct ipack_driver_ops ipoctal_drv_ops = {
773         .probe  = ipoctal_probe,
774         .remove = ipoctal_remove,
775 };
776
777 static struct ipack_driver driver = {
778         .ops      = &ipoctal_drv_ops,
779         .id_table = ipoctal_ids,
780 };
781
782 static int __init ipoctal_init(void)
783 {
784         return ipack_driver_register(&driver, THIS_MODULE, KBUILD_MODNAME);
785 }
786
787 static void __exit ipoctal_exit(void)
788 {
789         ipack_driver_unregister(&driver);
790 }
791
792 MODULE_DESCRIPTION("IP-Octal 232, 422 and 485 device driver");
793 MODULE_LICENSE("GPL");
794
795 module_init(ipoctal_init);
796 module_exit(ipoctal_exit);