Merge git://git.kernel.org/pub/scm/linux/kernel/git/arjan/linux-2.6-async
[GitHub/mt8127/android_kernel_alcatel_ttab.git] / drivers / char / rocket.c
1 /*
2 * RocketPort device driver for Linux
3 *
4 * Written by Theodore Ts'o, 1995, 1996, 1997, 1998, 1999, 2000.
5 *
6 * Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2003 by Comtrol, Inc.
7 *
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of the
11 * License, or (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful, but
14 * WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 */
22
23 /*
24 * Kernel Synchronization:
25 *
26 * This driver has 2 kernel control paths - exception handlers (calls into the driver
27 * from user mode) and the timer bottom half (tasklet). This is a polled driver, interrupts
28 * are not used.
29 *
30 * Critical data:
31 * - rp_table[], accessed through passed "info" pointers, is a global (static) array of
32 * serial port state information and the xmit_buf circular buffer. Protected by
33 * a per port spinlock.
34 * - xmit_flags[], an array of ints indexed by line (port) number, indicating that there
35 * is data to be transmitted. Protected by atomic bit operations.
36 * - rp_num_ports, int indicating number of open ports, protected by atomic operations.
37 *
38 * rp_write() and rp_write_char() functions use a per port semaphore to protect against
39 * simultaneous access to the same port by more than one process.
40 */
41
42 /****** Defines ******/
43 #define ROCKET_PARANOIA_CHECK
44 #define ROCKET_DISABLE_SIMUSAGE
45
46 #undef ROCKET_SOFT_FLOW
47 #undef ROCKET_DEBUG_OPEN
48 #undef ROCKET_DEBUG_INTR
49 #undef ROCKET_DEBUG_WRITE
50 #undef ROCKET_DEBUG_FLOW
51 #undef ROCKET_DEBUG_THROTTLE
52 #undef ROCKET_DEBUG_WAIT_UNTIL_SENT
53 #undef ROCKET_DEBUG_RECEIVE
54 #undef ROCKET_DEBUG_HANGUP
55 #undef REV_PCI_ORDER
56 #undef ROCKET_DEBUG_IO
57
58 #define POLL_PERIOD HZ/100 /* Polling period .01 seconds (10ms) */
59
60 /****** Kernel includes ******/
61
62 #include <linux/module.h>
63 #include <linux/errno.h>
64 #include <linux/major.h>
65 #include <linux/kernel.h>
66 #include <linux/signal.h>
67 #include <linux/slab.h>
68 #include <linux/mm.h>
69 #include <linux/sched.h>
70 #include <linux/timer.h>
71 #include <linux/interrupt.h>
72 #include <linux/tty.h>
73 #include <linux/tty_driver.h>
74 #include <linux/tty_flip.h>
75 #include <linux/serial.h>
76 #include <linux/string.h>
77 #include <linux/fcntl.h>
78 #include <linux/ptrace.h>
79 #include <linux/mutex.h>
80 #include <linux/ioport.h>
81 #include <linux/delay.h>
82 #include <linux/completion.h>
83 #include <linux/wait.h>
84 #include <linux/pci.h>
85 #include <linux/uaccess.h>
86 #include <asm/atomic.h>
87 #include <asm/unaligned.h>
88 #include <linux/bitops.h>
89 #include <linux/spinlock.h>
90 #include <linux/init.h>
91
92 /****** RocketPort includes ******/
93
94 #include "rocket_int.h"
95 #include "rocket.h"
96
97 #define ROCKET_VERSION "2.09"
98 #define ROCKET_DATE "12-June-2003"
99
100 /****** RocketPort Local Variables ******/
101
102 static void rp_do_poll(unsigned long dummy);
103
104 static struct tty_driver *rocket_driver;
105
106 static struct rocket_version driver_version = {
107 ROCKET_VERSION, ROCKET_DATE
108 };
109
110 static struct r_port *rp_table[MAX_RP_PORTS]; /* The main repository of serial port state information. */
111 static unsigned int xmit_flags[NUM_BOARDS]; /* Bit significant, indicates port had data to transmit. */
112 /* eg. Bit 0 indicates port 0 has xmit data, ... */
113 static atomic_t rp_num_ports_open; /* Number of serial ports open */
114 static DEFINE_TIMER(rocket_timer, rp_do_poll, 0, 0);
115
116 static unsigned long board1; /* ISA addresses, retrieved from rocketport.conf */
117 static unsigned long board2;
118 static unsigned long board3;
119 static unsigned long board4;
120 static unsigned long controller;
121 static int support_low_speed;
122 static unsigned long modem1;
123 static unsigned long modem2;
124 static unsigned long modem3;
125 static unsigned long modem4;
126 static unsigned long pc104_1[8];
127 static unsigned long pc104_2[8];
128 static unsigned long pc104_3[8];
129 static unsigned long pc104_4[8];
130 static unsigned long *pc104[4] = { pc104_1, pc104_2, pc104_3, pc104_4 };
131
132 static int rp_baud_base[NUM_BOARDS]; /* Board config info (Someday make a per-board structure) */
133 static unsigned long rcktpt_io_addr[NUM_BOARDS];
134 static int rcktpt_type[NUM_BOARDS];
135 static int is_PCI[NUM_BOARDS];
136 static rocketModel_t rocketModel[NUM_BOARDS];
137 static int max_board;
138 static const struct tty_port_operations rocket_port_ops;
139
140 /*
141 * The following arrays define the interrupt bits corresponding to each AIOP.
142 * These bits are different between the ISA and regular PCI boards and the
143 * Universal PCI boards.
144 */
145
146 static Word_t aiop_intr_bits[AIOP_CTL_SIZE] = {
147 AIOP_INTR_BIT_0,
148 AIOP_INTR_BIT_1,
149 AIOP_INTR_BIT_2,
150 AIOP_INTR_BIT_3
151 };
152
153 static Word_t upci_aiop_intr_bits[AIOP_CTL_SIZE] = {
154 UPCI_AIOP_INTR_BIT_0,
155 UPCI_AIOP_INTR_BIT_1,
156 UPCI_AIOP_INTR_BIT_2,
157 UPCI_AIOP_INTR_BIT_3
158 };
159
160 static Byte_t RData[RDATASIZE] = {
161 0x00, 0x09, 0xf6, 0x82,
162 0x02, 0x09, 0x86, 0xfb,
163 0x04, 0x09, 0x00, 0x0a,
164 0x06, 0x09, 0x01, 0x0a,
165 0x08, 0x09, 0x8a, 0x13,
166 0x0a, 0x09, 0xc5, 0x11,
167 0x0c, 0x09, 0x86, 0x85,
168 0x0e, 0x09, 0x20, 0x0a,
169 0x10, 0x09, 0x21, 0x0a,
170 0x12, 0x09, 0x41, 0xff,
171 0x14, 0x09, 0x82, 0x00,
172 0x16, 0x09, 0x82, 0x7b,
173 0x18, 0x09, 0x8a, 0x7d,
174 0x1a, 0x09, 0x88, 0x81,
175 0x1c, 0x09, 0x86, 0x7a,
176 0x1e, 0x09, 0x84, 0x81,
177 0x20, 0x09, 0x82, 0x7c,
178 0x22, 0x09, 0x0a, 0x0a
179 };
180
181 static Byte_t RRegData[RREGDATASIZE] = {
182 0x00, 0x09, 0xf6, 0x82, /* 00: Stop Rx processor */
183 0x08, 0x09, 0x8a, 0x13, /* 04: Tx software flow control */
184 0x0a, 0x09, 0xc5, 0x11, /* 08: XON char */
185 0x0c, 0x09, 0x86, 0x85, /* 0c: XANY */
186 0x12, 0x09, 0x41, 0xff, /* 10: Rx mask char */
187 0x14, 0x09, 0x82, 0x00, /* 14: Compare/Ignore #0 */
188 0x16, 0x09, 0x82, 0x7b, /* 18: Compare #1 */
189 0x18, 0x09, 0x8a, 0x7d, /* 1c: Compare #2 */
190 0x1a, 0x09, 0x88, 0x81, /* 20: Interrupt #1 */
191 0x1c, 0x09, 0x86, 0x7a, /* 24: Ignore/Replace #1 */
192 0x1e, 0x09, 0x84, 0x81, /* 28: Interrupt #2 */
193 0x20, 0x09, 0x82, 0x7c, /* 2c: Ignore/Replace #2 */
194 0x22, 0x09, 0x0a, 0x0a /* 30: Rx FIFO Enable */
195 };
196
197 static CONTROLLER_T sController[CTL_SIZE] = {
198 {-1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, {0, 0, 0, 0},
199 {0, 0, 0, 0}, {-1, -1, -1, -1}, {0, 0, 0, 0}},
200 {-1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, {0, 0, 0, 0},
201 {0, 0, 0, 0}, {-1, -1, -1, -1}, {0, 0, 0, 0}},
202 {-1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, {0, 0, 0, 0},
203 {0, 0, 0, 0}, {-1, -1, -1, -1}, {0, 0, 0, 0}},
204 {-1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, {0, 0, 0, 0},
205 {0, 0, 0, 0}, {-1, -1, -1, -1}, {0, 0, 0, 0}}
206 };
207
208 static Byte_t sBitMapClrTbl[8] = {
209 0xfe, 0xfd, 0xfb, 0xf7, 0xef, 0xdf, 0xbf, 0x7f
210 };
211
212 static Byte_t sBitMapSetTbl[8] = {
213 0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80
214 };
215
216 static int sClockPrescale = 0x14;
217
218 /*
219 * Line number is the ttySIx number (x), the Minor number. We
220 * assign them sequentially, starting at zero. The following
221 * array keeps track of the line number assigned to a given board/aiop/channel.
222 */
223 static unsigned char lineNumbers[MAX_RP_PORTS];
224 static unsigned long nextLineNumber;
225
226 /***** RocketPort Static Prototypes *********/
227 static int __init init_ISA(int i);
228 static void rp_wait_until_sent(struct tty_struct *tty, int timeout);
229 static void rp_flush_buffer(struct tty_struct *tty);
230 static void rmSpeakerReset(CONTROLLER_T * CtlP, unsigned long model);
231 static unsigned char GetLineNumber(int ctrl, int aiop, int ch);
232 static unsigned char SetLineNumber(int ctrl, int aiop, int ch);
233 static void rp_start(struct tty_struct *tty);
234 static int sInitChan(CONTROLLER_T * CtlP, CHANNEL_T * ChP, int AiopNum,
235 int ChanNum);
236 static void sSetInterfaceMode(CHANNEL_T * ChP, Byte_t mode);
237 static void sFlushRxFIFO(CHANNEL_T * ChP);
238 static void sFlushTxFIFO(CHANNEL_T * ChP);
239 static void sEnInterrupts(CHANNEL_T * ChP, Word_t Flags);
240 static void sDisInterrupts(CHANNEL_T * ChP, Word_t Flags);
241 static void sModemReset(CONTROLLER_T * CtlP, int chan, int on);
242 static void sPCIModemReset(CONTROLLER_T * CtlP, int chan, int on);
243 static int sWriteTxPrioByte(CHANNEL_T * ChP, Byte_t Data);
244 static int sPCIInitController(CONTROLLER_T * CtlP, int CtlNum,
245 ByteIO_t * AiopIOList, int AiopIOListSize,
246 WordIO_t ConfigIO, int IRQNum, Byte_t Frequency,
247 int PeriodicOnly, int altChanRingIndicator,
248 int UPCIRingInd);
249 static int sInitController(CONTROLLER_T * CtlP, int CtlNum, ByteIO_t MudbacIO,
250 ByteIO_t * AiopIOList, int AiopIOListSize,
251 int IRQNum, Byte_t Frequency, int PeriodicOnly);
252 static int sReadAiopID(ByteIO_t io);
253 static int sReadAiopNumChan(WordIO_t io);
254
255 MODULE_AUTHOR("Theodore Ts'o");
256 MODULE_DESCRIPTION("Comtrol RocketPort driver");
257 module_param(board1, ulong, 0);
258 MODULE_PARM_DESC(board1, "I/O port for (ISA) board #1");
259 module_param(board2, ulong, 0);
260 MODULE_PARM_DESC(board2, "I/O port for (ISA) board #2");
261 module_param(board3, ulong, 0);
262 MODULE_PARM_DESC(board3, "I/O port for (ISA) board #3");
263 module_param(board4, ulong, 0);
264 MODULE_PARM_DESC(board4, "I/O port for (ISA) board #4");
265 module_param(controller, ulong, 0);
266 MODULE_PARM_DESC(controller, "I/O port for (ISA) rocketport controller");
267 module_param(support_low_speed, bool, 0);
268 MODULE_PARM_DESC(support_low_speed, "1 means support 50 baud, 0 means support 460400 baud");
269 module_param(modem1, ulong, 0);
270 MODULE_PARM_DESC(modem1, "1 means (ISA) board #1 is a RocketModem");
271 module_param(modem2, ulong, 0);
272 MODULE_PARM_DESC(modem2, "1 means (ISA) board #2 is a RocketModem");
273 module_param(modem3, ulong, 0);
274 MODULE_PARM_DESC(modem3, "1 means (ISA) board #3 is a RocketModem");
275 module_param(modem4, ulong, 0);
276 MODULE_PARM_DESC(modem4, "1 means (ISA) board #4 is a RocketModem");
277 module_param_array(pc104_1, ulong, NULL, 0);
278 MODULE_PARM_DESC(pc104_1, "set interface types for ISA(PC104) board #1 (e.g. pc104_1=232,232,485,485,...");
279 module_param_array(pc104_2, ulong, NULL, 0);
280 MODULE_PARM_DESC(pc104_2, "set interface types for ISA(PC104) board #2 (e.g. pc104_2=232,232,485,485,...");
281 module_param_array(pc104_3, ulong, NULL, 0);
282 MODULE_PARM_DESC(pc104_3, "set interface types for ISA(PC104) board #3 (e.g. pc104_3=232,232,485,485,...");
283 module_param_array(pc104_4, ulong, NULL, 0);
284 MODULE_PARM_DESC(pc104_4, "set interface types for ISA(PC104) board #4 (e.g. pc104_4=232,232,485,485,...");
285
286 static int rp_init(void);
287 static void rp_cleanup_module(void);
288
289 module_init(rp_init);
290 module_exit(rp_cleanup_module);
291
292
293 MODULE_LICENSE("Dual BSD/GPL");
294
295 /*************************************************************************/
296 /* Module code starts here */
297
298 static inline int rocket_paranoia_check(struct r_port *info,
299 const char *routine)
300 {
301 #ifdef ROCKET_PARANOIA_CHECK
302 if (!info)
303 return 1;
304 if (info->magic != RPORT_MAGIC) {
305 printk(KERN_WARNING "Warning: bad magic number for rocketport "
306 "struct in %s\n", routine);
307 return 1;
308 }
309 #endif
310 return 0;
311 }
312
313
314 /* Serial port receive data function. Called (from timer poll) when an AIOPIC signals
315 * that receive data is present on a serial port. Pulls data from FIFO, moves it into the
316 * tty layer.
317 */
318 static void rp_do_receive(struct r_port *info,
319 struct tty_struct *tty,
320 CHANNEL_t * cp, unsigned int ChanStatus)
321 {
322 unsigned int CharNStat;
323 int ToRecv, wRecv, space;
324 unsigned char *cbuf;
325
326 ToRecv = sGetRxCnt(cp);
327 #ifdef ROCKET_DEBUG_INTR
328 printk(KERN_INFO "rp_do_receive(%d)...\n", ToRecv);
329 #endif
330 if (ToRecv == 0)
331 return;
332
333 /*
334 * if status indicates there are errored characters in the
335 * FIFO, then enter status mode (a word in FIFO holds
336 * character and status).
337 */
338 if (ChanStatus & (RXFOVERFL | RXBREAK | RXFRAME | RXPARITY)) {
339 if (!(ChanStatus & STATMODE)) {
340 #ifdef ROCKET_DEBUG_RECEIVE
341 printk(KERN_INFO "Entering STATMODE...\n");
342 #endif
343 ChanStatus |= STATMODE;
344 sEnRxStatusMode(cp);
345 }
346 }
347
348 /*
349 * if we previously entered status mode, then read down the
350 * FIFO one word at a time, pulling apart the character and
351 * the status. Update error counters depending on status
352 */
353 if (ChanStatus & STATMODE) {
354 #ifdef ROCKET_DEBUG_RECEIVE
355 printk(KERN_INFO "Ignore %x, read %x...\n",
356 info->ignore_status_mask, info->read_status_mask);
357 #endif
358 while (ToRecv) {
359 char flag;
360
361 CharNStat = sInW(sGetTxRxDataIO(cp));
362 #ifdef ROCKET_DEBUG_RECEIVE
363 printk(KERN_INFO "%x...\n", CharNStat);
364 #endif
365 if (CharNStat & STMBREAKH)
366 CharNStat &= ~(STMFRAMEH | STMPARITYH);
367 if (CharNStat & info->ignore_status_mask) {
368 ToRecv--;
369 continue;
370 }
371 CharNStat &= info->read_status_mask;
372 if (CharNStat & STMBREAKH)
373 flag = TTY_BREAK;
374 else if (CharNStat & STMPARITYH)
375 flag = TTY_PARITY;
376 else if (CharNStat & STMFRAMEH)
377 flag = TTY_FRAME;
378 else if (CharNStat & STMRCVROVRH)
379 flag = TTY_OVERRUN;
380 else
381 flag = TTY_NORMAL;
382 tty_insert_flip_char(tty, CharNStat & 0xff, flag);
383 ToRecv--;
384 }
385
386 /*
387 * after we've emptied the FIFO in status mode, turn
388 * status mode back off
389 */
390 if (sGetRxCnt(cp) == 0) {
391 #ifdef ROCKET_DEBUG_RECEIVE
392 printk(KERN_INFO "Status mode off.\n");
393 #endif
394 sDisRxStatusMode(cp);
395 }
396 } else {
397 /*
398 * we aren't in status mode, so read down the FIFO two
399 * characters at time by doing repeated word IO
400 * transfer.
401 */
402 space = tty_prepare_flip_string(tty, &cbuf, ToRecv);
403 if (space < ToRecv) {
404 #ifdef ROCKET_DEBUG_RECEIVE
405 printk(KERN_INFO "rp_do_receive:insufficient space ToRecv=%d space=%d\n", ToRecv, space);
406 #endif
407 if (space <= 0)
408 return;
409 ToRecv = space;
410 }
411 wRecv = ToRecv >> 1;
412 if (wRecv)
413 sInStrW(sGetTxRxDataIO(cp), (unsigned short *) cbuf, wRecv);
414 if (ToRecv & 1)
415 cbuf[ToRecv - 1] = sInB(sGetTxRxDataIO(cp));
416 }
417 /* Push the data up to the tty layer */
418 tty_flip_buffer_push(tty);
419 }
420
421 /*
422 * Serial port transmit data function. Called from the timer polling loop as a
423 * result of a bit set in xmit_flags[], indicating data (from the tty layer) is ready
424 * to be sent out the serial port. Data is buffered in rp_table[line].xmit_buf, it is
425 * moved to the port's xmit FIFO. *info is critical data, protected by spinlocks.
426 */
427 static void rp_do_transmit(struct r_port *info)
428 {
429 int c;
430 CHANNEL_t *cp = &info->channel;
431 struct tty_struct *tty;
432 unsigned long flags;
433
434 #ifdef ROCKET_DEBUG_INTR
435 printk(KERN_DEBUG "%s\n", __func__);
436 #endif
437 if (!info)
438 return;
439 tty = tty_port_tty_get(&info->port);
440
441 if (tty == NULL) {
442 printk(KERN_WARNING "rp: WARNING %s called with tty==NULL\n", __func__);
443 clear_bit((info->aiop * 8) + info->chan, (void *) &xmit_flags[info->board]);
444 return;
445 }
446
447 spin_lock_irqsave(&info->slock, flags);
448 info->xmit_fifo_room = TXFIFO_SIZE - sGetTxCnt(cp);
449
450 /* Loop sending data to FIFO until done or FIFO full */
451 while (1) {
452 if (tty->stopped || tty->hw_stopped)
453 break;
454 c = min(info->xmit_fifo_room, info->xmit_cnt);
455 c = min(c, XMIT_BUF_SIZE - info->xmit_tail);
456 if (c <= 0 || info->xmit_fifo_room <= 0)
457 break;
458 sOutStrW(sGetTxRxDataIO(cp), (unsigned short *) (info->xmit_buf + info->xmit_tail), c / 2);
459 if (c & 1)
460 sOutB(sGetTxRxDataIO(cp), info->xmit_buf[info->xmit_tail + c - 1]);
461 info->xmit_tail += c;
462 info->xmit_tail &= XMIT_BUF_SIZE - 1;
463 info->xmit_cnt -= c;
464 info->xmit_fifo_room -= c;
465 #ifdef ROCKET_DEBUG_INTR
466 printk(KERN_INFO "tx %d chars...\n", c);
467 #endif
468 }
469
470 if (info->xmit_cnt == 0)
471 clear_bit((info->aiop * 8) + info->chan, (void *) &xmit_flags[info->board]);
472
473 if (info->xmit_cnt < WAKEUP_CHARS) {
474 tty_wakeup(tty);
475 #ifdef ROCKETPORT_HAVE_POLL_WAIT
476 wake_up_interruptible(&tty->poll_wait);
477 #endif
478 }
479
480 spin_unlock_irqrestore(&info->slock, flags);
481 tty_kref_put(tty);
482
483 #ifdef ROCKET_DEBUG_INTR
484 printk(KERN_DEBUG "(%d,%d,%d,%d)...\n", info->xmit_cnt, info->xmit_head,
485 info->xmit_tail, info->xmit_fifo_room);
486 #endif
487 }
488
489 /*
490 * Called when a serial port signals it has read data in it's RX FIFO.
491 * It checks what interrupts are pending and services them, including
492 * receiving serial data.
493 */
494 static void rp_handle_port(struct r_port *info)
495 {
496 CHANNEL_t *cp;
497 struct tty_struct *tty;
498 unsigned int IntMask, ChanStatus;
499
500 if (!info)
501 return;
502
503 if ((info->port.flags & ASYNC_INITIALIZED) == 0) {
504 printk(KERN_WARNING "rp: WARNING: rp_handle_port called with "
505 "info->flags & NOT_INIT\n");
506 return;
507 }
508 tty = tty_port_tty_get(&info->port);
509 if (!tty) {
510 printk(KERN_WARNING "rp: WARNING: rp_handle_port called with "
511 "tty==NULL\n");
512 return;
513 }
514 cp = &info->channel;
515
516 IntMask = sGetChanIntID(cp) & info->intmask;
517 #ifdef ROCKET_DEBUG_INTR
518 printk(KERN_INFO "rp_interrupt %02x...\n", IntMask);
519 #endif
520 ChanStatus = sGetChanStatus(cp);
521 if (IntMask & RXF_TRIG) { /* Rx FIFO trigger level */
522 rp_do_receive(info, tty, cp, ChanStatus);
523 }
524 if (IntMask & DELTA_CD) { /* CD change */
525 #if (defined(ROCKET_DEBUG_OPEN) || defined(ROCKET_DEBUG_INTR) || defined(ROCKET_DEBUG_HANGUP))
526 printk(KERN_INFO "ttyR%d CD now %s...\n", info->line,
527 (ChanStatus & CD_ACT) ? "on" : "off");
528 #endif
529 if (!(ChanStatus & CD_ACT) && info->cd_status) {
530 #ifdef ROCKET_DEBUG_HANGUP
531 printk(KERN_INFO "CD drop, calling hangup.\n");
532 #endif
533 tty_hangup(tty);
534 }
535 info->cd_status = (ChanStatus & CD_ACT) ? 1 : 0;
536 wake_up_interruptible(&info->port.open_wait);
537 }
538 #ifdef ROCKET_DEBUG_INTR
539 if (IntMask & DELTA_CTS) { /* CTS change */
540 printk(KERN_INFO "CTS change...\n");
541 }
542 if (IntMask & DELTA_DSR) { /* DSR change */
543 printk(KERN_INFO "DSR change...\n");
544 }
545 #endif
546 tty_kref_put(tty);
547 }
548
549 /*
550 * The top level polling routine. Repeats every 1/100 HZ (10ms).
551 */
552 static void rp_do_poll(unsigned long dummy)
553 {
554 CONTROLLER_t *ctlp;
555 int ctrl, aiop, ch, line;
556 unsigned int xmitmask, i;
557 unsigned int CtlMask;
558 unsigned char AiopMask;
559 Word_t bit;
560
561 /* Walk through all the boards (ctrl's) */
562 for (ctrl = 0; ctrl < max_board; ctrl++) {
563 if (rcktpt_io_addr[ctrl] <= 0)
564 continue;
565
566 /* Get a ptr to the board's control struct */
567 ctlp = sCtlNumToCtlPtr(ctrl);
568
569 /* Get the interrupt status from the board */
570 #ifdef CONFIG_PCI
571 if (ctlp->BusType == isPCI)
572 CtlMask = sPCIGetControllerIntStatus(ctlp);
573 else
574 #endif
575 CtlMask = sGetControllerIntStatus(ctlp);
576
577 /* Check if any AIOP read bits are set */
578 for (aiop = 0; CtlMask; aiop++) {
579 bit = ctlp->AiopIntrBits[aiop];
580 if (CtlMask & bit) {
581 CtlMask &= ~bit;
582 AiopMask = sGetAiopIntStatus(ctlp, aiop);
583
584 /* Check if any port read bits are set */
585 for (ch = 0; AiopMask; AiopMask >>= 1, ch++) {
586 if (AiopMask & 1) {
587
588 /* Get the line number (/dev/ttyRx number). */
589 /* Read the data from the port. */
590 line = GetLineNumber(ctrl, aiop, ch);
591 rp_handle_port(rp_table[line]);
592 }
593 }
594 }
595 }
596
597 xmitmask = xmit_flags[ctrl];
598
599 /*
600 * xmit_flags contains bit-significant flags, indicating there is data
601 * to xmit on the port. Bit 0 is port 0 on this board, bit 1 is port
602 * 1, ... (32 total possible). The variable i has the aiop and ch
603 * numbers encoded in it (port 0-7 are aiop0, 8-15 are aiop1, etc).
604 */
605 if (xmitmask) {
606 for (i = 0; i < rocketModel[ctrl].numPorts; i++) {
607 if (xmitmask & (1 << i)) {
608 aiop = (i & 0x18) >> 3;
609 ch = i & 0x07;
610 line = GetLineNumber(ctrl, aiop, ch);
611 rp_do_transmit(rp_table[line]);
612 }
613 }
614 }
615 }
616
617 /*
618 * Reset the timer so we get called at the next clock tick (10ms).
619 */
620 if (atomic_read(&rp_num_ports_open))
621 mod_timer(&rocket_timer, jiffies + POLL_PERIOD);
622 }
623
624 /*
625 * Initializes the r_port structure for a port, as well as enabling the port on
626 * the board.
627 * Inputs: board, aiop, chan numbers
628 */
629 static void init_r_port(int board, int aiop, int chan, struct pci_dev *pci_dev)
630 {
631 unsigned rocketMode;
632 struct r_port *info;
633 int line;
634 CONTROLLER_T *ctlp;
635
636 /* Get the next available line number */
637 line = SetLineNumber(board, aiop, chan);
638
639 ctlp = sCtlNumToCtlPtr(board);
640
641 /* Get a r_port struct for the port, fill it in and save it globally, indexed by line number */
642 info = kzalloc(sizeof (struct r_port), GFP_KERNEL);
643 if (!info) {
644 printk(KERN_ERR "Couldn't allocate info struct for line #%d\n",
645 line);
646 return;
647 }
648
649 info->magic = RPORT_MAGIC;
650 info->line = line;
651 info->ctlp = ctlp;
652 info->board = board;
653 info->aiop = aiop;
654 info->chan = chan;
655 tty_port_init(&info->port);
656 info->port.ops = &rocket_port_ops;
657 init_completion(&info->close_wait);
658 info->flags &= ~ROCKET_MODE_MASK;
659 switch (pc104[board][line]) {
660 case 422:
661 info->flags |= ROCKET_MODE_RS422;
662 break;
663 case 485:
664 info->flags |= ROCKET_MODE_RS485;
665 break;
666 case 232:
667 default:
668 info->flags |= ROCKET_MODE_RS232;
669 break;
670 }
671
672 info->intmask = RXF_TRIG | TXFIFO_MT | SRC_INT | DELTA_CD | DELTA_CTS | DELTA_DSR;
673 if (sInitChan(ctlp, &info->channel, aiop, chan) == 0) {
674 printk(KERN_ERR "RocketPort sInitChan(%d, %d, %d) failed!\n",
675 board, aiop, chan);
676 kfree(info);
677 return;
678 }
679
680 rocketMode = info->flags & ROCKET_MODE_MASK;
681
682 if ((info->flags & ROCKET_RTS_TOGGLE) || (rocketMode == ROCKET_MODE_RS485))
683 sEnRTSToggle(&info->channel);
684 else
685 sDisRTSToggle(&info->channel);
686
687 if (ctlp->boardType == ROCKET_TYPE_PC104) {
688 switch (rocketMode) {
689 case ROCKET_MODE_RS485:
690 sSetInterfaceMode(&info->channel, InterfaceModeRS485);
691 break;
692 case ROCKET_MODE_RS422:
693 sSetInterfaceMode(&info->channel, InterfaceModeRS422);
694 break;
695 case ROCKET_MODE_RS232:
696 default:
697 if (info->flags & ROCKET_RTS_TOGGLE)
698 sSetInterfaceMode(&info->channel, InterfaceModeRS232T);
699 else
700 sSetInterfaceMode(&info->channel, InterfaceModeRS232);
701 break;
702 }
703 }
704 spin_lock_init(&info->slock);
705 mutex_init(&info->write_mtx);
706 rp_table[line] = info;
707 tty_register_device(rocket_driver, line, pci_dev ? &pci_dev->dev :
708 NULL);
709 }
710
711 /*
712 * Configures a rocketport port according to its termio settings. Called from
713 * user mode into the driver (exception handler). *info CD manipulation is spinlock protected.
714 */
715 static void configure_r_port(struct tty_struct *tty, struct r_port *info,
716 struct ktermios *old_termios)
717 {
718 unsigned cflag;
719 unsigned long flags;
720 unsigned rocketMode;
721 int bits, baud, divisor;
722 CHANNEL_t *cp;
723 struct ktermios *t = tty->termios;
724
725 cp = &info->channel;
726 cflag = t->c_cflag;
727
728 /* Byte size and parity */
729 if ((cflag & CSIZE) == CS8) {
730 sSetData8(cp);
731 bits = 10;
732 } else {
733 sSetData7(cp);
734 bits = 9;
735 }
736 if (cflag & CSTOPB) {
737 sSetStop2(cp);
738 bits++;
739 } else {
740 sSetStop1(cp);
741 }
742
743 if (cflag & PARENB) {
744 sEnParity(cp);
745 bits++;
746 if (cflag & PARODD) {
747 sSetOddParity(cp);
748 } else {
749 sSetEvenParity(cp);
750 }
751 } else {
752 sDisParity(cp);
753 }
754
755 /* baud rate */
756 baud = tty_get_baud_rate(tty);
757 if (!baud)
758 baud = 9600;
759 divisor = ((rp_baud_base[info->board] + (baud >> 1)) / baud) - 1;
760 if ((divisor >= 8192 || divisor < 0) && old_termios) {
761 baud = tty_termios_baud_rate(old_termios);
762 if (!baud)
763 baud = 9600;
764 divisor = (rp_baud_base[info->board] / baud) - 1;
765 }
766 if (divisor >= 8192 || divisor < 0) {
767 baud = 9600;
768 divisor = (rp_baud_base[info->board] / baud) - 1;
769 }
770 info->cps = baud / bits;
771 sSetBaud(cp, divisor);
772
773 /* FIXME: Should really back compute a baud rate from the divisor */
774 tty_encode_baud_rate(tty, baud, baud);
775
776 if (cflag & CRTSCTS) {
777 info->intmask |= DELTA_CTS;
778 sEnCTSFlowCtl(cp);
779 } else {
780 info->intmask &= ~DELTA_CTS;
781 sDisCTSFlowCtl(cp);
782 }
783 if (cflag & CLOCAL) {
784 info->intmask &= ~DELTA_CD;
785 } else {
786 spin_lock_irqsave(&info->slock, flags);
787 if (sGetChanStatus(cp) & CD_ACT)
788 info->cd_status = 1;
789 else
790 info->cd_status = 0;
791 info->intmask |= DELTA_CD;
792 spin_unlock_irqrestore(&info->slock, flags);
793 }
794
795 /*
796 * Handle software flow control in the board
797 */
798 #ifdef ROCKET_SOFT_FLOW
799 if (I_IXON(tty)) {
800 sEnTxSoftFlowCtl(cp);
801 if (I_IXANY(tty)) {
802 sEnIXANY(cp);
803 } else {
804 sDisIXANY(cp);
805 }
806 sSetTxXONChar(cp, START_CHAR(tty));
807 sSetTxXOFFChar(cp, STOP_CHAR(tty));
808 } else {
809 sDisTxSoftFlowCtl(cp);
810 sDisIXANY(cp);
811 sClrTxXOFF(cp);
812 }
813 #endif
814
815 /*
816 * Set up ignore/read mask words
817 */
818 info->read_status_mask = STMRCVROVRH | 0xFF;
819 if (I_INPCK(tty))
820 info->read_status_mask |= STMFRAMEH | STMPARITYH;
821 if (I_BRKINT(tty) || I_PARMRK(tty))
822 info->read_status_mask |= STMBREAKH;
823
824 /*
825 * Characters to ignore
826 */
827 info->ignore_status_mask = 0;
828 if (I_IGNPAR(tty))
829 info->ignore_status_mask |= STMFRAMEH | STMPARITYH;
830 if (I_IGNBRK(tty)) {
831 info->ignore_status_mask |= STMBREAKH;
832 /*
833 * If we're ignoring parity and break indicators,
834 * ignore overruns too. (For real raw support).
835 */
836 if (I_IGNPAR(tty))
837 info->ignore_status_mask |= STMRCVROVRH;
838 }
839
840 rocketMode = info->flags & ROCKET_MODE_MASK;
841
842 if ((info->flags & ROCKET_RTS_TOGGLE)
843 || (rocketMode == ROCKET_MODE_RS485))
844 sEnRTSToggle(cp);
845 else
846 sDisRTSToggle(cp);
847
848 sSetRTS(&info->channel);
849
850 if (cp->CtlP->boardType == ROCKET_TYPE_PC104) {
851 switch (rocketMode) {
852 case ROCKET_MODE_RS485:
853 sSetInterfaceMode(cp, InterfaceModeRS485);
854 break;
855 case ROCKET_MODE_RS422:
856 sSetInterfaceMode(cp, InterfaceModeRS422);
857 break;
858 case ROCKET_MODE_RS232:
859 default:
860 if (info->flags & ROCKET_RTS_TOGGLE)
861 sSetInterfaceMode(cp, InterfaceModeRS232T);
862 else
863 sSetInterfaceMode(cp, InterfaceModeRS232);
864 break;
865 }
866 }
867 }
868
869 static int carrier_raised(struct tty_port *port)
870 {
871 struct r_port *info = container_of(port, struct r_port, port);
872 return (sGetChanStatusLo(&info->channel) & CD_ACT) ? 1 : 0;
873 }
874
875 static void raise_dtr_rts(struct tty_port *port)
876 {
877 struct r_port *info = container_of(port, struct r_port, port);
878 sSetDTR(&info->channel);
879 sSetRTS(&info->channel);
880 }
881
882 /*
883 * Exception handler that opens a serial port. Creates xmit_buf storage, fills in
884 * port's r_port struct. Initializes the port hardware.
885 */
886 static int rp_open(struct tty_struct *tty, struct file *filp)
887 {
888 struct r_port *info;
889 struct tty_port *port;
890 int line = 0, retval;
891 CHANNEL_t *cp;
892 unsigned long page;
893
894 line = tty->index;
895 if (line < 0 || line >= MAX_RP_PORTS || ((info = rp_table[line]) == NULL))
896 return -ENXIO;
897 port = &info->port;
898
899 page = __get_free_page(GFP_KERNEL);
900 if (!page)
901 return -ENOMEM;
902
903 if (port->flags & ASYNC_CLOSING) {
904 retval = wait_for_completion_interruptible(&info->close_wait);
905 free_page(page);
906 if (retval)
907 return retval;
908 return ((port->flags & ASYNC_HUP_NOTIFY) ? -EAGAIN : -ERESTARTSYS);
909 }
910
911 /*
912 * We must not sleep from here until the port is marked fully in use.
913 */
914 if (info->xmit_buf)
915 free_page(page);
916 else
917 info->xmit_buf = (unsigned char *) page;
918
919 tty->driver_data = info;
920 tty_port_tty_set(port, tty);
921
922 if (port->count++ == 0) {
923 atomic_inc(&rp_num_ports_open);
924
925 #ifdef ROCKET_DEBUG_OPEN
926 printk(KERN_INFO "rocket mod++ = %d...\n",
927 atomic_read(&rp_num_ports_open));
928 #endif
929 }
930 #ifdef ROCKET_DEBUG_OPEN
931 printk(KERN_INFO "rp_open ttyR%d, count=%d\n", info->line, info->port.count);
932 #endif
933
934 /*
935 * Info->count is now 1; so it's safe to sleep now.
936 */
937 if (!test_bit(ASYNC_INITIALIZED, &port->flags)) {
938 cp = &info->channel;
939 sSetRxTrigger(cp, TRIG_1);
940 if (sGetChanStatus(cp) & CD_ACT)
941 info->cd_status = 1;
942 else
943 info->cd_status = 0;
944 sDisRxStatusMode(cp);
945 sFlushRxFIFO(cp);
946 sFlushTxFIFO(cp);
947
948 sEnInterrupts(cp, (TXINT_EN | MCINT_EN | RXINT_EN | SRCINT_EN | CHANINT_EN));
949 sSetRxTrigger(cp, TRIG_1);
950
951 sGetChanStatus(cp);
952 sDisRxStatusMode(cp);
953 sClrTxXOFF(cp);
954
955 sDisCTSFlowCtl(cp);
956 sDisTxSoftFlowCtl(cp);
957
958 sEnRxFIFO(cp);
959 sEnTransmit(cp);
960
961 set_bit(ASYNC_INITIALIZED, &info->port.flags);
962
963 /*
964 * Set up the tty->alt_speed kludge
965 */
966 if ((info->flags & ROCKET_SPD_MASK) == ROCKET_SPD_HI)
967 tty->alt_speed = 57600;
968 if ((info->flags & ROCKET_SPD_MASK) == ROCKET_SPD_VHI)
969 tty->alt_speed = 115200;
970 if ((info->flags & ROCKET_SPD_MASK) == ROCKET_SPD_SHI)
971 tty->alt_speed = 230400;
972 if ((info->flags & ROCKET_SPD_MASK) == ROCKET_SPD_WARP)
973 tty->alt_speed = 460800;
974
975 configure_r_port(tty, info, NULL);
976 if (tty->termios->c_cflag & CBAUD) {
977 sSetDTR(cp);
978 sSetRTS(cp);
979 }
980 }
981 /* Starts (or resets) the maint polling loop */
982 mod_timer(&rocket_timer, jiffies + POLL_PERIOD);
983
984 retval = tty_port_block_til_ready(port, tty, filp);
985 if (retval) {
986 #ifdef ROCKET_DEBUG_OPEN
987 printk(KERN_INFO "rp_open returning after block_til_ready with %d\n", retval);
988 #endif
989 return retval;
990 }
991 return 0;
992 }
993
994 /*
995 * Exception handler that closes a serial port. info->port.count is considered critical.
996 */
997 static void rp_close(struct tty_struct *tty, struct file *filp)
998 {
999 struct r_port *info = tty->driver_data;
1000 struct tty_port *port = &info->port;
1001 int timeout;
1002 CHANNEL_t *cp;
1003
1004 if (rocket_paranoia_check(info, "rp_close"))
1005 return;
1006
1007 #ifdef ROCKET_DEBUG_OPEN
1008 printk(KERN_INFO "rp_close ttyR%d, count = %d\n", info->line, info->port.count);
1009 #endif
1010
1011 if (tty_port_close_start(port, tty, filp) == 0)
1012 return;
1013
1014 cp = &info->channel;
1015 /*
1016 * Before we drop DTR, make sure the UART transmitter
1017 * has completely drained; this is especially
1018 * important if there is a transmit FIFO!
1019 */
1020 timeout = (sGetTxCnt(cp) + 1) * HZ / info->cps;
1021 if (timeout == 0)
1022 timeout = 1;
1023 rp_wait_until_sent(tty, timeout);
1024 clear_bit((info->aiop * 8) + info->chan, (void *) &xmit_flags[info->board]);
1025
1026 sDisTransmit(cp);
1027 sDisInterrupts(cp, (TXINT_EN | MCINT_EN | RXINT_EN | SRCINT_EN | CHANINT_EN));
1028 sDisCTSFlowCtl(cp);
1029 sDisTxSoftFlowCtl(cp);
1030 sClrTxXOFF(cp);
1031 sFlushRxFIFO(cp);
1032 sFlushTxFIFO(cp);
1033 sClrRTS(cp);
1034 if (C_HUPCL(tty))
1035 sClrDTR(cp);
1036
1037 rp_flush_buffer(tty);
1038
1039 tty_ldisc_flush(tty);
1040
1041 clear_bit((info->aiop * 8) + info->chan, (void *) &xmit_flags[info->board]);
1042
1043 /* We can't yet use tty_port_close_end as the buffer handling in this
1044 driver is a bit different to the usual */
1045
1046 if (port->blocked_open) {
1047 if (port->close_delay) {
1048 msleep_interruptible(jiffies_to_msecs(port->close_delay));
1049 }
1050 wake_up_interruptible(&port->open_wait);
1051 } else {
1052 if (info->xmit_buf) {
1053 free_page((unsigned long) info->xmit_buf);
1054 info->xmit_buf = NULL;
1055 }
1056 }
1057 info->port.flags &= ~(ASYNC_INITIALIZED | ASYNC_CLOSING | ASYNC_NORMAL_ACTIVE);
1058 tty->closing = 0;
1059 tty_port_tty_set(port, NULL);
1060 wake_up_interruptible(&port->close_wait);
1061 complete_all(&info->close_wait);
1062 atomic_dec(&rp_num_ports_open);
1063
1064 #ifdef ROCKET_DEBUG_OPEN
1065 printk(KERN_INFO "rocket mod-- = %d...\n",
1066 atomic_read(&rp_num_ports_open));
1067 printk(KERN_INFO "rp_close ttyR%d complete shutdown\n", info->line);
1068 #endif
1069
1070 }
1071
1072 static void rp_set_termios(struct tty_struct *tty,
1073 struct ktermios *old_termios)
1074 {
1075 struct r_port *info = tty->driver_data;
1076 CHANNEL_t *cp;
1077 unsigned cflag;
1078
1079 if (rocket_paranoia_check(info, "rp_set_termios"))
1080 return;
1081
1082 cflag = tty->termios->c_cflag;
1083
1084 /*
1085 * This driver doesn't support CS5 or CS6
1086 */
1087 if (((cflag & CSIZE) == CS5) || ((cflag & CSIZE) == CS6))
1088 tty->termios->c_cflag =
1089 ((cflag & ~CSIZE) | (old_termios->c_cflag & CSIZE));
1090 /* Or CMSPAR */
1091 tty->termios->c_cflag &= ~CMSPAR;
1092
1093 configure_r_port(tty, info, old_termios);
1094
1095 cp = &info->channel;
1096
1097 /* Handle transition to B0 status */
1098 if ((old_termios->c_cflag & CBAUD) && !(tty->termios->c_cflag & CBAUD)) {
1099 sClrDTR(cp);
1100 sClrRTS(cp);
1101 }
1102
1103 /* Handle transition away from B0 status */
1104 if (!(old_termios->c_cflag & CBAUD) && (tty->termios->c_cflag & CBAUD)) {
1105 if (!tty->hw_stopped || !(tty->termios->c_cflag & CRTSCTS))
1106 sSetRTS(cp);
1107 sSetDTR(cp);
1108 }
1109
1110 if ((old_termios->c_cflag & CRTSCTS) && !(tty->termios->c_cflag & CRTSCTS)) {
1111 tty->hw_stopped = 0;
1112 rp_start(tty);
1113 }
1114 }
1115
1116 static int rp_break(struct tty_struct *tty, int break_state)
1117 {
1118 struct r_port *info = tty->driver_data;
1119 unsigned long flags;
1120
1121 if (rocket_paranoia_check(info, "rp_break"))
1122 return -EINVAL;
1123
1124 spin_lock_irqsave(&info->slock, flags);
1125 if (break_state == -1)
1126 sSendBreak(&info->channel);
1127 else
1128 sClrBreak(&info->channel);
1129 spin_unlock_irqrestore(&info->slock, flags);
1130 return 0;
1131 }
1132
1133 /*
1134 * sGetChanRI used to be a macro in rocket_int.h. When the functionality for
1135 * the UPCI boards was added, it was decided to make this a function because
1136 * the macro was getting too complicated. All cases except the first one
1137 * (UPCIRingInd) are taken directly from the original macro.
1138 */
1139 static int sGetChanRI(CHANNEL_T * ChP)
1140 {
1141 CONTROLLER_t *CtlP = ChP->CtlP;
1142 int ChanNum = ChP->ChanNum;
1143 int RingInd = 0;
1144
1145 if (CtlP->UPCIRingInd)
1146 RingInd = !(sInB(CtlP->UPCIRingInd) & sBitMapSetTbl[ChanNum]);
1147 else if (CtlP->AltChanRingIndicator)
1148 RingInd = sInB((ByteIO_t) (ChP->ChanStat + 8)) & DSR_ACT;
1149 else if (CtlP->boardType == ROCKET_TYPE_PC104)
1150 RingInd = !(sInB(CtlP->AiopIO[3]) & sBitMapSetTbl[ChanNum]);
1151
1152 return RingInd;
1153 }
1154
1155 /********************************************************************************************/
1156 /* Here are the routines used by rp_ioctl. These are all called from exception handlers. */
1157
1158 /*
1159 * Returns the state of the serial modem control lines. These next 2 functions
1160 * are the way kernel versions > 2.5 handle modem control lines rather than IOCTLs.
1161 */
1162 static int rp_tiocmget(struct tty_struct *tty, struct file *file)
1163 {
1164 struct r_port *info = tty->driver_data;
1165 unsigned int control, result, ChanStatus;
1166
1167 ChanStatus = sGetChanStatusLo(&info->channel);
1168 control = info->channel.TxControl[3];
1169 result = ((control & SET_RTS) ? TIOCM_RTS : 0) |
1170 ((control & SET_DTR) ? TIOCM_DTR : 0) |
1171 ((ChanStatus & CD_ACT) ? TIOCM_CAR : 0) |
1172 (sGetChanRI(&info->channel) ? TIOCM_RNG : 0) |
1173 ((ChanStatus & DSR_ACT) ? TIOCM_DSR : 0) |
1174 ((ChanStatus & CTS_ACT) ? TIOCM_CTS : 0);
1175
1176 return result;
1177 }
1178
1179 /*
1180 * Sets the modem control lines
1181 */
1182 static int rp_tiocmset(struct tty_struct *tty, struct file *file,
1183 unsigned int set, unsigned int clear)
1184 {
1185 struct r_port *info = tty->driver_data;
1186
1187 if (set & TIOCM_RTS)
1188 info->channel.TxControl[3] |= SET_RTS;
1189 if (set & TIOCM_DTR)
1190 info->channel.TxControl[3] |= SET_DTR;
1191 if (clear & TIOCM_RTS)
1192 info->channel.TxControl[3] &= ~SET_RTS;
1193 if (clear & TIOCM_DTR)
1194 info->channel.TxControl[3] &= ~SET_DTR;
1195
1196 out32(info->channel.IndexAddr, info->channel.TxControl);
1197 return 0;
1198 }
1199
1200 static int get_config(struct r_port *info, struct rocket_config __user *retinfo)
1201 {
1202 struct rocket_config tmp;
1203
1204 if (!retinfo)
1205 return -EFAULT;
1206 memset(&tmp, 0, sizeof (tmp));
1207 tmp.line = info->line;
1208 tmp.flags = info->flags;
1209 tmp.close_delay = info->port.close_delay;
1210 tmp.closing_wait = info->port.closing_wait;
1211 tmp.port = rcktpt_io_addr[(info->line >> 5) & 3];
1212
1213 if (copy_to_user(retinfo, &tmp, sizeof (*retinfo)))
1214 return -EFAULT;
1215 return 0;
1216 }
1217
1218 static int set_config(struct tty_struct *tty, struct r_port *info,
1219 struct rocket_config __user *new_info)
1220 {
1221 struct rocket_config new_serial;
1222
1223 if (copy_from_user(&new_serial, new_info, sizeof (new_serial)))
1224 return -EFAULT;
1225
1226 if (!capable(CAP_SYS_ADMIN))
1227 {
1228 if ((new_serial.flags & ~ROCKET_USR_MASK) != (info->flags & ~ROCKET_USR_MASK))
1229 return -EPERM;
1230 info->flags = ((info->flags & ~ROCKET_USR_MASK) | (new_serial.flags & ROCKET_USR_MASK));
1231 configure_r_port(tty, info, NULL);
1232 return 0;
1233 }
1234
1235 info->flags = ((info->flags & ~ROCKET_FLAGS) | (new_serial.flags & ROCKET_FLAGS));
1236 info->port.close_delay = new_serial.close_delay;
1237 info->port.closing_wait = new_serial.closing_wait;
1238
1239 if ((info->flags & ROCKET_SPD_MASK) == ROCKET_SPD_HI)
1240 tty->alt_speed = 57600;
1241 if ((info->flags & ROCKET_SPD_MASK) == ROCKET_SPD_VHI)
1242 tty->alt_speed = 115200;
1243 if ((info->flags & ROCKET_SPD_MASK) == ROCKET_SPD_SHI)
1244 tty->alt_speed = 230400;
1245 if ((info->flags & ROCKET_SPD_MASK) == ROCKET_SPD_WARP)
1246 tty->alt_speed = 460800;
1247
1248 configure_r_port(tty, info, NULL);
1249 return 0;
1250 }
1251
1252 /*
1253 * This function fills in a rocket_ports struct with information
1254 * about what boards/ports are in the system. This info is passed
1255 * to user space. See setrocket.c where the info is used to create
1256 * the /dev/ttyRx ports.
1257 */
1258 static int get_ports(struct r_port *info, struct rocket_ports __user *retports)
1259 {
1260 struct rocket_ports tmp;
1261 int board;
1262
1263 if (!retports)
1264 return -EFAULT;
1265 memset(&tmp, 0, sizeof (tmp));
1266 tmp.tty_major = rocket_driver->major;
1267
1268 for (board = 0; board < 4; board++) {
1269 tmp.rocketModel[board].model = rocketModel[board].model;
1270 strcpy(tmp.rocketModel[board].modelString, rocketModel[board].modelString);
1271 tmp.rocketModel[board].numPorts = rocketModel[board].numPorts;
1272 tmp.rocketModel[board].loadrm2 = rocketModel[board].loadrm2;
1273 tmp.rocketModel[board].startingPortNumber = rocketModel[board].startingPortNumber;
1274 }
1275 if (copy_to_user(retports, &tmp, sizeof (*retports)))
1276 return -EFAULT;
1277 return 0;
1278 }
1279
1280 static int reset_rm2(struct r_port *info, void __user *arg)
1281 {
1282 int reset;
1283
1284 if (!capable(CAP_SYS_ADMIN))
1285 return -EPERM;
1286
1287 if (copy_from_user(&reset, arg, sizeof (int)))
1288 return -EFAULT;
1289 if (reset)
1290 reset = 1;
1291
1292 if (rcktpt_type[info->board] != ROCKET_TYPE_MODEMII &&
1293 rcktpt_type[info->board] != ROCKET_TYPE_MODEMIII)
1294 return -EINVAL;
1295
1296 if (info->ctlp->BusType == isISA)
1297 sModemReset(info->ctlp, info->chan, reset);
1298 else
1299 sPCIModemReset(info->ctlp, info->chan, reset);
1300
1301 return 0;
1302 }
1303
1304 static int get_version(struct r_port *info, struct rocket_version __user *retvers)
1305 {
1306 if (copy_to_user(retvers, &driver_version, sizeof (*retvers)))
1307 return -EFAULT;
1308 return 0;
1309 }
1310
1311 /* IOCTL call handler into the driver */
1312 static int rp_ioctl(struct tty_struct *tty, struct file *file,
1313 unsigned int cmd, unsigned long arg)
1314 {
1315 struct r_port *info = tty->driver_data;
1316 void __user *argp = (void __user *)arg;
1317 int ret = 0;
1318
1319 if (cmd != RCKP_GET_PORTS && rocket_paranoia_check(info, "rp_ioctl"))
1320 return -ENXIO;
1321
1322 lock_kernel();
1323
1324 switch (cmd) {
1325 case RCKP_GET_STRUCT:
1326 if (copy_to_user(argp, info, sizeof (struct r_port)))
1327 ret = -EFAULT;
1328 break;
1329 case RCKP_GET_CONFIG:
1330 ret = get_config(info, argp);
1331 break;
1332 case RCKP_SET_CONFIG:
1333 ret = set_config(tty, info, argp);
1334 break;
1335 case RCKP_GET_PORTS:
1336 ret = get_ports(info, argp);
1337 break;
1338 case RCKP_RESET_RM2:
1339 ret = reset_rm2(info, argp);
1340 break;
1341 case RCKP_GET_VERSION:
1342 ret = get_version(info, argp);
1343 break;
1344 default:
1345 ret = -ENOIOCTLCMD;
1346 }
1347 unlock_kernel();
1348 return ret;
1349 }
1350
1351 static void rp_send_xchar(struct tty_struct *tty, char ch)
1352 {
1353 struct r_port *info = tty->driver_data;
1354 CHANNEL_t *cp;
1355
1356 if (rocket_paranoia_check(info, "rp_send_xchar"))
1357 return;
1358
1359 cp = &info->channel;
1360 if (sGetTxCnt(cp))
1361 sWriteTxPrioByte(cp, ch);
1362 else
1363 sWriteTxByte(sGetTxRxDataIO(cp), ch);
1364 }
1365
1366 static void rp_throttle(struct tty_struct *tty)
1367 {
1368 struct r_port *info = tty->driver_data;
1369 CHANNEL_t *cp;
1370
1371 #ifdef ROCKET_DEBUG_THROTTLE
1372 printk(KERN_INFO "throttle %s: %d....\n", tty->name,
1373 tty->ldisc.chars_in_buffer(tty));
1374 #endif
1375
1376 if (rocket_paranoia_check(info, "rp_throttle"))
1377 return;
1378
1379 cp = &info->channel;
1380 if (I_IXOFF(tty))
1381 rp_send_xchar(tty, STOP_CHAR(tty));
1382
1383 sClrRTS(&info->channel);
1384 }
1385
1386 static void rp_unthrottle(struct tty_struct *tty)
1387 {
1388 struct r_port *info = tty->driver_data;
1389 CHANNEL_t *cp;
1390 #ifdef ROCKET_DEBUG_THROTTLE
1391 printk(KERN_INFO "unthrottle %s: %d....\n", tty->name,
1392 tty->ldisc.chars_in_buffer(tty));
1393 #endif
1394
1395 if (rocket_paranoia_check(info, "rp_throttle"))
1396 return;
1397
1398 cp = &info->channel;
1399 if (I_IXOFF(tty))
1400 rp_send_xchar(tty, START_CHAR(tty));
1401
1402 sSetRTS(&info->channel);
1403 }
1404
1405 /*
1406 * ------------------------------------------------------------
1407 * rp_stop() and rp_start()
1408 *
1409 * This routines are called before setting or resetting tty->stopped.
1410 * They enable or disable transmitter interrupts, as necessary.
1411 * ------------------------------------------------------------
1412 */
1413 static void rp_stop(struct tty_struct *tty)
1414 {
1415 struct r_port *info = tty->driver_data;
1416
1417 #ifdef ROCKET_DEBUG_FLOW
1418 printk(KERN_INFO "stop %s: %d %d....\n", tty->name,
1419 info->xmit_cnt, info->xmit_fifo_room);
1420 #endif
1421
1422 if (rocket_paranoia_check(info, "rp_stop"))
1423 return;
1424
1425 if (sGetTxCnt(&info->channel))
1426 sDisTransmit(&info->channel);
1427 }
1428
1429 static void rp_start(struct tty_struct *tty)
1430 {
1431 struct r_port *info = tty->driver_data;
1432
1433 #ifdef ROCKET_DEBUG_FLOW
1434 printk(KERN_INFO "start %s: %d %d....\n", tty->name,
1435 info->xmit_cnt, info->xmit_fifo_room);
1436 #endif
1437
1438 if (rocket_paranoia_check(info, "rp_stop"))
1439 return;
1440
1441 sEnTransmit(&info->channel);
1442 set_bit((info->aiop * 8) + info->chan,
1443 (void *) &xmit_flags[info->board]);
1444 }
1445
1446 /*
1447 * rp_wait_until_sent() --- wait until the transmitter is empty
1448 */
1449 static void rp_wait_until_sent(struct tty_struct *tty, int timeout)
1450 {
1451 struct r_port *info = tty->driver_data;
1452 CHANNEL_t *cp;
1453 unsigned long orig_jiffies;
1454 int check_time, exit_time;
1455 int txcnt;
1456
1457 if (rocket_paranoia_check(info, "rp_wait_until_sent"))
1458 return;
1459
1460 cp = &info->channel;
1461
1462 orig_jiffies = jiffies;
1463 #ifdef ROCKET_DEBUG_WAIT_UNTIL_SENT
1464 printk(KERN_INFO "In RP_wait_until_sent(%d) (jiff=%lu)...\n", timeout,
1465 jiffies);
1466 printk(KERN_INFO "cps=%d...\n", info->cps);
1467 #endif
1468 lock_kernel();
1469 while (1) {
1470 txcnt = sGetTxCnt(cp);
1471 if (!txcnt) {
1472 if (sGetChanStatusLo(cp) & TXSHRMT)
1473 break;
1474 check_time = (HZ / info->cps) / 5;
1475 } else {
1476 check_time = HZ * txcnt / info->cps;
1477 }
1478 if (timeout) {
1479 exit_time = orig_jiffies + timeout - jiffies;
1480 if (exit_time <= 0)
1481 break;
1482 if (exit_time < check_time)
1483 check_time = exit_time;
1484 }
1485 if (check_time == 0)
1486 check_time = 1;
1487 #ifdef ROCKET_DEBUG_WAIT_UNTIL_SENT
1488 printk(KERN_INFO "txcnt = %d (jiff=%lu,check=%d)...\n", txcnt,
1489 jiffies, check_time);
1490 #endif
1491 msleep_interruptible(jiffies_to_msecs(check_time));
1492 if (signal_pending(current))
1493 break;
1494 }
1495 __set_current_state(TASK_RUNNING);
1496 unlock_kernel();
1497 #ifdef ROCKET_DEBUG_WAIT_UNTIL_SENT
1498 printk(KERN_INFO "txcnt = %d (jiff=%lu)...done\n", txcnt, jiffies);
1499 #endif
1500 }
1501
1502 /*
1503 * rp_hangup() --- called by tty_hangup() when a hangup is signaled.
1504 */
1505 static void rp_hangup(struct tty_struct *tty)
1506 {
1507 CHANNEL_t *cp;
1508 struct r_port *info = tty->driver_data;
1509
1510 if (rocket_paranoia_check(info, "rp_hangup"))
1511 return;
1512
1513 #if (defined(ROCKET_DEBUG_OPEN) || defined(ROCKET_DEBUG_HANGUP))
1514 printk(KERN_INFO "rp_hangup of ttyR%d...\n", info->line);
1515 #endif
1516 rp_flush_buffer(tty);
1517 if (info->port.flags & ASYNC_CLOSING)
1518 return;
1519 if (info->port.count)
1520 atomic_dec(&rp_num_ports_open);
1521 clear_bit((info->aiop * 8) + info->chan, (void *) &xmit_flags[info->board]);
1522
1523 tty_port_hangup(&info->port);
1524
1525 cp = &info->channel;
1526 sDisRxFIFO(cp);
1527 sDisTransmit(cp);
1528 sDisInterrupts(cp, (TXINT_EN | MCINT_EN | RXINT_EN | SRCINT_EN | CHANINT_EN));
1529 sDisCTSFlowCtl(cp);
1530 sDisTxSoftFlowCtl(cp);
1531 sClrTxXOFF(cp);
1532 info->port.flags &= ~ASYNC_INITIALIZED;
1533
1534 wake_up_interruptible(&info->port.open_wait);
1535 }
1536
1537 /*
1538 * Exception handler - write char routine. The RocketPort driver uses a
1539 * double-buffering strategy, with the twist that if the in-memory CPU
1540 * buffer is empty, and there's space in the transmit FIFO, the
1541 * writing routines will write directly to transmit FIFO.
1542 * Write buffer and counters protected by spinlocks
1543 */
1544 static int rp_put_char(struct tty_struct *tty, unsigned char ch)
1545 {
1546 struct r_port *info = tty->driver_data;
1547 CHANNEL_t *cp;
1548 unsigned long flags;
1549
1550 if (rocket_paranoia_check(info, "rp_put_char"))
1551 return 0;
1552
1553 /*
1554 * Grab the port write mutex, locking out other processes that try to
1555 * write to this port
1556 */
1557 mutex_lock(&info->write_mtx);
1558
1559 #ifdef ROCKET_DEBUG_WRITE
1560 printk(KERN_INFO "rp_put_char %c...\n", ch);
1561 #endif
1562
1563 spin_lock_irqsave(&info->slock, flags);
1564 cp = &info->channel;
1565
1566 if (!tty->stopped && !tty->hw_stopped && info->xmit_fifo_room == 0)
1567 info->xmit_fifo_room = TXFIFO_SIZE - sGetTxCnt(cp);
1568
1569 if (tty->stopped || tty->hw_stopped || info->xmit_fifo_room == 0 || info->xmit_cnt != 0) {
1570 info->xmit_buf[info->xmit_head++] = ch;
1571 info->xmit_head &= XMIT_BUF_SIZE - 1;
1572 info->xmit_cnt++;
1573 set_bit((info->aiop * 8) + info->chan, (void *) &xmit_flags[info->board]);
1574 } else {
1575 sOutB(sGetTxRxDataIO(cp), ch);
1576 info->xmit_fifo_room--;
1577 }
1578 spin_unlock_irqrestore(&info->slock, flags);
1579 mutex_unlock(&info->write_mtx);
1580 return 1;
1581 }
1582
1583 /*
1584 * Exception handler - write routine, called when user app writes to the device.
1585 * A per port write mutex is used to protect from another process writing to
1586 * this port at the same time. This other process could be running on the other CPU
1587 * or get control of the CPU if the copy_from_user() blocks due to a page fault (swapped out).
1588 * Spinlocks protect the info xmit members.
1589 */
1590 static int rp_write(struct tty_struct *tty,
1591 const unsigned char *buf, int count)
1592 {
1593 struct r_port *info = tty->driver_data;
1594 CHANNEL_t *cp;
1595 const unsigned char *b;
1596 int c, retval = 0;
1597 unsigned long flags;
1598
1599 if (count <= 0 || rocket_paranoia_check(info, "rp_write"))
1600 return 0;
1601
1602 if (mutex_lock_interruptible(&info->write_mtx))
1603 return -ERESTARTSYS;
1604
1605 #ifdef ROCKET_DEBUG_WRITE
1606 printk(KERN_INFO "rp_write %d chars...\n", count);
1607 #endif
1608 cp = &info->channel;
1609
1610 if (!tty->stopped && !tty->hw_stopped && info->xmit_fifo_room < count)
1611 info->xmit_fifo_room = TXFIFO_SIZE - sGetTxCnt(cp);
1612
1613 /*
1614 * If the write queue for the port is empty, and there is FIFO space, stuff bytes
1615 * into FIFO. Use the write queue for temp storage.
1616 */
1617 if (!tty->stopped && !tty->hw_stopped && info->xmit_cnt == 0 && info->xmit_fifo_room > 0) {
1618 c = min(count, info->xmit_fifo_room);
1619 b = buf;
1620
1621 /* Push data into FIFO, 2 bytes at a time */
1622 sOutStrW(sGetTxRxDataIO(cp), (unsigned short *) b, c / 2);
1623
1624 /* If there is a byte remaining, write it */
1625 if (c & 1)
1626 sOutB(sGetTxRxDataIO(cp), b[c - 1]);
1627
1628 retval += c;
1629 buf += c;
1630 count -= c;
1631
1632 spin_lock_irqsave(&info->slock, flags);
1633 info->xmit_fifo_room -= c;
1634 spin_unlock_irqrestore(&info->slock, flags);
1635 }
1636
1637 /* If count is zero, we wrote it all and are done */
1638 if (!count)
1639 goto end;
1640
1641 /* Write remaining data into the port's xmit_buf */
1642 while (1) {
1643 /* Hung up ? */
1644 if (!test_bit(ASYNC_NORMAL_ACTIVE, &info->port.flags))
1645 goto end;
1646 c = min(count, XMIT_BUF_SIZE - info->xmit_cnt - 1);
1647 c = min(c, XMIT_BUF_SIZE - info->xmit_head);
1648 if (c <= 0)
1649 break;
1650
1651 b = buf;
1652 memcpy(info->xmit_buf + info->xmit_head, b, c);
1653
1654 spin_lock_irqsave(&info->slock, flags);
1655 info->xmit_head =
1656 (info->xmit_head + c) & (XMIT_BUF_SIZE - 1);
1657 info->xmit_cnt += c;
1658 spin_unlock_irqrestore(&info->slock, flags);
1659
1660 buf += c;
1661 count -= c;
1662 retval += c;
1663 }
1664
1665 if ((retval > 0) && !tty->stopped && !tty->hw_stopped)
1666 set_bit((info->aiop * 8) + info->chan, (void *) &xmit_flags[info->board]);
1667
1668 end:
1669 if (info->xmit_cnt < WAKEUP_CHARS) {
1670 tty_wakeup(tty);
1671 #ifdef ROCKETPORT_HAVE_POLL_WAIT
1672 wake_up_interruptible(&tty->poll_wait);
1673 #endif
1674 }
1675 mutex_unlock(&info->write_mtx);
1676 return retval;
1677 }
1678
1679 /*
1680 * Return the number of characters that can be sent. We estimate
1681 * only using the in-memory transmit buffer only, and ignore the
1682 * potential space in the transmit FIFO.
1683 */
1684 static int rp_write_room(struct tty_struct *tty)
1685 {
1686 struct r_port *info = tty->driver_data;
1687 int ret;
1688
1689 if (rocket_paranoia_check(info, "rp_write_room"))
1690 return 0;
1691
1692 ret = XMIT_BUF_SIZE - info->xmit_cnt - 1;
1693 if (ret < 0)
1694 ret = 0;
1695 #ifdef ROCKET_DEBUG_WRITE
1696 printk(KERN_INFO "rp_write_room returns %d...\n", ret);
1697 #endif
1698 return ret;
1699 }
1700
1701 /*
1702 * Return the number of characters in the buffer. Again, this only
1703 * counts those characters in the in-memory transmit buffer.
1704 */
1705 static int rp_chars_in_buffer(struct tty_struct *tty)
1706 {
1707 struct r_port *info = tty->driver_data;
1708 CHANNEL_t *cp;
1709
1710 if (rocket_paranoia_check(info, "rp_chars_in_buffer"))
1711 return 0;
1712
1713 cp = &info->channel;
1714
1715 #ifdef ROCKET_DEBUG_WRITE
1716 printk(KERN_INFO "rp_chars_in_buffer returns %d...\n", info->xmit_cnt);
1717 #endif
1718 return info->xmit_cnt;
1719 }
1720
1721 /*
1722 * Flushes the TX fifo for a port, deletes data in the xmit_buf stored in the
1723 * r_port struct for the port. Note that spinlock are used to protect info members,
1724 * do not call this function if the spinlock is already held.
1725 */
1726 static void rp_flush_buffer(struct tty_struct *tty)
1727 {
1728 struct r_port *info = tty->driver_data;
1729 CHANNEL_t *cp;
1730 unsigned long flags;
1731
1732 if (rocket_paranoia_check(info, "rp_flush_buffer"))
1733 return;
1734
1735 spin_lock_irqsave(&info->slock, flags);
1736 info->xmit_cnt = info->xmit_head = info->xmit_tail = 0;
1737 spin_unlock_irqrestore(&info->slock, flags);
1738
1739 #ifdef ROCKETPORT_HAVE_POLL_WAIT
1740 wake_up_interruptible(&tty->poll_wait);
1741 #endif
1742 tty_wakeup(tty);
1743
1744 cp = &info->channel;
1745 sFlushTxFIFO(cp);
1746 }
1747
1748 #ifdef CONFIG_PCI
1749
1750 static struct pci_device_id __devinitdata rocket_pci_ids[] = {
1751 { PCI_DEVICE(PCI_VENDOR_ID_RP, PCI_ANY_ID) },
1752 { }
1753 };
1754 MODULE_DEVICE_TABLE(pci, rocket_pci_ids);
1755
1756 /*
1757 * Called when a PCI card is found. Retrieves and stores model information,
1758 * init's aiopic and serial port hardware.
1759 * Inputs: i is the board number (0-n)
1760 */
1761 static __init int register_PCI(int i, struct pci_dev *dev)
1762 {
1763 int num_aiops, aiop, max_num_aiops, num_chan, chan;
1764 unsigned int aiopio[MAX_AIOPS_PER_BOARD];
1765 char *str, *board_type;
1766 CONTROLLER_t *ctlp;
1767
1768 int fast_clock = 0;
1769 int altChanRingIndicator = 0;
1770 int ports_per_aiop = 8;
1771 WordIO_t ConfigIO = 0;
1772 ByteIO_t UPCIRingInd = 0;
1773
1774 if (!dev || pci_enable_device(dev))
1775 return 0;
1776
1777 rcktpt_io_addr[i] = pci_resource_start(dev, 0);
1778
1779 rcktpt_type[i] = ROCKET_TYPE_NORMAL;
1780 rocketModel[i].loadrm2 = 0;
1781 rocketModel[i].startingPortNumber = nextLineNumber;
1782
1783 /* Depending on the model, set up some config variables */
1784 switch (dev->device) {
1785 case PCI_DEVICE_ID_RP4QUAD:
1786 str = "Quadcable";
1787 max_num_aiops = 1;
1788 ports_per_aiop = 4;
1789 rocketModel[i].model = MODEL_RP4QUAD;
1790 strcpy(rocketModel[i].modelString, "RocketPort 4 port w/quad cable");
1791 rocketModel[i].numPorts = 4;
1792 break;
1793 case PCI_DEVICE_ID_RP8OCTA:
1794 str = "Octacable";
1795 max_num_aiops = 1;
1796 rocketModel[i].model = MODEL_RP8OCTA;
1797 strcpy(rocketModel[i].modelString, "RocketPort 8 port w/octa cable");
1798 rocketModel[i].numPorts = 8;
1799 break;
1800 case PCI_DEVICE_ID_URP8OCTA:
1801 str = "Octacable";
1802 max_num_aiops = 1;
1803 rocketModel[i].model = MODEL_UPCI_RP8OCTA;
1804 strcpy(rocketModel[i].modelString, "RocketPort UPCI 8 port w/octa cable");
1805 rocketModel[i].numPorts = 8;
1806 break;
1807 case PCI_DEVICE_ID_RP8INTF:
1808 str = "8";
1809 max_num_aiops = 1;
1810 rocketModel[i].model = MODEL_RP8INTF;
1811 strcpy(rocketModel[i].modelString, "RocketPort 8 port w/external I/F");
1812 rocketModel[i].numPorts = 8;
1813 break;
1814 case PCI_DEVICE_ID_URP8INTF:
1815 str = "8";
1816 max_num_aiops = 1;
1817 rocketModel[i].model = MODEL_UPCI_RP8INTF;
1818 strcpy(rocketModel[i].modelString, "RocketPort UPCI 8 port w/external I/F");
1819 rocketModel[i].numPorts = 8;
1820 break;
1821 case PCI_DEVICE_ID_RP8J:
1822 str = "8J";
1823 max_num_aiops = 1;
1824 rocketModel[i].model = MODEL_RP8J;
1825 strcpy(rocketModel[i].modelString, "RocketPort 8 port w/RJ11 connectors");
1826 rocketModel[i].numPorts = 8;
1827 break;
1828 case PCI_DEVICE_ID_RP4J:
1829 str = "4J";
1830 max_num_aiops = 1;
1831 ports_per_aiop = 4;
1832 rocketModel[i].model = MODEL_RP4J;
1833 strcpy(rocketModel[i].modelString, "RocketPort 4 port w/RJ45 connectors");
1834 rocketModel[i].numPorts = 4;
1835 break;
1836 case PCI_DEVICE_ID_RP8SNI:
1837 str = "8 (DB78 Custom)";
1838 max_num_aiops = 1;
1839 rocketModel[i].model = MODEL_RP8SNI;
1840 strcpy(rocketModel[i].modelString, "RocketPort 8 port w/ custom DB78");
1841 rocketModel[i].numPorts = 8;
1842 break;
1843 case PCI_DEVICE_ID_RP16SNI:
1844 str = "16 (DB78 Custom)";
1845 max_num_aiops = 2;
1846 rocketModel[i].model = MODEL_RP16SNI;
1847 strcpy(rocketModel[i].modelString, "RocketPort 16 port w/ custom DB78");
1848 rocketModel[i].numPorts = 16;
1849 break;
1850 case PCI_DEVICE_ID_RP16INTF:
1851 str = "16";
1852 max_num_aiops = 2;
1853 rocketModel[i].model = MODEL_RP16INTF;
1854 strcpy(rocketModel[i].modelString, "RocketPort 16 port w/external I/F");
1855 rocketModel[i].numPorts = 16;
1856 break;
1857 case PCI_DEVICE_ID_URP16INTF:
1858 str = "16";
1859 max_num_aiops = 2;
1860 rocketModel[i].model = MODEL_UPCI_RP16INTF;
1861 strcpy(rocketModel[i].modelString, "RocketPort UPCI 16 port w/external I/F");
1862 rocketModel[i].numPorts = 16;
1863 break;
1864 case PCI_DEVICE_ID_CRP16INTF:
1865 str = "16";
1866 max_num_aiops = 2;
1867 rocketModel[i].model = MODEL_CPCI_RP16INTF;
1868 strcpy(rocketModel[i].modelString, "RocketPort Compact PCI 16 port w/external I/F");
1869 rocketModel[i].numPorts = 16;
1870 break;
1871 case PCI_DEVICE_ID_RP32INTF:
1872 str = "32";
1873 max_num_aiops = 4;
1874 rocketModel[i].model = MODEL_RP32INTF;
1875 strcpy(rocketModel[i].modelString, "RocketPort 32 port w/external I/F");
1876 rocketModel[i].numPorts = 32;
1877 break;
1878 case PCI_DEVICE_ID_URP32INTF:
1879 str = "32";
1880 max_num_aiops = 4;
1881 rocketModel[i].model = MODEL_UPCI_RP32INTF;
1882 strcpy(rocketModel[i].modelString, "RocketPort UPCI 32 port w/external I/F");
1883 rocketModel[i].numPorts = 32;
1884 break;
1885 case PCI_DEVICE_ID_RPP4:
1886 str = "Plus Quadcable";
1887 max_num_aiops = 1;
1888 ports_per_aiop = 4;
1889 altChanRingIndicator++;
1890 fast_clock++;
1891 rocketModel[i].model = MODEL_RPP4;
1892 strcpy(rocketModel[i].modelString, "RocketPort Plus 4 port");
1893 rocketModel[i].numPorts = 4;
1894 break;
1895 case PCI_DEVICE_ID_RPP8:
1896 str = "Plus Octacable";
1897 max_num_aiops = 2;
1898 ports_per_aiop = 4;
1899 altChanRingIndicator++;
1900 fast_clock++;
1901 rocketModel[i].model = MODEL_RPP8;
1902 strcpy(rocketModel[i].modelString, "RocketPort Plus 8 port");
1903 rocketModel[i].numPorts = 8;
1904 break;
1905 case PCI_DEVICE_ID_RP2_232:
1906 str = "Plus 2 (RS-232)";
1907 max_num_aiops = 1;
1908 ports_per_aiop = 2;
1909 altChanRingIndicator++;
1910 fast_clock++;
1911 rocketModel[i].model = MODEL_RP2_232;
1912 strcpy(rocketModel[i].modelString, "RocketPort Plus 2 port RS232");
1913 rocketModel[i].numPorts = 2;
1914 break;
1915 case PCI_DEVICE_ID_RP2_422:
1916 str = "Plus 2 (RS-422)";
1917 max_num_aiops = 1;
1918 ports_per_aiop = 2;
1919 altChanRingIndicator++;
1920 fast_clock++;
1921 rocketModel[i].model = MODEL_RP2_422;
1922 strcpy(rocketModel[i].modelString, "RocketPort Plus 2 port RS422");
1923 rocketModel[i].numPorts = 2;
1924 break;
1925 case PCI_DEVICE_ID_RP6M:
1926
1927 max_num_aiops = 1;
1928 ports_per_aiop = 6;
1929 str = "6-port";
1930
1931 /* If revision is 1, the rocketmodem flash must be loaded.
1932 * If it is 2 it is a "socketed" version. */
1933 if (dev->revision == 1) {
1934 rcktpt_type[i] = ROCKET_TYPE_MODEMII;
1935 rocketModel[i].loadrm2 = 1;
1936 } else {
1937 rcktpt_type[i] = ROCKET_TYPE_MODEM;
1938 }
1939
1940 rocketModel[i].model = MODEL_RP6M;
1941 strcpy(rocketModel[i].modelString, "RocketModem 6 port");
1942 rocketModel[i].numPorts = 6;
1943 break;
1944 case PCI_DEVICE_ID_RP4M:
1945 max_num_aiops = 1;
1946 ports_per_aiop = 4;
1947 str = "4-port";
1948 if (dev->revision == 1) {
1949 rcktpt_type[i] = ROCKET_TYPE_MODEMII;
1950 rocketModel[i].loadrm2 = 1;
1951 } else {
1952 rcktpt_type[i] = ROCKET_TYPE_MODEM;
1953 }
1954
1955 rocketModel[i].model = MODEL_RP4M;
1956 strcpy(rocketModel[i].modelString, "RocketModem 4 port");
1957 rocketModel[i].numPorts = 4;
1958 break;
1959 default:
1960 str = "(unknown/unsupported)";
1961 max_num_aiops = 0;
1962 break;
1963 }
1964
1965 /*
1966 * Check for UPCI boards.
1967 */
1968
1969 switch (dev->device) {
1970 case PCI_DEVICE_ID_URP32INTF:
1971 case PCI_DEVICE_ID_URP8INTF:
1972 case PCI_DEVICE_ID_URP16INTF:
1973 case PCI_DEVICE_ID_CRP16INTF:
1974 case PCI_DEVICE_ID_URP8OCTA:
1975 rcktpt_io_addr[i] = pci_resource_start(dev, 2);
1976 ConfigIO = pci_resource_start(dev, 1);
1977 if (dev->device == PCI_DEVICE_ID_URP8OCTA) {
1978 UPCIRingInd = rcktpt_io_addr[i] + _PCI_9030_RING_IND;
1979
1980 /*
1981 * Check for octa or quad cable.
1982 */
1983 if (!
1984 (sInW(ConfigIO + _PCI_9030_GPIO_CTRL) &
1985 PCI_GPIO_CTRL_8PORT)) {
1986 str = "Quadcable";
1987 ports_per_aiop = 4;
1988 rocketModel[i].numPorts = 4;
1989 }
1990 }
1991 break;
1992 case PCI_DEVICE_ID_UPCI_RM3_8PORT:
1993 str = "8 ports";
1994 max_num_aiops = 1;
1995 rocketModel[i].model = MODEL_UPCI_RM3_8PORT;
1996 strcpy(rocketModel[i].modelString, "RocketModem III 8 port");
1997 rocketModel[i].numPorts = 8;
1998 rcktpt_io_addr[i] = pci_resource_start(dev, 2);
1999 UPCIRingInd = rcktpt_io_addr[i] + _PCI_9030_RING_IND;
2000 ConfigIO = pci_resource_start(dev, 1);
2001 rcktpt_type[i] = ROCKET_TYPE_MODEMIII;
2002 break;
2003 case PCI_DEVICE_ID_UPCI_RM3_4PORT:
2004 str = "4 ports";
2005 max_num_aiops = 1;
2006 rocketModel[i].model = MODEL_UPCI_RM3_4PORT;
2007 strcpy(rocketModel[i].modelString, "RocketModem III 4 port");
2008 rocketModel[i].numPorts = 4;
2009 rcktpt_io_addr[i] = pci_resource_start(dev, 2);
2010 UPCIRingInd = rcktpt_io_addr[i] + _PCI_9030_RING_IND;
2011 ConfigIO = pci_resource_start(dev, 1);
2012 rcktpt_type[i] = ROCKET_TYPE_MODEMIII;
2013 break;
2014 default:
2015 break;
2016 }
2017
2018 switch (rcktpt_type[i]) {
2019 case ROCKET_TYPE_MODEM:
2020 board_type = "RocketModem";
2021 break;
2022 case ROCKET_TYPE_MODEMII:
2023 board_type = "RocketModem II";
2024 break;
2025 case ROCKET_TYPE_MODEMIII:
2026 board_type = "RocketModem III";
2027 break;
2028 default:
2029 board_type = "RocketPort";
2030 break;
2031 }
2032
2033 if (fast_clock) {
2034 sClockPrescale = 0x12; /* mod 2 (divide by 3) */
2035 rp_baud_base[i] = 921600;
2036 } else {
2037 /*
2038 * If support_low_speed is set, use the slow clock
2039 * prescale, which supports 50 bps
2040 */
2041 if (support_low_speed) {
2042 /* mod 9 (divide by 10) prescale */
2043 sClockPrescale = 0x19;
2044 rp_baud_base[i] = 230400;
2045 } else {
2046 /* mod 4 (devide by 5) prescale */
2047 sClockPrescale = 0x14;
2048 rp_baud_base[i] = 460800;
2049 }
2050 }
2051
2052 for (aiop = 0; aiop < max_num_aiops; aiop++)
2053 aiopio[aiop] = rcktpt_io_addr[i] + (aiop * 0x40);
2054 ctlp = sCtlNumToCtlPtr(i);
2055 num_aiops = sPCIInitController(ctlp, i, aiopio, max_num_aiops, ConfigIO, 0, FREQ_DIS, 0, altChanRingIndicator, UPCIRingInd);
2056 for (aiop = 0; aiop < max_num_aiops; aiop++)
2057 ctlp->AiopNumChan[aiop] = ports_per_aiop;
2058
2059 dev_info(&dev->dev, "comtrol PCI controller #%d found at "
2060 "address %04lx, %d AIOP(s) (%s), creating ttyR%d - %ld\n",
2061 i, rcktpt_io_addr[i], num_aiops, rocketModel[i].modelString,
2062 rocketModel[i].startingPortNumber,
2063 rocketModel[i].startingPortNumber + rocketModel[i].numPorts-1);
2064
2065 if (num_aiops <= 0) {
2066 rcktpt_io_addr[i] = 0;
2067 return (0);
2068 }
2069 is_PCI[i] = 1;
2070
2071 /* Reset the AIOPIC, init the serial ports */
2072 for (aiop = 0; aiop < num_aiops; aiop++) {
2073 sResetAiopByNum(ctlp, aiop);
2074 num_chan = ports_per_aiop;
2075 for (chan = 0; chan < num_chan; chan++)
2076 init_r_port(i, aiop, chan, dev);
2077 }
2078
2079 /* Rocket modems must be reset */
2080 if ((rcktpt_type[i] == ROCKET_TYPE_MODEM) ||
2081 (rcktpt_type[i] == ROCKET_TYPE_MODEMII) ||
2082 (rcktpt_type[i] == ROCKET_TYPE_MODEMIII)) {
2083 num_chan = ports_per_aiop;
2084 for (chan = 0; chan < num_chan; chan++)
2085 sPCIModemReset(ctlp, chan, 1);
2086 msleep(500);
2087 for (chan = 0; chan < num_chan; chan++)
2088 sPCIModemReset(ctlp, chan, 0);
2089 msleep(500);
2090 rmSpeakerReset(ctlp, rocketModel[i].model);
2091 }
2092 return (1);
2093 }
2094
2095 /*
2096 * Probes for PCI cards, inits them if found
2097 * Input: board_found = number of ISA boards already found, or the
2098 * starting board number
2099 * Returns: Number of PCI boards found
2100 */
2101 static int __init init_PCI(int boards_found)
2102 {
2103 struct pci_dev *dev = NULL;
2104 int count = 0;
2105
2106 /* Work through the PCI device list, pulling out ours */
2107 while ((dev = pci_get_device(PCI_VENDOR_ID_RP, PCI_ANY_ID, dev))) {
2108 if (register_PCI(count + boards_found, dev))
2109 count++;
2110 }
2111 return (count);
2112 }
2113
2114 #endif /* CONFIG_PCI */
2115
2116 /*
2117 * Probes for ISA cards
2118 * Input: i = the board number to look for
2119 * Returns: 1 if board found, 0 else
2120 */
2121 static int __init init_ISA(int i)
2122 {
2123 int num_aiops, num_chan = 0, total_num_chan = 0;
2124 int aiop, chan;
2125 unsigned int aiopio[MAX_AIOPS_PER_BOARD];
2126 CONTROLLER_t *ctlp;
2127 char *type_string;
2128
2129 /* If io_addr is zero, no board configured */
2130 if (rcktpt_io_addr[i] == 0)
2131 return (0);
2132
2133 /* Reserve the IO region */
2134 if (!request_region(rcktpt_io_addr[i], 64, "Comtrol RocketPort")) {
2135 printk(KERN_ERR "Unable to reserve IO region for configured "
2136 "ISA RocketPort at address 0x%lx, board not "
2137 "installed...\n", rcktpt_io_addr[i]);
2138 rcktpt_io_addr[i] = 0;
2139 return (0);
2140 }
2141
2142 ctlp = sCtlNumToCtlPtr(i);
2143
2144 ctlp->boardType = rcktpt_type[i];
2145
2146 switch (rcktpt_type[i]) {
2147 case ROCKET_TYPE_PC104:
2148 type_string = "(PC104)";
2149 break;
2150 case ROCKET_TYPE_MODEM:
2151 type_string = "(RocketModem)";
2152 break;
2153 case ROCKET_TYPE_MODEMII:
2154 type_string = "(RocketModem II)";
2155 break;
2156 default:
2157 type_string = "";
2158 break;
2159 }
2160
2161 /*
2162 * If support_low_speed is set, use the slow clock prescale,
2163 * which supports 50 bps
2164 */
2165 if (support_low_speed) {
2166 sClockPrescale = 0x19; /* mod 9 (divide by 10) prescale */
2167 rp_baud_base[i] = 230400;
2168 } else {
2169 sClockPrescale = 0x14; /* mod 4 (devide by 5) prescale */
2170 rp_baud_base[i] = 460800;
2171 }
2172
2173 for (aiop = 0; aiop < MAX_AIOPS_PER_BOARD; aiop++)
2174 aiopio[aiop] = rcktpt_io_addr[i] + (aiop * 0x400);
2175
2176 num_aiops = sInitController(ctlp, i, controller + (i * 0x400), aiopio, MAX_AIOPS_PER_BOARD, 0, FREQ_DIS, 0);
2177
2178 if (ctlp->boardType == ROCKET_TYPE_PC104) {
2179 sEnAiop(ctlp, 2); /* only one AIOPIC, but these */
2180 sEnAiop(ctlp, 3); /* CSels used for other stuff */
2181 }
2182
2183 /* If something went wrong initing the AIOP's release the ISA IO memory */
2184 if (num_aiops <= 0) {
2185 release_region(rcktpt_io_addr[i], 64);
2186 rcktpt_io_addr[i] = 0;
2187 return (0);
2188 }
2189
2190 rocketModel[i].startingPortNumber = nextLineNumber;
2191
2192 for (aiop = 0; aiop < num_aiops; aiop++) {
2193 sResetAiopByNum(ctlp, aiop);
2194 sEnAiop(ctlp, aiop);
2195 num_chan = sGetAiopNumChan(ctlp, aiop);
2196 total_num_chan += num_chan;
2197 for (chan = 0; chan < num_chan; chan++)
2198 init_r_port(i, aiop, chan, NULL);
2199 }
2200 is_PCI[i] = 0;
2201 if ((rcktpt_type[i] == ROCKET_TYPE_MODEM) || (rcktpt_type[i] == ROCKET_TYPE_MODEMII)) {
2202 num_chan = sGetAiopNumChan(ctlp, 0);
2203 total_num_chan = num_chan;
2204 for (chan = 0; chan < num_chan; chan++)
2205 sModemReset(ctlp, chan, 1);
2206 msleep(500);
2207 for (chan = 0; chan < num_chan; chan++)
2208 sModemReset(ctlp, chan, 0);
2209 msleep(500);
2210 strcpy(rocketModel[i].modelString, "RocketModem ISA");
2211 } else {
2212 strcpy(rocketModel[i].modelString, "RocketPort ISA");
2213 }
2214 rocketModel[i].numPorts = total_num_chan;
2215 rocketModel[i].model = MODEL_ISA;
2216
2217 printk(KERN_INFO "RocketPort ISA card #%d found at 0x%lx - %d AIOPs %s\n",
2218 i, rcktpt_io_addr[i], num_aiops, type_string);
2219
2220 printk(KERN_INFO "Installing %s, creating /dev/ttyR%d - %ld\n",
2221 rocketModel[i].modelString,
2222 rocketModel[i].startingPortNumber,
2223 rocketModel[i].startingPortNumber +
2224 rocketModel[i].numPorts - 1);
2225
2226 return (1);
2227 }
2228
2229 static const struct tty_operations rocket_ops = {
2230 .open = rp_open,
2231 .close = rp_close,
2232 .write = rp_write,
2233 .put_char = rp_put_char,
2234 .write_room = rp_write_room,
2235 .chars_in_buffer = rp_chars_in_buffer,
2236 .flush_buffer = rp_flush_buffer,
2237 .ioctl = rp_ioctl,
2238 .throttle = rp_throttle,
2239 .unthrottle = rp_unthrottle,
2240 .set_termios = rp_set_termios,
2241 .stop = rp_stop,
2242 .start = rp_start,
2243 .hangup = rp_hangup,
2244 .break_ctl = rp_break,
2245 .send_xchar = rp_send_xchar,
2246 .wait_until_sent = rp_wait_until_sent,
2247 .tiocmget = rp_tiocmget,
2248 .tiocmset = rp_tiocmset,
2249 };
2250
2251 static const struct tty_port_operations rocket_port_ops = {
2252 .carrier_raised = carrier_raised,
2253 .raise_dtr_rts = raise_dtr_rts,
2254 };
2255
2256 /*
2257 * The module "startup" routine; it's run when the module is loaded.
2258 */
2259 static int __init rp_init(void)
2260 {
2261 int ret = -ENOMEM, pci_boards_found, isa_boards_found, i;
2262
2263 printk(KERN_INFO "RocketPort device driver module, version %s, %s\n",
2264 ROCKET_VERSION, ROCKET_DATE);
2265
2266 rocket_driver = alloc_tty_driver(MAX_RP_PORTS);
2267 if (!rocket_driver)
2268 goto err;
2269
2270 /*
2271 * If board 1 is non-zero, there is at least one ISA configured. If controller is
2272 * zero, use the default controller IO address of board1 + 0x40.
2273 */
2274 if (board1) {
2275 if (controller == 0)
2276 controller = board1 + 0x40;
2277 } else {
2278 controller = 0; /* Used as a flag, meaning no ISA boards */
2279 }
2280
2281 /* If an ISA card is configured, reserve the 4 byte IO space for the Mudbac controller */
2282 if (controller && (!request_region(controller, 4, "Comtrol RocketPort"))) {
2283 printk(KERN_ERR "Unable to reserve IO region for first "
2284 "configured ISA RocketPort controller 0x%lx. "
2285 "Driver exiting\n", controller);
2286 ret = -EBUSY;
2287 goto err_tty;
2288 }
2289
2290 /* Store ISA variable retrieved from command line or .conf file. */
2291 rcktpt_io_addr[0] = board1;
2292 rcktpt_io_addr[1] = board2;
2293 rcktpt_io_addr[2] = board3;
2294 rcktpt_io_addr[3] = board4;
2295
2296 rcktpt_type[0] = modem1 ? ROCKET_TYPE_MODEM : ROCKET_TYPE_NORMAL;
2297 rcktpt_type[0] = pc104_1[0] ? ROCKET_TYPE_PC104 : rcktpt_type[0];
2298 rcktpt_type[1] = modem2 ? ROCKET_TYPE_MODEM : ROCKET_TYPE_NORMAL;
2299 rcktpt_type[1] = pc104_2[0] ? ROCKET_TYPE_PC104 : rcktpt_type[1];
2300 rcktpt_type[2] = modem3 ? ROCKET_TYPE_MODEM : ROCKET_TYPE_NORMAL;
2301 rcktpt_type[2] = pc104_3[0] ? ROCKET_TYPE_PC104 : rcktpt_type[2];
2302 rcktpt_type[3] = modem4 ? ROCKET_TYPE_MODEM : ROCKET_TYPE_NORMAL;
2303 rcktpt_type[3] = pc104_4[0] ? ROCKET_TYPE_PC104 : rcktpt_type[3];
2304
2305 /*
2306 * Set up the tty driver structure and then register this
2307 * driver with the tty layer.
2308 */
2309
2310 rocket_driver->owner = THIS_MODULE;
2311 rocket_driver->flags = TTY_DRIVER_DYNAMIC_DEV;
2312 rocket_driver->name = "ttyR";
2313 rocket_driver->driver_name = "Comtrol RocketPort";
2314 rocket_driver->major = TTY_ROCKET_MAJOR;
2315 rocket_driver->minor_start = 0;
2316 rocket_driver->type = TTY_DRIVER_TYPE_SERIAL;
2317 rocket_driver->subtype = SERIAL_TYPE_NORMAL;
2318 rocket_driver->init_termios = tty_std_termios;
2319 rocket_driver->init_termios.c_cflag =
2320 B9600 | CS8 | CREAD | HUPCL | CLOCAL;
2321 rocket_driver->init_termios.c_ispeed = 9600;
2322 rocket_driver->init_termios.c_ospeed = 9600;
2323 #ifdef ROCKET_SOFT_FLOW
2324 rocket_driver->flags |= TTY_DRIVER_REAL_RAW;
2325 #endif
2326 tty_set_operations(rocket_driver, &rocket_ops);
2327
2328 ret = tty_register_driver(rocket_driver);
2329 if (ret < 0) {
2330 printk(KERN_ERR "Couldn't install tty RocketPort driver\n");
2331 goto err_tty;
2332 }
2333
2334 #ifdef ROCKET_DEBUG_OPEN
2335 printk(KERN_INFO "RocketPort driver is major %d\n", rocket_driver.major);
2336 #endif
2337
2338 /*
2339 * OK, let's probe each of the controllers looking for boards. Any boards found
2340 * will be initialized here.
2341 */
2342 isa_boards_found = 0;
2343 pci_boards_found = 0;
2344
2345 for (i = 0; i < NUM_BOARDS; i++) {
2346 if (init_ISA(i))
2347 isa_boards_found++;
2348 }
2349
2350 #ifdef CONFIG_PCI
2351 if (isa_boards_found < NUM_BOARDS)
2352 pci_boards_found = init_PCI(isa_boards_found);
2353 #endif
2354
2355 max_board = pci_boards_found + isa_boards_found;
2356
2357 if (max_board == 0) {
2358 printk(KERN_ERR "No rocketport ports found; unloading driver\n");
2359 ret = -ENXIO;
2360 goto err_ttyu;
2361 }
2362
2363 return 0;
2364 err_ttyu:
2365 tty_unregister_driver(rocket_driver);
2366 err_tty:
2367 put_tty_driver(rocket_driver);
2368 err:
2369 return ret;
2370 }
2371
2372
2373 static void rp_cleanup_module(void)
2374 {
2375 int retval;
2376 int i;
2377
2378 del_timer_sync(&rocket_timer);
2379
2380 retval = tty_unregister_driver(rocket_driver);
2381 if (retval)
2382 printk(KERN_ERR "Error %d while trying to unregister "
2383 "rocketport driver\n", -retval);
2384
2385 for (i = 0; i < MAX_RP_PORTS; i++)
2386 if (rp_table[i]) {
2387 tty_unregister_device(rocket_driver, i);
2388 kfree(rp_table[i]);
2389 }
2390
2391 put_tty_driver(rocket_driver);
2392
2393 for (i = 0; i < NUM_BOARDS; i++) {
2394 if (rcktpt_io_addr[i] <= 0 || is_PCI[i])
2395 continue;
2396 release_region(rcktpt_io_addr[i], 64);
2397 }
2398 if (controller)
2399 release_region(controller, 4);
2400 }
2401
2402 /***************************************************************************
2403 Function: sInitController
2404 Purpose: Initialization of controller global registers and controller
2405 structure.
2406 Call: sInitController(CtlP,CtlNum,MudbacIO,AiopIOList,AiopIOListSize,
2407 IRQNum,Frequency,PeriodicOnly)
2408 CONTROLLER_T *CtlP; Ptr to controller structure
2409 int CtlNum; Controller number
2410 ByteIO_t MudbacIO; Mudbac base I/O address.
2411 ByteIO_t *AiopIOList; List of I/O addresses for each AIOP.
2412 This list must be in the order the AIOPs will be found on the
2413 controller. Once an AIOP in the list is not found, it is
2414 assumed that there are no more AIOPs on the controller.
2415 int AiopIOListSize; Number of addresses in AiopIOList
2416 int IRQNum; Interrupt Request number. Can be any of the following:
2417 0: Disable global interrupts
2418 3: IRQ 3
2419 4: IRQ 4
2420 5: IRQ 5
2421 9: IRQ 9
2422 10: IRQ 10
2423 11: IRQ 11
2424 12: IRQ 12
2425 15: IRQ 15
2426 Byte_t Frequency: A flag identifying the frequency
2427 of the periodic interrupt, can be any one of the following:
2428 FREQ_DIS - periodic interrupt disabled
2429 FREQ_137HZ - 137 Hertz
2430 FREQ_69HZ - 69 Hertz
2431 FREQ_34HZ - 34 Hertz
2432 FREQ_17HZ - 17 Hertz
2433 FREQ_9HZ - 9 Hertz
2434 FREQ_4HZ - 4 Hertz
2435 If IRQNum is set to 0 the Frequency parameter is
2436 overidden, it is forced to a value of FREQ_DIS.
2437 int PeriodicOnly: 1 if all interrupts except the periodic
2438 interrupt are to be blocked.
2439 0 is both the periodic interrupt and
2440 other channel interrupts are allowed.
2441 If IRQNum is set to 0 the PeriodicOnly parameter is
2442 overidden, it is forced to a value of 0.
2443 Return: int: Number of AIOPs on the controller, or CTLID_NULL if controller
2444 initialization failed.
2445
2446 Comments:
2447 If periodic interrupts are to be disabled but AIOP interrupts
2448 are allowed, set Frequency to FREQ_DIS and PeriodicOnly to 0.
2449
2450 If interrupts are to be completely disabled set IRQNum to 0.
2451
2452 Setting Frequency to FREQ_DIS and PeriodicOnly to 1 is an
2453 invalid combination.
2454
2455 This function performs initialization of global interrupt modes,
2456 but it does not actually enable global interrupts. To enable
2457 and disable global interrupts use functions sEnGlobalInt() and
2458 sDisGlobalInt(). Enabling of global interrupts is normally not
2459 done until all other initializations are complete.
2460
2461 Even if interrupts are globally enabled, they must also be
2462 individually enabled for each channel that is to generate
2463 interrupts.
2464
2465 Warnings: No range checking on any of the parameters is done.
2466
2467 No context switches are allowed while executing this function.
2468
2469 After this function all AIOPs on the controller are disabled,
2470 they can be enabled with sEnAiop().
2471 */
2472 static int sInitController(CONTROLLER_T * CtlP, int CtlNum, ByteIO_t MudbacIO,
2473 ByteIO_t * AiopIOList, int AiopIOListSize,
2474 int IRQNum, Byte_t Frequency, int PeriodicOnly)
2475 {
2476 int i;
2477 ByteIO_t io;
2478 int done;
2479
2480 CtlP->AiopIntrBits = aiop_intr_bits;
2481 CtlP->AltChanRingIndicator = 0;
2482 CtlP->CtlNum = CtlNum;
2483 CtlP->CtlID = CTLID_0001; /* controller release 1 */
2484 CtlP->BusType = isISA;
2485 CtlP->MBaseIO = MudbacIO;
2486 CtlP->MReg1IO = MudbacIO + 1;
2487 CtlP->MReg2IO = MudbacIO + 2;
2488 CtlP->MReg3IO = MudbacIO + 3;
2489 #if 1
2490 CtlP->MReg2 = 0; /* interrupt disable */
2491 CtlP->MReg3 = 0; /* no periodic interrupts */
2492 #else
2493 if (sIRQMap[IRQNum] == 0) { /* interrupts globally disabled */
2494 CtlP->MReg2 = 0; /* interrupt disable */
2495 CtlP->MReg3 = 0; /* no periodic interrupts */
2496 } else {
2497 CtlP->MReg2 = sIRQMap[IRQNum]; /* set IRQ number */
2498 CtlP->MReg3 = Frequency; /* set frequency */
2499 if (PeriodicOnly) { /* periodic interrupt only */
2500 CtlP->MReg3 |= PERIODIC_ONLY;
2501 }
2502 }
2503 #endif
2504 sOutB(CtlP->MReg2IO, CtlP->MReg2);
2505 sOutB(CtlP->MReg3IO, CtlP->MReg3);
2506 sControllerEOI(CtlP); /* clear EOI if warm init */
2507 /* Init AIOPs */
2508 CtlP->NumAiop = 0;
2509 for (i = done = 0; i < AiopIOListSize; i++) {
2510 io = AiopIOList[i];
2511 CtlP->AiopIO[i] = (WordIO_t) io;
2512 CtlP->AiopIntChanIO[i] = io + _INT_CHAN;
2513 sOutB(CtlP->MReg2IO, CtlP->MReg2 | (i & 0x03)); /* AIOP index */
2514 sOutB(MudbacIO, (Byte_t) (io >> 6)); /* set up AIOP I/O in MUDBAC */
2515 if (done)
2516 continue;
2517 sEnAiop(CtlP, i); /* enable the AIOP */
2518 CtlP->AiopID[i] = sReadAiopID(io); /* read AIOP ID */
2519 if (CtlP->AiopID[i] == AIOPID_NULL) /* if AIOP does not exist */
2520 done = 1; /* done looking for AIOPs */
2521 else {
2522 CtlP->AiopNumChan[i] = sReadAiopNumChan((WordIO_t) io); /* num channels in AIOP */
2523 sOutW((WordIO_t) io + _INDX_ADDR, _CLK_PRE); /* clock prescaler */
2524 sOutB(io + _INDX_DATA, sClockPrescale);
2525 CtlP->NumAiop++; /* bump count of AIOPs */
2526 }
2527 sDisAiop(CtlP, i); /* disable AIOP */
2528 }
2529
2530 if (CtlP->NumAiop == 0)
2531 return (-1);
2532 else
2533 return (CtlP->NumAiop);
2534 }
2535
2536 /***************************************************************************
2537 Function: sPCIInitController
2538 Purpose: Initialization of controller global registers and controller
2539 structure.
2540 Call: sPCIInitController(CtlP,CtlNum,AiopIOList,AiopIOListSize,
2541 IRQNum,Frequency,PeriodicOnly)
2542 CONTROLLER_T *CtlP; Ptr to controller structure
2543 int CtlNum; Controller number
2544 ByteIO_t *AiopIOList; List of I/O addresses for each AIOP.
2545 This list must be in the order the AIOPs will be found on the
2546 controller. Once an AIOP in the list is not found, it is
2547 assumed that there are no more AIOPs on the controller.
2548 int AiopIOListSize; Number of addresses in AiopIOList
2549 int IRQNum; Interrupt Request number. Can be any of the following:
2550 0: Disable global interrupts
2551 3: IRQ 3
2552 4: IRQ 4
2553 5: IRQ 5
2554 9: IRQ 9
2555 10: IRQ 10
2556 11: IRQ 11
2557 12: IRQ 12
2558 15: IRQ 15
2559 Byte_t Frequency: A flag identifying the frequency
2560 of the periodic interrupt, can be any one of the following:
2561 FREQ_DIS - periodic interrupt disabled
2562 FREQ_137HZ - 137 Hertz
2563 FREQ_69HZ - 69 Hertz
2564 FREQ_34HZ - 34 Hertz
2565 FREQ_17HZ - 17 Hertz
2566 FREQ_9HZ - 9 Hertz
2567 FREQ_4HZ - 4 Hertz
2568 If IRQNum is set to 0 the Frequency parameter is
2569 overidden, it is forced to a value of FREQ_DIS.
2570 int PeriodicOnly: 1 if all interrupts except the periodic
2571 interrupt are to be blocked.
2572 0 is both the periodic interrupt and
2573 other channel interrupts are allowed.
2574 If IRQNum is set to 0 the PeriodicOnly parameter is
2575 overidden, it is forced to a value of 0.
2576 Return: int: Number of AIOPs on the controller, or CTLID_NULL if controller
2577 initialization failed.
2578
2579 Comments:
2580 If periodic interrupts are to be disabled but AIOP interrupts
2581 are allowed, set Frequency to FREQ_DIS and PeriodicOnly to 0.
2582
2583 If interrupts are to be completely disabled set IRQNum to 0.
2584
2585 Setting Frequency to FREQ_DIS and PeriodicOnly to 1 is an
2586 invalid combination.
2587
2588 This function performs initialization of global interrupt modes,
2589 but it does not actually enable global interrupts. To enable
2590 and disable global interrupts use functions sEnGlobalInt() and
2591 sDisGlobalInt(). Enabling of global interrupts is normally not
2592 done until all other initializations are complete.
2593
2594 Even if interrupts are globally enabled, they must also be
2595 individually enabled for each channel that is to generate
2596 interrupts.
2597
2598 Warnings: No range checking on any of the parameters is done.
2599
2600 No context switches are allowed while executing this function.
2601
2602 After this function all AIOPs on the controller are disabled,
2603 they can be enabled with sEnAiop().
2604 */
2605 static int sPCIInitController(CONTROLLER_T * CtlP, int CtlNum,
2606 ByteIO_t * AiopIOList, int AiopIOListSize,
2607 WordIO_t ConfigIO, int IRQNum, Byte_t Frequency,
2608 int PeriodicOnly, int altChanRingIndicator,
2609 int UPCIRingInd)
2610 {
2611 int i;
2612 ByteIO_t io;
2613
2614 CtlP->AltChanRingIndicator = altChanRingIndicator;
2615 CtlP->UPCIRingInd = UPCIRingInd;
2616 CtlP->CtlNum = CtlNum;
2617 CtlP->CtlID = CTLID_0001; /* controller release 1 */
2618 CtlP->BusType = isPCI; /* controller release 1 */
2619
2620 if (ConfigIO) {
2621 CtlP->isUPCI = 1;
2622 CtlP->PCIIO = ConfigIO + _PCI_9030_INT_CTRL;
2623 CtlP->PCIIO2 = ConfigIO + _PCI_9030_GPIO_CTRL;
2624 CtlP->AiopIntrBits = upci_aiop_intr_bits;
2625 } else {
2626 CtlP->isUPCI = 0;
2627 CtlP->PCIIO =
2628 (WordIO_t) ((ByteIO_t) AiopIOList[0] + _PCI_INT_FUNC);
2629 CtlP->AiopIntrBits = aiop_intr_bits;
2630 }
2631
2632 sPCIControllerEOI(CtlP); /* clear EOI if warm init */
2633 /* Init AIOPs */
2634 CtlP->NumAiop = 0;
2635 for (i = 0; i < AiopIOListSize; i++) {
2636 io = AiopIOList[i];
2637 CtlP->AiopIO[i] = (WordIO_t) io;
2638 CtlP->AiopIntChanIO[i] = io + _INT_CHAN;
2639
2640 CtlP->AiopID[i] = sReadAiopID(io); /* read AIOP ID */
2641 if (CtlP->AiopID[i] == AIOPID_NULL) /* if AIOP does not exist */
2642 break; /* done looking for AIOPs */
2643
2644 CtlP->AiopNumChan[i] = sReadAiopNumChan((WordIO_t) io); /* num channels in AIOP */
2645 sOutW((WordIO_t) io + _INDX_ADDR, _CLK_PRE); /* clock prescaler */
2646 sOutB(io + _INDX_DATA, sClockPrescale);
2647 CtlP->NumAiop++; /* bump count of AIOPs */
2648 }
2649
2650 if (CtlP->NumAiop == 0)
2651 return (-1);
2652 else
2653 return (CtlP->NumAiop);
2654 }
2655
2656 /***************************************************************************
2657 Function: sReadAiopID
2658 Purpose: Read the AIOP idenfication number directly from an AIOP.
2659 Call: sReadAiopID(io)
2660 ByteIO_t io: AIOP base I/O address
2661 Return: int: Flag AIOPID_XXXX if a valid AIOP is found, where X
2662 is replace by an identifying number.
2663 Flag AIOPID_NULL if no valid AIOP is found
2664 Warnings: No context switches are allowed while executing this function.
2665
2666 */
2667 static int sReadAiopID(ByteIO_t io)
2668 {
2669 Byte_t AiopID; /* ID byte from AIOP */
2670
2671 sOutB(io + _CMD_REG, RESET_ALL); /* reset AIOP */
2672 sOutB(io + _CMD_REG, 0x0);
2673 AiopID = sInW(io + _CHN_STAT0) & 0x07;
2674 if (AiopID == 0x06)
2675 return (1);
2676 else /* AIOP does not exist */
2677 return (-1);
2678 }
2679
2680 /***************************************************************************
2681 Function: sReadAiopNumChan
2682 Purpose: Read the number of channels available in an AIOP directly from
2683 an AIOP.
2684 Call: sReadAiopNumChan(io)
2685 WordIO_t io: AIOP base I/O address
2686 Return: int: The number of channels available
2687 Comments: The number of channels is determined by write/reads from identical
2688 offsets within the SRAM address spaces for channels 0 and 4.
2689 If the channel 4 space is mirrored to channel 0 it is a 4 channel
2690 AIOP, otherwise it is an 8 channel.
2691 Warnings: No context switches are allowed while executing this function.
2692 */
2693 static int sReadAiopNumChan(WordIO_t io)
2694 {
2695 Word_t x;
2696 static Byte_t R[4] = { 0x00, 0x00, 0x34, 0x12 };
2697
2698 /* write to chan 0 SRAM */
2699 out32((DWordIO_t) io + _INDX_ADDR, R);
2700 sOutW(io + _INDX_ADDR, 0); /* read from SRAM, chan 0 */
2701 x = sInW(io + _INDX_DATA);
2702 sOutW(io + _INDX_ADDR, 0x4000); /* read from SRAM, chan 4 */
2703 if (x != sInW(io + _INDX_DATA)) /* if different must be 8 chan */
2704 return (8);
2705 else
2706 return (4);
2707 }
2708
2709 /***************************************************************************
2710 Function: sInitChan
2711 Purpose: Initialization of a channel and channel structure
2712 Call: sInitChan(CtlP,ChP,AiopNum,ChanNum)
2713 CONTROLLER_T *CtlP; Ptr to controller structure
2714 CHANNEL_T *ChP; Ptr to channel structure
2715 int AiopNum; AIOP number within controller
2716 int ChanNum; Channel number within AIOP
2717 Return: int: 1 if initialization succeeded, 0 if it fails because channel
2718 number exceeds number of channels available in AIOP.
2719 Comments: This function must be called before a channel can be used.
2720 Warnings: No range checking on any of the parameters is done.
2721
2722 No context switches are allowed while executing this function.
2723 */
2724 static int sInitChan(CONTROLLER_T * CtlP, CHANNEL_T * ChP, int AiopNum,
2725 int ChanNum)
2726 {
2727 int i;
2728 WordIO_t AiopIO;
2729 WordIO_t ChIOOff;
2730 Byte_t *ChR;
2731 Word_t ChOff;
2732 static Byte_t R[4];
2733 int brd9600;
2734
2735 if (ChanNum >= CtlP->AiopNumChan[AiopNum])
2736 return 0; /* exceeds num chans in AIOP */
2737
2738 /* Channel, AIOP, and controller identifiers */
2739 ChP->CtlP = CtlP;
2740 ChP->ChanID = CtlP->AiopID[AiopNum];
2741 ChP->AiopNum = AiopNum;
2742 ChP->ChanNum = ChanNum;
2743
2744 /* Global direct addresses */
2745 AiopIO = CtlP->AiopIO[AiopNum];
2746 ChP->Cmd = (ByteIO_t) AiopIO + _CMD_REG;
2747 ChP->IntChan = (ByteIO_t) AiopIO + _INT_CHAN;
2748 ChP->IntMask = (ByteIO_t) AiopIO + _INT_MASK;
2749 ChP->IndexAddr = (DWordIO_t) AiopIO + _INDX_ADDR;
2750 ChP->IndexData = AiopIO + _INDX_DATA;
2751
2752 /* Channel direct addresses */
2753 ChIOOff = AiopIO + ChP->ChanNum * 2;
2754 ChP->TxRxData = ChIOOff + _TD0;
2755 ChP->ChanStat = ChIOOff + _CHN_STAT0;
2756 ChP->TxRxCount = ChIOOff + _FIFO_CNT0;
2757 ChP->IntID = (ByteIO_t) AiopIO + ChP->ChanNum + _INT_ID0;
2758
2759 /* Initialize the channel from the RData array */
2760 for (i = 0; i < RDATASIZE; i += 4) {
2761 R[0] = RData[i];
2762 R[1] = RData[i + 1] + 0x10 * ChanNum;
2763 R[2] = RData[i + 2];
2764 R[3] = RData[i + 3];
2765 out32(ChP->IndexAddr, R);
2766 }
2767
2768 ChR = ChP->R;
2769 for (i = 0; i < RREGDATASIZE; i += 4) {
2770 ChR[i] = RRegData[i];
2771 ChR[i + 1] = RRegData[i + 1] + 0x10 * ChanNum;
2772 ChR[i + 2] = RRegData[i + 2];
2773 ChR[i + 3] = RRegData[i + 3];
2774 }
2775
2776 /* Indexed registers */
2777 ChOff = (Word_t) ChanNum *0x1000;
2778
2779 if (sClockPrescale == 0x14)
2780 brd9600 = 47;
2781 else
2782 brd9600 = 23;
2783
2784 ChP->BaudDiv[0] = (Byte_t) (ChOff + _BAUD);
2785 ChP->BaudDiv[1] = (Byte_t) ((ChOff + _BAUD) >> 8);
2786 ChP->BaudDiv[2] = (Byte_t) brd9600;
2787 ChP->BaudDiv[3] = (Byte_t) (brd9600 >> 8);
2788 out32(ChP->IndexAddr, ChP->BaudDiv);
2789
2790 ChP->TxControl[0] = (Byte_t) (ChOff + _TX_CTRL);
2791 ChP->TxControl[1] = (Byte_t) ((ChOff + _TX_CTRL) >> 8);
2792 ChP->TxControl[2] = 0;
2793 ChP->TxControl[3] = 0;
2794 out32(ChP->IndexAddr, ChP->TxControl);
2795
2796 ChP->RxControl[0] = (Byte_t) (ChOff + _RX_CTRL);
2797 ChP->RxControl[1] = (Byte_t) ((ChOff + _RX_CTRL) >> 8);
2798 ChP->RxControl[2] = 0;
2799 ChP->RxControl[3] = 0;
2800 out32(ChP->IndexAddr, ChP->RxControl);
2801
2802 ChP->TxEnables[0] = (Byte_t) (ChOff + _TX_ENBLS);
2803 ChP->TxEnables[1] = (Byte_t) ((ChOff + _TX_ENBLS) >> 8);
2804 ChP->TxEnables[2] = 0;
2805 ChP->TxEnables[3] = 0;
2806 out32(ChP->IndexAddr, ChP->TxEnables);
2807
2808 ChP->TxCompare[0] = (Byte_t) (ChOff + _TXCMP1);
2809 ChP->TxCompare[1] = (Byte_t) ((ChOff + _TXCMP1) >> 8);
2810 ChP->TxCompare[2] = 0;
2811 ChP->TxCompare[3] = 0;
2812 out32(ChP->IndexAddr, ChP->TxCompare);
2813
2814 ChP->TxReplace1[0] = (Byte_t) (ChOff + _TXREP1B1);
2815 ChP->TxReplace1[1] = (Byte_t) ((ChOff + _TXREP1B1) >> 8);
2816 ChP->TxReplace1[2] = 0;
2817 ChP->TxReplace1[3] = 0;
2818 out32(ChP->IndexAddr, ChP->TxReplace1);
2819
2820 ChP->TxReplace2[0] = (Byte_t) (ChOff + _TXREP2);
2821 ChP->TxReplace2[1] = (Byte_t) ((ChOff + _TXREP2) >> 8);
2822 ChP->TxReplace2[2] = 0;
2823 ChP->TxReplace2[3] = 0;
2824 out32(ChP->IndexAddr, ChP->TxReplace2);
2825
2826 ChP->TxFIFOPtrs = ChOff + _TXF_OUTP;
2827 ChP->TxFIFO = ChOff + _TX_FIFO;
2828
2829 sOutB(ChP->Cmd, (Byte_t) ChanNum | RESTXFCNT); /* apply reset Tx FIFO count */
2830 sOutB(ChP->Cmd, (Byte_t) ChanNum); /* remove reset Tx FIFO count */
2831 sOutW((WordIO_t) ChP->IndexAddr, ChP->TxFIFOPtrs); /* clear Tx in/out ptrs */
2832 sOutW(ChP->IndexData, 0);
2833 ChP->RxFIFOPtrs = ChOff + _RXF_OUTP;
2834 ChP->RxFIFO = ChOff + _RX_FIFO;
2835
2836 sOutB(ChP->Cmd, (Byte_t) ChanNum | RESRXFCNT); /* apply reset Rx FIFO count */
2837 sOutB(ChP->Cmd, (Byte_t) ChanNum); /* remove reset Rx FIFO count */
2838 sOutW((WordIO_t) ChP->IndexAddr, ChP->RxFIFOPtrs); /* clear Rx out ptr */
2839 sOutW(ChP->IndexData, 0);
2840 sOutW((WordIO_t) ChP->IndexAddr, ChP->RxFIFOPtrs + 2); /* clear Rx in ptr */
2841 sOutW(ChP->IndexData, 0);
2842 ChP->TxPrioCnt = ChOff + _TXP_CNT;
2843 sOutW((WordIO_t) ChP->IndexAddr, ChP->TxPrioCnt);
2844 sOutB(ChP->IndexData, 0);
2845 ChP->TxPrioPtr = ChOff + _TXP_PNTR;
2846 sOutW((WordIO_t) ChP->IndexAddr, ChP->TxPrioPtr);
2847 sOutB(ChP->IndexData, 0);
2848 ChP->TxPrioBuf = ChOff + _TXP_BUF;
2849 sEnRxProcessor(ChP); /* start the Rx processor */
2850
2851 return 1;
2852 }
2853
2854 /***************************************************************************
2855 Function: sStopRxProcessor
2856 Purpose: Stop the receive processor from processing a channel.
2857 Call: sStopRxProcessor(ChP)
2858 CHANNEL_T *ChP; Ptr to channel structure
2859
2860 Comments: The receive processor can be started again with sStartRxProcessor().
2861 This function causes the receive processor to skip over the
2862 stopped channel. It does not stop it from processing other channels.
2863
2864 Warnings: No context switches are allowed while executing this function.
2865
2866 Do not leave the receive processor stopped for more than one
2867 character time.
2868
2869 After calling this function a delay of 4 uS is required to ensure
2870 that the receive processor is no longer processing this channel.
2871 */
2872 static void sStopRxProcessor(CHANNEL_T * ChP)
2873 {
2874 Byte_t R[4];
2875
2876 R[0] = ChP->R[0];
2877 R[1] = ChP->R[1];
2878 R[2] = 0x0a;
2879 R[3] = ChP->R[3];
2880 out32(ChP->IndexAddr, R);
2881 }
2882
2883 /***************************************************************************
2884 Function: sFlushRxFIFO
2885 Purpose: Flush the Rx FIFO
2886 Call: sFlushRxFIFO(ChP)
2887 CHANNEL_T *ChP; Ptr to channel structure
2888 Return: void
2889 Comments: To prevent data from being enqueued or dequeued in the Tx FIFO
2890 while it is being flushed the receive processor is stopped
2891 and the transmitter is disabled. After these operations a
2892 4 uS delay is done before clearing the pointers to allow
2893 the receive processor to stop. These items are handled inside
2894 this function.
2895 Warnings: No context switches are allowed while executing this function.
2896 */
2897 static void sFlushRxFIFO(CHANNEL_T * ChP)
2898 {
2899 int i;
2900 Byte_t Ch; /* channel number within AIOP */
2901 int RxFIFOEnabled; /* 1 if Rx FIFO enabled */
2902
2903 if (sGetRxCnt(ChP) == 0) /* Rx FIFO empty */
2904 return; /* don't need to flush */
2905
2906 RxFIFOEnabled = 0;
2907 if (ChP->R[0x32] == 0x08) { /* Rx FIFO is enabled */
2908 RxFIFOEnabled = 1;
2909 sDisRxFIFO(ChP); /* disable it */
2910 for (i = 0; i < 2000 / 200; i++) /* delay 2 uS to allow proc to disable FIFO */
2911 sInB(ChP->IntChan); /* depends on bus i/o timing */
2912 }
2913 sGetChanStatus(ChP); /* clear any pending Rx errors in chan stat */
2914 Ch = (Byte_t) sGetChanNum(ChP);
2915 sOutB(ChP->Cmd, Ch | RESRXFCNT); /* apply reset Rx FIFO count */
2916 sOutB(ChP->Cmd, Ch); /* remove reset Rx FIFO count */
2917 sOutW((WordIO_t) ChP->IndexAddr, ChP->RxFIFOPtrs); /* clear Rx out ptr */
2918 sOutW(ChP->IndexData, 0);
2919 sOutW((WordIO_t) ChP->IndexAddr, ChP->RxFIFOPtrs + 2); /* clear Rx in ptr */
2920 sOutW(ChP->IndexData, 0);
2921 if (RxFIFOEnabled)
2922 sEnRxFIFO(ChP); /* enable Rx FIFO */
2923 }
2924
2925 /***************************************************************************
2926 Function: sFlushTxFIFO
2927 Purpose: Flush the Tx FIFO
2928 Call: sFlushTxFIFO(ChP)
2929 CHANNEL_T *ChP; Ptr to channel structure
2930 Return: void
2931 Comments: To prevent data from being enqueued or dequeued in the Tx FIFO
2932 while it is being flushed the receive processor is stopped
2933 and the transmitter is disabled. After these operations a
2934 4 uS delay is done before clearing the pointers to allow
2935 the receive processor to stop. These items are handled inside
2936 this function.
2937 Warnings: No context switches are allowed while executing this function.
2938 */
2939 static void sFlushTxFIFO(CHANNEL_T * ChP)
2940 {
2941 int i;
2942 Byte_t Ch; /* channel number within AIOP */
2943 int TxEnabled; /* 1 if transmitter enabled */
2944
2945 if (sGetTxCnt(ChP) == 0) /* Tx FIFO empty */
2946 return; /* don't need to flush */
2947
2948 TxEnabled = 0;
2949 if (ChP->TxControl[3] & TX_ENABLE) {
2950 TxEnabled = 1;
2951 sDisTransmit(ChP); /* disable transmitter */
2952 }
2953 sStopRxProcessor(ChP); /* stop Rx processor */
2954 for (i = 0; i < 4000 / 200; i++) /* delay 4 uS to allow proc to stop */
2955 sInB(ChP->IntChan); /* depends on bus i/o timing */
2956 Ch = (Byte_t) sGetChanNum(ChP);
2957 sOutB(ChP->Cmd, Ch | RESTXFCNT); /* apply reset Tx FIFO count */
2958 sOutB(ChP->Cmd, Ch); /* remove reset Tx FIFO count */
2959 sOutW((WordIO_t) ChP->IndexAddr, ChP->TxFIFOPtrs); /* clear Tx in/out ptrs */
2960 sOutW(ChP->IndexData, 0);
2961 if (TxEnabled)
2962 sEnTransmit(ChP); /* enable transmitter */
2963 sStartRxProcessor(ChP); /* restart Rx processor */
2964 }
2965
2966 /***************************************************************************
2967 Function: sWriteTxPrioByte
2968 Purpose: Write a byte of priority transmit data to a channel
2969 Call: sWriteTxPrioByte(ChP,Data)
2970 CHANNEL_T *ChP; Ptr to channel structure
2971 Byte_t Data; The transmit data byte
2972
2973 Return: int: 1 if the bytes is successfully written, otherwise 0.
2974
2975 Comments: The priority byte is transmitted before any data in the Tx FIFO.
2976
2977 Warnings: No context switches are allowed while executing this function.
2978 */
2979 static int sWriteTxPrioByte(CHANNEL_T * ChP, Byte_t Data)
2980 {
2981 Byte_t DWBuf[4]; /* buffer for double word writes */
2982 Word_t *WordPtr; /* must be far because Win SS != DS */
2983 register DWordIO_t IndexAddr;
2984
2985 if (sGetTxCnt(ChP) > 1) { /* write it to Tx priority buffer */
2986 IndexAddr = ChP->IndexAddr;
2987 sOutW((WordIO_t) IndexAddr, ChP->TxPrioCnt); /* get priority buffer status */
2988 if (sInB((ByteIO_t) ChP->IndexData) & PRI_PEND) /* priority buffer busy */
2989 return (0); /* nothing sent */
2990
2991 WordPtr = (Word_t *) (&DWBuf[0]);
2992 *WordPtr = ChP->TxPrioBuf; /* data byte address */
2993
2994 DWBuf[2] = Data; /* data byte value */
2995 out32(IndexAddr, DWBuf); /* write it out */
2996
2997 *WordPtr = ChP->TxPrioCnt; /* Tx priority count address */
2998
2999 DWBuf[2] = PRI_PEND + 1; /* indicate 1 byte pending */
3000 DWBuf[3] = 0; /* priority buffer pointer */
3001 out32(IndexAddr, DWBuf); /* write it out */
3002 } else { /* write it to Tx FIFO */
3003
3004 sWriteTxByte(sGetTxRxDataIO(ChP), Data);
3005 }
3006 return (1); /* 1 byte sent */
3007 }
3008
3009 /***************************************************************************
3010 Function: sEnInterrupts
3011 Purpose: Enable one or more interrupts for a channel
3012 Call: sEnInterrupts(ChP,Flags)
3013 CHANNEL_T *ChP; Ptr to channel structure
3014 Word_t Flags: Interrupt enable flags, can be any combination
3015 of the following flags:
3016 TXINT_EN: Interrupt on Tx FIFO empty
3017 RXINT_EN: Interrupt on Rx FIFO at trigger level (see
3018 sSetRxTrigger())
3019 SRCINT_EN: Interrupt on SRC (Special Rx Condition)
3020 MCINT_EN: Interrupt on modem input change
3021 CHANINT_EN: Allow channel interrupt signal to the AIOP's
3022 Interrupt Channel Register.
3023 Return: void
3024 Comments: If an interrupt enable flag is set in Flags, that interrupt will be
3025 enabled. If an interrupt enable flag is not set in Flags, that
3026 interrupt will not be changed. Interrupts can be disabled with
3027 function sDisInterrupts().
3028
3029 This function sets the appropriate bit for the channel in the AIOP's
3030 Interrupt Mask Register if the CHANINT_EN flag is set. This allows
3031 this channel's bit to be set in the AIOP's Interrupt Channel Register.
3032
3033 Interrupts must also be globally enabled before channel interrupts
3034 will be passed on to the host. This is done with function
3035 sEnGlobalInt().
3036
3037 In some cases it may be desirable to disable interrupts globally but
3038 enable channel interrupts. This would allow the global interrupt
3039 status register to be used to determine which AIOPs need service.
3040 */
3041 static void sEnInterrupts(CHANNEL_T * ChP, Word_t Flags)
3042 {
3043 Byte_t Mask; /* Interrupt Mask Register */
3044
3045 ChP->RxControl[2] |=
3046 ((Byte_t) Flags & (RXINT_EN | SRCINT_EN | MCINT_EN));
3047
3048 out32(ChP->IndexAddr, ChP->RxControl);
3049
3050 ChP->TxControl[2] |= ((Byte_t) Flags & TXINT_EN);
3051
3052 out32(ChP->IndexAddr, ChP->TxControl);
3053
3054 if (Flags & CHANINT_EN) {
3055 Mask = sInB(ChP->IntMask) | sBitMapSetTbl[ChP->ChanNum];
3056 sOutB(ChP->IntMask, Mask);
3057 }
3058 }
3059
3060 /***************************************************************************
3061 Function: sDisInterrupts
3062 Purpose: Disable one or more interrupts for a channel
3063 Call: sDisInterrupts(ChP,Flags)
3064 CHANNEL_T *ChP; Ptr to channel structure
3065 Word_t Flags: Interrupt flags, can be any combination
3066 of the following flags:
3067 TXINT_EN: Interrupt on Tx FIFO empty
3068 RXINT_EN: Interrupt on Rx FIFO at trigger level (see
3069 sSetRxTrigger())
3070 SRCINT_EN: Interrupt on SRC (Special Rx Condition)
3071 MCINT_EN: Interrupt on modem input change
3072 CHANINT_EN: Disable channel interrupt signal to the
3073 AIOP's Interrupt Channel Register.
3074 Return: void
3075 Comments: If an interrupt flag is set in Flags, that interrupt will be
3076 disabled. If an interrupt flag is not set in Flags, that
3077 interrupt will not be changed. Interrupts can be enabled with
3078 function sEnInterrupts().
3079
3080 This function clears the appropriate bit for the channel in the AIOP's
3081 Interrupt Mask Register if the CHANINT_EN flag is set. This blocks
3082 this channel's bit from being set in the AIOP's Interrupt Channel
3083 Register.
3084 */
3085 static void sDisInterrupts(CHANNEL_T * ChP, Word_t Flags)
3086 {
3087 Byte_t Mask; /* Interrupt Mask Register */
3088
3089 ChP->RxControl[2] &=
3090 ~((Byte_t) Flags & (RXINT_EN | SRCINT_EN | MCINT_EN));
3091 out32(ChP->IndexAddr, ChP->RxControl);
3092 ChP->TxControl[2] &= ~((Byte_t) Flags & TXINT_EN);
3093 out32(ChP->IndexAddr, ChP->TxControl);
3094
3095 if (Flags & CHANINT_EN) {
3096 Mask = sInB(ChP->IntMask) & sBitMapClrTbl[ChP->ChanNum];
3097 sOutB(ChP->IntMask, Mask);
3098 }
3099 }
3100
3101 static void sSetInterfaceMode(CHANNEL_T * ChP, Byte_t mode)
3102 {
3103 sOutB(ChP->CtlP->AiopIO[2], (mode & 0x18) | ChP->ChanNum);
3104 }
3105
3106 /*
3107 * Not an official SSCI function, but how to reset RocketModems.
3108 * ISA bus version
3109 */
3110 static void sModemReset(CONTROLLER_T * CtlP, int chan, int on)
3111 {
3112 ByteIO_t addr;
3113 Byte_t val;
3114
3115 addr = CtlP->AiopIO[0] + 0x400;
3116 val = sInB(CtlP->MReg3IO);
3117 /* if AIOP[1] is not enabled, enable it */
3118 if ((val & 2) == 0) {
3119 val = sInB(CtlP->MReg2IO);
3120 sOutB(CtlP->MReg2IO, (val & 0xfc) | (1 & 0x03));
3121 sOutB(CtlP->MBaseIO, (unsigned char) (addr >> 6));
3122 }
3123
3124 sEnAiop(CtlP, 1);
3125 if (!on)
3126 addr += 8;
3127 sOutB(addr + chan, 0); /* apply or remove reset */
3128 sDisAiop(CtlP, 1);
3129 }
3130
3131 /*
3132 * Not an official SSCI function, but how to reset RocketModems.
3133 * PCI bus version
3134 */
3135 static void sPCIModemReset(CONTROLLER_T * CtlP, int chan, int on)
3136 {
3137 ByteIO_t addr;
3138
3139 addr = CtlP->AiopIO[0] + 0x40; /* 2nd AIOP */
3140 if (!on)
3141 addr += 8;
3142 sOutB(addr + chan, 0); /* apply or remove reset */
3143 }
3144
3145 /* Resets the speaker controller on RocketModem II and III devices */
3146 static void rmSpeakerReset(CONTROLLER_T * CtlP, unsigned long model)
3147 {
3148 ByteIO_t addr;
3149
3150 /* RocketModem II speaker control is at the 8th port location of offset 0x40 */
3151 if ((model == MODEL_RP4M) || (model == MODEL_RP6M)) {
3152 addr = CtlP->AiopIO[0] + 0x4F;
3153 sOutB(addr, 0);
3154 }
3155
3156 /* RocketModem III speaker control is at the 1st port location of offset 0x80 */
3157 if ((model == MODEL_UPCI_RM3_8PORT)
3158 || (model == MODEL_UPCI_RM3_4PORT)) {
3159 addr = CtlP->AiopIO[0] + 0x88;
3160 sOutB(addr, 0);
3161 }
3162 }
3163
3164 /* Returns the line number given the controller (board), aiop and channel number */
3165 static unsigned char GetLineNumber(int ctrl, int aiop, int ch)
3166 {
3167 return lineNumbers[(ctrl << 5) | (aiop << 3) | ch];
3168 }
3169
3170 /*
3171 * Stores the line number associated with a given controller (board), aiop
3172 * and channel number.
3173 * Returns: The line number assigned
3174 */
3175 static unsigned char SetLineNumber(int ctrl, int aiop, int ch)
3176 {
3177 lineNumbers[(ctrl << 5) | (aiop << 3) | ch] = nextLineNumber++;
3178 return (nextLineNumber - 1);
3179 }