4 Copyright (C) 1996 Digi International.
6 For technical support please email digiLinux@dgii.com or
7 call Digi tech support at (612) 912-3456
9 ** This driver is no longer supported by Digi **
11 Much of this design and code came from epca.c which was
12 copyright (C) 1994, 1995 Troy De Jongh, and subsquently
13 modified by David Nugent, Christoph Lameter, Mike McLagan.
15 This program is free software; you can redistribute it and/or modify
16 it under the terms of the GNU General Public License as published by
17 the Free Software Foundation; either version 2 of the License, or
18 (at your option) any later version.
20 This program is distributed in the hope that it will be useful,
21 but WITHOUT ANY WARRANTY; without even the implied warranty of
22 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 GNU General Public License for more details.
25 You should have received a copy of the GNU General Public License
26 along with this program; if not, write to the Free Software
27 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
29 --------------------------------------------------------------------------- */
30 /* See README.epca for change history --DAT*/
33 #include <linux/module.h>
34 #include <linux/kernel.h>
35 #include <linux/types.h>
36 #include <linux/init.h>
37 #include <linux/serial.h>
38 #include <linux/delay.h>
39 #include <linux/ctype.h>
40 #include <linux/tty.h>
41 #include <linux/tty_flip.h>
42 #include <linux/slab.h>
43 #include <linux/ioport.h>
44 #include <linux/interrupt.h>
45 #include <asm/uaccess.h>
47 #include <linux/spinlock.h>
48 #include <linux/pci.h>
55 #include "epcaconfig.h"
57 /* ---------------------- Begin defines ------------------------ */
59 #define VERSION "1.3.0.1-LK2.6"
61 /* This major needs to be submitted to Linux to join the majors list */
63 #define DIGIINFOMAJOR 35 /* For Digi specific ioctl */
67 #define epcaassert(x, msg) if (!(x)) epca_error(__LINE__, msg)
71 /* ----------------- Begin global definitions ------------------- */
73 static int nbdevs
, num_cards
, liloconfig
;
74 static int digi_poller_inhibited
= 1 ;
76 static int setup_error_code
;
77 static int invalid_lilo_config
;
79 /* The ISA boards do window flipping into the same spaces so its only sane
80 with a single lock. It's still pretty efficient */
82 static DEFINE_SPINLOCK(epca_lock
);
84 /* -----------------------------------------------------------------------
85 MAXBOARDS is typically 12, but ISA and EISA cards are restricted to
87 --------------------------------------------------------------------------*/
88 static struct board_info boards
[MAXBOARDS
];
91 /* ------------- Begin structures used for driver registeration ---------- */
93 static struct tty_driver
*pc_driver
;
94 static struct tty_driver
*pc_info
;
96 /* ------------------ Begin Digi specific structures -------------------- */
98 /* ------------------------------------------------------------------------
99 digi_channels represents an array of structures that keep track of
100 each channel of the Digi product. Information such as transmit and
101 receive pointers, termio data, and signal definitions (DTR, CTS, etc ...)
102 are stored here. This structure is NOT used to overlay the cards
103 physical channel structure.
104 -------------------------------------------------------------------------- */
106 static struct channel digi_channels
[MAX_ALLOC
];
108 /* ------------------------------------------------------------------------
109 card_ptr is an array used to hold the address of the
110 first channel structure of each card. This array will hold
111 the addresses of various channels located in digi_channels.
112 -------------------------------------------------------------------------- */
113 static struct channel
*card_ptr
[MAXCARDS
];
115 static struct timer_list epca_timer
;
117 /* ---------------------- Begin function prototypes --------------------- */
119 /* ----------------------------------------------------------------------
120 Begin generic memory functions. These functions will be alias
121 (point at) more specific functions dependent on the board being
123 ----------------------------------------------------------------------- */
125 static void memwinon(struct board_info
*b
, unsigned int win
);
126 static void memwinoff(struct board_info
*b
, unsigned int win
);
127 static void globalwinon(struct channel
*ch
);
128 static void rxwinon(struct channel
*ch
);
129 static void txwinon(struct channel
*ch
);
130 static void memoff(struct channel
*ch
);
131 static void assertgwinon(struct channel
*ch
);
132 static void assertmemoff(struct channel
*ch
);
134 /* ---- Begin more 'specific' memory functions for cx_like products --- */
136 static void pcxem_memwinon(struct board_info
*b
, unsigned int win
);
137 static void pcxem_memwinoff(struct board_info
*b
, unsigned int win
);
138 static void pcxem_globalwinon(struct channel
*ch
);
139 static void pcxem_rxwinon(struct channel
*ch
);
140 static void pcxem_txwinon(struct channel
*ch
);
141 static void pcxem_memoff(struct channel
*ch
);
143 /* ------ Begin more 'specific' memory functions for the pcxe ------- */
145 static void pcxe_memwinon(struct board_info
*b
, unsigned int win
);
146 static void pcxe_memwinoff(struct board_info
*b
, unsigned int win
);
147 static void pcxe_globalwinon(struct channel
*ch
);
148 static void pcxe_rxwinon(struct channel
*ch
);
149 static void pcxe_txwinon(struct channel
*ch
);
150 static void pcxe_memoff(struct channel
*ch
);
152 /* ---- Begin more 'specific' memory functions for the pc64xe and pcxi ---- */
153 /* Note : pc64xe and pcxi share the same windowing routines */
155 static void pcxi_memwinon(struct board_info
*b
, unsigned int win
);
156 static void pcxi_memwinoff(struct board_info
*b
, unsigned int win
);
157 static void pcxi_globalwinon(struct channel
*ch
);
158 static void pcxi_rxwinon(struct channel
*ch
);
159 static void pcxi_txwinon(struct channel
*ch
);
160 static void pcxi_memoff(struct channel
*ch
);
162 /* - Begin 'specific' do nothing memory functions needed for some cards - */
164 static void dummy_memwinon(struct board_info
*b
, unsigned int win
);
165 static void dummy_memwinoff(struct board_info
*b
, unsigned int win
);
166 static void dummy_globalwinon(struct channel
*ch
);
167 static void dummy_rxwinon(struct channel
*ch
);
168 static void dummy_txwinon(struct channel
*ch
);
169 static void dummy_memoff(struct channel
*ch
);
170 static void dummy_assertgwinon(struct channel
*ch
);
171 static void dummy_assertmemoff(struct channel
*ch
);
173 /* ------------------- Begin declare functions ----------------------- */
175 static struct channel
*verifyChannel(struct tty_struct
*);
176 static void pc_sched_event(struct channel
*, int);
177 static void epca_error(int, char *);
178 static void pc_close(struct tty_struct
*, struct file
*);
179 static void shutdown(struct channel
*);
180 static void pc_hangup(struct tty_struct
*);
181 static void pc_put_char(struct tty_struct
*, unsigned char);
182 static int pc_write_room(struct tty_struct
*);
183 static int pc_chars_in_buffer(struct tty_struct
*);
184 static void pc_flush_buffer(struct tty_struct
*);
185 static void pc_flush_chars(struct tty_struct
*);
186 static int block_til_ready(struct tty_struct
*, struct file
*,
188 static int pc_open(struct tty_struct
*, struct file
*);
189 static void post_fep_init(unsigned int crd
);
190 static void epcapoll(unsigned long);
191 static void doevent(int);
192 static void fepcmd(struct channel
*, int, int, int, int, int);
193 static unsigned termios2digi_h(struct channel
*ch
, unsigned);
194 static unsigned termios2digi_i(struct channel
*ch
, unsigned);
195 static unsigned termios2digi_c(struct channel
*ch
, unsigned);
196 static void epcaparam(struct tty_struct
*, struct channel
*);
197 static void receive_data(struct channel
*);
198 static int pc_ioctl(struct tty_struct
*, struct file
*,
199 unsigned int, unsigned long);
200 static int info_ioctl(struct tty_struct
*, struct file
*,
201 unsigned int, unsigned long);
202 static void pc_set_termios(struct tty_struct
*, struct ktermios
*);
203 static void do_softint(struct work_struct
*work
);
204 static void pc_stop(struct tty_struct
*);
205 static void pc_start(struct tty_struct
*);
206 static void pc_throttle(struct tty_struct
* tty
);
207 static void pc_unthrottle(struct tty_struct
*tty
);
208 static void digi_send_break(struct channel
*ch
, int msec
);
209 static void setup_empty_event(struct tty_struct
*tty
, struct channel
*ch
);
210 void epca_setup(char *, int *);
212 static int pc_write(struct tty_struct
*, const unsigned char *, int);
213 static int pc_init(void);
214 static int init_PCI(void);
217 /* ------------------------------------------------------------------
218 Table of functions for each board to handle memory. Mantaining
219 parallelism is a *very* good idea here. The idea is for the
220 runtime code to blindly call these functions, not knowing/caring
221 about the underlying hardware. This stuff should contain no
222 conditionals; if more functionality is needed a different entry
223 should be established. These calls are the interface calls and
224 are the only functions that should be accessed. Anyone caught
225 making direct calls deserves what they get.
226 -------------------------------------------------------------------- */
228 static void memwinon(struct board_info
*b
, unsigned int win
)
230 (b
->memwinon
)(b
, win
);
233 static void memwinoff(struct board_info
*b
, unsigned int win
)
235 (b
->memwinoff
)(b
, win
);
238 static void globalwinon(struct channel
*ch
)
240 (ch
->board
->globalwinon
)(ch
);
243 static void rxwinon(struct channel
*ch
)
245 (ch
->board
->rxwinon
)(ch
);
248 static void txwinon(struct channel
*ch
)
250 (ch
->board
->txwinon
)(ch
);
253 static void memoff(struct channel
*ch
)
255 (ch
->board
->memoff
)(ch
);
257 static void assertgwinon(struct channel
*ch
)
259 (ch
->board
->assertgwinon
)(ch
);
262 static void assertmemoff(struct channel
*ch
)
264 (ch
->board
->assertmemoff
)(ch
);
267 /* ---------------------------------------------------------
268 PCXEM windowing is the same as that used in the PCXR
270 ------------------------------------------------------------ */
272 static void pcxem_memwinon(struct board_info
*b
, unsigned int win
)
274 outb_p(FEPWIN
|win
, b
->port
+ 1);
277 static void pcxem_memwinoff(struct board_info
*b
, unsigned int win
)
279 outb_p(0, b
->port
+ 1);
282 static void pcxem_globalwinon(struct channel
*ch
)
284 outb_p( FEPWIN
, (int)ch
->board
->port
+ 1);
287 static void pcxem_rxwinon(struct channel
*ch
)
289 outb_p(ch
->rxwin
, (int)ch
->board
->port
+ 1);
292 static void pcxem_txwinon(struct channel
*ch
)
294 outb_p(ch
->txwin
, (int)ch
->board
->port
+ 1);
297 static void pcxem_memoff(struct channel
*ch
)
299 outb_p(0, (int)ch
->board
->port
+ 1);
302 /* ----------------- Begin pcxe memory window stuff ------------------ */
304 static void pcxe_memwinon(struct board_info
*b
, unsigned int win
)
306 outb_p(FEPWIN
| win
, b
->port
+ 1);
309 static void pcxe_memwinoff(struct board_info
*b
, unsigned int win
)
311 outb_p(inb(b
->port
) & ~FEPMEM
,
313 outb_p(0, b
->port
+ 1);
316 static void pcxe_globalwinon(struct channel
*ch
)
318 outb_p( FEPWIN
, (int)ch
->board
->port
+ 1);
321 static void pcxe_rxwinon(struct channel
*ch
)
323 outb_p(ch
->rxwin
, (int)ch
->board
->port
+ 1);
326 static void pcxe_txwinon(struct channel
*ch
)
328 outb_p(ch
->txwin
, (int)ch
->board
->port
+ 1);
331 static void pcxe_memoff(struct channel
*ch
)
333 outb_p(0, (int)ch
->board
->port
);
334 outb_p(0, (int)ch
->board
->port
+ 1);
337 /* ------------- Begin pc64xe and pcxi memory window stuff -------------- */
339 static void pcxi_memwinon(struct board_info
*b
, unsigned int win
)
341 outb_p(inb(b
->port
) | FEPMEM
, b
->port
);
344 static void pcxi_memwinoff(struct board_info
*b
, unsigned int win
)
346 outb_p(inb(b
->port
) & ~FEPMEM
, b
->port
);
349 static void pcxi_globalwinon(struct channel
*ch
)
351 outb_p(FEPMEM
, ch
->board
->port
);
354 static void pcxi_rxwinon(struct channel
*ch
)
356 outb_p(FEPMEM
, ch
->board
->port
);
359 static void pcxi_txwinon(struct channel
*ch
)
361 outb_p(FEPMEM
, ch
->board
->port
);
364 static void pcxi_memoff(struct channel
*ch
)
366 outb_p(0, ch
->board
->port
);
369 static void pcxi_assertgwinon(struct channel
*ch
)
371 epcaassert(inb(ch
->board
->port
) & FEPMEM
, "Global memory off");
374 static void pcxi_assertmemoff(struct channel
*ch
)
376 epcaassert(!(inb(ch
->board
->port
) & FEPMEM
), "Memory on");
380 /* ----------------------------------------------------------------------
381 Not all of the cards need specific memory windowing routines. Some
382 cards (Such as PCI) needs no windowing routines at all. We provide
383 these do nothing routines so that the same code base can be used.
384 The driver will ALWAYS call a windowing routine if it thinks it needs
385 to; regardless of the card. However, dependent on the card the routine
386 may or may not do anything.
387 ---------------------------------------------------------------------------*/
389 static void dummy_memwinon(struct board_info
*b
, unsigned int win
)
393 static void dummy_memwinoff(struct board_info
*b
, unsigned int win
)
397 static void dummy_globalwinon(struct channel
*ch
)
401 static void dummy_rxwinon(struct channel
*ch
)
405 static void dummy_txwinon(struct channel
*ch
)
409 static void dummy_memoff(struct channel
*ch
)
413 static void dummy_assertgwinon(struct channel
*ch
)
417 static void dummy_assertmemoff(struct channel
*ch
)
421 /* ----------------- Begin verifyChannel function ----------------------- */
422 static struct channel
*verifyChannel(struct tty_struct
*tty
)
423 { /* Begin verifyChannel */
424 /* --------------------------------------------------------------------
425 This routine basically provides a sanity check. It insures that
426 the channel returned is within the proper range of addresses as
427 well as properly initialized. If some bogus info gets passed in
428 through tty->driver_data this should catch it.
429 --------------------------------------------------------------------- */
431 struct channel
*ch
= (struct channel
*)tty
->driver_data
;
432 if ((ch
>= &digi_channels
[0]) && (ch
< &digi_channels
[nbdevs
])) {
433 if (ch
->magic
== EPCA_MAGIC
)
439 } /* End verifyChannel */
441 /* ------------------ Begin pc_sched_event ------------------------- */
443 static void pc_sched_event(struct channel
*ch
, int event
)
445 /* ----------------------------------------------------------------------
446 We call this to schedule interrupt processing on some event. The
447 kernel sees our request and calls the related routine in OUR driver.
448 -------------------------------------------------------------------------*/
449 ch
->event
|= 1 << event
;
450 schedule_work(&ch
->tqueue
);
451 } /* End pc_sched_event */
453 /* ------------------ Begin epca_error ------------------------- */
455 static void epca_error(int line
, char *msg
)
457 printk(KERN_ERR
"epca_error (Digi): line = %d %s\n",line
,msg
);
460 /* ------------------ Begin pc_close ------------------------- */
461 static void pc_close(struct tty_struct
* tty
, struct file
* filp
)
465 /* ---------------------------------------------------------
466 verifyChannel returns the channel from the tty struct
467 if it is valid. This serves as a sanity check.
468 ------------------------------------------------------------- */
469 if ((ch
= verifyChannel(tty
)) != NULL
) { /* Begin if ch != NULL */
470 spin_lock_irqsave(&epca_lock
, flags
);
471 if (tty_hung_up_p(filp
)) {
472 spin_unlock_irqrestore(&epca_lock
, flags
);
475 /* Check to see if the channel is open more than once */
476 if (ch
->count
-- > 1) {
477 /* Begin channel is open more than once */
478 /* -------------------------------------------------------------
479 Return without doing anything. Someone might still be using
481 ---------------------------------------------------------------- */
482 spin_unlock_irqrestore(&epca_lock
, flags
);
484 } /* End channel is open more than once */
486 /* Port open only once go ahead with shutdown & reset */
487 BUG_ON(ch
->count
< 0);
489 /* ---------------------------------------------------------------
490 Let the rest of the driver know the channel is being closed.
491 This becomes important if an open is attempted before close
493 ------------------------------------------------------------------ */
494 ch
->asyncflags
|= ASYNC_CLOSING
;
497 spin_unlock_irqrestore(&epca_lock
, flags
);
499 if (ch
->asyncflags
& ASYNC_INITIALIZED
) {
500 /* Setup an event to indicate when the transmit buffer empties */
501 setup_empty_event(tty
, ch
);
502 tty_wait_until_sent(tty
, 3000); /* 30 seconds timeout */
504 if (tty
->driver
->flush_buffer
)
505 tty
->driver
->flush_buffer(tty
);
507 tty_ldisc_flush(tty
);
510 spin_lock_irqsave(&epca_lock
, flags
);
514 spin_unlock_irqrestore(&epca_lock
, flags
);
516 if (ch
->blocked_open
) { /* Begin if blocked_open */
518 msleep_interruptible(jiffies_to_msecs(ch
->close_delay
));
519 wake_up_interruptible(&ch
->open_wait
);
520 } /* End if blocked_open */
521 ch
->asyncflags
&= ~(ASYNC_NORMAL_ACTIVE
| ASYNC_INITIALIZED
|
523 wake_up_interruptible(&ch
->close_wait
);
524 } /* End if ch != NULL */
527 /* ------------------ Begin shutdown ------------------------- */
529 static void shutdown(struct channel
*ch
)
530 { /* Begin shutdown */
533 struct tty_struct
*tty
;
534 struct board_chan __iomem
*bc
;
536 if (!(ch
->asyncflags
& ASYNC_INITIALIZED
))
539 spin_lock_irqsave(&epca_lock
, flags
);
544 /* ------------------------------------------------------------------
545 In order for an event to be generated on the receipt of data the
546 idata flag must be set. Since we are shutting down, this is not
547 necessary clear this flag.
548 --------------------------------------------------------------------- */
551 writeb(0, &bc
->idata
);
554 /* ----------------------------------------------------------------
555 If we're a modem control device and HUPCL is on, drop RTS & DTR.
556 ------------------------------------------------------------------ */
558 if (tty
->termios
->c_cflag
& HUPCL
) {
559 ch
->omodem
&= ~(ch
->m_rts
| ch
->m_dtr
);
560 fepcmd(ch
, SETMODEM
, 0, ch
->m_dtr
| ch
->m_rts
, 10, 1);
564 /* ------------------------------------------------------------------
565 The channel has officialy been closed. The next time it is opened
566 it will have to reinitialized. Set a flag to indicate this.
567 ---------------------------------------------------------------------- */
569 /* Prevent future Digi programmed interrupts from coming active */
571 ch
->asyncflags
&= ~ASYNC_INITIALIZED
;
572 spin_unlock_irqrestore(&epca_lock
, flags
);
576 /* ------------------ Begin pc_hangup ------------------------- */
578 static void pc_hangup(struct tty_struct
*tty
)
579 { /* Begin pc_hangup */
582 /* ---------------------------------------------------------
583 verifyChannel returns the channel from the tty struct
584 if it is valid. This serves as a sanity check.
585 ------------------------------------------------------------- */
587 if ((ch
= verifyChannel(tty
)) != NULL
) { /* Begin if ch != NULL */
590 if (tty
->driver
->flush_buffer
)
591 tty
->driver
->flush_buffer(tty
);
592 tty_ldisc_flush(tty
);
595 spin_lock_irqsave(&epca_lock
, flags
);
599 ch
->asyncflags
&= ~(ASYNC_NORMAL_ACTIVE
| ASYNC_INITIALIZED
);
600 spin_unlock_irqrestore(&epca_lock
, flags
);
601 wake_up_interruptible(&ch
->open_wait
);
602 } /* End if ch != NULL */
604 } /* End pc_hangup */
606 /* ------------------ Begin pc_write ------------------------- */
608 static int pc_write(struct tty_struct
* tty
,
609 const unsigned char *buf
, int bytesAvailable
)
610 { /* Begin pc_write */
611 unsigned int head
, tail
;
618 struct board_chan __iomem
*bc
;
620 /* ----------------------------------------------------------------
621 pc_write is primarily called directly by the kernel routine
622 tty_write (Though it can also be called by put_char) found in
623 tty_io.c. pc_write is passed a line discipline buffer where
624 the data to be written out is stored. The line discipline
625 implementation itself is done at the kernel level and is not
626 brought into the driver.
627 ------------------------------------------------------------------- */
629 /* ---------------------------------------------------------
630 verifyChannel returns the channel from the tty struct
631 if it is valid. This serves as a sanity check.
632 ------------------------------------------------------------- */
634 if ((ch
= verifyChannel(tty
)) == NULL
)
637 /* Make a pointer to the channel data structure found on the board. */
640 size
= ch
->txbufsize
;
643 spin_lock_irqsave(&epca_lock
, flags
);
646 head
= readw(&bc
->tin
) & (size
- 1);
647 tail
= readw(&bc
->tout
);
649 if (tail
!= readw(&bc
->tout
))
650 tail
= readw(&bc
->tout
);
653 /* If head >= tail, head has not wrapped around. */
654 if (head
>= tail
) { /* Begin head has not wrapped */
655 /* ---------------------------------------------------------------
656 remain (much like dataLen above) represents the total amount of
657 space available on the card for data. Here dataLen represents
658 the space existing between the head pointer and the end of
659 buffer. This is important because a memcpy cannot be told to
660 automatically wrap around when it hits the buffer end.
661 ------------------------------------------------------------------ */
662 dataLen
= size
- head
;
663 remain
= size
- (head
- tail
) - 1;
664 } else { /* Begin head has wrapped around */
666 remain
= tail
- head
- 1;
669 } /* End head has wrapped around */
670 /* -------------------------------------------------------------------
671 Check the space on the card. If we have more data than
672 space; reduce the amount of data to fit the space.
673 ---------------------------------------------------------------------- */
674 bytesAvailable
= min(remain
, bytesAvailable
);
676 while (bytesAvailable
> 0)
677 { /* Begin while there is data to copy onto card */
679 /* -----------------------------------------------------------------
680 If head is not wrapped, the below will make sure the first
681 data copy fills to the end of card buffer.
682 ------------------------------------------------------------------- */
684 dataLen
= min(bytesAvailable
, dataLen
);
685 memcpy_toio(ch
->txptr
+ head
, buf
, dataLen
);
688 amountCopied
+= dataLen
;
689 bytesAvailable
-= dataLen
;
695 } /* End while there is data to copy onto card */
696 ch
->statusflags
|= TXBUSY
;
698 writew(head
, &bc
->tin
);
700 if ((ch
->statusflags
& LOWWAIT
) == 0) {
701 ch
->statusflags
|= LOWWAIT
;
702 writeb(1, &bc
->ilow
);
705 spin_unlock_irqrestore(&epca_lock
, flags
);
706 return(amountCopied
);
710 /* ------------------ Begin pc_put_char ------------------------- */
712 static void pc_put_char(struct tty_struct
*tty
, unsigned char c
)
713 { /* Begin pc_put_char */
714 pc_write(tty
, &c
, 1);
715 } /* End pc_put_char */
717 /* ------------------ Begin pc_write_room ------------------------- */
719 static int pc_write_room(struct tty_struct
*tty
)
720 { /* Begin pc_write_room */
725 unsigned int head
, tail
;
726 struct board_chan __iomem
*bc
;
730 /* ---------------------------------------------------------
731 verifyChannel returns the channel from the tty struct
732 if it is valid. This serves as a sanity check.
733 ------------------------------------------------------------- */
735 if ((ch
= verifyChannel(tty
)) != NULL
) {
736 spin_lock_irqsave(&epca_lock
, flags
);
740 head
= readw(&bc
->tin
) & (ch
->txbufsize
- 1);
741 tail
= readw(&bc
->tout
);
743 if (tail
!= readw(&bc
->tout
))
744 tail
= readw(&bc
->tout
);
745 /* Wrap tail if necessary */
746 tail
&= (ch
->txbufsize
- 1);
748 if ((remain
= tail
- head
- 1) < 0 )
749 remain
+= ch
->txbufsize
;
751 if (remain
&& (ch
->statusflags
& LOWWAIT
) == 0) {
752 ch
->statusflags
|= LOWWAIT
;
753 writeb(1, &bc
->ilow
);
756 spin_unlock_irqrestore(&epca_lock
, flags
);
758 /* Return how much room is left on card */
761 } /* End pc_write_room */
763 /* ------------------ Begin pc_chars_in_buffer ---------------------- */
765 static int pc_chars_in_buffer(struct tty_struct
*tty
)
766 { /* Begin pc_chars_in_buffer */
769 unsigned int ctail
, head
, tail
;
773 struct board_chan __iomem
*bc
;
775 /* ---------------------------------------------------------
776 verifyChannel returns the channel from the tty struct
777 if it is valid. This serves as a sanity check.
778 ------------------------------------------------------------- */
780 if ((ch
= verifyChannel(tty
)) == NULL
)
783 spin_lock_irqsave(&epca_lock
, flags
);
787 tail
= readw(&bc
->tout
);
788 head
= readw(&bc
->tin
);
789 ctail
= readw(&ch
->mailbox
->cout
);
791 if (tail
== head
&& readw(&ch
->mailbox
->cin
) == ctail
&& readb(&bc
->tbusy
) == 0)
793 else { /* Begin if some space on the card has been used */
794 head
= readw(&bc
->tin
) & (ch
->txbufsize
- 1);
795 tail
&= (ch
->txbufsize
- 1);
796 /* --------------------------------------------------------------
797 The logic here is basically opposite of the above pc_write_room
798 here we are finding the amount of bytes in the buffer filled.
799 Not the amount of bytes empty.
800 ------------------------------------------------------------------- */
801 if ((remain
= tail
- head
- 1) < 0 )
802 remain
+= ch
->txbufsize
;
803 chars
= (int)(ch
->txbufsize
- remain
);
804 /* -------------------------------------------------------------
805 Make it possible to wakeup anything waiting for output
808 If not already set. Setup an event to indicate when the
809 transmit buffer empties
810 ----------------------------------------------------------------- */
811 if (!(ch
->statusflags
& EMPTYWAIT
))
812 setup_empty_event(tty
,ch
);
814 } /* End if some space on the card has been used */
816 spin_unlock_irqrestore(&epca_lock
, flags
);
817 /* Return number of characters residing on card. */
820 } /* End pc_chars_in_buffer */
822 /* ------------------ Begin pc_flush_buffer ---------------------- */
824 static void pc_flush_buffer(struct tty_struct
*tty
)
825 { /* Begin pc_flush_buffer */
830 struct board_chan __iomem
*bc
;
831 /* ---------------------------------------------------------
832 verifyChannel returns the channel from the tty struct
833 if it is valid. This serves as a sanity check.
834 ------------------------------------------------------------- */
835 if ((ch
= verifyChannel(tty
)) == NULL
)
838 spin_lock_irqsave(&epca_lock
, flags
);
841 tail
= readw(&bc
->tout
);
842 /* Have FEP move tout pointer; effectively flushing transmit buffer */
843 fepcmd(ch
, STOUT
, (unsigned) tail
, 0, 0, 0);
845 spin_unlock_irqrestore(&epca_lock
, flags
);
847 } /* End pc_flush_buffer */
849 /* ------------------ Begin pc_flush_chars ---------------------- */
851 static void pc_flush_chars(struct tty_struct
*tty
)
852 { /* Begin pc_flush_chars */
854 /* ---------------------------------------------------------
855 verifyChannel returns the channel from the tty struct
856 if it is valid. This serves as a sanity check.
857 ------------------------------------------------------------- */
858 if ((ch
= verifyChannel(tty
)) != NULL
) {
860 spin_lock_irqsave(&epca_lock
, flags
);
861 /* ----------------------------------------------------------------
862 If not already set and the transmitter is busy setup an event
863 to indicate when the transmit empties.
864 ------------------------------------------------------------------- */
865 if ((ch
->statusflags
& TXBUSY
) && !(ch
->statusflags
& EMPTYWAIT
))
866 setup_empty_event(tty
,ch
);
867 spin_unlock_irqrestore(&epca_lock
, flags
);
869 } /* End pc_flush_chars */
871 /* ------------------ Begin block_til_ready ---------------------- */
873 static int block_til_ready(struct tty_struct
*tty
,
874 struct file
*filp
, struct channel
*ch
)
875 { /* Begin block_til_ready */
876 DECLARE_WAITQUEUE(wait
,current
);
877 int retval
, do_clocal
= 0;
880 if (tty_hung_up_p(filp
)) {
881 if (ch
->asyncflags
& ASYNC_HUP_NOTIFY
)
884 retval
= -ERESTARTSYS
;
888 /* -----------------------------------------------------------------
889 If the device is in the middle of being closed, then block
890 until it's done, and then try again.
891 -------------------------------------------------------------------- */
892 if (ch
->asyncflags
& ASYNC_CLOSING
) {
893 interruptible_sleep_on(&ch
->close_wait
);
895 if (ch
->asyncflags
& ASYNC_HUP_NOTIFY
)
901 if (filp
->f_flags
& O_NONBLOCK
) {
902 /* -----------------------------------------------------------------
903 If non-blocking mode is set, then make the check up front
905 -------------------------------------------------------------------- */
906 ch
->asyncflags
|= ASYNC_NORMAL_ACTIVE
;
909 if (tty
->termios
->c_cflag
& CLOCAL
)
911 /* Block waiting for the carrier detect and the line to become free */
914 add_wait_queue(&ch
->open_wait
, &wait
);
916 spin_lock_irqsave(&epca_lock
, flags
);
917 /* We dec count so that pc_close will know when to free things */
918 if (!tty_hung_up_p(filp
))
922 { /* Begin forever while */
923 set_current_state(TASK_INTERRUPTIBLE
);
924 if (tty_hung_up_p(filp
) ||
925 !(ch
->asyncflags
& ASYNC_INITIALIZED
))
927 if (ch
->asyncflags
& ASYNC_HUP_NOTIFY
)
930 retval
= -ERESTARTSYS
;
933 if (!(ch
->asyncflags
& ASYNC_CLOSING
) &&
934 (do_clocal
|| (ch
->imodem
& ch
->dcd
)))
936 if (signal_pending(current
)) {
937 retval
= -ERESTARTSYS
;
940 spin_unlock_irqrestore(&epca_lock
, flags
);
941 /* ---------------------------------------------------------------
942 Allow someone else to be scheduled. We will occasionally go
943 through this loop until one of the above conditions change.
944 The below schedule call will allow other processes to enter and
945 prevent this loop from hogging the cpu.
946 ------------------------------------------------------------------ */
948 spin_lock_irqsave(&epca_lock
, flags
);
950 } /* End forever while */
952 current
->state
= TASK_RUNNING
;
953 remove_wait_queue(&ch
->open_wait
, &wait
);
954 if (!tty_hung_up_p(filp
))
958 spin_unlock_irqrestore(&epca_lock
, flags
);
963 ch
->asyncflags
|= ASYNC_NORMAL_ACTIVE
;
965 } /* End block_til_ready */
967 /* ------------------ Begin pc_open ---------------------- */
969 static int pc_open(struct tty_struct
*tty
, struct file
* filp
)
970 { /* Begin pc_open */
974 int line
, retval
, boardnum
;
975 struct board_chan __iomem
*bc
;
979 if (line
< 0 || line
>= nbdevs
)
982 ch
= &digi_channels
[line
];
983 boardnum
= ch
->boardnum
;
985 /* Check status of board configured in system. */
987 /* -----------------------------------------------------------------
988 I check to see if the epca_setup routine detected an user error.
989 It might be better to put this in pc_init, but for the moment it
991 ---------------------------------------------------------------------- */
993 if (invalid_lilo_config
) {
994 if (setup_error_code
& INVALID_BOARD_TYPE
)
995 printk(KERN_ERR
"epca: pc_open: Invalid board type specified in kernel options.\n");
996 if (setup_error_code
& INVALID_NUM_PORTS
)
997 printk(KERN_ERR
"epca: pc_open: Invalid number of ports specified in kernel options.\n");
998 if (setup_error_code
& INVALID_MEM_BASE
)
999 printk(KERN_ERR
"epca: pc_open: Invalid board memory address specified in kernel options.\n");
1000 if (setup_error_code
& INVALID_PORT_BASE
)
1001 printk(KERN_ERR
"epca; pc_open: Invalid board port address specified in kernel options.\n");
1002 if (setup_error_code
& INVALID_BOARD_STATUS
)
1003 printk(KERN_ERR
"epca: pc_open: Invalid board status specified in kernel options.\n");
1004 if (setup_error_code
& INVALID_ALTPIN
)
1005 printk(KERN_ERR
"epca: pc_open: Invalid board altpin specified in kernel options;\n");
1006 tty
->driver_data
= NULL
; /* Mark this device as 'down' */
1009 if (boardnum
>= num_cards
|| boards
[boardnum
].status
== DISABLED
) {
1010 tty
->driver_data
= NULL
; /* Mark this device as 'down' */
1014 if ((bc
= ch
->brdchan
) == 0) {
1015 tty
->driver_data
= NULL
;
1019 spin_lock_irqsave(&epca_lock
, flags
);
1020 /* ------------------------------------------------------------------
1021 Every time a channel is opened, increment a counter. This is
1022 necessary because we do not wish to flush and shutdown the channel
1023 until the last app holding the channel open, closes it.
1024 --------------------------------------------------------------------- */
1026 /* ----------------------------------------------------------------
1027 Set a kernel structures pointer to our local channel
1028 structure. This way we can get to it when passed only
1030 ------------------------------------------------------------------ */
1031 tty
->driver_data
= ch
;
1032 /* ----------------------------------------------------------------
1033 If this is the first time the channel has been opened, initialize
1034 the tty->termios struct otherwise let pc_close handle it.
1035 -------------------------------------------------------------------- */
1037 ch
->statusflags
= 0;
1039 /* Save boards current modem status */
1040 ch
->imodem
= readb(&bc
->mstat
);
1042 /* ----------------------------------------------------------------
1043 Set receive head and tail ptrs to each other. This indicates
1044 no data available to read.
1045 ----------------------------------------------------------------- */
1046 head
= readw(&bc
->rin
);
1047 writew(head
, &bc
->rout
);
1049 /* Set the channels associated tty structure */
1052 /* -----------------------------------------------------------------
1053 The below routine generally sets up parity, baud, flow control
1054 issues, etc.... It effect both control flags and input flags.
1055 -------------------------------------------------------------------- */
1057 ch
->asyncflags
|= ASYNC_INITIALIZED
;
1059 spin_unlock_irqrestore(&epca_lock
, flags
);
1061 retval
= block_til_ready(tty
, filp
, ch
);
1064 /* -------------------------------------------------------------
1065 Set this again in case a hangup set it to zero while this
1066 open() was waiting for the line...
1067 --------------------------------------------------------------- */
1068 spin_lock_irqsave(&epca_lock
, flags
);
1071 /* Enable Digi Data events */
1072 writeb(1, &bc
->idata
);
1074 spin_unlock_irqrestore(&epca_lock
, flags
);
1078 static int __init
epca_module_init(void)
1079 { /* Begin init_module */
1083 module_init(epca_module_init
);
1085 static struct pci_driver epca_driver
;
1087 static void __exit
epca_module_exit(void)
1090 struct board_info
*bd
;
1093 del_timer_sync(&epca_timer
);
1095 if ((tty_unregister_driver(pc_driver
)) ||
1096 (tty_unregister_driver(pc_info
)))
1098 printk(KERN_WARNING
"epca: cleanup_module failed to un-register tty driver\n");
1101 put_tty_driver(pc_driver
);
1102 put_tty_driver(pc_info
);
1104 for (crd
= 0; crd
< num_cards
; crd
++) { /* Begin for each card */
1107 { /* Begin sanity check */
1108 printk(KERN_ERR
"<Error> - Digi : cleanup_module failed\n");
1110 } /* End sanity check */
1112 for (count
= 0; count
< bd
->numports
; count
++, ch
++)
1113 { /* Begin for each port */
1115 tty_hangup(ch
->tty
);
1116 } /* End for each port */
1117 } /* End for each card */
1118 pci_unregister_driver (&epca_driver
);
1121 module_exit(epca_module_exit
);
1123 static const struct tty_operations pc_ops
= {
1127 .write_room
= pc_write_room
,
1128 .flush_buffer
= pc_flush_buffer
,
1129 .chars_in_buffer
= pc_chars_in_buffer
,
1130 .flush_chars
= pc_flush_chars
,
1131 .put_char
= pc_put_char
,
1133 .set_termios
= pc_set_termios
,
1136 .throttle
= pc_throttle
,
1137 .unthrottle
= pc_unthrottle
,
1138 .hangup
= pc_hangup
,
1141 static int info_open(struct tty_struct
*tty
, struct file
* filp
)
1146 static struct tty_operations info_ops
= {
1148 .ioctl
= info_ioctl
,
1151 /* ------------------ Begin pc_init ---------------------- */
1153 static int __init
pc_init(void)
1154 { /* Begin pc_init */
1156 struct board_info
*bd
;
1157 unsigned char board_id
= 0;
1160 int pci_boards_found
, pci_count
;
1164 pc_driver
= alloc_tty_driver(MAX_ALLOC
);
1168 pc_info
= alloc_tty_driver(MAX_ALLOC
);
1172 /* -----------------------------------------------------------------------
1173 If epca_setup has not been ran by LILO set num_cards to defaults; copy
1174 board structure defined by digiConfig into drivers board structure.
1175 Note : If LILO has ran epca_setup then epca_setup will handle defining
1176 num_cards as well as copying the data into the board structure.
1177 -------------------------------------------------------------------------- */
1178 if (!liloconfig
) { /* Begin driver has been configured via. epcaconfig */
1181 num_cards
= NUMCARDS
;
1182 memcpy((void *)&boards
, (void *)&static_boards
,
1183 (sizeof(struct board_info
) * NUMCARDS
));
1184 } /* End driver has been configured via. epcaconfig */
1186 /* -----------------------------------------------------------------
1187 Note : If lilo was used to configure the driver and the
1188 ignore epcaconfig option was choosen (digiepca=2) then
1189 nbdevs and num_cards will equal 0 at this point. This is
1190 okay; PCI cards will still be picked up if detected.
1191 --------------------------------------------------------------------- */
1193 /* -----------------------------------------------------------
1194 Set up interrupt, we will worry about memory allocation in
1196 --------------------------------------------------------------- */
1199 printk(KERN_INFO
"DIGI epca driver version %s loaded.\n",VERSION
);
1201 /* ------------------------------------------------------------------
1202 NOTE : This code assumes that the number of ports found in
1203 the boards array is correct. This could be wrong if
1204 the card in question is PCI (And therefore has no ports
1205 entry in the boards structure.) The rest of the
1206 information will be valid for PCI because the beginning
1207 of pc_init scans for PCI and determines i/o and base
1208 memory addresses. I am not sure if it is possible to
1209 read the number of ports supported by the card prior to
1210 it being booted (Since that is the state it is in when
1211 pc_init is run). Because it is not possible to query the
1212 number of supported ports until after the card has booted;
1213 we are required to calculate the card_ptrs as the card is
1214 is initialized (Inside post_fep_init). The negative thing
1215 about this approach is that digiDload's call to GET_INFO
1216 will have a bad port value. (Since this is called prior
1219 --------------------------------------------------------------------- */
1221 pci_boards_found
= 0;
1222 if(num_cards
< MAXBOARDS
)
1223 pci_boards_found
+= init_PCI();
1224 num_cards
+= pci_boards_found
;
1226 pc_driver
->owner
= THIS_MODULE
;
1227 pc_driver
->name
= "ttyD";
1228 pc_driver
->major
= DIGI_MAJOR
;
1229 pc_driver
->minor_start
= 0;
1230 pc_driver
->type
= TTY_DRIVER_TYPE_SERIAL
;
1231 pc_driver
->subtype
= SERIAL_TYPE_NORMAL
;
1232 pc_driver
->init_termios
= tty_std_termios
;
1233 pc_driver
->init_termios
.c_iflag
= 0;
1234 pc_driver
->init_termios
.c_oflag
= 0;
1235 pc_driver
->init_termios
.c_cflag
= B9600
| CS8
| CREAD
| CLOCAL
| HUPCL
;
1236 pc_driver
->init_termios
.c_lflag
= 0;
1237 pc_driver
->init_termios
.c_ispeed
= 9600;
1238 pc_driver
->init_termios
.c_ospeed
= 9600;
1239 pc_driver
->flags
= TTY_DRIVER_REAL_RAW
;
1240 tty_set_operations(pc_driver
, &pc_ops
);
1242 pc_info
->owner
= THIS_MODULE
;
1243 pc_info
->name
= "digi_ctl";
1244 pc_info
->major
= DIGIINFOMAJOR
;
1245 pc_info
->minor_start
= 0;
1246 pc_info
->type
= TTY_DRIVER_TYPE_SERIAL
;
1247 pc_info
->subtype
= SERIAL_TYPE_INFO
;
1248 pc_info
->init_termios
= tty_std_termios
;
1249 pc_info
->init_termios
.c_iflag
= 0;
1250 pc_info
->init_termios
.c_oflag
= 0;
1251 pc_info
->init_termios
.c_lflag
= 0;
1252 pc_info
->init_termios
.c_cflag
= B9600
| CS8
| CREAD
| HUPCL
;
1253 pc_info
->init_termios
.c_ispeed
= 9600;
1254 pc_info
->init_termios
.c_ospeed
= 9600;
1255 pc_info
->flags
= TTY_DRIVER_REAL_RAW
;
1256 tty_set_operations(pc_info
, &info_ops
);
1259 for (crd
= 0; crd
< num_cards
; crd
++)
1260 { /* Begin for each card */
1262 /* ------------------------------------------------------------------
1263 This is where the appropriate memory handlers for the hardware is
1264 set. Everything at runtime blindly jumps through these vectors.
1265 ---------------------------------------------------------------------- */
1267 /* defined in epcaconfig.h */
1271 { /* Begin switch on bd->type {board type} */
1274 bd
->memwinon
= pcxem_memwinon
;
1275 bd
->memwinoff
= pcxem_memwinoff
;
1276 bd
->globalwinon
= pcxem_globalwinon
;
1277 bd
->txwinon
= pcxem_txwinon
;
1278 bd
->rxwinon
= pcxem_rxwinon
;
1279 bd
->memoff
= pcxem_memoff
;
1280 bd
->assertgwinon
= dummy_assertgwinon
;
1281 bd
->assertmemoff
= dummy_assertmemoff
;
1287 bd
->memwinon
= dummy_memwinon
;
1288 bd
->memwinoff
= dummy_memwinoff
;
1289 bd
->globalwinon
= dummy_globalwinon
;
1290 bd
->txwinon
= dummy_txwinon
;
1291 bd
->rxwinon
= dummy_rxwinon
;
1292 bd
->memoff
= dummy_memoff
;
1293 bd
->assertgwinon
= dummy_assertgwinon
;
1294 bd
->assertmemoff
= dummy_assertmemoff
;
1300 bd
->memwinon
= pcxe_memwinon
;
1301 bd
->memwinoff
= pcxe_memwinoff
;
1302 bd
->globalwinon
= pcxe_globalwinon
;
1303 bd
->txwinon
= pcxe_txwinon
;
1304 bd
->rxwinon
= pcxe_rxwinon
;
1305 bd
->memoff
= pcxe_memoff
;
1306 bd
->assertgwinon
= dummy_assertgwinon
;
1307 bd
->assertmemoff
= dummy_assertmemoff
;
1313 bd
->memwinon
= pcxi_memwinon
;
1314 bd
->memwinoff
= pcxi_memwinoff
;
1315 bd
->globalwinon
= pcxi_globalwinon
;
1316 bd
->txwinon
= pcxi_txwinon
;
1317 bd
->rxwinon
= pcxi_rxwinon
;
1318 bd
->memoff
= pcxi_memoff
;
1319 bd
->assertgwinon
= pcxi_assertgwinon
;
1320 bd
->assertmemoff
= pcxi_assertmemoff
;
1326 } /* End switch on bd->type */
1328 /* ---------------------------------------------------------------
1329 Some cards need a memory segment to be defined for use in
1330 transmit and receive windowing operations. These boards
1331 are listed in the below switch. In the case of the XI the
1332 amount of memory on the board is variable so the memory_seg
1333 is also variable. This code determines what they segment
1335 ----------------------------------------------------------------- */
1338 { /* Begin switch on bd->type {board type} */
1343 bd
->memory_seg
= 0xf000;
1347 board_id
= inb((int)bd
->port
);
1348 if ((board_id
& 0x1) == 0x1)
1349 { /* Begin it's an XI card */
1351 /* Is it a 64K board */
1352 if ((board_id
& 0x30) == 0)
1353 bd
->memory_seg
= 0xf000;
1355 /* Is it a 128K board */
1356 if ((board_id
& 0x30) == 0x10)
1357 bd
->memory_seg
= 0xe000;
1359 /* Is is a 256K board */
1360 if ((board_id
& 0x30) == 0x20)
1361 bd
->memory_seg
= 0xc000;
1363 /* Is it a 512K board */
1364 if ((board_id
& 0x30) == 0x30)
1365 bd
->memory_seg
= 0x8000;
1367 } else printk(KERN_ERR
"epca: Board at 0x%x doesn't appear to be an XI\n",(int)bd
->port
);
1370 } /* End switch on bd->type */
1372 } /* End for each card */
1374 err
= tty_register_driver(pc_driver
);
1376 printk(KERN_ERR
"Couldn't register Digi PC/ driver");
1380 err
= tty_register_driver(pc_info
);
1382 printk(KERN_ERR
"Couldn't register Digi PC/ info ");
1386 /* -------------------------------------------------------------------
1387 Start up the poller to check for events on all enabled boards
1388 ---------------------------------------------------------------------- */
1390 init_timer(&epca_timer
);
1391 epca_timer
.function
= epcapoll
;
1392 mod_timer(&epca_timer
, jiffies
+ HZ
/25);
1396 tty_unregister_driver(pc_driver
);
1398 put_tty_driver(pc_info
);
1400 put_tty_driver(pc_driver
);
1406 /* ------------------ Begin post_fep_init ---------------------- */
1408 static void post_fep_init(unsigned int crd
)
1409 { /* Begin post_fep_init */
1412 void __iomem
*memaddr
;
1413 struct global_data __iomem
*gd
;
1414 struct board_info
*bd
;
1415 struct board_chan __iomem
*bc
;
1417 int shrinkmem
= 0, lowwater
;
1419 /* -------------------------------------------------------------
1420 This call is made by the user via. the ioctl call DIGI_INIT.
1421 It is responsible for setting up all the card specific stuff.
1422 ---------------------------------------------------------------- */
1425 /* -----------------------------------------------------------------
1426 If this is a PCI board, get the port info. Remember PCI cards
1427 do not have entries into the epcaconfig.h file, so we can't get
1428 the number of ports from it. Unfortunetly, this means that anyone
1429 doing a DIGI_GETINFO before the board has booted will get an invalid
1430 number of ports returned (It should return 0). Calls to DIGI_GETINFO
1431 after DIGI_INIT has been called will return the proper values.
1432 ------------------------------------------------------------------- */
1434 if (bd
->type
>= PCIXEM
) { /* Begin get PCI number of ports */
1435 /* --------------------------------------------------------------------
1436 Below we use XEMPORTS as a memory offset regardless of which PCI
1437 card it is. This is because all of the supported PCI cards have
1438 the same memory offset for the channel data. This will have to be
1439 changed if we ever develop a PCI/XE card. NOTE : The FEP manual
1440 states that the port offset is 0xC22 as opposed to 0xC02. This is
1441 only true for PC/XE, and PC/XI cards; not for the XEM, or CX series.
1442 On the PCI cards the number of ports is determined by reading a
1443 ID PROM located in the box attached to the card. The card can then
1444 determine the index the id to determine the number of ports available.
1445 (FYI - The id should be located at 0x1ac (And may use up to 4 bytes
1446 if the box in question is a XEM or CX)).
1447 ------------------------------------------------------------------------ */
1448 /* PCI cards are already remapped at this point ISA are not */
1449 bd
->numports
= readw(bd
->re_map_membase
+ XEMPORTS
);
1450 epcaassert(bd
->numports
<= 64,"PCI returned a invalid number of ports");
1451 nbdevs
+= (bd
->numports
);
1453 /* Fix up the mappings for ISA/EISA etc */
1454 /* FIXME: 64K - can we be smarter ? */
1455 bd
->re_map_membase
= ioremap(bd
->membase
, 0x10000);
1459 card_ptr
[crd
] = card_ptr
[crd
-1] + boards
[crd
-1].numports
;
1461 card_ptr
[crd
] = &digi_channels
[crd
]; /* <- For card 0 only */
1464 epcaassert(ch
<= &digi_channels
[nbdevs
- 1], "ch out of range");
1466 memaddr
= bd
->re_map_membase
;
1468 /* -----------------------------------------------------------------
1469 The below assignment will set bc to point at the BEGINING of
1470 the cards channel structures. For 1 card there will be between
1471 8 and 64 of these structures.
1472 -------------------------------------------------------------------- */
1474 bc
= memaddr
+ CHANSTRUCT
;
1476 /* -------------------------------------------------------------------
1477 The below assignment will set gd to point at the BEGINING of
1478 global memory address 0xc00. The first data in that global
1479 memory actually starts at address 0xc1a. The command in
1480 pointer begins at 0xd10.
1481 ---------------------------------------------------------------------- */
1483 gd
= memaddr
+ GLOBAL
;
1485 /* --------------------------------------------------------------------
1486 XEPORTS (address 0xc22) points at the number of channels the
1487 card supports. (For 64XE, XI, XEM, and XR use 0xc02)
1488 ----------------------------------------------------------------------- */
1490 if ((bd
->type
== PCXEVE
|| bd
->type
== PCXE
) && (readw(memaddr
+ XEPORTS
) < 3))
1492 if (bd
->type
< PCIXEM
)
1493 if (!request_region((int)bd
->port
, 4, board_desc
[bd
->type
]))
1497 /* --------------------------------------------------------------------
1498 Remember ch is the main drivers channels structure, while bc is
1499 the cards channel structure.
1500 ------------------------------------------------------------------------ */
1502 /* For every port on the card do ..... */
1504 for (i
= 0; i
< bd
->numports
; i
++, ch
++, bc
++) { /* Begin for each port */
1505 unsigned long flags
;
1510 INIT_WORK(&ch
->tqueue
, do_softint
);
1511 ch
->board
= &boards
[crd
];
1513 spin_lock_irqsave(&epca_lock
, flags
);
1515 /* ----------------------------------------------------------------
1516 Since some of the boards use different bitmaps for their
1517 control signals we cannot hard code these values and retain
1518 portability. We virtualize this data here.
1519 ------------------------------------------------------------------- */
1545 } /* End switch bd->type */
1547 if (boards
[crd
].altpin
) {
1548 ch
->dsr
= ch
->m_dcd
;
1549 ch
->dcd
= ch
->m_dsr
;
1550 ch
->digiext
.digi_flags
|= DIGI_ALTPIN
;
1553 ch
->dcd
= ch
->m_dcd
;
1554 ch
->dsr
= ch
->m_dsr
;
1559 ch
->magic
= EPCA_MAGIC
;
1563 fepcmd(ch
, SETBUFFER
, 32, 0, 0, 0);
1567 tseg
= readw(&bc
->tseg
);
1568 rseg
= readw(&bc
->rseg
);
1575 /* Cover all the 2MEG cards */
1576 ch
->txptr
= memaddr
+ ((tseg
<< 4) & 0x1fffff);
1577 ch
->rxptr
= memaddr
+ ((rseg
<< 4) & 0x1fffff);
1578 ch
->txwin
= FEPWIN
| (tseg
>> 11);
1579 ch
->rxwin
= FEPWIN
| (rseg
>> 11);
1584 /* Cover all the 32K windowed cards */
1585 /* Mask equal to window size - 1 */
1586 ch
->txptr
= memaddr
+ ((tseg
<< 4) & 0x7fff);
1587 ch
->rxptr
= memaddr
+ ((rseg
<< 4) & 0x7fff);
1588 ch
->txwin
= FEPWIN
| (tseg
>> 11);
1589 ch
->rxwin
= FEPWIN
| (rseg
>> 11);
1594 ch
->txptr
= memaddr
+ (((tseg
- bd
->memory_seg
) << 4) & 0x1fff);
1595 ch
->txwin
= FEPWIN
| ((tseg
- bd
->memory_seg
) >> 9);
1596 ch
->rxptr
= memaddr
+ (((rseg
- bd
->memory_seg
) << 4) & 0x1fff);
1597 ch
->rxwin
= FEPWIN
| ((rseg
- bd
->memory_seg
) >>9 );
1602 ch
->txptr
= memaddr
+ ((tseg
- bd
->memory_seg
) << 4);
1603 ch
->rxptr
= memaddr
+ ((rseg
- bd
->memory_seg
) << 4);
1604 ch
->txwin
= ch
->rxwin
= 0;
1607 } /* End switch bd->type */
1610 ch
->txbufsize
= readw(&bc
->tmax
) + 1;
1613 ch
->rxbufsize
= readw(&bc
->rmax
) + 1;
1615 lowwater
= ch
->txbufsize
>= 2000 ? 1024 : (ch
->txbufsize
/ 2);
1617 /* Set transmitter low water mark */
1618 fepcmd(ch
, STXLWATER
, lowwater
, 0, 10, 0);
1620 /* Set receiver low water mark */
1622 fepcmd(ch
, SRXLWATER
, (ch
->rxbufsize
/ 4), 0, 10, 0);
1624 /* Set receiver high water mark */
1626 fepcmd(ch
, SRXHWATER
, (3 * ch
->rxbufsize
/ 4), 0, 10, 0);
1628 writew(100, &bc
->edelay
);
1629 writeb(1, &bc
->idata
);
1631 ch
->startc
= readb(&bc
->startc
);
1632 ch
->stopc
= readb(&bc
->stopc
);
1633 ch
->startca
= readb(&bc
->startca
);
1634 ch
->stopca
= readb(&bc
->stopca
);
1644 ch
->close_delay
= 50;
1646 ch
->blocked_open
= 0;
1647 init_waitqueue_head(&ch
->open_wait
);
1648 init_waitqueue_head(&ch
->close_wait
);
1650 spin_unlock_irqrestore(&epca_lock
, flags
);
1651 } /* End for each port */
1654 "Digi PC/Xx Driver V%s: %s I/O = 0x%lx Mem = 0x%lx Ports = %d\n",
1655 VERSION
, board_desc
[bd
->type
], (long)bd
->port
, (long)bd
->membase
, bd
->numports
);
1658 } /* End post_fep_init */
1660 /* --------------------- Begin epcapoll ------------------------ */
1662 static void epcapoll(unsigned long ignored
)
1663 { /* Begin epcapoll */
1665 unsigned long flags
;
1667 volatile unsigned int head
, tail
;
1669 struct board_info
*bd
;
1671 /* -------------------------------------------------------------------
1672 This routine is called upon every timer interrupt. Even though
1673 the Digi series cards are capable of generating interrupts this
1674 method of non-looping polling is more efficient. This routine
1675 checks for card generated events (Such as receive data, are transmit
1676 buffer empty) and acts on those events.
1677 ----------------------------------------------------------------------- */
1679 for (crd
= 0; crd
< num_cards
; crd
++)
1680 { /* Begin for each card */
1685 if ((bd
->status
== DISABLED
) || digi_poller_inhibited
)
1686 continue; /* Begin loop next interation */
1688 /* -----------------------------------------------------------
1689 assertmemoff is not needed here; indeed it is an empty subroutine.
1690 It is being kept because future boards may need this as well as
1692 ---------------------------------------------------------------- */
1694 spin_lock_irqsave(&epca_lock
, flags
);
1700 /* ---------------------------------------------------------------
1701 In this case head and tail actually refer to the event queue not
1702 the transmit or receive queue.
1703 ------------------------------------------------------------------- */
1705 head
= readw(&ch
->mailbox
->ein
);
1706 tail
= readw(&ch
->mailbox
->eout
);
1708 /* If head isn't equal to tail we have an event */
1714 spin_unlock_irqrestore(&epca_lock
, flags
);
1716 } /* End for each card */
1717 mod_timer(&epca_timer
, jiffies
+ (HZ
/ 25));
1718 } /* End epcapoll */
1720 /* --------------------- Begin doevent ------------------------ */
1722 static void doevent(int crd
)
1723 { /* Begin doevent */
1725 void __iomem
*eventbuf
;
1726 struct channel
*ch
, *chan0
;
1727 static struct tty_struct
*tty
;
1728 struct board_info
*bd
;
1729 struct board_chan __iomem
*bc
;
1730 unsigned int tail
, head
;
1734 /* -------------------------------------------------------------------
1735 This subroutine is called by epcapoll when an event is detected
1736 in the event queue. This routine responds to those events.
1737 --------------------------------------------------------------------- */
1740 chan0
= card_ptr
[crd
];
1741 epcaassert(chan0
<= &digi_channels
[nbdevs
- 1], "ch out of range");
1742 assertgwinon(chan0
);
1743 while ((tail
= readw(&chan0
->mailbox
->eout
)) != (head
= readw(&chan0
->mailbox
->ein
)))
1744 { /* Begin while something in event queue */
1745 assertgwinon(chan0
);
1746 eventbuf
= bd
->re_map_membase
+ tail
+ ISTART
;
1747 /* Get the channel the event occurred on */
1748 channel
= readb(eventbuf
);
1749 /* Get the actual event code that occurred */
1750 event
= readb(eventbuf
+ 1);
1751 /* ----------------------------------------------------------------
1752 The two assignments below get the current modem status (mstat)
1753 and the previous modem status (lstat). These are useful becuase
1754 an event could signal a change in modem signals itself.
1755 ------------------------------------------------------------------- */
1756 mstat
= readb(eventbuf
+ 2);
1757 lstat
= readb(eventbuf
+ 3);
1759 ch
= chan0
+ channel
;
1760 if ((unsigned)channel
>= bd
->numports
|| !ch
) {
1761 if (channel
>= bd
->numports
)
1767 if ((bc
= ch
->brdchan
) == NULL
)
1770 if (event
& DATA_IND
) { /* Begin DATA_IND */
1773 } /* End DATA_IND */
1774 /* else *//* Fix for DCD transition missed bug */
1775 if (event
& MODEMCHG_IND
) { /* Begin MODEMCHG_IND */
1776 /* A modem signal change has been indicated */
1778 if (ch
->asyncflags
& ASYNC_CHECK_CD
) {
1779 if (mstat
& ch
->dcd
) /* We are now receiving dcd */
1780 wake_up_interruptible(&ch
->open_wait
);
1782 pc_sched_event(ch
, EPCA_EVENT_HANGUP
); /* No dcd; hangup */
1784 } /* End MODEMCHG_IND */
1786 if (tty
) { /* Begin if valid tty */
1787 if (event
& BREAK_IND
) { /* Begin if BREAK_IND */
1788 /* A break has been indicated */
1789 tty_insert_flip_char(tty
, 0, TTY_BREAK
);
1790 tty_schedule_flip(tty
);
1791 } else if (event
& LOWTX_IND
) { /* Begin LOWTX_IND */
1792 if (ch
->statusflags
& LOWWAIT
)
1793 { /* Begin if LOWWAIT */
1794 ch
->statusflags
&= ~LOWWAIT
;
1796 } /* End if LOWWAIT */
1797 } else if (event
& EMPTYTX_IND
) { /* Begin EMPTYTX_IND */
1798 /* This event is generated by setup_empty_event */
1799 ch
->statusflags
&= ~TXBUSY
;
1800 if (ch
->statusflags
& EMPTYWAIT
) { /* Begin if EMPTYWAIT */
1801 ch
->statusflags
&= ~EMPTYWAIT
;
1803 } /* End if EMPTYWAIT */
1804 } /* End EMPTYTX_IND */
1805 } /* End if valid tty */
1809 writew(1, &bc
->idata
);
1810 writew((tail
+ 4) & (IMAX
- ISTART
- 4), &chan0
->mailbox
->eout
);
1812 } /* End while something in event queue */
1815 /* --------------------- Begin fepcmd ------------------------ */
1817 static void fepcmd(struct channel
*ch
, int cmd
, int word_or_byte
,
1818 int byte2
, int ncmds
, int bytecmd
)
1819 { /* Begin fepcmd */
1820 unchar __iomem
*memaddr
;
1821 unsigned int head
, cmdTail
, cmdStart
, cmdMax
;
1825 /* This is the routine in which commands may be passed to the card. */
1827 if (ch
->board
->status
== DISABLED
)
1830 /* Remember head (As well as max) is just an offset not a base addr */
1831 head
= readw(&ch
->mailbox
->cin
);
1832 /* cmdStart is a base address */
1833 cmdStart
= readw(&ch
->mailbox
->cstart
);
1834 /* ------------------------------------------------------------------
1835 We do the addition below because we do not want a max pointer
1836 relative to cmdStart. We want a max pointer that points at the
1837 physical end of the command queue.
1838 -------------------------------------------------------------------- */
1839 cmdMax
= (cmdStart
+ 4 + readw(&ch
->mailbox
->cmax
));
1840 memaddr
= ch
->board
->re_map_membase
;
1842 if (head
>= (cmdMax
- cmdStart
) || (head
& 03)) {
1843 printk(KERN_ERR
"line %d: Out of range, cmd = %x, head = %x\n", __LINE__
, cmd
, head
);
1844 printk(KERN_ERR
"line %d: Out of range, cmdMax = %x, cmdStart = %x\n", __LINE__
, cmdMax
, cmdStart
);
1848 writeb(cmd
, memaddr
+ head
+ cmdStart
+ 0);
1849 writeb(ch
->channelnum
, memaddr
+ head
+ cmdStart
+ 1);
1850 /* Below word_or_byte is bits to set */
1851 writeb(word_or_byte
, memaddr
+ head
+ cmdStart
+ 2);
1852 /* Below byte2 is bits to reset */
1853 writeb(byte2
, memaddr
+ head
+ cmdStart
+ 3);
1855 writeb(cmd
, memaddr
+ head
+ cmdStart
+ 0);
1856 writeb(ch
->channelnum
, memaddr
+ head
+ cmdStart
+ 1);
1857 writeb(word_or_byte
, memaddr
+ head
+ cmdStart
+ 2);
1859 head
= (head
+ 4) & (cmdMax
- cmdStart
- 4);
1860 writew(head
, &ch
->mailbox
->cin
);
1863 for (;;) { /* Begin forever loop */
1866 printk(KERN_ERR
"<Error> - Fep not responding in fepcmd()\n");
1869 head
= readw(&ch
->mailbox
->cin
);
1870 cmdTail
= readw(&ch
->mailbox
->cout
);
1871 n
= (head
- cmdTail
) & (cmdMax
- cmdStart
- 4);
1872 /* ----------------------------------------------------------
1873 Basically this will break when the FEP acknowledges the
1874 command by incrementing cmdTail (Making it equal to head).
1875 ------------------------------------------------------------- */
1876 if (n
<= ncmds
* (sizeof(short) * 4))
1877 break; /* Well nearly forever :-) */
1878 } /* End forever loop */
1881 /* ---------------------------------------------------------------------
1882 Digi products use fields in their channels structures that are very
1883 similar to the c_cflag and c_iflag fields typically found in UNIX
1884 termios structures. The below three routines allow mappings
1885 between these hardware "flags" and their respective Linux flags.
1886 ------------------------------------------------------------------------- */
1888 /* --------------------- Begin termios2digi_h -------------------- */
1890 static unsigned termios2digi_h(struct channel
*ch
, unsigned cflag
)
1891 { /* Begin termios2digi_h */
1894 if (cflag
& CRTSCTS
) {
1895 ch
->digiext
.digi_flags
|= (RTSPACE
| CTSPACE
);
1896 res
|= ((ch
->m_cts
) | (ch
->m_rts
));
1899 if (ch
->digiext
.digi_flags
& RTSPACE
)
1902 if (ch
->digiext
.digi_flags
& DTRPACE
)
1905 if (ch
->digiext
.digi_flags
& CTSPACE
)
1908 if (ch
->digiext
.digi_flags
& DSRPACE
)
1911 if (ch
->digiext
.digi_flags
& DCDPACE
)
1914 if (res
& (ch
->m_rts
))
1915 ch
->digiext
.digi_flags
|= RTSPACE
;
1917 if (res
& (ch
->m_cts
))
1918 ch
->digiext
.digi_flags
|= CTSPACE
;
1922 } /* End termios2digi_h */
1924 /* --------------------- Begin termios2digi_i -------------------- */
1925 static unsigned termios2digi_i(struct channel
*ch
, unsigned iflag
)
1926 { /* Begin termios2digi_i */
1928 unsigned res
= iflag
& (IGNBRK
| BRKINT
| IGNPAR
| PARMRK
|
1929 INPCK
| ISTRIP
|IXON
|IXANY
|IXOFF
);
1930 if (ch
->digiext
.digi_flags
& DIGI_AIXON
)
1934 } /* End termios2digi_i */
1936 /* --------------------- Begin termios2digi_c -------------------- */
1938 static unsigned termios2digi_c(struct channel
*ch
, unsigned cflag
)
1939 { /* Begin termios2digi_c */
1942 if (cflag
& CBAUDEX
) { /* Begin detected CBAUDEX */
1943 ch
->digiext
.digi_flags
|= DIGI_FAST
;
1944 /* -------------------------------------------------------------
1945 HUPCL bit is used by FEP to indicate fast baud
1946 table is to be used.
1947 ----------------------------------------------------------------- */
1949 } /* End detected CBAUDEX */
1950 else ch
->digiext
.digi_flags
&= ~DIGI_FAST
;
1951 /* -------------------------------------------------------------------
1952 CBAUD has bit position 0x1000 set these days to indicate Linux
1953 baud rate remap. Digi hardware can't handle the bit assignment.
1954 (We use a different bit assignment for high speed.). Clear this
1956 ---------------------------------------------------------------------- */
1957 res
|= cflag
& ((CBAUD
^ CBAUDEX
) | PARODD
| PARENB
| CSTOPB
| CSIZE
);
1958 /* -------------------------------------------------------------
1959 This gets a little confusing. The Digi cards have their own
1960 representation of c_cflags controling baud rate. For the most
1961 part this is identical to the Linux implementation. However;
1962 Digi supports one rate (76800) that Linux doesn't. This means
1963 that the c_cflag entry that would normally mean 76800 for Digi
1964 actually means 115200 under Linux. Without the below mapping,
1965 a stty 115200 would only drive the board at 76800. Since
1966 the rate 230400 is also found after 76800, the same problem afflicts
1967 us when we choose a rate of 230400. Without the below modificiation
1968 stty 230400 would actually give us 115200.
1970 There are two additional differences. The Linux value for CLOCAL
1971 (0x800; 0004000) has no meaning to the Digi hardware. Also in
1972 later releases of Linux; the CBAUD define has CBAUDEX (0x1000;
1973 0010000) ored into it (CBAUD = 0x100f as opposed to 0xf). CBAUDEX
1974 should be checked for a screened out prior to termios2digi_c
1975 returning. Since CLOCAL isn't used by the board this can be
1976 ignored as long as the returned value is used only by Digi hardware.
1977 ----------------------------------------------------------------- */
1978 if (cflag
& CBAUDEX
) {
1979 /* -------------------------------------------------------------
1980 The below code is trying to guarantee that only baud rates
1981 115200 and 230400 are remapped. We use exclusive or because
1982 the various baud rates share common bit positions and therefore
1983 can't be tested for easily.
1984 ----------------------------------------------------------------- */
1987 if ((!((cflag
& 0x7) ^ (B115200
& ~CBAUDEX
))) ||
1988 (!((cflag
& 0x7) ^ (B230400
& ~CBAUDEX
))))
1993 } /* End termios2digi_c */
1995 /* --------------------- Begin epcaparam ----------------------- */
1997 /* Caller must hold the locks */
1998 static void epcaparam(struct tty_struct
*tty
, struct channel
*ch
)
1999 { /* Begin epcaparam */
2001 unsigned int cmdHead
;
2002 struct ktermios
*ts
;
2003 struct board_chan __iomem
*bc
;
2004 unsigned mval
, hflow
, cflag
, iflag
;
2007 epcaassert(bc
!=0, "bc out of range");
2011 if ((ts
->c_cflag
& CBAUD
) == 0) { /* Begin CBAUD detected */
2012 cmdHead
= readw(&bc
->rin
);
2013 writew(cmdHead
, &bc
->rout
);
2014 cmdHead
= readw(&bc
->tin
);
2015 /* Changing baud in mid-stream transmission can be wonderful */
2016 /* ---------------------------------------------------------------
2017 Flush current transmit buffer by setting cmdTail pointer (tout)
2018 to cmdHead pointer (tin). Hopefully the transmit buffer is empty.
2019 ----------------------------------------------------------------- */
2020 fepcmd(ch
, STOUT
, (unsigned) cmdHead
, 0, 0, 0);
2022 } else { /* Begin CBAUD not detected */
2023 /* -------------------------------------------------------------------
2024 c_cflags have changed but that change had nothing to do with BAUD.
2025 Propagate the change to the card.
2026 ---------------------------------------------------------------------- */
2027 cflag
= termios2digi_c(ch
, ts
->c_cflag
);
2028 if (cflag
!= ch
->fepcflag
) {
2029 ch
->fepcflag
= cflag
;
2030 /* Set baud rate, char size, stop bits, parity */
2031 fepcmd(ch
, SETCTRLFLAGS
, (unsigned) cflag
, 0, 0, 0);
2033 /* ----------------------------------------------------------------
2034 If the user has not forced CLOCAL and if the device is not a
2035 CALLOUT device (Which is always CLOCAL) we set flags such that
2036 the driver will wait on carrier detect.
2037 ------------------------------------------------------------------- */
2038 if (ts
->c_cflag
& CLOCAL
)
2039 ch
->asyncflags
&= ~ASYNC_CHECK_CD
;
2041 ch
->asyncflags
|= ASYNC_CHECK_CD
;
2042 mval
= ch
->m_dtr
| ch
->m_rts
;
2043 } /* End CBAUD not detected */
2044 iflag
= termios2digi_i(ch
, ts
->c_iflag
);
2045 /* Check input mode flags */
2046 if (iflag
!= ch
->fepiflag
) {
2047 ch
->fepiflag
= iflag
;
2048 /* ---------------------------------------------------------------
2049 Command sets channels iflag structure on the board. Such things
2050 as input soft flow control, handling of parity errors, and
2051 break handling are all set here.
2052 ------------------------------------------------------------------- */
2053 /* break handling, parity handling, input stripping, flow control chars */
2054 fepcmd(ch
, SETIFLAGS
, (unsigned int) ch
->fepiflag
, 0, 0, 0);
2056 /* ---------------------------------------------------------------
2057 Set the board mint value for this channel. This will cause hardware
2058 events to be generated each time the DCD signal (Described in mint)
2060 ------------------------------------------------------------------- */
2061 writeb(ch
->dcd
, &bc
->mint
);
2062 if ((ts
->c_cflag
& CLOCAL
) || (ch
->digiext
.digi_flags
& DIGI_FORCEDCD
))
2063 if (ch
->digiext
.digi_flags
& DIGI_FORCEDCD
)
2064 writeb(0, &bc
->mint
);
2065 ch
->imodem
= readb(&bc
->mstat
);
2066 hflow
= termios2digi_h(ch
, ts
->c_cflag
);
2067 if (hflow
!= ch
->hflow
) {
2069 /* --------------------------------------------------------------
2070 Hard flow control has been selected but the board is not
2071 using it. Activate hard flow control now.
2072 ----------------------------------------------------------------- */
2073 fepcmd(ch
, SETHFLOW
, hflow
, 0xff, 0, 1);
2075 mval
^= ch
->modemfake
& (mval
^ ch
->modem
);
2077 if (ch
->omodem
^ mval
) {
2079 /* --------------------------------------------------------------
2080 The below command sets the DTR and RTS mstat structure. If
2081 hard flow control is NOT active these changes will drive the
2082 output of the actual DTR and RTS lines. If hard flow control
2083 is active, the changes will be saved in the mstat structure and
2084 only asserted when hard flow control is turned off.
2085 ----------------------------------------------------------------- */
2087 /* First reset DTR & RTS; then set them */
2088 fepcmd(ch
, SETMODEM
, 0, ((ch
->m_dtr
)|(ch
->m_rts
)), 0, 1);
2089 fepcmd(ch
, SETMODEM
, mval
, 0, 0, 1);
2091 if (ch
->startc
!= ch
->fepstartc
|| ch
->stopc
!= ch
->fepstopc
) {
2092 ch
->fepstartc
= ch
->startc
;
2093 ch
->fepstopc
= ch
->stopc
;
2094 /* ------------------------------------------------------------
2095 The XON / XOFF characters have changed; propagate these
2096 changes to the card.
2097 --------------------------------------------------------------- */
2098 fepcmd(ch
, SONOFFC
, ch
->fepstartc
, ch
->fepstopc
, 0, 1);
2100 if (ch
->startca
!= ch
->fepstartca
|| ch
->stopca
!= ch
->fepstopca
) {
2101 ch
->fepstartca
= ch
->startca
;
2102 ch
->fepstopca
= ch
->stopca
;
2103 /* ---------------------------------------------------------------
2104 Similar to the above, this time the auxilarly XON / XOFF
2105 characters have changed; propagate these changes to the card.
2106 ------------------------------------------------------------------ */
2107 fepcmd(ch
, SAUXONOFFC
, ch
->fepstartca
, ch
->fepstopca
, 0, 1);
2109 } /* End epcaparam */
2111 /* --------------------- Begin receive_data ----------------------- */
2112 /* Caller holds lock */
2113 static void receive_data(struct channel
*ch
)
2114 { /* Begin receive_data */
2117 struct ktermios
*ts
= NULL
;
2118 struct tty_struct
*tty
;
2119 struct board_chan __iomem
*bc
;
2120 int dataToRead
, wrapgap
, bytesAvailable
;
2121 unsigned int tail
, head
;
2122 unsigned int wrapmask
;
2124 /* ---------------------------------------------------------------
2125 This routine is called by doint when a receive data event
2127 ------------------------------------------------------------------- */
2130 if (ch
->statusflags
& RXSTOPPED
)
2137 wrapmask
= ch
->rxbufsize
- 1;
2139 /* ---------------------------------------------------------------------
2140 Get the head and tail pointers to the receiver queue. Wrap the
2141 head pointer if it has reached the end of the buffer.
2142 ------------------------------------------------------------------------ */
2143 head
= readw(&bc
->rin
);
2145 tail
= readw(&bc
->rout
) & wrapmask
;
2147 bytesAvailable
= (head
- tail
) & wrapmask
;
2148 if (bytesAvailable
== 0)
2151 /* ------------------------------------------------------------------
2152 If CREAD bit is off or device not open, set TX tail to head
2153 --------------------------------------------------------------------- */
2155 if (!tty
|| !ts
|| !(ts
->c_cflag
& CREAD
)) {
2156 writew(head
, &bc
->rout
);
2160 if (tty_buffer_request_room(tty
, bytesAvailable
+ 1) == 0)
2163 if (readb(&bc
->orun
)) {
2164 writeb(0, &bc
->orun
);
2165 printk(KERN_WARNING
"epca; overrun! DigiBoard device %s\n",tty
->name
);
2166 tty_insert_flip_char(tty
, 0, TTY_OVERRUN
);
2169 while (bytesAvailable
> 0) { /* Begin while there is data on the card */
2170 wrapgap
= (head
>= tail
) ? head
- tail
: ch
->rxbufsize
- tail
;
2171 /* ---------------------------------------------------------------
2172 Even if head has wrapped around only report the amount of
2173 data to be equal to the size - tail. Remember memcpy can't
2174 automaticly wrap around the receive buffer.
2175 ----------------------------------------------------------------- */
2176 dataToRead
= (wrapgap
< bytesAvailable
) ? wrapgap
: bytesAvailable
;
2177 /* --------------------------------------------------------------
2178 Make sure we don't overflow the buffer
2179 ----------------------------------------------------------------- */
2180 dataToRead
= tty_prepare_flip_string(tty
, &rptr
, dataToRead
);
2181 if (dataToRead
== 0)
2183 /* ---------------------------------------------------------------
2184 Move data read from our card into the line disciplines buffer
2185 for translation if necessary.
2186 ------------------------------------------------------------------ */
2187 memcpy_fromio(rptr
, ch
->rxptr
+ tail
, dataToRead
);
2188 tail
= (tail
+ dataToRead
) & wrapmask
;
2189 bytesAvailable
-= dataToRead
;
2190 } /* End while there is data on the card */
2192 writew(tail
, &bc
->rout
);
2193 /* Must be called with global data */
2194 tty_schedule_flip(ch
->tty
);
2196 } /* End receive_data */
2198 static int info_ioctl(struct tty_struct
*tty
, struct file
* file
,
2199 unsigned int cmd
, unsigned long arg
)
2202 { /* Begin switch cmd */
2204 { /* Begin case DIGI_GETINFO */
2205 struct digi_info di
;
2208 if(get_user(brd
, (unsigned int __user
*)arg
))
2210 if (brd
< 0 || brd
>= num_cards
|| num_cards
== 0)
2213 memset(&di
, 0, sizeof(di
));
2216 di
.status
= boards
[brd
].status
;
2217 di
.type
= boards
[brd
].type
;
2218 di
.numports
= boards
[brd
].numports
;
2219 /* Legacy fixups - just move along nothing to see */
2220 di
.port
= (unsigned char *)boards
[brd
].port
;
2221 di
.membase
= (unsigned char *)boards
[brd
].membase
;
2223 if (copy_to_user((void __user
*)arg
, &di
, sizeof (di
)))
2227 } /* End case DIGI_GETINFO */
2230 { /* Begin case DIGI_POLLER */
2232 int brd
= arg
& 0xff000000 >> 16 ;
2233 unsigned char state
= arg
& 0xff ;
2235 if (brd
< 0 || brd
>= num_cards
) {
2236 printk(KERN_ERR
"epca: DIGI POLLER : brd not valid!\n");
2239 digi_poller_inhibited
= state
;
2241 } /* End case DIGI_POLLER */
2244 { /* Begin case DIGI_INIT */
2245 /* ------------------------------------------------------------
2246 This call is made by the apps to complete the initilization
2247 of the board(s). This routine is responsible for setting
2248 the card to its initial state and setting the drivers control
2249 fields to the sutianle settings for the card in question.
2250 ---------------------------------------------------------------- */
2252 for (crd
= 0; crd
< num_cards
; crd
++)
2253 post_fep_init (crd
);
2255 } /* End case DIGI_INIT */
2258 } /* End switch cmd */
2261 /* --------------------- Begin pc_ioctl ----------------------- */
2263 static int pc_tiocmget(struct tty_struct
*tty
, struct file
*file
)
2265 struct channel
*ch
= (struct channel
*) tty
->driver_data
;
2266 struct board_chan __iomem
*bc
;
2267 unsigned int mstat
, mflag
= 0;
2268 unsigned long flags
;
2275 spin_lock_irqsave(&epca_lock
, flags
);
2277 mstat
= readb(&bc
->mstat
);
2279 spin_unlock_irqrestore(&epca_lock
, flags
);
2281 if (mstat
& ch
->m_dtr
)
2283 if (mstat
& ch
->m_rts
)
2285 if (mstat
& ch
->m_cts
)
2287 if (mstat
& ch
->dsr
)
2289 if (mstat
& ch
->m_ri
)
2291 if (mstat
& ch
->dcd
)
2296 static int pc_tiocmset(struct tty_struct
*tty
, struct file
*file
,
2297 unsigned int set
, unsigned int clear
)
2299 struct channel
*ch
= (struct channel
*) tty
->driver_data
;
2300 unsigned long flags
;
2305 spin_lock_irqsave(&epca_lock
, flags
);
2307 * I think this modemfake stuff is broken. It doesn't
2308 * correctly reflect the behaviour desired by the TIOCM*
2309 * ioctls. Therefore this is probably broken.
2311 if (set
& TIOCM_RTS
) {
2312 ch
->modemfake
|= ch
->m_rts
;
2313 ch
->modem
|= ch
->m_rts
;
2315 if (set
& TIOCM_DTR
) {
2316 ch
->modemfake
|= ch
->m_dtr
;
2317 ch
->modem
|= ch
->m_dtr
;
2319 if (clear
& TIOCM_RTS
) {
2320 ch
->modemfake
|= ch
->m_rts
;
2321 ch
->modem
&= ~ch
->m_rts
;
2323 if (clear
& TIOCM_DTR
) {
2324 ch
->modemfake
|= ch
->m_dtr
;
2325 ch
->modem
&= ~ch
->m_dtr
;
2328 /* --------------------------------------------------------------
2329 The below routine generally sets up parity, baud, flow control
2330 issues, etc.... It effect both control flags and input flags.
2331 ------------------------------------------------------------------ */
2334 spin_unlock_irqrestore(&epca_lock
, flags
);
2338 static int pc_ioctl(struct tty_struct
*tty
, struct file
* file
,
2339 unsigned int cmd
, unsigned long arg
)
2340 { /* Begin pc_ioctl */
2344 unsigned long flags
;
2345 unsigned int mflag
, mstat
;
2346 unsigned char startc
, stopc
;
2347 struct board_chan __iomem
*bc
;
2348 struct channel
*ch
= (struct channel
*) tty
->driver_data
;
2349 void __user
*argp
= (void __user
*)arg
;
2356 /* -------------------------------------------------------------------
2357 For POSIX compliance we need to add more ioctls. See tty_ioctl.c
2358 in /usr/src/linux/drivers/char for a good example. In particular
2359 think about adding TCSETAF, TCSETAW, TCSETA, TCSETSF, TCSETSW, TCSETS.
2360 ---------------------------------------------------------------------- */
2363 { /* Begin switch cmd */
2364 case TCSBRK
: /* SVID version: non-zero arg --> no break */
2365 retval
= tty_check_change(tty
);
2368 /* Setup an event to indicate when the transmit buffer empties */
2369 spin_lock_irqsave(&epca_lock
, flags
);
2370 setup_empty_event(tty
,ch
);
2371 spin_unlock_irqrestore(&epca_lock
, flags
);
2372 tty_wait_until_sent(tty
, 0);
2374 digi_send_break(ch
, HZ
/4); /* 1/4 second */
2376 case TCSBRKP
: /* support for POSIX tcsendbreak() */
2377 retval
= tty_check_change(tty
);
2381 /* Setup an event to indicate when the transmit buffer empties */
2382 spin_lock_irqsave(&epca_lock
, flags
);
2383 setup_empty_event(tty
,ch
);
2384 spin_unlock_irqrestore(&epca_lock
, flags
);
2385 tty_wait_until_sent(tty
, 0);
2386 digi_send_break(ch
, arg
? arg
*(HZ
/10) : HZ
/4);
2389 if (put_user(C_CLOCAL(tty
)?1:0, (unsigned long __user
*)arg
))
2396 if (get_user(value
, (unsigned __user
*)argp
))
2398 tty
->termios
->c_cflag
=
2399 ((tty
->termios
->c_cflag
& ~CLOCAL
) |
2400 (value
? CLOCAL
: 0));
2404 mflag
= pc_tiocmget(tty
, file
);
2405 if (put_user(mflag
, (unsigned long __user
*)argp
))
2409 if (get_user(mstat
, (unsigned __user
*)argp
))
2411 return pc_tiocmset(tty
, file
, mstat
, ~mstat
);
2413 spin_lock_irqsave(&epca_lock
, flags
);
2414 ch
->omodem
|= ch
->m_dtr
;
2416 fepcmd(ch
, SETMODEM
, ch
->m_dtr
, 0, 10, 1);
2418 spin_unlock_irqrestore(&epca_lock
, flags
);
2422 spin_lock_irqsave(&epca_lock
, flags
);
2423 ch
->omodem
&= ~ch
->m_dtr
;
2425 fepcmd(ch
, SETMODEM
, 0, ch
->m_dtr
, 10, 1);
2427 spin_unlock_irqrestore(&epca_lock
, flags
);
2430 if (copy_to_user(argp
, &ch
->digiext
, sizeof(digi_t
)))
2435 if (cmd
== DIGI_SETAW
) {
2436 /* Setup an event to indicate when the transmit buffer empties */
2437 spin_lock_irqsave(&epca_lock
, flags
);
2438 setup_empty_event(tty
,ch
);
2439 spin_unlock_irqrestore(&epca_lock
, flags
);
2440 tty_wait_until_sent(tty
, 0);
2442 /* ldisc lock already held in ioctl */
2443 if (tty
->ldisc
.flush_buffer
)
2444 tty
->ldisc
.flush_buffer(tty
);
2448 if (copy_from_user(&ch
->digiext
, argp
, sizeof(digi_t
)))
2451 if (ch
->digiext
.digi_flags
& DIGI_ALTPIN
) {
2452 ch
->dcd
= ch
->m_dsr
;
2453 ch
->dsr
= ch
->m_dcd
;
2455 ch
->dcd
= ch
->m_dcd
;
2456 ch
->dsr
= ch
->m_dsr
;
2459 spin_lock_irqsave(&epca_lock
, flags
);
2462 /* -----------------------------------------------------------------
2463 The below routine generally sets up parity, baud, flow control
2464 issues, etc.... It effect both control flags and input flags.
2465 ------------------------------------------------------------------- */
2469 spin_unlock_irqrestore(&epca_lock
, flags
);
2474 spin_lock_irqsave(&epca_lock
, flags
);
2476 if (cmd
== DIGI_GETFLOW
) {
2477 dflow
.startc
= readb(&bc
->startc
);
2478 dflow
.stopc
= readb(&bc
->stopc
);
2480 dflow
.startc
= readb(&bc
->startca
);
2481 dflow
.stopc
= readb(&bc
->stopca
);
2484 spin_unlock_irqrestore(&epca_lock
, flags
);
2486 if (copy_to_user(argp
, &dflow
, sizeof(dflow
)))
2492 if (cmd
== DIGI_SETFLOW
) {
2493 startc
= ch
->startc
;
2496 startc
= ch
->startca
;
2500 if (copy_from_user(&dflow
, argp
, sizeof(dflow
)))
2503 if (dflow
.startc
!= startc
|| dflow
.stopc
!= stopc
) { /* Begin if setflow toggled */
2504 spin_lock_irqsave(&epca_lock
, flags
);
2507 if (cmd
== DIGI_SETFLOW
) {
2508 ch
->fepstartc
= ch
->startc
= dflow
.startc
;
2509 ch
->fepstopc
= ch
->stopc
= dflow
.stopc
;
2510 fepcmd(ch
, SONOFFC
, ch
->fepstartc
, ch
->fepstopc
, 0, 1);
2512 ch
->fepstartca
= ch
->startca
= dflow
.startc
;
2513 ch
->fepstopca
= ch
->stopca
= dflow
.stopc
;
2514 fepcmd(ch
, SAUXONOFFC
, ch
->fepstartca
, ch
->fepstopca
, 0, 1);
2517 if (ch
->statusflags
& TXSTOPPED
)
2521 spin_unlock_irqrestore(&epca_lock
, flags
);
2522 } /* End if setflow toggled */
2525 return -ENOIOCTLCMD
;
2526 } /* End switch cmd */
2528 } /* End pc_ioctl */
2530 /* --------------------- Begin pc_set_termios ----------------------- */
2532 static void pc_set_termios(struct tty_struct
*tty
, struct ktermios
*old_termios
)
2533 { /* Begin pc_set_termios */
2536 unsigned long flags
;
2537 /* ---------------------------------------------------------
2538 verifyChannel returns the channel from the tty struct
2539 if it is valid. This serves as a sanity check.
2540 ------------------------------------------------------------- */
2541 if ((ch
= verifyChannel(tty
)) != NULL
) { /* Begin if channel valid */
2542 spin_lock_irqsave(&epca_lock
, flags
);
2546 spin_unlock_irqrestore(&epca_lock
, flags
);
2548 if ((old_termios
->c_cflag
& CRTSCTS
) &&
2549 ((tty
->termios
->c_cflag
& CRTSCTS
) == 0))
2550 tty
->hw_stopped
= 0;
2552 if (!(old_termios
->c_cflag
& CLOCAL
) &&
2553 (tty
->termios
->c_cflag
& CLOCAL
))
2554 wake_up_interruptible(&ch
->open_wait
);
2556 } /* End if channel valid */
2558 } /* End pc_set_termios */
2560 /* --------------------- Begin do_softint ----------------------- */
2562 static void do_softint(struct work_struct
*work
)
2563 { /* Begin do_softint */
2564 struct channel
*ch
= container_of(work
, struct channel
, tqueue
);
2565 /* Called in response to a modem change event */
2566 if (ch
&& ch
->magic
== EPCA_MAGIC
) { /* Begin EPCA_MAGIC */
2567 struct tty_struct
*tty
= ch
->tty
;
2569 if (tty
&& tty
->driver_data
) {
2570 if (test_and_clear_bit(EPCA_EVENT_HANGUP
, &ch
->event
)) { /* Begin if clear_bit */
2571 tty_hangup(tty
); /* FIXME: module removal race here - AKPM */
2572 wake_up_interruptible(&ch
->open_wait
);
2573 ch
->asyncflags
&= ~ASYNC_NORMAL_ACTIVE
;
2574 } /* End if clear_bit */
2576 } /* End EPCA_MAGIC */
2577 } /* End do_softint */
2579 /* ------------------------------------------------------------
2580 pc_stop and pc_start provide software flow control to the
2581 routine and the pc_ioctl routine.
2582 ---------------------------------------------------------------- */
2584 /* --------------------- Begin pc_stop ----------------------- */
2586 static void pc_stop(struct tty_struct
*tty
)
2587 { /* Begin pc_stop */
2590 unsigned long flags
;
2591 /* ---------------------------------------------------------
2592 verifyChannel returns the channel from the tty struct
2593 if it is valid. This serves as a sanity check.
2594 ------------------------------------------------------------- */
2595 if ((ch
= verifyChannel(tty
)) != NULL
) { /* Begin if valid channel */
2596 spin_lock_irqsave(&epca_lock
, flags
);
2597 if ((ch
->statusflags
& TXSTOPPED
) == 0) { /* Begin if transmit stop requested */
2599 /* STOP transmitting now !! */
2600 fepcmd(ch
, PAUSETX
, 0, 0, 0, 0);
2601 ch
->statusflags
|= TXSTOPPED
;
2603 } /* End if transmit stop requested */
2604 spin_unlock_irqrestore(&epca_lock
, flags
);
2605 } /* End if valid channel */
2608 /* --------------------- Begin pc_start ----------------------- */
2610 static void pc_start(struct tty_struct
*tty
)
2611 { /* Begin pc_start */
2613 /* ---------------------------------------------------------
2614 verifyChannel returns the channel from the tty struct
2615 if it is valid. This serves as a sanity check.
2616 ------------------------------------------------------------- */
2617 if ((ch
= verifyChannel(tty
)) != NULL
) { /* Begin if channel valid */
2618 unsigned long flags
;
2619 spin_lock_irqsave(&epca_lock
, flags
);
2620 /* Just in case output was resumed because of a change in Digi-flow */
2621 if (ch
->statusflags
& TXSTOPPED
) { /* Begin transmit resume requested */
2622 struct board_chan __iomem
*bc
;
2625 if (ch
->statusflags
& LOWWAIT
)
2626 writeb(1, &bc
->ilow
);
2627 /* Okay, you can start transmitting again... */
2628 fepcmd(ch
, RESUMETX
, 0, 0, 0, 0);
2629 ch
->statusflags
&= ~TXSTOPPED
;
2631 } /* End transmit resume requested */
2632 spin_unlock_irqrestore(&epca_lock
, flags
);
2633 } /* End if channel valid */
2634 } /* End pc_start */
2636 /* ------------------------------------------------------------------
2637 The below routines pc_throttle and pc_unthrottle are used
2638 to slow (And resume) the receipt of data into the kernels
2639 receive buffers. The exact occurrence of this depends on the
2640 size of the kernels receive buffer and what the 'watermarks'
2641 are set to for that buffer. See the n_ttys.c file for more
2643 ______________________________________________________________________ */
2644 /* --------------------- Begin throttle ----------------------- */
2646 static void pc_throttle(struct tty_struct
* tty
)
2647 { /* Begin pc_throttle */
2649 unsigned long flags
;
2650 /* ---------------------------------------------------------
2651 verifyChannel returns the channel from the tty struct
2652 if it is valid. This serves as a sanity check.
2653 ------------------------------------------------------------- */
2654 if ((ch
= verifyChannel(tty
)) != NULL
) { /* Begin if channel valid */
2655 spin_lock_irqsave(&epca_lock
, flags
);
2656 if ((ch
->statusflags
& RXSTOPPED
) == 0) {
2658 fepcmd(ch
, PAUSERX
, 0, 0, 0, 0);
2659 ch
->statusflags
|= RXSTOPPED
;
2662 spin_unlock_irqrestore(&epca_lock
, flags
);
2663 } /* End if channel valid */
2664 } /* End pc_throttle */
2666 /* --------------------- Begin unthrottle ----------------------- */
2668 static void pc_unthrottle(struct tty_struct
*tty
)
2669 { /* Begin pc_unthrottle */
2671 unsigned long flags
;
2672 /* ---------------------------------------------------------
2673 verifyChannel returns the channel from the tty struct
2674 if it is valid. This serves as a sanity check.
2675 ------------------------------------------------------------- */
2676 if ((ch
= verifyChannel(tty
)) != NULL
) { /* Begin if channel valid */
2677 /* Just in case output was resumed because of a change in Digi-flow */
2678 spin_lock_irqsave(&epca_lock
, flags
);
2679 if (ch
->statusflags
& RXSTOPPED
) {
2681 fepcmd(ch
, RESUMERX
, 0, 0, 0, 0);
2682 ch
->statusflags
&= ~RXSTOPPED
;
2685 spin_unlock_irqrestore(&epca_lock
, flags
);
2686 } /* End if channel valid */
2687 } /* End pc_unthrottle */
2689 /* --------------------- Begin digi_send_break ----------------------- */
2691 void digi_send_break(struct channel
*ch
, int msec
)
2692 { /* Begin digi_send_break */
2693 unsigned long flags
;
2695 spin_lock_irqsave(&epca_lock
, flags
);
2697 /* --------------------------------------------------------------------
2698 Maybe I should send an infinite break here, schedule() for
2699 msec amount of time, and then stop the break. This way,
2700 the user can't screw up the FEP by causing digi_send_break()
2701 to be called (i.e. via an ioctl()) more than once in msec amount
2702 of time. Try this for now...
2703 ------------------------------------------------------------------------ */
2704 fepcmd(ch
, SENDBREAK
, msec
, 0, 10, 0);
2706 spin_unlock_irqrestore(&epca_lock
, flags
);
2707 } /* End digi_send_break */
2709 /* --------------------- Begin setup_empty_event ----------------------- */
2711 /* Caller MUST hold the lock */
2713 static void setup_empty_event(struct tty_struct
*tty
, struct channel
*ch
)
2714 { /* Begin setup_empty_event */
2716 struct board_chan __iomem
*bc
= ch
->brdchan
;
2719 ch
->statusflags
|= EMPTYWAIT
;
2720 /* ------------------------------------------------------------------
2721 When set the iempty flag request a event to be generated when the
2722 transmit buffer is empty (If there is no BREAK in progress).
2723 --------------------------------------------------------------------- */
2724 writeb(1, &bc
->iempty
);
2726 } /* End setup_empty_event */
2728 /* ---------------------- Begin epca_setup -------------------------- */
2729 void epca_setup(char *str
, int *ints
)
2730 { /* Begin epca_setup */
2731 struct board_info board
;
2732 int index
, loop
, last
;
2736 /* ----------------------------------------------------------------------
2737 If this routine looks a little strange it is because it is only called
2738 if a LILO append command is given to boot the kernel with parameters.
2739 In this way, we can provide the user a method of changing his board
2740 configuration without rebuilding the kernel.
2741 ----------------------------------------------------------------------- */
2745 memset(&board
, 0, sizeof(board
));
2747 /* Assume the data is int first, later we can change it */
2748 /* I think that array position 0 of ints holds the number of args */
2749 for (last
= 0, index
= 1; index
<= ints
[0]; index
++)
2751 { /* Begin parse switch */
2753 board
.status
= ints
[index
];
2754 /* ---------------------------------------------------------
2755 We check for 2 (As opposed to 1; because 2 is a flag
2756 instructing the driver to ignore epcaconfig.) For this
2757 reason we check for 2.
2758 ------------------------------------------------------------ */
2759 if (board
.status
== 2) { /* Begin ignore epcaconfig as well as lilo cmd line */
2763 } /* End ignore epcaconfig as well as lilo cmd line */
2765 if (board
.status
> 2) {
2766 printk(KERN_ERR
"epca_setup: Invalid board status 0x%x\n", board
.status
);
2767 invalid_lilo_config
= 1;
2768 setup_error_code
|= INVALID_BOARD_STATUS
;
2774 board
.type
= ints
[index
];
2775 if (board
.type
>= PCIXEM
) {
2776 printk(KERN_ERR
"epca_setup: Invalid board type 0x%x\n", board
.type
);
2777 invalid_lilo_config
= 1;
2778 setup_error_code
|= INVALID_BOARD_TYPE
;
2784 board
.altpin
= ints
[index
];
2785 if (board
.altpin
> 1) {
2786 printk(KERN_ERR
"epca_setup: Invalid board altpin 0x%x\n", board
.altpin
);
2787 invalid_lilo_config
= 1;
2788 setup_error_code
|= INVALID_ALTPIN
;
2795 board
.numports
= ints
[index
];
2796 if (board
.numports
< 2 || board
.numports
> 256) {
2797 printk(KERN_ERR
"epca_setup: Invalid board numports 0x%x\n", board
.numports
);
2798 invalid_lilo_config
= 1;
2799 setup_error_code
|= INVALID_NUM_PORTS
;
2802 nbdevs
+= board
.numports
;
2807 board
.port
= ints
[index
];
2808 if (ints
[index
] <= 0) {
2809 printk(KERN_ERR
"epca_setup: Invalid io port 0x%x\n", (unsigned int)board
.port
);
2810 invalid_lilo_config
= 1;
2811 setup_error_code
|= INVALID_PORT_BASE
;
2818 board
.membase
= ints
[index
];
2819 if (ints
[index
] <= 0) {
2820 printk(KERN_ERR
"epca_setup: Invalid memory base 0x%x\n",(unsigned int)board
.membase
);
2821 invalid_lilo_config
= 1;
2822 setup_error_code
|= INVALID_MEM_BASE
;
2829 printk(KERN_ERR
"<Error> - epca_setup: Too many integer parms\n");
2832 } /* End parse switch */
2834 while (str
&& *str
) { /* Begin while there is a string arg */
2835 /* find the next comma or terminator */
2837 /* While string is not null, and a comma hasn't been found */
2838 while (*temp
&& (*temp
!= ','))
2844 /* Set index to the number of args + 1 */
2851 if (strncmp("Disable", str
, len
) == 0)
2853 else if (strncmp("Enable", str
, len
) == 0)
2856 printk(KERN_ERR
"epca_setup: Invalid status %s\n", str
);
2857 invalid_lilo_config
= 1;
2858 setup_error_code
|= INVALID_BOARD_STATUS
;
2865 for(loop
= 0; loop
< EPCA_NUM_TYPES
; loop
++)
2866 if (strcmp(board_desc
[loop
], str
) == 0)
2868 /* ---------------------------------------------------------------
2869 If the index incremented above refers to a legitamate board
2871 ------------------------------------------------------------------*/
2872 if (index
< EPCA_NUM_TYPES
)
2875 printk(KERN_ERR
"epca_setup: Invalid board type: %s\n", str
);
2876 invalid_lilo_config
= 1;
2877 setup_error_code
|= INVALID_BOARD_TYPE
;
2885 if (strncmp("Disable", str
, len
) == 0)
2887 else if (strncmp("Enable", str
, len
) == 0)
2890 printk(KERN_ERR
"epca_setup: Invalid altpin %s\n", str
);
2891 invalid_lilo_config
= 1;
2892 setup_error_code
|= INVALID_ALTPIN
;
2900 while (isdigit(*t2
))
2904 printk(KERN_ERR
"epca_setup: Invalid port count %s\n", str
);
2905 invalid_lilo_config
= 1;
2906 setup_error_code
|= INVALID_NUM_PORTS
;
2910 /* ------------------------------------------------------------
2911 There is not a man page for simple_strtoul but the code can be
2912 found in vsprintf.c. The first argument is the string to
2913 translate (To an unsigned long obviously), the second argument
2914 can be the address of any character variable or a NULL. If a
2915 variable is given, the end pointer of the string will be stored
2916 in that variable; if a NULL is given the end pointer will
2917 not be returned. The last argument is the base to use. If
2918 a 0 is indicated, the routine will attempt to determine the
2919 proper base by looking at the values prefix (A '0' for octal,
2920 a 'x' for hex, etc ... If a value is given it will use that
2922 ---------------------------------------------------------------- */
2923 board
.numports
= simple_strtoul(str
, NULL
, 0);
2924 nbdevs
+= board
.numports
;
2930 while (isxdigit(*t2
))
2934 printk(KERN_ERR
"epca_setup: Invalid i/o address %s\n", str
);
2935 invalid_lilo_config
= 1;
2936 setup_error_code
|= INVALID_PORT_BASE
;
2940 board
.port
= simple_strtoul(str
, NULL
, 16);
2946 while (isxdigit(*t2
))
2950 printk(KERN_ERR
"epca_setup: Invalid memory base %s\n",str
);
2951 invalid_lilo_config
= 1;
2952 setup_error_code
|= INVALID_MEM_BASE
;
2955 board
.membase
= simple_strtoul(str
, NULL
, 16);
2959 printk(KERN_ERR
"epca: Too many string parms\n");
2963 } /* End while there is a string arg */
2966 printk(KERN_ERR
"epca: Insufficient parms specified\n");
2970 /* I should REALLY validate the stuff here */
2971 /* Copies our local copy of board into boards */
2972 memcpy((void *)&boards
[num_cards
],(void *)&board
, sizeof(board
));
2973 /* Does this get called once per lilo arg are what ? */
2974 printk(KERN_INFO
"PC/Xx: Added board %i, %s %i ports at 0x%4.4X base 0x%6.6X\n",
2975 num_cards
, board_desc
[board
.type
],
2976 board
.numports
, (int)board
.port
, (unsigned int) board
.membase
);
2978 } /* End epca_setup */
2981 /* ------------------------ Begin init_PCI --------------------------- */
2983 enum epic_board_types
{
2991 /* indexed directly by epic_board_types enum */
2993 unsigned char board_type
;
2994 unsigned bar_idx
; /* PCI base address region */
2995 } epca_info_tbl
[] = {
3002 static int __devinit
epca_init_one (struct pci_dev
*pdev
,
3003 const struct pci_device_id
*ent
)
3005 static int board_num
= -1;
3006 int board_idx
, info_idx
= ent
->driver_data
;
3009 if (pci_enable_device(pdev
))
3013 board_idx
= board_num
+ num_cards
;
3014 if (board_idx
>= MAXBOARDS
)
3017 addr
= pci_resource_start (pdev
, epca_info_tbl
[info_idx
].bar_idx
);
3019 printk (KERN_ERR PFX
"PCI region #%d not available (size 0)\n",
3020 epca_info_tbl
[info_idx
].bar_idx
);
3024 boards
[board_idx
].status
= ENABLED
;
3025 boards
[board_idx
].type
= epca_info_tbl
[info_idx
].board_type
;
3026 boards
[board_idx
].numports
= 0x0;
3027 boards
[board_idx
].port
= addr
+ PCI_IO_OFFSET
;
3028 boards
[board_idx
].membase
= addr
;
3030 if (!request_mem_region (addr
+ PCI_IO_OFFSET
, 0x200000, "epca")) {
3031 printk (KERN_ERR PFX
"resource 0x%x @ 0x%lx unavailable\n",
3032 0x200000, addr
+ PCI_IO_OFFSET
);
3036 boards
[board_idx
].re_map_port
= ioremap(addr
+ PCI_IO_OFFSET
, 0x200000);
3037 if (!boards
[board_idx
].re_map_port
) {
3038 printk (KERN_ERR PFX
"cannot map 0x%x @ 0x%lx\n",
3039 0x200000, addr
+ PCI_IO_OFFSET
);
3040 goto err_out_free_pciio
;
3043 if (!request_mem_region (addr
, 0x200000, "epca")) {
3044 printk (KERN_ERR PFX
"resource 0x%x @ 0x%lx unavailable\n",
3046 goto err_out_free_iounmap
;
3049 boards
[board_idx
].re_map_membase
= ioremap(addr
, 0x200000);
3050 if (!boards
[board_idx
].re_map_membase
) {
3051 printk (KERN_ERR PFX
"cannot map 0x%x @ 0x%lx\n",
3052 0x200000, addr
+ PCI_IO_OFFSET
);
3053 goto err_out_free_memregion
;
3056 /* --------------------------------------------------------------
3057 I don't know what the below does, but the hardware guys say
3058 its required on everything except PLX (In this case XRJ).
3059 ---------------------------------------------------------------- */
3060 if (info_idx
!= brd_xrj
) {
3061 pci_write_config_byte(pdev
, 0x40, 0);
3062 pci_write_config_byte(pdev
, 0x46, 0);
3067 err_out_free_memregion
:
3068 release_mem_region (addr
, 0x200000);
3069 err_out_free_iounmap
:
3070 iounmap (boards
[board_idx
].re_map_port
);
3072 release_mem_region (addr
+ PCI_IO_OFFSET
, 0x200000);
3078 static struct pci_device_id epca_pci_tbl
[] = {
3079 { PCI_VENDOR_DIGI
, PCI_DEVICE_XR
, PCI_ANY_ID
, PCI_ANY_ID
, 0, 0, brd_xr
},
3080 { PCI_VENDOR_DIGI
, PCI_DEVICE_XEM
, PCI_ANY_ID
, PCI_ANY_ID
, 0, 0, brd_xem
},
3081 { PCI_VENDOR_DIGI
, PCI_DEVICE_CX
, PCI_ANY_ID
, PCI_ANY_ID
, 0, 0, brd_cx
},
3082 { PCI_VENDOR_DIGI
, PCI_DEVICE_XRJ
, PCI_ANY_ID
, PCI_ANY_ID
, 0, 0, brd_xrj
},
3086 MODULE_DEVICE_TABLE(pci
, epca_pci_tbl
);
3088 int __init
init_PCI (void)
3089 { /* Begin init_PCI */
3090 memset (&epca_driver
, 0, sizeof (epca_driver
));
3091 epca_driver
.name
= "epca";
3092 epca_driver
.id_table
= epca_pci_tbl
;
3093 epca_driver
.probe
= epca_init_one
;
3095 return pci_register_driver(&epca_driver
);
3098 MODULE_LICENSE("GPL");