BUG_ON() Conversion in drivers/mtd/
[linux-2.6-block.git] / drivers / char / epca.c
CommitLineData
1da177e4
LT
1/*
2
3
4 Copyright (C) 1996 Digi International.
5
6 For technical support please email digiLinux@dgii.com or
7 call Digi tech support at (612) 912-3456
8
f2cf8e25
AC
9 ** This driver is no longer supported by Digi **
10
1da177e4
LT
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.
14
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.
19
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.
24
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.
28
29--------------------------------------------------------------------------- */
30/* See README.epca for change history --DAT*/
31
32
33#include <linux/config.h>
34#include <linux/module.h>
35#include <linux/kernel.h>
36#include <linux/types.h>
37#include <linux/init.h>
38#include <linux/serial.h>
39#include <linux/delay.h>
40#include <linux/ctype.h>
41#include <linux/tty.h>
42#include <linux/tty_flip.h>
43#include <linux/slab.h>
44#include <linux/ioport.h>
45#include <linux/interrupt.h>
46#include <asm/uaccess.h>
47#include <asm/io.h>
f2cf8e25 48#include <linux/spinlock.h>
1da177e4
LT
49#include <linux/pci.h>
50#include "digiPCI.h"
f2cf8e25 51
1da177e4
LT
52
53#include "digi1.h"
54#include "digiFep1.h"
55#include "epca.h"
56#include "epcaconfig.h"
57
1da177e4
LT
58/* ---------------------- Begin defines ------------------------ */
59
f2cf8e25 60#define VERSION "1.3.0.1-LK2.6"
1da177e4
LT
61
62/* This major needs to be submitted to Linux to join the majors list */
63
64#define DIGIINFOMAJOR 35 /* For Digi specific ioctl */
65
66
67#define MAXCARDS 7
68#define epcaassert(x, msg) if (!(x)) epca_error(__LINE__, msg)
69
70#define PFX "epca: "
71
72/* ----------------- Begin global definitions ------------------- */
73
1da177e4
LT
74static int nbdevs, num_cards, liloconfig;
75static int digi_poller_inhibited = 1 ;
76
77static int setup_error_code;
78static int invalid_lilo_config;
79
f2cf8e25
AC
80/* The ISA boards do window flipping into the same spaces so its only sane
81 with a single lock. It's still pretty efficient */
82
83static spinlock_t epca_lock = SPIN_LOCK_UNLOCKED;
84
1da177e4
LT
85/* -----------------------------------------------------------------------
86 MAXBOARDS is typically 12, but ISA and EISA cards are restricted to
87 7 below.
88--------------------------------------------------------------------------*/
89static struct board_info boards[MAXBOARDS];
90
91
92/* ------------- Begin structures used for driver registeration ---------- */
93
94static struct tty_driver *pc_driver;
95static struct tty_driver *pc_info;
96
97/* ------------------ Begin Digi specific structures -------------------- */
98
99/* ------------------------------------------------------------------------
100 digi_channels represents an array of structures that keep track of
101 each channel of the Digi product. Information such as transmit and
102 receive pointers, termio data, and signal definitions (DTR, CTS, etc ...)
103 are stored here. This structure is NOT used to overlay the cards
104 physical channel structure.
105-------------------------------------------------------------------------- */
106
107static struct channel digi_channels[MAX_ALLOC];
108
109/* ------------------------------------------------------------------------
110 card_ptr is an array used to hold the address of the
111 first channel structure of each card. This array will hold
112 the addresses of various channels located in digi_channels.
113-------------------------------------------------------------------------- */
114static struct channel *card_ptr[MAXCARDS];
115
116static struct timer_list epca_timer;
117
118/* ---------------------- Begin function prototypes --------------------- */
119
120/* ----------------------------------------------------------------------
121 Begin generic memory functions. These functions will be alias
122 (point at) more specific functions dependent on the board being
123 configured.
124----------------------------------------------------------------------- */
125
f2cf8e25
AC
126static void memwinon(struct board_info *b, unsigned int win);
127static void memwinoff(struct board_info *b, unsigned int win);
128static void globalwinon(struct channel *ch);
129static void rxwinon(struct channel *ch);
130static void txwinon(struct channel *ch);
131static void memoff(struct channel *ch);
132static void assertgwinon(struct channel *ch);
133static void assertmemoff(struct channel *ch);
1da177e4
LT
134
135/* ---- Begin more 'specific' memory functions for cx_like products --- */
136
f2cf8e25
AC
137static void pcxem_memwinon(struct board_info *b, unsigned int win);
138static void pcxem_memwinoff(struct board_info *b, unsigned int win);
139static void pcxem_globalwinon(struct channel *ch);
140static void pcxem_rxwinon(struct channel *ch);
141static void pcxem_txwinon(struct channel *ch);
142static void pcxem_memoff(struct channel *ch);
1da177e4
LT
143
144/* ------ Begin more 'specific' memory functions for the pcxe ------- */
145
f2cf8e25
AC
146static void pcxe_memwinon(struct board_info *b, unsigned int win);
147static void pcxe_memwinoff(struct board_info *b, unsigned int win);
148static void pcxe_globalwinon(struct channel *ch);
149static void pcxe_rxwinon(struct channel *ch);
150static void pcxe_txwinon(struct channel *ch);
151static void pcxe_memoff(struct channel *ch);
1da177e4
LT
152
153/* ---- Begin more 'specific' memory functions for the pc64xe and pcxi ---- */
154/* Note : pc64xe and pcxi share the same windowing routines */
155
f2cf8e25
AC
156static void pcxi_memwinon(struct board_info *b, unsigned int win);
157static void pcxi_memwinoff(struct board_info *b, unsigned int win);
158static void pcxi_globalwinon(struct channel *ch);
159static void pcxi_rxwinon(struct channel *ch);
160static void pcxi_txwinon(struct channel *ch);
161static void pcxi_memoff(struct channel *ch);
1da177e4
LT
162
163/* - Begin 'specific' do nothing memory functions needed for some cards - */
164
f2cf8e25
AC
165static void dummy_memwinon(struct board_info *b, unsigned int win);
166static void dummy_memwinoff(struct board_info *b, unsigned int win);
167static void dummy_globalwinon(struct channel *ch);
168static void dummy_rxwinon(struct channel *ch);
169static void dummy_txwinon(struct channel *ch);
170static void dummy_memoff(struct channel *ch);
171static void dummy_assertgwinon(struct channel *ch);
172static void dummy_assertmemoff(struct channel *ch);
1da177e4
LT
173
174/* ------------------- Begin declare functions ----------------------- */
175
f2cf8e25
AC
176static struct channel *verifyChannel(struct tty_struct *);
177static void pc_sched_event(struct channel *, int);
1da177e4
LT
178static void epca_error(int, char *);
179static void pc_close(struct tty_struct *, struct file *);
180static void shutdown(struct channel *);
181static void pc_hangup(struct tty_struct *);
182static void pc_put_char(struct tty_struct *, unsigned char);
183static int pc_write_room(struct tty_struct *);
184static int pc_chars_in_buffer(struct tty_struct *);
185static void pc_flush_buffer(struct tty_struct *);
186static void pc_flush_chars(struct tty_struct *);
187static int block_til_ready(struct tty_struct *, struct file *,
188 struct channel *);
189static int pc_open(struct tty_struct *, struct file *);
190static void post_fep_init(unsigned int crd);
191static void epcapoll(unsigned long);
192static void doevent(int);
193static void fepcmd(struct channel *, int, int, int, int, int);
194static unsigned termios2digi_h(struct channel *ch, unsigned);
195static unsigned termios2digi_i(struct channel *ch, unsigned);
196static unsigned termios2digi_c(struct channel *ch, unsigned);
197static void epcaparam(struct tty_struct *, struct channel *);
198static void receive_data(struct channel *);
199static int pc_ioctl(struct tty_struct *, struct file *,
200 unsigned int, unsigned long);
201static int info_ioctl(struct tty_struct *, struct file *,
202 unsigned int, unsigned long);
203static void pc_set_termios(struct tty_struct *, struct termios *);
204static void do_softint(void *);
205static void pc_stop(struct tty_struct *);
206static void pc_start(struct tty_struct *);
207static void pc_throttle(struct tty_struct * tty);
208static void pc_unthrottle(struct tty_struct *tty);
209static void digi_send_break(struct channel *ch, int msec);
210static void setup_empty_event(struct tty_struct *tty, struct channel *ch);
211void epca_setup(char *, int *);
1da177e4
LT
212
213static int get_termio(struct tty_struct *, struct termio __user *);
214static int pc_write(struct tty_struct *, const unsigned char *, int);
f2cf8e25 215static int pc_init(void);
1da177e4 216static int init_PCI(void);
1da177e4
LT
217
218
219/* ------------------------------------------------------------------
220 Table of functions for each board to handle memory. Mantaining
221 parallelism is a *very* good idea here. The idea is for the
222 runtime code to blindly call these functions, not knowing/caring
223 about the underlying hardware. This stuff should contain no
224 conditionals; if more functionality is needed a different entry
225 should be established. These calls are the interface calls and
226 are the only functions that should be accessed. Anyone caught
227 making direct calls deserves what they get.
228-------------------------------------------------------------------- */
229
f2cf8e25 230static void memwinon(struct board_info *b, unsigned int win)
1da177e4
LT
231{
232 (b->memwinon)(b, win);
233}
234
f2cf8e25 235static void memwinoff(struct board_info *b, unsigned int win)
1da177e4
LT
236{
237 (b->memwinoff)(b, win);
238}
239
f2cf8e25 240static void globalwinon(struct channel *ch)
1da177e4
LT
241{
242 (ch->board->globalwinon)(ch);
243}
244
f2cf8e25 245static void rxwinon(struct channel *ch)
1da177e4
LT
246{
247 (ch->board->rxwinon)(ch);
248}
249
f2cf8e25 250static void txwinon(struct channel *ch)
1da177e4
LT
251{
252 (ch->board->txwinon)(ch);
253}
254
f2cf8e25 255static void memoff(struct channel *ch)
1da177e4
LT
256{
257 (ch->board->memoff)(ch);
258}
f2cf8e25 259static void assertgwinon(struct channel *ch)
1da177e4
LT
260{
261 (ch->board->assertgwinon)(ch);
262}
263
f2cf8e25 264static void assertmemoff(struct channel *ch)
1da177e4
LT
265{
266 (ch->board->assertmemoff)(ch);
267}
268
269/* ---------------------------------------------------------
270 PCXEM windowing is the same as that used in the PCXR
271 and CX series cards.
272------------------------------------------------------------ */
273
f2cf8e25 274static void pcxem_memwinon(struct board_info *b, unsigned int win)
1da177e4 275{
f2cf8e25 276 outb_p(FEPWIN|win, b->port + 1);
1da177e4
LT
277}
278
f2cf8e25 279static void pcxem_memwinoff(struct board_info *b, unsigned int win)
1da177e4 280{
f2cf8e25 281 outb_p(0, b->port + 1);
1da177e4
LT
282}
283
f2cf8e25 284static void pcxem_globalwinon(struct channel *ch)
1da177e4
LT
285{
286 outb_p( FEPWIN, (int)ch->board->port + 1);
287}
288
f2cf8e25 289static void pcxem_rxwinon(struct channel *ch)
1da177e4
LT
290{
291 outb_p(ch->rxwin, (int)ch->board->port + 1);
292}
293
f2cf8e25 294static void pcxem_txwinon(struct channel *ch)
1da177e4
LT
295{
296 outb_p(ch->txwin, (int)ch->board->port + 1);
297}
298
f2cf8e25 299static void pcxem_memoff(struct channel *ch)
1da177e4
LT
300{
301 outb_p(0, (int)ch->board->port + 1);
302}
303
304/* ----------------- Begin pcxe memory window stuff ------------------ */
305
f2cf8e25 306static void pcxe_memwinon(struct board_info *b, unsigned int win)
1da177e4 307{
f2cf8e25 308 outb_p(FEPWIN | win, b->port + 1);
1da177e4
LT
309}
310
f2cf8e25 311static void pcxe_memwinoff(struct board_info *b, unsigned int win)
1da177e4 312{
f2cf8e25
AC
313 outb_p(inb(b->port) & ~FEPMEM,
314 b->port + 1);
315 outb_p(0, b->port + 1);
1da177e4
LT
316}
317
f2cf8e25 318static void pcxe_globalwinon(struct channel *ch)
1da177e4
LT
319{
320 outb_p( FEPWIN, (int)ch->board->port + 1);
321}
322
f2cf8e25 323static void pcxe_rxwinon(struct channel *ch)
1da177e4
LT
324{
325 outb_p(ch->rxwin, (int)ch->board->port + 1);
326}
327
f2cf8e25 328static void pcxe_txwinon(struct channel *ch)
1da177e4
LT
329{
330 outb_p(ch->txwin, (int)ch->board->port + 1);
331}
332
f2cf8e25 333static void pcxe_memoff(struct channel *ch)
1da177e4
LT
334{
335 outb_p(0, (int)ch->board->port);
336 outb_p(0, (int)ch->board->port + 1);
337}
338
339/* ------------- Begin pc64xe and pcxi memory window stuff -------------- */
340
f2cf8e25 341static void pcxi_memwinon(struct board_info *b, unsigned int win)
1da177e4 342{
f2cf8e25 343 outb_p(inb(b->port) | FEPMEM, b->port);
1da177e4
LT
344}
345
f2cf8e25 346static void pcxi_memwinoff(struct board_info *b, unsigned int win)
1da177e4 347{
f2cf8e25 348 outb_p(inb(b->port) & ~FEPMEM, b->port);
1da177e4
LT
349}
350
f2cf8e25 351static void pcxi_globalwinon(struct channel *ch)
1da177e4 352{
f2cf8e25 353 outb_p(FEPMEM, ch->board->port);
1da177e4
LT
354}
355
f2cf8e25 356static void pcxi_rxwinon(struct channel *ch)
1da177e4 357{
f2cf8e25 358 outb_p(FEPMEM, ch->board->port);
1da177e4
LT
359}
360
f2cf8e25 361static void pcxi_txwinon(struct channel *ch)
1da177e4 362{
f2cf8e25 363 outb_p(FEPMEM, ch->board->port);
1da177e4
LT
364}
365
f2cf8e25 366static void pcxi_memoff(struct channel *ch)
1da177e4 367{
f2cf8e25 368 outb_p(0, ch->board->port);
1da177e4
LT
369}
370
f2cf8e25 371static void pcxi_assertgwinon(struct channel *ch)
1da177e4 372{
f2cf8e25 373 epcaassert(inb(ch->board->port) & FEPMEM, "Global memory off");
1da177e4
LT
374}
375
f2cf8e25 376static void pcxi_assertmemoff(struct channel *ch)
1da177e4 377{
f2cf8e25 378 epcaassert(!(inb(ch->board->port) & FEPMEM), "Memory on");
1da177e4
LT
379}
380
381
382/* ----------------------------------------------------------------------
383 Not all of the cards need specific memory windowing routines. Some
384 cards (Such as PCI) needs no windowing routines at all. We provide
385 these do nothing routines so that the same code base can be used.
386 The driver will ALWAYS call a windowing routine if it thinks it needs
387 to; regardless of the card. However, dependent on the card the routine
388 may or may not do anything.
389---------------------------------------------------------------------------*/
390
f2cf8e25 391static void dummy_memwinon(struct board_info *b, unsigned int win)
1da177e4
LT
392{
393}
394
f2cf8e25 395static void dummy_memwinoff(struct board_info *b, unsigned int win)
1da177e4
LT
396{
397}
398
f2cf8e25 399static void dummy_globalwinon(struct channel *ch)
1da177e4
LT
400{
401}
402
f2cf8e25 403static void dummy_rxwinon(struct channel *ch)
1da177e4
LT
404{
405}
406
f2cf8e25 407static void dummy_txwinon(struct channel *ch)
1da177e4
LT
408{
409}
410
f2cf8e25 411static void dummy_memoff(struct channel *ch)
1da177e4
LT
412{
413}
414
f2cf8e25 415static void dummy_assertgwinon(struct channel *ch)
1da177e4
LT
416{
417}
418
f2cf8e25 419static void dummy_assertmemoff(struct channel *ch)
1da177e4
LT
420{
421}
422
423/* ----------------- Begin verifyChannel function ----------------------- */
f2cf8e25 424static struct channel *verifyChannel(struct tty_struct *tty)
1da177e4 425{ /* Begin verifyChannel */
1da177e4
LT
426 /* --------------------------------------------------------------------
427 This routine basically provides a sanity check. It insures that
428 the channel returned is within the proper range of addresses as
429 well as properly initialized. If some bogus info gets passed in
430 through tty->driver_data this should catch it.
f2cf8e25
AC
431 --------------------------------------------------------------------- */
432 if (tty) {
433 struct channel *ch = (struct channel *)tty->driver_data;
434 if ((ch >= &digi_channels[0]) && (ch < &digi_channels[nbdevs])) {
1da177e4
LT
435 if (ch->magic == EPCA_MAGIC)
436 return ch;
437 }
f2cf8e25 438 }
1da177e4
LT
439 return NULL;
440
441} /* End verifyChannel */
442
443/* ------------------ Begin pc_sched_event ------------------------- */
444
f2cf8e25
AC
445static void pc_sched_event(struct channel *ch, int event)
446{
1da177e4
LT
447 /* ----------------------------------------------------------------------
448 We call this to schedule interrupt processing on some event. The
449 kernel sees our request and calls the related routine in OUR driver.
450 -------------------------------------------------------------------------*/
1da177e4
LT
451 ch->event |= 1 << event;
452 schedule_work(&ch->tqueue);
1da177e4
LT
453} /* End pc_sched_event */
454
455/* ------------------ Begin epca_error ------------------------- */
456
457static void epca_error(int line, char *msg)
f2cf8e25 458{
1da177e4 459 printk(KERN_ERR "epca_error (Digi): line = %d %s\n",line,msg);
f2cf8e25 460}
1da177e4
LT
461
462/* ------------------ Begin pc_close ------------------------- */
463static void pc_close(struct tty_struct * tty, struct file * filp)
f2cf8e25 464{
1da177e4
LT
465 struct channel *ch;
466 unsigned long flags;
1da177e4
LT
467 /* ---------------------------------------------------------
468 verifyChannel returns the channel from the tty struct
469 if it is valid. This serves as a sanity check.
470 ------------------------------------------------------------- */
f2cf8e25
AC
471 if ((ch = verifyChannel(tty)) != NULL) { /* Begin if ch != NULL */
472 spin_lock_irqsave(&epca_lock, flags);
473 if (tty_hung_up_p(filp)) {
474 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
475 return;
476 }
1da177e4 477 /* Check to see if the channel is open more than once */
f2cf8e25
AC
478 if (ch->count-- > 1) {
479 /* Begin channel is open more than once */
1da177e4
LT
480 /* -------------------------------------------------------------
481 Return without doing anything. Someone might still be using
482 the channel.
483 ---------------------------------------------------------------- */
f2cf8e25 484 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
485 return;
486 } /* End channel is open more than once */
487
488 /* Port open only once go ahead with shutdown & reset */
f2cf8e25
AC
489 if (ch->count < 0)
490 BUG();
1da177e4
LT
491
492 /* ---------------------------------------------------------------
493 Let the rest of the driver know the channel is being closed.
494 This becomes important if an open is attempted before close
495 is finished.
496 ------------------------------------------------------------------ */
1da177e4 497 ch->asyncflags |= ASYNC_CLOSING;
1da177e4
LT
498 tty->closing = 1;
499
f2cf8e25
AC
500 spin_unlock_irqrestore(&epca_lock, flags);
501
502 if (ch->asyncflags & ASYNC_INITIALIZED) {
1da177e4
LT
503 /* Setup an event to indicate when the transmit buffer empties */
504 setup_empty_event(tty, ch);
505 tty_wait_until_sent(tty, 3000); /* 30 seconds timeout */
506 }
1da177e4
LT
507 if (tty->driver->flush_buffer)
508 tty->driver->flush_buffer(tty);
509
510 tty_ldisc_flush(tty);
511 shutdown(ch);
f2cf8e25
AC
512
513 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
514 tty->closing = 0;
515 ch->event = 0;
516 ch->tty = NULL;
f2cf8e25 517 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 518
f2cf8e25 519 if (ch->blocked_open) { /* Begin if blocked_open */
1da177e4 520 if (ch->close_delay)
1da177e4 521 msleep_interruptible(jiffies_to_msecs(ch->close_delay));
1da177e4 522 wake_up_interruptible(&ch->open_wait);
1da177e4 523 } /* End if blocked_open */
1da177e4
LT
524 ch->asyncflags &= ~(ASYNC_NORMAL_ACTIVE | ASYNC_INITIALIZED |
525 ASYNC_CLOSING);
526 wake_up_interruptible(&ch->close_wait);
1da177e4 527 } /* End if ch != NULL */
1da177e4
LT
528} /* End pc_close */
529
530/* ------------------ Begin shutdown ------------------------- */
531
532static void shutdown(struct channel *ch)
533{ /* Begin shutdown */
534
535 unsigned long flags;
536 struct tty_struct *tty;
bc9a5154 537 struct board_chan __iomem *bc;
1da177e4
LT
538
539 if (!(ch->asyncflags & ASYNC_INITIALIZED))
540 return;
541
f2cf8e25 542 spin_lock_irqsave(&epca_lock, flags);
1da177e4 543
f2cf8e25 544 globalwinon(ch);
1da177e4
LT
545 bc = ch->brdchan;
546
547 /* ------------------------------------------------------------------
548 In order for an event to be generated on the receipt of data the
549 idata flag must be set. Since we are shutting down, this is not
550 necessary clear this flag.
551 --------------------------------------------------------------------- */
552
553 if (bc)
f2cf8e25 554 writeb(0, &bc->idata);
1da177e4
LT
555 tty = ch->tty;
556
557 /* ----------------------------------------------------------------
558 If we're a modem control device and HUPCL is on, drop RTS & DTR.
559 ------------------------------------------------------------------ */
560
f2cf8e25 561 if (tty->termios->c_cflag & HUPCL) {
1da177e4
LT
562 ch->omodem &= ~(ch->m_rts | ch->m_dtr);
563 fepcmd(ch, SETMODEM, 0, ch->m_dtr | ch->m_rts, 10, 1);
564 }
1da177e4
LT
565 memoff(ch);
566
567 /* ------------------------------------------------------------------
568 The channel has officialy been closed. The next time it is opened
569 it will have to reinitialized. Set a flag to indicate this.
570 ---------------------------------------------------------------------- */
571
572 /* Prevent future Digi programmed interrupts from coming active */
573
574 ch->asyncflags &= ~ASYNC_INITIALIZED;
f2cf8e25 575 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
576
577} /* End shutdown */
578
579/* ------------------ Begin pc_hangup ------------------------- */
580
581static void pc_hangup(struct tty_struct *tty)
582{ /* Begin pc_hangup */
1da177e4
LT
583 struct channel *ch;
584
585 /* ---------------------------------------------------------
586 verifyChannel returns the channel from the tty struct
587 if it is valid. This serves as a sanity check.
588 ------------------------------------------------------------- */
589
f2cf8e25 590 if ((ch = verifyChannel(tty)) != NULL) { /* Begin if ch != NULL */
1da177e4
LT
591 unsigned long flags;
592
1da177e4
LT
593 if (tty->driver->flush_buffer)
594 tty->driver->flush_buffer(tty);
595 tty_ldisc_flush(tty);
596 shutdown(ch);
597
f2cf8e25 598 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
599 ch->tty = NULL;
600 ch->event = 0;
601 ch->count = 0;
1da177e4 602 ch->asyncflags &= ~(ASYNC_NORMAL_ACTIVE | ASYNC_INITIALIZED);
f2cf8e25 603 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 604 wake_up_interruptible(&ch->open_wait);
1da177e4
LT
605 } /* End if ch != NULL */
606
607} /* End pc_hangup */
608
609/* ------------------ Begin pc_write ------------------------- */
610
611static int pc_write(struct tty_struct * tty,
612 const unsigned char *buf, int bytesAvailable)
613{ /* Begin pc_write */
f2cf8e25
AC
614 unsigned int head, tail;
615 int dataLen;
616 int size;
617 int amountCopied;
1da177e4
LT
618 struct channel *ch;
619 unsigned long flags;
620 int remain;
bc9a5154 621 struct board_chan __iomem *bc;
1da177e4
LT
622
623 /* ----------------------------------------------------------------
624 pc_write is primarily called directly by the kernel routine
625 tty_write (Though it can also be called by put_char) found in
626 tty_io.c. pc_write is passed a line discipline buffer where
627 the data to be written out is stored. The line discipline
628 implementation itself is done at the kernel level and is not
629 brought into the driver.
630 ------------------------------------------------------------------- */
631
632 /* ---------------------------------------------------------
633 verifyChannel returns the channel from the tty struct
634 if it is valid. This serves as a sanity check.
635 ------------------------------------------------------------- */
636
637 if ((ch = verifyChannel(tty)) == NULL)
638 return 0;
639
640 /* Make a pointer to the channel data structure found on the board. */
641
642 bc = ch->brdchan;
643 size = ch->txbufsize;
1da177e4 644 amountCopied = 0;
1da177e4 645
f2cf8e25 646 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
647 globalwinon(ch);
648
f2cf8e25
AC
649 head = readw(&bc->tin) & (size - 1);
650 tail = readw(&bc->tout);
1da177e4 651
f2cf8e25
AC
652 if (tail != readw(&bc->tout))
653 tail = readw(&bc->tout);
1da177e4
LT
654 tail &= (size - 1);
655
656 /* If head >= tail, head has not wrapped around. */
f2cf8e25 657 if (head >= tail) { /* Begin head has not wrapped */
1da177e4
LT
658 /* ---------------------------------------------------------------
659 remain (much like dataLen above) represents the total amount of
660 space available on the card for data. Here dataLen represents
661 the space existing between the head pointer and the end of
662 buffer. This is important because a memcpy cannot be told to
663 automatically wrap around when it hits the buffer end.
664 ------------------------------------------------------------------ */
1da177e4
LT
665 dataLen = size - head;
666 remain = size - (head - tail) - 1;
f2cf8e25 667 } else { /* Begin head has wrapped around */
1da177e4
LT
668
669 remain = tail - head - 1;
670 dataLen = remain;
671
672 } /* End head has wrapped around */
1da177e4
LT
673 /* -------------------------------------------------------------------
674 Check the space on the card. If we have more data than
675 space; reduce the amount of data to fit the space.
676 ---------------------------------------------------------------------- */
1da177e4 677 bytesAvailable = min(remain, bytesAvailable);
1da177e4
LT
678 txwinon(ch);
679 while (bytesAvailable > 0)
680 { /* Begin while there is data to copy onto card */
681
682 /* -----------------------------------------------------------------
683 If head is not wrapped, the below will make sure the first
684 data copy fills to the end of card buffer.
685 ------------------------------------------------------------------- */
686
687 dataLen = min(bytesAvailable, dataLen);
bc9a5154 688 memcpy_toio(ch->txptr + head, buf, dataLen);
1da177e4
LT
689 buf += dataLen;
690 head += dataLen;
691 amountCopied += dataLen;
692 bytesAvailable -= dataLen;
693
f2cf8e25 694 if (head >= size) {
1da177e4
LT
695 head = 0;
696 dataLen = tail;
697 }
1da177e4 698 } /* End while there is data to copy onto card */
1da177e4
LT
699 ch->statusflags |= TXBUSY;
700 globalwinon(ch);
f2cf8e25 701 writew(head, &bc->tin);
1da177e4 702
f2cf8e25 703 if ((ch->statusflags & LOWWAIT) == 0) {
1da177e4 704 ch->statusflags |= LOWWAIT;
f2cf8e25 705 writeb(1, &bc->ilow);
1da177e4
LT
706 }
707 memoff(ch);
f2cf8e25 708 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
709 return(amountCopied);
710
711} /* End pc_write */
712
713/* ------------------ Begin pc_put_char ------------------------- */
714
715static void pc_put_char(struct tty_struct *tty, unsigned char c)
716{ /* Begin pc_put_char */
1da177e4 717 pc_write(tty, &c, 1);
1da177e4
LT
718} /* End pc_put_char */
719
720/* ------------------ Begin pc_write_room ------------------------- */
721
722static int pc_write_room(struct tty_struct *tty)
723{ /* Begin pc_write_room */
724
725 int remain;
726 struct channel *ch;
727 unsigned long flags;
728 unsigned int head, tail;
bc9a5154 729 struct board_chan __iomem *bc;
1da177e4
LT
730
731 remain = 0;
732
733 /* ---------------------------------------------------------
734 verifyChannel returns the channel from the tty struct
735 if it is valid. This serves as a sanity check.
736 ------------------------------------------------------------- */
737
f2cf8e25
AC
738 if ((ch = verifyChannel(tty)) != NULL) {
739 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
740 globalwinon(ch);
741
742 bc = ch->brdchan;
f2cf8e25
AC
743 head = readw(&bc->tin) & (ch->txbufsize - 1);
744 tail = readw(&bc->tout);
1da177e4 745
f2cf8e25
AC
746 if (tail != readw(&bc->tout))
747 tail = readw(&bc->tout);
1da177e4
LT
748 /* Wrap tail if necessary */
749 tail &= (ch->txbufsize - 1);
750
751 if ((remain = tail - head - 1) < 0 )
752 remain += ch->txbufsize;
753
f2cf8e25 754 if (remain && (ch->statusflags & LOWWAIT) == 0) {
1da177e4 755 ch->statusflags |= LOWWAIT;
f2cf8e25 756 writeb(1, &bc->ilow);
1da177e4
LT
757 }
758 memoff(ch);
f2cf8e25 759 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 760 }
1da177e4
LT
761 /* Return how much room is left on card */
762 return remain;
763
764} /* End pc_write_room */
765
766/* ------------------ Begin pc_chars_in_buffer ---------------------- */
767
768static int pc_chars_in_buffer(struct tty_struct *tty)
769{ /* Begin pc_chars_in_buffer */
770
771 int chars;
772 unsigned int ctail, head, tail;
773 int remain;
774 unsigned long flags;
775 struct channel *ch;
bc9a5154 776 struct board_chan __iomem *bc;
1da177e4
LT
777
778 /* ---------------------------------------------------------
779 verifyChannel returns the channel from the tty struct
780 if it is valid. This serves as a sanity check.
781 ------------------------------------------------------------- */
782
783 if ((ch = verifyChannel(tty)) == NULL)
784 return(0);
785
f2cf8e25 786 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
787 globalwinon(ch);
788
789 bc = ch->brdchan;
f2cf8e25
AC
790 tail = readw(&bc->tout);
791 head = readw(&bc->tin);
792 ctail = readw(&ch->mailbox->cout);
1da177e4 793
f2cf8e25 794 if (tail == head && readw(&ch->mailbox->cin) == ctail && readb(&bc->tbusy) == 0)
1da177e4 795 chars = 0;
f2cf8e25
AC
796 else { /* Begin if some space on the card has been used */
797 head = readw(&bc->tin) & (ch->txbufsize - 1);
1da177e4 798 tail &= (ch->txbufsize - 1);
1da177e4
LT
799 /* --------------------------------------------------------------
800 The logic here is basically opposite of the above pc_write_room
801 here we are finding the amount of bytes in the buffer filled.
802 Not the amount of bytes empty.
803 ------------------------------------------------------------------- */
1da177e4
LT
804 if ((remain = tail - head - 1) < 0 )
805 remain += ch->txbufsize;
1da177e4 806 chars = (int)(ch->txbufsize - remain);
1da177e4
LT
807 /* -------------------------------------------------------------
808 Make it possible to wakeup anything waiting for output
809 in tty_ioctl.c, etc.
810
811 If not already set. Setup an event to indicate when the
812 transmit buffer empties
813 ----------------------------------------------------------------- */
1da177e4
LT
814 if (!(ch->statusflags & EMPTYWAIT))
815 setup_empty_event(tty,ch);
816
817 } /* End if some space on the card has been used */
1da177e4 818 memoff(ch);
f2cf8e25 819 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
820 /* Return number of characters residing on card. */
821 return(chars);
822
823} /* End pc_chars_in_buffer */
824
825/* ------------------ Begin pc_flush_buffer ---------------------- */
826
827static void pc_flush_buffer(struct tty_struct *tty)
828{ /* Begin pc_flush_buffer */
829
830 unsigned int tail;
831 unsigned long flags;
832 struct channel *ch;
bc9a5154 833 struct board_chan __iomem *bc;
1da177e4
LT
834 /* ---------------------------------------------------------
835 verifyChannel returns the channel from the tty struct
836 if it is valid. This serves as a sanity check.
837 ------------------------------------------------------------- */
1da177e4
LT
838 if ((ch = verifyChannel(tty)) == NULL)
839 return;
840
f2cf8e25 841 spin_lock_irqsave(&epca_lock, flags);
1da177e4 842 globalwinon(ch);
1da177e4 843 bc = ch->brdchan;
f2cf8e25 844 tail = readw(&bc->tout);
1da177e4 845 /* Have FEP move tout pointer; effectively flushing transmit buffer */
1da177e4 846 fepcmd(ch, STOUT, (unsigned) tail, 0, 0, 0);
1da177e4 847 memoff(ch);
f2cf8e25 848 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
849 wake_up_interruptible(&tty->write_wait);
850 tty_wakeup(tty);
1da177e4
LT
851} /* End pc_flush_buffer */
852
853/* ------------------ Begin pc_flush_chars ---------------------- */
854
855static void pc_flush_chars(struct tty_struct *tty)
856{ /* Begin pc_flush_chars */
1da177e4 857 struct channel * ch;
1da177e4
LT
858 /* ---------------------------------------------------------
859 verifyChannel returns the channel from the tty struct
860 if it is valid. This serves as a sanity check.
861 ------------------------------------------------------------- */
f2cf8e25 862 if ((ch = verifyChannel(tty)) != NULL) {
1da177e4 863 unsigned long flags;
f2cf8e25 864 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
865 /* ----------------------------------------------------------------
866 If not already set and the transmitter is busy setup an event
867 to indicate when the transmit empties.
868 ------------------------------------------------------------------- */
1da177e4
LT
869 if ((ch->statusflags & TXBUSY) && !(ch->statusflags & EMPTYWAIT))
870 setup_empty_event(tty,ch);
f2cf8e25 871 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 872 }
1da177e4
LT
873} /* End pc_flush_chars */
874
875/* ------------------ Begin block_til_ready ---------------------- */
876
877static int block_til_ready(struct tty_struct *tty,
878 struct file *filp, struct channel *ch)
879{ /* Begin block_til_ready */
1da177e4
LT
880 DECLARE_WAITQUEUE(wait,current);
881 int retval, do_clocal = 0;
882 unsigned long flags;
883
f2cf8e25 884 if (tty_hung_up_p(filp)) {
1da177e4
LT
885 if (ch->asyncflags & ASYNC_HUP_NOTIFY)
886 retval = -EAGAIN;
887 else
888 retval = -ERESTARTSYS;
889 return(retval);
890 }
891
892 /* -----------------------------------------------------------------
893 If the device is in the middle of being closed, then block
894 until it's done, and then try again.
895 -------------------------------------------------------------------- */
f2cf8e25 896 if (ch->asyncflags & ASYNC_CLOSING) {
1da177e4
LT
897 interruptible_sleep_on(&ch->close_wait);
898
899 if (ch->asyncflags & ASYNC_HUP_NOTIFY)
900 return -EAGAIN;
901 else
902 return -ERESTARTSYS;
903 }
904
f2cf8e25 905 if (filp->f_flags & O_NONBLOCK) {
1da177e4
LT
906 /* -----------------------------------------------------------------
907 If non-blocking mode is set, then make the check up front
908 and then exit.
909 -------------------------------------------------------------------- */
1da177e4 910 ch->asyncflags |= ASYNC_NORMAL_ACTIVE;
1da177e4
LT
911 return 0;
912 }
1da177e4
LT
913 if (tty->termios->c_cflag & CLOCAL)
914 do_clocal = 1;
f2cf8e25 915 /* Block waiting for the carrier detect and the line to become free */
1da177e4
LT
916
917 retval = 0;
918 add_wait_queue(&ch->open_wait, &wait);
1da177e4 919
f2cf8e25 920 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
921 /* We dec count so that pc_close will know when to free things */
922 if (!tty_hung_up_p(filp))
923 ch->count--;
1da177e4 924 ch->blocked_open++;
1da177e4
LT
925 while(1)
926 { /* Begin forever while */
1da177e4 927 set_current_state(TASK_INTERRUPTIBLE);
1da177e4
LT
928 if (tty_hung_up_p(filp) ||
929 !(ch->asyncflags & ASYNC_INITIALIZED))
930 {
931 if (ch->asyncflags & ASYNC_HUP_NOTIFY)
932 retval = -EAGAIN;
933 else
934 retval = -ERESTARTSYS;
935 break;
936 }
1da177e4
LT
937 if (!(ch->asyncflags & ASYNC_CLOSING) &&
938 (do_clocal || (ch->imodem & ch->dcd)))
939 break;
f2cf8e25 940 if (signal_pending(current)) {
1da177e4
LT
941 retval = -ERESTARTSYS;
942 break;
943 }
f2cf8e25 944 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
945 /* ---------------------------------------------------------------
946 Allow someone else to be scheduled. We will occasionally go
947 through this loop until one of the above conditions change.
948 The below schedule call will allow other processes to enter and
949 prevent this loop from hogging the cpu.
950 ------------------------------------------------------------------ */
951 schedule();
f2cf8e25 952 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
953
954 } /* End forever while */
955
956 current->state = TASK_RUNNING;
957 remove_wait_queue(&ch->open_wait, &wait);
1da177e4
LT
958 if (!tty_hung_up_p(filp))
959 ch->count++;
1da177e4
LT
960 ch->blocked_open--;
961
f2cf8e25
AC
962 spin_unlock_irqrestore(&epca_lock, flags);
963
1da177e4
LT
964 if (retval)
965 return retval;
966
967 ch->asyncflags |= ASYNC_NORMAL_ACTIVE;
1da177e4 968 return 0;
1da177e4
LT
969} /* End block_til_ready */
970
971/* ------------------ Begin pc_open ---------------------- */
972
973static int pc_open(struct tty_struct *tty, struct file * filp)
974{ /* Begin pc_open */
975
976 struct channel *ch;
977 unsigned long flags;
978 int line, retval, boardnum;
bc9a5154 979 struct board_chan __iomem *bc;
f2cf8e25 980 unsigned int head;
1da177e4
LT
981
982 line = tty->index;
f2cf8e25
AC
983 if (line < 0 || line >= nbdevs)
984 return -ENODEV;
1da177e4
LT
985
986 ch = &digi_channels[line];
987 boardnum = ch->boardnum;
988
989 /* Check status of board configured in system. */
990
991 /* -----------------------------------------------------------------
992 I check to see if the epca_setup routine detected an user error.
993 It might be better to put this in pc_init, but for the moment it
994 goes here.
995 ---------------------------------------------------------------------- */
996
f2cf8e25 997 if (invalid_lilo_config) {
1da177e4 998 if (setup_error_code & INVALID_BOARD_TYPE)
f2cf8e25 999 printk(KERN_ERR "epca: pc_open: Invalid board type specified in kernel options.\n");
1da177e4 1000 if (setup_error_code & INVALID_NUM_PORTS)
f2cf8e25 1001 printk(KERN_ERR "epca: pc_open: Invalid number of ports specified in kernel options.\n");
1da177e4 1002 if (setup_error_code & INVALID_MEM_BASE)
f2cf8e25 1003 printk(KERN_ERR "epca: pc_open: Invalid board memory address specified in kernel options.\n");
1da177e4 1004 if (setup_error_code & INVALID_PORT_BASE)
f2cf8e25 1005 printk(KERN_ERR "epca; pc_open: Invalid board port address specified in kernel options.\n");
1da177e4 1006 if (setup_error_code & INVALID_BOARD_STATUS)
f2cf8e25 1007 printk(KERN_ERR "epca: pc_open: Invalid board status specified in kernel options.\n");
1da177e4 1008 if (setup_error_code & INVALID_ALTPIN)
f2cf8e25 1009 printk(KERN_ERR "epca: pc_open: Invalid board altpin specified in kernel options;\n");
1da177e4 1010 tty->driver_data = NULL; /* Mark this device as 'down' */
f2cf8e25 1011 return -ENODEV;
1da177e4 1012 }
f2cf8e25 1013 if (boardnum >= num_cards || boards[boardnum].status == DISABLED) {
1da177e4
LT
1014 tty->driver_data = NULL; /* Mark this device as 'down' */
1015 return(-ENODEV);
1016 }
1017
f2cf8e25 1018 if ((bc = ch->brdchan) == 0) {
1da177e4 1019 tty->driver_data = NULL;
f2cf8e25 1020 return -ENODEV;
1da177e4
LT
1021 }
1022
f2cf8e25 1023 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
1024 /* ------------------------------------------------------------------
1025 Every time a channel is opened, increment a counter. This is
1026 necessary because we do not wish to flush and shutdown the channel
1027 until the last app holding the channel open, closes it.
1028 --------------------------------------------------------------------- */
1da177e4 1029 ch->count++;
1da177e4
LT
1030 /* ----------------------------------------------------------------
1031 Set a kernel structures pointer to our local channel
1032 structure. This way we can get to it when passed only
1033 a tty struct.
1034 ------------------------------------------------------------------ */
1da177e4 1035 tty->driver_data = ch;
1da177e4
LT
1036 /* ----------------------------------------------------------------
1037 If this is the first time the channel has been opened, initialize
1038 the tty->termios struct otherwise let pc_close handle it.
1039 -------------------------------------------------------------------- */
1da177e4
LT
1040 globalwinon(ch);
1041 ch->statusflags = 0;
1042
1043 /* Save boards current modem status */
bc9a5154 1044 ch->imodem = readb(&bc->mstat);
1da177e4
LT
1045
1046 /* ----------------------------------------------------------------
1047 Set receive head and tail ptrs to each other. This indicates
1048 no data available to read.
1049 ----------------------------------------------------------------- */
f2cf8e25
AC
1050 head = readw(&bc->rin);
1051 writew(head, &bc->rout);
1da177e4
LT
1052
1053 /* Set the channels associated tty structure */
1054 ch->tty = tty;
1055
1056 /* -----------------------------------------------------------------
1057 The below routine generally sets up parity, baud, flow control
1058 issues, etc.... It effect both control flags and input flags.
1059 -------------------------------------------------------------------- */
1060 epcaparam(tty,ch);
1da177e4
LT
1061 ch->asyncflags |= ASYNC_INITIALIZED;
1062 memoff(ch);
f2cf8e25 1063 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
1064
1065 retval = block_til_ready(tty, filp, ch);
1066 if (retval)
1da177e4 1067 return retval;
1da177e4
LT
1068 /* -------------------------------------------------------------
1069 Set this again in case a hangup set it to zero while this
1070 open() was waiting for the line...
1071 --------------------------------------------------------------- */
f2cf8e25 1072 spin_lock_irqsave(&epca_lock, flags);
1da177e4 1073 ch->tty = tty;
1da177e4 1074 globalwinon(ch);
1da177e4 1075 /* Enable Digi Data events */
f2cf8e25 1076 writeb(1, &bc->idata);
1da177e4 1077 memoff(ch);
f2cf8e25 1078 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 1079 return 0;
1da177e4
LT
1080} /* End pc_open */
1081
1da177e4
LT
1082static int __init epca_module_init(void)
1083{ /* Begin init_module */
f2cf8e25 1084 return pc_init();
1da177e4
LT
1085}
1086
1087module_init(epca_module_init);
1da177e4 1088
1da177e4 1089static struct pci_driver epca_driver;
1da177e4
LT
1090
1091static void __exit epca_module_exit(void)
1092{
1da177e4
LT
1093 int count, crd;
1094 struct board_info *bd;
1095 struct channel *ch;
1da177e4
LT
1096
1097 del_timer_sync(&epca_timer);
1098
1da177e4
LT
1099 if ((tty_unregister_driver(pc_driver)) ||
1100 (tty_unregister_driver(pc_info)))
1101 {
f2cf8e25 1102 printk(KERN_WARNING "epca: cleanup_module failed to un-register tty driver\n");
1da177e4
LT
1103 return;
1104 }
1105 put_tty_driver(pc_driver);
1106 put_tty_driver(pc_info);
1107
f2cf8e25 1108 for (crd = 0; crd < num_cards; crd++) { /* Begin for each card */
1da177e4 1109 bd = &boards[crd];
1da177e4
LT
1110 if (!bd)
1111 { /* Begin sanity check */
1112 printk(KERN_ERR "<Error> - Digi : cleanup_module failed\n");
1113 return;
1114 } /* End sanity check */
f2cf8e25 1115 ch = card_ptr[crd];
1da177e4
LT
1116 for (count = 0; count < bd->numports; count++, ch++)
1117 { /* Begin for each port */
f2cf8e25 1118 if (ch) {
1da177e4
LT
1119 if (ch->tty)
1120 tty_hangup(ch->tty);
1121 kfree(ch->tmp_buf);
1122 }
1da177e4
LT
1123 } /* End for each port */
1124 } /* End for each card */
1da177e4 1125 pci_unregister_driver (&epca_driver);
1da177e4 1126}
f2cf8e25 1127
1da177e4 1128module_exit(epca_module_exit);
1da177e4
LT
1129
1130static struct tty_operations pc_ops = {
1131 .open = pc_open,
1132 .close = pc_close,
1133 .write = pc_write,
1134 .write_room = pc_write_room,
1135 .flush_buffer = pc_flush_buffer,
1136 .chars_in_buffer = pc_chars_in_buffer,
1137 .flush_chars = pc_flush_chars,
1138 .put_char = pc_put_char,
1139 .ioctl = pc_ioctl,
1140 .set_termios = pc_set_termios,
1141 .stop = pc_stop,
1142 .start = pc_start,
1143 .throttle = pc_throttle,
1144 .unthrottle = pc_unthrottle,
1145 .hangup = pc_hangup,
1146};
1147
1148static int info_open(struct tty_struct *tty, struct file * filp)
1149{
1150 return 0;
1151}
1152
1153static struct tty_operations info_ops = {
1154 .open = info_open,
1155 .ioctl = info_ioctl,
1156};
1157
1158/* ------------------ Begin pc_init ---------------------- */
1159
f2cf8e25 1160static int __init pc_init(void)
1da177e4 1161{ /* Begin pc_init */
1da177e4
LT
1162 int crd;
1163 struct board_info *bd;
1164 unsigned char board_id = 0;
1165
1da177e4
LT
1166 int pci_boards_found, pci_count;
1167
1168 pci_count = 0;
1da177e4
LT
1169
1170 pc_driver = alloc_tty_driver(MAX_ALLOC);
1171 if (!pc_driver)
1172 return -ENOMEM;
1173
1174 pc_info = alloc_tty_driver(MAX_ALLOC);
1175 if (!pc_info) {
1176 put_tty_driver(pc_driver);
1177 return -ENOMEM;
1178 }
1179
1180 /* -----------------------------------------------------------------------
1181 If epca_setup has not been ran by LILO set num_cards to defaults; copy
1182 board structure defined by digiConfig into drivers board structure.
1183 Note : If LILO has ran epca_setup then epca_setup will handle defining
1184 num_cards as well as copying the data into the board structure.
1185 -------------------------------------------------------------------------- */
f2cf8e25 1186 if (!liloconfig) { /* Begin driver has been configured via. epcaconfig */
1da177e4
LT
1187
1188 nbdevs = NBDEVS;
1189 num_cards = NUMCARDS;
1190 memcpy((void *)&boards, (void *)&static_boards,
1191 (sizeof(struct board_info) * NUMCARDS));
1192 } /* End driver has been configured via. epcaconfig */
1193
1194 /* -----------------------------------------------------------------
1195 Note : If lilo was used to configure the driver and the
1196 ignore epcaconfig option was choosen (digiepca=2) then
1197 nbdevs and num_cards will equal 0 at this point. This is
1198 okay; PCI cards will still be picked up if detected.
1199 --------------------------------------------------------------------- */
1200
1201 /* -----------------------------------------------------------
1202 Set up interrupt, we will worry about memory allocation in
1203 post_fep_init.
1204 --------------------------------------------------------------- */
1205
1206
1207 printk(KERN_INFO "DIGI epca driver version %s loaded.\n",VERSION);
1208
1da177e4
LT
1209 /* ------------------------------------------------------------------
1210 NOTE : This code assumes that the number of ports found in
1211 the boards array is correct. This could be wrong if
1212 the card in question is PCI (And therefore has no ports
1213 entry in the boards structure.) The rest of the
1214 information will be valid for PCI because the beginning
1215 of pc_init scans for PCI and determines i/o and base
1216 memory addresses. I am not sure if it is possible to
1217 read the number of ports supported by the card prior to
1218 it being booted (Since that is the state it is in when
1219 pc_init is run). Because it is not possible to query the
1220 number of supported ports until after the card has booted;
1221 we are required to calculate the card_ptrs as the card is
1222 is initialized (Inside post_fep_init). The negative thing
1223 about this approach is that digiDload's call to GET_INFO
1224 will have a bad port value. (Since this is called prior
1225 to post_fep_init.)
1226
1227 --------------------------------------------------------------------- */
1228
1229 pci_boards_found = 0;
1230 if(num_cards < MAXBOARDS)
1231 pci_boards_found += init_PCI();
1232 num_cards += pci_boards_found;
1233
1da177e4
LT
1234 pc_driver->owner = THIS_MODULE;
1235 pc_driver->name = "ttyD";
1236 pc_driver->devfs_name = "tts/D";
1237 pc_driver->major = DIGI_MAJOR;
1238 pc_driver->minor_start = 0;
1239 pc_driver->type = TTY_DRIVER_TYPE_SERIAL;
1240 pc_driver->subtype = SERIAL_TYPE_NORMAL;
1241 pc_driver->init_termios = tty_std_termios;
1242 pc_driver->init_termios.c_iflag = 0;
1243 pc_driver->init_termios.c_oflag = 0;
1244 pc_driver->init_termios.c_cflag = B9600 | CS8 | CREAD | CLOCAL | HUPCL;
1245 pc_driver->init_termios.c_lflag = 0;
1246 pc_driver->flags = TTY_DRIVER_REAL_RAW;
1247 tty_set_operations(pc_driver, &pc_ops);
1248
1249 pc_info->owner = THIS_MODULE;
1250 pc_info->name = "digi_ctl";
1251 pc_info->major = DIGIINFOMAJOR;
1252 pc_info->minor_start = 0;
1253 pc_info->type = TTY_DRIVER_TYPE_SERIAL;
1254 pc_info->subtype = SERIAL_TYPE_INFO;
1255 pc_info->init_termios = tty_std_termios;
1256 pc_info->init_termios.c_iflag = 0;
1257 pc_info->init_termios.c_oflag = 0;
1258 pc_info->init_termios.c_lflag = 0;
1259 pc_info->init_termios.c_cflag = B9600 | CS8 | CREAD | HUPCL;
1260 pc_info->flags = TTY_DRIVER_REAL_RAW;
1261 tty_set_operations(pc_info, &info_ops);
1262
1263
1da177e4
LT
1264 for (crd = 0; crd < num_cards; crd++)
1265 { /* Begin for each card */
1266
1267 /* ------------------------------------------------------------------
1268 This is where the appropriate memory handlers for the hardware is
1269 set. Everything at runtime blindly jumps through these vectors.
1270 ---------------------------------------------------------------------- */
1271
1272 /* defined in epcaconfig.h */
1273 bd = &boards[crd];
1274
1275 switch (bd->type)
1276 { /* Begin switch on bd->type {board type} */
1277 case PCXEM:
1278 case EISAXEM:
1279 bd->memwinon = pcxem_memwinon ;
1280 bd->memwinoff = pcxem_memwinoff ;
1281 bd->globalwinon = pcxem_globalwinon ;
1282 bd->txwinon = pcxem_txwinon ;
1283 bd->rxwinon = pcxem_rxwinon ;
1284 bd->memoff = pcxem_memoff ;
1285 bd->assertgwinon = dummy_assertgwinon;
1286 bd->assertmemoff = dummy_assertmemoff;
1287 break;
1288
1289 case PCIXEM:
1290 case PCIXRJ:
1291 case PCIXR:
1292 bd->memwinon = dummy_memwinon;
1293 bd->memwinoff = dummy_memwinoff;
1294 bd->globalwinon = dummy_globalwinon;
1295 bd->txwinon = dummy_txwinon;
1296 bd->rxwinon = dummy_rxwinon;
1297 bd->memoff = dummy_memoff;
1298 bd->assertgwinon = dummy_assertgwinon;
1299 bd->assertmemoff = dummy_assertmemoff;
1300 break;
1301
1302 case PCXE:
1303 case PCXEVE:
1304
1305 bd->memwinon = pcxe_memwinon;
1306 bd->memwinoff = pcxe_memwinoff;
1307 bd->globalwinon = pcxe_globalwinon;
1308 bd->txwinon = pcxe_txwinon;
1309 bd->rxwinon = pcxe_rxwinon;
1310 bd->memoff = pcxe_memoff;
1311 bd->assertgwinon = dummy_assertgwinon;
1312 bd->assertmemoff = dummy_assertmemoff;
1313 break;
1314
1315 case PCXI:
1316 case PC64XE:
1317
1318 bd->memwinon = pcxi_memwinon;
1319 bd->memwinoff = pcxi_memwinoff;
1320 bd->globalwinon = pcxi_globalwinon;
1321 bd->txwinon = pcxi_txwinon;
1322 bd->rxwinon = pcxi_rxwinon;
1323 bd->memoff = pcxi_memoff;
1324 bd->assertgwinon = pcxi_assertgwinon;
1325 bd->assertmemoff = pcxi_assertmemoff;
1326 break;
1327
1328 default:
1329 break;
1330
1331 } /* End switch on bd->type */
1332
1333 /* ---------------------------------------------------------------
1334 Some cards need a memory segment to be defined for use in
1335 transmit and receive windowing operations. These boards
1336 are listed in the below switch. In the case of the XI the
1337 amount of memory on the board is variable so the memory_seg
1338 is also variable. This code determines what they segment
1339 should be.
1340 ----------------------------------------------------------------- */
1341
1342 switch (bd->type)
1343 { /* Begin switch on bd->type {board type} */
1344
1345 case PCXE:
1346 case PCXEVE:
1347 case PC64XE:
1348 bd->memory_seg = 0xf000;
1349 break;
1350
1351 case PCXI:
1352 board_id = inb((int)bd->port);
1353 if ((board_id & 0x1) == 0x1)
1354 { /* Begin it's an XI card */
1355
1356 /* Is it a 64K board */
1357 if ((board_id & 0x30) == 0)
1358 bd->memory_seg = 0xf000;
1359
1360 /* Is it a 128K board */
1361 if ((board_id & 0x30) == 0x10)
1362 bd->memory_seg = 0xe000;
1363
1364 /* Is is a 256K board */
1365 if ((board_id & 0x30) == 0x20)
1366 bd->memory_seg = 0xc000;
1367
1368 /* Is it a 512K board */
1369 if ((board_id & 0x30) == 0x30)
1370 bd->memory_seg = 0x8000;
1371
f2cf8e25 1372 } else printk(KERN_ERR "epca: Board at 0x%x doesn't appear to be an XI\n",(int)bd->port);
1da177e4
LT
1373 break;
1374
1375 } /* End switch on bd->type */
1376
1377 } /* End for each card */
1378
1379 if (tty_register_driver(pc_driver))
1380 panic("Couldn't register Digi PC/ driver");
1381
1382 if (tty_register_driver(pc_info))
1383 panic("Couldn't register Digi PC/ info ");
1384
1385 /* -------------------------------------------------------------------
1386 Start up the poller to check for events on all enabled boards
1387 ---------------------------------------------------------------------- */
1388
1389 init_timer(&epca_timer);
1390 epca_timer.function = epcapoll;
1391 mod_timer(&epca_timer, jiffies + HZ/25);
1da177e4
LT
1392 return 0;
1393
1394} /* End pc_init */
1395
1396/* ------------------ Begin post_fep_init ---------------------- */
1397
1398static void post_fep_init(unsigned int crd)
1399{ /* Begin post_fep_init */
1400
1401 int i;
bc9a5154
AV
1402 void __iomem *memaddr;
1403 struct global_data __iomem *gd;
1da177e4 1404 struct board_info *bd;
bc9a5154 1405 struct board_chan __iomem *bc;
1da177e4
LT
1406 struct channel *ch;
1407 int shrinkmem = 0, lowwater ;
1408
1409 /* -------------------------------------------------------------
1410 This call is made by the user via. the ioctl call DIGI_INIT.
1411 It is responsible for setting up all the card specific stuff.
1412 ---------------------------------------------------------------- */
1413 bd = &boards[crd];
1414
1415 /* -----------------------------------------------------------------
1416 If this is a PCI board, get the port info. Remember PCI cards
1417 do not have entries into the epcaconfig.h file, so we can't get
1418 the number of ports from it. Unfortunetly, this means that anyone
1419 doing a DIGI_GETINFO before the board has booted will get an invalid
1420 number of ports returned (It should return 0). Calls to DIGI_GETINFO
1421 after DIGI_INIT has been called will return the proper values.
1422 ------------------------------------------------------------------- */
1423
f2cf8e25 1424 if (bd->type >= PCIXEM) { /* Begin get PCI number of ports */
1da177e4
LT
1425 /* --------------------------------------------------------------------
1426 Below we use XEMPORTS as a memory offset regardless of which PCI
1427 card it is. This is because all of the supported PCI cards have
1428 the same memory offset for the channel data. This will have to be
1429 changed if we ever develop a PCI/XE card. NOTE : The FEP manual
1430 states that the port offset is 0xC22 as opposed to 0xC02. This is
1431 only true for PC/XE, and PC/XI cards; not for the XEM, or CX series.
1432 On the PCI cards the number of ports is determined by reading a
1433 ID PROM located in the box attached to the card. The card can then
1434 determine the index the id to determine the number of ports available.
1435 (FYI - The id should be located at 0x1ac (And may use up to 4 bytes
1436 if the box in question is a XEM or CX)).
1437 ------------------------------------------------------------------------ */
f2cf8e25
AC
1438 /* PCI cards are already remapped at this point ISA are not */
1439 bd->numports = readw(bd->re_map_membase + XEMPORTS);
1da177e4
LT
1440 epcaassert(bd->numports <= 64,"PCI returned a invalid number of ports");
1441 nbdevs += (bd->numports);
f2cf8e25
AC
1442 } else {
1443 /* Fix up the mappings for ISA/EISA etc */
1444 /* FIXME: 64K - can we be smarter ? */
1445 bd->re_map_membase = ioremap(bd->membase, 0x10000);
1446 }
1da177e4
LT
1447
1448 if (crd != 0)
1449 card_ptr[crd] = card_ptr[crd-1] + boards[crd-1].numports;
1450 else
1451 card_ptr[crd] = &digi_channels[crd]; /* <- For card 0 only */
1452
1453 ch = card_ptr[crd];
1da177e4
LT
1454 epcaassert(ch <= &digi_channels[nbdevs - 1], "ch out of range");
1455
f2cf8e25 1456 memaddr = bd->re_map_membase;
1da177e4
LT
1457
1458 /* -----------------------------------------------------------------
1459 The below assignment will set bc to point at the BEGINING of
1460 the cards channel structures. For 1 card there will be between
1461 8 and 64 of these structures.
1462 -------------------------------------------------------------------- */
1463
bc9a5154 1464 bc = memaddr + CHANSTRUCT;
1da177e4
LT
1465
1466 /* -------------------------------------------------------------------
1467 The below assignment will set gd to point at the BEGINING of
1468 global memory address 0xc00. The first data in that global
1469 memory actually starts at address 0xc1a. The command in
1470 pointer begins at 0xd10.
1471 ---------------------------------------------------------------------- */
1472
bc9a5154 1473 gd = memaddr + GLOBAL;
1da177e4
LT
1474
1475 /* --------------------------------------------------------------------
1476 XEPORTS (address 0xc22) points at the number of channels the
1477 card supports. (For 64XE, XI, XEM, and XR use 0xc02)
1478 ----------------------------------------------------------------------- */
1479
f2cf8e25 1480 if ((bd->type == PCXEVE || bd->type == PCXE) && (readw(memaddr + XEPORTS) < 3))
1da177e4
LT
1481 shrinkmem = 1;
1482 if (bd->type < PCIXEM)
1483 if (!request_region((int)bd->port, 4, board_desc[bd->type]))
1484 return;
1da177e4
LT
1485 memwinon(bd, 0);
1486
1487 /* --------------------------------------------------------------------
1488 Remember ch is the main drivers channels structure, while bc is
1489 the cards channel structure.
1490 ------------------------------------------------------------------------ */
1491
1492 /* For every port on the card do ..... */
1493
f2cf8e25
AC
1494 for (i = 0; i < bd->numports; i++, ch++, bc++) { /* Begin for each port */
1495 unsigned long flags;
bc9a5154 1496 u16 tseg, rseg;
1da177e4
LT
1497
1498 ch->brdchan = bc;
1499 ch->mailbox = gd;
1500 INIT_WORK(&ch->tqueue, do_softint, ch);
1501 ch->board = &boards[crd];
1502
f2cf8e25
AC
1503 spin_lock_irqsave(&epca_lock, flags);
1504 switch (bd->type) {
1da177e4
LT
1505 /* ----------------------------------------------------------------
1506 Since some of the boards use different bitmaps for their
1507 control signals we cannot hard code these values and retain
1508 portability. We virtualize this data here.
1509 ------------------------------------------------------------------- */
1510 case EISAXEM:
1511 case PCXEM:
1512 case PCIXEM:
1513 case PCIXRJ:
1514 case PCIXR:
1515 ch->m_rts = 0x02 ;
1516 ch->m_dcd = 0x80 ;
1517 ch->m_dsr = 0x20 ;
1518 ch->m_cts = 0x10 ;
1519 ch->m_ri = 0x40 ;
1520 ch->m_dtr = 0x01 ;
1521 break;
1522
1523 case PCXE:
1524 case PCXEVE:
1525 case PCXI:
1526 case PC64XE:
1527 ch->m_rts = 0x02 ;
1528 ch->m_dcd = 0x08 ;
1529 ch->m_dsr = 0x10 ;
1530 ch->m_cts = 0x20 ;
1531 ch->m_ri = 0x40 ;
1532 ch->m_dtr = 0x80 ;
1533 break;
1534
1535 } /* End switch bd->type */
1536
f2cf8e25 1537 if (boards[crd].altpin) {
1da177e4
LT
1538 ch->dsr = ch->m_dcd;
1539 ch->dcd = ch->m_dsr;
1540 ch->digiext.digi_flags |= DIGI_ALTPIN;
1541 }
f2cf8e25 1542 else {
1da177e4
LT
1543 ch->dcd = ch->m_dcd;
1544 ch->dsr = ch->m_dsr;
1545 }
1546
1547 ch->boardnum = crd;
1548 ch->channelnum = i;
1549 ch->magic = EPCA_MAGIC;
1550 ch->tty = NULL;
1551
f2cf8e25 1552 if (shrinkmem) {
1da177e4
LT
1553 fepcmd(ch, SETBUFFER, 32, 0, 0, 0);
1554 shrinkmem = 0;
1555 }
1556
bc9a5154
AV
1557 tseg = readw(&bc->tseg);
1558 rseg = readw(&bc->rseg);
1559
f2cf8e25 1560 switch (bd->type) {
1da177e4
LT
1561
1562 case PCIXEM:
1563 case PCIXRJ:
1564 case PCIXR:
1565 /* Cover all the 2MEG cards */
bc9a5154
AV
1566 ch->txptr = memaddr + ((tseg << 4) & 0x1fffff);
1567 ch->rxptr = memaddr + ((rseg << 4) & 0x1fffff);
1568 ch->txwin = FEPWIN | (tseg >> 11);
1569 ch->rxwin = FEPWIN | (rseg >> 11);
1da177e4
LT
1570 break;
1571
1572 case PCXEM:
1573 case EISAXEM:
1574 /* Cover all the 32K windowed cards */
1575 /* Mask equal to window size - 1 */
bc9a5154
AV
1576 ch->txptr = memaddr + ((tseg << 4) & 0x7fff);
1577 ch->rxptr = memaddr + ((rseg << 4) & 0x7fff);
1578 ch->txwin = FEPWIN | (tseg >> 11);
1579 ch->rxwin = FEPWIN | (rseg >> 11);
1da177e4
LT
1580 break;
1581
1582 case PCXEVE:
1583 case PCXE:
bc9a5154
AV
1584 ch->txptr = memaddr + (((tseg - bd->memory_seg) << 4) & 0x1fff);
1585 ch->txwin = FEPWIN | ((tseg - bd->memory_seg) >> 9);
1586 ch->rxptr = memaddr + (((rseg - bd->memory_seg) << 4) & 0x1fff);
1587 ch->rxwin = FEPWIN | ((rseg - bd->memory_seg) >>9 );
1da177e4
LT
1588 break;
1589
1590 case PCXI:
1591 case PC64XE:
bc9a5154
AV
1592 ch->txptr = memaddr + ((tseg - bd->memory_seg) << 4);
1593 ch->rxptr = memaddr + ((rseg - bd->memory_seg) << 4);
1da177e4
LT
1594 ch->txwin = ch->rxwin = 0;
1595 break;
1596
1597 } /* End switch bd->type */
1598
1599 ch->txbufhead = 0;
bc9a5154 1600 ch->txbufsize = readw(&bc->tmax) + 1;
1da177e4
LT
1601
1602 ch->rxbufhead = 0;
bc9a5154 1603 ch->rxbufsize = readw(&bc->rmax) + 1;
1da177e4
LT
1604
1605 lowwater = ch->txbufsize >= 2000 ? 1024 : (ch->txbufsize / 2);
1606
1607 /* Set transmitter low water mark */
1608 fepcmd(ch, STXLWATER, lowwater, 0, 10, 0);
1609
1610 /* Set receiver low water mark */
1611
1612 fepcmd(ch, SRXLWATER, (ch->rxbufsize / 4), 0, 10, 0);
1613
1614 /* Set receiver high water mark */
1615
1616 fepcmd(ch, SRXHWATER, (3 * ch->rxbufsize / 4), 0, 10, 0);
1617
f2cf8e25
AC
1618 writew(100, &bc->edelay);
1619 writeb(1, &bc->idata);
1da177e4 1620
f2cf8e25
AC
1621 ch->startc = readb(&bc->startc);
1622 ch->stopc = readb(&bc->stopc);
1623 ch->startca = readb(&bc->startca);
1624 ch->stopca = readb(&bc->stopca);
1da177e4
LT
1625
1626 ch->fepcflag = 0;
1627 ch->fepiflag = 0;
1628 ch->fepoflag = 0;
1629 ch->fepstartc = 0;
1630 ch->fepstopc = 0;
1631 ch->fepstartca = 0;
1632 ch->fepstopca = 0;
1633
1634 ch->close_delay = 50;
1635 ch->count = 0;
1636 ch->blocked_open = 0;
1637 init_waitqueue_head(&ch->open_wait);
1638 init_waitqueue_head(&ch->close_wait);
f2cf8e25
AC
1639
1640 spin_unlock_irqrestore(&epca_lock, flags);
1641
1da177e4 1642 ch->tmp_buf = kmalloc(ch->txbufsize,GFP_KERNEL);
f2cf8e25 1643 if (!ch->tmp_buf) {
1da177e4
LT
1644 printk(KERN_ERR "POST FEP INIT : kmalloc failed for port 0x%x\n",i);
1645 release_region((int)bd->port, 4);
1646 while(i-- > 0)
1647 kfree((ch--)->tmp_buf);
1648 return;
f2cf8e25 1649 } else
1da177e4
LT
1650 memset((void *)ch->tmp_buf,0,ch->txbufsize);
1651 } /* End for each port */
1652
1653 printk(KERN_INFO
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);
1da177e4
LT
1656 memwinoff(bd, 0);
1657
1658} /* End post_fep_init */
1659
1660/* --------------------- Begin epcapoll ------------------------ */
1661
1662static void epcapoll(unsigned long ignored)
1663{ /* Begin epcapoll */
1664
1665 unsigned long flags;
1666 int crd;
1667 volatile unsigned int head, tail;
1668 struct channel *ch;
1669 struct board_info *bd;
1670
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 ----------------------------------------------------------------------- */
1678
1da177e4
LT
1679 for (crd = 0; crd < num_cards; crd++)
1680 { /* Begin for each card */
1681
1682 bd = &boards[crd];
1683 ch = card_ptr[crd];
1684
1685 if ((bd->status == DISABLED) || digi_poller_inhibited)
1686 continue; /* Begin loop next interation */
1687
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
1691 some legacy boards.
1692 ---------------------------------------------------------------- */
1693
f2cf8e25
AC
1694 spin_lock_irqsave(&epca_lock, flags);
1695
1da177e4
LT
1696 assertmemoff(ch);
1697
1698 globalwinon(ch);
1699
1700 /* ---------------------------------------------------------------
1701 In this case head and tail actually refer to the event queue not
1702 the transmit or receive queue.
1703 ------------------------------------------------------------------- */
1704
f2cf8e25
AC
1705 head = readw(&ch->mailbox->ein);
1706 tail = readw(&ch->mailbox->eout);
1da177e4
LT
1707
1708 /* If head isn't equal to tail we have an event */
1709
1710 if (head != tail)
1711 doevent(crd);
1da177e4
LT
1712 memoff(ch);
1713
f2cf8e25 1714 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 1715
f2cf8e25 1716 } /* End for each card */
1da177e4 1717 mod_timer(&epca_timer, jiffies + (HZ / 25));
1da177e4
LT
1718} /* End epcapoll */
1719
1720/* --------------------- Begin doevent ------------------------ */
1721
1722static void doevent(int crd)
1723{ /* Begin doevent */
1724
bc9a5154 1725 void __iomem *eventbuf;
1da177e4
LT
1726 struct channel *ch, *chan0;
1727 static struct tty_struct *tty;
f2cf8e25 1728 struct board_info *bd;
bc9a5154 1729 struct board_chan __iomem *bc;
f2cf8e25
AC
1730 unsigned int tail, head;
1731 int event, channel;
1732 int mstat, lstat;
1da177e4
LT
1733
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 --------------------------------------------------------------------- */
1da177e4
LT
1738 bd = &boards[crd];
1739
1740 chan0 = card_ptr[crd];
1741 epcaassert(chan0 <= &digi_channels[nbdevs - 1], "ch out of range");
1da177e4 1742 assertgwinon(chan0);
f2cf8e25 1743 while ((tail = readw(&chan0->mailbox->eout)) != (head = readw(&chan0->mailbox->ein)))
1da177e4 1744 { /* Begin while something in event queue */
1da177e4 1745 assertgwinon(chan0);
f2cf8e25 1746 eventbuf = bd->re_map_membase + tail + ISTART;
1da177e4 1747 /* Get the channel the event occurred on */
f2cf8e25 1748 channel = readb(eventbuf);
1da177e4 1749 /* Get the actual event code that occurred */
f2cf8e25 1750 event = readb(eventbuf + 1);
1da177e4
LT
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 ------------------------------------------------------------------- */
f2cf8e25
AC
1756 mstat = readb(eventbuf + 2);
1757 lstat = readb(eventbuf + 3);
1da177e4
LT
1758
1759 ch = chan0 + channel;
f2cf8e25 1760 if ((unsigned)channel >= bd->numports || !ch) {
1da177e4
LT
1761 if (channel >= bd->numports)
1762 ch = chan0;
1763 bc = ch->brdchan;
1764 goto next;
1765 }
1766
1767 if ((bc = ch->brdchan) == NULL)
1768 goto next;
1769
f2cf8e25 1770 if (event & DATA_IND) { /* Begin DATA_IND */
1da177e4
LT
1771 receive_data(ch);
1772 assertgwinon(ch);
1da177e4
LT
1773 } /* End DATA_IND */
1774 /* else *//* Fix for DCD transition missed bug */
f2cf8e25 1775 if (event & MODEMCHG_IND) { /* Begin MODEMCHG_IND */
1da177e4 1776 /* A modem signal change has been indicated */
1da177e4 1777 ch->imodem = mstat;
f2cf8e25 1778 if (ch->asyncflags & ASYNC_CHECK_CD) {
1da177e4
LT
1779 if (mstat & ch->dcd) /* We are now receiving dcd */
1780 wake_up_interruptible(&ch->open_wait);
1781 else
1782 pc_sched_event(ch, EPCA_EVENT_HANGUP); /* No dcd; hangup */
1783 }
1da177e4 1784 } /* End MODEMCHG_IND */
1da177e4 1785 tty = ch->tty;
f2cf8e25
AC
1786 if (tty) { /* Begin if valid tty */
1787 if (event & BREAK_IND) { /* Begin if BREAK_IND */
1da177e4 1788 /* A break has been indicated */
33f0f88f 1789 tty_insert_flip_char(tty, 0, TTY_BREAK);
1da177e4 1790 tty_schedule_flip(tty);
f2cf8e25 1791 } else if (event & LOWTX_IND) { /* Begin LOWTX_IND */
1da177e4
LT
1792 if (ch->statusflags & LOWWAIT)
1793 { /* Begin if LOWWAIT */
1da177e4
LT
1794 ch->statusflags &= ~LOWWAIT;
1795 tty_wakeup(tty);
1796 wake_up_interruptible(&tty->write_wait);
1da177e4 1797 } /* End if LOWWAIT */
f2cf8e25 1798 } else if (event & EMPTYTX_IND) { /* Begin EMPTYTX_IND */
1da177e4 1799 /* This event is generated by setup_empty_event */
1da177e4 1800 ch->statusflags &= ~TXBUSY;
f2cf8e25 1801 if (ch->statusflags & EMPTYWAIT) { /* Begin if EMPTYWAIT */
1da177e4
LT
1802 ch->statusflags &= ~EMPTYWAIT;
1803 tty_wakeup(tty);
1da177e4 1804 wake_up_interruptible(&tty->write_wait);
1da177e4 1805 } /* End if EMPTYWAIT */
1da177e4 1806 } /* End EMPTYTX_IND */
1da177e4 1807 } /* End if valid tty */
1da177e4
LT
1808 next:
1809 globalwinon(ch);
f2cf8e25
AC
1810 BUG_ON(!bc);
1811 writew(1, &bc->idata);
1812 writew((tail + 4) & (IMAX - ISTART - 4), &chan0->mailbox->eout);
1da177e4 1813 globalwinon(chan0);
1da177e4 1814 } /* End while something in event queue */
1da177e4
LT
1815} /* End doevent */
1816
1817/* --------------------- Begin fepcmd ------------------------ */
1818
1819static void fepcmd(struct channel *ch, int cmd, int word_or_byte,
1820 int byte2, int ncmds, int bytecmd)
1821{ /* Begin fepcmd */
bc9a5154 1822 unchar __iomem *memaddr;
1da177e4
LT
1823 unsigned int head, cmdTail, cmdStart, cmdMax;
1824 long count;
1825 int n;
1826
1827 /* This is the routine in which commands may be passed to the card. */
1828
1829 if (ch->board->status == DISABLED)
1da177e4 1830 return;
1da177e4 1831 assertgwinon(ch);
1da177e4 1832 /* Remember head (As well as max) is just an offset not a base addr */
f2cf8e25 1833 head = readw(&ch->mailbox->cin);
1da177e4 1834 /* cmdStart is a base address */
f2cf8e25 1835 cmdStart = readw(&ch->mailbox->cstart);
1da177e4
LT
1836 /* ------------------------------------------------------------------
1837 We do the addition below because we do not want a max pointer
1838 relative to cmdStart. We want a max pointer that points at the
1839 physical end of the command queue.
1840 -------------------------------------------------------------------- */
f2cf8e25 1841 cmdMax = (cmdStart + 4 + readw(&ch->mailbox->cmax));
1da177e4
LT
1842 memaddr = ch->board->re_map_membase;
1843
f2cf8e25
AC
1844 if (head >= (cmdMax - cmdStart) || (head & 03)) {
1845 printk(KERN_ERR "line %d: Out of range, cmd = %x, head = %x\n", __LINE__, cmd, head);
1846 printk(KERN_ERR "line %d: Out of range, cmdMax = %x, cmdStart = %x\n", __LINE__, cmdMax, cmdStart);
1da177e4
LT
1847 return;
1848 }
f2cf8e25
AC
1849 if (bytecmd) {
1850 writeb(cmd, memaddr + head + cmdStart + 0);
1851 writeb(ch->channelnum, memaddr + head + cmdStart + 1);
1da177e4 1852 /* Below word_or_byte is bits to set */
f2cf8e25 1853 writeb(word_or_byte, memaddr + head + cmdStart + 2);
1da177e4 1854 /* Below byte2 is bits to reset */
f2cf8e25
AC
1855 writeb(byte2, memaddr + head + cmdStart + 3);
1856 } else {
1857 writeb(cmd, memaddr + head + cmdStart + 0);
1858 writeb(ch->channelnum, memaddr + head + cmdStart + 1);
1859 writeb(word_or_byte, memaddr + head + cmdStart + 2);
1da177e4 1860 }
1da177e4 1861 head = (head + 4) & (cmdMax - cmdStart - 4);
f2cf8e25 1862 writew(head, &ch->mailbox->cin);
1da177e4
LT
1863 count = FEPTIMEOUT;
1864
f2cf8e25 1865 for (;;) { /* Begin forever loop */
1da177e4 1866 count--;
f2cf8e25 1867 if (count == 0) {
1da177e4
LT
1868 printk(KERN_ERR "<Error> - Fep not responding in fepcmd()\n");
1869 return;
1870 }
f2cf8e25
AC
1871 head = readw(&ch->mailbox->cin);
1872 cmdTail = readw(&ch->mailbox->cout);
1da177e4 1873 n = (head - cmdTail) & (cmdMax - cmdStart - 4);
1da177e4
LT
1874 /* ----------------------------------------------------------
1875 Basically this will break when the FEP acknowledges the
1876 command by incrementing cmdTail (Making it equal to head).
1877 ------------------------------------------------------------- */
1da177e4
LT
1878 if (n <= ncmds * (sizeof(short) * 4))
1879 break; /* Well nearly forever :-) */
1da177e4 1880 } /* End forever loop */
1da177e4
LT
1881} /* End fepcmd */
1882
1883/* ---------------------------------------------------------------------
1884 Digi products use fields in their channels structures that are very
1885 similar to the c_cflag and c_iflag fields typically found in UNIX
1886 termios structures. The below three routines allow mappings
1887 between these hardware "flags" and their respective Linux flags.
1888------------------------------------------------------------------------- */
1889
1890/* --------------------- Begin termios2digi_h -------------------- */
1891
1892static unsigned termios2digi_h(struct channel *ch, unsigned cflag)
1893{ /* Begin termios2digi_h */
1da177e4
LT
1894 unsigned res = 0;
1895
f2cf8e25 1896 if (cflag & CRTSCTS) {
1da177e4
LT
1897 ch->digiext.digi_flags |= (RTSPACE | CTSPACE);
1898 res |= ((ch->m_cts) | (ch->m_rts));
1899 }
1900
1901 if (ch->digiext.digi_flags & RTSPACE)
1902 res |= ch->m_rts;
1903
1904 if (ch->digiext.digi_flags & DTRPACE)
1905 res |= ch->m_dtr;
1906
1907 if (ch->digiext.digi_flags & CTSPACE)
1908 res |= ch->m_cts;
1909
1910 if (ch->digiext.digi_flags & DSRPACE)
1911 res |= ch->dsr;
1912
1913 if (ch->digiext.digi_flags & DCDPACE)
1914 res |= ch->dcd;
1915
1916 if (res & (ch->m_rts))
1917 ch->digiext.digi_flags |= RTSPACE;
1918
1919 if (res & (ch->m_cts))
1920 ch->digiext.digi_flags |= CTSPACE;
1921
1922 return res;
1923
1924} /* End termios2digi_h */
1925
1926/* --------------------- Begin termios2digi_i -------------------- */
1927static unsigned termios2digi_i(struct channel *ch, unsigned iflag)
1928{ /* Begin termios2digi_i */
1929
1930 unsigned res = iflag & (IGNBRK | BRKINT | IGNPAR | PARMRK |
1931 INPCK | ISTRIP|IXON|IXANY|IXOFF);
1da177e4
LT
1932 if (ch->digiext.digi_flags & DIGI_AIXON)
1933 res |= IAIXON;
1934 return res;
1935
1936} /* End termios2digi_i */
1937
1938/* --------------------- Begin termios2digi_c -------------------- */
1939
1940static unsigned termios2digi_c(struct channel *ch, unsigned cflag)
1941{ /* Begin termios2digi_c */
1942
1943 unsigned res = 0;
f2cf8e25 1944 if (cflag & CBAUDEX) { /* Begin detected CBAUDEX */
1da177e4 1945 ch->digiext.digi_flags |= DIGI_FAST;
1da177e4
LT
1946 /* -------------------------------------------------------------
1947 HUPCL bit is used by FEP to indicate fast baud
1948 table is to be used.
1949 ----------------------------------------------------------------- */
1da177e4 1950 res |= FEP_HUPCL;
1da177e4
LT
1951 } /* End detected CBAUDEX */
1952 else ch->digiext.digi_flags &= ~DIGI_FAST;
1da177e4
LT
1953 /* -------------------------------------------------------------------
1954 CBAUD has bit position 0x1000 set these days to indicate Linux
1955 baud rate remap. Digi hardware can't handle the bit assignment.
1956 (We use a different bit assignment for high speed.). Clear this
1957 bit out.
1958 ---------------------------------------------------------------------- */
1959 res |= cflag & ((CBAUD ^ CBAUDEX) | PARODD | PARENB | CSTOPB | CSIZE);
1da177e4
LT
1960 /* -------------------------------------------------------------
1961 This gets a little confusing. The Digi cards have their own
1962 representation of c_cflags controling baud rate. For the most
1963 part this is identical to the Linux implementation. However;
1964 Digi supports one rate (76800) that Linux doesn't. This means
1965 that the c_cflag entry that would normally mean 76800 for Digi
1966 actually means 115200 under Linux. Without the below mapping,
1967 a stty 115200 would only drive the board at 76800. Since
1968 the rate 230400 is also found after 76800, the same problem afflicts
1969 us when we choose a rate of 230400. Without the below modificiation
1970 stty 230400 would actually give us 115200.
1971
1972 There are two additional differences. The Linux value for CLOCAL
1973 (0x800; 0004000) has no meaning to the Digi hardware. Also in
1974 later releases of Linux; the CBAUD define has CBAUDEX (0x1000;
1975 0010000) ored into it (CBAUD = 0x100f as opposed to 0xf). CBAUDEX
1976 should be checked for a screened out prior to termios2digi_c
1977 returning. Since CLOCAL isn't used by the board this can be
1978 ignored as long as the returned value is used only by Digi hardware.
f2cf8e25
AC
1979 ----------------------------------------------------------------- */
1980 if (cflag & CBAUDEX) {
1da177e4
LT
1981 /* -------------------------------------------------------------
1982 The below code is trying to guarantee that only baud rates
1983 115200 and 230400 are remapped. We use exclusive or because
1984 the various baud rates share common bit positions and therefore
1985 can't be tested for easily.
1986 ----------------------------------------------------------------- */
1987
1988
1989 if ((!((cflag & 0x7) ^ (B115200 & ~CBAUDEX))) ||
1990 (!((cflag & 0x7) ^ (B230400 & ~CBAUDEX))))
1da177e4 1991 res += 1;
1da177e4 1992 }
1da177e4
LT
1993 return res;
1994
1995} /* End termios2digi_c */
1996
1997/* --------------------- Begin epcaparam ----------------------- */
1998
f2cf8e25 1999/* Caller must hold the locks */
1da177e4
LT
2000static void epcaparam(struct tty_struct *tty, struct channel *ch)
2001{ /* Begin epcaparam */
2002
2003 unsigned int cmdHead;
2004 struct termios *ts;
bc9a5154 2005 struct board_chan __iomem *bc;
1da177e4
LT
2006 unsigned mval, hflow, cflag, iflag;
2007
2008 bc = ch->brdchan;
2009 epcaassert(bc !=0, "bc out of range");
2010
2011 assertgwinon(ch);
1da177e4 2012 ts = tty->termios;
f2cf8e25
AC
2013 if ((ts->c_cflag & CBAUD) == 0) { /* Begin CBAUD detected */
2014 cmdHead = readw(&bc->rin);
bc9a5154 2015 writew(cmdHead, &bc->rout);
f2cf8e25 2016 cmdHead = readw(&bc->tin);
1da177e4
LT
2017 /* Changing baud in mid-stream transmission can be wonderful */
2018 /* ---------------------------------------------------------------
2019 Flush current transmit buffer by setting cmdTail pointer (tout)
2020 to cmdHead pointer (tin). Hopefully the transmit buffer is empty.
2021 ----------------------------------------------------------------- */
1da177e4
LT
2022 fepcmd(ch, STOUT, (unsigned) cmdHead, 0, 0, 0);
2023 mval = 0;
f2cf8e25 2024 } else { /* Begin CBAUD not detected */
1da177e4
LT
2025 /* -------------------------------------------------------------------
2026 c_cflags have changed but that change had nothing to do with BAUD.
2027 Propagate the change to the card.
2028 ---------------------------------------------------------------------- */
1da177e4 2029 cflag = termios2digi_c(ch, ts->c_cflag);
f2cf8e25 2030 if (cflag != ch->fepcflag) {
1da177e4
LT
2031 ch->fepcflag = cflag;
2032 /* Set baud rate, char size, stop bits, parity */
2033 fepcmd(ch, SETCTRLFLAGS, (unsigned) cflag, 0, 0, 0);
2034 }
1da177e4
LT
2035 /* ----------------------------------------------------------------
2036 If the user has not forced CLOCAL and if the device is not a
2037 CALLOUT device (Which is always CLOCAL) we set flags such that
2038 the driver will wait on carrier detect.
2039 ------------------------------------------------------------------- */
1da177e4 2040 if (ts->c_cflag & CLOCAL)
1da177e4 2041 ch->asyncflags &= ~ASYNC_CHECK_CD;
1da177e4 2042 else
1da177e4 2043 ch->asyncflags |= ASYNC_CHECK_CD;
1da177e4 2044 mval = ch->m_dtr | ch->m_rts;
1da177e4 2045 } /* End CBAUD not detected */
1da177e4 2046 iflag = termios2digi_i(ch, ts->c_iflag);
1da177e4 2047 /* Check input mode flags */
f2cf8e25 2048 if (iflag != ch->fepiflag) {
1da177e4 2049 ch->fepiflag = iflag;
1da177e4
LT
2050 /* ---------------------------------------------------------------
2051 Command sets channels iflag structure on the board. Such things
2052 as input soft flow control, handling of parity errors, and
2053 break handling are all set here.
2054 ------------------------------------------------------------------- */
1da177e4
LT
2055 /* break handling, parity handling, input stripping, flow control chars */
2056 fepcmd(ch, SETIFLAGS, (unsigned int) ch->fepiflag, 0, 0, 0);
2057 }
1da177e4
LT
2058 /* ---------------------------------------------------------------
2059 Set the board mint value for this channel. This will cause hardware
2060 events to be generated each time the DCD signal (Described in mint)
2061 changes.
2062 ------------------------------------------------------------------- */
f2cf8e25 2063 writeb(ch->dcd, &bc->mint);
1da177e4
LT
2064 if ((ts->c_cflag & CLOCAL) || (ch->digiext.digi_flags & DIGI_FORCEDCD))
2065 if (ch->digiext.digi_flags & DIGI_FORCEDCD)
f2cf8e25
AC
2066 writeb(0, &bc->mint);
2067 ch->imodem = readb(&bc->mstat);
1da177e4 2068 hflow = termios2digi_h(ch, ts->c_cflag);
f2cf8e25 2069 if (hflow != ch->hflow) {
1da177e4 2070 ch->hflow = hflow;
1da177e4
LT
2071 /* --------------------------------------------------------------
2072 Hard flow control has been selected but the board is not
2073 using it. Activate hard flow control now.
2074 ----------------------------------------------------------------- */
1da177e4
LT
2075 fepcmd(ch, SETHFLOW, hflow, 0xff, 0, 1);
2076 }
1da177e4
LT
2077 mval ^= ch->modemfake & (mval ^ ch->modem);
2078
f2cf8e25 2079 if (ch->omodem ^ mval) {
1da177e4 2080 ch->omodem = mval;
1da177e4
LT
2081 /* --------------------------------------------------------------
2082 The below command sets the DTR and RTS mstat structure. If
2083 hard flow control is NOT active these changes will drive the
2084 output of the actual DTR and RTS lines. If hard flow control
2085 is active, the changes will be saved in the mstat structure and
2086 only asserted when hard flow control is turned off.
2087 ----------------------------------------------------------------- */
2088
2089 /* First reset DTR & RTS; then set them */
2090 fepcmd(ch, SETMODEM, 0, ((ch->m_dtr)|(ch->m_rts)), 0, 1);
2091 fepcmd(ch, SETMODEM, mval, 0, 0, 1);
1da177e4 2092 }
f2cf8e25 2093 if (ch->startc != ch->fepstartc || ch->stopc != ch->fepstopc) {
1da177e4
LT
2094 ch->fepstartc = ch->startc;
2095 ch->fepstopc = ch->stopc;
1da177e4
LT
2096 /* ------------------------------------------------------------
2097 The XON / XOFF characters have changed; propagate these
2098 changes to the card.
2099 --------------------------------------------------------------- */
1da177e4
LT
2100 fepcmd(ch, SONOFFC, ch->fepstartc, ch->fepstopc, 0, 1);
2101 }
f2cf8e25 2102 if (ch->startca != ch->fepstartca || ch->stopca != ch->fepstopca) {
1da177e4
LT
2103 ch->fepstartca = ch->startca;
2104 ch->fepstopca = ch->stopca;
1da177e4
LT
2105 /* ---------------------------------------------------------------
2106 Similar to the above, this time the auxilarly XON / XOFF
2107 characters have changed; propagate these changes to the card.
2108 ------------------------------------------------------------------ */
1da177e4
LT
2109 fepcmd(ch, SAUXONOFFC, ch->fepstartca, ch->fepstopca, 0, 1);
2110 }
1da177e4
LT
2111} /* End epcaparam */
2112
2113/* --------------------- Begin receive_data ----------------------- */
f2cf8e25 2114/* Caller holds lock */
1da177e4
LT
2115static void receive_data(struct channel *ch)
2116{ /* Begin receive_data */
2117
2118 unchar *rptr;
2119 struct termios *ts = NULL;
2120 struct tty_struct *tty;
bc9a5154 2121 struct board_chan __iomem *bc;
f2cf8e25
AC
2122 int dataToRead, wrapgap, bytesAvailable;
2123 unsigned int tail, head;
1da177e4 2124 unsigned int wrapmask;
1da177e4 2125
1da177e4
LT
2126 /* ---------------------------------------------------------------
2127 This routine is called by doint when a receive data event
2128 has taken place.
2129 ------------------------------------------------------------------- */
2130
2131 globalwinon(ch);
1da177e4
LT
2132 if (ch->statusflags & RXSTOPPED)
2133 return;
1da177e4
LT
2134 tty = ch->tty;
2135 if (tty)
2136 ts = tty->termios;
1da177e4 2137 bc = ch->brdchan;
f2cf8e25 2138 BUG_ON(!bc);
1da177e4
LT
2139 wrapmask = ch->rxbufsize - 1;
2140
2141 /* ---------------------------------------------------------------------
2142 Get the head and tail pointers to the receiver queue. Wrap the
2143 head pointer if it has reached the end of the buffer.
2144 ------------------------------------------------------------------------ */
f2cf8e25 2145 head = readw(&bc->rin);
1da177e4 2146 head &= wrapmask;
f2cf8e25 2147 tail = readw(&bc->rout) & wrapmask;
1da177e4
LT
2148
2149 bytesAvailable = (head - tail) & wrapmask;
1da177e4
LT
2150 if (bytesAvailable == 0)
2151 return;
2152
2153 /* ------------------------------------------------------------------
2154 If CREAD bit is off or device not open, set TX tail to head
2155 --------------------------------------------------------------------- */
2156
f2cf8e25 2157 if (!tty || !ts || !(ts->c_cflag & CREAD)) {
bc9a5154 2158 writew(head, &bc->rout);
1da177e4
LT
2159 return;
2160 }
2161
33f0f88f 2162 if (tty_buffer_request_room(tty, bytesAvailable + 1) == 0)
1da177e4
LT
2163 return;
2164
f2cf8e25
AC
2165 if (readb(&bc->orun)) {
2166 writeb(0, &bc->orun);
2167 printk(KERN_WARNING "epca; overrun! DigiBoard device %s\n",tty->name);
33f0f88f 2168 tty_insert_flip_char(tty, 0, TTY_OVERRUN);
1da177e4 2169 }
1da177e4 2170 rxwinon(ch);
f2cf8e25 2171 while (bytesAvailable > 0) { /* Begin while there is data on the card */
1da177e4 2172 wrapgap = (head >= tail) ? head - tail : ch->rxbufsize - tail;
1da177e4
LT
2173 /* ---------------------------------------------------------------
2174 Even if head has wrapped around only report the amount of
2175 data to be equal to the size - tail. Remember memcpy can't
2176 automaticly wrap around the receive buffer.
2177 ----------------------------------------------------------------- */
1da177e4 2178 dataToRead = (wrapgap < bytesAvailable) ? wrapgap : bytesAvailable;
1da177e4
LT
2179 /* --------------------------------------------------------------
2180 Make sure we don't overflow the buffer
2181 ----------------------------------------------------------------- */
33f0f88f 2182 dataToRead = tty_prepare_flip_string(tty, &rptr, dataToRead);
1da177e4
LT
2183 if (dataToRead == 0)
2184 break;
1da177e4
LT
2185 /* ---------------------------------------------------------------
2186 Move data read from our card into the line disciplines buffer
2187 for translation if necessary.
2188 ------------------------------------------------------------------ */
f2cf8e25 2189 memcpy_fromio(rptr, ch->rxptr + tail, dataToRead);
1da177e4
LT
2190 tail = (tail + dataToRead) & wrapmask;
2191 bytesAvailable -= dataToRead;
1da177e4 2192 } /* End while there is data on the card */
1da177e4 2193 globalwinon(ch);
f2cf8e25 2194 writew(tail, &bc->rout);
1da177e4
LT
2195 /* Must be called with global data */
2196 tty_schedule_flip(ch->tty);
2197 return;
1da177e4
LT
2198} /* End receive_data */
2199
2200static int info_ioctl(struct tty_struct *tty, struct file * file,
2201 unsigned int cmd, unsigned long arg)
2202{
2203 switch (cmd)
2204 { /* Begin switch cmd */
1da177e4
LT
2205 case DIGI_GETINFO:
2206 { /* Begin case DIGI_GETINFO */
1da177e4
LT
2207 struct digi_info di ;
2208 int brd;
2209
f2cf8e25
AC
2210 if(get_user(brd, (unsigned int __user *)arg))
2211 return -EFAULT;
2212 if (brd < 0 || brd >= num_cards || num_cards == 0)
2213 return -ENODEV;
1da177e4
LT
2214
2215 memset(&di, 0, sizeof(di));
2216
2217 di.board = brd ;
2218 di.status = boards[brd].status;
2219 di.type = boards[brd].type ;
2220 di.numports = boards[brd].numports ;
f2cf8e25
AC
2221 /* Legacy fixups - just move along nothing to see */
2222 di.port = (unsigned char *)boards[brd].port ;
2223 di.membase = (unsigned char *)boards[brd].membase ;
1da177e4
LT
2224
2225 if (copy_to_user((void __user *)arg, &di, sizeof (di)))
2226 return -EFAULT;
2227 break;
2228
2229 } /* End case DIGI_GETINFO */
2230
2231 case DIGI_POLLER:
2232 { /* Begin case DIGI_POLLER */
2233
2234 int brd = arg & 0xff000000 >> 16 ;
2235 unsigned char state = arg & 0xff ;
2236
f2cf8e25
AC
2237 if (brd < 0 || brd >= num_cards) {
2238 printk(KERN_ERR "epca: DIGI POLLER : brd not valid!\n");
1da177e4
LT
2239 return (-ENODEV);
2240 }
1da177e4
LT
2241 digi_poller_inhibited = state ;
2242 break ;
1da177e4
LT
2243 } /* End case DIGI_POLLER */
2244
2245 case DIGI_INIT:
2246 { /* Begin case DIGI_INIT */
1da177e4
LT
2247 /* ------------------------------------------------------------
2248 This call is made by the apps to complete the initilization
2249 of the board(s). This routine is responsible for setting
2250 the card to its initial state and setting the drivers control
2251 fields to the sutianle settings for the card in question.
2252 ---------------------------------------------------------------- */
1da177e4
LT
2253 int crd ;
2254 for (crd = 0; crd < num_cards; crd++)
2255 post_fep_init (crd);
1da177e4 2256 break ;
1da177e4 2257 } /* End case DIGI_INIT */
1da177e4 2258 default:
f2cf8e25 2259 return -ENOTTY;
1da177e4
LT
2260 } /* End switch cmd */
2261 return (0) ;
2262}
2263/* --------------------- Begin pc_ioctl ----------------------- */
2264
2265static int pc_tiocmget(struct tty_struct *tty, struct file *file)
2266{
2267 struct channel *ch = (struct channel *) tty->driver_data;
bc9a5154 2268 struct board_chan __iomem *bc;
1da177e4
LT
2269 unsigned int mstat, mflag = 0;
2270 unsigned long flags;
2271
2272 if (ch)
2273 bc = ch->brdchan;
2274 else
f2cf8e25 2275 return -EINVAL;
1da177e4 2276
f2cf8e25 2277 spin_lock_irqsave(&epca_lock, flags);
1da177e4 2278 globalwinon(ch);
f2cf8e25 2279 mstat = readb(&bc->mstat);
1da177e4 2280 memoff(ch);
f2cf8e25 2281 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
2282
2283 if (mstat & ch->m_dtr)
2284 mflag |= TIOCM_DTR;
1da177e4
LT
2285 if (mstat & ch->m_rts)
2286 mflag |= TIOCM_RTS;
1da177e4
LT
2287 if (mstat & ch->m_cts)
2288 mflag |= TIOCM_CTS;
1da177e4
LT
2289 if (mstat & ch->dsr)
2290 mflag |= TIOCM_DSR;
1da177e4
LT
2291 if (mstat & ch->m_ri)
2292 mflag |= TIOCM_RI;
1da177e4
LT
2293 if (mstat & ch->dcd)
2294 mflag |= TIOCM_CD;
1da177e4
LT
2295 return mflag;
2296}
2297
2298static int pc_tiocmset(struct tty_struct *tty, struct file *file,
2299 unsigned int set, unsigned int clear)
2300{
2301 struct channel *ch = (struct channel *) tty->driver_data;
2302 unsigned long flags;
2303
f2cf8e25
AC
2304 if (!ch)
2305 return -EINVAL;
1da177e4 2306
f2cf8e25 2307 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
2308 /*
2309 * I think this modemfake stuff is broken. It doesn't
2310 * correctly reflect the behaviour desired by the TIOCM*
2311 * ioctls. Therefore this is probably broken.
2312 */
2313 if (set & TIOCM_RTS) {
2314 ch->modemfake |= ch->m_rts;
2315 ch->modem |= ch->m_rts;
2316 }
2317 if (set & TIOCM_DTR) {
2318 ch->modemfake |= ch->m_dtr;
2319 ch->modem |= ch->m_dtr;
2320 }
2321 if (clear & TIOCM_RTS) {
2322 ch->modemfake |= ch->m_rts;
2323 ch->modem &= ~ch->m_rts;
2324 }
2325 if (clear & TIOCM_DTR) {
2326 ch->modemfake |= ch->m_dtr;
2327 ch->modem &= ~ch->m_dtr;
2328 }
1da177e4 2329 globalwinon(ch);
1da177e4
LT
2330 /* --------------------------------------------------------------
2331 The below routine generally sets up parity, baud, flow control
2332 issues, etc.... It effect both control flags and input flags.
2333 ------------------------------------------------------------------ */
1da177e4
LT
2334 epcaparam(tty,ch);
2335 memoff(ch);
f2cf8e25 2336 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
2337 return 0;
2338}
2339
2340static int pc_ioctl(struct tty_struct *tty, struct file * file,
2341 unsigned int cmd, unsigned long arg)
2342{ /* Begin pc_ioctl */
2343
2344 digiflow_t dflow;
2345 int retval;
2346 unsigned long flags;
2347 unsigned int mflag, mstat;
2348 unsigned char startc, stopc;
bc9a5154 2349 struct board_chan __iomem *bc;
1da177e4
LT
2350 struct channel *ch = (struct channel *) tty->driver_data;
2351 void __user *argp = (void __user *)arg;
2352
2353 if (ch)
2354 bc = ch->brdchan;
2355 else
f2cf8e25 2356 return -EINVAL;
1da177e4
LT
2357
2358 /* -------------------------------------------------------------------
2359 For POSIX compliance we need to add more ioctls. See tty_ioctl.c
2360 in /usr/src/linux/drivers/char for a good example. In particular
2361 think about adding TCSETAF, TCSETAW, TCSETA, TCSETSF, TCSETSW, TCSETS.
2362 ---------------------------------------------------------------------- */
2363
2364 switch (cmd)
2365 { /* Begin switch cmd */
2366
2367 case TCGETS:
f2cf8e25 2368 if (copy_to_user(argp, tty->termios, sizeof(struct termios)))
1da177e4 2369 return -EFAULT;
f2cf8e25 2370 return 0;
1da177e4
LT
2371 case TCGETA:
2372 return get_termio(tty, argp);
1da177e4 2373 case TCSBRK: /* SVID version: non-zero arg --> no break */
1da177e4
LT
2374 retval = tty_check_change(tty);
2375 if (retval)
2376 return retval;
1da177e4 2377 /* Setup an event to indicate when the transmit buffer empties */
f2cf8e25 2378 spin_lock_irqsave(&epca_lock, flags);
1da177e4 2379 setup_empty_event(tty,ch);
f2cf8e25 2380 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
2381 tty_wait_until_sent(tty, 0);
2382 if (!arg)
2383 digi_send_break(ch, HZ/4); /* 1/4 second */
2384 return 0;
1da177e4 2385 case TCSBRKP: /* support for POSIX tcsendbreak() */
1da177e4
LT
2386 retval = tty_check_change(tty);
2387 if (retval)
2388 return retval;
2389
2390 /* Setup an event to indicate when the transmit buffer empties */
f2cf8e25 2391 spin_lock_irqsave(&epca_lock, flags);
1da177e4 2392 setup_empty_event(tty,ch);
f2cf8e25 2393 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
2394 tty_wait_until_sent(tty, 0);
2395 digi_send_break(ch, arg ? arg*(HZ/10) : HZ/4);
2396 return 0;
1da177e4
LT
2397 case TIOCGSOFTCAR:
2398 if (put_user(C_CLOCAL(tty)?1:0, (unsigned long __user *)arg))
2399 return -EFAULT;
2400 return 0;
1da177e4
LT
2401 case TIOCSSOFTCAR:
2402 {
2403 unsigned int value;
2404
2405 if (get_user(value, (unsigned __user *)argp))
2406 return -EFAULT;
2407 tty->termios->c_cflag =
2408 ((tty->termios->c_cflag & ~CLOCAL) |
2409 (value ? CLOCAL : 0));
2410 return 0;
2411 }
1da177e4
LT
2412 case TIOCMODG:
2413 mflag = pc_tiocmget(tty, file);
2414 if (put_user(mflag, (unsigned long __user *)argp))
2415 return -EFAULT;
2416 break;
1da177e4
LT
2417 case TIOCMODS:
2418 if (get_user(mstat, (unsigned __user *)argp))
2419 return -EFAULT;
2420 return pc_tiocmset(tty, file, mstat, ~mstat);
1da177e4 2421 case TIOCSDTR:
f2cf8e25 2422 spin_lock_irqsave(&epca_lock, flags);
1da177e4 2423 ch->omodem |= ch->m_dtr;
1da177e4
LT
2424 globalwinon(ch);
2425 fepcmd(ch, SETMODEM, ch->m_dtr, 0, 10, 1);
2426 memoff(ch);
f2cf8e25 2427 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
2428 break;
2429
2430 case TIOCCDTR:
f2cf8e25 2431 spin_lock_irqsave(&epca_lock, flags);
1da177e4 2432 ch->omodem &= ~ch->m_dtr;
1da177e4
LT
2433 globalwinon(ch);
2434 fepcmd(ch, SETMODEM, 0, ch->m_dtr, 10, 1);
2435 memoff(ch);
f2cf8e25 2436 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 2437 break;
1da177e4
LT
2438 case DIGI_GETA:
2439 if (copy_to_user(argp, &ch->digiext, sizeof(digi_t)))
2440 return -EFAULT;
2441 break;
1da177e4
LT
2442 case DIGI_SETAW:
2443 case DIGI_SETAF:
f2cf8e25 2444 if (cmd == DIGI_SETAW) {
1da177e4 2445 /* Setup an event to indicate when the transmit buffer empties */
f2cf8e25 2446 spin_lock_irqsave(&epca_lock, flags);
1da177e4 2447 setup_empty_event(tty,ch);
f2cf8e25 2448 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 2449 tty_wait_until_sent(tty, 0);
f2cf8e25 2450 } else {
1da177e4
LT
2451 /* ldisc lock already held in ioctl */
2452 if (tty->ldisc.flush_buffer)
2453 tty->ldisc.flush_buffer(tty);
2454 }
1da177e4 2455 /* Fall Thru */
1da177e4
LT
2456 case DIGI_SETA:
2457 if (copy_from_user(&ch->digiext, argp, sizeof(digi_t)))
2458 return -EFAULT;
2459
f2cf8e25 2460 if (ch->digiext.digi_flags & DIGI_ALTPIN) {
1da177e4
LT
2461 ch->dcd = ch->m_dsr;
2462 ch->dsr = ch->m_dcd;
f2cf8e25 2463 } else {
1da177e4
LT
2464 ch->dcd = ch->m_dcd;
2465 ch->dsr = ch->m_dsr;
2466 }
2467
f2cf8e25 2468 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
2469 globalwinon(ch);
2470
2471 /* -----------------------------------------------------------------
2472 The below routine generally sets up parity, baud, flow control
2473 issues, etc.... It effect both control flags and input flags.
2474 ------------------------------------------------------------------- */
2475
2476 epcaparam(tty,ch);
2477 memoff(ch);
f2cf8e25 2478 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
2479 break;
2480
2481 case DIGI_GETFLOW:
2482 case DIGI_GETAFLOW:
f2cf8e25 2483 spin_lock_irqsave(&epca_lock, flags);
1da177e4 2484 globalwinon(ch);
f2cf8e25
AC
2485 if (cmd == DIGI_GETFLOW) {
2486 dflow.startc = readb(&bc->startc);
2487 dflow.stopc = readb(&bc->stopc);
2488 } else {
2489 dflow.startc = readb(&bc->startca);
2490 dflow.stopc = readb(&bc->stopca);
1da177e4
LT
2491 }
2492 memoff(ch);
f2cf8e25 2493 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
2494
2495 if (copy_to_user(argp, &dflow, sizeof(dflow)))
2496 return -EFAULT;
2497 break;
2498
2499 case DIGI_SETAFLOW:
2500 case DIGI_SETFLOW:
f2cf8e25 2501 if (cmd == DIGI_SETFLOW) {
1da177e4
LT
2502 startc = ch->startc;
2503 stopc = ch->stopc;
f2cf8e25 2504 } else {
1da177e4
LT
2505 startc = ch->startca;
2506 stopc = ch->stopca;
2507 }
2508
2509 if (copy_from_user(&dflow, argp, sizeof(dflow)))
2510 return -EFAULT;
2511
f2cf8e25
AC
2512 if (dflow.startc != startc || dflow.stopc != stopc) { /* Begin if setflow toggled */
2513 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
2514 globalwinon(ch);
2515
f2cf8e25 2516 if (cmd == DIGI_SETFLOW) {
1da177e4
LT
2517 ch->fepstartc = ch->startc = dflow.startc;
2518 ch->fepstopc = ch->stopc = dflow.stopc;
2519 fepcmd(ch, SONOFFC, ch->fepstartc, ch->fepstopc, 0, 1);
f2cf8e25 2520 } else {
1da177e4
LT
2521 ch->fepstartca = ch->startca = dflow.startc;
2522 ch->fepstopca = ch->stopca = dflow.stopc;
2523 fepcmd(ch, SAUXONOFFC, ch->fepstartca, ch->fepstopca, 0, 1);
2524 }
2525
f2cf8e25 2526 if (ch->statusflags & TXSTOPPED)
1da177e4
LT
2527 pc_start(tty);
2528
2529 memoff(ch);
f2cf8e25 2530 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
2531 } /* End if setflow toggled */
2532 break;
1da177e4
LT
2533 default:
2534 return -ENOIOCTLCMD;
1da177e4 2535 } /* End switch cmd */
1da177e4 2536 return 0;
1da177e4
LT
2537} /* End pc_ioctl */
2538
2539/* --------------------- Begin pc_set_termios ----------------------- */
2540
2541static void pc_set_termios(struct tty_struct *tty, struct termios *old_termios)
2542{ /* Begin pc_set_termios */
2543
2544 struct channel *ch;
2545 unsigned long flags;
1da177e4
LT
2546 /* ---------------------------------------------------------
2547 verifyChannel returns the channel from the tty struct
2548 if it is valid. This serves as a sanity check.
2549 ------------------------------------------------------------- */
f2cf8e25
AC
2550 if ((ch = verifyChannel(tty)) != NULL) { /* Begin if channel valid */
2551 spin_lock_irqsave(&epca_lock, flags);
1da177e4
LT
2552 globalwinon(ch);
2553 epcaparam(tty, ch);
2554 memoff(ch);
f2cf8e25 2555 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
2556
2557 if ((old_termios->c_cflag & CRTSCTS) &&
2558 ((tty->termios->c_cflag & CRTSCTS) == 0))
2559 tty->hw_stopped = 0;
2560
2561 if (!(old_termios->c_cflag & CLOCAL) &&
2562 (tty->termios->c_cflag & CLOCAL))
2563 wake_up_interruptible(&ch->open_wait);
2564
1da177e4
LT
2565 } /* End if channel valid */
2566
2567} /* End pc_set_termios */
2568
2569/* --------------------- Begin do_softint ----------------------- */
2570
2571static void do_softint(void *private_)
2572{ /* Begin do_softint */
1da177e4 2573 struct channel *ch = (struct channel *) private_;
1da177e4 2574 /* Called in response to a modem change event */
f2cf8e25 2575 if (ch && ch->magic == EPCA_MAGIC) { /* Begin EPCA_MAGIC */
1da177e4
LT
2576 struct tty_struct *tty = ch->tty;
2577
f2cf8e25
AC
2578 if (tty && tty->driver_data) {
2579 if (test_and_clear_bit(EPCA_EVENT_HANGUP, &ch->event)) { /* Begin if clear_bit */
1da177e4
LT
2580 tty_hangup(tty); /* FIXME: module removal race here - AKPM */
2581 wake_up_interruptible(&ch->open_wait);
2582 ch->asyncflags &= ~ASYNC_NORMAL_ACTIVE;
1da177e4
LT
2583 } /* End if clear_bit */
2584 }
1da177e4
LT
2585 } /* End EPCA_MAGIC */
2586} /* End do_softint */
2587
2588/* ------------------------------------------------------------
2589 pc_stop and pc_start provide software flow control to the
2590 routine and the pc_ioctl routine.
2591---------------------------------------------------------------- */
2592
2593/* --------------------- Begin pc_stop ----------------------- */
2594
2595static void pc_stop(struct tty_struct *tty)
2596{ /* Begin pc_stop */
2597
2598 struct channel *ch;
2599 unsigned long flags;
1da177e4
LT
2600 /* ---------------------------------------------------------
2601 verifyChannel returns the channel from the tty struct
2602 if it is valid. This serves as a sanity check.
2603 ------------------------------------------------------------- */
f2cf8e25
AC
2604 if ((ch = verifyChannel(tty)) != NULL) { /* Begin if valid channel */
2605 spin_lock_irqsave(&epca_lock, flags);
2606 if ((ch->statusflags & TXSTOPPED) == 0) { /* Begin if transmit stop requested */
1da177e4 2607 globalwinon(ch);
1da177e4 2608 /* STOP transmitting now !! */
1da177e4 2609 fepcmd(ch, PAUSETX, 0, 0, 0, 0);
1da177e4
LT
2610 ch->statusflags |= TXSTOPPED;
2611 memoff(ch);
1da177e4 2612 } /* End if transmit stop requested */
f2cf8e25 2613 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 2614 } /* End if valid channel */
1da177e4
LT
2615} /* End pc_stop */
2616
2617/* --------------------- Begin pc_start ----------------------- */
2618
2619static void pc_start(struct tty_struct *tty)
2620{ /* Begin pc_start */
1da177e4 2621 struct channel *ch;
1da177e4
LT
2622 /* ---------------------------------------------------------
2623 verifyChannel returns the channel from the tty struct
2624 if it is valid. This serves as a sanity check.
2625 ------------------------------------------------------------- */
f2cf8e25 2626 if ((ch = verifyChannel(tty)) != NULL) { /* Begin if channel valid */
1da177e4 2627 unsigned long flags;
f2cf8e25 2628 spin_lock_irqsave(&epca_lock, flags);
1da177e4 2629 /* Just in case output was resumed because of a change in Digi-flow */
f2cf8e25 2630 if (ch->statusflags & TXSTOPPED) { /* Begin transmit resume requested */
bc9a5154 2631 struct board_chan __iomem *bc;
1da177e4
LT
2632 globalwinon(ch);
2633 bc = ch->brdchan;
2634 if (ch->statusflags & LOWWAIT)
f2cf8e25 2635 writeb(1, &bc->ilow);
1da177e4 2636 /* Okay, you can start transmitting again... */
1da177e4 2637 fepcmd(ch, RESUMETX, 0, 0, 0, 0);
1da177e4
LT
2638 ch->statusflags &= ~TXSTOPPED;
2639 memoff(ch);
1da177e4 2640 } /* End transmit resume requested */
f2cf8e25 2641 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 2642 } /* End if channel valid */
1da177e4
LT
2643} /* End pc_start */
2644
2645/* ------------------------------------------------------------------
2646 The below routines pc_throttle and pc_unthrottle are used
2647 to slow (And resume) the receipt of data into the kernels
2648 receive buffers. The exact occurrence of this depends on the
2649 size of the kernels receive buffer and what the 'watermarks'
2650 are set to for that buffer. See the n_ttys.c file for more
2651 details.
2652______________________________________________________________________ */
2653/* --------------------- Begin throttle ----------------------- */
2654
2655static void pc_throttle(struct tty_struct * tty)
2656{ /* Begin pc_throttle */
1da177e4
LT
2657 struct channel *ch;
2658 unsigned long flags;
1da177e4
LT
2659 /* ---------------------------------------------------------
2660 verifyChannel returns the channel from the tty struct
2661 if it is valid. This serves as a sanity check.
2662 ------------------------------------------------------------- */
f2cf8e25
AC
2663 if ((ch = verifyChannel(tty)) != NULL) { /* Begin if channel valid */
2664 spin_lock_irqsave(&epca_lock, flags);
2665 if ((ch->statusflags & RXSTOPPED) == 0) {
1da177e4
LT
2666 globalwinon(ch);
2667 fepcmd(ch, PAUSERX, 0, 0, 0, 0);
1da177e4
LT
2668 ch->statusflags |= RXSTOPPED;
2669 memoff(ch);
2670 }
f2cf8e25 2671 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 2672 } /* End if channel valid */
1da177e4
LT
2673} /* End pc_throttle */
2674
2675/* --------------------- Begin unthrottle ----------------------- */
2676
2677static void pc_unthrottle(struct tty_struct *tty)
2678{ /* Begin pc_unthrottle */
1da177e4
LT
2679 struct channel *ch;
2680 unsigned long flags;
1da177e4
LT
2681 /* ---------------------------------------------------------
2682 verifyChannel returns the channel from the tty struct
2683 if it is valid. This serves as a sanity check.
2684 ------------------------------------------------------------- */
f2cf8e25 2685 if ((ch = verifyChannel(tty)) != NULL) { /* Begin if channel valid */
1da177e4 2686 /* Just in case output was resumed because of a change in Digi-flow */
f2cf8e25
AC
2687 spin_lock_irqsave(&epca_lock, flags);
2688 if (ch->statusflags & RXSTOPPED) {
1da177e4 2689 globalwinon(ch);
1da177e4 2690 fepcmd(ch, RESUMERX, 0, 0, 0, 0);
1da177e4
LT
2691 ch->statusflags &= ~RXSTOPPED;
2692 memoff(ch);
2693 }
f2cf8e25 2694 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4 2695 } /* End if channel valid */
1da177e4
LT
2696} /* End pc_unthrottle */
2697
2698/* --------------------- Begin digi_send_break ----------------------- */
2699
2700void digi_send_break(struct channel *ch, int msec)
2701{ /* Begin digi_send_break */
1da177e4
LT
2702 unsigned long flags;
2703
f2cf8e25 2704 spin_lock_irqsave(&epca_lock, flags);
1da177e4 2705 globalwinon(ch);
1da177e4
LT
2706 /* --------------------------------------------------------------------
2707 Maybe I should send an infinite break here, schedule() for
2708 msec amount of time, and then stop the break. This way,
2709 the user can't screw up the FEP by causing digi_send_break()
2710 to be called (i.e. via an ioctl()) more than once in msec amount
2711 of time. Try this for now...
2712 ------------------------------------------------------------------------ */
1da177e4
LT
2713 fepcmd(ch, SENDBREAK, msec, 0, 10, 0);
2714 memoff(ch);
f2cf8e25 2715 spin_unlock_irqrestore(&epca_lock, flags);
1da177e4
LT
2716} /* End digi_send_break */
2717
2718/* --------------------- Begin setup_empty_event ----------------------- */
2719
f2cf8e25
AC
2720/* Caller MUST hold the lock */
2721
1da177e4
LT
2722static void setup_empty_event(struct tty_struct *tty, struct channel *ch)
2723{ /* Begin setup_empty_event */
2724
bc9a5154 2725 struct board_chan __iomem *bc = ch->brdchan;
1da177e4 2726
1da177e4
LT
2727 globalwinon(ch);
2728 ch->statusflags |= EMPTYWAIT;
1da177e4
LT
2729 /* ------------------------------------------------------------------
2730 When set the iempty flag request a event to be generated when the
2731 transmit buffer is empty (If there is no BREAK in progress).
2732 --------------------------------------------------------------------- */
f2cf8e25 2733 writeb(1, &bc->iempty);
1da177e4 2734 memoff(ch);
1da177e4
LT
2735} /* End setup_empty_event */
2736
2737/* --------------------- Begin get_termio ----------------------- */
2738
2739static int get_termio(struct tty_struct * tty, struct termio __user * termio)
2740{ /* Begin get_termio */
2741 return kernel_termios_to_user_termio(termio, tty->termios);
2742} /* End get_termio */
f2cf8e25 2743
1da177e4
LT
2744/* ---------------------- Begin epca_setup -------------------------- */
2745void epca_setup(char *str, int *ints)
2746{ /* Begin epca_setup */
1da177e4
LT
2747 struct board_info board;
2748 int index, loop, last;
2749 char *temp, *t2;
2750 unsigned len;
2751
2752 /* ----------------------------------------------------------------------
2753 If this routine looks a little strange it is because it is only called
2754 if a LILO append command is given to boot the kernel with parameters.
2755 In this way, we can provide the user a method of changing his board
2756 configuration without rebuilding the kernel.
2757 ----------------------------------------------------------------------- */
2758 if (!liloconfig)
2759 liloconfig = 1;
2760
2761 memset(&board, 0, sizeof(board));
2762
2763 /* Assume the data is int first, later we can change it */
2764 /* I think that array position 0 of ints holds the number of args */
2765 for (last = 0, index = 1; index <= ints[0]; index++)
2766 switch(index)
2767 { /* Begin parse switch */
1da177e4
LT
2768 case 1:
2769 board.status = ints[index];
1da177e4
LT
2770 /* ---------------------------------------------------------
2771 We check for 2 (As opposed to 1; because 2 is a flag
2772 instructing the driver to ignore epcaconfig.) For this
2773 reason we check for 2.
2774 ------------------------------------------------------------ */
f2cf8e25 2775 if (board.status == 2) { /* Begin ignore epcaconfig as well as lilo cmd line */
1da177e4
LT
2776 nbdevs = 0;
2777 num_cards = 0;
2778 return;
2779 } /* End ignore epcaconfig as well as lilo cmd line */
2780
f2cf8e25
AC
2781 if (board.status > 2) {
2782 printk(KERN_ERR "epca_setup: Invalid board status 0x%x\n", board.status);
1da177e4
LT
2783 invalid_lilo_config = 1;
2784 setup_error_code |= INVALID_BOARD_STATUS;
2785 return;
2786 }
2787 last = index;
2788 break;
1da177e4
LT
2789 case 2:
2790 board.type = ints[index];
f2cf8e25
AC
2791 if (board.type >= PCIXEM) {
2792 printk(KERN_ERR "epca_setup: Invalid board type 0x%x\n", board.type);
1da177e4
LT
2793 invalid_lilo_config = 1;
2794 setup_error_code |= INVALID_BOARD_TYPE;
2795 return;
2796 }
2797 last = index;
2798 break;
1da177e4
LT
2799 case 3:
2800 board.altpin = ints[index];
f2cf8e25
AC
2801 if (board.altpin > 1) {
2802 printk(KERN_ERR "epca_setup: Invalid board altpin 0x%x\n", board.altpin);
1da177e4
LT
2803 invalid_lilo_config = 1;
2804 setup_error_code |= INVALID_ALTPIN;
2805 return;
2806 }
2807 last = index;
2808 break;
2809
2810 case 4:
2811 board.numports = ints[index];
f2cf8e25
AC
2812 if (board.numports < 2 || board.numports > 256) {
2813 printk(KERN_ERR "epca_setup: Invalid board numports 0x%x\n", board.numports);
1da177e4
LT
2814 invalid_lilo_config = 1;
2815 setup_error_code |= INVALID_NUM_PORTS;
2816 return;
2817 }
2818 nbdevs += board.numports;
2819 last = index;
2820 break;
2821
2822 case 5:
f2cf8e25
AC
2823 board.port = ints[index];
2824 if (ints[index] <= 0) {
2825 printk(KERN_ERR "epca_setup: Invalid io port 0x%x\n", (unsigned int)board.port);
1da177e4
LT
2826 invalid_lilo_config = 1;
2827 setup_error_code |= INVALID_PORT_BASE;
2828 return;
2829 }
2830 last = index;
2831 break;
2832
2833 case 6:
f2cf8e25
AC
2834 board.membase = ints[index];
2835 if (ints[index] <= 0) {
2836 printk(KERN_ERR "epca_setup: Invalid memory base 0x%x\n",(unsigned int)board.membase);
1da177e4
LT
2837 invalid_lilo_config = 1;
2838 setup_error_code |= INVALID_MEM_BASE;
2839 return;
2840 }
2841 last = index;
2842 break;
2843
2844 default:
2845 printk(KERN_ERR "<Error> - epca_setup: Too many integer parms\n");
2846 return;
2847
2848 } /* End parse switch */
2849
f2cf8e25 2850 while (str && *str) { /* Begin while there is a string arg */
1da177e4
LT
2851 /* find the next comma or terminator */
2852 temp = str;
1da177e4
LT
2853 /* While string is not null, and a comma hasn't been found */
2854 while (*temp && (*temp != ','))
2855 temp++;
1da177e4
LT
2856 if (!*temp)
2857 temp = NULL;
2858 else
2859 *temp++ = 0;
1da177e4
LT
2860 /* Set index to the number of args + 1 */
2861 index = last + 1;
2862
2863 switch(index)
2864 {
2865 case 1:
2866 len = strlen(str);
2867 if (strncmp("Disable", str, len) == 0)
2868 board.status = 0;
f2cf8e25 2869 else if (strncmp("Enable", str, len) == 0)
1da177e4 2870 board.status = 1;
f2cf8e25
AC
2871 else {
2872 printk(KERN_ERR "epca_setup: Invalid status %s\n", str);
1da177e4
LT
2873 invalid_lilo_config = 1;
2874 setup_error_code |= INVALID_BOARD_STATUS;
2875 return;
2876 }
2877 last = index;
2878 break;
2879
2880 case 2:
1da177e4
LT
2881 for(loop = 0; loop < EPCA_NUM_TYPES; loop++)
2882 if (strcmp(board_desc[loop], str) == 0)
2883 break;
1da177e4
LT
2884 /* ---------------------------------------------------------------
2885 If the index incremented above refers to a legitamate board
2886 type set it here.
2887 ------------------------------------------------------------------*/
1da177e4
LT
2888 if (index < EPCA_NUM_TYPES)
2889 board.type = loop;
f2cf8e25
AC
2890 else {
2891 printk(KERN_ERR "epca_setup: Invalid board type: %s\n", str);
1da177e4
LT
2892 invalid_lilo_config = 1;
2893 setup_error_code |= INVALID_BOARD_TYPE;
2894 return;
2895 }
2896 last = index;
2897 break;
2898
2899 case 3:
2900 len = strlen(str);
2901 if (strncmp("Disable", str, len) == 0)
2902 board.altpin = 0;
f2cf8e25 2903 else if (strncmp("Enable", str, len) == 0)
1da177e4 2904 board.altpin = 1;
f2cf8e25
AC
2905 else {
2906 printk(KERN_ERR "epca_setup: Invalid altpin %s\n", str);
1da177e4
LT
2907 invalid_lilo_config = 1;
2908 setup_error_code |= INVALID_ALTPIN;
2909 return;
2910 }
2911 last = index;
2912 break;
2913
2914 case 4:
2915 t2 = str;
2916 while (isdigit(*t2))
2917 t2++;
2918
f2cf8e25
AC
2919 if (*t2) {
2920 printk(KERN_ERR "epca_setup: Invalid port count %s\n", str);
1da177e4
LT
2921 invalid_lilo_config = 1;
2922 setup_error_code |= INVALID_NUM_PORTS;
2923 return;
2924 }
2925
2926 /* ------------------------------------------------------------
2927 There is not a man page for simple_strtoul but the code can be
2928 found in vsprintf.c. The first argument is the string to
2929 translate (To an unsigned long obviously), the second argument
2930 can be the address of any character variable or a NULL. If a
2931 variable is given, the end pointer of the string will be stored
2932 in that variable; if a NULL is given the end pointer will
2933 not be returned. The last argument is the base to use. If
2934 a 0 is indicated, the routine will attempt to determine the
2935 proper base by looking at the values prefix (A '0' for octal,
2936 a 'x' for hex, etc ... If a value is given it will use that
2937 value as the base.
2938 ---------------------------------------------------------------- */
2939 board.numports = simple_strtoul(str, NULL, 0);
2940 nbdevs += board.numports;
2941 last = index;
2942 break;
2943
2944 case 5:
2945 t2 = str;
2946 while (isxdigit(*t2))
2947 t2++;
2948
f2cf8e25
AC
2949 if (*t2) {
2950 printk(KERN_ERR "epca_setup: Invalid i/o address %s\n", str);
1da177e4
LT
2951 invalid_lilo_config = 1;
2952 setup_error_code |= INVALID_PORT_BASE;
2953 return;
2954 }
2955
f2cf8e25 2956 board.port = simple_strtoul(str, NULL, 16);
1da177e4
LT
2957 last = index;
2958 break;
2959
2960 case 6:
2961 t2 = str;
2962 while (isxdigit(*t2))
2963 t2++;
2964
f2cf8e25
AC
2965 if (*t2) {
2966 printk(KERN_ERR "epca_setup: Invalid memory base %s\n",str);
1da177e4
LT
2967 invalid_lilo_config = 1;
2968 setup_error_code |= INVALID_MEM_BASE;
2969 return;
2970 }
f2cf8e25 2971 board.membase = simple_strtoul(str, NULL, 16);
1da177e4
LT
2972 last = index;
2973 break;
1da177e4 2974 default:
f2cf8e25 2975 printk(KERN_ERR "epca: Too many string parms\n");
1da177e4
LT
2976 return;
2977 }
2978 str = temp;
1da177e4
LT
2979 } /* End while there is a string arg */
2980
f2cf8e25
AC
2981 if (last < 6) {
2982 printk(KERN_ERR "epca: Insufficient parms specified\n");
1da177e4
LT
2983 return;
2984 }
2985
2986 /* I should REALLY validate the stuff here */
1da177e4
LT
2987 /* Copies our local copy of board into boards */
2988 memcpy((void *)&boards[num_cards],(void *)&board, sizeof(board));
1da177e4 2989 /* Does this get called once per lilo arg are what ? */
1da177e4
LT
2990 printk(KERN_INFO "PC/Xx: Added board %i, %s %i ports at 0x%4.4X base 0x%6.6X\n",
2991 num_cards, board_desc[board.type],
2992 board.numports, (int)board.port, (unsigned int) board.membase);
1da177e4 2993 num_cards++;
1da177e4
LT
2994} /* End epca_setup */
2995
2996
1da177e4
LT
2997/* ------------------------ Begin init_PCI --------------------------- */
2998
2999enum epic_board_types {
3000 brd_xr = 0,
3001 brd_xem,
3002 brd_cx,
3003 brd_xrj,
3004};
3005
3006
3007/* indexed directly by epic_board_types enum */
3008static struct {
3009 unsigned char board_type;
3010 unsigned bar_idx; /* PCI base address region */
3011} epca_info_tbl[] = {
3012 { PCIXR, 0, },
3013 { PCIXEM, 0, },
3014 { PCICX, 0, },
3015 { PCIXRJ, 2, },
3016};
3017
1da177e4
LT
3018static int __devinit epca_init_one (struct pci_dev *pdev,
3019 const struct pci_device_id *ent)
3020{
3021 static int board_num = -1;
3022 int board_idx, info_idx = ent->driver_data;
3023 unsigned long addr;
3024
3025 if (pci_enable_device(pdev))
3026 return -EIO;
3027
3028 board_num++;
3029 board_idx = board_num + num_cards;
3030 if (board_idx >= MAXBOARDS)
3031 goto err_out;
3032
3033 addr = pci_resource_start (pdev, epca_info_tbl[info_idx].bar_idx);
3034 if (!addr) {
3035 printk (KERN_ERR PFX "PCI region #%d not available (size 0)\n",
3036 epca_info_tbl[info_idx].bar_idx);
3037 goto err_out;
3038 }
3039
3040 boards[board_idx].status = ENABLED;
3041 boards[board_idx].type = epca_info_tbl[info_idx].board_type;
3042 boards[board_idx].numports = 0x0;
f2cf8e25
AC
3043 boards[board_idx].port = addr + PCI_IO_OFFSET;
3044 boards[board_idx].membase = addr;
1da177e4
LT
3045
3046 if (!request_mem_region (addr + PCI_IO_OFFSET, 0x200000, "epca")) {
3047 printk (KERN_ERR PFX "resource 0x%x @ 0x%lx unavailable\n",
3048 0x200000, addr + PCI_IO_OFFSET);
3049 goto err_out;
3050 }
3051
3052 boards[board_idx].re_map_port = ioremap(addr + PCI_IO_OFFSET, 0x200000);
3053 if (!boards[board_idx].re_map_port) {
3054 printk (KERN_ERR PFX "cannot map 0x%x @ 0x%lx\n",
3055 0x200000, addr + PCI_IO_OFFSET);
3056 goto err_out_free_pciio;
3057 }
3058
3059 if (!request_mem_region (addr, 0x200000, "epca")) {
3060 printk (KERN_ERR PFX "resource 0x%x @ 0x%lx unavailable\n",
3061 0x200000, addr);
3062 goto err_out_free_iounmap;
3063 }
3064
3065 boards[board_idx].re_map_membase = ioremap(addr, 0x200000);
3066 if (!boards[board_idx].re_map_membase) {
3067 printk (KERN_ERR PFX "cannot map 0x%x @ 0x%lx\n",
3068 0x200000, addr + PCI_IO_OFFSET);
3069 goto err_out_free_memregion;
3070 }
3071
3072 /* --------------------------------------------------------------
3073 I don't know what the below does, but the hardware guys say
3074 its required on everything except PLX (In this case XRJ).
3075 ---------------------------------------------------------------- */
3076 if (info_idx != brd_xrj) {
3077 pci_write_config_byte(pdev, 0x40, 0);
3078 pci_write_config_byte(pdev, 0x46, 0);
3079 }
3080
3081 return 0;
3082
3083err_out_free_memregion:
3084 release_mem_region (addr, 0x200000);
3085err_out_free_iounmap:
3086 iounmap (boards[board_idx].re_map_port);
3087err_out_free_pciio:
3088 release_mem_region (addr + PCI_IO_OFFSET, 0x200000);
3089err_out:
3090 return -ENODEV;
3091}
3092
3093
3094static struct pci_device_id epca_pci_tbl[] = {
3095 { PCI_VENDOR_DIGI, PCI_DEVICE_XR, PCI_ANY_ID, PCI_ANY_ID, 0, 0, brd_xr },
3096 { PCI_VENDOR_DIGI, PCI_DEVICE_XEM, PCI_ANY_ID, PCI_ANY_ID, 0, 0, brd_xem },
3097 { PCI_VENDOR_DIGI, PCI_DEVICE_CX, PCI_ANY_ID, PCI_ANY_ID, 0, 0, brd_cx },
3098 { PCI_VENDOR_DIGI, PCI_DEVICE_XRJ, PCI_ANY_ID, PCI_ANY_ID, 0, 0, brd_xrj },
3099 { 0, }
3100};
3101
3102MODULE_DEVICE_TABLE(pci, epca_pci_tbl);
3103
3104int __init init_PCI (void)
f2cf8e25 3105{ /* Begin init_PCI */
1da177e4
LT
3106 memset (&epca_driver, 0, sizeof (epca_driver));
3107 epca_driver.name = "epca";
3108 epca_driver.id_table = epca_pci_tbl;
3109 epca_driver.probe = epca_init_one;
3110
3111 return pci_register_driver(&epca_driver);
f2cf8e25 3112}
1da177e4
LT
3113
3114MODULE_LICENSE("GPL");