2 Copyright (C) 1996 Digi International.
4 For technical support please email digiLinux@dgii.com or
5 call Digi tech support at (612) 912-3456
7 ** This driver is no longer supported by Digi **
9 Much of this design and code came from epca.c which was
10 copyright (C) 1994, 1995 Troy De Jongh, and subsquently
11 modified by David Nugent, Christoph Lameter, Mike McLagan.
13 This program is free software; you can redistribute it and/or modify
14 it under the terms of the GNU General Public License as published by
15 the Free Software Foundation; either version 2 of the License, or
16 (at your option) any later version.
18 This program is distributed in the hope that it will be useful,
19 but WITHOUT ANY WARRANTY; without even the implied warranty of
20 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 GNU General Public License for more details.
23 You should have received a copy of the GNU General Public License
24 along with this program; if not, write to the Free Software
25 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
27 /* See README.epca for change history --DAT*/
29 #include <linux/module.h>
30 #include <linux/kernel.h>
31 #include <linux/types.h>
32 #include <linux/init.h>
33 #include <linux/serial.h>
34 #include <linux/delay.h>
35 #include <linux/ctype.h>
36 #include <linux/tty.h>
37 #include <linux/tty_flip.h>
38 #include <linux/slab.h>
39 #include <linux/ioport.h>
40 #include <linux/interrupt.h>
41 #include <linux/uaccess.h>
43 #include <linux/spinlock.h>
44 #include <linux/pci.h>
51 #include "epcaconfig.h"
53 #define VERSION "1.3.0.1-LK2.6"
55 /* This major needs to be submitted to Linux to join the majors list */
56 #define DIGIINFOMAJOR 35 /* For Digi specific ioctl */
60 #define epcaassert(x, msg) if (!(x)) epca_error(__LINE__, msg)
64 static int nbdevs, num_cards, liloconfig;
65 static int digi_poller_inhibited = 1 ;
67 static int setup_error_code;
68 static int invalid_lilo_config;
71 * The ISA boards do window flipping into the same spaces so its only sane with
72 * a single lock. It's still pretty efficient. This lock guards the hardware
73 * and the tty_port lock guards the kernel side stuff like use counts. Take
74 * this lock inside the port lock if you must take both.
76 static DEFINE_SPINLOCK(epca_lock);
78 /* MAXBOARDS is typically 12, but ISA and EISA cards are restricted
80 static struct board_info boards[MAXBOARDS];
82 static struct tty_driver *pc_driver;
83 static struct tty_driver *pc_info;
85 /* ------------------ Begin Digi specific structures -------------------- */
88 * digi_channels represents an array of structures that keep track of each
89 * channel of the Digi product. Information such as transmit and receive
90 * pointers, termio data, and signal definitions (DTR, CTS, etc ...) are stored
91 * here. This structure is NOT used to overlay the cards physical channel
94 static struct channel digi_channels[MAX_ALLOC];
97 * card_ptr is an array used to hold the address of the first channel structure
98 * of each card. This array will hold the addresses of various channels located
101 static struct channel *card_ptr[MAXCARDS];
103 static struct timer_list epca_timer;
106 * Begin generic memory functions. These functions will be alias (point at)
107 * more specific functions dependent on the board being configured.
109 static void memwinon(struct board_info *b, unsigned int win);
110 static void memwinoff(struct board_info *b, unsigned int win);
111 static void globalwinon(struct channel *ch);
112 static void rxwinon(struct channel *ch);
113 static void txwinon(struct channel *ch);
114 static void memoff(struct channel *ch);
115 static void assertgwinon(struct channel *ch);
116 static void assertmemoff(struct channel *ch);
118 /* ---- Begin more 'specific' memory functions for cx_like products --- */
120 static void pcxem_memwinon(struct board_info *b, unsigned int win);
121 static void pcxem_memwinoff(struct board_info *b, unsigned int win);
122 static void pcxem_globalwinon(struct channel *ch);
123 static void pcxem_rxwinon(struct channel *ch);
124 static void pcxem_txwinon(struct channel *ch);
125 static void pcxem_memoff(struct channel *ch);
127 /* ------ Begin more 'specific' memory functions for the pcxe ------- */
129 static void pcxe_memwinon(struct board_info *b, unsigned int win);
130 static void pcxe_memwinoff(struct board_info *b, unsigned int win);
131 static void pcxe_globalwinon(struct channel *ch);
132 static void pcxe_rxwinon(struct channel *ch);
133 static void pcxe_txwinon(struct channel *ch);
134 static void pcxe_memoff(struct channel *ch);
136 /* ---- Begin more 'specific' memory functions for the pc64xe and pcxi ---- */
137 /* Note : pc64xe and pcxi share the same windowing routines */
139 static void pcxi_memwinon(struct board_info *b, unsigned int win);
140 static void pcxi_memwinoff(struct board_info *b, unsigned int win);
141 static void pcxi_globalwinon(struct channel *ch);
142 static void pcxi_rxwinon(struct channel *ch);
143 static void pcxi_txwinon(struct channel *ch);
144 static void pcxi_memoff(struct channel *ch);
146 /* - Begin 'specific' do nothing memory functions needed for some cards - */
148 static void dummy_memwinon(struct board_info *b, unsigned int win);
149 static void dummy_memwinoff(struct board_info *b, unsigned int win);
150 static void dummy_globalwinon(struct channel *ch);
151 static void dummy_rxwinon(struct channel *ch);
152 static void dummy_txwinon(struct channel *ch);
153 static void dummy_memoff(struct channel *ch);
154 static void dummy_assertgwinon(struct channel *ch);
155 static void dummy_assertmemoff(struct channel *ch);
157 static struct channel *verifyChannel(struct tty_struct *);
158 static void pc_sched_event(struct channel *, int);
159 static void epca_error(int, char *);
160 static void pc_close(struct tty_struct *, struct file *);
161 static void shutdown(struct channel *, struct tty_struct *tty);
162 static void pc_hangup(struct tty_struct *);
163 static int pc_write_room(struct tty_struct *);
164 static int pc_chars_in_buffer(struct tty_struct *);
165 static void pc_flush_buffer(struct tty_struct *);
166 static void pc_flush_chars(struct tty_struct *);
167 static int block_til_ready(struct tty_struct *, struct file *,
169 static int pc_open(struct tty_struct *, struct file *);
170 static void post_fep_init(unsigned int crd);
171 static void epcapoll(unsigned long);
172 static void doevent(int);
173 static void fepcmd(struct channel *, int, int, int, int, int);
174 static unsigned termios2digi_h(struct channel *ch, unsigned);
175 static unsigned termios2digi_i(struct channel *ch, unsigned);
176 static unsigned termios2digi_c(struct channel *ch, unsigned);
177 static void epcaparam(struct tty_struct *, struct channel *);
178 static void receive_data(struct channel *);
179 static int pc_ioctl(struct tty_struct *, struct file *,
180 unsigned int, unsigned long);
181 static int info_ioctl(struct tty_struct *, struct file *,
182 unsigned int, unsigned long);
183 static void pc_set_termios(struct tty_struct *, struct ktermios *);
184 static void do_softint(struct work_struct *work);
185 static void pc_stop(struct tty_struct *);
186 static void pc_start(struct tty_struct *);
187 static void pc_throttle(struct tty_struct *tty);
188 static void pc_unthrottle(struct tty_struct *tty);
189 static int pc_send_break(struct tty_struct *tty, int msec);
190 static void setup_empty_event(struct tty_struct *tty, struct channel *ch);
192 static int pc_write(struct tty_struct *, const unsigned char *, int);
193 static int pc_init(void);
194 static int init_PCI(void);
197 * Table of functions for each board to handle memory. Mantaining parallelism
198 * is a *very* good idea here. The idea is for the runtime code to blindly call
199 * these functions, not knowing/caring about the underlying hardware. This
200 * stuff should contain no conditionals; if more functionality is needed a
201 * different entry should be established. These calls are the interface calls
202 * and are the only functions that should be accessed. Anyone caught making
203 * direct calls deserves what they get.
205 static void memwinon(struct board_info *b, unsigned int win)
210 static void memwinoff(struct board_info *b, unsigned int win)
212 b->memwinoff(b, win);
215 static void globalwinon(struct channel *ch)
217 ch->board->globalwinon(ch);
220 static void rxwinon(struct channel *ch)
222 ch->board->rxwinon(ch);
225 static void txwinon(struct channel *ch)
227 ch->board->txwinon(ch);
230 static void memoff(struct channel *ch)
232 ch->board->memoff(ch);
234 static void assertgwinon(struct channel *ch)
236 ch->board->assertgwinon(ch);
239 static void assertmemoff(struct channel *ch)
241 ch->board->assertmemoff(ch);
244 /* PCXEM windowing is the same as that used in the PCXR and CX series cards. */
245 static void pcxem_memwinon(struct board_info *b, unsigned int win)
247 outb_p(FEPWIN | win, b->port + 1);
250 static void pcxem_memwinoff(struct board_info *b, unsigned int win)
252 outb_p(0, b->port + 1);
255 static void pcxem_globalwinon(struct channel *ch)
257 outb_p(FEPWIN, (int)ch->board->port + 1);
260 static void pcxem_rxwinon(struct channel *ch)
262 outb_p(ch->rxwin, (int)ch->board->port + 1);
265 static void pcxem_txwinon(struct channel *ch)
267 outb_p(ch->txwin, (int)ch->board->port + 1);
270 static void pcxem_memoff(struct channel *ch)
272 outb_p(0, (int)ch->board->port + 1);
275 /* ----------------- Begin pcxe memory window stuff ------------------ */
276 static void pcxe_memwinon(struct board_info *b, unsigned int win)
278 outb_p(FEPWIN | win, b->port + 1);
281 static void pcxe_memwinoff(struct board_info *b, unsigned int win)
283 outb_p(inb(b->port) & ~FEPMEM, b->port + 1);
284 outb_p(0, b->port + 1);
287 static void pcxe_globalwinon(struct channel *ch)
289 outb_p(FEPWIN, (int)ch->board->port + 1);
292 static void pcxe_rxwinon(struct channel *ch)
294 outb_p(ch->rxwin, (int)ch->board->port + 1);
297 static void pcxe_txwinon(struct channel *ch)
299 outb_p(ch->txwin, (int)ch->board->port + 1);
302 static void pcxe_memoff(struct channel *ch)
304 outb_p(0, (int)ch->board->port);
305 outb_p(0, (int)ch->board->port + 1);
308 /* ------------- Begin pc64xe and pcxi memory window stuff -------------- */
309 static void pcxi_memwinon(struct board_info *b, unsigned int win)
311 outb_p(inb(b->port) | FEPMEM, b->port);
314 static void pcxi_memwinoff(struct board_info *b, unsigned int win)
316 outb_p(inb(b->port) & ~FEPMEM, b->port);
319 static void pcxi_globalwinon(struct channel *ch)
321 outb_p(FEPMEM, ch->board->port);
324 static void pcxi_rxwinon(struct channel *ch)
326 outb_p(FEPMEM, ch->board->port);
329 static void pcxi_txwinon(struct channel *ch)
331 outb_p(FEPMEM, ch->board->port);
334 static void pcxi_memoff(struct channel *ch)
336 outb_p(0, ch->board->port);
339 static void pcxi_assertgwinon(struct channel *ch)
341 epcaassert(inb(ch->board->port) & FEPMEM, "Global memory off");
344 static void pcxi_assertmemoff(struct channel *ch)
346 epcaassert(!(inb(ch->board->port) & FEPMEM), "Memory on");
350 * Not all of the cards need specific memory windowing routines. Some cards
351 * (Such as PCI) needs no windowing routines at all. We provide these do
352 * nothing routines so that the same code base can be used. The driver will
353 * ALWAYS call a windowing routine if it thinks it needs to; regardless of the
354 * card. However, dependent on the card the routine may or may not do anything.
356 static void dummy_memwinon(struct board_info *b, unsigned int win)
360 static void dummy_memwinoff(struct board_info *b, unsigned int win)
364 static void dummy_globalwinon(struct channel *ch)
368 static void dummy_rxwinon(struct channel *ch)
372 static void dummy_txwinon(struct channel *ch)
376 static void dummy_memoff(struct channel *ch)
380 static void dummy_assertgwinon(struct channel *ch)
384 static void dummy_assertmemoff(struct channel *ch)
388 static struct channel *verifyChannel(struct tty_struct *tty)
391 * This routine basically provides a sanity check. It insures that the
392 * channel returned is within the proper range of addresses as well as
393 * properly initialized. If some bogus info gets passed in
394 * through tty->driver_data this should catch it.
397 struct channel *ch = tty->driver_data;
398 if (ch >= &digi_channels[0] && ch < &digi_channels[nbdevs]) {
399 if (ch->magic == EPCA_MAGIC)
406 static void pc_sched_event(struct channel *ch, int event)
409 * We call this to schedule interrupt processing on some event. The
410 * kernel sees our request and calls the related routine in OUR driver.
412 ch->event |= 1 << event;
413 schedule_work(&ch->tqueue);
416 static void epca_error(int line, char *msg)
418 printk(KERN_ERR "epca_error (Digi): line = %d %s\n", line, msg);
421 static void pc_close(struct tty_struct *tty, struct file *filp)
424 struct tty_port *port;
427 * verifyChannel returns the channel from the tty struct if it is
428 * valid. This serves as a sanity check.
430 ch = verifyChannel(tty);
435 spin_lock_irqsave(&port->lock, flags);
436 if (tty_hung_up_p(filp)) {
437 spin_unlock_irqrestore(&port->lock, flags);
440 if (port->count-- > 1) {
441 /* Begin channel is open more than once */
443 * Return without doing anything. Someone might still
444 * be using the channel.
446 spin_unlock_irqrestore(&port->lock, flags);
449 /* Port open only once go ahead with shutdown & reset */
450 WARN_ON(port->count < 0);
453 * Let the rest of the driver know the channel is being closed.
454 * This becomes important if an open is attempted before close
457 port->flags |= ASYNC_CLOSING;
460 spin_unlock_irqrestore(&port->lock, flags);
462 if (port->flags & ASYNC_INITIALIZED) {
463 /* Setup an event to indicate when the
464 transmit buffer empties */
465 setup_empty_event(tty, ch);
466 /* 30 seconds timeout */
467 tty_wait_until_sent(tty, 3000);
469 pc_flush_buffer(tty);
470 tty_ldisc_flush(tty);
473 spin_lock_irqsave(&port->lock, flags);
477 spin_unlock_irqrestore(&port->lock, flags);
479 if (port->blocked_open) {
481 msleep_interruptible(jiffies_to_msecs(ch->close_delay));
482 wake_up_interruptible(&port->open_wait);
484 port->flags &= ~(ASYNC_NORMAL_ACTIVE | ASYNC_INITIALIZED |
486 wake_up_interruptible(&port->close_wait);
489 static void shutdown(struct channel *ch, struct tty_struct *tty)
492 struct board_chan __iomem *bc;
493 struct tty_port *port = &ch->port;
495 if (!(port->flags & ASYNC_INITIALIZED))
498 spin_lock_irqsave(&epca_lock, flags);
504 * In order for an event to be generated on the receipt of data the
505 * idata flag must be set. Since we are shutting down, this is not
506 * necessary clear this flag.
509 writeb(0, &bc->idata);
511 /* If we're a modem control device and HUPCL is on, drop RTS & DTR. */
512 if (tty->termios->c_cflag & HUPCL) {
513 ch->omodem &= ~(ch->m_rts | ch->m_dtr);
514 fepcmd(ch, SETMODEM, 0, ch->m_dtr | ch->m_rts, 10, 1);
519 * The channel has officialy been closed. The next time it is opened it
520 * will have to reinitialized. Set a flag to indicate this.
522 /* Prevent future Digi programmed interrupts from coming active */
523 port->flags &= ~ASYNC_INITIALIZED;
524 spin_unlock_irqrestore(&epca_lock, flags);
527 static void pc_hangup(struct tty_struct *tty)
530 struct tty_port *port;
533 * verifyChannel returns the channel from the tty struct if it is
534 * valid. This serves as a sanity check.
536 ch = verifyChannel(tty);
541 pc_flush_buffer(tty);
542 tty_ldisc_flush(tty);
545 spin_lock_irqsave(&port->lock, flags);
547 ch->event = 0; /* FIXME: review locking of ch->event */
549 port->flags &= ~(ASYNC_NORMAL_ACTIVE | ASYNC_INITIALIZED);
550 spin_unlock_irqrestore(&port->lock, flags);
551 wake_up_interruptible(&port->open_wait);
555 static int pc_write(struct tty_struct *tty,
556 const unsigned char *buf, int bytesAvailable)
558 unsigned int head, tail;
565 struct board_chan __iomem *bc;
568 * pc_write is primarily called directly by the kernel routine
569 * tty_write (Though it can also be called by put_char) found in
570 * tty_io.c. pc_write is passed a line discipline buffer where the data
571 * to be written out is stored. The line discipline implementation
572 * itself is done at the kernel level and is not brought into the
577 * verifyChannel returns the channel from the tty struct if it is
578 * valid. This serves as a sanity check.
580 ch = verifyChannel(tty);
584 /* Make a pointer to the channel data structure found on the board. */
586 size = ch->txbufsize;
589 spin_lock_irqsave(&epca_lock, flags);
592 head = readw(&bc->tin) & (size - 1);
593 tail = readw(&bc->tout);
595 if (tail != readw(&bc->tout))
596 tail = readw(&bc->tout);
600 /* head has not wrapped */
602 * remain (much like dataLen above) represents the total amount
603 * of space available on the card for data. Here dataLen
604 * represents the space existing between the head pointer and
605 * the end of buffer. This is important because a memcpy cannot
606 * be told to automatically wrap around when it hits the buffer
609 dataLen = size - head;
610 remain = size - (head - tail) - 1;
612 /* head has wrapped around */
613 remain = tail - head - 1;
617 * Check the space on the card. If we have more data than space; reduce
618 * the amount of data to fit the space.
620 bytesAvailable = min(remain, bytesAvailable);
622 while (bytesAvailable > 0) {
623 /* there is data to copy onto card */
626 * If head is not wrapped, the below will make sure the first
627 * data copy fills to the end of card buffer.
629 dataLen = min(bytesAvailable, dataLen);
630 memcpy_toio(ch->txptr + head, buf, dataLen);
633 amountCopied += dataLen;
634 bytesAvailable -= dataLen;
641 ch->statusflags |= TXBUSY;
643 writew(head, &bc->tin);
645 if ((ch->statusflags & LOWWAIT) == 0) {
646 ch->statusflags |= LOWWAIT;
647 writeb(1, &bc->ilow);
650 spin_unlock_irqrestore(&epca_lock, flags);
654 static int pc_write_room(struct tty_struct *tty)
659 unsigned int head, tail;
660 struct board_chan __iomem *bc;
662 * verifyChannel returns the channel from the tty struct if it is
663 * valid. This serves as a sanity check.
665 ch = verifyChannel(tty);
667 spin_lock_irqsave(&epca_lock, flags);
671 head = readw(&bc->tin) & (ch->txbufsize - 1);
672 tail = readw(&bc->tout);
674 if (tail != readw(&bc->tout))
675 tail = readw(&bc->tout);
676 /* Wrap tail if necessary */
677 tail &= (ch->txbufsize - 1);
678 remain = tail - head - 1;
680 remain += ch->txbufsize;
682 if (remain && (ch->statusflags & LOWWAIT) == 0) {
683 ch->statusflags |= LOWWAIT;
684 writeb(1, &bc->ilow);
687 spin_unlock_irqrestore(&epca_lock, flags);
689 /* Return how much room is left on card */
693 static int pc_chars_in_buffer(struct tty_struct *tty)
696 unsigned int ctail, head, tail;
700 struct board_chan __iomem *bc;
702 * verifyChannel returns the channel from the tty struct if it is
703 * valid. This serves as a sanity check.
705 ch = verifyChannel(tty);
709 spin_lock_irqsave(&epca_lock, flags);
713 tail = readw(&bc->tout);
714 head = readw(&bc->tin);
715 ctail = readw(&ch->mailbox->cout);
717 if (tail == head && readw(&ch->mailbox->cin) == ctail &&
718 readb(&bc->tbusy) == 0)
720 else { /* Begin if some space on the card has been used */
721 head = readw(&bc->tin) & (ch->txbufsize - 1);
722 tail &= (ch->txbufsize - 1);
724 * The logic here is basically opposite of the above
725 * pc_write_room here we are finding the amount of bytes in the
726 * buffer filled. Not the amount of bytes empty.
728 remain = tail - head - 1;
730 remain += ch->txbufsize;
731 chars = (int)(ch->txbufsize - remain);
733 * Make it possible to wakeup anything waiting for output in
736 * If not already set. Setup an event to indicate when the
737 * transmit buffer empties.
739 if (!(ch->statusflags & EMPTYWAIT))
740 setup_empty_event(tty, ch);
741 } /* End if some space on the card has been used */
743 spin_unlock_irqrestore(&epca_lock, flags);
744 /* Return number of characters residing on card. */
748 static void pc_flush_buffer(struct tty_struct *tty)
753 struct board_chan __iomem *bc;
755 * verifyChannel returns the channel from the tty struct if it is
756 * valid. This serves as a sanity check.
758 ch = verifyChannel(tty);
762 spin_lock_irqsave(&epca_lock, flags);
765 tail = readw(&bc->tout);
766 /* Have FEP move tout pointer; effectively flushing transmit buffer */
767 fepcmd(ch, STOUT, (unsigned) tail, 0, 0, 0);
769 spin_unlock_irqrestore(&epca_lock, flags);
773 static void pc_flush_chars(struct tty_struct *tty)
777 * verifyChannel returns the channel from the tty struct if it is
778 * valid. This serves as a sanity check.
780 ch = verifyChannel(tty);
783 spin_lock_irqsave(&epca_lock, flags);
785 * If not already set and the transmitter is busy setup an
786 * event to indicate when the transmit empties.
788 if ((ch->statusflags & TXBUSY) &&
789 !(ch->statusflags & EMPTYWAIT))
790 setup_empty_event(tty, ch);
791 spin_unlock_irqrestore(&epca_lock, flags);
795 static int block_til_ready(struct tty_struct *tty,
796 struct file *filp, struct channel *ch)
798 DECLARE_WAITQUEUE(wait, current);
799 int retval, do_clocal = 0;
801 struct tty_port *port = &ch->port;
803 if (tty_hung_up_p(filp)) {
804 if (port->flags & ASYNC_HUP_NOTIFY)
807 retval = -ERESTARTSYS;
812 * If the device is in the middle of being closed, then block until
813 * it's done, and then try again.
815 if (port->flags & ASYNC_CLOSING) {
816 interruptible_sleep_on(&port->close_wait);
818 if (port->flags & ASYNC_HUP_NOTIFY)
824 if (filp->f_flags & O_NONBLOCK) {
826 * If non-blocking mode is set, then make the check up front
829 port->flags |= ASYNC_NORMAL_ACTIVE;
832 if (tty->termios->c_cflag & CLOCAL)
834 /* Block waiting for the carrier detect and the line to become free */
837 add_wait_queue(&port->open_wait, &wait);
839 spin_lock_irqsave(&port->lock, flags);
840 /* We dec count so that pc_close will know when to free things */
841 if (!tty_hung_up_p(filp))
843 port->blocked_open++;
845 set_current_state(TASK_INTERRUPTIBLE);
846 if (tty_hung_up_p(filp) ||
847 !(port->flags & ASYNC_INITIALIZED)) {
848 if (port->flags & ASYNC_HUP_NOTIFY)
851 retval = -ERESTARTSYS;
854 if (!(port->flags & ASYNC_CLOSING) &&
855 (do_clocal || (ch->imodem & ch->dcd)))
857 if (signal_pending(current)) {
858 retval = -ERESTARTSYS;
861 spin_unlock_irqrestore(&port->lock, flags);
863 * Allow someone else to be scheduled. We will occasionally go
864 * through this loop until one of the above conditions change.
865 * The below schedule call will allow other processes to enter
866 * and prevent this loop from hogging the cpu.
869 spin_lock_irqsave(&port->lock, flags);
872 __set_current_state(TASK_RUNNING);
873 remove_wait_queue(&port->open_wait, &wait);
874 if (!tty_hung_up_p(filp))
876 port->blocked_open--;
878 spin_unlock_irqrestore(&port->lock, flags);
883 port->flags |= ASYNC_NORMAL_ACTIVE;
887 static int pc_open(struct tty_struct *tty, struct file *filp)
890 struct tty_port *port;
892 int line, retval, boardnum;
893 struct board_chan __iomem *bc;
897 if (line < 0 || line >= nbdevs)
900 ch = &digi_channels[line];
902 boardnum = ch->boardnum;
904 /* Check status of board configured in system. */
907 * I check to see if the epca_setup routine detected an user error. It
908 * might be better to put this in pc_init, but for the moment it goes
911 if (invalid_lilo_config) {
912 if (setup_error_code & INVALID_BOARD_TYPE)
913 printk(KERN_ERR "epca: pc_open: Invalid board type specified in kernel options.\n");
914 if (setup_error_code & INVALID_NUM_PORTS)
915 printk(KERN_ERR "epca: pc_open: Invalid number of ports specified in kernel options.\n");
916 if (setup_error_code & INVALID_MEM_BASE)
917 printk(KERN_ERR "epca: pc_open: Invalid board memory address specified in kernel options.\n");
918 if (setup_error_code & INVALID_PORT_BASE)
919 printk(KERN_ERR "epca; pc_open: Invalid board port address specified in kernel options.\n");
920 if (setup_error_code & INVALID_BOARD_STATUS)
921 printk(KERN_ERR "epca: pc_open: Invalid board status specified in kernel options.\n");
922 if (setup_error_code & INVALID_ALTPIN)
923 printk(KERN_ERR "epca: pc_open: Invalid board altpin specified in kernel options;\n");
924 tty->driver_data = NULL; /* Mark this device as 'down' */
927 if (boardnum >= num_cards || boards[boardnum].status == DISABLED) {
928 tty->driver_data = NULL; /* Mark this device as 'down' */
934 tty->driver_data = NULL;
938 spin_lock_irqsave(&port->lock, flags);
940 * Every time a channel is opened, increment a counter. This is
941 * necessary because we do not wish to flush and shutdown the channel
942 * until the last app holding the channel open, closes it.
946 * Set a kernel structures pointer to our local channel structure. This
947 * way we can get to it when passed only a tty struct.
949 tty->driver_data = ch;
952 * If this is the first time the channel has been opened, initialize
953 * the tty->termios struct otherwise let pc_close handle it.
955 spin_lock(&epca_lock);
959 /* Save boards current modem status */
960 ch->imodem = readb(&bc->mstat);
963 * Set receive head and tail ptrs to each other. This indicates no data
966 head = readw(&bc->rin);
967 writew(head, &bc->rout);
969 /* Set the channels associated tty structure */
972 * The below routine generally sets up parity, baud, flow control
973 * issues, etc.... It effect both control flags and input flags.
977 spin_unlock(&epca_lock);
978 port->flags |= ASYNC_INITIALIZED;
979 spin_unlock_irqrestore(&port->lock, flags);
981 retval = block_til_ready(tty, filp, ch);
985 * Set this again in case a hangup set it to zero while this open() was
986 * waiting for the line...
988 spin_lock_irqsave(&port->lock, flags);
990 spin_lock(&epca_lock);
992 /* Enable Digi Data events */
993 writeb(1, &bc->idata);
995 spin_unlock(&epca_lock);
996 spin_unlock_irqrestore(&port->lock, flags);
1000 static int __init epca_module_init(void)
1004 module_init(epca_module_init);
1006 static struct pci_driver epca_driver;
1008 static void __exit epca_module_exit(void)
1011 struct board_info *bd;
1014 del_timer_sync(&epca_timer);
1016 if (tty_unregister_driver(pc_driver) ||
1017 tty_unregister_driver(pc_info)) {
1018 printk(KERN_WARNING "epca: cleanup_module failed to un-register tty driver\n");
1021 put_tty_driver(pc_driver);
1022 put_tty_driver(pc_info);
1024 for (crd = 0; crd < num_cards; crd++) {
1026 if (!bd) { /* sanity check */
1027 printk(KERN_ERR "<Error> - Digi : cleanup_module failed\n");
1031 for (count = 0; count < bd->numports; count++, ch++) {
1032 if (ch && ch->port.tty)
1033 tty_hangup(ch->port.tty);
1036 pci_unregister_driver(&epca_driver);
1038 module_exit(epca_module_exit);
1040 static const struct tty_operations pc_ops = {
1044 .write_room = pc_write_room,
1045 .flush_buffer = pc_flush_buffer,
1046 .chars_in_buffer = pc_chars_in_buffer,
1047 .flush_chars = pc_flush_chars,
1049 .set_termios = pc_set_termios,
1052 .throttle = pc_throttle,
1053 .unthrottle = pc_unthrottle,
1054 .hangup = pc_hangup,
1055 .break_ctl = pc_send_break
1058 static int info_open(struct tty_struct *tty, struct file *filp)
1063 static struct tty_operations info_ops = {
1065 .ioctl = info_ioctl,
1068 static int __init pc_init(void)
1071 struct board_info *bd;
1072 unsigned char board_id = 0;
1075 int pci_boards_found, pci_count;
1079 pc_driver = alloc_tty_driver(MAX_ALLOC);
1083 pc_info = alloc_tty_driver(MAX_ALLOC);
1088 * If epca_setup has not been ran by LILO set num_cards to defaults;
1089 * copy board structure defined by digiConfig into drivers board
1090 * structure. Note : If LILO has ran epca_setup then epca_setup will
1091 * handle defining num_cards as well as copying the data into the board
1095 /* driver has been configured via. epcaconfig */
1097 num_cards = NUMCARDS;
1098 memcpy(&boards, &static_boards,
1099 sizeof(struct board_info) * NUMCARDS);
1103 * Note : If lilo was used to configure the driver and the ignore
1104 * epcaconfig option was choosen (digiepca=2) then nbdevs and num_cards
1105 * will equal 0 at this point. This is okay; PCI cards will still be
1106 * picked up if detected.
1110 * Set up interrupt, we will worry about memory allocation in
1113 printk(KERN_INFO "DIGI epca driver version %s loaded.\n", VERSION);
1116 * NOTE : This code assumes that the number of ports found in the
1117 * boards array is correct. This could be wrong if the card in question
1118 * is PCI (And therefore has no ports entry in the boards structure.)
1119 * The rest of the information will be valid for PCI because the
1120 * beginning of pc_init scans for PCI and determines i/o and base
1121 * memory addresses. I am not sure if it is possible to read the number
1122 * of ports supported by the card prior to it being booted (Since that
1123 * is the state it is in when pc_init is run). Because it is not
1124 * possible to query the number of supported ports until after the card
1125 * has booted; we are required to calculate the card_ptrs as the card
1126 * is initialized (Inside post_fep_init). The negative thing about this
1127 * approach is that digiDload's call to GET_INFO will have a bad port
1128 * value. (Since this is called prior to post_fep_init.)
1130 pci_boards_found = 0;
1131 if (num_cards < MAXBOARDS)
1132 pci_boards_found += init_PCI();
1133 num_cards += pci_boards_found;
1135 pc_driver->owner = THIS_MODULE;
1136 pc_driver->name = "ttyD";
1137 pc_driver->major = DIGI_MAJOR;
1138 pc_driver->minor_start = 0;
1139 pc_driver->type = TTY_DRIVER_TYPE_SERIAL;
1140 pc_driver->subtype = SERIAL_TYPE_NORMAL;
1141 pc_driver->init_termios = tty_std_termios;
1142 pc_driver->init_termios.c_iflag = 0;
1143 pc_driver->init_termios.c_oflag = 0;
1144 pc_driver->init_termios.c_cflag = B9600 | CS8 | CREAD | CLOCAL | HUPCL;
1145 pc_driver->init_termios.c_lflag = 0;
1146 pc_driver->init_termios.c_ispeed = 9600;
1147 pc_driver->init_termios.c_ospeed = 9600;
1148 pc_driver->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_HARDWARE_BREAK;
1149 tty_set_operations(pc_driver, &pc_ops);
1151 pc_info->owner = THIS_MODULE;
1152 pc_info->name = "digi_ctl";
1153 pc_info->major = DIGIINFOMAJOR;
1154 pc_info->minor_start = 0;
1155 pc_info->type = TTY_DRIVER_TYPE_SERIAL;
1156 pc_info->subtype = SERIAL_TYPE_INFO;
1157 pc_info->init_termios = tty_std_termios;
1158 pc_info->init_termios.c_iflag = 0;
1159 pc_info->init_termios.c_oflag = 0;
1160 pc_info->init_termios.c_lflag = 0;
1161 pc_info->init_termios.c_cflag = B9600 | CS8 | CREAD | HUPCL;
1162 pc_info->init_termios.c_ispeed = 9600;
1163 pc_info->init_termios.c_ospeed = 9600;
1164 pc_info->flags = TTY_DRIVER_REAL_RAW;
1165 tty_set_operations(pc_info, &info_ops);
1168 for (crd = 0; crd < num_cards; crd++) {
1170 * This is where the appropriate memory handlers for the
1171 * hardware is set. Everything at runtime blindly jumps through
1175 /* defined in epcaconfig.h */
1181 bd->memwinon = pcxem_memwinon;
1182 bd->memwinoff = pcxem_memwinoff;
1183 bd->globalwinon = pcxem_globalwinon;
1184 bd->txwinon = pcxem_txwinon;
1185 bd->rxwinon = pcxem_rxwinon;
1186 bd->memoff = pcxem_memoff;
1187 bd->assertgwinon = dummy_assertgwinon;
1188 bd->assertmemoff = dummy_assertmemoff;
1194 bd->memwinon = dummy_memwinon;
1195 bd->memwinoff = dummy_memwinoff;
1196 bd->globalwinon = dummy_globalwinon;
1197 bd->txwinon = dummy_txwinon;
1198 bd->rxwinon = dummy_rxwinon;
1199 bd->memoff = dummy_memoff;
1200 bd->assertgwinon = dummy_assertgwinon;
1201 bd->assertmemoff = dummy_assertmemoff;
1206 bd->memwinon = pcxe_memwinon;
1207 bd->memwinoff = pcxe_memwinoff;
1208 bd->globalwinon = pcxe_globalwinon;
1209 bd->txwinon = pcxe_txwinon;
1210 bd->rxwinon = pcxe_rxwinon;
1211 bd->memoff = pcxe_memoff;
1212 bd->assertgwinon = dummy_assertgwinon;
1213 bd->assertmemoff = dummy_assertmemoff;
1218 bd->memwinon = pcxi_memwinon;
1219 bd->memwinoff = pcxi_memwinoff;
1220 bd->globalwinon = pcxi_globalwinon;
1221 bd->txwinon = pcxi_txwinon;
1222 bd->rxwinon = pcxi_rxwinon;
1223 bd->memoff = pcxi_memoff;
1224 bd->assertgwinon = pcxi_assertgwinon;
1225 bd->assertmemoff = pcxi_assertmemoff;
1233 * Some cards need a memory segment to be defined for use in
1234 * transmit and receive windowing operations. These boards are
1235 * listed in the below switch. In the case of the XI the amount
1236 * of memory on the board is variable so the memory_seg is also
1237 * variable. This code determines what they segment should be.
1243 bd->memory_seg = 0xf000;
1247 board_id = inb((int)bd->port);
1248 if ((board_id & 0x1) == 0x1) {
1249 /* it's an XI card */
1250 /* Is it a 64K board */
1251 if ((board_id & 0x30) == 0)
1252 bd->memory_seg = 0xf000;
1254 /* Is it a 128K board */
1255 if ((board_id & 0x30) == 0x10)
1256 bd->memory_seg = 0xe000;
1258 /* Is is a 256K board */
1259 if ((board_id & 0x30) == 0x20)
1260 bd->memory_seg = 0xc000;
1262 /* Is it a 512K board */
1263 if ((board_id & 0x30) == 0x30)
1264 bd->memory_seg = 0x8000;
1266 printk(KERN_ERR "epca: Board at 0x%x doesn't appear to be an XI\n", (int)bd->port);
1271 err = tty_register_driver(pc_driver);
1273 printk(KERN_ERR "Couldn't register Digi PC/ driver");
1277 err = tty_register_driver(pc_info);
1279 printk(KERN_ERR "Couldn't register Digi PC/ info ");
1283 /* Start up the poller to check for events on all enabled boards */
1284 init_timer(&epca_timer);
1285 epca_timer.function = epcapoll;
1286 mod_timer(&epca_timer, jiffies + HZ/25);
1290 tty_unregister_driver(pc_driver);
1292 put_tty_driver(pc_info);
1294 put_tty_driver(pc_driver);
1299 static void post_fep_init(unsigned int crd)
1302 void __iomem *memaddr;
1303 struct global_data __iomem *gd;
1304 struct board_info *bd;
1305 struct board_chan __iomem *bc;
1307 int shrinkmem = 0, lowwater;
1310 * This call is made by the user via. the ioctl call DIGI_INIT. It is
1311 * responsible for setting up all the card specific stuff.
1316 * If this is a PCI board, get the port info. Remember PCI cards do not
1317 * have entries into the epcaconfig.h file, so we can't get the number
1318 * of ports from it. Unfortunetly, this means that anyone doing a
1319 * DIGI_GETINFO before the board has booted will get an invalid number
1320 * of ports returned (It should return 0). Calls to DIGI_GETINFO after
1321 * DIGI_INIT has been called will return the proper values.
1323 if (bd->type >= PCIXEM) { /* Begin get PCI number of ports */
1325 * Below we use XEMPORTS as a memory offset regardless of which
1326 * PCI card it is. This is because all of the supported PCI
1327 * cards have the same memory offset for the channel data. This
1328 * will have to be changed if we ever develop a PCI/XE card.
1329 * NOTE : The FEP manual states that the port offset is 0xC22
1330 * as opposed to 0xC02. This is only true for PC/XE, and PC/XI
1331 * cards; not for the XEM, or CX series. On the PCI cards the
1332 * number of ports is determined by reading a ID PROM located
1333 * in the box attached to the card. The card can then determine
1334 * the index the id to determine the number of ports available.
1335 * (FYI - The id should be located at 0x1ac (And may use up to
1336 * 4 bytes if the box in question is a XEM or CX)).
1338 /* PCI cards are already remapped at this point ISA are not */
1339 bd->numports = readw(bd->re_map_membase + XEMPORTS);
1340 epcaassert(bd->numports <= 64, "PCI returned a invalid number of ports");
1341 nbdevs += (bd->numports);
1343 /* Fix up the mappings for ISA/EISA etc */
1344 /* FIXME: 64K - can we be smarter ? */
1345 bd->re_map_membase = ioremap_nocache(bd->membase, 0x10000);
1349 card_ptr[crd] = card_ptr[crd-1] + boards[crd-1].numports;
1351 card_ptr[crd] = &digi_channels[crd]; /* <- For card 0 only */
1354 epcaassert(ch <= &digi_channels[nbdevs - 1], "ch out of range");
1356 memaddr = bd->re_map_membase;
1359 * The below assignment will set bc to point at the BEGINING of the
1360 * cards channel structures. For 1 card there will be between 8 and 64
1361 * of these structures.
1363 bc = memaddr + CHANSTRUCT;
1366 * The below assignment will set gd to point at the BEGINING of global
1367 * memory address 0xc00. The first data in that global memory actually
1368 * starts at address 0xc1a. The command in pointer begins at 0xd10.
1370 gd = memaddr + GLOBAL;
1373 * XEPORTS (address 0xc22) points at the number of channels the card
1374 * supports. (For 64XE, XI, XEM, and XR use 0xc02)
1376 if ((bd->type == PCXEVE || bd->type == PCXE) &&
1377 (readw(memaddr + XEPORTS) < 3))
1379 if (bd->type < PCIXEM)
1380 if (!request_region((int)bd->port, 4, board_desc[bd->type]))
1385 * Remember ch is the main drivers channels structure, while bc is the
1386 * cards channel structure.
1388 for (i = 0; i < bd->numports; i++, ch++, bc++) {
1389 unsigned long flags;
1392 tty_port_init(&ch->port);
1395 INIT_WORK(&ch->tqueue, do_softint);
1396 ch->board = &boards[crd];
1398 spin_lock_irqsave(&epca_lock, flags);
1401 * Since some of the boards use different bitmaps for
1402 * their control signals we cannot hard code these
1403 * values and retain portability. We virtualize this
1432 if (boards[crd].altpin) {
1433 ch->dsr = ch->m_dcd;
1434 ch->dcd = ch->m_dsr;
1435 ch->digiext.digi_flags |= DIGI_ALTPIN;
1437 ch->dcd = ch->m_dcd;
1438 ch->dsr = ch->m_dsr;
1443 ch->magic = EPCA_MAGIC;
1444 ch->port.tty = NULL;
1447 fepcmd(ch, SETBUFFER, 32, 0, 0, 0);
1451 tseg = readw(&bc->tseg);
1452 rseg = readw(&bc->rseg);
1458 /* Cover all the 2MEG cards */
1459 ch->txptr = memaddr + ((tseg << 4) & 0x1fffff);
1460 ch->rxptr = memaddr + ((rseg << 4) & 0x1fffff);
1461 ch->txwin = FEPWIN | (tseg >> 11);
1462 ch->rxwin = FEPWIN | (rseg >> 11);
1467 /* Cover all the 32K windowed cards */
1468 /* Mask equal to window size - 1 */
1469 ch->txptr = memaddr + ((tseg << 4) & 0x7fff);
1470 ch->rxptr = memaddr + ((rseg << 4) & 0x7fff);
1471 ch->txwin = FEPWIN | (tseg >> 11);
1472 ch->rxwin = FEPWIN | (rseg >> 11);
1477 ch->txptr = memaddr + (((tseg - bd->memory_seg) << 4)
1479 ch->txwin = FEPWIN | ((tseg - bd->memory_seg) >> 9);
1480 ch->rxptr = memaddr + (((rseg - bd->memory_seg) << 4)
1482 ch->rxwin = FEPWIN | ((rseg - bd->memory_seg) >> 9);
1487 ch->txptr = memaddr + ((tseg - bd->memory_seg) << 4);
1488 ch->rxptr = memaddr + ((rseg - bd->memory_seg) << 4);
1489 ch->txwin = ch->rxwin = 0;
1494 ch->txbufsize = readw(&bc->tmax) + 1;
1497 ch->rxbufsize = readw(&bc->rmax) + 1;
1499 lowwater = ch->txbufsize >= 2000 ? 1024 : (ch->txbufsize / 2);
1501 /* Set transmitter low water mark */
1502 fepcmd(ch, STXLWATER, lowwater, 0, 10, 0);
1504 /* Set receiver low water mark */
1505 fepcmd(ch, SRXLWATER, (ch->rxbufsize / 4), 0, 10, 0);
1507 /* Set receiver high water mark */
1508 fepcmd(ch, SRXHWATER, (3 * ch->rxbufsize / 4), 0, 10, 0);
1510 writew(100, &bc->edelay);
1511 writeb(1, &bc->idata);
1513 ch->startc = readb(&bc->startc);
1514 ch->stopc = readb(&bc->stopc);
1515 ch->startca = readb(&bc->startca);
1516 ch->stopca = readb(&bc->stopca);
1526 ch->close_delay = 50;
1528 spin_unlock_irqrestore(&epca_lock, flags);
1532 "Digi PC/Xx Driver V%s: %s I/O = 0x%lx Mem = 0x%lx Ports = %d\n",
1533 VERSION, board_desc[bd->type], (long)bd->port,
1534 (long)bd->membase, bd->numports);
1538 static void epcapoll(unsigned long ignored)
1540 unsigned long flags;
1542 unsigned int head, tail;
1544 struct board_info *bd;
1547 * This routine is called upon every timer interrupt. Even though the
1548 * Digi series cards are capable of generating interrupts this method
1549 * of non-looping polling is more efficient. This routine checks for
1550 * card generated events (Such as receive data, are transmit buffer
1551 * empty) and acts on those events.
1553 for (crd = 0; crd < num_cards; crd++) {
1557 if ((bd->status == DISABLED) || digi_poller_inhibited)
1561 * assertmemoff is not needed here; indeed it is an empty
1562 * subroutine. It is being kept because future boards may need
1563 * this as well as some legacy boards.
1565 spin_lock_irqsave(&epca_lock, flags);
1572 * In this case head and tail actually refer to the event queue
1573 * not the transmit or receive queue.
1575 head = readw(&ch->mailbox->ein);
1576 tail = readw(&ch->mailbox->eout);
1578 /* If head isn't equal to tail we have an event */
1583 spin_unlock_irqrestore(&epca_lock, flags);
1584 } /* End for each card */
1585 mod_timer(&epca_timer, jiffies + (HZ / 25));
1588 static void doevent(int crd)
1590 void __iomem *eventbuf;
1591 struct channel *ch, *chan0;
1592 static struct tty_struct *tty;
1593 struct board_info *bd;
1594 struct board_chan __iomem *bc;
1595 unsigned int tail, head;
1600 * This subroutine is called by epcapoll when an event is detected
1601 * in the event queue. This routine responds to those events.
1605 chan0 = card_ptr[crd];
1606 epcaassert(chan0 <= &digi_channels[nbdevs - 1], "ch out of range");
1607 assertgwinon(chan0);
1608 while ((tail = readw(&chan0->mailbox->eout)) !=
1609 (head = readw(&chan0->mailbox->ein))) {
1610 /* Begin while something in event queue */
1611 assertgwinon(chan0);
1612 eventbuf = bd->re_map_membase + tail + ISTART;
1613 /* Get the channel the event occurred on */
1614 channel = readb(eventbuf);
1615 /* Get the actual event code that occurred */
1616 event = readb(eventbuf + 1);
1618 * The two assignments below get the current modem status
1619 * (mstat) and the previous modem status (lstat). These are
1620 * useful becuase an event could signal a change in modem
1623 mstat = readb(eventbuf + 2);
1624 lstat = readb(eventbuf + 3);
1626 ch = chan0 + channel;
1627 if ((unsigned)channel >= bd->numports || !ch) {
1628 if (channel >= bd->numports)
1638 if (event & DATA_IND) { /* Begin DATA_IND */
1641 } /* End DATA_IND */
1642 /* else *//* Fix for DCD transition missed bug */
1643 if (event & MODEMCHG_IND) {
1644 /* A modem signal change has been indicated */
1646 if (ch->port.flags & ASYNC_CHECK_CD) {
1647 /* We are now receiving dcd */
1648 if (mstat & ch->dcd)
1649 wake_up_interruptible(&ch->port.open_wait);
1650 else /* No dcd; hangup */
1651 pc_sched_event(ch, EPCA_EVENT_HANGUP);
1656 if (event & BREAK_IND) {
1657 /* A break has been indicated */
1658 tty_insert_flip_char(tty, 0, TTY_BREAK);
1659 tty_schedule_flip(tty);
1660 } else if (event & LOWTX_IND) {
1661 if (ch->statusflags & LOWWAIT) {
1662 ch->statusflags &= ~LOWWAIT;
1665 } else if (event & EMPTYTX_IND) {
1666 /* This event is generated by
1667 setup_empty_event */
1668 ch->statusflags &= ~TXBUSY;
1669 if (ch->statusflags & EMPTYWAIT) {
1670 ch->statusflags &= ~EMPTYWAIT;
1678 writew(1, &bc->idata);
1679 writew((tail + 4) & (IMAX - ISTART - 4), &chan0->mailbox->eout);
1681 } /* End while something in event queue */
1684 static void fepcmd(struct channel *ch, int cmd, int word_or_byte,
1685 int byte2, int ncmds, int bytecmd)
1687 unchar __iomem *memaddr;
1688 unsigned int head, cmdTail, cmdStart, cmdMax;
1692 /* This is the routine in which commands may be passed to the card. */
1694 if (ch->board->status == DISABLED)
1697 /* Remember head (As well as max) is just an offset not a base addr */
1698 head = readw(&ch->mailbox->cin);
1699 /* cmdStart is a base address */
1700 cmdStart = readw(&ch->mailbox->cstart);
1702 * We do the addition below because we do not want a max pointer
1703 * relative to cmdStart. We want a max pointer that points at the
1704 * physical end of the command queue.
1706 cmdMax = (cmdStart + 4 + readw(&ch->mailbox->cmax));
1707 memaddr = ch->board->re_map_membase;
1709 if (head >= (cmdMax - cmdStart) || (head & 03)) {
1710 printk(KERN_ERR "line %d: Out of range, cmd = %x, head = %x\n",
1711 __LINE__, cmd, head);
1712 printk(KERN_ERR "line %d: Out of range, cmdMax = %x, cmdStart = %x\n",
1713 __LINE__, cmdMax, cmdStart);
1717 writeb(cmd, memaddr + head + cmdStart + 0);
1718 writeb(ch->channelnum, memaddr + head + cmdStart + 1);
1719 /* Below word_or_byte is bits to set */
1720 writeb(word_or_byte, memaddr + head + cmdStart + 2);
1721 /* Below byte2 is bits to reset */
1722 writeb(byte2, memaddr + head + cmdStart + 3);
1724 writeb(cmd, memaddr + head + cmdStart + 0);
1725 writeb(ch->channelnum, memaddr + head + cmdStart + 1);
1726 writeb(word_or_byte, memaddr + head + cmdStart + 2);
1728 head = (head + 4) & (cmdMax - cmdStart - 4);
1729 writew(head, &ch->mailbox->cin);
1735 printk(KERN_ERR "<Error> - Fep not responding in fepcmd()\n");
1738 head = readw(&ch->mailbox->cin);
1739 cmdTail = readw(&ch->mailbox->cout);
1740 n = (head - cmdTail) & (cmdMax - cmdStart - 4);
1742 * Basically this will break when the FEP acknowledges the
1743 * command by incrementing cmdTail (Making it equal to head).
1745 if (n <= ncmds * (sizeof(short) * 4))
1751 * Digi products use fields in their channels structures that are very similar
1752 * to the c_cflag and c_iflag fields typically found in UNIX termios
1753 * structures. The below three routines allow mappings between these hardware
1754 * "flags" and their respective Linux flags.
1756 static unsigned termios2digi_h(struct channel *ch, unsigned cflag)
1760 if (cflag & CRTSCTS) {
1761 ch->digiext.digi_flags |= (RTSPACE | CTSPACE);
1762 res |= ((ch->m_cts) | (ch->m_rts));
1765 if (ch->digiext.digi_flags & RTSPACE)
1768 if (ch->digiext.digi_flags & DTRPACE)
1771 if (ch->digiext.digi_flags & CTSPACE)
1774 if (ch->digiext.digi_flags & DSRPACE)
1777 if (ch->digiext.digi_flags & DCDPACE)
1780 if (res & (ch->m_rts))
1781 ch->digiext.digi_flags |= RTSPACE;
1783 if (res & (ch->m_cts))
1784 ch->digiext.digi_flags |= CTSPACE;
1789 static unsigned termios2digi_i(struct channel *ch, unsigned iflag)
1791 unsigned res = iflag & (IGNBRK | BRKINT | IGNPAR | PARMRK |
1792 INPCK | ISTRIP | IXON | IXANY | IXOFF);
1793 if (ch->digiext.digi_flags & DIGI_AIXON)
1798 static unsigned termios2digi_c(struct channel *ch, unsigned cflag)
1801 if (cflag & CBAUDEX) {
1802 ch->digiext.digi_flags |= DIGI_FAST;
1804 * HUPCL bit is used by FEP to indicate fast baud table is to
1809 ch->digiext.digi_flags &= ~DIGI_FAST;
1811 * CBAUD has bit position 0x1000 set these days to indicate Linux
1812 * baud rate remap. Digi hardware can't handle the bit assignment.
1813 * (We use a different bit assignment for high speed.). Clear this
1816 res |= cflag & ((CBAUD ^ CBAUDEX) | PARODD | PARENB | CSTOPB | CSIZE);
1818 * This gets a little confusing. The Digi cards have their own
1819 * representation of c_cflags controlling baud rate. For the most part
1820 * this is identical to the Linux implementation. However; Digi
1821 * supports one rate (76800) that Linux doesn't. This means that the
1822 * c_cflag entry that would normally mean 76800 for Digi actually means
1823 * 115200 under Linux. Without the below mapping, a stty 115200 would
1824 * only drive the board at 76800. Since the rate 230400 is also found
1825 * after 76800, the same problem afflicts us when we choose a rate of
1826 * 230400. Without the below modificiation stty 230400 would actually
1829 * There are two additional differences. The Linux value for CLOCAL
1830 * (0x800; 0004000) has no meaning to the Digi hardware. Also in later
1831 * releases of Linux; the CBAUD define has CBAUDEX (0x1000; 0010000)
1832 * ored into it (CBAUD = 0x100f as opposed to 0xf). CBAUDEX should be
1833 * checked for a screened out prior to termios2digi_c returning. Since
1834 * CLOCAL isn't used by the board this can be ignored as long as the
1835 * returned value is used only by Digi hardware.
1837 if (cflag & CBAUDEX) {
1839 * The below code is trying to guarantee that only baud rates
1840 * 115200 and 230400 are remapped. We use exclusive or because
1841 * the various baud rates share common bit positions and
1842 * therefore can't be tested for easily.
1844 if ((!((cflag & 0x7) ^ (B115200 & ~CBAUDEX))) ||
1845 (!((cflag & 0x7) ^ (B230400 & ~CBAUDEX))))
1851 /* Caller must hold the locks */
1852 static void epcaparam(struct tty_struct *tty, struct channel *ch)
1854 unsigned int cmdHead;
1855 struct ktermios *ts;
1856 struct board_chan __iomem *bc;
1857 unsigned mval, hflow, cflag, iflag;
1860 epcaassert(bc != NULL, "bc out of range");
1864 if ((ts->c_cflag & CBAUD) == 0) { /* Begin CBAUD detected */
1865 cmdHead = readw(&bc->rin);
1866 writew(cmdHead, &bc->rout);
1867 cmdHead = readw(&bc->tin);
1868 /* Changing baud in mid-stream transmission can be wonderful */
1870 * Flush current transmit buffer by setting cmdTail pointer
1871 * (tout) to cmdHead pointer (tin). Hopefully the transmit
1874 fepcmd(ch, STOUT, (unsigned) cmdHead, 0, 0, 0);
1876 } else { /* Begin CBAUD not detected */
1878 * c_cflags have changed but that change had nothing to do with
1879 * BAUD. Propagate the change to the card.
1881 cflag = termios2digi_c(ch, ts->c_cflag);
1882 if (cflag != ch->fepcflag) {
1883 ch->fepcflag = cflag;
1884 /* Set baud rate, char size, stop bits, parity */
1885 fepcmd(ch, SETCTRLFLAGS, (unsigned) cflag, 0, 0, 0);
1888 * If the user has not forced CLOCAL and if the device is not a
1889 * CALLOUT device (Which is always CLOCAL) we set flags such
1890 * that the driver will wait on carrier detect.
1892 if (ts->c_cflag & CLOCAL)
1893 ch->port.flags &= ~ASYNC_CHECK_CD;
1895 ch->port.flags |= ASYNC_CHECK_CD;
1896 mval = ch->m_dtr | ch->m_rts;
1897 } /* End CBAUD not detected */
1898 iflag = termios2digi_i(ch, ts->c_iflag);
1899 /* Check input mode flags */
1900 if (iflag != ch->fepiflag) {
1901 ch->fepiflag = iflag;
1903 * Command sets channels iflag structure on the board. Such
1904 * things as input soft flow control, handling of parity
1905 * errors, and break handling are all set here.
1907 * break handling, parity handling, input stripping,
1908 * flow control chars
1910 fepcmd(ch, SETIFLAGS, (unsigned int) ch->fepiflag, 0, 0, 0);
1913 * Set the board mint value for this channel. This will cause hardware
1914 * events to be generated each time the DCD signal (Described in mint)
1917 writeb(ch->dcd, &bc->mint);
1918 if ((ts->c_cflag & CLOCAL) || (ch->digiext.digi_flags & DIGI_FORCEDCD))
1919 if (ch->digiext.digi_flags & DIGI_FORCEDCD)
1920 writeb(0, &bc->mint);
1921 ch->imodem = readb(&bc->mstat);
1922 hflow = termios2digi_h(ch, ts->c_cflag);
1923 if (hflow != ch->hflow) {
1926 * Hard flow control has been selected but the board is not
1927 * using it. Activate hard flow control now.
1929 fepcmd(ch, SETHFLOW, hflow, 0xff, 0, 1);
1931 mval ^= ch->modemfake & (mval ^ ch->modem);
1933 if (ch->omodem ^ mval) {
1936 * The below command sets the DTR and RTS mstat structure. If
1937 * hard flow control is NOT active these changes will drive the
1938 * output of the actual DTR and RTS lines. If hard flow control
1939 * is active, the changes will be saved in the mstat structure
1940 * and only asserted when hard flow control is turned off.
1943 /* First reset DTR & RTS; then set them */
1944 fepcmd(ch, SETMODEM, 0, ((ch->m_dtr)|(ch->m_rts)), 0, 1);
1945 fepcmd(ch, SETMODEM, mval, 0, 0, 1);
1947 if (ch->startc != ch->fepstartc || ch->stopc != ch->fepstopc) {
1948 ch->fepstartc = ch->startc;
1949 ch->fepstopc = ch->stopc;
1951 * The XON / XOFF characters have changed; propagate these
1952 * changes to the card.
1954 fepcmd(ch, SONOFFC, ch->fepstartc, ch->fepstopc, 0, 1);
1956 if (ch->startca != ch->fepstartca || ch->stopca != ch->fepstopca) {
1957 ch->fepstartca = ch->startca;
1958 ch->fepstopca = ch->stopca;
1960 * Similar to the above, this time the auxilarly XON / XOFF
1961 * characters have changed; propagate these changes to the card.
1963 fepcmd(ch, SAUXONOFFC, ch->fepstartca, ch->fepstopca, 0, 1);
1967 /* Caller holds lock */
1968 static void receive_data(struct channel *ch)
1971 struct ktermios *ts = NULL;
1972 struct tty_struct *tty;
1973 struct board_chan __iomem *bc;
1974 int dataToRead, wrapgap, bytesAvailable;
1975 unsigned int tail, head;
1976 unsigned int wrapmask;
1979 * This routine is called by doint when a receive data event has taken
1983 if (ch->statusflags & RXSTOPPED)
1990 wrapmask = ch->rxbufsize - 1;
1993 * Get the head and tail pointers to the receiver queue. Wrap the head
1994 * pointer if it has reached the end of the buffer.
1996 head = readw(&bc->rin);
1998 tail = readw(&bc->rout) & wrapmask;
2000 bytesAvailable = (head - tail) & wrapmask;
2001 if (bytesAvailable == 0)
2004 /* If CREAD bit is off or device not open, set TX tail to head */
2005 if (!tty || !ts || !(ts->c_cflag & CREAD)) {
2006 writew(head, &bc->rout);
2010 if (tty_buffer_request_room(tty, bytesAvailable + 1) == 0)
2013 if (readb(&bc->orun)) {
2014 writeb(0, &bc->orun);
2015 printk(KERN_WARNING "epca; overrun! DigiBoard device %s\n",
2017 tty_insert_flip_char(tty, 0, TTY_OVERRUN);
2020 while (bytesAvailable > 0) {
2021 /* Begin while there is data on the card */
2022 wrapgap = (head >= tail) ? head - tail : ch->rxbufsize - tail;
2024 * Even if head has wrapped around only report the amount of
2025 * data to be equal to the size - tail. Remember memcpy can't
2026 * automaticly wrap around the receive buffer.
2028 dataToRead = (wrapgap < bytesAvailable) ? wrapgap
2030 /* Make sure we don't overflow the buffer */
2031 dataToRead = tty_prepare_flip_string(tty, &rptr, dataToRead);
2032 if (dataToRead == 0)
2035 * Move data read from our card into the line disciplines
2036 * buffer for translation if necessary.
2038 memcpy_fromio(rptr, ch->rxptr + tail, dataToRead);
2039 tail = (tail + dataToRead) & wrapmask;
2040 bytesAvailable -= dataToRead;
2041 } /* End while there is data on the card */
2043 writew(tail, &bc->rout);
2044 /* Must be called with global data */
2045 tty_schedule_flip(ch->port.tty);
2048 static int info_ioctl(struct tty_struct *tty, struct file *file,
2049 unsigned int cmd, unsigned long arg)
2054 struct digi_info di;
2057 if (get_user(brd, (unsigned int __user *)arg))
2059 if (brd < 0 || brd >= num_cards || num_cards == 0)
2062 memset(&di, 0, sizeof(di));
2065 di.status = boards[brd].status;
2066 di.type = boards[brd].type ;
2067 di.numports = boards[brd].numports ;
2068 /* Legacy fixups - just move along nothing to see */
2069 di.port = (unsigned char *)boards[brd].port ;
2070 di.membase = (unsigned char *)boards[brd].membase ;
2072 if (copy_to_user((void __user *)arg, &di, sizeof(di)))
2080 int brd = arg & 0xff000000 >> 16;
2081 unsigned char state = arg & 0xff;
2083 if (brd < 0 || brd >= num_cards) {
2084 printk(KERN_ERR "epca: DIGI POLLER : brd not valid!\n");
2087 digi_poller_inhibited = state;
2094 * This call is made by the apps to complete the
2095 * initialization of the board(s). This routine is
2096 * responsible for setting the card to its initial
2097 * state and setting the drivers control fields to the
2098 * sutianle settings for the card in question.
2101 for (crd = 0; crd < num_cards; crd++)
2111 static int pc_tiocmget(struct tty_struct *tty, struct file *file)
2113 struct channel *ch = tty->driver_data;
2114 struct board_chan __iomem *bc;
2115 unsigned int mstat, mflag = 0;
2116 unsigned long flags;
2123 spin_lock_irqsave(&epca_lock, flags);
2125 mstat = readb(&bc->mstat);
2127 spin_unlock_irqrestore(&epca_lock, flags);
2129 if (mstat & ch->m_dtr)
2131 if (mstat & ch->m_rts)
2133 if (mstat & ch->m_cts)
2135 if (mstat & ch->dsr)
2137 if (mstat & ch->m_ri)
2139 if (mstat & ch->dcd)
2144 static int pc_tiocmset(struct tty_struct *tty, struct file *file,
2145 unsigned int set, unsigned int clear)
2147 struct channel *ch = tty->driver_data;
2148 unsigned long flags;
2153 spin_lock_irqsave(&epca_lock, flags);
2155 * I think this modemfake stuff is broken. It doesn't correctly reflect
2156 * the behaviour desired by the TIOCM* ioctls. Therefore this is
2159 if (set & TIOCM_RTS) {
2160 ch->modemfake |= ch->m_rts;
2161 ch->modem |= ch->m_rts;
2163 if (set & TIOCM_DTR) {
2164 ch->modemfake |= ch->m_dtr;
2165 ch->modem |= ch->m_dtr;
2167 if (clear & TIOCM_RTS) {
2168 ch->modemfake |= ch->m_rts;
2169 ch->modem &= ~ch->m_rts;
2171 if (clear & TIOCM_DTR) {
2172 ch->modemfake |= ch->m_dtr;
2173 ch->modem &= ~ch->m_dtr;
2177 * The below routine generally sets up parity, baud, flow control
2178 * issues, etc.... It effect both control flags and input flags.
2182 spin_unlock_irqrestore(&epca_lock, flags);
2186 static int pc_ioctl(struct tty_struct *tty, struct file *file,
2187 unsigned int cmd, unsigned long arg)
2190 unsigned long flags;
2191 unsigned int mflag, mstat;
2192 unsigned char startc, stopc;
2193 struct board_chan __iomem *bc;
2194 struct channel *ch = tty->driver_data;
2195 void __user *argp = (void __user *)arg;
2203 mflag = pc_tiocmget(tty, file);
2204 if (put_user(mflag, (unsigned long __user *)argp))
2208 if (get_user(mstat, (unsigned __user *)argp))
2210 return pc_tiocmset(tty, file, mstat, ~mstat);
2212 spin_lock_irqsave(&epca_lock, flags);
2213 ch->omodem |= ch->m_dtr;
2215 fepcmd(ch, SETMODEM, ch->m_dtr, 0, 10, 1);
2217 spin_unlock_irqrestore(&epca_lock, flags);
2221 spin_lock_irqsave(&epca_lock, flags);
2222 ch->omodem &= ~ch->m_dtr;
2224 fepcmd(ch, SETMODEM, 0, ch->m_dtr, 10, 1);
2226 spin_unlock_irqrestore(&epca_lock, flags);
2229 if (copy_to_user(argp, &ch->digiext, sizeof(digi_t)))
2235 if (cmd == DIGI_SETAW) {
2236 /* Setup an event to indicate when the transmit
2238 spin_lock_irqsave(&epca_lock, flags);
2239 setup_empty_event(tty, ch);
2240 spin_unlock_irqrestore(&epca_lock, flags);
2241 tty_wait_until_sent(tty, 0);
2243 /* ldisc lock already held in ioctl */
2244 if (tty->ldisc.ops->flush_buffer)
2245 tty->ldisc.ops->flush_buffer(tty);
2250 if (copy_from_user(&ch->digiext, argp, sizeof(digi_t)))
2253 if (ch->digiext.digi_flags & DIGI_ALTPIN) {
2254 ch->dcd = ch->m_dsr;
2255 ch->dsr = ch->m_dcd;
2257 ch->dcd = ch->m_dcd;
2258 ch->dsr = ch->m_dsr;
2261 spin_lock_irqsave(&epca_lock, flags);
2265 * The below routine generally sets up parity, baud, flow
2266 * control issues, etc.... It effect both control flags and
2271 spin_unlock_irqrestore(&epca_lock, flags);
2276 spin_lock_irqsave(&epca_lock, flags);
2278 if (cmd == DIGI_GETFLOW) {
2279 dflow.startc = readb(&bc->startc);
2280 dflow.stopc = readb(&bc->stopc);
2282 dflow.startc = readb(&bc->startca);
2283 dflow.stopc = readb(&bc->stopca);
2286 spin_unlock_irqrestore(&epca_lock, flags);
2288 if (copy_to_user(argp, &dflow, sizeof(dflow)))
2294 if (cmd == DIGI_SETFLOW) {
2295 startc = ch->startc;
2298 startc = ch->startca;
2302 if (copy_from_user(&dflow, argp, sizeof(dflow)))
2305 if (dflow.startc != startc || dflow.stopc != stopc) {
2306 /* Begin if setflow toggled */
2307 spin_lock_irqsave(&epca_lock, flags);
2310 if (cmd == DIGI_SETFLOW) {
2311 ch->fepstartc = ch->startc = dflow.startc;
2312 ch->fepstopc = ch->stopc = dflow.stopc;
2313 fepcmd(ch, SONOFFC, ch->fepstartc,
2314 ch->fepstopc, 0, 1);
2316 ch->fepstartca = ch->startca = dflow.startc;
2317 ch->fepstopca = ch->stopca = dflow.stopc;
2318 fepcmd(ch, SAUXONOFFC, ch->fepstartca,
2319 ch->fepstopca, 0, 1);
2322 if (ch->statusflags & TXSTOPPED)
2326 spin_unlock_irqrestore(&epca_lock, flags);
2327 } /* End if setflow toggled */
2330 return -ENOIOCTLCMD;
2335 static void pc_set_termios(struct tty_struct *tty, struct ktermios *old_termios)
2338 unsigned long flags;
2340 * verifyChannel returns the channel from the tty struct if it is
2341 * valid. This serves as a sanity check.
2343 ch = verifyChannel(tty);
2345 if (ch != NULL) { /* Begin if channel valid */
2346 spin_lock_irqsave(&epca_lock, flags);
2350 spin_unlock_irqrestore(&epca_lock, flags);
2352 if ((old_termios->c_cflag & CRTSCTS) &&
2353 ((tty->termios->c_cflag & CRTSCTS) == 0))
2354 tty->hw_stopped = 0;
2356 if (!(old_termios->c_cflag & CLOCAL) &&
2357 (tty->termios->c_cflag & CLOCAL))
2358 wake_up_interruptible(&ch->port.open_wait);
2360 } /* End if channel valid */
2363 static void do_softint(struct work_struct *work)
2365 struct channel *ch = container_of(work, struct channel, tqueue);
2366 /* Called in response to a modem change event */
2367 if (ch && ch->magic == EPCA_MAGIC) {
2368 struct tty_struct *tty = ch->port.tty;
2370 if (tty && tty->driver_data) {
2371 if (test_and_clear_bit(EPCA_EVENT_HANGUP, &ch->event)) {
2373 wake_up_interruptible(&ch->port.open_wait);
2374 ch->port.flags &= ~ASYNC_NORMAL_ACTIVE;
2381 * pc_stop and pc_start provide software flow control to the routine and the
2384 static void pc_stop(struct tty_struct *tty)
2387 unsigned long flags;
2389 * verifyChannel returns the channel from the tty struct if it is
2390 * valid. This serves as a sanity check.
2392 ch = verifyChannel(tty);
2394 spin_lock_irqsave(&epca_lock, flags);
2395 if ((ch->statusflags & TXSTOPPED) == 0) {
2396 /* Begin if transmit stop requested */
2398 /* STOP transmitting now !! */
2399 fepcmd(ch, PAUSETX, 0, 0, 0, 0);
2400 ch->statusflags |= TXSTOPPED;
2402 } /* End if transmit stop requested */
2403 spin_unlock_irqrestore(&epca_lock, flags);
2407 static void pc_start(struct tty_struct *tty)
2411 * verifyChannel returns the channel from the tty struct if it is
2412 * valid. This serves as a sanity check.
2414 ch = verifyChannel(tty);
2416 unsigned long flags;
2417 spin_lock_irqsave(&epca_lock, flags);
2418 /* Just in case output was resumed because of a change
2420 if (ch->statusflags & TXSTOPPED) {
2421 /* Begin transmit resume requested */
2422 struct board_chan __iomem *bc;
2425 if (ch->statusflags & LOWWAIT)
2426 writeb(1, &bc->ilow);
2427 /* Okay, you can start transmitting again... */
2428 fepcmd(ch, RESUMETX, 0, 0, 0, 0);
2429 ch->statusflags &= ~TXSTOPPED;
2431 } /* End transmit resume requested */
2432 spin_unlock_irqrestore(&epca_lock, flags);
2437 * The below routines pc_throttle and pc_unthrottle are used to slow (And
2438 * resume) the receipt of data into the kernels receive buffers. The exact
2439 * occurrence of this depends on the size of the kernels receive buffer and
2440 * what the 'watermarks' are set to for that buffer. See the n_ttys.c file for
2443 static void pc_throttle(struct tty_struct *tty)
2446 unsigned long flags;
2448 * verifyChannel returns the channel from the tty struct if it is
2449 * valid. This serves as a sanity check.
2451 ch = verifyChannel(tty);
2453 spin_lock_irqsave(&epca_lock, flags);
2454 if ((ch->statusflags & RXSTOPPED) == 0) {
2456 fepcmd(ch, PAUSERX, 0, 0, 0, 0);
2457 ch->statusflags |= RXSTOPPED;
2460 spin_unlock_irqrestore(&epca_lock, flags);
2464 static void pc_unthrottle(struct tty_struct *tty)
2467 unsigned long flags;
2469 * verifyChannel returns the channel from the tty struct if it is
2470 * valid. This serves as a sanity check.
2472 ch = verifyChannel(tty);
2474 /* Just in case output was resumed because of a change
2476 spin_lock_irqsave(&epca_lock, flags);
2477 if (ch->statusflags & RXSTOPPED) {
2479 fepcmd(ch, RESUMERX, 0, 0, 0, 0);
2480 ch->statusflags &= ~RXSTOPPED;
2483 spin_unlock_irqrestore(&epca_lock, flags);
2487 static int pc_send_break(struct tty_struct *tty, int msec)
2489 struct channel *ch = tty->driver_data;
2490 unsigned long flags;
2494 else if (msec > 0xFFFE)
2499 spin_lock_irqsave(&epca_lock, flags);
2502 * Maybe I should send an infinite break here, schedule() for msec
2503 * amount of time, and then stop the break. This way, the user can't
2504 * screw up the FEP by causing digi_send_break() to be called (i.e. via
2505 * an ioctl()) more than once in msec amount of time.
2506 * Try this for now...
2508 fepcmd(ch, SENDBREAK, msec, 0, 10, 0);
2510 spin_unlock_irqrestore(&epca_lock, flags);
2514 /* Caller MUST hold the lock */
2515 static void setup_empty_event(struct tty_struct *tty, struct channel *ch)
2517 struct board_chan __iomem *bc = ch->brdchan;
2520 ch->statusflags |= EMPTYWAIT;
2522 * When set the iempty flag request a event to be generated when the
2523 * transmit buffer is empty (If there is no BREAK in progress).
2525 writeb(1, &bc->iempty);
2530 static void __init epca_setup(char *str, int *ints)
2532 struct board_info board;
2533 int index, loop, last;
2538 * If this routine looks a little strange it is because it is only
2539 * called if a LILO append command is given to boot the kernel with
2540 * parameters. In this way, we can provide the user a method of
2541 * changing his board configuration without rebuilding the kernel.
2546 memset(&board, 0, sizeof(board));
2548 /* Assume the data is int first, later we can change it */
2549 /* I think that array position 0 of ints holds the number of args */
2550 for (last = 0, index = 1; index <= ints[0]; index++)
2551 switch (index) { /* Begin parse switch */
2553 board.status = ints[index];
2555 * We check for 2 (As opposed to 1; because 2 is a flag
2556 * instructing the driver to ignore epcaconfig.) For
2557 * this reason we check for 2.
2559 if (board.status == 2) {
2560 /* Begin ignore epcaconfig as well as lilo cmd line */
2564 } /* End ignore epcaconfig as well as lilo cmd line */
2566 if (board.status > 2) {
2567 printk(KERN_ERR "epca_setup: Invalid board status 0x%x\n",
2569 invalid_lilo_config = 1;
2570 setup_error_code |= INVALID_BOARD_STATUS;
2576 board.type = ints[index];
2577 if (board.type >= PCIXEM) {
2578 printk(KERN_ERR "epca_setup: Invalid board type 0x%x\n", board.type);
2579 invalid_lilo_config = 1;
2580 setup_error_code |= INVALID_BOARD_TYPE;
2586 board.altpin = ints[index];
2587 if (board.altpin > 1) {
2588 printk(KERN_ERR "epca_setup: Invalid board altpin 0x%x\n", board.altpin);
2589 invalid_lilo_config = 1;
2590 setup_error_code |= INVALID_ALTPIN;
2597 board.numports = ints[index];
2598 if (board.numports < 2 || board.numports > 256) {
2599 printk(KERN_ERR "epca_setup: Invalid board numports 0x%x\n", board.numports);
2600 invalid_lilo_config = 1;
2601 setup_error_code |= INVALID_NUM_PORTS;
2604 nbdevs += board.numports;
2609 board.port = ints[index];
2610 if (ints[index] <= 0) {
2611 printk(KERN_ERR "epca_setup: Invalid io port 0x%x\n", (unsigned int)board.port);
2612 invalid_lilo_config = 1;
2613 setup_error_code |= INVALID_PORT_BASE;
2620 board.membase = ints[index];
2621 if (ints[index] <= 0) {
2622 printk(KERN_ERR "epca_setup: Invalid memory base 0x%x\n",
2623 (unsigned int)board.membase);
2624 invalid_lilo_config = 1;
2625 setup_error_code |= INVALID_MEM_BASE;
2632 printk(KERN_ERR "<Error> - epca_setup: Too many integer parms\n");
2635 } /* End parse switch */
2637 while (str && *str) { /* Begin while there is a string arg */
2638 /* find the next comma or terminator */
2640 /* While string is not null, and a comma hasn't been found */
2641 while (*temp && (*temp != ','))
2647 /* Set index to the number of args + 1 */
2653 if (strncmp("Disable", str, len) == 0)
2655 else if (strncmp("Enable", str, len) == 0)
2658 printk(KERN_ERR "epca_setup: Invalid status %s\n", str);
2659 invalid_lilo_config = 1;
2660 setup_error_code |= INVALID_BOARD_STATUS;
2667 for (loop = 0; loop < EPCA_NUM_TYPES; loop++)
2668 if (strcmp(board_desc[loop], str) == 0)
2671 * If the index incremented above refers to a
2672 * legitamate board type set it here.
2674 if (index < EPCA_NUM_TYPES)
2677 printk(KERN_ERR "epca_setup: Invalid board type: %s\n", str);
2678 invalid_lilo_config = 1;
2679 setup_error_code |= INVALID_BOARD_TYPE;
2687 if (strncmp("Disable", str, len) == 0)
2689 else if (strncmp("Enable", str, len) == 0)
2692 printk(KERN_ERR "epca_setup: Invalid altpin %s\n", str);
2693 invalid_lilo_config = 1;
2694 setup_error_code |= INVALID_ALTPIN;
2702 while (isdigit(*t2))
2706 printk(KERN_ERR "epca_setup: Invalid port count %s\n", str);
2707 invalid_lilo_config = 1;
2708 setup_error_code |= INVALID_NUM_PORTS;
2713 * There is not a man page for simple_strtoul but the
2714 * code can be found in vsprintf.c. The first argument
2715 * is the string to translate (To an unsigned long
2716 * obviously), the second argument can be the address
2717 * of any character variable or a NULL. If a variable
2718 * is given, the end pointer of the string will be
2719 * stored in that variable; if a NULL is given the end
2720 * pointer will not be returned. The last argument is
2721 * the base to use. If a 0 is indicated, the routine
2722 * will attempt to determine the proper base by looking
2723 * at the values prefix (A '0' for octal, a 'x' for
2724 * hex, etc ... If a value is given it will use that
2725 * value as the base.
2727 board.numports = simple_strtoul(str, NULL, 0);
2728 nbdevs += board.numports;
2734 while (isxdigit(*t2))
2738 printk(KERN_ERR "epca_setup: Invalid i/o address %s\n", str);
2739 invalid_lilo_config = 1;
2740 setup_error_code |= INVALID_PORT_BASE;
2744 board.port = simple_strtoul(str, NULL, 16);
2750 while (isxdigit(*t2))
2754 printk(KERN_ERR "epca_setup: Invalid memory base %s\n", str);
2755 invalid_lilo_config = 1;
2756 setup_error_code |= INVALID_MEM_BASE;
2759 board.membase = simple_strtoul(str, NULL, 16);
2763 printk(KERN_ERR "epca: Too many string parms\n");
2767 } /* End while there is a string arg */
2770 printk(KERN_ERR "epca: Insufficient parms specified\n");
2774 /* I should REALLY validate the stuff here */
2775 /* Copies our local copy of board into boards */
2776 memcpy((void *)&boards[num_cards], (void *)&board, sizeof(board));
2777 /* Does this get called once per lilo arg are what ? */
2778 printk(KERN_INFO "PC/Xx: Added board %i, %s %i ports at 0x%4.4X base 0x%6.6X\n",
2779 num_cards, board_desc[board.type],
2780 board.numports, (int)board.port, (unsigned int) board.membase);
2784 static int __init epca_real_setup(char *str)
2788 epca_setup(get_options(str, 11, ints), ints);
2792 __setup("digiepca", epca_real_setup);
2795 enum epic_board_types {
2802 /* indexed directly by epic_board_types enum */
2804 unsigned char board_type;
2805 unsigned bar_idx; /* PCI base address region */
2806 } epca_info_tbl[] = {
2813 static int __devinit epca_init_one(struct pci_dev *pdev,
2814 const struct pci_device_id *ent)
2816 static int board_num = -1;
2817 int board_idx, info_idx = ent->driver_data;
2820 if (pci_enable_device(pdev))
2824 board_idx = board_num + num_cards;
2825 if (board_idx >= MAXBOARDS)
2828 addr = pci_resource_start(pdev, epca_info_tbl[info_idx].bar_idx);
2830 printk(KERN_ERR PFX "PCI region #%d not available (size 0)\n",
2831 epca_info_tbl[info_idx].bar_idx);
2835 boards[board_idx].status = ENABLED;
2836 boards[board_idx].type = epca_info_tbl[info_idx].board_type;
2837 boards[board_idx].numports = 0x0;
2838 boards[board_idx].port = addr + PCI_IO_OFFSET;
2839 boards[board_idx].membase = addr;
2841 if (!request_mem_region(addr + PCI_IO_OFFSET, 0x200000, "epca")) {
2842 printk(KERN_ERR PFX "resource 0x%x @ 0x%lx unavailable\n",
2843 0x200000, addr + PCI_IO_OFFSET);
2847 boards[board_idx].re_map_port = ioremap_nocache(addr + PCI_IO_OFFSET,
2849 if (!boards[board_idx].re_map_port) {
2850 printk(KERN_ERR PFX "cannot map 0x%x @ 0x%lx\n",
2851 0x200000, addr + PCI_IO_OFFSET);
2852 goto err_out_free_pciio;
2855 if (!request_mem_region(addr, 0x200000, "epca")) {
2856 printk(KERN_ERR PFX "resource 0x%x @ 0x%lx unavailable\n",
2858 goto err_out_free_iounmap;
2861 boards[board_idx].re_map_membase = ioremap_nocache(addr, 0x200000);
2862 if (!boards[board_idx].re_map_membase) {
2863 printk(KERN_ERR PFX "cannot map 0x%x @ 0x%lx\n",
2864 0x200000, addr + PCI_IO_OFFSET);
2865 goto err_out_free_memregion;
2869 * I don't know what the below does, but the hardware guys say its
2870 * required on everything except PLX (In this case XRJ).
2872 if (info_idx != brd_xrj) {
2873 pci_write_config_byte(pdev, 0x40, 0);
2874 pci_write_config_byte(pdev, 0x46, 0);
2879 err_out_free_memregion:
2880 release_mem_region(addr, 0x200000);
2881 err_out_free_iounmap:
2882 iounmap(boards[board_idx].re_map_port);
2884 release_mem_region(addr + PCI_IO_OFFSET, 0x200000);
2890 static struct pci_device_id epca_pci_tbl[] = {
2891 { PCI_VENDOR_DIGI, PCI_DEVICE_XR, PCI_ANY_ID, PCI_ANY_ID, 0, 0, brd_xr },
2892 { PCI_VENDOR_DIGI, PCI_DEVICE_XEM, PCI_ANY_ID, PCI_ANY_ID, 0, 0, brd_xem },
2893 { PCI_VENDOR_DIGI, PCI_DEVICE_CX, PCI_ANY_ID, PCI_ANY_ID, 0, 0, brd_cx },
2894 { PCI_VENDOR_DIGI, PCI_DEVICE_XRJ, PCI_ANY_ID, PCI_ANY_ID, 0, 0, brd_xrj },
2898 MODULE_DEVICE_TABLE(pci, epca_pci_tbl);
2900 static int __init init_PCI(void)
2902 memset(&epca_driver, 0, sizeof(epca_driver));
2903 epca_driver.name = "epca";
2904 epca_driver.id_table = epca_pci_tbl;
2905 epca_driver.probe = epca_init_one;
2907 return pci_register_driver(&epca_driver);
2910 MODULE_LICENSE("GPL");