drivers/char/ip2: split out irq core logic into separate function
[linux-2.6.git] / drivers / char / ip2 / ip2main.c
blob150e1e364ca78e88391378de947367f210beafb0
1 /*
3 * (c) 1999 by Computone Corporation
5 ********************************************************************************
7 * PACKAGE: Linux tty Device Driver for IntelliPort family of multiport
8 * serial I/O controllers.
10 * DESCRIPTION: Mainline code for the device driver
12 *******************************************************************************/
13 // ToDo:
15 // Fix the immediate DSS_NOW problem.
16 // Work over the channel stats return logic in ip2_ipl_ioctl so they
17 // make sense for all 256 possible channels and so the user space
18 // utilities will compile and work properly.
20 // Done:
22 // 1.2.14 /\/\|=mhw=|\/\/
23 // Added bounds checking to ip2_ipl_ioctl to avoid potential terroristic acts.
24 // Changed the definition of ip2trace to be more consistent with kernel style
25 // Thanks to Andreas Dilger <adilger@turbolabs.com> for these updates
27 // 1.2.13 /\/\|=mhw=|\/\/
28 // DEVFS: Renamed ttf/{n} to tts/F{n} and cuf/{n} to cua/F{n} to conform
29 // to agreed devfs serial device naming convention.
31 // 1.2.12 /\/\|=mhw=|\/\/
32 // Cleaned up some remove queue cut and paste errors
34 // 1.2.11 /\/\|=mhw=|\/\/
35 // Clean up potential NULL pointer dereferences
36 // Clean up devfs registration
37 // Add kernel command line parsing for io and irq
38 // Compile defaults for io and irq are now set in ip2.c not ip2.h!
39 // Reworked poll_only hack for explicit parameter setting
40 // You must now EXPLICITLY set poll_only = 1 or set all irqs to 0
41 // Merged ip2_loadmain and old_ip2_init
42 // Converted all instances of interruptible_sleep_on into queue calls
43 // Most of these had no race conditions but better to clean up now
45 // 1.2.10 /\/\|=mhw=|\/\/
46 // Fixed the bottom half interrupt handler and enabled USE_IQI
47 // to split the interrupt handler into a formal top-half / bottom-half
48 // Fixed timing window on high speed processors that queued messages to
49 // the outbound mail fifo faster than the board could handle.
51 // 1.2.9
52 // Four box EX was barfing on >128k kmalloc, made structure smaller by
53 // reducing output buffer size
55 // 1.2.8
56 // Device file system support (MHW)
58 // 1.2.7
59 // Fixed
60 // Reload of ip2 without unloading ip2main hangs system on cat of /proc/modules
62 // 1.2.6
63 //Fixes DCD problems
64 // DCD was not reported when CLOCAL was set on call to TIOCMGET
66 //Enhancements:
67 // TIOCMGET requests and waits for status return
68 // No DSS interrupts enabled except for DCD when needed
70 // For internal use only
72 //#define IP2DEBUG_INIT
73 //#define IP2DEBUG_OPEN
74 //#define IP2DEBUG_WRITE
75 //#define IP2DEBUG_READ
76 //#define IP2DEBUG_IOCTL
77 //#define IP2DEBUG_IPL
79 //#define IP2DEBUG_TRACE
80 //#define DEBUG_FIFO
82 /************/
83 /* Includes */
84 /************/
86 #include <linux/ctype.h>
87 #include <linux/string.h>
88 #include <linux/fcntl.h>
89 #include <linux/errno.h>
90 #include <linux/module.h>
91 #include <linux/signal.h>
92 #include <linux/sched.h>
93 #include <linux/timer.h>
94 #include <linux/interrupt.h>
95 #include <linux/pci.h>
96 #include <linux/mm.h>
97 #include <linux/slab.h>
98 #include <linux/major.h>
99 #include <linux/wait.h>
100 #include <linux/device.h>
102 #include <linux/tty.h>
103 #include <linux/tty_flip.h>
104 #include <linux/termios.h>
105 #include <linux/tty_driver.h>
106 #include <linux/serial.h>
107 #include <linux/ptrace.h>
108 #include <linux/ioport.h>
110 #include <linux/cdk.h>
111 #include <linux/comstats.h>
112 #include <linux/delay.h>
113 #include <linux/bitops.h>
115 #include <asm/system.h>
116 #include <asm/io.h>
117 #include <asm/irq.h>
119 #include <linux/vmalloc.h>
120 #include <linux/init.h>
122 #include <asm/uaccess.h>
124 #include "ip2types.h"
125 #include "ip2trace.h"
126 #include "ip2ioctl.h"
127 #include "ip2.h"
128 #include "i2ellis.h"
129 #include "i2lib.h"
131 /*****************
132 * /proc/ip2mem *
133 *****************/
135 #include <linux/proc_fs.h>
137 static int ip2_read_procmem(char *, char **, off_t, int);
138 static int ip2_read_proc(char *, char **, off_t, int, int *, void * );
140 /********************/
141 /* Type Definitions */
142 /********************/
144 /*************/
145 /* Constants */
146 /*************/
148 /* String constants to identify ourselves */
149 static char *pcName = "Computone IntelliPort Plus multiport driver";
150 static char *pcVersion = "1.2.14";
152 /* String constants for port names */
153 static char *pcDriver_name = "ip2";
154 static char *pcIpl = "ip2ipl";
156 /* Serial subtype definitions */
157 #define SERIAL_TYPE_NORMAL 1
159 // cheezy kludge or genius - you decide?
160 int ip2_loadmain(int *, int *, unsigned char *, int);
161 static unsigned char *Fip_firmware;
162 static int Fip_firmware_size;
164 /***********************/
165 /* Function Prototypes */
166 /***********************/
168 /* Global module entry functions */
170 /* Private (static) functions */
171 static int ip2_open(PTTY, struct file *);
172 static void ip2_close(PTTY, struct file *);
173 static int ip2_write(PTTY, const unsigned char *, int);
174 static void ip2_putchar(PTTY, unsigned char);
175 static void ip2_flush_chars(PTTY);
176 static int ip2_write_room(PTTY);
177 static int ip2_chars_in_buf(PTTY);
178 static void ip2_flush_buffer(PTTY);
179 static int ip2_ioctl(PTTY, struct file *, UINT, ULONG);
180 static void ip2_set_termios(PTTY, struct ktermios *);
181 static void ip2_set_line_discipline(PTTY);
182 static void ip2_throttle(PTTY);
183 static void ip2_unthrottle(PTTY);
184 static void ip2_stop(PTTY);
185 static void ip2_start(PTTY);
186 static void ip2_hangup(PTTY);
187 static int ip2_tiocmget(struct tty_struct *tty, struct file *file);
188 static int ip2_tiocmset(struct tty_struct *tty, struct file *file,
189 unsigned int set, unsigned int clear);
191 static void set_irq(int, int);
192 static void ip2_interrupt_bh(struct work_struct *work);
193 static irqreturn_t ip2_interrupt(int irq, void *dev_id);
194 static void ip2_poll(unsigned long arg);
195 static inline void service_all_boards(void);
196 static void do_input(struct work_struct *);
197 static void do_status(struct work_struct *);
199 static void ip2_wait_until_sent(PTTY,int);
201 static void set_params (i2ChanStrPtr, struct ktermios *);
202 static int get_serial_info(i2ChanStrPtr, struct serial_struct __user *);
203 static int set_serial_info(i2ChanStrPtr, struct serial_struct __user *);
205 static ssize_t ip2_ipl_read(struct file *, char __user *, size_t, loff_t *);
206 static ssize_t ip2_ipl_write(struct file *, const char __user *, size_t, loff_t *);
207 static int ip2_ipl_ioctl(struct inode *, struct file *, UINT, ULONG);
208 static int ip2_ipl_open(struct inode *, struct file *);
210 static int DumpTraceBuffer(char __user *, int);
211 static int DumpFifoBuffer( char __user *, int);
213 static void ip2_init_board(int);
214 static unsigned short find_eisa_board(int);
216 /***************/
217 /* Static Data */
218 /***************/
220 static struct tty_driver *ip2_tty_driver;
222 /* Here, then is a table of board pointers which the interrupt routine should
223 * scan through to determine who it must service.
225 static unsigned short i2nBoards; // Number of boards here
227 static i2eBordStrPtr i2BoardPtrTable[IP2_MAX_BOARDS];
229 static i2ChanStrPtr DevTable[IP2_MAX_PORTS];
230 //DevTableMem just used to save addresses for kfree
231 static void *DevTableMem[IP2_MAX_BOARDS];
233 /* This is the driver descriptor for the ip2ipl device, which is used to
234 * download the loadware to the boards.
236 static const struct file_operations ip2_ipl = {
237 .owner = THIS_MODULE,
238 .read = ip2_ipl_read,
239 .write = ip2_ipl_write,
240 .ioctl = ip2_ipl_ioctl,
241 .open = ip2_ipl_open,
244 static unsigned long irq_counter = 0;
245 static unsigned long bh_counter = 0;
247 // Use immediate queue to service interrupts
248 #define USE_IQI
249 //#define USE_IQ // PCI&2.2 needs work
251 /* The timer_list entry for our poll routine. If interrupt operation is not
252 * selected, the board is serviced periodically to see if anything needs doing.
254 #define POLL_TIMEOUT (jiffies + 1)
255 static DEFINE_TIMER(PollTimer, ip2_poll, 0, 0);
256 static char TimerOn;
258 #ifdef IP2DEBUG_TRACE
259 /* Trace (debug) buffer data */
260 #define TRACEMAX 1000
261 static unsigned long tracebuf[TRACEMAX];
262 static int tracestuff;
263 static int tracestrip;
264 static int tracewrap;
265 #endif
267 /**********/
268 /* Macros */
269 /**********/
271 #if defined(MODULE) && defined(IP2DEBUG_OPEN)
272 #define DBG_CNT(s) printk(KERN_DEBUG "(%s): [%x] refc=%d, ttyc=%d, modc=%x -> %s\n", \
273 tty->name,(pCh->flags),ip2_tty_driver->refcount, \
274 tty->count,/*GET_USE_COUNT(module)*/0,s)
275 #else
276 #define DBG_CNT(s)
277 #endif
279 /********/
280 /* Code */
281 /********/
283 #include "i2ellis.c" /* Extremely low-level interface services */
284 #include "i2cmd.c" /* Standard loadware command definitions */
285 #include "i2lib.c" /* High level interface services */
287 /* Configuration area for modprobe */
289 MODULE_AUTHOR("Doug McNash");
290 MODULE_DESCRIPTION("Computone IntelliPort Plus Driver");
292 static int poll_only = 0;
294 static int Eisa_irq;
295 static int Eisa_slot;
297 static int iindx;
298 static char rirqs[IP2_MAX_BOARDS];
299 static int Valid_Irqs[] = { 3, 4, 5, 7, 10, 11, 12, 15, 0};
301 /* for sysfs class support */
302 static struct class *ip2_class;
304 // Some functions to keep track of what irq's we have
306 static int
307 is_valid_irq(int irq)
309 int *i = Valid_Irqs;
311 while ((*i != 0) && (*i != irq)) {
312 i++;
314 return (*i);
317 static void
318 mark_requested_irq( char irq )
320 rirqs[iindx++] = irq;
323 #ifdef MODULE
324 static int
325 clear_requested_irq( char irq )
327 int i;
328 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
329 if (rirqs[i] == irq) {
330 rirqs[i] = 0;
331 return 1;
334 return 0;
336 #endif
338 static int
339 have_requested_irq( char irq )
341 // array init to zeros so 0 irq will not be requested as a side effect
342 int i;
343 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
344 if (rirqs[i] == irq)
345 return 1;
347 return 0;
350 /******************************************************************************/
351 /* Function: init_module() */
352 /* Parameters: None */
353 /* Returns: Success (0) */
354 /* */
355 /* Description: */
356 /* This is a required entry point for an installable module. It simply calls */
357 /* the driver initialisation function and returns what it returns. */
358 /******************************************************************************/
359 #ifdef MODULE
361 init_module(void)
363 #ifdef IP2DEBUG_INIT
364 printk (KERN_DEBUG "Loading module ...\n" );
365 #endif
366 return 0;
368 #endif /* MODULE */
370 /******************************************************************************/
371 /* Function: cleanup_module() */
372 /* Parameters: None */
373 /* Returns: Nothing */
374 /* */
375 /* Description: */
376 /* This is a required entry point for an installable module. It has to return */
377 /* the device and the driver to a passive state. It should not be necessary */
378 /* to reset the board fully, especially as the loadware is downloaded */
379 /* externally rather than in the driver. We just want to disable the board */
380 /* and clear the loadware to a reset state. To allow this there has to be a */
381 /* way to detect whether the board has the loadware running at init time to */
382 /* handle subsequent installations of the driver. All memory allocated by the */
383 /* driver should be returned since it may be unloaded from memory. */
384 /******************************************************************************/
385 #ifdef MODULE
386 void
387 cleanup_module(void)
389 int err;
390 int i;
392 #ifdef IP2DEBUG_INIT
393 printk (KERN_DEBUG "Unloading %s: version %s\n", pcName, pcVersion );
394 #endif
395 /* Stop poll timer if we had one. */
396 if ( TimerOn ) {
397 del_timer ( &PollTimer );
398 TimerOn = 0;
401 /* Reset the boards we have. */
402 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
403 if ( i2BoardPtrTable[i] ) {
404 iiReset( i2BoardPtrTable[i] );
408 /* The following is done at most once, if any boards were installed. */
409 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
410 if ( i2BoardPtrTable[i] ) {
411 iiResetDelay( i2BoardPtrTable[i] );
412 /* free io addresses and Tibet */
413 release_region( ip2config.addr[i], 8 );
414 device_destroy(ip2_class, MKDEV(IP2_IPL_MAJOR, 4 * i));
415 device_destroy(ip2_class, MKDEV(IP2_IPL_MAJOR, 4 * i + 1));
417 /* Disable and remove interrupt handler. */
418 if ( (ip2config.irq[i] > 0) && have_requested_irq(ip2config.irq[i]) ) {
419 free_irq ( ip2config.irq[i], (void *)&pcName);
420 clear_requested_irq( ip2config.irq[i]);
423 class_destroy(ip2_class);
424 if ( ( err = tty_unregister_driver ( ip2_tty_driver ) ) ) {
425 printk(KERN_ERR "IP2: failed to unregister tty driver (%d)\n", err);
427 put_tty_driver(ip2_tty_driver);
428 unregister_chrdev(IP2_IPL_MAJOR, pcIpl);
429 remove_proc_entry("ip2mem", &proc_root);
431 // free memory
432 for (i = 0; i < IP2_MAX_BOARDS; i++) {
433 void *pB;
434 #ifdef CONFIG_PCI
435 if (ip2config.type[i] == PCI && ip2config.pci_dev[i]) {
436 pci_disable_device(ip2config.pci_dev[i]);
437 pci_dev_put(ip2config.pci_dev[i]);
438 ip2config.pci_dev[i] = NULL;
440 #endif
441 if ((pB = i2BoardPtrTable[i]) != 0 ) {
442 kfree ( pB );
443 i2BoardPtrTable[i] = NULL;
445 if ((DevTableMem[i]) != NULL ) {
446 kfree ( DevTableMem[i] );
447 DevTableMem[i] = NULL;
451 /* Cleanup the iiEllis subsystem. */
452 iiEllisCleanup();
453 #ifdef IP2DEBUG_INIT
454 printk (KERN_DEBUG "IP2 Unloaded\n" );
455 #endif
457 #endif /* MODULE */
459 static const struct tty_operations ip2_ops = {
460 .open = ip2_open,
461 .close = ip2_close,
462 .write = ip2_write,
463 .put_char = ip2_putchar,
464 .flush_chars = ip2_flush_chars,
465 .write_room = ip2_write_room,
466 .chars_in_buffer = ip2_chars_in_buf,
467 .flush_buffer = ip2_flush_buffer,
468 .ioctl = ip2_ioctl,
469 .throttle = ip2_throttle,
470 .unthrottle = ip2_unthrottle,
471 .set_termios = ip2_set_termios,
472 .set_ldisc = ip2_set_line_discipline,
473 .stop = ip2_stop,
474 .start = ip2_start,
475 .hangup = ip2_hangup,
476 .read_proc = ip2_read_proc,
477 .tiocmget = ip2_tiocmget,
478 .tiocmset = ip2_tiocmset,
481 /******************************************************************************/
482 /* Function: ip2_loadmain() */
483 /* Parameters: irq, io from command line of insmod et. al. */
484 /* pointer to fip firmware and firmware size for boards */
485 /* Returns: Success (0) */
486 /* */
487 /* Description: */
488 /* This was the required entry point for all drivers (now in ip2.c) */
489 /* It performs all */
490 /* initialisation of the devices and driver structures, and registers itself */
491 /* with the relevant kernel modules. */
492 /******************************************************************************/
493 /* IRQF_DISABLED - if set blocks all interrupts else only this line */
494 /* IRQF_SHARED - for shared irq PCI or maybe EISA only */
495 /* SA_RANDOM - can be source for cert. random number generators */
496 #define IP2_SA_FLAGS 0
499 ip2_loadmain(int *iop, int *irqp, unsigned char *firmware, int firmsize)
501 int i, j, box;
502 int err = 0;
503 static int loaded;
504 i2eBordStrPtr pB = NULL;
505 int rc = -1;
506 static struct pci_dev *pci_dev_i = NULL;
508 ip2trace (ITRC_NO_PORT, ITRC_INIT, ITRC_ENTER, 0 );
510 /* process command line arguments to modprobe or
511 insmod i.e. iop & irqp */
512 /* irqp and iop should ALWAYS be specified now... But we check
513 them individually just to be sure, anyways... */
514 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
515 if (iop) {
516 ip2config.addr[i] = iop[i];
517 if (irqp) {
518 if( irqp[i] >= 0 ) {
519 ip2config.irq[i] = irqp[i];
520 } else {
521 ip2config.irq[i] = 0;
523 // This is a little bit of a hack. If poll_only=1 on command
524 // line back in ip2.c OR all IRQs on all specified boards are
525 // explicitly set to 0, then drop to poll only mode and override
526 // PCI or EISA interrupts. This superceeds the old hack of
527 // triggering if all interrupts were zero (like da default).
528 // Still a hack but less prone to random acts of terrorism.
530 // What we really should do, now that the IRQ default is set
531 // to -1, is to use 0 as a hard coded, do not probe.
533 // /\/\|=mhw=|\/\/
534 poll_only |= irqp[i];
538 poll_only = !poll_only;
540 Fip_firmware = firmware;
541 Fip_firmware_size = firmsize;
543 /* Announce our presence */
544 printk( KERN_INFO "%s version %s\n", pcName, pcVersion );
546 // ip2 can be unloaded and reloaded for no good reason
547 // we can't let that happen here or bad things happen
548 // second load hoses board but not system - fixme later
549 if (loaded) {
550 printk( KERN_INFO "Still loaded\n" );
551 return 0;
553 loaded++;
555 ip2_tty_driver = alloc_tty_driver(IP2_MAX_PORTS);
556 if (!ip2_tty_driver)
557 return -ENOMEM;
559 /* Initialise the iiEllis subsystem. */
560 iiEllisInit();
562 /* Initialize arrays. */
563 memset( i2BoardPtrTable, 0, sizeof i2BoardPtrTable );
564 memset( DevTable, 0, sizeof DevTable );
566 /* Initialise all the boards we can find (up to the maximum). */
567 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
568 switch ( ip2config.addr[i] ) {
569 case 0: /* skip this slot even if card is present */
570 break;
571 default: /* ISA */
572 /* ISA address must be specified */
573 if ( (ip2config.addr[i] < 0x100) || (ip2config.addr[i] > 0x3f8) ) {
574 printk ( KERN_ERR "IP2: Bad ISA board %d address %x\n",
575 i, ip2config.addr[i] );
576 ip2config.addr[i] = 0;
577 } else {
578 ip2config.type[i] = ISA;
580 /* Check for valid irq argument, set for polling if invalid */
581 if (ip2config.irq[i] && !is_valid_irq(ip2config.irq[i])) {
582 printk(KERN_ERR "IP2: Bad IRQ(%d) specified\n",ip2config.irq[i]);
583 ip2config.irq[i] = 0;// 0 is polling and is valid in that sense
586 break;
587 case PCI:
588 #ifdef CONFIG_PCI
590 int status;
592 pci_dev_i = pci_get_device(PCI_VENDOR_ID_COMPUTONE,
593 PCI_DEVICE_ID_COMPUTONE_IP2EX, pci_dev_i);
594 if (pci_dev_i != NULL) {
595 unsigned int addr;
597 if (pci_enable_device(pci_dev_i)) {
598 printk( KERN_ERR "IP2: can't enable PCI device at %s\n",
599 pci_name(pci_dev_i));
600 break;
602 ip2config.type[i] = PCI;
603 ip2config.pci_dev[i] = pci_dev_get(pci_dev_i);
604 status =
605 pci_read_config_dword(pci_dev_i, PCI_BASE_ADDRESS_1, &addr);
606 if ( addr & 1 ) {
607 ip2config.addr[i]=(USHORT)(addr&0xfffe);
608 } else {
609 printk( KERN_ERR "IP2: PCI I/O address error\n");
612 // If the PCI BIOS assigned it, lets try and use it. If we
613 // can't acquire it or it screws up, deal with it then.
615 // if (!is_valid_irq(pci_irq)) {
616 // printk( KERN_ERR "IP2: Bad PCI BIOS IRQ(%d)\n",pci_irq);
617 // pci_irq = 0;
618 // }
619 ip2config.irq[i] = pci_dev_i->irq;
620 } else { // ann error
621 ip2config.addr[i] = 0;
622 printk(KERN_ERR "IP2: PCI board %d not found\n", i);
625 #else
626 printk( KERN_ERR "IP2: PCI card specified but PCI support not\n");
627 printk( KERN_ERR "IP2: configured in this kernel.\n");
628 printk( KERN_ERR "IP2: Recompile kernel with CONFIG_PCI defined!\n");
629 #endif /* CONFIG_PCI */
630 break;
631 case EISA:
632 if ( (ip2config.addr[i] = find_eisa_board( Eisa_slot + 1 )) != 0) {
633 /* Eisa_irq set as side effect, boo */
634 ip2config.type[i] = EISA;
636 ip2config.irq[i] = Eisa_irq;
637 break;
638 } /* switch */
639 } /* for */
640 if (pci_dev_i)
641 pci_dev_put(pci_dev_i);
643 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
644 if ( ip2config.addr[i] ) {
645 pB = kzalloc(sizeof(i2eBordStr), GFP_KERNEL);
646 if (pB) {
647 i2BoardPtrTable[i] = pB;
648 iiSetAddress( pB, ip2config.addr[i], ii2DelayTimer );
649 iiReset( pB );
650 } else {
651 printk(KERN_ERR "IP2: board memory allocation error\n");
655 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
656 if ( ( pB = i2BoardPtrTable[i] ) != NULL ) {
657 iiResetDelay( pB );
658 break;
661 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
662 if ( i2BoardPtrTable[i] != NULL ) {
663 ip2_init_board( i );
667 ip2trace (ITRC_NO_PORT, ITRC_INIT, 2, 0 );
669 ip2_tty_driver->owner = THIS_MODULE;
670 ip2_tty_driver->name = "ttyF";
671 ip2_tty_driver->driver_name = pcDriver_name;
672 ip2_tty_driver->major = IP2_TTY_MAJOR;
673 ip2_tty_driver->minor_start = 0;
674 ip2_tty_driver->type = TTY_DRIVER_TYPE_SERIAL;
675 ip2_tty_driver->subtype = SERIAL_TYPE_NORMAL;
676 ip2_tty_driver->init_termios = tty_std_termios;
677 ip2_tty_driver->init_termios.c_cflag = B9600|CS8|CREAD|HUPCL|CLOCAL;
678 ip2_tty_driver->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_DYNAMIC_DEV;
679 tty_set_operations(ip2_tty_driver, &ip2_ops);
681 ip2trace (ITRC_NO_PORT, ITRC_INIT, 3, 0 );
683 /* Register the tty devices. */
684 if ( ( err = tty_register_driver ( ip2_tty_driver ) ) ) {
685 printk(KERN_ERR "IP2: failed to register tty driver (%d)\n", err);
686 put_tty_driver(ip2_tty_driver);
687 return -EINVAL;
688 } else
689 /* Register the IPL driver. */
690 if ( ( err = register_chrdev ( IP2_IPL_MAJOR, pcIpl, &ip2_ipl ) ) ) {
691 printk(KERN_ERR "IP2: failed to register IPL device (%d)\n", err );
692 } else {
693 /* create the sysfs class */
694 ip2_class = class_create(THIS_MODULE, "ip2");
695 if (IS_ERR(ip2_class)) {
696 err = PTR_ERR(ip2_class);
697 goto out_chrdev;
700 /* Register the read_procmem thing */
701 if (!create_proc_info_entry("ip2mem",0,&proc_root,ip2_read_procmem)) {
702 printk(KERN_ERR "IP2: failed to register read_procmem\n");
703 } else {
705 ip2trace (ITRC_NO_PORT, ITRC_INIT, 4, 0 );
706 /* Register the interrupt handler or poll handler, depending upon the
707 * specified interrupt.
710 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
711 if ( 0 == ip2config.addr[i] ) {
712 continue;
715 if ( NULL != ( pB = i2BoardPtrTable[i] ) ) {
716 device_create(ip2_class, NULL,
717 MKDEV(IP2_IPL_MAJOR, 4 * i),
718 "ipl%d", i);
719 device_create(ip2_class, NULL,
720 MKDEV(IP2_IPL_MAJOR, 4 * i + 1),
721 "stat%d", i);
723 for ( box = 0; box < ABS_MAX_BOXES; ++box )
725 for ( j = 0; j < ABS_BIGGEST_BOX; ++j )
727 if ( pB->i2eChannelMap[box] & (1 << j) )
729 tty_register_device(ip2_tty_driver,
730 j + ABS_BIGGEST_BOX *
731 (box+i*ABS_MAX_BOXES), NULL);
737 if (poll_only) {
738 // Poll only forces driver to only use polling and
739 // to ignore the probed PCI or EISA interrupts.
740 ip2config.irq[i] = CIR_POLL;
742 if ( ip2config.irq[i] == CIR_POLL ) {
743 retry:
744 if (!TimerOn) {
745 PollTimer.expires = POLL_TIMEOUT;
746 add_timer ( &PollTimer );
747 TimerOn = 1;
748 printk( KERN_INFO "IP2: polling\n");
750 } else {
751 if (have_requested_irq(ip2config.irq[i]))
752 continue;
753 rc = request_irq( ip2config.irq[i], ip2_interrupt,
754 IP2_SA_FLAGS | (ip2config.type[i] == PCI ? IRQF_SHARED : 0),
755 pcName, (void *)&pcName);
756 if (rc) {
757 printk(KERN_ERR "IP2: an request_irq failed: error %d\n",rc);
758 ip2config.irq[i] = CIR_POLL;
759 printk( KERN_INFO "IP2: Polling %ld/sec.\n",
760 (POLL_TIMEOUT - jiffies));
761 goto retry;
763 mark_requested_irq(ip2config.irq[i]);
764 /* Initialise the interrupt handler bottom half (aka slih). */
767 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
768 if ( i2BoardPtrTable[i] ) {
769 set_irq( i, ip2config.irq[i] ); /* set and enable board interrupt */
773 ip2trace (ITRC_NO_PORT, ITRC_INIT, ITRC_RETURN, 0 );
774 goto out;
776 out_chrdev:
777 unregister_chrdev(IP2_IPL_MAJOR, "ip2");
778 out:
779 return err;
782 EXPORT_SYMBOL(ip2_loadmain);
784 /******************************************************************************/
785 /* Function: ip2_init_board() */
786 /* Parameters: Index of board in configuration structure */
787 /* Returns: Success (0) */
788 /* */
789 /* Description: */
790 /* This function initializes the specified board. The loadware is copied to */
791 /* the board, the channel structures are initialized, and the board details */
792 /* are reported on the console. */
793 /******************************************************************************/
794 static void
795 ip2_init_board( int boardnum )
797 int i;
798 int nports = 0, nboxes = 0;
799 i2ChanStrPtr pCh;
800 i2eBordStrPtr pB = i2BoardPtrTable[boardnum];
802 if ( !iiInitialize ( pB ) ) {
803 printk ( KERN_ERR "IP2: Failed to initialize board at 0x%x, error %d\n",
804 pB->i2eBase, pB->i2eError );
805 goto err_initialize;
807 printk(KERN_INFO "IP2: Board %d: addr=0x%x irq=%d\n", boardnum + 1,
808 ip2config.addr[boardnum], ip2config.irq[boardnum] );
810 if (!request_region( ip2config.addr[boardnum], 8, pcName )) {
811 printk(KERN_ERR "IP2: bad addr=0x%x\n", ip2config.addr[boardnum]);
812 goto err_initialize;
815 if ( iiDownloadAll ( pB, (loadHdrStrPtr)Fip_firmware, 1, Fip_firmware_size )
816 != II_DOWN_GOOD ) {
817 printk ( KERN_ERR "IP2: failed to download loadware\n" );
818 goto err_release_region;
819 } else {
820 printk ( KERN_INFO "IP2: fv=%d.%d.%d lv=%d.%d.%d\n",
821 pB->i2ePom.e.porVersion,
822 pB->i2ePom.e.porRevision,
823 pB->i2ePom.e.porSubRev, pB->i2eLVersion,
824 pB->i2eLRevision, pB->i2eLSub );
827 switch ( pB->i2ePom.e.porID & ~POR_ID_RESERVED ) {
829 default:
830 printk( KERN_ERR "IP2: Unknown board type, ID = %x\n",
831 pB->i2ePom.e.porID );
832 nports = 0;
833 goto err_release_region;
834 break;
836 case POR_ID_II_4: /* IntelliPort-II, ISA-4 (4xRJ45) */
837 printk ( KERN_INFO "IP2: ISA-4\n" );
838 nports = 4;
839 break;
841 case POR_ID_II_8: /* IntelliPort-II, 8-port using standard brick. */
842 printk ( KERN_INFO "IP2: ISA-8 std\n" );
843 nports = 8;
844 break;
846 case POR_ID_II_8R: /* IntelliPort-II, 8-port using RJ11's (no CTS) */
847 printk ( KERN_INFO "IP2: ISA-8 RJ11\n" );
848 nports = 8;
849 break;
851 case POR_ID_FIIEX: /* IntelliPort IIEX */
853 int portnum = IP2_PORTS_PER_BOARD * boardnum;
854 int box;
856 for( box = 0; box < ABS_MAX_BOXES; ++box ) {
857 if ( pB->i2eChannelMap[box] != 0 ) {
858 ++nboxes;
860 for( i = 0; i < ABS_BIGGEST_BOX; ++i ) {
861 if ( pB->i2eChannelMap[box] & 1<< i ) {
862 ++nports;
866 DevTableMem[boardnum] = pCh =
867 kmalloc( sizeof(i2ChanStr) * nports, GFP_KERNEL );
868 if ( !pCh ) {
869 printk ( KERN_ERR "IP2: (i2_init_channel:) Out of memory.\n");
870 goto err_release_region;
872 if ( !i2InitChannels( pB, nports, pCh ) ) {
873 printk(KERN_ERR "IP2: i2InitChannels failed: %d\n",pB->i2eError);
874 kfree ( pCh );
875 goto err_release_region;
877 pB->i2eChannelPtr = &DevTable[portnum];
878 pB->i2eChannelCnt = ABS_MOST_PORTS;
880 for( box = 0; box < ABS_MAX_BOXES; ++box, portnum += ABS_BIGGEST_BOX ) {
881 for( i = 0; i < ABS_BIGGEST_BOX; ++i ) {
882 if ( pB->i2eChannelMap[box] & (1 << i) ) {
883 DevTable[portnum + i] = pCh;
884 pCh->port_index = portnum + i;
885 pCh++;
889 printk(KERN_INFO "IP2: EX box=%d ports=%d %d bit\n",
890 nboxes, nports, pB->i2eDataWidth16 ? 16 : 8 );
892 goto ex_exit;
894 DevTableMem[boardnum] = pCh =
895 kmalloc ( sizeof (i2ChanStr) * nports, GFP_KERNEL );
896 if ( !pCh ) {
897 printk ( KERN_ERR "IP2: (i2_init_channel:) Out of memory.\n");
898 goto err_release_region;
900 pB->i2eChannelPtr = pCh;
901 pB->i2eChannelCnt = nports;
902 if ( !i2InitChannels( pB, nports, pCh ) ) {
903 printk(KERN_ERR "IP2: i2InitChannels failed: %d\n",pB->i2eError);
904 kfree ( pCh );
905 goto err_release_region;
907 pB->i2eChannelPtr = &DevTable[IP2_PORTS_PER_BOARD * boardnum];
909 for( i = 0; i < pB->i2eChannelCnt; ++i ) {
910 DevTable[IP2_PORTS_PER_BOARD * boardnum + i] = pCh;
911 pCh->port_index = (IP2_PORTS_PER_BOARD * boardnum) + i;
912 pCh++;
914 ex_exit:
915 INIT_WORK(&pB->tqueue_interrupt, ip2_interrupt_bh);
916 return;
918 err_release_region:
919 release_region(ip2config.addr[boardnum], 8);
920 err_initialize:
921 kfree ( pB );
922 i2BoardPtrTable[boardnum] = NULL;
923 return;
926 /******************************************************************************/
927 /* Function: find_eisa_board ( int start_slot ) */
928 /* Parameters: First slot to check */
929 /* Returns: Address of EISA IntelliPort II controller */
930 /* */
931 /* Description: */
932 /* This function searches for an EISA IntelliPort controller, starting */
933 /* from the specified slot number. If the motherboard is not identified as an */
934 /* EISA motherboard, or no valid board ID is selected it returns 0. Otherwise */
935 /* it returns the base address of the controller. */
936 /******************************************************************************/
937 static unsigned short
938 find_eisa_board( int start_slot )
940 int i, j;
941 unsigned int idm = 0;
942 unsigned int idp = 0;
943 unsigned int base = 0;
944 unsigned int value;
945 int setup_address;
946 int setup_irq;
947 int ismine = 0;
950 * First a check for an EISA motherboard, which we do by comparing the
951 * EISA ID registers for the system board and the first couple of slots.
952 * No slot ID should match the system board ID, but on an ISA or PCI
953 * machine the odds are that an empty bus will return similar values for
954 * each slot.
956 i = 0x0c80;
957 value = (inb(i) << 24) + (inb(i+1) << 16) + (inb(i+2) << 8) + inb(i+3);
958 for( i = 0x1c80; i <= 0x4c80; i += 0x1000 ) {
959 j = (inb(i)<<24)+(inb(i+1)<<16)+(inb(i+2)<<8)+inb(i+3);
960 if ( value == j )
961 return 0;
965 * OK, so we are inclined to believe that this is an EISA machine. Find
966 * an IntelliPort controller.
968 for( i = start_slot; i < 16; i++ ) {
969 base = i << 12;
970 idm = (inb(base + 0xc80) << 8) | (inb(base + 0xc81) & 0xff);
971 idp = (inb(base + 0xc82) << 8) | (inb(base + 0xc83) & 0xff);
972 ismine = 0;
973 if ( idm == 0x0e8e ) {
974 if ( idp == 0x0281 || idp == 0x0218 ) {
975 ismine = 1;
976 } else if ( idp == 0x0282 || idp == 0x0283 ) {
977 ismine = 3; /* Can do edge-trigger */
979 if ( ismine ) {
980 Eisa_slot = i;
981 break;
985 if ( !ismine )
986 return 0;
988 /* It's some sort of EISA card, but at what address is it configured? */
990 setup_address = base + 0xc88;
991 value = inb(base + 0xc86);
992 setup_irq = (value & 8) ? Valid_Irqs[value & 7] : 0;
994 if ( (ismine & 2) && !(value & 0x10) ) {
995 ismine = 1; /* Could be edging, but not */
998 if ( Eisa_irq == 0 ) {
999 Eisa_irq = setup_irq;
1000 } else if ( Eisa_irq != setup_irq ) {
1001 printk ( KERN_ERR "IP2: EISA irq mismatch between EISA controllers\n" );
1004 #ifdef IP2DEBUG_INIT
1005 printk(KERN_DEBUG "Computone EISA board in slot %d, I.D. 0x%x%x, Address 0x%x",
1006 base >> 12, idm, idp, setup_address);
1007 if ( Eisa_irq ) {
1008 printk(KERN_DEBUG ", Interrupt %d %s\n",
1009 setup_irq, (ismine & 2) ? "(edge)" : "(level)");
1010 } else {
1011 printk(KERN_DEBUG ", (polled)\n");
1013 #endif
1014 return setup_address;
1017 /******************************************************************************/
1018 /* Function: set_irq() */
1019 /* Parameters: index to board in board table */
1020 /* IRQ to use */
1021 /* Returns: Success (0) */
1022 /* */
1023 /* Description: */
1024 /******************************************************************************/
1025 static void
1026 set_irq( int boardnum, int boardIrq )
1028 unsigned char tempCommand[16];
1029 i2eBordStrPtr pB = i2BoardPtrTable[boardnum];
1030 unsigned long flags;
1033 * Notify the boards they may generate interrupts. This is done by
1034 * sending an in-line command to channel 0 on each board. This is why
1035 * the channels have to be defined already. For each board, if the
1036 * interrupt has never been defined, we must do so NOW, directly, since
1037 * board will not send flow control or even give an interrupt until this
1038 * is done. If polling we must send 0 as the interrupt parameter.
1041 // We will get an interrupt here at the end of this function
1043 iiDisableMailIrq(pB);
1045 /* We build up the entire packet header. */
1046 CHANNEL_OF(tempCommand) = 0;
1047 PTYPE_OF(tempCommand) = PTYPE_INLINE;
1048 CMD_COUNT_OF(tempCommand) = 2;
1049 (CMD_OF(tempCommand))[0] = CMDVALUE_IRQ;
1050 (CMD_OF(tempCommand))[1] = boardIrq;
1052 * Write to FIFO; don't bother to adjust fifo capacity for this, since
1053 * board will respond almost immediately after SendMail hit.
1055 WRITE_LOCK_IRQSAVE(&pB->write_fifo_spinlock,flags);
1056 iiWriteBuf(pB, tempCommand, 4);
1057 WRITE_UNLOCK_IRQRESTORE(&pB->write_fifo_spinlock,flags);
1058 pB->i2eUsingIrq = boardIrq;
1059 pB->i2eOutMailWaiting |= MB_OUT_STUFFED;
1061 /* Need to update number of boards before you enable mailbox int */
1062 ++i2nBoards;
1064 CHANNEL_OF(tempCommand) = 0;
1065 PTYPE_OF(tempCommand) = PTYPE_BYPASS;
1066 CMD_COUNT_OF(tempCommand) = 6;
1067 (CMD_OF(tempCommand))[0] = 88; // SILO
1068 (CMD_OF(tempCommand))[1] = 64; // chars
1069 (CMD_OF(tempCommand))[2] = 32; // ms
1071 (CMD_OF(tempCommand))[3] = 28; // MAX_BLOCK
1072 (CMD_OF(tempCommand))[4] = 64; // chars
1074 (CMD_OF(tempCommand))[5] = 87; // HW_TEST
1075 WRITE_LOCK_IRQSAVE(&pB->write_fifo_spinlock,flags);
1076 iiWriteBuf(pB, tempCommand, 8);
1077 WRITE_UNLOCK_IRQRESTORE(&pB->write_fifo_spinlock,flags);
1079 CHANNEL_OF(tempCommand) = 0;
1080 PTYPE_OF(tempCommand) = PTYPE_BYPASS;
1081 CMD_COUNT_OF(tempCommand) = 1;
1082 (CMD_OF(tempCommand))[0] = 84; /* get BOX_IDS */
1083 iiWriteBuf(pB, tempCommand, 3);
1085 #ifdef XXX
1086 // enable heartbeat for test porpoises
1087 CHANNEL_OF(tempCommand) = 0;
1088 PTYPE_OF(tempCommand) = PTYPE_BYPASS;
1089 CMD_COUNT_OF(tempCommand) = 2;
1090 (CMD_OF(tempCommand))[0] = 44; /* get ping */
1091 (CMD_OF(tempCommand))[1] = 200; /* 200 ms */
1092 WRITE_LOCK_IRQSAVE(&pB->write_fifo_spinlock,flags);
1093 iiWriteBuf(pB, tempCommand, 4);
1094 WRITE_UNLOCK_IRQRESTORE(&pB->write_fifo_spinlock,flags);
1095 #endif
1097 iiEnableMailIrq(pB);
1098 iiSendPendingMail(pB);
1101 /******************************************************************************/
1102 /* Interrupt Handler Section */
1103 /******************************************************************************/
1105 static inline void
1106 service_all_boards(void)
1108 int i;
1109 i2eBordStrPtr pB;
1111 /* Service every board on the list */
1112 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
1113 pB = i2BoardPtrTable[i];
1114 if ( pB ) {
1115 i2ServiceBoard( pB );
1121 /******************************************************************************/
1122 /* Function: ip2_interrupt_bh(work) */
1123 /* Parameters: work - pointer to the board structure */
1124 /* Returns: Nothing */
1125 /* */
1126 /* Description: */
1127 /* Service the board in a bottom half interrupt handler and then */
1128 /* reenable the board's interrupts if it has an IRQ number */
1129 /* */
1130 /******************************************************************************/
1131 static void
1132 ip2_interrupt_bh(struct work_struct *work)
1134 i2eBordStrPtr pB = container_of(work, i2eBordStr, tqueue_interrupt);
1135 // pB better well be set or we have a problem! We can only get
1136 // here from the IMMEDIATE queue. Here, we process the boards.
1137 // Checking pB doesn't cost much and it saves us from the sanity checkers.
1139 bh_counter++;
1141 if ( pB ) {
1142 i2ServiceBoard( pB );
1143 if( pB->i2eUsingIrq ) {
1144 // Re-enable his interrupts
1145 iiEnableMailIrq(pB);
1151 /******************************************************************************/
1152 /* Function: ip2_interrupt(int irq, void *dev_id) */
1153 /* Parameters: irq - interrupt number */
1154 /* pointer to optional device ID structure */
1155 /* Returns: Nothing */
1156 /* */
1157 /* Description: */
1158 /* */
1159 /* Our task here is simply to identify each board which needs servicing. */
1160 /* If we are queuing then, queue it to be serviced, and disable its irq */
1161 /* mask otherwise process the board directly. */
1162 /* */
1163 /* We could queue by IRQ but that just complicates things on both ends */
1164 /* with very little gain in performance (how many instructions does */
1165 /* it take to iterate on the immediate queue). */
1166 /* */
1167 /* */
1168 /******************************************************************************/
1169 static void
1170 ip2_irq_work(i2eBordStrPtr pB)
1172 #ifdef USE_IQI
1173 if (NO_MAIL_HERE != ( pB->i2eStartMail = iiGetMail(pB))) {
1174 // Disable his interrupt (will be enabled when serviced)
1175 // This is mostly to protect from reentrancy.
1176 iiDisableMailIrq(pB);
1178 // Park the board on the immediate queue for processing.
1179 schedule_work(&pB->tqueue_interrupt);
1181 // Make sure the immediate queue is flagged to fire.
1183 #else
1185 // We are using immediate servicing here. This sucks and can
1186 // cause all sorts of havoc with ppp and others. The failsafe
1187 // check on iiSendPendingMail could also throw a hairball.
1189 i2ServiceBoard( pB );
1191 #endif /* USE_IQI */
1194 static irqreturn_t
1195 ip2_interrupt(int irq, void *dev_id)
1197 int i;
1198 i2eBordStrPtr pB;
1199 int handled = 0;
1201 ip2trace (ITRC_NO_PORT, ITRC_INTR, 99, 1, irq );
1203 /* Service just the boards on the list using this irq */
1204 for( i = 0; i < i2nBoards; ++i ) {
1205 pB = i2BoardPtrTable[i];
1207 // Only process those boards which match our IRQ.
1208 // IRQ = 0 for polled boards, we won't poll "IRQ" boards
1210 if ( pB && (pB->i2eUsingIrq == irq) ) {
1211 handled = 1;
1212 ip2_irq_work(pB);
1216 ++irq_counter;
1218 ip2trace (ITRC_NO_PORT, ITRC_INTR, ITRC_RETURN, 0 );
1219 return IRQ_RETVAL(handled);
1222 /******************************************************************************/
1223 /* Function: ip2_poll(unsigned long arg) */
1224 /* Parameters: ? */
1225 /* Returns: Nothing */
1226 /* */
1227 /* Description: */
1228 /* This function calls the library routine i2ServiceBoard for each board in */
1229 /* the board table. This is used instead of the interrupt routine when polled */
1230 /* mode is specified. */
1231 /******************************************************************************/
1232 static void
1233 ip2_poll(unsigned long arg)
1235 ip2trace (ITRC_NO_PORT, ITRC_INTR, 100, 0 );
1237 TimerOn = 0; // it's the truth but not checked in service
1239 // Just polled boards, IRQ = 0 will hit all non-interrupt boards.
1240 // It will NOT poll boards handled by hard interrupts.
1241 // The issue of queued BH interrups is handled in ip2_interrupt().
1242 ip2_interrupt(0, NULL);
1244 PollTimer.expires = POLL_TIMEOUT;
1245 add_timer( &PollTimer );
1246 TimerOn = 1;
1248 ip2trace (ITRC_NO_PORT, ITRC_INTR, ITRC_RETURN, 0 );
1251 static void do_input(struct work_struct *work)
1253 i2ChanStrPtr pCh = container_of(work, i2ChanStr, tqueue_input);
1254 unsigned long flags;
1256 ip2trace(CHANN, ITRC_INPUT, 21, 0 );
1258 // Data input
1259 if ( pCh->pTTY != NULL ) {
1260 READ_LOCK_IRQSAVE(&pCh->Ibuf_spinlock,flags)
1261 if (!pCh->throttled && (pCh->Ibuf_stuff != pCh->Ibuf_strip)) {
1262 READ_UNLOCK_IRQRESTORE(&pCh->Ibuf_spinlock,flags)
1263 i2Input( pCh );
1264 } else
1265 READ_UNLOCK_IRQRESTORE(&pCh->Ibuf_spinlock,flags)
1266 } else {
1267 ip2trace(CHANN, ITRC_INPUT, 22, 0 );
1269 i2InputFlush( pCh );
1273 // code duplicated from n_tty (ldisc)
1274 static inline void isig(int sig, struct tty_struct *tty, int flush)
1276 if (tty->pgrp)
1277 kill_pgrp(tty->pgrp, sig, 1);
1278 if (flush || !L_NOFLSH(tty)) {
1279 if ( tty->ldisc.flush_buffer )
1280 tty->ldisc.flush_buffer(tty);
1281 i2InputFlush( tty->driver_data );
1285 static void do_status(struct work_struct *work)
1287 i2ChanStrPtr pCh = container_of(work, i2ChanStr, tqueue_status);
1288 int status;
1290 status = i2GetStatus( pCh, (I2_BRK|I2_PAR|I2_FRA|I2_OVR) );
1292 ip2trace (CHANN, ITRC_STATUS, 21, 1, status );
1294 if (pCh->pTTY && (status & (I2_BRK|I2_PAR|I2_FRA|I2_OVR)) ) {
1295 if ( (status & I2_BRK) ) {
1296 // code duplicated from n_tty (ldisc)
1297 if (I_IGNBRK(pCh->pTTY))
1298 goto skip_this;
1299 if (I_BRKINT(pCh->pTTY)) {
1300 isig(SIGINT, pCh->pTTY, 1);
1301 goto skip_this;
1303 wake_up_interruptible(&pCh->pTTY->read_wait);
1305 #ifdef NEVER_HAPPENS_AS_SETUP_XXX
1306 // and can't work because we don't know the_char
1307 // as the_char is reported on a separate path
1308 // The intelligent board does this stuff as setup
1310 char brkf = TTY_NORMAL;
1311 unsigned char brkc = '\0';
1312 unsigned char tmp;
1313 if ( (status & I2_BRK) ) {
1314 brkf = TTY_BREAK;
1315 brkc = '\0';
1317 else if (status & I2_PAR) {
1318 brkf = TTY_PARITY;
1319 brkc = the_char;
1320 } else if (status & I2_FRA) {
1321 brkf = TTY_FRAME;
1322 brkc = the_char;
1323 } else if (status & I2_OVR) {
1324 brkf = TTY_OVERRUN;
1325 brkc = the_char;
1327 tmp = pCh->pTTY->real_raw;
1328 pCh->pTTY->real_raw = 0;
1329 pCh->pTTY->ldisc.receive_buf( pCh->pTTY, &brkc, &brkf, 1 );
1330 pCh->pTTY->real_raw = tmp;
1332 #endif /* NEVER_HAPPENS_AS_SETUP_XXX */
1334 skip_this:
1336 if ( status & (I2_DDCD | I2_DDSR | I2_DCTS | I2_DRI) ) {
1337 wake_up_interruptible(&pCh->delta_msr_wait);
1339 if ( (pCh->flags & ASYNC_CHECK_CD) && (status & I2_DDCD) ) {
1340 if ( status & I2_DCD ) {
1341 if ( pCh->wopen ) {
1342 wake_up_interruptible ( &pCh->open_wait );
1344 } else {
1345 if (pCh->pTTY && (!(pCh->pTTY->termios->c_cflag & CLOCAL)) ) {
1346 tty_hangup( pCh->pTTY );
1352 ip2trace (CHANN, ITRC_STATUS, 26, 0 );
1355 /******************************************************************************/
1356 /* Device Open/Close/Ioctl Entry Point Section */
1357 /******************************************************************************/
1359 /******************************************************************************/
1360 /* Function: open_sanity_check() */
1361 /* Parameters: Pointer to tty structure */
1362 /* Pointer to file structure */
1363 /* Returns: Success or failure */
1364 /* */
1365 /* Description: */
1366 /* Verifies the structure magic numbers and cross links. */
1367 /******************************************************************************/
1368 #ifdef IP2DEBUG_OPEN
1369 static void
1370 open_sanity_check( i2ChanStrPtr pCh, i2eBordStrPtr pBrd )
1372 if ( pBrd->i2eValid != I2E_MAGIC ) {
1373 printk(KERN_ERR "IP2: invalid board structure\n" );
1374 } else if ( pBrd != pCh->pMyBord ) {
1375 printk(KERN_ERR "IP2: board structure pointer mismatch (%p)\n",
1376 pCh->pMyBord );
1377 } else if ( pBrd->i2eChannelCnt < pCh->port_index ) {
1378 printk(KERN_ERR "IP2: bad device index (%d)\n", pCh->port_index );
1379 } else if (&((i2ChanStrPtr)pBrd->i2eChannelPtr)[pCh->port_index] != pCh) {
1380 } else {
1381 printk(KERN_INFO "IP2: all pointers check out!\n" );
1384 #endif
1387 /******************************************************************************/
1388 /* Function: ip2_open() */
1389 /* Parameters: Pointer to tty structure */
1390 /* Pointer to file structure */
1391 /* Returns: Success or failure */
1392 /* */
1393 /* Description: (MANDATORY) */
1394 /* A successful device open has to run a gauntlet of checks before it */
1395 /* completes. After some sanity checking and pointer setup, the function */
1396 /* blocks until all conditions are satisfied. It then initialises the port to */
1397 /* the default characteristics and returns. */
1398 /******************************************************************************/
1399 static int
1400 ip2_open( PTTY tty, struct file *pFile )
1402 wait_queue_t wait;
1403 int rc = 0;
1404 int do_clocal = 0;
1405 i2ChanStrPtr pCh = DevTable[tty->index];
1407 ip2trace (tty->index, ITRC_OPEN, ITRC_ENTER, 0 );
1409 if ( pCh == NULL ) {
1410 return -ENODEV;
1412 /* Setup pointer links in device and tty structures */
1413 pCh->pTTY = tty;
1414 tty->driver_data = pCh;
1416 #ifdef IP2DEBUG_OPEN
1417 printk(KERN_DEBUG \
1418 "IP2:open(tty=%p,pFile=%p):dev=%s,ch=%d,idx=%d\n",
1419 tty, pFile, tty->name, pCh->infl.hd.i2sChannel, pCh->port_index);
1420 open_sanity_check ( pCh, pCh->pMyBord );
1421 #endif
1423 i2QueueCommands(PTYPE_INLINE, pCh, 100, 3, CMD_DTRUP,CMD_RTSUP,CMD_DCD_REP);
1424 pCh->dataSetOut |= (I2_DTR | I2_RTS);
1425 serviceOutgoingFifo( pCh->pMyBord );
1427 /* Block here until the port is ready (per serial and istallion) */
1429 * 1. If the port is in the middle of closing wait for the completion
1430 * and then return the appropriate error.
1432 init_waitqueue_entry(&wait, current);
1433 add_wait_queue(&pCh->close_wait, &wait);
1434 set_current_state( TASK_INTERRUPTIBLE );
1436 if ( tty_hung_up_p(pFile) || ( pCh->flags & ASYNC_CLOSING )) {
1437 if ( pCh->flags & ASYNC_CLOSING ) {
1438 schedule();
1440 if ( tty_hung_up_p(pFile) ) {
1441 set_current_state( TASK_RUNNING );
1442 remove_wait_queue(&pCh->close_wait, &wait);
1443 return( pCh->flags & ASYNC_HUP_NOTIFY ) ? -EAGAIN : -ERESTARTSYS;
1446 set_current_state( TASK_RUNNING );
1447 remove_wait_queue(&pCh->close_wait, &wait);
1450 * 3. Handle a non-blocking open of a normal port.
1452 if ( (pFile->f_flags & O_NONBLOCK) || (tty->flags & (1<<TTY_IO_ERROR) )) {
1453 pCh->flags |= ASYNC_NORMAL_ACTIVE;
1454 goto noblock;
1457 * 4. Now loop waiting for the port to be free and carrier present
1458 * (if required).
1460 if ( tty->termios->c_cflag & CLOCAL )
1461 do_clocal = 1;
1463 #ifdef IP2DEBUG_OPEN
1464 printk(KERN_DEBUG "OpenBlock: do_clocal = %d\n", do_clocal);
1465 #endif
1467 ++pCh->wopen;
1469 init_waitqueue_entry(&wait, current);
1470 add_wait_queue(&pCh->open_wait, &wait);
1472 for(;;) {
1473 i2QueueCommands(PTYPE_INLINE, pCh, 100, 2, CMD_DTRUP, CMD_RTSUP);
1474 pCh->dataSetOut |= (I2_DTR | I2_RTS);
1475 set_current_state( TASK_INTERRUPTIBLE );
1476 serviceOutgoingFifo( pCh->pMyBord );
1477 if ( tty_hung_up_p(pFile) ) {
1478 set_current_state( TASK_RUNNING );
1479 remove_wait_queue(&pCh->open_wait, &wait);
1480 return ( pCh->flags & ASYNC_HUP_NOTIFY ) ? -EBUSY : -ERESTARTSYS;
1482 if (!(pCh->flags & ASYNC_CLOSING) &&
1483 (do_clocal || (pCh->dataSetIn & I2_DCD) )) {
1484 rc = 0;
1485 break;
1488 #ifdef IP2DEBUG_OPEN
1489 printk(KERN_DEBUG "ASYNC_CLOSING = %s\n",
1490 (pCh->flags & ASYNC_CLOSING)?"True":"False");
1491 printk(KERN_DEBUG "OpenBlock: waiting for CD or signal\n");
1492 #endif
1493 ip2trace (CHANN, ITRC_OPEN, 3, 2, 0,
1494 (pCh->flags & ASYNC_CLOSING) );
1495 /* check for signal */
1496 if (signal_pending(current)) {
1497 rc = (( pCh->flags & ASYNC_HUP_NOTIFY ) ? -EAGAIN : -ERESTARTSYS);
1498 break;
1500 schedule();
1502 set_current_state( TASK_RUNNING );
1503 remove_wait_queue(&pCh->open_wait, &wait);
1505 --pCh->wopen; //why count?
1507 ip2trace (CHANN, ITRC_OPEN, 4, 0 );
1509 if (rc != 0 ) {
1510 return rc;
1512 pCh->flags |= ASYNC_NORMAL_ACTIVE;
1514 noblock:
1516 /* first open - Assign termios structure to port */
1517 if ( tty->count == 1 ) {
1518 i2QueueCommands(PTYPE_INLINE, pCh, 0, 2, CMD_CTSFL_DSAB, CMD_RTSFL_DSAB);
1519 /* Now we must send the termios settings to the loadware */
1520 set_params( pCh, NULL );
1524 * Now set any i2lib options. These may go away if the i2lib code ends
1525 * up rolled into the mainline.
1527 pCh->channelOptions |= CO_NBLOCK_WRITE;
1529 #ifdef IP2DEBUG_OPEN
1530 printk (KERN_DEBUG "IP2: open completed\n" );
1531 #endif
1532 serviceOutgoingFifo( pCh->pMyBord );
1534 ip2trace (CHANN, ITRC_OPEN, ITRC_RETURN, 0 );
1536 return 0;
1539 /******************************************************************************/
1540 /* Function: ip2_close() */
1541 /* Parameters: Pointer to tty structure */
1542 /* Pointer to file structure */
1543 /* Returns: Nothing */
1544 /* */
1545 /* Description: */
1546 /* */
1547 /* */
1548 /******************************************************************************/
1549 static void
1550 ip2_close( PTTY tty, struct file *pFile )
1552 i2ChanStrPtr pCh = tty->driver_data;
1554 if ( !pCh ) {
1555 return;
1558 ip2trace (CHANN, ITRC_CLOSE, ITRC_ENTER, 0 );
1560 #ifdef IP2DEBUG_OPEN
1561 printk(KERN_DEBUG "IP2:close %s:\n",tty->name);
1562 #endif
1564 if ( tty_hung_up_p ( pFile ) ) {
1566 ip2trace (CHANN, ITRC_CLOSE, 2, 1, 2 );
1568 return;
1570 if ( tty->count > 1 ) { /* not the last close */
1572 ip2trace (CHANN, ITRC_CLOSE, 2, 1, 3 );
1574 return;
1576 pCh->flags |= ASYNC_CLOSING; // last close actually
1578 tty->closing = 1;
1580 if (pCh->ClosingWaitTime != ASYNC_CLOSING_WAIT_NONE) {
1582 * Before we drop DTR, make sure the transmitter has completely drained.
1583 * This uses an timeout, after which the close
1584 * completes.
1586 ip2_wait_until_sent(tty, pCh->ClosingWaitTime );
1589 * At this point we stop accepting input. Here we flush the channel
1590 * input buffer which will allow the board to send up more data. Any
1591 * additional input is tossed at interrupt/poll time.
1593 i2InputFlush( pCh );
1595 /* disable DSS reporting */
1596 i2QueueCommands(PTYPE_INLINE, pCh, 100, 4,
1597 CMD_DCD_NREP, CMD_CTS_NREP, CMD_DSR_NREP, CMD_RI_NREP);
1598 if ( !tty || (tty->termios->c_cflag & HUPCL) ) {
1599 i2QueueCommands(PTYPE_INLINE, pCh, 100, 2, CMD_RTSDN, CMD_DTRDN);
1600 pCh->dataSetOut &= ~(I2_DTR | I2_RTS);
1601 i2QueueCommands( PTYPE_INLINE, pCh, 100, 1, CMD_PAUSE(25));
1604 serviceOutgoingFifo ( pCh->pMyBord );
1606 if ( tty->driver->flush_buffer )
1607 tty->driver->flush_buffer(tty);
1608 if ( tty->ldisc.flush_buffer )
1609 tty->ldisc.flush_buffer(tty);
1610 tty->closing = 0;
1612 pCh->pTTY = NULL;
1614 if (pCh->wopen) {
1615 if (pCh->ClosingDelay) {
1616 msleep_interruptible(jiffies_to_msecs(pCh->ClosingDelay));
1618 wake_up_interruptible(&pCh->open_wait);
1621 pCh->flags &=~(ASYNC_NORMAL_ACTIVE|ASYNC_CLOSING);
1622 wake_up_interruptible(&pCh->close_wait);
1624 #ifdef IP2DEBUG_OPEN
1625 DBG_CNT("ip2_close: after wakeups--");
1626 #endif
1629 ip2trace (CHANN, ITRC_CLOSE, ITRC_RETURN, 1, 1 );
1631 return;
1634 /******************************************************************************/
1635 /* Function: ip2_hangup() */
1636 /* Parameters: Pointer to tty structure */
1637 /* Returns: Nothing */
1638 /* */
1639 /* Description: */
1640 /* */
1641 /* */
1642 /******************************************************************************/
1643 static void
1644 ip2_hangup ( PTTY tty )
1646 i2ChanStrPtr pCh = tty->driver_data;
1648 if( !pCh ) {
1649 return;
1652 ip2trace (CHANN, ITRC_HANGUP, ITRC_ENTER, 0 );
1654 ip2_flush_buffer(tty);
1656 /* disable DSS reporting */
1658 i2QueueCommands(PTYPE_BYPASS, pCh, 0, 1, CMD_DCD_NREP);
1659 i2QueueCommands(PTYPE_INLINE, pCh, 0, 2, CMD_CTSFL_DSAB, CMD_RTSFL_DSAB);
1660 if ( (tty->termios->c_cflag & HUPCL) ) {
1661 i2QueueCommands(PTYPE_BYPASS, pCh, 0, 2, CMD_RTSDN, CMD_DTRDN);
1662 pCh->dataSetOut &= ~(I2_DTR | I2_RTS);
1663 i2QueueCommands( PTYPE_INLINE, pCh, 100, 1, CMD_PAUSE(25));
1665 i2QueueCommands(PTYPE_INLINE, pCh, 1, 3,
1666 CMD_CTS_NREP, CMD_DSR_NREP, CMD_RI_NREP);
1667 serviceOutgoingFifo ( pCh->pMyBord );
1669 wake_up_interruptible ( &pCh->delta_msr_wait );
1671 pCh->flags &= ~ASYNC_NORMAL_ACTIVE;
1672 pCh->pTTY = NULL;
1673 wake_up_interruptible ( &pCh->open_wait );
1675 ip2trace (CHANN, ITRC_HANGUP, ITRC_RETURN, 0 );
1678 /******************************************************************************/
1679 /******************************************************************************/
1680 /* Device Output Section */
1681 /******************************************************************************/
1682 /******************************************************************************/
1684 /******************************************************************************/
1685 /* Function: ip2_write() */
1686 /* Parameters: Pointer to tty structure */
1687 /* Flag denoting data is in user (1) or kernel (0) space */
1688 /* Pointer to data */
1689 /* Number of bytes to write */
1690 /* Returns: Number of bytes actually written */
1691 /* */
1692 /* Description: (MANDATORY) */
1693 /* */
1694 /* */
1695 /******************************************************************************/
1696 static int
1697 ip2_write( PTTY tty, const unsigned char *pData, int count)
1699 i2ChanStrPtr pCh = tty->driver_data;
1700 int bytesSent = 0;
1701 unsigned long flags;
1703 ip2trace (CHANN, ITRC_WRITE, ITRC_ENTER, 2, count, -1 );
1705 /* Flush out any buffered data left over from ip2_putchar() calls. */
1706 ip2_flush_chars( tty );
1708 /* This is the actual move bit. Make sure it does what we need!!!!! */
1709 WRITE_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
1710 bytesSent = i2Output( pCh, pData, count);
1711 WRITE_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1713 ip2trace (CHANN, ITRC_WRITE, ITRC_RETURN, 1, bytesSent );
1715 return bytesSent > 0 ? bytesSent : 0;
1718 /******************************************************************************/
1719 /* Function: ip2_putchar() */
1720 /* Parameters: Pointer to tty structure */
1721 /* Character to write */
1722 /* Returns: Nothing */
1723 /* */
1724 /* Description: */
1725 /* */
1726 /* */
1727 /******************************************************************************/
1728 static void
1729 ip2_putchar( PTTY tty, unsigned char ch )
1731 i2ChanStrPtr pCh = tty->driver_data;
1732 unsigned long flags;
1734 // ip2trace (CHANN, ITRC_PUTC, ITRC_ENTER, 1, ch );
1736 WRITE_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
1737 pCh->Pbuf[pCh->Pbuf_stuff++] = ch;
1738 if ( pCh->Pbuf_stuff == sizeof pCh->Pbuf ) {
1739 WRITE_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1740 ip2_flush_chars( tty );
1741 } else
1742 WRITE_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1744 // ip2trace (CHANN, ITRC_PUTC, ITRC_RETURN, 1, ch );
1747 /******************************************************************************/
1748 /* Function: ip2_flush_chars() */
1749 /* Parameters: Pointer to tty structure */
1750 /* Returns: Nothing */
1751 /* */
1752 /* Description: */
1753 /* */
1754 /******************************************************************************/
1755 static void
1756 ip2_flush_chars( PTTY tty )
1758 int strip;
1759 i2ChanStrPtr pCh = tty->driver_data;
1760 unsigned long flags;
1762 WRITE_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
1763 if ( pCh->Pbuf_stuff ) {
1765 // ip2trace (CHANN, ITRC_PUTC, 10, 1, strip );
1768 // We may need to restart i2Output if it does not fullfill this request
1770 strip = i2Output( pCh, pCh->Pbuf, pCh->Pbuf_stuff);
1771 if ( strip != pCh->Pbuf_stuff ) {
1772 memmove( pCh->Pbuf, &pCh->Pbuf[strip], pCh->Pbuf_stuff - strip );
1774 pCh->Pbuf_stuff -= strip;
1776 WRITE_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1779 /******************************************************************************/
1780 /* Function: ip2_write_room() */
1781 /* Parameters: Pointer to tty structure */
1782 /* Returns: Number of bytes that the driver can accept */
1783 /* */
1784 /* Description: */
1785 /* */
1786 /******************************************************************************/
1787 static int
1788 ip2_write_room ( PTTY tty )
1790 int bytesFree;
1791 i2ChanStrPtr pCh = tty->driver_data;
1792 unsigned long flags;
1794 READ_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
1795 bytesFree = i2OutputFree( pCh ) - pCh->Pbuf_stuff;
1796 READ_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1798 ip2trace (CHANN, ITRC_WRITE, 11, 1, bytesFree );
1800 return ((bytesFree > 0) ? bytesFree : 0);
1803 /******************************************************************************/
1804 /* Function: ip2_chars_in_buf() */
1805 /* Parameters: Pointer to tty structure */
1806 /* Returns: Number of bytes queued for transmission */
1807 /* */
1808 /* Description: */
1809 /* */
1810 /* */
1811 /******************************************************************************/
1812 static int
1813 ip2_chars_in_buf ( PTTY tty )
1815 i2ChanStrPtr pCh = tty->driver_data;
1816 int rc;
1817 unsigned long flags;
1819 ip2trace (CHANN, ITRC_WRITE, 12, 1, pCh->Obuf_char_count + pCh->Pbuf_stuff );
1821 #ifdef IP2DEBUG_WRITE
1822 printk (KERN_DEBUG "IP2: chars in buffer = %d (%d,%d)\n",
1823 pCh->Obuf_char_count + pCh->Pbuf_stuff,
1824 pCh->Obuf_char_count, pCh->Pbuf_stuff );
1825 #endif
1826 READ_LOCK_IRQSAVE(&pCh->Obuf_spinlock,flags);
1827 rc = pCh->Obuf_char_count;
1828 READ_UNLOCK_IRQRESTORE(&pCh->Obuf_spinlock,flags);
1829 READ_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
1830 rc += pCh->Pbuf_stuff;
1831 READ_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1832 return rc;
1835 /******************************************************************************/
1836 /* Function: ip2_flush_buffer() */
1837 /* Parameters: Pointer to tty structure */
1838 /* Returns: Nothing */
1839 /* */
1840 /* Description: */
1841 /* */
1842 /* */
1843 /******************************************************************************/
1844 static void
1845 ip2_flush_buffer( PTTY tty )
1847 i2ChanStrPtr pCh = tty->driver_data;
1848 unsigned long flags;
1850 ip2trace (CHANN, ITRC_FLUSH, ITRC_ENTER, 0 );
1852 #ifdef IP2DEBUG_WRITE
1853 printk (KERN_DEBUG "IP2: flush buffer\n" );
1854 #endif
1855 WRITE_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
1856 pCh->Pbuf_stuff = 0;
1857 WRITE_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1858 i2FlushOutput( pCh );
1859 ip2_owake(tty);
1861 ip2trace (CHANN, ITRC_FLUSH, ITRC_RETURN, 0 );
1865 /******************************************************************************/
1866 /* Function: ip2_wait_until_sent() */
1867 /* Parameters: Pointer to tty structure */
1868 /* Timeout for wait. */
1869 /* Returns: Nothing */
1870 /* */
1871 /* Description: */
1872 /* This function is used in place of the normal tty_wait_until_sent, which */
1873 /* only waits for the driver buffers to be empty (or rather, those buffers */
1874 /* reported by chars_in_buffer) which doesn't work for IP2 due to the */
1875 /* indeterminate number of bytes buffered on the board. */
1876 /******************************************************************************/
1877 static void
1878 ip2_wait_until_sent ( PTTY tty, int timeout )
1880 int i = jiffies;
1881 i2ChanStrPtr pCh = tty->driver_data;
1883 tty_wait_until_sent(tty, timeout );
1884 if ( (i = timeout - (jiffies -i)) > 0)
1885 i2DrainOutput( pCh, i );
1888 /******************************************************************************/
1889 /******************************************************************************/
1890 /* Device Input Section */
1891 /******************************************************************************/
1892 /******************************************************************************/
1894 /******************************************************************************/
1895 /* Function: ip2_throttle() */
1896 /* Parameters: Pointer to tty structure */
1897 /* Returns: Nothing */
1898 /* */
1899 /* Description: */
1900 /* */
1901 /* */
1902 /******************************************************************************/
1903 static void
1904 ip2_throttle ( PTTY tty )
1906 i2ChanStrPtr pCh = tty->driver_data;
1908 #ifdef IP2DEBUG_READ
1909 printk (KERN_DEBUG "IP2: throttle\n" );
1910 #endif
1912 * Signal the poll/interrupt handlers not to forward incoming data to
1913 * the line discipline. This will cause the buffers to fill up in the
1914 * library and thus cause the library routines to send the flow control
1915 * stuff.
1917 pCh->throttled = 1;
1920 /******************************************************************************/
1921 /* Function: ip2_unthrottle() */
1922 /* Parameters: Pointer to tty structure */
1923 /* Returns: Nothing */
1924 /* */
1925 /* Description: */
1926 /* */
1927 /* */
1928 /******************************************************************************/
1929 static void
1930 ip2_unthrottle ( PTTY tty )
1932 i2ChanStrPtr pCh = tty->driver_data;
1933 unsigned long flags;
1935 #ifdef IP2DEBUG_READ
1936 printk (KERN_DEBUG "IP2: unthrottle\n" );
1937 #endif
1939 /* Pass incoming data up to the line discipline again. */
1940 pCh->throttled = 0;
1941 i2QueueCommands(PTYPE_BYPASS, pCh, 0, 1, CMD_RESUME);
1942 serviceOutgoingFifo( pCh->pMyBord );
1943 READ_LOCK_IRQSAVE(&pCh->Ibuf_spinlock,flags)
1944 if ( pCh->Ibuf_stuff != pCh->Ibuf_strip ) {
1945 READ_UNLOCK_IRQRESTORE(&pCh->Ibuf_spinlock,flags)
1946 #ifdef IP2DEBUG_READ
1947 printk (KERN_DEBUG "i2Input called from unthrottle\n" );
1948 #endif
1949 i2Input( pCh );
1950 } else
1951 READ_UNLOCK_IRQRESTORE(&pCh->Ibuf_spinlock,flags)
1954 static void
1955 ip2_start ( PTTY tty )
1957 i2ChanStrPtr pCh = DevTable[tty->index];
1959 i2QueueCommands(PTYPE_BYPASS, pCh, 0, 1, CMD_RESUME);
1960 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_UNSUSPEND);
1961 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_RESUME);
1962 #ifdef IP2DEBUG_WRITE
1963 printk (KERN_DEBUG "IP2: start tx\n" );
1964 #endif
1967 static void
1968 ip2_stop ( PTTY tty )
1970 i2ChanStrPtr pCh = DevTable[tty->index];
1972 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_SUSPEND);
1973 #ifdef IP2DEBUG_WRITE
1974 printk (KERN_DEBUG "IP2: stop tx\n" );
1975 #endif
1978 /******************************************************************************/
1979 /* Device Ioctl Section */
1980 /******************************************************************************/
1982 static int ip2_tiocmget(struct tty_struct *tty, struct file *file)
1984 i2ChanStrPtr pCh = DevTable[tty->index];
1985 #ifdef ENABLE_DSSNOW
1986 wait_queue_t wait;
1987 #endif
1989 if (pCh == NULL)
1990 return -ENODEV;
1993 FIXME - the following code is causing a NULL pointer dereference in
1994 2.3.51 in an interrupt handler. It's suppose to prompt the board
1995 to return the DSS signal status immediately. Why doesn't it do
1996 the same thing in 2.2.14?
1999 /* This thing is still busted in the 1.2.12 driver on 2.4.x
2000 and even hoses the serial console so the oops can be trapped.
2001 /\/\|=mhw=|\/\/ */
2003 #ifdef ENABLE_DSSNOW
2004 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_DSS_NOW);
2006 init_waitqueue_entry(&wait, current);
2007 add_wait_queue(&pCh->dss_now_wait, &wait);
2008 set_current_state( TASK_INTERRUPTIBLE );
2010 serviceOutgoingFifo( pCh->pMyBord );
2012 schedule();
2014 set_current_state( TASK_RUNNING );
2015 remove_wait_queue(&pCh->dss_now_wait, &wait);
2017 if (signal_pending(current)) {
2018 return -EINTR;
2020 #endif
2021 return ((pCh->dataSetOut & I2_RTS) ? TIOCM_RTS : 0)
2022 | ((pCh->dataSetOut & I2_DTR) ? TIOCM_DTR : 0)
2023 | ((pCh->dataSetIn & I2_DCD) ? TIOCM_CAR : 0)
2024 | ((pCh->dataSetIn & I2_RI) ? TIOCM_RNG : 0)
2025 | ((pCh->dataSetIn & I2_DSR) ? TIOCM_DSR : 0)
2026 | ((pCh->dataSetIn & I2_CTS) ? TIOCM_CTS : 0);
2029 static int ip2_tiocmset(struct tty_struct *tty, struct file *file,
2030 unsigned int set, unsigned int clear)
2032 i2ChanStrPtr pCh = DevTable[tty->index];
2034 if (pCh == NULL)
2035 return -ENODEV;
2037 if (set & TIOCM_RTS) {
2038 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_RTSUP);
2039 pCh->dataSetOut |= I2_RTS;
2041 if (set & TIOCM_DTR) {
2042 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DTRUP);
2043 pCh->dataSetOut |= I2_DTR;
2046 if (clear & TIOCM_RTS) {
2047 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_RTSDN);
2048 pCh->dataSetOut &= ~I2_RTS;
2050 if (clear & TIOCM_DTR) {
2051 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DTRDN);
2052 pCh->dataSetOut &= ~I2_DTR;
2054 serviceOutgoingFifo( pCh->pMyBord );
2055 return 0;
2058 /******************************************************************************/
2059 /* Function: ip2_ioctl() */
2060 /* Parameters: Pointer to tty structure */
2061 /* Pointer to file structure */
2062 /* Command */
2063 /* Argument */
2064 /* Returns: Success or failure */
2065 /* */
2066 /* Description: */
2067 /* */
2068 /* */
2069 /******************************************************************************/
2070 static int
2071 ip2_ioctl ( PTTY tty, struct file *pFile, UINT cmd, ULONG arg )
2073 wait_queue_t wait;
2074 i2ChanStrPtr pCh = DevTable[tty->index];
2075 i2eBordStrPtr pB;
2076 struct async_icount cprev, cnow; /* kernel counter temps */
2077 struct serial_icounter_struct __user *p_cuser;
2078 int rc = 0;
2079 unsigned long flags;
2080 void __user *argp = (void __user *)arg;
2082 if ( pCh == NULL )
2083 return -ENODEV;
2085 pB = pCh->pMyBord;
2087 ip2trace (CHANN, ITRC_IOCTL, ITRC_ENTER, 2, cmd, arg );
2089 #ifdef IP2DEBUG_IOCTL
2090 printk(KERN_DEBUG "IP2: ioctl cmd (%x), arg (%lx)\n", cmd, arg );
2091 #endif
2093 switch(cmd) {
2094 case TIOCGSERIAL:
2096 ip2trace (CHANN, ITRC_IOCTL, 2, 1, rc );
2098 rc = get_serial_info(pCh, argp);
2099 if (rc)
2100 return rc;
2101 break;
2103 case TIOCSSERIAL:
2105 ip2trace (CHANN, ITRC_IOCTL, 3, 1, rc );
2107 rc = set_serial_info(pCh, argp);
2108 if (rc)
2109 return rc;
2110 break;
2112 case TCXONC:
2113 rc = tty_check_change(tty);
2114 if (rc)
2115 return rc;
2116 switch (arg) {
2117 case TCOOFF:
2118 //return -ENOIOCTLCMD;
2119 break;
2120 case TCOON:
2121 //return -ENOIOCTLCMD;
2122 break;
2123 case TCIOFF:
2124 if (STOP_CHAR(tty) != __DISABLED_CHAR) {
2125 i2QueueCommands( PTYPE_BYPASS, pCh, 100, 1,
2126 CMD_XMIT_NOW(STOP_CHAR(tty)));
2128 break;
2129 case TCION:
2130 if (START_CHAR(tty) != __DISABLED_CHAR) {
2131 i2QueueCommands( PTYPE_BYPASS, pCh, 100, 1,
2132 CMD_XMIT_NOW(START_CHAR(tty)));
2134 break;
2135 default:
2136 return -EINVAL;
2138 return 0;
2140 case TCSBRK: /* SVID version: non-zero arg --> no break */
2141 rc = tty_check_change(tty);
2143 ip2trace (CHANN, ITRC_IOCTL, 4, 1, rc );
2145 if (!rc) {
2146 ip2_wait_until_sent(tty,0);
2147 if (!arg) {
2148 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_SEND_BRK(250));
2149 serviceOutgoingFifo( pCh->pMyBord );
2152 break;
2154 case TCSBRKP: /* support for POSIX tcsendbreak() */
2155 rc = tty_check_change(tty);
2157 ip2trace (CHANN, ITRC_IOCTL, 5, 1, rc );
2159 if (!rc) {
2160 ip2_wait_until_sent(tty,0);
2161 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1,
2162 CMD_SEND_BRK(arg ? arg*100 : 250));
2163 serviceOutgoingFifo ( pCh->pMyBord );
2165 break;
2167 case TIOCGSOFTCAR:
2169 ip2trace (CHANN, ITRC_IOCTL, 6, 1, rc );
2171 rc = put_user(C_CLOCAL(tty) ? 1 : 0, (unsigned long __user *)argp);
2172 if (rc)
2173 return rc;
2174 break;
2176 case TIOCSSOFTCAR:
2178 ip2trace (CHANN, ITRC_IOCTL, 7, 1, rc );
2180 rc = get_user(arg,(unsigned long __user *) argp);
2181 if (rc)
2182 return rc;
2183 tty->termios->c_cflag = ((tty->termios->c_cflag & ~CLOCAL)
2184 | (arg ? CLOCAL : 0));
2186 break;
2189 * Wait for any of the 4 modem inputs (DCD,RI,DSR,CTS) to change - mask
2190 * passed in arg for lines of interest (use |'ed TIOCM_RNG/DSR/CD/CTS
2191 * for masking). Caller should use TIOCGICOUNT to see which one it was
2193 case TIOCMIWAIT:
2194 WRITE_LOCK_IRQSAVE(&pB->read_fifo_spinlock, flags);
2195 cprev = pCh->icount; /* note the counters on entry */
2196 WRITE_UNLOCK_IRQRESTORE(&pB->read_fifo_spinlock, flags);
2197 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 4,
2198 CMD_DCD_REP, CMD_CTS_REP, CMD_DSR_REP, CMD_RI_REP);
2199 init_waitqueue_entry(&wait, current);
2200 add_wait_queue(&pCh->delta_msr_wait, &wait);
2201 set_current_state( TASK_INTERRUPTIBLE );
2203 serviceOutgoingFifo( pCh->pMyBord );
2204 for(;;) {
2205 ip2trace (CHANN, ITRC_IOCTL, 10, 0 );
2207 schedule();
2209 ip2trace (CHANN, ITRC_IOCTL, 11, 0 );
2211 /* see if a signal did it */
2212 if (signal_pending(current)) {
2213 rc = -ERESTARTSYS;
2214 break;
2216 WRITE_LOCK_IRQSAVE(&pB->read_fifo_spinlock, flags);
2217 cnow = pCh->icount; /* atomic copy */
2218 WRITE_UNLOCK_IRQRESTORE(&pB->read_fifo_spinlock, flags);
2219 if (cnow.rng == cprev.rng && cnow.dsr == cprev.dsr &&
2220 cnow.dcd == cprev.dcd && cnow.cts == cprev.cts) {
2221 rc = -EIO; /* no change => rc */
2222 break;
2224 if (((arg & TIOCM_RNG) && (cnow.rng != cprev.rng)) ||
2225 ((arg & TIOCM_DSR) && (cnow.dsr != cprev.dsr)) ||
2226 ((arg & TIOCM_CD) && (cnow.dcd != cprev.dcd)) ||
2227 ((arg & TIOCM_CTS) && (cnow.cts != cprev.cts)) ) {
2228 rc = 0;
2229 break;
2231 cprev = cnow;
2233 set_current_state( TASK_RUNNING );
2234 remove_wait_queue(&pCh->delta_msr_wait, &wait);
2236 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 3,
2237 CMD_CTS_NREP, CMD_DSR_NREP, CMD_RI_NREP);
2238 if ( ! (pCh->flags & ASYNC_CHECK_CD)) {
2239 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_DCD_NREP);
2241 serviceOutgoingFifo( pCh->pMyBord );
2242 return rc;
2243 break;
2246 * Get counter of input serial line interrupts (DCD,RI,DSR,CTS)
2247 * Return: write counters to the user passed counter struct
2248 * NB: both 1->0 and 0->1 transitions are counted except for RI where
2249 * only 0->1 is counted. The controller is quite capable of counting
2250 * both, but this done to preserve compatibility with the standard
2251 * serial driver.
2253 case TIOCGICOUNT:
2254 ip2trace (CHANN, ITRC_IOCTL, 11, 1, rc );
2256 WRITE_LOCK_IRQSAVE(&pB->read_fifo_spinlock, flags);
2257 cnow = pCh->icount;
2258 WRITE_UNLOCK_IRQRESTORE(&pB->read_fifo_spinlock, flags);
2259 p_cuser = argp;
2260 rc = put_user(cnow.cts, &p_cuser->cts);
2261 rc = put_user(cnow.dsr, &p_cuser->dsr);
2262 rc = put_user(cnow.rng, &p_cuser->rng);
2263 rc = put_user(cnow.dcd, &p_cuser->dcd);
2264 rc = put_user(cnow.rx, &p_cuser->rx);
2265 rc = put_user(cnow.tx, &p_cuser->tx);
2266 rc = put_user(cnow.frame, &p_cuser->frame);
2267 rc = put_user(cnow.overrun, &p_cuser->overrun);
2268 rc = put_user(cnow.parity, &p_cuser->parity);
2269 rc = put_user(cnow.brk, &p_cuser->brk);
2270 rc = put_user(cnow.buf_overrun, &p_cuser->buf_overrun);
2271 break;
2274 * The rest are not supported by this driver. By returning -ENOIOCTLCMD they
2275 * will be passed to the line discipline for it to handle.
2277 case TIOCSERCONFIG:
2278 case TIOCSERGWILD:
2279 case TIOCSERGETLSR:
2280 case TIOCSERSWILD:
2281 case TIOCSERGSTRUCT:
2282 case TIOCSERGETMULTI:
2283 case TIOCSERSETMULTI:
2285 default:
2286 ip2trace (CHANN, ITRC_IOCTL, 12, 0 );
2288 rc = -ENOIOCTLCMD;
2289 break;
2292 ip2trace (CHANN, ITRC_IOCTL, ITRC_RETURN, 0 );
2294 return rc;
2297 /******************************************************************************/
2298 /* Function: GetSerialInfo() */
2299 /* Parameters: Pointer to channel structure */
2300 /* Pointer to old termios structure */
2301 /* Returns: Nothing */
2302 /* */
2303 /* Description: */
2304 /* This is to support the setserial command, and requires processing of the */
2305 /* standard Linux serial structure. */
2306 /******************************************************************************/
2307 static int
2308 get_serial_info ( i2ChanStrPtr pCh, struct serial_struct __user *retinfo )
2310 struct serial_struct tmp;
2312 memset ( &tmp, 0, sizeof(tmp) );
2313 tmp.type = pCh->pMyBord->channelBtypes.bid_value[(pCh->port_index & (IP2_PORTS_PER_BOARD-1))/16];
2314 if (BID_HAS_654(tmp.type)) {
2315 tmp.type = PORT_16650;
2316 } else {
2317 tmp.type = PORT_CIRRUS;
2319 tmp.line = pCh->port_index;
2320 tmp.port = pCh->pMyBord->i2eBase;
2321 tmp.irq = ip2config.irq[pCh->port_index/64];
2322 tmp.flags = pCh->flags;
2323 tmp.baud_base = pCh->BaudBase;
2324 tmp.close_delay = pCh->ClosingDelay;
2325 tmp.closing_wait = pCh->ClosingWaitTime;
2326 tmp.custom_divisor = pCh->BaudDivisor;
2327 return copy_to_user(retinfo,&tmp,sizeof(*retinfo));
2330 /******************************************************************************/
2331 /* Function: SetSerialInfo() */
2332 /* Parameters: Pointer to channel structure */
2333 /* Pointer to old termios structure */
2334 /* Returns: Nothing */
2335 /* */
2336 /* Description: */
2337 /* This function provides support for setserial, which uses the TIOCSSERIAL */
2338 /* ioctl. Not all setserial parameters are relevant. If the user attempts to */
2339 /* change the IRQ, address or type of the port the ioctl fails. */
2340 /******************************************************************************/
2341 static int
2342 set_serial_info( i2ChanStrPtr pCh, struct serial_struct __user *new_info )
2344 struct serial_struct ns;
2345 int old_flags, old_baud_divisor;
2347 if (copy_from_user(&ns, new_info, sizeof (ns)))
2348 return -EFAULT;
2351 * We don't allow setserial to change IRQ, board address, type or baud
2352 * base. Also line nunber as such is meaningless but we use it for our
2353 * array index so it is fixed also.
2355 if ( (ns.irq != ip2config.irq[pCh->port_index])
2356 || ((int) ns.port != ((int) (pCh->pMyBord->i2eBase)))
2357 || (ns.baud_base != pCh->BaudBase)
2358 || (ns.line != pCh->port_index) ) {
2359 return -EINVAL;
2362 old_flags = pCh->flags;
2363 old_baud_divisor = pCh->BaudDivisor;
2365 if ( !capable(CAP_SYS_ADMIN) ) {
2366 if ( ( ns.close_delay != pCh->ClosingDelay ) ||
2367 ( (ns.flags & ~ASYNC_USR_MASK) !=
2368 (pCh->flags & ~ASYNC_USR_MASK) ) ) {
2369 return -EPERM;
2372 pCh->flags = (pCh->flags & ~ASYNC_USR_MASK) |
2373 (ns.flags & ASYNC_USR_MASK);
2374 pCh->BaudDivisor = ns.custom_divisor;
2375 } else {
2376 pCh->flags = (pCh->flags & ~ASYNC_FLAGS) |
2377 (ns.flags & ASYNC_FLAGS);
2378 pCh->BaudDivisor = ns.custom_divisor;
2379 pCh->ClosingDelay = ns.close_delay * HZ/100;
2380 pCh->ClosingWaitTime = ns.closing_wait * HZ/100;
2383 if ( ( (old_flags & ASYNC_SPD_MASK) != (pCh->flags & ASYNC_SPD_MASK) )
2384 || (old_baud_divisor != pCh->BaudDivisor) ) {
2385 // Invalidate speed and reset parameters
2386 set_params( pCh, NULL );
2389 return 0;
2392 /******************************************************************************/
2393 /* Function: ip2_set_termios() */
2394 /* Parameters: Pointer to tty structure */
2395 /* Pointer to old termios structure */
2396 /* Returns: Nothing */
2397 /* */
2398 /* Description: */
2399 /* */
2400 /* */
2401 /******************************************************************************/
2402 static void
2403 ip2_set_termios( PTTY tty, struct ktermios *old_termios )
2405 i2ChanStrPtr pCh = (i2ChanStrPtr)tty->driver_data;
2407 #ifdef IP2DEBUG_IOCTL
2408 printk (KERN_DEBUG "IP2: set termios %p\n", old_termios );
2409 #endif
2411 set_params( pCh, old_termios );
2414 /******************************************************************************/
2415 /* Function: ip2_set_line_discipline() */
2416 /* Parameters: Pointer to tty structure */
2417 /* Returns: Nothing */
2418 /* */
2419 /* Description: Does nothing */
2420 /* */
2421 /* */
2422 /******************************************************************************/
2423 static void
2424 ip2_set_line_discipline ( PTTY tty )
2426 #ifdef IP2DEBUG_IOCTL
2427 printk (KERN_DEBUG "IP2: set line discipline\n" );
2428 #endif
2430 ip2trace (((i2ChanStrPtr)tty->driver_data)->port_index, ITRC_IOCTL, 16, 0 );
2434 /******************************************************************************/
2435 /* Function: SetLine Characteristics() */
2436 /* Parameters: Pointer to channel structure */
2437 /* Returns: Nothing */
2438 /* */
2439 /* Description: */
2440 /* This routine is called to update the channel structure with the new line */
2441 /* characteristics, and send the appropriate commands to the board when they */
2442 /* change. */
2443 /******************************************************************************/
2444 static void
2445 set_params( i2ChanStrPtr pCh, struct ktermios *o_tios )
2447 tcflag_t cflag, iflag, lflag;
2448 char stop_char, start_char;
2449 struct ktermios dummy;
2451 lflag = pCh->pTTY->termios->c_lflag;
2452 cflag = pCh->pTTY->termios->c_cflag;
2453 iflag = pCh->pTTY->termios->c_iflag;
2455 if (o_tios == NULL) {
2456 dummy.c_lflag = ~lflag;
2457 dummy.c_cflag = ~cflag;
2458 dummy.c_iflag = ~iflag;
2459 o_tios = &dummy;
2463 switch ( cflag & CBAUD ) {
2464 case B0:
2465 i2QueueCommands( PTYPE_BYPASS, pCh, 100, 2, CMD_RTSDN, CMD_DTRDN);
2466 pCh->dataSetOut &= ~(I2_DTR | I2_RTS);
2467 i2QueueCommands( PTYPE_INLINE, pCh, 100, 1, CMD_PAUSE(25));
2468 pCh->pTTY->termios->c_cflag |= (CBAUD & o_tios->c_cflag);
2469 goto service_it;
2470 break;
2471 case B38400:
2473 * This is the speed that is overloaded with all the other high
2474 * speeds, depending upon the flag settings.
2476 if ( ( pCh->flags & ASYNC_SPD_MASK ) == ASYNC_SPD_HI ) {
2477 pCh->speed = CBR_57600;
2478 } else if ( (pCh->flags & ASYNC_SPD_MASK) == ASYNC_SPD_VHI ) {
2479 pCh->speed = CBR_115200;
2480 } else if ( (pCh->flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST ) {
2481 pCh->speed = CBR_C1;
2482 } else {
2483 pCh->speed = CBR_38400;
2485 break;
2486 case B50: pCh->speed = CBR_50; break;
2487 case B75: pCh->speed = CBR_75; break;
2488 case B110: pCh->speed = CBR_110; break;
2489 case B134: pCh->speed = CBR_134; break;
2490 case B150: pCh->speed = CBR_150; break;
2491 case B200: pCh->speed = CBR_200; break;
2492 case B300: pCh->speed = CBR_300; break;
2493 case B600: pCh->speed = CBR_600; break;
2494 case B1200: pCh->speed = CBR_1200; break;
2495 case B1800: pCh->speed = CBR_1800; break;
2496 case B2400: pCh->speed = CBR_2400; break;
2497 case B4800: pCh->speed = CBR_4800; break;
2498 case B9600: pCh->speed = CBR_9600; break;
2499 case B19200: pCh->speed = CBR_19200; break;
2500 case B57600: pCh->speed = CBR_57600; break;
2501 case B115200: pCh->speed = CBR_115200; break;
2502 case B153600: pCh->speed = CBR_153600; break;
2503 case B230400: pCh->speed = CBR_230400; break;
2504 case B307200: pCh->speed = CBR_307200; break;
2505 case B460800: pCh->speed = CBR_460800; break;
2506 case B921600: pCh->speed = CBR_921600; break;
2507 default: pCh->speed = CBR_9600; break;
2509 if ( pCh->speed == CBR_C1 ) {
2510 // Process the custom speed parameters.
2511 int bps = pCh->BaudBase / pCh->BaudDivisor;
2512 if ( bps == 921600 ) {
2513 pCh->speed = CBR_921600;
2514 } else {
2515 bps = bps/10;
2516 i2QueueCommands( PTYPE_INLINE, pCh, 100, 1, CMD_BAUD_DEF1(bps) );
2519 i2QueueCommands( PTYPE_INLINE, pCh, 100, 1, CMD_SETBAUD(pCh->speed));
2521 i2QueueCommands ( PTYPE_INLINE, pCh, 100, 2, CMD_DTRUP, CMD_RTSUP);
2522 pCh->dataSetOut |= (I2_DTR | I2_RTS);
2524 if ( (CSTOPB & cflag) ^ (CSTOPB & o_tios->c_cflag))
2526 i2QueueCommands ( PTYPE_INLINE, pCh, 100, 1,
2527 CMD_SETSTOP( ( cflag & CSTOPB ) ? CST_2 : CST_1));
2529 if (((PARENB|PARODD) & cflag) ^ ((PARENB|PARODD) & o_tios->c_cflag))
2531 i2QueueCommands ( PTYPE_INLINE, pCh, 100, 1,
2532 CMD_SETPAR(
2533 (cflag & PARENB ? (cflag & PARODD ? CSP_OD : CSP_EV) : CSP_NP)
2537 /* byte size and parity */
2538 if ( (CSIZE & cflag)^(CSIZE & o_tios->c_cflag))
2540 int datasize;
2541 switch ( cflag & CSIZE ) {
2542 case CS5: datasize = CSZ_5; break;
2543 case CS6: datasize = CSZ_6; break;
2544 case CS7: datasize = CSZ_7; break;
2545 case CS8: datasize = CSZ_8; break;
2546 default: datasize = CSZ_5; break; /* as per serial.c */
2548 i2QueueCommands ( PTYPE_INLINE, pCh, 100, 1, CMD_SETBITS(datasize) );
2550 /* Process CTS flow control flag setting */
2551 if ( (cflag & CRTSCTS) ) {
2552 i2QueueCommands(PTYPE_INLINE, pCh, 100,
2553 2, CMD_CTSFL_ENAB, CMD_RTSFL_ENAB);
2554 } else {
2555 i2QueueCommands(PTYPE_INLINE, pCh, 100,
2556 2, CMD_CTSFL_DSAB, CMD_RTSFL_DSAB);
2559 // Process XON/XOFF flow control flags settings
2561 stop_char = STOP_CHAR(pCh->pTTY);
2562 start_char = START_CHAR(pCh->pTTY);
2564 //////////// can't be \000
2565 if (stop_char == __DISABLED_CHAR )
2567 stop_char = ~__DISABLED_CHAR;
2569 if (start_char == __DISABLED_CHAR )
2571 start_char = ~__DISABLED_CHAR;
2573 /////////////////////////////////
2575 if ( o_tios->c_cc[VSTART] != start_char )
2577 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_DEF_IXON(start_char));
2578 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DEF_OXON(start_char));
2580 if ( o_tios->c_cc[VSTOP] != stop_char )
2582 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_DEF_IXOFF(stop_char));
2583 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DEF_OXOFF(stop_char));
2585 if (stop_char == __DISABLED_CHAR )
2587 stop_char = ~__DISABLED_CHAR; //TEST123
2588 goto no_xoff;
2590 if ((iflag & (IXOFF))^(o_tios->c_iflag & (IXOFF)))
2592 if ( iflag & IXOFF ) { // Enable XOFF output flow control
2593 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_OXON_OPT(COX_XON));
2594 } else { // Disable XOFF output flow control
2595 no_xoff:
2596 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_OXON_OPT(COX_NONE));
2599 if (start_char == __DISABLED_CHAR )
2601 goto no_xon;
2603 if ((iflag & (IXON|IXANY)) ^ (o_tios->c_iflag & (IXON|IXANY)))
2605 if ( iflag & IXON ) {
2606 if ( iflag & IXANY ) { // Enable XON/XANY output flow control
2607 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_IXON_OPT(CIX_XANY));
2608 } else { // Enable XON output flow control
2609 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_IXON_OPT(CIX_XON));
2611 } else { // Disable XON output flow control
2612 no_xon:
2613 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_IXON_OPT(CIX_NONE));
2616 if ( (iflag & ISTRIP) ^ ( o_tios->c_iflag & (ISTRIP)) )
2618 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1,
2619 CMD_ISTRIP_OPT((iflag & ISTRIP ? 1 : 0)));
2621 if ( (iflag & INPCK) ^ ( o_tios->c_iflag & (INPCK)) )
2623 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1,
2624 CMD_PARCHK((iflag & INPCK) ? CPK_ENAB : CPK_DSAB));
2627 if ( (iflag & (IGNBRK|PARMRK|BRKINT|IGNPAR))
2628 ^ ( o_tios->c_iflag & (IGNBRK|PARMRK|BRKINT|IGNPAR)) )
2630 char brkrpt = 0;
2631 char parrpt = 0;
2633 if ( iflag & IGNBRK ) { /* Ignore breaks altogether */
2634 /* Ignore breaks altogether */
2635 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_BRK_NREP);
2636 } else {
2637 if ( iflag & BRKINT ) {
2638 if ( iflag & PARMRK ) {
2639 brkrpt = 0x0a; // exception an inline triple
2640 } else {
2641 brkrpt = 0x1a; // exception and NULL
2643 brkrpt |= 0x04; // flush input
2644 } else {
2645 if ( iflag & PARMRK ) {
2646 brkrpt = 0x0b; //POSIX triple \0377 \0 \0
2647 } else {
2648 brkrpt = 0x01; // Null only
2651 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_BRK_REP(brkrpt));
2654 if (iflag & IGNPAR) {
2655 parrpt = 0x20;
2656 /* would be 2 for not cirrus bug */
2657 /* would be 0x20 cept for cirrus bug */
2658 } else {
2659 if ( iflag & PARMRK ) {
2661 * Replace error characters with 3-byte sequence (\0377,\0,char)
2663 parrpt = 0x04 ;
2664 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_ISTRIP_OPT((char)0));
2665 } else {
2666 parrpt = 0x03;
2669 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_SET_ERROR(parrpt));
2671 if (cflag & CLOCAL) {
2672 // Status reporting fails for DCD if this is off
2673 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DCD_NREP);
2674 pCh->flags &= ~ASYNC_CHECK_CD;
2675 } else {
2676 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DCD_REP);
2677 pCh->flags |= ASYNC_CHECK_CD;
2680 service_it:
2681 i2DrainOutput( pCh, 100 );
2684 /******************************************************************************/
2685 /* IPL Device Section */
2686 /******************************************************************************/
2688 /******************************************************************************/
2689 /* Function: ip2_ipl_read() */
2690 /* Parameters: Pointer to device inode */
2691 /* Pointer to file structure */
2692 /* Pointer to data */
2693 /* Number of bytes to read */
2694 /* Returns: Success or failure */
2695 /* */
2696 /* Description: Ugly */
2697 /* */
2698 /* */
2699 /******************************************************************************/
2701 static
2702 ssize_t
2703 ip2_ipl_read(struct file *pFile, char __user *pData, size_t count, loff_t *off )
2705 unsigned int minor = iminor(pFile->f_path.dentry->d_inode);
2706 int rc = 0;
2708 #ifdef IP2DEBUG_IPL
2709 printk (KERN_DEBUG "IP2IPL: read %p, %d bytes\n", pData, count );
2710 #endif
2712 switch( minor ) {
2713 case 0: // IPL device
2714 rc = -EINVAL;
2715 break;
2716 case 1: // Status dump
2717 rc = -EINVAL;
2718 break;
2719 case 2: // Ping device
2720 rc = -EINVAL;
2721 break;
2722 case 3: // Trace device
2723 rc = DumpTraceBuffer ( pData, count );
2724 break;
2725 case 4: // Trace device
2726 rc = DumpFifoBuffer ( pData, count );
2727 break;
2728 default:
2729 rc = -ENODEV;
2730 break;
2732 return rc;
2735 static int
2736 DumpFifoBuffer ( char __user *pData, int count )
2738 #ifdef DEBUG_FIFO
2739 int rc;
2740 rc = copy_to_user(pData, DBGBuf, count);
2742 printk(KERN_DEBUG "Last index %d\n", I );
2744 return count;
2745 #endif /* DEBUG_FIFO */
2746 return 0;
2749 static int
2750 DumpTraceBuffer ( char __user *pData, int count )
2752 #ifdef IP2DEBUG_TRACE
2753 int rc;
2754 int dumpcount;
2755 int chunk;
2756 int *pIndex = (int __user *)pData;
2758 if ( count < (sizeof(int) * 6) ) {
2759 return -EIO;
2761 rc = put_user(tracewrap, pIndex );
2762 rc = put_user(TRACEMAX, ++pIndex );
2763 rc = put_user(tracestrip, ++pIndex );
2764 rc = put_user(tracestuff, ++pIndex );
2765 pData += sizeof(int) * 6;
2766 count -= sizeof(int) * 6;
2768 dumpcount = tracestuff - tracestrip;
2769 if ( dumpcount < 0 ) {
2770 dumpcount += TRACEMAX;
2772 if ( dumpcount > count ) {
2773 dumpcount = count;
2775 chunk = TRACEMAX - tracestrip;
2776 if ( dumpcount > chunk ) {
2777 rc = copy_to_user(pData, &tracebuf[tracestrip],
2778 chunk * sizeof(tracebuf[0]) );
2779 pData += chunk * sizeof(tracebuf[0]);
2780 tracestrip = 0;
2781 chunk = dumpcount - chunk;
2782 } else {
2783 chunk = dumpcount;
2785 rc = copy_to_user(pData, &tracebuf[tracestrip],
2786 chunk * sizeof(tracebuf[0]) );
2787 tracestrip += chunk;
2788 tracewrap = 0;
2790 rc = put_user(tracestrip, ++pIndex );
2791 rc = put_user(tracestuff, ++pIndex );
2793 return dumpcount;
2794 #else
2795 return 0;
2796 #endif
2799 /******************************************************************************/
2800 /* Function: ip2_ipl_write() */
2801 /* Parameters: */
2802 /* Pointer to file structure */
2803 /* Pointer to data */
2804 /* Number of bytes to write */
2805 /* Returns: Success or failure */
2806 /* */
2807 /* Description: */
2808 /* */
2809 /* */
2810 /******************************************************************************/
2811 static ssize_t
2812 ip2_ipl_write(struct file *pFile, const char __user *pData, size_t count, loff_t *off)
2814 #ifdef IP2DEBUG_IPL
2815 printk (KERN_DEBUG "IP2IPL: write %p, %d bytes\n", pData, count );
2816 #endif
2817 return 0;
2820 /******************************************************************************/
2821 /* Function: ip2_ipl_ioctl() */
2822 /* Parameters: Pointer to device inode */
2823 /* Pointer to file structure */
2824 /* Command */
2825 /* Argument */
2826 /* Returns: Success or failure */
2827 /* */
2828 /* Description: */
2829 /* */
2830 /* */
2831 /******************************************************************************/
2832 static int
2833 ip2_ipl_ioctl ( struct inode *pInode, struct file *pFile, UINT cmd, ULONG arg )
2835 unsigned int iplminor = iminor(pInode);
2836 int rc = 0;
2837 void __user *argp = (void __user *)arg;
2838 ULONG __user *pIndex = argp;
2839 i2eBordStrPtr pB = i2BoardPtrTable[iplminor / 4];
2840 i2ChanStrPtr pCh;
2842 #ifdef IP2DEBUG_IPL
2843 printk (KERN_DEBUG "IP2IPL: ioctl cmd %d, arg %ld\n", cmd, arg );
2844 #endif
2846 switch ( iplminor ) {
2847 case 0: // IPL device
2848 rc = -EINVAL;
2849 break;
2850 case 1: // Status dump
2851 case 5:
2852 case 9:
2853 case 13:
2854 switch ( cmd ) {
2855 case 64: /* Driver - ip2stat */
2856 rc = put_user(ip2_tty_driver->refcount, pIndex++ );
2857 rc = put_user(irq_counter, pIndex++ );
2858 rc = put_user(bh_counter, pIndex++ );
2859 break;
2861 case 65: /* Board - ip2stat */
2862 if ( pB ) {
2863 rc = copy_to_user(argp, pB, sizeof(i2eBordStr));
2864 rc = put_user(INB(pB->i2eStatus),
2865 (ULONG __user *)(arg + (ULONG)(&pB->i2eStatus) - (ULONG)pB ) );
2866 } else {
2867 rc = -ENODEV;
2869 break;
2871 default:
2872 if (cmd < IP2_MAX_PORTS) {
2873 pCh = DevTable[cmd];
2874 if ( pCh )
2876 rc = copy_to_user(argp, pCh, sizeof(i2ChanStr));
2877 } else {
2878 rc = -ENODEV;
2880 } else {
2881 rc = -EINVAL;
2884 break;
2886 case 2: // Ping device
2887 rc = -EINVAL;
2888 break;
2889 case 3: // Trace device
2891 * akpm: This used to write a whole bunch of function addresses
2892 * to userspace, which generated lots of put_user() warnings.
2893 * I killed it all. Just return "success" and don't do
2894 * anything.
2896 if (cmd == 1)
2897 rc = 0;
2898 else
2899 rc = -EINVAL;
2900 break;
2902 default:
2903 rc = -ENODEV;
2904 break;
2906 return rc;
2909 /******************************************************************************/
2910 /* Function: ip2_ipl_open() */
2911 /* Parameters: Pointer to device inode */
2912 /* Pointer to file structure */
2913 /* Returns: Success or failure */
2914 /* */
2915 /* Description: */
2916 /* */
2917 /* */
2918 /******************************************************************************/
2919 static int
2920 ip2_ipl_open( struct inode *pInode, struct file *pFile )
2922 unsigned int iplminor = iminor(pInode);
2923 i2eBordStrPtr pB;
2924 i2ChanStrPtr pCh;
2926 #ifdef IP2DEBUG_IPL
2927 printk (KERN_DEBUG "IP2IPL: open\n" );
2928 #endif
2930 switch(iplminor) {
2931 // These are the IPL devices
2932 case 0:
2933 case 4:
2934 case 8:
2935 case 12:
2936 break;
2938 // These are the status devices
2939 case 1:
2940 case 5:
2941 case 9:
2942 case 13:
2943 break;
2945 // These are the debug devices
2946 case 2:
2947 case 6:
2948 case 10:
2949 case 14:
2950 pB = i2BoardPtrTable[iplminor / 4];
2951 pCh = (i2ChanStrPtr) pB->i2eChannelPtr;
2952 break;
2954 // This is the trace device
2955 case 3:
2956 break;
2958 return 0;
2960 /******************************************************************************/
2961 /* Function: ip2_read_procmem */
2962 /* Parameters: */
2963 /* */
2964 /* Returns: Length of output */
2965 /* */
2966 /* Description: */
2967 /* Supplies some driver operating parameters */
2968 /* Not real useful unless your debugging the fifo */
2969 /* */
2970 /******************************************************************************/
2972 #define LIMIT (PAGE_SIZE - 120)
2974 static int
2975 ip2_read_procmem(char *buf, char **start, off_t offset, int len)
2977 i2eBordStrPtr pB;
2978 i2ChanStrPtr pCh;
2979 PTTY tty;
2980 int i;
2982 len = 0;
2984 #define FMTLINE "%3d: 0x%08x 0x%08x 0%011o 0%011o\n"
2985 #define FMTLIN2 " 0x%04x 0x%04x tx flow 0x%x\n"
2986 #define FMTLIN3 " 0x%04x 0x%04x rc flow\n"
2988 len += sprintf(buf+len,"\n");
2990 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
2991 pB = i2BoardPtrTable[i];
2992 if ( pB ) {
2993 len += sprintf(buf+len,"board %d:\n",i);
2994 len += sprintf(buf+len,"\tFifo rem: %d mty: %x outM %x\n",
2995 pB->i2eFifoRemains,pB->i2eWaitingForEmptyFifo,pB->i2eOutMailWaiting);
2999 len += sprintf(buf+len,"#: tty flags, port flags, cflags, iflags\n");
3000 for (i=0; i < IP2_MAX_PORTS; i++) {
3001 if (len > LIMIT)
3002 break;
3003 pCh = DevTable[i];
3004 if (pCh) {
3005 tty = pCh->pTTY;
3006 if (tty && tty->count) {
3007 len += sprintf(buf+len,FMTLINE,i,(int)tty->flags,pCh->flags,
3008 tty->termios->c_cflag,tty->termios->c_iflag);
3010 len += sprintf(buf+len,FMTLIN2,
3011 pCh->outfl.asof,pCh->outfl.room,pCh->channelNeeds);
3012 len += sprintf(buf+len,FMTLIN3,pCh->infl.asof,pCh->infl.room);
3016 return len;
3020 * This is the handler for /proc/tty/driver/ip2
3022 * This stretch of code has been largely plagerized from at least three
3023 * different sources including ip2mkdev.c and a couple of other drivers.
3024 * The bugs are all mine. :-) =mhw=
3026 static int ip2_read_proc(char *page, char **start, off_t off,
3027 int count, int *eof, void *data)
3029 int i, j, box;
3030 int len = 0;
3031 int boxes = 0;
3032 int ports = 0;
3033 int tports = 0;
3034 off_t begin = 0;
3035 i2eBordStrPtr pB;
3037 len += sprintf(page, "ip2info: 1.0 driver: %s\n", pcVersion );
3038 len += sprintf(page+len, "Driver: SMajor=%d CMajor=%d IMajor=%d MaxBoards=%d MaxBoxes=%d MaxPorts=%d\n",
3039 IP2_TTY_MAJOR, IP2_CALLOUT_MAJOR, IP2_IPL_MAJOR,
3040 IP2_MAX_BOARDS, ABS_MAX_BOXES, ABS_BIGGEST_BOX);
3042 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
3043 /* This need to be reset for a board by board count... */
3044 boxes = 0;
3045 pB = i2BoardPtrTable[i];
3046 if( pB ) {
3047 switch( pB->i2ePom.e.porID & ~POR_ID_RESERVED )
3049 case POR_ID_FIIEX:
3050 len += sprintf( page+len, "Board %d: EX ports=", i );
3051 for( box = 0; box < ABS_MAX_BOXES; ++box )
3053 ports = 0;
3055 if( pB->i2eChannelMap[box] != 0 ) ++boxes;
3056 for( j = 0; j < ABS_BIGGEST_BOX; ++j )
3058 if( pB->i2eChannelMap[box] & 1<< j ) {
3059 ++ports;
3062 len += sprintf( page+len, "%d,", ports );
3063 tports += ports;
3066 --len; /* Backup over that last comma */
3068 len += sprintf( page+len, " boxes=%d width=%d", boxes, pB->i2eDataWidth16 ? 16 : 8 );
3069 break;
3071 case POR_ID_II_4:
3072 len += sprintf(page+len, "Board %d: ISA-4 ports=4 boxes=1", i );
3073 tports = ports = 4;
3074 break;
3076 case POR_ID_II_8:
3077 len += sprintf(page+len, "Board %d: ISA-8-std ports=8 boxes=1", i );
3078 tports = ports = 8;
3079 break;
3081 case POR_ID_II_8R:
3082 len += sprintf(page+len, "Board %d: ISA-8-RJ11 ports=8 boxes=1", i );
3083 tports = ports = 8;
3084 break;
3086 default:
3087 len += sprintf(page+len, "Board %d: unknown", i );
3088 /* Don't try and probe for minor numbers */
3089 tports = ports = 0;
3092 } else {
3093 /* Don't try and probe for minor numbers */
3094 len += sprintf(page+len, "Board %d: vacant", i );
3095 tports = ports = 0;
3098 if( tports ) {
3099 len += sprintf(page+len, " minors=" );
3101 for ( box = 0; box < ABS_MAX_BOXES; ++box )
3103 for ( j = 0; j < ABS_BIGGEST_BOX; ++j )
3105 if ( pB->i2eChannelMap[box] & (1 << j) )
3107 len += sprintf (page+len,"%d,",
3108 j + ABS_BIGGEST_BOX *
3109 (box+i*ABS_MAX_BOXES));
3114 page[ len - 1 ] = '\n'; /* Overwrite that last comma */
3115 } else {
3116 len += sprintf (page+len,"\n" );
3119 if (len+begin > off+count)
3120 break;
3121 if (len+begin < off) {
3122 begin += len;
3123 len = 0;
3127 if (i >= IP2_MAX_BOARDS)
3128 *eof = 1;
3129 if (off >= len+begin)
3130 return 0;
3132 *start = page + (off-begin);
3133 return ((count < begin+len-off) ? count : begin+len-off);
3136 /******************************************************************************/
3137 /* Function: ip2trace() */
3138 /* Parameters: Value to add to trace buffer */
3139 /* Returns: Nothing */
3140 /* */
3141 /* Description: */
3142 /* */
3143 /* */
3144 /******************************************************************************/
3145 #ifdef IP2DEBUG_TRACE
3146 void
3147 ip2trace (unsigned short pn, unsigned char cat, unsigned char label, unsigned long codes, ...)
3149 long flags;
3150 unsigned long *pCode = &codes;
3151 union ip2breadcrumb bc;
3152 i2ChanStrPtr pCh;
3155 tracebuf[tracestuff++] = jiffies;
3156 if ( tracestuff == TRACEMAX ) {
3157 tracestuff = 0;
3159 if ( tracestuff == tracestrip ) {
3160 if ( ++tracestrip == TRACEMAX ) {
3161 tracestrip = 0;
3163 ++tracewrap;
3166 bc.hdr.port = 0xff & pn;
3167 bc.hdr.cat = cat;
3168 bc.hdr.codes = (unsigned char)( codes & 0xff );
3169 bc.hdr.label = label;
3170 tracebuf[tracestuff++] = bc.value;
3172 for (;;) {
3173 if ( tracestuff == TRACEMAX ) {
3174 tracestuff = 0;
3176 if ( tracestuff == tracestrip ) {
3177 if ( ++tracestrip == TRACEMAX ) {
3178 tracestrip = 0;
3180 ++tracewrap;
3183 if ( !codes-- )
3184 break;
3186 tracebuf[tracestuff++] = *++pCode;
3189 #endif
3192 MODULE_LICENSE("GPL");
3194 static struct pci_device_id ip2main_pci_tbl[] __devinitdata = {
3195 { PCI_DEVICE(PCI_VENDOR_ID_COMPUTONE, PCI_DEVICE_ID_COMPUTONE_IP2EX) },
3199 MODULE_DEVICE_TABLE(pci, ip2main_pci_tbl);