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 *******************************************************************************/
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.
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.
52 // Four box EX was barfing on >128k kmalloc, made structure smaller by
53 // reducing output buffer size
56 // Device file system support (MHW)
60 // Reload of ip2 without unloading ip2main hangs system on cat of /proc/modules
64 // DCD was not reported when CLOCAL was set on call to TIOCMGET
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
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>
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>
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"
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 /********************/
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);
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
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);
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
;
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)
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;
295 static int Eisa_slot
;
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
307 is_valid_irq(int irq
)
311 while ((*i
!= 0) && (*i
!= irq
)) {
318 mark_requested_irq( char irq
)
320 rirqs
[iindx
++] = irq
;
325 clear_requested_irq( char irq
)
328 for ( i
= 0; i
< IP2_MAX_BOARDS
; ++i
) {
329 if (rirqs
[i
] == irq
) {
339 have_requested_irq( char irq
)
341 // array init to zeros so 0 irq will not be requested as a side effect
343 for ( i
= 0; i
< IP2_MAX_BOARDS
; ++i
) {
350 /******************************************************************************/
351 /* Function: init_module() */
352 /* Parameters: None */
353 /* Returns: Success (0) */
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 /******************************************************************************/
364 printk (KERN_DEBUG
"Loading module ...\n" );
370 /******************************************************************************/
371 /* Function: cleanup_module() */
372 /* Parameters: None */
373 /* Returns: Nothing */
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 /******************************************************************************/
393 printk (KERN_DEBUG
"Unloading %s: version %s\n", pcName
, pcVersion
);
395 /* Stop poll timer if we had one. */
397 del_timer ( &PollTimer
);
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
);
432 for (i
= 0; i
< IP2_MAX_BOARDS
; i
++) {
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
;
441 if ((pB
= i2BoardPtrTable
[i
]) != 0 ) {
443 i2BoardPtrTable
[i
] = NULL
;
445 if ((DevTableMem
[i
]) != NULL
) {
446 kfree ( DevTableMem
[i
] );
447 DevTableMem
[i
] = NULL
;
451 /* Cleanup the iiEllis subsystem. */
454 printk (KERN_DEBUG
"IP2 Unloaded\n" );
459 static const struct tty_operations ip2_ops
= {
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
,
469 .throttle
= ip2_throttle
,
470 .unthrottle
= ip2_unthrottle
,
471 .set_termios
= ip2_set_termios
,
472 .set_ldisc
= ip2_set_line_discipline
,
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) */
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
)
504 i2eBordStrPtr pB
= NULL
;
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
) {
516 ip2config
.addr
[i
] = iop
[i
];
519 ip2config
.irq
[i
] = irqp
[i
];
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.
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
550 printk( KERN_INFO
"Still loaded\n" );
555 ip2_tty_driver
= alloc_tty_driver(IP2_MAX_PORTS
);
559 /* Initialise the iiEllis subsystem. */
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 */
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;
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
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
) {
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
));
602 ip2config
.type
[i
] = PCI
;
603 ip2config
.pci_dev
[i
] = pci_dev_get(pci_dev_i
);
605 pci_read_config_dword(pci_dev_i
, PCI_BASE_ADDRESS_1
, &addr
);
607 ip2config
.addr
[i
]=(USHORT
)(addr
&0xfffe);
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);
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
);
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 */
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
;
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
);
647 i2BoardPtrTable
[i
] = pB
;
648 iiSetAddress( pB
, ip2config
.addr
[i
], ii2DelayTimer
);
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
) {
661 for ( i
= 0; i
< IP2_MAX_BOARDS
; ++i
) {
662 if ( i2BoardPtrTable
[i
] != NULL
) {
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
);
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
);
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
);
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");
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
] ) {
715 if ( NULL
!= ( pB
= i2BoardPtrTable
[i
] ) ) {
716 device_create(ip2_class
, NULL
,
717 MKDEV(IP2_IPL_MAJOR
, 4 * i
),
719 device_create(ip2_class
, NULL
,
720 MKDEV(IP2_IPL_MAJOR
, 4 * i
+ 1),
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
);
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
) {
745 PollTimer
.expires
= POLL_TIMEOUT
;
746 add_timer ( &PollTimer
);
748 printk( KERN_INFO
"IP2: polling\n");
751 if (have_requested_irq(ip2config
.irq
[i
]))
753 rc
= request_irq( ip2config
.irq
[i
], ip2_interrupt
,
754 IP2_SA_FLAGS
| (ip2config
.type
[i
] == PCI
? IRQF_SHARED
: 0),
755 pcName
, i2BoardPtrTable
[i
]);
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
));
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 );
777 unregister_chrdev(IP2_IPL_MAJOR
, "ip2");
782 EXPORT_SYMBOL(ip2_loadmain
);
784 /******************************************************************************/
785 /* Function: ip2_init_board() */
786 /* Parameters: Index of board in configuration structure */
787 /* Returns: Success (0) */
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 /******************************************************************************/
795 ip2_init_board( int boardnum
)
798 int nports
= 0, nboxes
= 0;
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
);
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
]);
815 if ( iiDownloadAll ( pB
, (loadHdrStrPtr
)Fip_firmware
, 1, Fip_firmware_size
)
817 printk ( KERN_ERR
"IP2: failed to download loadware\n" );
818 goto err_release_region
;
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
) {
830 printk( KERN_ERR
"IP2: Unknown board type, ID = %x\n",
831 pB
->i2ePom
.e
.porID
);
833 goto err_release_region
;
836 case POR_ID_II_4
: /* IntelliPort-II, ISA-4 (4xRJ45) */
837 printk ( KERN_INFO
"IP2: ISA-4\n" );
841 case POR_ID_II_8
: /* IntelliPort-II, 8-port using standard brick. */
842 printk ( KERN_INFO
"IP2: ISA-8 std\n" );
846 case POR_ID_II_8R
: /* IntelliPort-II, 8-port using RJ11's (no CTS) */
847 printk ( KERN_INFO
"IP2: ISA-8 RJ11\n" );
851 case POR_ID_FIIEX
: /* IntelliPort IIEX */
853 int portnum
= IP2_PORTS_PER_BOARD
* boardnum
;
856 for( box
= 0; box
< ABS_MAX_BOXES
; ++box
) {
857 if ( pB
->i2eChannelMap
[box
] != 0 ) {
860 for( i
= 0; i
< ABS_BIGGEST_BOX
; ++i
) {
861 if ( pB
->i2eChannelMap
[box
] & 1<< i
) {
866 DevTableMem
[boardnum
] = pCh
=
867 kmalloc( sizeof(i2ChanStr
) * nports
, GFP_KERNEL
);
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
);
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
;
889 printk(KERN_INFO
"IP2: EX box=%d ports=%d %d bit\n",
890 nboxes
, nports
, pB
->i2eDataWidth16
? 16 : 8 );
894 DevTableMem
[boardnum
] = pCh
=
895 kmalloc ( sizeof (i2ChanStr
) * nports
, GFP_KERNEL
);
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
);
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
;
915 INIT_WORK(&pB
->tqueue_interrupt
, ip2_interrupt_bh
);
919 release_region(ip2config
.addr
[boardnum
], 8);
922 i2BoardPtrTable
[boardnum
] = NULL
;
926 /******************************************************************************/
927 /* Function: find_eisa_board ( int start_slot ) */
928 /* Parameters: First slot to check */
929 /* Returns: Address of EISA IntelliPort II controller */
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
)
941 unsigned int idm
= 0;
942 unsigned int idp
= 0;
943 unsigned int base
= 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
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);
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
++ ) {
970 idm
= (inb(base
+ 0xc80) << 8) | (inb(base
+ 0xc81) & 0xff);
971 idp
= (inb(base
+ 0xc82) << 8) | (inb(base
+ 0xc83) & 0xff);
973 if ( idm
== 0x0e8e ) {
974 if ( idp
== 0x0281 || idp
== 0x0218 ) {
976 } else if ( idp
== 0x0282 || idp
== 0x0283 ) {
977 ismine
= 3; /* Can do edge-trigger */
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
);
1008 printk(KERN_DEBUG
", Interrupt %d %s\n",
1009 setup_irq
, (ismine
& 2) ? "(edge)" : "(level)");
1011 printk(KERN_DEBUG
", (polled)\n");
1014 return setup_address
;
1017 /******************************************************************************/
1018 /* Function: set_irq() */
1019 /* Parameters: index to board in board table */
1021 /* Returns: Success (0) */
1024 /******************************************************************************/
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 */
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);
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
);
1097 iiEnableMailIrq(pB
);
1098 iiSendPendingMail(pB
);
1101 /******************************************************************************/
1102 /* Interrupt Handler Section */
1103 /******************************************************************************/
1106 service_all_boards(void)
1111 /* Service every board on the list */
1112 for( i
= 0; i
< IP2_MAX_BOARDS
; ++i
) {
1113 pB
= i2BoardPtrTable
[i
];
1115 i2ServiceBoard( pB
);
1121 /******************************************************************************/
1122 /* Function: ip2_interrupt_bh(work) */
1123 /* Parameters: work - pointer to the board structure */
1124 /* Returns: Nothing */
1127 /* Service the board in a bottom half interrupt handler and then */
1128 /* reenable the board's interrupts if it has an IRQ number */
1130 /******************************************************************************/
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.
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 */
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. */
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). */
1168 /******************************************************************************/
1170 ip2_irq_work(i2eBordStrPtr pB
)
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.
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 */
1195 ip2_polled_interrupt(void)
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
) ) {
1217 ip2trace (ITRC_NO_PORT
, ITRC_INTR
, ITRC_RETURN
, 0 );
1221 ip2_interrupt(int irq
, void *dev_id
)
1223 i2eBordStrPtr pB
= dev_id
;
1225 ip2trace (ITRC_NO_PORT
, ITRC_INTR
, 99, 1, pB
->i2eUsingIrq
);
1231 ip2trace (ITRC_NO_PORT
, ITRC_INTR
, ITRC_RETURN
, 0 );
1235 /******************************************************************************/
1236 /* Function: ip2_poll(unsigned long arg) */
1238 /* Returns: Nothing */
1241 /* This function calls the library routine i2ServiceBoard for each board in */
1242 /* the board table. This is used instead of the interrupt routine when polled */
1243 /* mode is specified. */
1244 /******************************************************************************/
1246 ip2_poll(unsigned long arg
)
1248 ip2trace (ITRC_NO_PORT
, ITRC_INTR
, 100, 0 );
1250 TimerOn
= 0; // it's the truth but not checked in service
1252 // Just polled boards, IRQ = 0 will hit all non-interrupt boards.
1253 // It will NOT poll boards handled by hard interrupts.
1254 // The issue of queued BH interrups is handled in ip2_interrupt().
1255 ip2_polled_interrupt();
1257 PollTimer
.expires
= POLL_TIMEOUT
;
1258 add_timer( &PollTimer
);
1261 ip2trace (ITRC_NO_PORT
, ITRC_INTR
, ITRC_RETURN
, 0 );
1264 static void do_input(struct work_struct
*work
)
1266 i2ChanStrPtr pCh
= container_of(work
, i2ChanStr
, tqueue_input
);
1267 unsigned long flags
;
1269 ip2trace(CHANN
, ITRC_INPUT
, 21, 0 );
1272 if ( pCh
->pTTY
!= NULL
) {
1273 READ_LOCK_IRQSAVE(&pCh
->Ibuf_spinlock
,flags
)
1274 if (!pCh
->throttled
&& (pCh
->Ibuf_stuff
!= pCh
->Ibuf_strip
)) {
1275 READ_UNLOCK_IRQRESTORE(&pCh
->Ibuf_spinlock
,flags
)
1278 READ_UNLOCK_IRQRESTORE(&pCh
->Ibuf_spinlock
,flags
)
1280 ip2trace(CHANN
, ITRC_INPUT
, 22, 0 );
1282 i2InputFlush( pCh
);
1286 // code duplicated from n_tty (ldisc)
1287 static inline void isig(int sig
, struct tty_struct
*tty
, int flush
)
1290 kill_pgrp(tty
->pgrp
, sig
, 1);
1291 if (flush
|| !L_NOFLSH(tty
)) {
1292 if ( tty
->ldisc
.flush_buffer
)
1293 tty
->ldisc
.flush_buffer(tty
);
1294 i2InputFlush( tty
->driver_data
);
1298 static void do_status(struct work_struct
*work
)
1300 i2ChanStrPtr pCh
= container_of(work
, i2ChanStr
, tqueue_status
);
1303 status
= i2GetStatus( pCh
, (I2_BRK
|I2_PAR
|I2_FRA
|I2_OVR
) );
1305 ip2trace (CHANN
, ITRC_STATUS
, 21, 1, status
);
1307 if (pCh
->pTTY
&& (status
& (I2_BRK
|I2_PAR
|I2_FRA
|I2_OVR
)) ) {
1308 if ( (status
& I2_BRK
) ) {
1309 // code duplicated from n_tty (ldisc)
1310 if (I_IGNBRK(pCh
->pTTY
))
1312 if (I_BRKINT(pCh
->pTTY
)) {
1313 isig(SIGINT
, pCh
->pTTY
, 1);
1316 wake_up_interruptible(&pCh
->pTTY
->read_wait
);
1318 #ifdef NEVER_HAPPENS_AS_SETUP_XXX
1319 // and can't work because we don't know the_char
1320 // as the_char is reported on a separate path
1321 // The intelligent board does this stuff as setup
1323 char brkf
= TTY_NORMAL
;
1324 unsigned char brkc
= '\0';
1326 if ( (status
& I2_BRK
) ) {
1330 else if (status
& I2_PAR
) {
1333 } else if (status
& I2_FRA
) {
1336 } else if (status
& I2_OVR
) {
1340 tmp
= pCh
->pTTY
->real_raw
;
1341 pCh
->pTTY
->real_raw
= 0;
1342 pCh
->pTTY
->ldisc
.receive_buf( pCh
->pTTY
, &brkc
, &brkf
, 1 );
1343 pCh
->pTTY
->real_raw
= tmp
;
1345 #endif /* NEVER_HAPPENS_AS_SETUP_XXX */
1349 if ( status
& (I2_DDCD
| I2_DDSR
| I2_DCTS
| I2_DRI
) ) {
1350 wake_up_interruptible(&pCh
->delta_msr_wait
);
1352 if ( (pCh
->flags
& ASYNC_CHECK_CD
) && (status
& I2_DDCD
) ) {
1353 if ( status
& I2_DCD
) {
1355 wake_up_interruptible ( &pCh
->open_wait
);
1358 if (pCh
->pTTY
&& (!(pCh
->pTTY
->termios
->c_cflag
& CLOCAL
)) ) {
1359 tty_hangup( pCh
->pTTY
);
1365 ip2trace (CHANN
, ITRC_STATUS
, 26, 0 );
1368 /******************************************************************************/
1369 /* Device Open/Close/Ioctl Entry Point Section */
1370 /******************************************************************************/
1372 /******************************************************************************/
1373 /* Function: open_sanity_check() */
1374 /* Parameters: Pointer to tty structure */
1375 /* Pointer to file structure */
1376 /* Returns: Success or failure */
1379 /* Verifies the structure magic numbers and cross links. */
1380 /******************************************************************************/
1381 #ifdef IP2DEBUG_OPEN
1383 open_sanity_check( i2ChanStrPtr pCh
, i2eBordStrPtr pBrd
)
1385 if ( pBrd
->i2eValid
!= I2E_MAGIC
) {
1386 printk(KERN_ERR
"IP2: invalid board structure\n" );
1387 } else if ( pBrd
!= pCh
->pMyBord
) {
1388 printk(KERN_ERR
"IP2: board structure pointer mismatch (%p)\n",
1390 } else if ( pBrd
->i2eChannelCnt
< pCh
->port_index
) {
1391 printk(KERN_ERR
"IP2: bad device index (%d)\n", pCh
->port_index
);
1392 } else if (&((i2ChanStrPtr
)pBrd
->i2eChannelPtr
)[pCh
->port_index
] != pCh
) {
1394 printk(KERN_INFO
"IP2: all pointers check out!\n" );
1400 /******************************************************************************/
1401 /* Function: ip2_open() */
1402 /* Parameters: Pointer to tty structure */
1403 /* Pointer to file structure */
1404 /* Returns: Success or failure */
1406 /* Description: (MANDATORY) */
1407 /* A successful device open has to run a gauntlet of checks before it */
1408 /* completes. After some sanity checking and pointer setup, the function */
1409 /* blocks until all conditions are satisfied. It then initialises the port to */
1410 /* the default characteristics and returns. */
1411 /******************************************************************************/
1413 ip2_open( PTTY tty
, struct file
*pFile
)
1418 i2ChanStrPtr pCh
= DevTable
[tty
->index
];
1420 ip2trace (tty
->index
, ITRC_OPEN
, ITRC_ENTER
, 0 );
1422 if ( pCh
== NULL
) {
1425 /* Setup pointer links in device and tty structures */
1427 tty
->driver_data
= pCh
;
1429 #ifdef IP2DEBUG_OPEN
1431 "IP2:open(tty=%p,pFile=%p):dev=%s,ch=%d,idx=%d\n",
1432 tty
, pFile
, tty
->name
, pCh
->infl
.hd
.i2sChannel
, pCh
->port_index
);
1433 open_sanity_check ( pCh
, pCh
->pMyBord
);
1436 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 3, CMD_DTRUP
,CMD_RTSUP
,CMD_DCD_REP
);
1437 pCh
->dataSetOut
|= (I2_DTR
| I2_RTS
);
1438 serviceOutgoingFifo( pCh
->pMyBord
);
1440 /* Block here until the port is ready (per serial and istallion) */
1442 * 1. If the port is in the middle of closing wait for the completion
1443 * and then return the appropriate error.
1445 init_waitqueue_entry(&wait
, current
);
1446 add_wait_queue(&pCh
->close_wait
, &wait
);
1447 set_current_state( TASK_INTERRUPTIBLE
);
1449 if ( tty_hung_up_p(pFile
) || ( pCh
->flags
& ASYNC_CLOSING
)) {
1450 if ( pCh
->flags
& ASYNC_CLOSING
) {
1453 if ( tty_hung_up_p(pFile
) ) {
1454 set_current_state( TASK_RUNNING
);
1455 remove_wait_queue(&pCh
->close_wait
, &wait
);
1456 return( pCh
->flags
& ASYNC_HUP_NOTIFY
) ? -EAGAIN
: -ERESTARTSYS
;
1459 set_current_state( TASK_RUNNING
);
1460 remove_wait_queue(&pCh
->close_wait
, &wait
);
1463 * 3. Handle a non-blocking open of a normal port.
1465 if ( (pFile
->f_flags
& O_NONBLOCK
) || (tty
->flags
& (1<<TTY_IO_ERROR
) )) {
1466 pCh
->flags
|= ASYNC_NORMAL_ACTIVE
;
1470 * 4. Now loop waiting for the port to be free and carrier present
1473 if ( tty
->termios
->c_cflag
& CLOCAL
)
1476 #ifdef IP2DEBUG_OPEN
1477 printk(KERN_DEBUG
"OpenBlock: do_clocal = %d\n", do_clocal
);
1482 init_waitqueue_entry(&wait
, current
);
1483 add_wait_queue(&pCh
->open_wait
, &wait
);
1486 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 2, CMD_DTRUP
, CMD_RTSUP
);
1487 pCh
->dataSetOut
|= (I2_DTR
| I2_RTS
);
1488 set_current_state( TASK_INTERRUPTIBLE
);
1489 serviceOutgoingFifo( pCh
->pMyBord
);
1490 if ( tty_hung_up_p(pFile
) ) {
1491 set_current_state( TASK_RUNNING
);
1492 remove_wait_queue(&pCh
->open_wait
, &wait
);
1493 return ( pCh
->flags
& ASYNC_HUP_NOTIFY
) ? -EBUSY
: -ERESTARTSYS
;
1495 if (!(pCh
->flags
& ASYNC_CLOSING
) &&
1496 (do_clocal
|| (pCh
->dataSetIn
& I2_DCD
) )) {
1501 #ifdef IP2DEBUG_OPEN
1502 printk(KERN_DEBUG
"ASYNC_CLOSING = %s\n",
1503 (pCh
->flags
& ASYNC_CLOSING
)?"True":"False");
1504 printk(KERN_DEBUG
"OpenBlock: waiting for CD or signal\n");
1506 ip2trace (CHANN
, ITRC_OPEN
, 3, 2, 0,
1507 (pCh
->flags
& ASYNC_CLOSING
) );
1508 /* check for signal */
1509 if (signal_pending(current
)) {
1510 rc
= (( pCh
->flags
& ASYNC_HUP_NOTIFY
) ? -EAGAIN
: -ERESTARTSYS
);
1515 set_current_state( TASK_RUNNING
);
1516 remove_wait_queue(&pCh
->open_wait
, &wait
);
1518 --pCh
->wopen
; //why count?
1520 ip2trace (CHANN
, ITRC_OPEN
, 4, 0 );
1525 pCh
->flags
|= ASYNC_NORMAL_ACTIVE
;
1529 /* first open - Assign termios structure to port */
1530 if ( tty
->count
== 1 ) {
1531 i2QueueCommands(PTYPE_INLINE
, pCh
, 0, 2, CMD_CTSFL_DSAB
, CMD_RTSFL_DSAB
);
1532 /* Now we must send the termios settings to the loadware */
1533 set_params( pCh
, NULL
);
1537 * Now set any i2lib options. These may go away if the i2lib code ends
1538 * up rolled into the mainline.
1540 pCh
->channelOptions
|= CO_NBLOCK_WRITE
;
1542 #ifdef IP2DEBUG_OPEN
1543 printk (KERN_DEBUG
"IP2: open completed\n" );
1545 serviceOutgoingFifo( pCh
->pMyBord
);
1547 ip2trace (CHANN
, ITRC_OPEN
, ITRC_RETURN
, 0 );
1552 /******************************************************************************/
1553 /* Function: ip2_close() */
1554 /* Parameters: Pointer to tty structure */
1555 /* Pointer to file structure */
1556 /* Returns: Nothing */
1561 /******************************************************************************/
1563 ip2_close( PTTY tty
, struct file
*pFile
)
1565 i2ChanStrPtr pCh
= tty
->driver_data
;
1571 ip2trace (CHANN
, ITRC_CLOSE
, ITRC_ENTER
, 0 );
1573 #ifdef IP2DEBUG_OPEN
1574 printk(KERN_DEBUG
"IP2:close %s:\n",tty
->name
);
1577 if ( tty_hung_up_p ( pFile
) ) {
1579 ip2trace (CHANN
, ITRC_CLOSE
, 2, 1, 2 );
1583 if ( tty
->count
> 1 ) { /* not the last close */
1585 ip2trace (CHANN
, ITRC_CLOSE
, 2, 1, 3 );
1589 pCh
->flags
|= ASYNC_CLOSING
; // last close actually
1593 if (pCh
->ClosingWaitTime
!= ASYNC_CLOSING_WAIT_NONE
) {
1595 * Before we drop DTR, make sure the transmitter has completely drained.
1596 * This uses an timeout, after which the close
1599 ip2_wait_until_sent(tty
, pCh
->ClosingWaitTime
);
1602 * At this point we stop accepting input. Here we flush the channel
1603 * input buffer which will allow the board to send up more data. Any
1604 * additional input is tossed at interrupt/poll time.
1606 i2InputFlush( pCh
);
1608 /* disable DSS reporting */
1609 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 4,
1610 CMD_DCD_NREP
, CMD_CTS_NREP
, CMD_DSR_NREP
, CMD_RI_NREP
);
1611 if ( !tty
|| (tty
->termios
->c_cflag
& HUPCL
) ) {
1612 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 2, CMD_RTSDN
, CMD_DTRDN
);
1613 pCh
->dataSetOut
&= ~(I2_DTR
| I2_RTS
);
1614 i2QueueCommands( PTYPE_INLINE
, pCh
, 100, 1, CMD_PAUSE(25));
1617 serviceOutgoingFifo ( pCh
->pMyBord
);
1619 if ( tty
->driver
->flush_buffer
)
1620 tty
->driver
->flush_buffer(tty
);
1621 if ( tty
->ldisc
.flush_buffer
)
1622 tty
->ldisc
.flush_buffer(tty
);
1628 if (pCh
->ClosingDelay
) {
1629 msleep_interruptible(jiffies_to_msecs(pCh
->ClosingDelay
));
1631 wake_up_interruptible(&pCh
->open_wait
);
1634 pCh
->flags
&=~(ASYNC_NORMAL_ACTIVE
|ASYNC_CLOSING
);
1635 wake_up_interruptible(&pCh
->close_wait
);
1637 #ifdef IP2DEBUG_OPEN
1638 DBG_CNT("ip2_close: after wakeups--");
1642 ip2trace (CHANN
, ITRC_CLOSE
, ITRC_RETURN
, 1, 1 );
1647 /******************************************************************************/
1648 /* Function: ip2_hangup() */
1649 /* Parameters: Pointer to tty structure */
1650 /* Returns: Nothing */
1655 /******************************************************************************/
1657 ip2_hangup ( PTTY tty
)
1659 i2ChanStrPtr pCh
= tty
->driver_data
;
1665 ip2trace (CHANN
, ITRC_HANGUP
, ITRC_ENTER
, 0 );
1667 ip2_flush_buffer(tty
);
1669 /* disable DSS reporting */
1671 i2QueueCommands(PTYPE_BYPASS
, pCh
, 0, 1, CMD_DCD_NREP
);
1672 i2QueueCommands(PTYPE_INLINE
, pCh
, 0, 2, CMD_CTSFL_DSAB
, CMD_RTSFL_DSAB
);
1673 if ( (tty
->termios
->c_cflag
& HUPCL
) ) {
1674 i2QueueCommands(PTYPE_BYPASS
, pCh
, 0, 2, CMD_RTSDN
, CMD_DTRDN
);
1675 pCh
->dataSetOut
&= ~(I2_DTR
| I2_RTS
);
1676 i2QueueCommands( PTYPE_INLINE
, pCh
, 100, 1, CMD_PAUSE(25));
1678 i2QueueCommands(PTYPE_INLINE
, pCh
, 1, 3,
1679 CMD_CTS_NREP
, CMD_DSR_NREP
, CMD_RI_NREP
);
1680 serviceOutgoingFifo ( pCh
->pMyBord
);
1682 wake_up_interruptible ( &pCh
->delta_msr_wait
);
1684 pCh
->flags
&= ~ASYNC_NORMAL_ACTIVE
;
1686 wake_up_interruptible ( &pCh
->open_wait
);
1688 ip2trace (CHANN
, ITRC_HANGUP
, ITRC_RETURN
, 0 );
1691 /******************************************************************************/
1692 /******************************************************************************/
1693 /* Device Output Section */
1694 /******************************************************************************/
1695 /******************************************************************************/
1697 /******************************************************************************/
1698 /* Function: ip2_write() */
1699 /* Parameters: Pointer to tty structure */
1700 /* Flag denoting data is in user (1) or kernel (0) space */
1701 /* Pointer to data */
1702 /* Number of bytes to write */
1703 /* Returns: Number of bytes actually written */
1705 /* Description: (MANDATORY) */
1708 /******************************************************************************/
1710 ip2_write( PTTY tty
, const unsigned char *pData
, int count
)
1712 i2ChanStrPtr pCh
= tty
->driver_data
;
1714 unsigned long flags
;
1716 ip2trace (CHANN
, ITRC_WRITE
, ITRC_ENTER
, 2, count
, -1 );
1718 /* Flush out any buffered data left over from ip2_putchar() calls. */
1719 ip2_flush_chars( tty
);
1721 /* This is the actual move bit. Make sure it does what we need!!!!! */
1722 WRITE_LOCK_IRQSAVE(&pCh
->Pbuf_spinlock
,flags
);
1723 bytesSent
= i2Output( pCh
, pData
, count
);
1724 WRITE_UNLOCK_IRQRESTORE(&pCh
->Pbuf_spinlock
,flags
);
1726 ip2trace (CHANN
, ITRC_WRITE
, ITRC_RETURN
, 1, bytesSent
);
1728 return bytesSent
> 0 ? bytesSent
: 0;
1731 /******************************************************************************/
1732 /* Function: ip2_putchar() */
1733 /* Parameters: Pointer to tty structure */
1734 /* Character to write */
1735 /* Returns: Nothing */
1740 /******************************************************************************/
1742 ip2_putchar( PTTY tty
, unsigned char ch
)
1744 i2ChanStrPtr pCh
= tty
->driver_data
;
1745 unsigned long flags
;
1747 // ip2trace (CHANN, ITRC_PUTC, ITRC_ENTER, 1, ch );
1749 WRITE_LOCK_IRQSAVE(&pCh
->Pbuf_spinlock
,flags
);
1750 pCh
->Pbuf
[pCh
->Pbuf_stuff
++] = ch
;
1751 if ( pCh
->Pbuf_stuff
== sizeof pCh
->Pbuf
) {
1752 WRITE_UNLOCK_IRQRESTORE(&pCh
->Pbuf_spinlock
,flags
);
1753 ip2_flush_chars( tty
);
1755 WRITE_UNLOCK_IRQRESTORE(&pCh
->Pbuf_spinlock
,flags
);
1757 // ip2trace (CHANN, ITRC_PUTC, ITRC_RETURN, 1, ch );
1760 /******************************************************************************/
1761 /* Function: ip2_flush_chars() */
1762 /* Parameters: Pointer to tty structure */
1763 /* Returns: Nothing */
1767 /******************************************************************************/
1769 ip2_flush_chars( PTTY tty
)
1772 i2ChanStrPtr pCh
= tty
->driver_data
;
1773 unsigned long flags
;
1775 WRITE_LOCK_IRQSAVE(&pCh
->Pbuf_spinlock
,flags
);
1776 if ( pCh
->Pbuf_stuff
) {
1778 // ip2trace (CHANN, ITRC_PUTC, 10, 1, strip );
1781 // We may need to restart i2Output if it does not fullfill this request
1783 strip
= i2Output( pCh
, pCh
->Pbuf
, pCh
->Pbuf_stuff
);
1784 if ( strip
!= pCh
->Pbuf_stuff
) {
1785 memmove( pCh
->Pbuf
, &pCh
->Pbuf
[strip
], pCh
->Pbuf_stuff
- strip
);
1787 pCh
->Pbuf_stuff
-= strip
;
1789 WRITE_UNLOCK_IRQRESTORE(&pCh
->Pbuf_spinlock
,flags
);
1792 /******************************************************************************/
1793 /* Function: ip2_write_room() */
1794 /* Parameters: Pointer to tty structure */
1795 /* Returns: Number of bytes that the driver can accept */
1799 /******************************************************************************/
1801 ip2_write_room ( PTTY tty
)
1804 i2ChanStrPtr pCh
= tty
->driver_data
;
1805 unsigned long flags
;
1807 READ_LOCK_IRQSAVE(&pCh
->Pbuf_spinlock
,flags
);
1808 bytesFree
= i2OutputFree( pCh
) - pCh
->Pbuf_stuff
;
1809 READ_UNLOCK_IRQRESTORE(&pCh
->Pbuf_spinlock
,flags
);
1811 ip2trace (CHANN
, ITRC_WRITE
, 11, 1, bytesFree
);
1813 return ((bytesFree
> 0) ? bytesFree
: 0);
1816 /******************************************************************************/
1817 /* Function: ip2_chars_in_buf() */
1818 /* Parameters: Pointer to tty structure */
1819 /* Returns: Number of bytes queued for transmission */
1824 /******************************************************************************/
1826 ip2_chars_in_buf ( PTTY tty
)
1828 i2ChanStrPtr pCh
= tty
->driver_data
;
1830 unsigned long flags
;
1832 ip2trace (CHANN
, ITRC_WRITE
, 12, 1, pCh
->Obuf_char_count
+ pCh
->Pbuf_stuff
);
1834 #ifdef IP2DEBUG_WRITE
1835 printk (KERN_DEBUG
"IP2: chars in buffer = %d (%d,%d)\n",
1836 pCh
->Obuf_char_count
+ pCh
->Pbuf_stuff
,
1837 pCh
->Obuf_char_count
, pCh
->Pbuf_stuff
);
1839 READ_LOCK_IRQSAVE(&pCh
->Obuf_spinlock
,flags
);
1840 rc
= pCh
->Obuf_char_count
;
1841 READ_UNLOCK_IRQRESTORE(&pCh
->Obuf_spinlock
,flags
);
1842 READ_LOCK_IRQSAVE(&pCh
->Pbuf_spinlock
,flags
);
1843 rc
+= pCh
->Pbuf_stuff
;
1844 READ_UNLOCK_IRQRESTORE(&pCh
->Pbuf_spinlock
,flags
);
1848 /******************************************************************************/
1849 /* Function: ip2_flush_buffer() */
1850 /* Parameters: Pointer to tty structure */
1851 /* Returns: Nothing */
1856 /******************************************************************************/
1858 ip2_flush_buffer( PTTY tty
)
1860 i2ChanStrPtr pCh
= tty
->driver_data
;
1861 unsigned long flags
;
1863 ip2trace (CHANN
, ITRC_FLUSH
, ITRC_ENTER
, 0 );
1865 #ifdef IP2DEBUG_WRITE
1866 printk (KERN_DEBUG
"IP2: flush buffer\n" );
1868 WRITE_LOCK_IRQSAVE(&pCh
->Pbuf_spinlock
,flags
);
1869 pCh
->Pbuf_stuff
= 0;
1870 WRITE_UNLOCK_IRQRESTORE(&pCh
->Pbuf_spinlock
,flags
);
1871 i2FlushOutput( pCh
);
1874 ip2trace (CHANN
, ITRC_FLUSH
, ITRC_RETURN
, 0 );
1878 /******************************************************************************/
1879 /* Function: ip2_wait_until_sent() */
1880 /* Parameters: Pointer to tty structure */
1881 /* Timeout for wait. */
1882 /* Returns: Nothing */
1885 /* This function is used in place of the normal tty_wait_until_sent, which */
1886 /* only waits for the driver buffers to be empty (or rather, those buffers */
1887 /* reported by chars_in_buffer) which doesn't work for IP2 due to the */
1888 /* indeterminate number of bytes buffered on the board. */
1889 /******************************************************************************/
1891 ip2_wait_until_sent ( PTTY tty
, int timeout
)
1894 i2ChanStrPtr pCh
= tty
->driver_data
;
1896 tty_wait_until_sent(tty
, timeout
);
1897 if ( (i
= timeout
- (jiffies
-i
)) > 0)
1898 i2DrainOutput( pCh
, i
);
1901 /******************************************************************************/
1902 /******************************************************************************/
1903 /* Device Input Section */
1904 /******************************************************************************/
1905 /******************************************************************************/
1907 /******************************************************************************/
1908 /* Function: ip2_throttle() */
1909 /* Parameters: Pointer to tty structure */
1910 /* Returns: Nothing */
1915 /******************************************************************************/
1917 ip2_throttle ( PTTY tty
)
1919 i2ChanStrPtr pCh
= tty
->driver_data
;
1921 #ifdef IP2DEBUG_READ
1922 printk (KERN_DEBUG
"IP2: throttle\n" );
1925 * Signal the poll/interrupt handlers not to forward incoming data to
1926 * the line discipline. This will cause the buffers to fill up in the
1927 * library and thus cause the library routines to send the flow control
1933 /******************************************************************************/
1934 /* Function: ip2_unthrottle() */
1935 /* Parameters: Pointer to tty structure */
1936 /* Returns: Nothing */
1941 /******************************************************************************/
1943 ip2_unthrottle ( PTTY tty
)
1945 i2ChanStrPtr pCh
= tty
->driver_data
;
1946 unsigned long flags
;
1948 #ifdef IP2DEBUG_READ
1949 printk (KERN_DEBUG
"IP2: unthrottle\n" );
1952 /* Pass incoming data up to the line discipline again. */
1954 i2QueueCommands(PTYPE_BYPASS
, pCh
, 0, 1, CMD_RESUME
);
1955 serviceOutgoingFifo( pCh
->pMyBord
);
1956 READ_LOCK_IRQSAVE(&pCh
->Ibuf_spinlock
,flags
)
1957 if ( pCh
->Ibuf_stuff
!= pCh
->Ibuf_strip
) {
1958 READ_UNLOCK_IRQRESTORE(&pCh
->Ibuf_spinlock
,flags
)
1959 #ifdef IP2DEBUG_READ
1960 printk (KERN_DEBUG
"i2Input called from unthrottle\n" );
1964 READ_UNLOCK_IRQRESTORE(&pCh
->Ibuf_spinlock
,flags
)
1968 ip2_start ( PTTY tty
)
1970 i2ChanStrPtr pCh
= DevTable
[tty
->index
];
1972 i2QueueCommands(PTYPE_BYPASS
, pCh
, 0, 1, CMD_RESUME
);
1973 i2QueueCommands(PTYPE_BYPASS
, pCh
, 100, 1, CMD_UNSUSPEND
);
1974 i2QueueCommands(PTYPE_BYPASS
, pCh
, 100, 1, CMD_RESUME
);
1975 #ifdef IP2DEBUG_WRITE
1976 printk (KERN_DEBUG
"IP2: start tx\n" );
1981 ip2_stop ( PTTY tty
)
1983 i2ChanStrPtr pCh
= DevTable
[tty
->index
];
1985 i2QueueCommands(PTYPE_BYPASS
, pCh
, 100, 1, CMD_SUSPEND
);
1986 #ifdef IP2DEBUG_WRITE
1987 printk (KERN_DEBUG
"IP2: stop tx\n" );
1991 /******************************************************************************/
1992 /* Device Ioctl Section */
1993 /******************************************************************************/
1995 static int ip2_tiocmget(struct tty_struct
*tty
, struct file
*file
)
1997 i2ChanStrPtr pCh
= DevTable
[tty
->index
];
1998 #ifdef ENABLE_DSSNOW
2006 FIXME - the following code is causing a NULL pointer dereference in
2007 2.3.51 in an interrupt handler. It's suppose to prompt the board
2008 to return the DSS signal status immediately. Why doesn't it do
2009 the same thing in 2.2.14?
2012 /* This thing is still busted in the 1.2.12 driver on 2.4.x
2013 and even hoses the serial console so the oops can be trapped.
2016 #ifdef ENABLE_DSSNOW
2017 i2QueueCommands(PTYPE_BYPASS
, pCh
, 100, 1, CMD_DSS_NOW
);
2019 init_waitqueue_entry(&wait
, current
);
2020 add_wait_queue(&pCh
->dss_now_wait
, &wait
);
2021 set_current_state( TASK_INTERRUPTIBLE
);
2023 serviceOutgoingFifo( pCh
->pMyBord
);
2027 set_current_state( TASK_RUNNING
);
2028 remove_wait_queue(&pCh
->dss_now_wait
, &wait
);
2030 if (signal_pending(current
)) {
2034 return ((pCh
->dataSetOut
& I2_RTS
) ? TIOCM_RTS
: 0)
2035 | ((pCh
->dataSetOut
& I2_DTR
) ? TIOCM_DTR
: 0)
2036 | ((pCh
->dataSetIn
& I2_DCD
) ? TIOCM_CAR
: 0)
2037 | ((pCh
->dataSetIn
& I2_RI
) ? TIOCM_RNG
: 0)
2038 | ((pCh
->dataSetIn
& I2_DSR
) ? TIOCM_DSR
: 0)
2039 | ((pCh
->dataSetIn
& I2_CTS
) ? TIOCM_CTS
: 0);
2042 static int ip2_tiocmset(struct tty_struct
*tty
, struct file
*file
,
2043 unsigned int set
, unsigned int clear
)
2045 i2ChanStrPtr pCh
= DevTable
[tty
->index
];
2050 if (set
& TIOCM_RTS
) {
2051 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_RTSUP
);
2052 pCh
->dataSetOut
|= I2_RTS
;
2054 if (set
& TIOCM_DTR
) {
2055 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_DTRUP
);
2056 pCh
->dataSetOut
|= I2_DTR
;
2059 if (clear
& TIOCM_RTS
) {
2060 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_RTSDN
);
2061 pCh
->dataSetOut
&= ~I2_RTS
;
2063 if (clear
& TIOCM_DTR
) {
2064 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_DTRDN
);
2065 pCh
->dataSetOut
&= ~I2_DTR
;
2067 serviceOutgoingFifo( pCh
->pMyBord
);
2071 /******************************************************************************/
2072 /* Function: ip2_ioctl() */
2073 /* Parameters: Pointer to tty structure */
2074 /* Pointer to file structure */
2077 /* Returns: Success or failure */
2082 /******************************************************************************/
2084 ip2_ioctl ( PTTY tty
, struct file
*pFile
, UINT cmd
, ULONG arg
)
2087 i2ChanStrPtr pCh
= DevTable
[tty
->index
];
2089 struct async_icount cprev
, cnow
; /* kernel counter temps */
2090 struct serial_icounter_struct __user
*p_cuser
;
2092 unsigned long flags
;
2093 void __user
*argp
= (void __user
*)arg
;
2100 ip2trace (CHANN
, ITRC_IOCTL
, ITRC_ENTER
, 2, cmd
, arg
);
2102 #ifdef IP2DEBUG_IOCTL
2103 printk(KERN_DEBUG
"IP2: ioctl cmd (%x), arg (%lx)\n", cmd
, arg
);
2109 ip2trace (CHANN
, ITRC_IOCTL
, 2, 1, rc
);
2111 rc
= get_serial_info(pCh
, argp
);
2118 ip2trace (CHANN
, ITRC_IOCTL
, 3, 1, rc
);
2120 rc
= set_serial_info(pCh
, argp
);
2126 rc
= tty_check_change(tty
);
2131 //return -ENOIOCTLCMD;
2134 //return -ENOIOCTLCMD;
2137 if (STOP_CHAR(tty
) != __DISABLED_CHAR
) {
2138 i2QueueCommands( PTYPE_BYPASS
, pCh
, 100, 1,
2139 CMD_XMIT_NOW(STOP_CHAR(tty
)));
2143 if (START_CHAR(tty
) != __DISABLED_CHAR
) {
2144 i2QueueCommands( PTYPE_BYPASS
, pCh
, 100, 1,
2145 CMD_XMIT_NOW(START_CHAR(tty
)));
2153 case TCSBRK
: /* SVID version: non-zero arg --> no break */
2154 rc
= tty_check_change(tty
);
2156 ip2trace (CHANN
, ITRC_IOCTL
, 4, 1, rc
);
2159 ip2_wait_until_sent(tty
,0);
2161 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_SEND_BRK(250));
2162 serviceOutgoingFifo( pCh
->pMyBord
);
2167 case TCSBRKP
: /* support for POSIX tcsendbreak() */
2168 rc
= tty_check_change(tty
);
2170 ip2trace (CHANN
, ITRC_IOCTL
, 5, 1, rc
);
2173 ip2_wait_until_sent(tty
,0);
2174 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1,
2175 CMD_SEND_BRK(arg
? arg
*100 : 250));
2176 serviceOutgoingFifo ( pCh
->pMyBord
);
2182 ip2trace (CHANN
, ITRC_IOCTL
, 6, 1, rc
);
2184 rc
= put_user(C_CLOCAL(tty
) ? 1 : 0, (unsigned long __user
*)argp
);
2191 ip2trace (CHANN
, ITRC_IOCTL
, 7, 1, rc
);
2193 rc
= get_user(arg
,(unsigned long __user
*) argp
);
2196 tty
->termios
->c_cflag
= ((tty
->termios
->c_cflag
& ~CLOCAL
)
2197 | (arg
? CLOCAL
: 0));
2202 * Wait for any of the 4 modem inputs (DCD,RI,DSR,CTS) to change - mask
2203 * passed in arg for lines of interest (use |'ed TIOCM_RNG/DSR/CD/CTS
2204 * for masking). Caller should use TIOCGICOUNT to see which one it was
2207 WRITE_LOCK_IRQSAVE(&pB
->read_fifo_spinlock
, flags
);
2208 cprev
= pCh
->icount
; /* note the counters on entry */
2209 WRITE_UNLOCK_IRQRESTORE(&pB
->read_fifo_spinlock
, flags
);
2210 i2QueueCommands(PTYPE_BYPASS
, pCh
, 100, 4,
2211 CMD_DCD_REP
, CMD_CTS_REP
, CMD_DSR_REP
, CMD_RI_REP
);
2212 init_waitqueue_entry(&wait
, current
);
2213 add_wait_queue(&pCh
->delta_msr_wait
, &wait
);
2214 set_current_state( TASK_INTERRUPTIBLE
);
2216 serviceOutgoingFifo( pCh
->pMyBord
);
2218 ip2trace (CHANN
, ITRC_IOCTL
, 10, 0 );
2222 ip2trace (CHANN
, ITRC_IOCTL
, 11, 0 );
2224 /* see if a signal did it */
2225 if (signal_pending(current
)) {
2229 WRITE_LOCK_IRQSAVE(&pB
->read_fifo_spinlock
, flags
);
2230 cnow
= pCh
->icount
; /* atomic copy */
2231 WRITE_UNLOCK_IRQRESTORE(&pB
->read_fifo_spinlock
, flags
);
2232 if (cnow
.rng
== cprev
.rng
&& cnow
.dsr
== cprev
.dsr
&&
2233 cnow
.dcd
== cprev
.dcd
&& cnow
.cts
== cprev
.cts
) {
2234 rc
= -EIO
; /* no change => rc */
2237 if (((arg
& TIOCM_RNG
) && (cnow
.rng
!= cprev
.rng
)) ||
2238 ((arg
& TIOCM_DSR
) && (cnow
.dsr
!= cprev
.dsr
)) ||
2239 ((arg
& TIOCM_CD
) && (cnow
.dcd
!= cprev
.dcd
)) ||
2240 ((arg
& TIOCM_CTS
) && (cnow
.cts
!= cprev
.cts
)) ) {
2246 set_current_state( TASK_RUNNING
);
2247 remove_wait_queue(&pCh
->delta_msr_wait
, &wait
);
2249 i2QueueCommands(PTYPE_BYPASS
, pCh
, 100, 3,
2250 CMD_CTS_NREP
, CMD_DSR_NREP
, CMD_RI_NREP
);
2251 if ( ! (pCh
->flags
& ASYNC_CHECK_CD
)) {
2252 i2QueueCommands(PTYPE_BYPASS
, pCh
, 100, 1, CMD_DCD_NREP
);
2254 serviceOutgoingFifo( pCh
->pMyBord
);
2259 * Get counter of input serial line interrupts (DCD,RI,DSR,CTS)
2260 * Return: write counters to the user passed counter struct
2261 * NB: both 1->0 and 0->1 transitions are counted except for RI where
2262 * only 0->1 is counted. The controller is quite capable of counting
2263 * both, but this done to preserve compatibility with the standard
2267 ip2trace (CHANN
, ITRC_IOCTL
, 11, 1, rc
);
2269 WRITE_LOCK_IRQSAVE(&pB
->read_fifo_spinlock
, flags
);
2271 WRITE_UNLOCK_IRQRESTORE(&pB
->read_fifo_spinlock
, flags
);
2273 rc
= put_user(cnow
.cts
, &p_cuser
->cts
);
2274 rc
= put_user(cnow
.dsr
, &p_cuser
->dsr
);
2275 rc
= put_user(cnow
.rng
, &p_cuser
->rng
);
2276 rc
= put_user(cnow
.dcd
, &p_cuser
->dcd
);
2277 rc
= put_user(cnow
.rx
, &p_cuser
->rx
);
2278 rc
= put_user(cnow
.tx
, &p_cuser
->tx
);
2279 rc
= put_user(cnow
.frame
, &p_cuser
->frame
);
2280 rc
= put_user(cnow
.overrun
, &p_cuser
->overrun
);
2281 rc
= put_user(cnow
.parity
, &p_cuser
->parity
);
2282 rc
= put_user(cnow
.brk
, &p_cuser
->brk
);
2283 rc
= put_user(cnow
.buf_overrun
, &p_cuser
->buf_overrun
);
2287 * The rest are not supported by this driver. By returning -ENOIOCTLCMD they
2288 * will be passed to the line discipline for it to handle.
2294 case TIOCSERGSTRUCT
:
2295 case TIOCSERGETMULTI
:
2296 case TIOCSERSETMULTI
:
2299 ip2trace (CHANN
, ITRC_IOCTL
, 12, 0 );
2305 ip2trace (CHANN
, ITRC_IOCTL
, ITRC_RETURN
, 0 );
2310 /******************************************************************************/
2311 /* Function: GetSerialInfo() */
2312 /* Parameters: Pointer to channel structure */
2313 /* Pointer to old termios structure */
2314 /* Returns: Nothing */
2317 /* This is to support the setserial command, and requires processing of the */
2318 /* standard Linux serial structure. */
2319 /******************************************************************************/
2321 get_serial_info ( i2ChanStrPtr pCh
, struct serial_struct __user
*retinfo
)
2323 struct serial_struct tmp
;
2325 memset ( &tmp
, 0, sizeof(tmp
) );
2326 tmp
.type
= pCh
->pMyBord
->channelBtypes
.bid_value
[(pCh
->port_index
& (IP2_PORTS_PER_BOARD
-1))/16];
2327 if (BID_HAS_654(tmp
.type
)) {
2328 tmp
.type
= PORT_16650
;
2330 tmp
.type
= PORT_CIRRUS
;
2332 tmp
.line
= pCh
->port_index
;
2333 tmp
.port
= pCh
->pMyBord
->i2eBase
;
2334 tmp
.irq
= ip2config
.irq
[pCh
->port_index
/64];
2335 tmp
.flags
= pCh
->flags
;
2336 tmp
.baud_base
= pCh
->BaudBase
;
2337 tmp
.close_delay
= pCh
->ClosingDelay
;
2338 tmp
.closing_wait
= pCh
->ClosingWaitTime
;
2339 tmp
.custom_divisor
= pCh
->BaudDivisor
;
2340 return copy_to_user(retinfo
,&tmp
,sizeof(*retinfo
));
2343 /******************************************************************************/
2344 /* Function: SetSerialInfo() */
2345 /* Parameters: Pointer to channel structure */
2346 /* Pointer to old termios structure */
2347 /* Returns: Nothing */
2350 /* This function provides support for setserial, which uses the TIOCSSERIAL */
2351 /* ioctl. Not all setserial parameters are relevant. If the user attempts to */
2352 /* change the IRQ, address or type of the port the ioctl fails. */
2353 /******************************************************************************/
2355 set_serial_info( i2ChanStrPtr pCh
, struct serial_struct __user
*new_info
)
2357 struct serial_struct ns
;
2358 int old_flags
, old_baud_divisor
;
2360 if (copy_from_user(&ns
, new_info
, sizeof (ns
)))
2364 * We don't allow setserial to change IRQ, board address, type or baud
2365 * base. Also line nunber as such is meaningless but we use it for our
2366 * array index so it is fixed also.
2368 if ( (ns
.irq
!= ip2config
.irq
[pCh
->port_index
])
2369 || ((int) ns
.port
!= ((int) (pCh
->pMyBord
->i2eBase
)))
2370 || (ns
.baud_base
!= pCh
->BaudBase
)
2371 || (ns
.line
!= pCh
->port_index
) ) {
2375 old_flags
= pCh
->flags
;
2376 old_baud_divisor
= pCh
->BaudDivisor
;
2378 if ( !capable(CAP_SYS_ADMIN
) ) {
2379 if ( ( ns
.close_delay
!= pCh
->ClosingDelay
) ||
2380 ( (ns
.flags
& ~ASYNC_USR_MASK
) !=
2381 (pCh
->flags
& ~ASYNC_USR_MASK
) ) ) {
2385 pCh
->flags
= (pCh
->flags
& ~ASYNC_USR_MASK
) |
2386 (ns
.flags
& ASYNC_USR_MASK
);
2387 pCh
->BaudDivisor
= ns
.custom_divisor
;
2389 pCh
->flags
= (pCh
->flags
& ~ASYNC_FLAGS
) |
2390 (ns
.flags
& ASYNC_FLAGS
);
2391 pCh
->BaudDivisor
= ns
.custom_divisor
;
2392 pCh
->ClosingDelay
= ns
.close_delay
* HZ
/100;
2393 pCh
->ClosingWaitTime
= ns
.closing_wait
* HZ
/100;
2396 if ( ( (old_flags
& ASYNC_SPD_MASK
) != (pCh
->flags
& ASYNC_SPD_MASK
) )
2397 || (old_baud_divisor
!= pCh
->BaudDivisor
) ) {
2398 // Invalidate speed and reset parameters
2399 set_params( pCh
, NULL
);
2405 /******************************************************************************/
2406 /* Function: ip2_set_termios() */
2407 /* Parameters: Pointer to tty structure */
2408 /* Pointer to old termios structure */
2409 /* Returns: Nothing */
2414 /******************************************************************************/
2416 ip2_set_termios( PTTY tty
, struct ktermios
*old_termios
)
2418 i2ChanStrPtr pCh
= (i2ChanStrPtr
)tty
->driver_data
;
2420 #ifdef IP2DEBUG_IOCTL
2421 printk (KERN_DEBUG
"IP2: set termios %p\n", old_termios
);
2424 set_params( pCh
, old_termios
);
2427 /******************************************************************************/
2428 /* Function: ip2_set_line_discipline() */
2429 /* Parameters: Pointer to tty structure */
2430 /* Returns: Nothing */
2432 /* Description: Does nothing */
2435 /******************************************************************************/
2437 ip2_set_line_discipline ( PTTY tty
)
2439 #ifdef IP2DEBUG_IOCTL
2440 printk (KERN_DEBUG
"IP2: set line discipline\n" );
2443 ip2trace (((i2ChanStrPtr
)tty
->driver_data
)->port_index
, ITRC_IOCTL
, 16, 0 );
2447 /******************************************************************************/
2448 /* Function: SetLine Characteristics() */
2449 /* Parameters: Pointer to channel structure */
2450 /* Returns: Nothing */
2453 /* This routine is called to update the channel structure with the new line */
2454 /* characteristics, and send the appropriate commands to the board when they */
2456 /******************************************************************************/
2458 set_params( i2ChanStrPtr pCh
, struct ktermios
*o_tios
)
2460 tcflag_t cflag
, iflag
, lflag
;
2461 char stop_char
, start_char
;
2462 struct ktermios dummy
;
2464 lflag
= pCh
->pTTY
->termios
->c_lflag
;
2465 cflag
= pCh
->pTTY
->termios
->c_cflag
;
2466 iflag
= pCh
->pTTY
->termios
->c_iflag
;
2468 if (o_tios
== NULL
) {
2469 dummy
.c_lflag
= ~lflag
;
2470 dummy
.c_cflag
= ~cflag
;
2471 dummy
.c_iflag
= ~iflag
;
2476 switch ( cflag
& CBAUD
) {
2478 i2QueueCommands( PTYPE_BYPASS
, pCh
, 100, 2, CMD_RTSDN
, CMD_DTRDN
);
2479 pCh
->dataSetOut
&= ~(I2_DTR
| I2_RTS
);
2480 i2QueueCommands( PTYPE_INLINE
, pCh
, 100, 1, CMD_PAUSE(25));
2481 pCh
->pTTY
->termios
->c_cflag
|= (CBAUD
& o_tios
->c_cflag
);
2486 * This is the speed that is overloaded with all the other high
2487 * speeds, depending upon the flag settings.
2489 if ( ( pCh
->flags
& ASYNC_SPD_MASK
) == ASYNC_SPD_HI
) {
2490 pCh
->speed
= CBR_57600
;
2491 } else if ( (pCh
->flags
& ASYNC_SPD_MASK
) == ASYNC_SPD_VHI
) {
2492 pCh
->speed
= CBR_115200
;
2493 } else if ( (pCh
->flags
& ASYNC_SPD_MASK
) == ASYNC_SPD_CUST
) {
2494 pCh
->speed
= CBR_C1
;
2496 pCh
->speed
= CBR_38400
;
2499 case B50
: pCh
->speed
= CBR_50
; break;
2500 case B75
: pCh
->speed
= CBR_75
; break;
2501 case B110
: pCh
->speed
= CBR_110
; break;
2502 case B134
: pCh
->speed
= CBR_134
; break;
2503 case B150
: pCh
->speed
= CBR_150
; break;
2504 case B200
: pCh
->speed
= CBR_200
; break;
2505 case B300
: pCh
->speed
= CBR_300
; break;
2506 case B600
: pCh
->speed
= CBR_600
; break;
2507 case B1200
: pCh
->speed
= CBR_1200
; break;
2508 case B1800
: pCh
->speed
= CBR_1800
; break;
2509 case B2400
: pCh
->speed
= CBR_2400
; break;
2510 case B4800
: pCh
->speed
= CBR_4800
; break;
2511 case B9600
: pCh
->speed
= CBR_9600
; break;
2512 case B19200
: pCh
->speed
= CBR_19200
; break;
2513 case B57600
: pCh
->speed
= CBR_57600
; break;
2514 case B115200
: pCh
->speed
= CBR_115200
; break;
2515 case B153600
: pCh
->speed
= CBR_153600
; break;
2516 case B230400
: pCh
->speed
= CBR_230400
; break;
2517 case B307200
: pCh
->speed
= CBR_307200
; break;
2518 case B460800
: pCh
->speed
= CBR_460800
; break;
2519 case B921600
: pCh
->speed
= CBR_921600
; break;
2520 default: pCh
->speed
= CBR_9600
; break;
2522 if ( pCh
->speed
== CBR_C1
) {
2523 // Process the custom speed parameters.
2524 int bps
= pCh
->BaudBase
/ pCh
->BaudDivisor
;
2525 if ( bps
== 921600 ) {
2526 pCh
->speed
= CBR_921600
;
2529 i2QueueCommands( PTYPE_INLINE
, pCh
, 100, 1, CMD_BAUD_DEF1(bps
) );
2532 i2QueueCommands( PTYPE_INLINE
, pCh
, 100, 1, CMD_SETBAUD(pCh
->speed
));
2534 i2QueueCommands ( PTYPE_INLINE
, pCh
, 100, 2, CMD_DTRUP
, CMD_RTSUP
);
2535 pCh
->dataSetOut
|= (I2_DTR
| I2_RTS
);
2537 if ( (CSTOPB
& cflag
) ^ (CSTOPB
& o_tios
->c_cflag
))
2539 i2QueueCommands ( PTYPE_INLINE
, pCh
, 100, 1,
2540 CMD_SETSTOP( ( cflag
& CSTOPB
) ? CST_2
: CST_1
));
2542 if (((PARENB
|PARODD
) & cflag
) ^ ((PARENB
|PARODD
) & o_tios
->c_cflag
))
2544 i2QueueCommands ( PTYPE_INLINE
, pCh
, 100, 1,
2546 (cflag
& PARENB
? (cflag
& PARODD
? CSP_OD
: CSP_EV
) : CSP_NP
)
2550 /* byte size and parity */
2551 if ( (CSIZE
& cflag
)^(CSIZE
& o_tios
->c_cflag
))
2554 switch ( cflag
& CSIZE
) {
2555 case CS5
: datasize
= CSZ_5
; break;
2556 case CS6
: datasize
= CSZ_6
; break;
2557 case CS7
: datasize
= CSZ_7
; break;
2558 case CS8
: datasize
= CSZ_8
; break;
2559 default: datasize
= CSZ_5
; break; /* as per serial.c */
2561 i2QueueCommands ( PTYPE_INLINE
, pCh
, 100, 1, CMD_SETBITS(datasize
) );
2563 /* Process CTS flow control flag setting */
2564 if ( (cflag
& CRTSCTS
) ) {
2565 i2QueueCommands(PTYPE_INLINE
, pCh
, 100,
2566 2, CMD_CTSFL_ENAB
, CMD_RTSFL_ENAB
);
2568 i2QueueCommands(PTYPE_INLINE
, pCh
, 100,
2569 2, CMD_CTSFL_DSAB
, CMD_RTSFL_DSAB
);
2572 // Process XON/XOFF flow control flags settings
2574 stop_char
= STOP_CHAR(pCh
->pTTY
);
2575 start_char
= START_CHAR(pCh
->pTTY
);
2577 //////////// can't be \000
2578 if (stop_char
== __DISABLED_CHAR
)
2580 stop_char
= ~__DISABLED_CHAR
;
2582 if (start_char
== __DISABLED_CHAR
)
2584 start_char
= ~__DISABLED_CHAR
;
2586 /////////////////////////////////
2588 if ( o_tios
->c_cc
[VSTART
] != start_char
)
2590 i2QueueCommands(PTYPE_BYPASS
, pCh
, 100, 1, CMD_DEF_IXON(start_char
));
2591 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_DEF_OXON(start_char
));
2593 if ( o_tios
->c_cc
[VSTOP
] != stop_char
)
2595 i2QueueCommands(PTYPE_BYPASS
, pCh
, 100, 1, CMD_DEF_IXOFF(stop_char
));
2596 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_DEF_OXOFF(stop_char
));
2598 if (stop_char
== __DISABLED_CHAR
)
2600 stop_char
= ~__DISABLED_CHAR
; //TEST123
2603 if ((iflag
& (IXOFF
))^(o_tios
->c_iflag
& (IXOFF
)))
2605 if ( iflag
& IXOFF
) { // Enable XOFF output flow control
2606 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_OXON_OPT(COX_XON
));
2607 } else { // Disable XOFF output flow control
2609 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_OXON_OPT(COX_NONE
));
2612 if (start_char
== __DISABLED_CHAR
)
2616 if ((iflag
& (IXON
|IXANY
)) ^ (o_tios
->c_iflag
& (IXON
|IXANY
)))
2618 if ( iflag
& IXON
) {
2619 if ( iflag
& IXANY
) { // Enable XON/XANY output flow control
2620 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_IXON_OPT(CIX_XANY
));
2621 } else { // Enable XON output flow control
2622 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_IXON_OPT(CIX_XON
));
2624 } else { // Disable XON output flow control
2626 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_IXON_OPT(CIX_NONE
));
2629 if ( (iflag
& ISTRIP
) ^ ( o_tios
->c_iflag
& (ISTRIP
)) )
2631 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1,
2632 CMD_ISTRIP_OPT((iflag
& ISTRIP
? 1 : 0)));
2634 if ( (iflag
& INPCK
) ^ ( o_tios
->c_iflag
& (INPCK
)) )
2636 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1,
2637 CMD_PARCHK((iflag
& INPCK
) ? CPK_ENAB
: CPK_DSAB
));
2640 if ( (iflag
& (IGNBRK
|PARMRK
|BRKINT
|IGNPAR
))
2641 ^ ( o_tios
->c_iflag
& (IGNBRK
|PARMRK
|BRKINT
|IGNPAR
)) )
2646 if ( iflag
& IGNBRK
) { /* Ignore breaks altogether */
2647 /* Ignore breaks altogether */
2648 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_BRK_NREP
);
2650 if ( iflag
& BRKINT
) {
2651 if ( iflag
& PARMRK
) {
2652 brkrpt
= 0x0a; // exception an inline triple
2654 brkrpt
= 0x1a; // exception and NULL
2656 brkrpt
|= 0x04; // flush input
2658 if ( iflag
& PARMRK
) {
2659 brkrpt
= 0x0b; //POSIX triple \0377 \0 \0
2661 brkrpt
= 0x01; // Null only
2664 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_BRK_REP(brkrpt
));
2667 if (iflag
& IGNPAR
) {
2669 /* would be 2 for not cirrus bug */
2670 /* would be 0x20 cept for cirrus bug */
2672 if ( iflag
& PARMRK
) {
2674 * Replace error characters with 3-byte sequence (\0377,\0,char)
2677 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_ISTRIP_OPT((char)0));
2682 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_SET_ERROR(parrpt
));
2684 if (cflag
& CLOCAL
) {
2685 // Status reporting fails for DCD if this is off
2686 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_DCD_NREP
);
2687 pCh
->flags
&= ~ASYNC_CHECK_CD
;
2689 i2QueueCommands(PTYPE_INLINE
, pCh
, 100, 1, CMD_DCD_REP
);
2690 pCh
->flags
|= ASYNC_CHECK_CD
;
2694 i2DrainOutput( pCh
, 100 );
2697 /******************************************************************************/
2698 /* IPL Device Section */
2699 /******************************************************************************/
2701 /******************************************************************************/
2702 /* Function: ip2_ipl_read() */
2703 /* Parameters: Pointer to device inode */
2704 /* Pointer to file structure */
2705 /* Pointer to data */
2706 /* Number of bytes to read */
2707 /* Returns: Success or failure */
2709 /* Description: Ugly */
2712 /******************************************************************************/
2716 ip2_ipl_read(struct file
*pFile
, char __user
*pData
, size_t count
, loff_t
*off
)
2718 unsigned int minor
= iminor(pFile
->f_path
.dentry
->d_inode
);
2722 printk (KERN_DEBUG
"IP2IPL: read %p, %d bytes\n", pData
, count
);
2726 case 0: // IPL device
2729 case 1: // Status dump
2732 case 2: // Ping device
2735 case 3: // Trace device
2736 rc
= DumpTraceBuffer ( pData
, count
);
2738 case 4: // Trace device
2739 rc
= DumpFifoBuffer ( pData
, count
);
2749 DumpFifoBuffer ( char __user
*pData
, int count
)
2753 rc
= copy_to_user(pData
, DBGBuf
, count
);
2755 printk(KERN_DEBUG
"Last index %d\n", I
);
2758 #endif /* DEBUG_FIFO */
2763 DumpTraceBuffer ( char __user
*pData
, int count
)
2765 #ifdef IP2DEBUG_TRACE
2769 int *pIndex
= (int __user
*)pData
;
2771 if ( count
< (sizeof(int) * 6) ) {
2774 rc
= put_user(tracewrap
, pIndex
);
2775 rc
= put_user(TRACEMAX
, ++pIndex
);
2776 rc
= put_user(tracestrip
, ++pIndex
);
2777 rc
= put_user(tracestuff
, ++pIndex
);
2778 pData
+= sizeof(int) * 6;
2779 count
-= sizeof(int) * 6;
2781 dumpcount
= tracestuff
- tracestrip
;
2782 if ( dumpcount
< 0 ) {
2783 dumpcount
+= TRACEMAX
;
2785 if ( dumpcount
> count
) {
2788 chunk
= TRACEMAX
- tracestrip
;
2789 if ( dumpcount
> chunk
) {
2790 rc
= copy_to_user(pData
, &tracebuf
[tracestrip
],
2791 chunk
* sizeof(tracebuf
[0]) );
2792 pData
+= chunk
* sizeof(tracebuf
[0]);
2794 chunk
= dumpcount
- chunk
;
2798 rc
= copy_to_user(pData
, &tracebuf
[tracestrip
],
2799 chunk
* sizeof(tracebuf
[0]) );
2800 tracestrip
+= chunk
;
2803 rc
= put_user(tracestrip
, ++pIndex
);
2804 rc
= put_user(tracestuff
, ++pIndex
);
2812 /******************************************************************************/
2813 /* Function: ip2_ipl_write() */
2815 /* Pointer to file structure */
2816 /* Pointer to data */
2817 /* Number of bytes to write */
2818 /* Returns: Success or failure */
2823 /******************************************************************************/
2825 ip2_ipl_write(struct file
*pFile
, const char __user
*pData
, size_t count
, loff_t
*off
)
2828 printk (KERN_DEBUG
"IP2IPL: write %p, %d bytes\n", pData
, count
);
2833 /******************************************************************************/
2834 /* Function: ip2_ipl_ioctl() */
2835 /* Parameters: Pointer to device inode */
2836 /* Pointer to file structure */
2839 /* Returns: Success or failure */
2844 /******************************************************************************/
2846 ip2_ipl_ioctl ( struct inode
*pInode
, struct file
*pFile
, UINT cmd
, ULONG arg
)
2848 unsigned int iplminor
= iminor(pInode
);
2850 void __user
*argp
= (void __user
*)arg
;
2851 ULONG __user
*pIndex
= argp
;
2852 i2eBordStrPtr pB
= i2BoardPtrTable
[iplminor
/ 4];
2856 printk (KERN_DEBUG
"IP2IPL: ioctl cmd %d, arg %ld\n", cmd
, arg
);
2859 switch ( iplminor
) {
2860 case 0: // IPL device
2863 case 1: // Status dump
2868 case 64: /* Driver - ip2stat */
2869 rc
= put_user(ip2_tty_driver
->refcount
, pIndex
++ );
2870 rc
= put_user(irq_counter
, pIndex
++ );
2871 rc
= put_user(bh_counter
, pIndex
++ );
2874 case 65: /* Board - ip2stat */
2876 rc
= copy_to_user(argp
, pB
, sizeof(i2eBordStr
));
2877 rc
= put_user(INB(pB
->i2eStatus
),
2878 (ULONG __user
*)(arg
+ (ULONG
)(&pB
->i2eStatus
) - (ULONG
)pB
) );
2885 if (cmd
< IP2_MAX_PORTS
) {
2886 pCh
= DevTable
[cmd
];
2889 rc
= copy_to_user(argp
, pCh
, sizeof(i2ChanStr
));
2899 case 2: // Ping device
2902 case 3: // Trace device
2904 * akpm: This used to write a whole bunch of function addresses
2905 * to userspace, which generated lots of put_user() warnings.
2906 * I killed it all. Just return "success" and don't do
2922 /******************************************************************************/
2923 /* Function: ip2_ipl_open() */
2924 /* Parameters: Pointer to device inode */
2925 /* Pointer to file structure */
2926 /* Returns: Success or failure */
2931 /******************************************************************************/
2933 ip2_ipl_open( struct inode
*pInode
, struct file
*pFile
)
2935 unsigned int iplminor
= iminor(pInode
);
2940 printk (KERN_DEBUG
"IP2IPL: open\n" );
2944 // These are the IPL devices
2951 // These are the status devices
2958 // These are the debug devices
2963 pB
= i2BoardPtrTable
[iplminor
/ 4];
2964 pCh
= (i2ChanStrPtr
) pB
->i2eChannelPtr
;
2967 // This is the trace device
2973 /******************************************************************************/
2974 /* Function: ip2_read_procmem */
2977 /* Returns: Length of output */
2980 /* Supplies some driver operating parameters */
2981 /* Not real useful unless your debugging the fifo */
2983 /******************************************************************************/
2985 #define LIMIT (PAGE_SIZE - 120)
2988 ip2_read_procmem(char *buf
, char **start
, off_t offset
, int len
)
2997 #define FMTLINE "%3d: 0x%08x 0x%08x 0%011o 0%011o\n"
2998 #define FMTLIN2 " 0x%04x 0x%04x tx flow 0x%x\n"
2999 #define FMTLIN3 " 0x%04x 0x%04x rc flow\n"
3001 len
+= sprintf(buf
+len
,"\n");
3003 for( i
= 0; i
< IP2_MAX_BOARDS
; ++i
) {
3004 pB
= i2BoardPtrTable
[i
];
3006 len
+= sprintf(buf
+len
,"board %d:\n",i
);
3007 len
+= sprintf(buf
+len
,"\tFifo rem: %d mty: %x outM %x\n",
3008 pB
->i2eFifoRemains
,pB
->i2eWaitingForEmptyFifo
,pB
->i2eOutMailWaiting
);
3012 len
+= sprintf(buf
+len
,"#: tty flags, port flags, cflags, iflags\n");
3013 for (i
=0; i
< IP2_MAX_PORTS
; i
++) {
3019 if (tty
&& tty
->count
) {
3020 len
+= sprintf(buf
+len
,FMTLINE
,i
,(int)tty
->flags
,pCh
->flags
,
3021 tty
->termios
->c_cflag
,tty
->termios
->c_iflag
);
3023 len
+= sprintf(buf
+len
,FMTLIN2
,
3024 pCh
->outfl
.asof
,pCh
->outfl
.room
,pCh
->channelNeeds
);
3025 len
+= sprintf(buf
+len
,FMTLIN3
,pCh
->infl
.asof
,pCh
->infl
.room
);
3033 * This is the handler for /proc/tty/driver/ip2
3035 * This stretch of code has been largely plagerized from at least three
3036 * different sources including ip2mkdev.c and a couple of other drivers.
3037 * The bugs are all mine. :-) =mhw=
3039 static int ip2_read_proc(char *page
, char **start
, off_t off
,
3040 int count
, int *eof
, void *data
)
3050 len
+= sprintf(page
, "ip2info: 1.0 driver: %s\n", pcVersion
);
3051 len
+= sprintf(page
+len
, "Driver: SMajor=%d CMajor=%d IMajor=%d MaxBoards=%d MaxBoxes=%d MaxPorts=%d\n",
3052 IP2_TTY_MAJOR
, IP2_CALLOUT_MAJOR
, IP2_IPL_MAJOR
,
3053 IP2_MAX_BOARDS
, ABS_MAX_BOXES
, ABS_BIGGEST_BOX
);
3055 for( i
= 0; i
< IP2_MAX_BOARDS
; ++i
) {
3056 /* This need to be reset for a board by board count... */
3058 pB
= i2BoardPtrTable
[i
];
3060 switch( pB
->i2ePom
.e
.porID
& ~POR_ID_RESERVED
)
3063 len
+= sprintf( page
+len
, "Board %d: EX ports=", i
);
3064 for( box
= 0; box
< ABS_MAX_BOXES
; ++box
)
3068 if( pB
->i2eChannelMap
[box
] != 0 ) ++boxes
;
3069 for( j
= 0; j
< ABS_BIGGEST_BOX
; ++j
)
3071 if( pB
->i2eChannelMap
[box
] & 1<< j
) {
3075 len
+= sprintf( page
+len
, "%d,", ports
);
3079 --len
; /* Backup over that last comma */
3081 len
+= sprintf( page
+len
, " boxes=%d width=%d", boxes
, pB
->i2eDataWidth16
? 16 : 8 );
3085 len
+= sprintf(page
+len
, "Board %d: ISA-4 ports=4 boxes=1", i
);
3090 len
+= sprintf(page
+len
, "Board %d: ISA-8-std ports=8 boxes=1", i
);
3095 len
+= sprintf(page
+len
, "Board %d: ISA-8-RJ11 ports=8 boxes=1", i
);
3100 len
+= sprintf(page
+len
, "Board %d: unknown", i
);
3101 /* Don't try and probe for minor numbers */
3106 /* Don't try and probe for minor numbers */
3107 len
+= sprintf(page
+len
, "Board %d: vacant", i
);
3112 len
+= sprintf(page
+len
, " minors=" );
3114 for ( box
= 0; box
< ABS_MAX_BOXES
; ++box
)
3116 for ( j
= 0; j
< ABS_BIGGEST_BOX
; ++j
)
3118 if ( pB
->i2eChannelMap
[box
] & (1 << j
) )
3120 len
+= sprintf (page
+len
,"%d,",
3121 j
+ ABS_BIGGEST_BOX
*
3122 (box
+i
*ABS_MAX_BOXES
));
3127 page
[ len
- 1 ] = '\n'; /* Overwrite that last comma */
3129 len
+= sprintf (page
+len
,"\n" );
3132 if (len
+begin
> off
+count
)
3134 if (len
+begin
< off
) {
3140 if (i
>= IP2_MAX_BOARDS
)
3142 if (off
>= len
+begin
)
3145 *start
= page
+ (off
-begin
);
3146 return ((count
< begin
+len
-off
) ? count
: begin
+len
-off
);
3149 /******************************************************************************/
3150 /* Function: ip2trace() */
3151 /* Parameters: Value to add to trace buffer */
3152 /* Returns: Nothing */
3157 /******************************************************************************/
3158 #ifdef IP2DEBUG_TRACE
3160 ip2trace (unsigned short pn
, unsigned char cat
, unsigned char label
, unsigned long codes
, ...)
3163 unsigned long *pCode
= &codes
;
3164 union ip2breadcrumb bc
;
3168 tracebuf
[tracestuff
++] = jiffies
;
3169 if ( tracestuff
== TRACEMAX
) {
3172 if ( tracestuff
== tracestrip
) {
3173 if ( ++tracestrip
== TRACEMAX
) {
3179 bc
.hdr
.port
= 0xff & pn
;
3181 bc
.hdr
.codes
= (unsigned char)( codes
& 0xff );
3182 bc
.hdr
.label
= label
;
3183 tracebuf
[tracestuff
++] = bc
.value
;
3186 if ( tracestuff
== TRACEMAX
) {
3189 if ( tracestuff
== tracestrip
) {
3190 if ( ++tracestrip
== TRACEMAX
) {
3199 tracebuf
[tracestuff
++] = *++pCode
;
3205 MODULE_LICENSE("GPL");
3207 static struct pci_device_id ip2main_pci_tbl
[] __devinitdata
= {
3208 { PCI_DEVICE(PCI_VENDOR_ID_COMPUTONE
, PCI_DEVICE_ID_COMPUTONE_IP2EX
) },
3212 MODULE_DEVICE_TABLE(pci
, ip2main_pci_tbl
);