blob: cda2459c1d602293a5f80dc8bbb4c7430b46929e [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2*
3* (c) 1999 by Computone Corporation
4*
5********************************************************************************
6*
7* PACKAGE: Linux tty Device Driver for IntelliPort family of multiport
8* serial I/O controllers.
9*
10* DESCRIPTION: Mainline code for the device driver
11*
12*******************************************************************************/
13// ToDo:
14//
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.
19//
20// Done:
21//
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
26//
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.
30//
31// 1.2.12 /\/\|=mhw=|\/\/
32// Cleaned up some remove queue cut and paste errors
33//
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
Adrian Bunk9c4b5622006-01-19 18:07:10 +010038// Compile defaults for io and irq are now set in ip2.c not ip2.h!
Linus Torvalds1da177e2005-04-16 15:20:36 -070039// 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
44//
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.
50//
51// 1.2.9
52// Four box EX was barfing on >128k kmalloc, made structure smaller by
53// reducing output buffer size
54//
55// 1.2.8
56// Device file system support (MHW)
57//
58// 1.2.7
59// Fixed
60// Reload of ip2 without unloading ip2main hangs system on cat of /proc/modules
61//
62// 1.2.6
63//Fixes DCD problems
64// DCD was not reported when CLOCAL was set on call to TIOCMGET
65//
66//Enhancements:
67// TIOCMGET requests and waits for status return
68// No DSS interrupts enabled except for DCD when needed
69//
70// For internal use only
71//
72//#define IP2DEBUG_INIT
73//#define IP2DEBUG_OPEN
74//#define IP2DEBUG_WRITE
75//#define IP2DEBUG_READ
76//#define IP2DEBUG_IOCTL
77//#define IP2DEBUG_IPL
78
79//#define IP2DEBUG_TRACE
80//#define DEBUG_FIFO
81
82/************/
83/* Includes */
84/************/
Linus Torvalds1da177e2005-04-16 15:20:36 -070085
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>
Linus Torvalds1da177e2005-04-16 15:20:36 -070093#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>
101
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>
109
110#include <linux/cdk.h>
111#include <linux/comstats.h>
112#include <linux/delay.h>
113#include <linux/bitops.h>
114
115#include <asm/system.h>
116#include <asm/io.h>
117#include <asm/irq.h>
118
119#include <linux/vmalloc.h>
120#include <linux/init.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -0700121
122#include <asm/uaccess.h>
123
Adrian Bunk9c4b5622006-01-19 18:07:10 +0100124#include "ip2types.h"
125#include "ip2trace.h"
126#include "ip2ioctl.h"
127#include "ip2.h"
128#include "i2ellis.h"
129#include "i2lib.h"
Linus Torvalds1da177e2005-04-16 15:20:36 -0700130
131/*****************
132 * /proc/ip2mem *
133 *****************/
134
135#include <linux/proc_fs.h>
136
137static int ip2_read_procmem(char *, char **, off_t, int);
138static int ip2_read_proc(char *, char **, off_t, int, int *, void * );
139
140/********************/
141/* Type Definitions */
142/********************/
143
144/*************/
145/* Constants */
146/*************/
147
148/* String constants to identify ourselves */
149static char *pcName = "Computone IntelliPort Plus multiport driver";
150static char *pcVersion = "1.2.14";
151
152/* String constants for port names */
153static char *pcDriver_name = "ip2";
154static char *pcIpl = "ip2ipl";
155
156/* Serial subtype definitions */
157#define SERIAL_TYPE_NORMAL 1
158
159// cheezy kludge or genius - you decide?
160int ip2_loadmain(int *, int *, unsigned char *, int);
161static unsigned char *Fip_firmware;
162static int Fip_firmware_size;
163
164/***********************/
165/* Function Prototypes */
166/***********************/
167
168/* Global module entry functions */
169
170/* Private (static) functions */
171static int ip2_open(PTTY, struct file *);
172static void ip2_close(PTTY, struct file *);
Alan Coxd9e39532006-01-09 20:54:20 -0800173static int ip2_write(PTTY, const unsigned char *, int);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700174static void ip2_putchar(PTTY, unsigned char);
175static void ip2_flush_chars(PTTY);
176static int ip2_write_room(PTTY);
177static int ip2_chars_in_buf(PTTY);
178static void ip2_flush_buffer(PTTY);
179static int ip2_ioctl(PTTY, struct file *, UINT, ULONG);
180static void ip2_set_termios(PTTY, struct termios *);
181static void ip2_set_line_discipline(PTTY);
182static void ip2_throttle(PTTY);
183static void ip2_unthrottle(PTTY);
184static void ip2_stop(PTTY);
185static void ip2_start(PTTY);
186static void ip2_hangup(PTTY);
187static int ip2_tiocmget(struct tty_struct *tty, struct file *file);
188static int ip2_tiocmset(struct tty_struct *tty, struct file *file,
189 unsigned int set, unsigned int clear);
190
191static void set_irq(int, int);
David Howellsc4028952006-11-22 14:57:56 +0000192static void ip2_interrupt_bh(struct work_struct *work);
David Howells7d12e782006-10-05 14:55:46 +0100193static irqreturn_t ip2_interrupt(int irq, void *dev_id);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700194static void ip2_poll(unsigned long arg);
195static inline void service_all_boards(void);
David Howellsc4028952006-11-22 14:57:56 +0000196static void do_input(struct work_struct *);
197static void do_status(struct work_struct *);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700198
199static void ip2_wait_until_sent(PTTY,int);
200
201static void set_params (i2ChanStrPtr, struct termios *);
202static int get_serial_info(i2ChanStrPtr, struct serial_struct __user *);
203static int set_serial_info(i2ChanStrPtr, struct serial_struct __user *);
204
205static ssize_t ip2_ipl_read(struct file *, char __user *, size_t, loff_t *);
206static ssize_t ip2_ipl_write(struct file *, const char __user *, size_t, loff_t *);
207static int ip2_ipl_ioctl(struct inode *, struct file *, UINT, ULONG);
208static int ip2_ipl_open(struct inode *, struct file *);
209
210static int DumpTraceBuffer(char __user *, int);
211static int DumpFifoBuffer( char __user *, int);
212
213static void ip2_init_board(int);
214static unsigned short find_eisa_board(int);
215
216/***************/
217/* Static Data */
218/***************/
219
220static struct tty_driver *ip2_tty_driver;
221
222/* Here, then is a table of board pointers which the interrupt routine should
223 * scan through to determine who it must service.
224 */
225static unsigned short i2nBoards; // Number of boards here
226
227static i2eBordStrPtr i2BoardPtrTable[IP2_MAX_BOARDS];
228
229static i2ChanStrPtr DevTable[IP2_MAX_PORTS];
230//DevTableMem just used to save addresses for kfree
231static void *DevTableMem[IP2_MAX_BOARDS];
232
233/* This is the driver descriptor for the ip2ipl device, which is used to
234 * download the loadware to the boards.
235 */
Arjan van de Ven62322d22006-07-03 00:24:21 -0700236static const struct file_operations ip2_ipl = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700237 .owner = THIS_MODULE,
238 .read = ip2_ipl_read,
239 .write = ip2_ipl_write,
240 .ioctl = ip2_ipl_ioctl,
241 .open = ip2_ipl_open,
242};
243
244static unsigned long irq_counter = 0;
245static unsigned long bh_counter = 0;
246
247// Use immediate queue to service interrupts
248#define USE_IQI
249//#define USE_IQ // PCI&2.2 needs work
250
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.
253 */
254#define POLL_TIMEOUT (jiffies + 1)
Ingo Molnar8d06afa2005-09-09 13:10:40 -0700255static DEFINE_TIMER(PollTimer, ip2_poll, 0, 0);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700256static char TimerOn;
257
258#ifdef IP2DEBUG_TRACE
259/* Trace (debug) buffer data */
260#define TRACEMAX 1000
261static unsigned long tracebuf[TRACEMAX];
262static int tracestuff;
263static int tracestrip;
264static int tracewrap;
265#endif
266
267/**********/
268/* Macros */
269/**********/
270
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
278
279/********/
280/* Code */
281/********/
282
Adrian Bunk9c4b5622006-01-19 18:07:10 +0100283#include "i2ellis.c" /* Extremely low-level interface services */
284#include "i2cmd.c" /* Standard loadware command definitions */
285#include "i2lib.c" /* High level interface services */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700286
287/* Configuration area for modprobe */
288
289MODULE_AUTHOR("Doug McNash");
290MODULE_DESCRIPTION("Computone IntelliPort Plus Driver");
291
292static int poll_only = 0;
293
294static int Eisa_irq;
295static int Eisa_slot;
296
297static int iindx;
298static char rirqs[IP2_MAX_BOARDS];
299static int Valid_Irqs[] = { 3, 4, 5, 7, 10, 11, 12, 15, 0};
300
301/* for sysfs class support */
gregkh@suse.deca8eca62005-03-23 09:53:09 -0800302static struct class *ip2_class;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700303
304// Some functions to keep track of what irq's we have
305
Randy Dunlap673e3212006-06-25 05:48:39 -0700306static int
Linus Torvalds1da177e2005-04-16 15:20:36 -0700307is_valid_irq(int irq)
308{
309 int *i = Valid_Irqs;
310
311 while ((*i != 0) && (*i != irq)) {
312 i++;
313 }
314 return (*i);
315}
316
Randy Dunlap673e3212006-06-25 05:48:39 -0700317static void
Linus Torvalds1da177e2005-04-16 15:20:36 -0700318mark_requested_irq( char irq )
319{
320 rirqs[iindx++] = irq;
321}
322
323#ifdef MODULE
Randy Dunlap673e3212006-06-25 05:48:39 -0700324static int
Linus Torvalds1da177e2005-04-16 15:20:36 -0700325clear_requested_irq( char irq )
326{
327 int i;
328 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
329 if (rirqs[i] == irq) {
330 rirqs[i] = 0;
331 return 1;
332 }
333 }
334 return 0;
335}
336#endif
337
Randy Dunlap673e3212006-06-25 05:48:39 -0700338static int
Linus Torvalds1da177e2005-04-16 15:20:36 -0700339have_requested_irq( char irq )
340{
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;
346 }
347 return 0;
348}
349
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
360int
361init_module(void)
362{
363#ifdef IP2DEBUG_INIT
364 printk (KERN_DEBUG "Loading module ...\n" );
365#endif
366 return 0;
367}
368#endif /* MODULE */
369
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
386void
387cleanup_module(void)
388{
389 int err;
390 int i;
391
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;
399 }
400
401 /* Reset the boards we have. */
402 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
403 if ( i2BoardPtrTable[i] ) {
404 iiReset( i2BoardPtrTable[i] );
405 }
406 }
407
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 );
gregkh@suse.deca8eca62005-03-23 09:53:09 -0800414 class_device_destroy(ip2_class, MKDEV(IP2_IPL_MAJOR, 4 * i));
gregkh@suse.deca8eca62005-03-23 09:53:09 -0800415 class_device_destroy(ip2_class, MKDEV(IP2_IPL_MAJOR, 4 * i + 1));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700416 }
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]);
421 }
422 }
gregkh@suse.deca8eca62005-03-23 09:53:09 -0800423 class_destroy(ip2_class);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700424 if ( ( err = tty_unregister_driver ( ip2_tty_driver ) ) ) {
425 printk(KERN_ERR "IP2: failed to unregister tty driver (%d)\n", err);
426 }
427 put_tty_driver(ip2_tty_driver);
428 if ( ( err = unregister_chrdev ( IP2_IPL_MAJOR, pcIpl ) ) ) {
429 printk(KERN_ERR "IP2: failed to unregister IPL driver (%d)\n", err);
430 }
431 remove_proc_entry("ip2mem", &proc_root);
432
433 // free memory
434 for (i = 0; i < IP2_MAX_BOARDS; i++) {
435 void *pB;
436#ifdef CONFIG_PCI
437 if (ip2config.type[i] == PCI && ip2config.pci_dev[i]) {
438 pci_disable_device(ip2config.pci_dev[i]);
Alan Cox1aff0ec2006-09-30 23:27:59 -0700439 pci_dev_put(ip2config.pci_dev[i]);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700440 ip2config.pci_dev[i] = NULL;
441 }
442#endif
443 if ((pB = i2BoardPtrTable[i]) != 0 ) {
444 kfree ( pB );
445 i2BoardPtrTable[i] = NULL;
446 }
447 if ((DevTableMem[i]) != NULL ) {
448 kfree ( DevTableMem[i] );
449 DevTableMem[i] = NULL;
450 }
451 }
452
453 /* Cleanup the iiEllis subsystem. */
454 iiEllisCleanup();
455#ifdef IP2DEBUG_INIT
456 printk (KERN_DEBUG "IP2 Unloaded\n" );
457#endif
458}
459#endif /* MODULE */
460
Jeff Dikeb68e31d2006-10-02 02:17:18 -0700461static const struct tty_operations ip2_ops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700462 .open = ip2_open,
463 .close = ip2_close,
464 .write = ip2_write,
465 .put_char = ip2_putchar,
466 .flush_chars = ip2_flush_chars,
467 .write_room = ip2_write_room,
468 .chars_in_buffer = ip2_chars_in_buf,
469 .flush_buffer = ip2_flush_buffer,
470 .ioctl = ip2_ioctl,
471 .throttle = ip2_throttle,
472 .unthrottle = ip2_unthrottle,
473 .set_termios = ip2_set_termios,
474 .set_ldisc = ip2_set_line_discipline,
475 .stop = ip2_stop,
476 .start = ip2_start,
477 .hangup = ip2_hangup,
478 .read_proc = ip2_read_proc,
479 .tiocmget = ip2_tiocmget,
480 .tiocmset = ip2_tiocmset,
481};
482
483/******************************************************************************/
484/* Function: ip2_loadmain() */
485/* Parameters: irq, io from command line of insmod et. al. */
486/* pointer to fip firmware and firmware size for boards */
487/* Returns: Success (0) */
488/* */
489/* Description: */
490/* This was the required entry point for all drivers (now in ip2.c) */
491/* It performs all */
492/* initialisation of the devices and driver structures, and registers itself */
493/* with the relevant kernel modules. */
494/******************************************************************************/
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700495/* IRQF_DISABLED - if set blocks all interrupts else only this line */
496/* IRQF_SHARED - for shared irq PCI or maybe EISA only */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700497/* SA_RANDOM - can be source for cert. random number generators */
498#define IP2_SA_FLAGS 0
499
500int
501ip2_loadmain(int *iop, int *irqp, unsigned char *firmware, int firmsize)
502{
503 int i, j, box;
504 int err = 0;
505 int status = 0;
506 static int loaded;
507 i2eBordStrPtr pB = NULL;
508 int rc = -1;
Alan Cox1aff0ec2006-09-30 23:27:59 -0700509 static struct pci_dev *pci_dev_i = NULL;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700510
511 ip2trace (ITRC_NO_PORT, ITRC_INIT, ITRC_ENTER, 0 );
512
513 /* process command line arguments to modprobe or
514 insmod i.e. iop & irqp */
515 /* irqp and iop should ALWAYS be specified now... But we check
516 them individually just to be sure, anyways... */
517 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
518 if (iop) {
519 ip2config.addr[i] = iop[i];
520 if (irqp) {
521 if( irqp[i] >= 0 ) {
522 ip2config.irq[i] = irqp[i];
523 } else {
524 ip2config.irq[i] = 0;
525 }
526 // This is a little bit of a hack. If poll_only=1 on command
527 // line back in ip2.c OR all IRQs on all specified boards are
528 // explicitly set to 0, then drop to poll only mode and override
529 // PCI or EISA interrupts. This superceeds the old hack of
530 // triggering if all interrupts were zero (like da default).
531 // Still a hack but less prone to random acts of terrorism.
532 //
533 // What we really should do, now that the IRQ default is set
534 // to -1, is to use 0 as a hard coded, do not probe.
535 //
536 // /\/\|=mhw=|\/\/
537 poll_only |= irqp[i];
538 }
539 }
540 }
541 poll_only = !poll_only;
542
543 Fip_firmware = firmware;
544 Fip_firmware_size = firmsize;
545
546 /* Announce our presence */
547 printk( KERN_INFO "%s version %s\n", pcName, pcVersion );
548
549 // ip2 can be unloaded and reloaded for no good reason
550 // we can't let that happen here or bad things happen
551 // second load hoses board but not system - fixme later
552 if (loaded) {
553 printk( KERN_INFO "Still loaded\n" );
554 return 0;
555 }
556 loaded++;
557
558 ip2_tty_driver = alloc_tty_driver(IP2_MAX_PORTS);
559 if (!ip2_tty_driver)
560 return -ENOMEM;
561
562 /* Initialise the iiEllis subsystem. */
563 iiEllisInit();
564
565 /* Initialize arrays. */
566 memset( i2BoardPtrTable, 0, sizeof i2BoardPtrTable );
567 memset( DevTable, 0, sizeof DevTable );
568
569 /* Initialise all the boards we can find (up to the maximum). */
570 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
571 switch ( ip2config.addr[i] ) {
572 case 0: /* skip this slot even if card is present */
573 break;
574 default: /* ISA */
575 /* ISA address must be specified */
576 if ( (ip2config.addr[i] < 0x100) || (ip2config.addr[i] > 0x3f8) ) {
577 printk ( KERN_ERR "IP2: Bad ISA board %d address %x\n",
578 i, ip2config.addr[i] );
579 ip2config.addr[i] = 0;
580 } else {
581 ip2config.type[i] = ISA;
582
583 /* Check for valid irq argument, set for polling if invalid */
584 if (ip2config.irq[i] && !is_valid_irq(ip2config.irq[i])) {
585 printk(KERN_ERR "IP2: Bad IRQ(%d) specified\n",ip2config.irq[i]);
586 ip2config.irq[i] = 0;// 0 is polling and is valid in that sense
587 }
588 }
589 break;
590 case PCI:
591#ifdef CONFIG_PCI
592 {
Alan Cox1aff0ec2006-09-30 23:27:59 -0700593 pci_dev_i = pci_get_device(PCI_VENDOR_ID_COMPUTONE,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700594 PCI_DEVICE_ID_COMPUTONE_IP2EX, pci_dev_i);
595 if (pci_dev_i != NULL) {
596 unsigned int addr;
597
598 if (pci_enable_device(pci_dev_i)) {
599 printk( KERN_ERR "IP2: can't enable PCI device at %s\n",
600 pci_name(pci_dev_i));
601 break;
602 }
603 ip2config.type[i] = PCI;
Alan Cox1aff0ec2006-09-30 23:27:59 -0700604 ip2config.pci_dev[i] = pci_dev_get(pci_dev_i);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700605 status =
606 pci_read_config_dword(pci_dev_i, PCI_BASE_ADDRESS_1, &addr);
607 if ( addr & 1 ) {
608 ip2config.addr[i]=(USHORT)(addr&0xfffe);
609 } else {
610 printk( KERN_ERR "IP2: PCI I/O address error\n");
611 }
612
613// If the PCI BIOS assigned it, lets try and use it. If we
614// can't acquire it or it screws up, deal with it then.
615
616// if (!is_valid_irq(pci_irq)) {
617// printk( KERN_ERR "IP2: Bad PCI BIOS IRQ(%d)\n",pci_irq);
618// pci_irq = 0;
619// }
620 ip2config.irq[i] = pci_dev_i->irq;
621 } else { // ann error
622 ip2config.addr[i] = 0;
623 if (status == PCIBIOS_DEVICE_NOT_FOUND) {
624 printk( KERN_ERR "IP2: PCI board %d not found\n", i );
625 } else {
626 printk( KERN_ERR "IP2: PCI error 0x%x \n", status );
627 }
628 }
629 }
630#else
631 printk( KERN_ERR "IP2: PCI card specified but PCI support not\n");
632 printk( KERN_ERR "IP2: configured in this kernel.\n");
633 printk( KERN_ERR "IP2: Recompile kernel with CONFIG_PCI defined!\n");
634#endif /* CONFIG_PCI */
635 break;
636 case EISA:
637 if ( (ip2config.addr[i] = find_eisa_board( Eisa_slot + 1 )) != 0) {
638 /* Eisa_irq set as side effect, boo */
639 ip2config.type[i] = EISA;
640 }
641 ip2config.irq[i] = Eisa_irq;
642 break;
643 } /* switch */
644 } /* for */
Alan Cox1aff0ec2006-09-30 23:27:59 -0700645 if (pci_dev_i)
646 pci_dev_put(pci_dev_i);
647
Linus Torvalds1da177e2005-04-16 15:20:36 -0700648 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
649 if ( ip2config.addr[i] ) {
650 pB = kmalloc( sizeof(i2eBordStr), GFP_KERNEL);
651 if ( pB != NULL ) {
652 i2BoardPtrTable[i] = pB;
653 memset( pB, 0, sizeof(i2eBordStr) );
654 iiSetAddress( pB, ip2config.addr[i], ii2DelayTimer );
655 iiReset( pB );
656 } else {
657 printk(KERN_ERR "IP2: board memory allocation error\n");
658 }
659 }
660 }
661 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
662 if ( ( pB = i2BoardPtrTable[i] ) != NULL ) {
663 iiResetDelay( pB );
664 break;
665 }
666 }
667 for ( i = 0; i < IP2_MAX_BOARDS; ++i ) {
668 if ( i2BoardPtrTable[i] != NULL ) {
669 ip2_init_board( i );
670 }
671 }
672
673 ip2trace (ITRC_NO_PORT, ITRC_INIT, 2, 0 );
674
675 ip2_tty_driver->owner = THIS_MODULE;
676 ip2_tty_driver->name = "ttyF";
Linus Torvalds1da177e2005-04-16 15:20:36 -0700677 ip2_tty_driver->driver_name = pcDriver_name;
678 ip2_tty_driver->major = IP2_TTY_MAJOR;
679 ip2_tty_driver->minor_start = 0;
680 ip2_tty_driver->type = TTY_DRIVER_TYPE_SERIAL;
681 ip2_tty_driver->subtype = SERIAL_TYPE_NORMAL;
682 ip2_tty_driver->init_termios = tty_std_termios;
683 ip2_tty_driver->init_termios.c_cflag = B9600|CS8|CREAD|HUPCL|CLOCAL;
Greg Kroah-Hartman331b8312005-06-20 21:15:16 -0700684 ip2_tty_driver->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_DYNAMIC_DEV;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700685 tty_set_operations(ip2_tty_driver, &ip2_ops);
686
687 ip2trace (ITRC_NO_PORT, ITRC_INIT, 3, 0 );
688
689 /* Register the tty devices. */
690 if ( ( err = tty_register_driver ( ip2_tty_driver ) ) ) {
691 printk(KERN_ERR "IP2: failed to register tty driver (%d)\n", err);
692 put_tty_driver(ip2_tty_driver);
693 return -EINVAL;
694 } else
695 /* Register the IPL driver. */
696 if ( ( err = register_chrdev ( IP2_IPL_MAJOR, pcIpl, &ip2_ipl ) ) ) {
697 printk(KERN_ERR "IP2: failed to register IPL device (%d)\n", err );
698 } else {
699 /* create the sysfs class */
gregkh@suse.deca8eca62005-03-23 09:53:09 -0800700 ip2_class = class_create(THIS_MODULE, "ip2");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700701 if (IS_ERR(ip2_class)) {
702 err = PTR_ERR(ip2_class);
703 goto out_chrdev;
704 }
705 }
706 /* Register the read_procmem thing */
707 if (!create_proc_info_entry("ip2mem",0,&proc_root,ip2_read_procmem)) {
708 printk(KERN_ERR "IP2: failed to register read_procmem\n");
709 } else {
710
711 ip2trace (ITRC_NO_PORT, ITRC_INIT, 4, 0 );
712 /* Register the interrupt handler or poll handler, depending upon the
713 * specified interrupt.
714 */
715
716 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
717 if ( 0 == ip2config.addr[i] ) {
718 continue;
719 }
720
721 if ( NULL != ( pB = i2BoardPtrTable[i] ) ) {
Greg Kroah-Hartman53f46542005-10-27 22:25:43 -0700722 class_device_create(ip2_class, NULL,
723 MKDEV(IP2_IPL_MAJOR, 4 * i),
724 NULL, "ipl%d", i);
Greg Kroah-Hartman53f46542005-10-27 22:25:43 -0700725 class_device_create(ip2_class, NULL,
726 MKDEV(IP2_IPL_MAJOR, 4 * i + 1),
727 NULL, "stat%d", i);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700728
729 for ( box = 0; box < ABS_MAX_BOXES; ++box )
730 {
731 for ( j = 0; j < ABS_BIGGEST_BOX; ++j )
732 {
733 if ( pB->i2eChannelMap[box] & (1 << j) )
734 {
735 tty_register_device(ip2_tty_driver,
736 j + ABS_BIGGEST_BOX *
737 (box+i*ABS_MAX_BOXES), NULL);
738 }
739 }
740 }
741 }
742
743 if (poll_only) {
744// Poll only forces driver to only use polling and
745// to ignore the probed PCI or EISA interrupts.
746 ip2config.irq[i] = CIR_POLL;
747 }
748 if ( ip2config.irq[i] == CIR_POLL ) {
749retry:
750 if (!TimerOn) {
751 PollTimer.expires = POLL_TIMEOUT;
752 add_timer ( &PollTimer );
753 TimerOn = 1;
754 printk( KERN_INFO "IP2: polling\n");
755 }
756 } else {
757 if (have_requested_irq(ip2config.irq[i]))
758 continue;
759 rc = request_irq( ip2config.irq[i], ip2_interrupt,
Thomas Gleixner0f2ed4c2006-07-01 19:29:33 -0700760 IP2_SA_FLAGS | (ip2config.type[i] == PCI ? IRQF_SHARED : 0),
Linus Torvalds1da177e2005-04-16 15:20:36 -0700761 pcName, (void *)&pcName);
762 if (rc) {
763 printk(KERN_ERR "IP2: an request_irq failed: error %d\n",rc);
764 ip2config.irq[i] = CIR_POLL;
765 printk( KERN_INFO "IP2: Polling %ld/sec.\n",
766 (POLL_TIMEOUT - jiffies));
767 goto retry;
768 }
769 mark_requested_irq(ip2config.irq[i]);
770 /* Initialise the interrupt handler bottom half (aka slih). */
771 }
772 }
773 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
774 if ( i2BoardPtrTable[i] ) {
775 set_irq( i, ip2config.irq[i] ); /* set and enable board interrupt */
776 }
777 }
778 }
779 ip2trace (ITRC_NO_PORT, ITRC_INIT, ITRC_RETURN, 0 );
780 goto out;
781
Linus Torvalds1da177e2005-04-16 15:20:36 -0700782out_chrdev:
783 unregister_chrdev(IP2_IPL_MAJOR, "ip2");
784out:
785 return err;
786}
787
788EXPORT_SYMBOL(ip2_loadmain);
789
790/******************************************************************************/
791/* Function: ip2_init_board() */
792/* Parameters: Index of board in configuration structure */
793/* Returns: Success (0) */
794/* */
795/* Description: */
796/* This function initializes the specified board. The loadware is copied to */
797/* the board, the channel structures are initialized, and the board details */
798/* are reported on the console. */
799/******************************************************************************/
Randy Dunlap673e3212006-06-25 05:48:39 -0700800static void
Linus Torvalds1da177e2005-04-16 15:20:36 -0700801ip2_init_board( int boardnum )
802{
803 int i;
804 int nports = 0, nboxes = 0;
805 i2ChanStrPtr pCh;
806 i2eBordStrPtr pB = i2BoardPtrTable[boardnum];
807
808 if ( !iiInitialize ( pB ) ) {
809 printk ( KERN_ERR "IP2: Failed to initialize board at 0x%x, error %d\n",
810 pB->i2eBase, pB->i2eError );
811 goto err_initialize;
812 }
813 printk(KERN_INFO "IP2: Board %d: addr=0x%x irq=%d\n", boardnum + 1,
814 ip2config.addr[boardnum], ip2config.irq[boardnum] );
815
816 if (!request_region( ip2config.addr[boardnum], 8, pcName )) {
817 printk(KERN_ERR "IP2: bad addr=0x%x\n", ip2config.addr[boardnum]);
818 goto err_initialize;
819 }
820
821 if ( iiDownloadAll ( pB, (loadHdrStrPtr)Fip_firmware, 1, Fip_firmware_size )
822 != II_DOWN_GOOD ) {
823 printk ( KERN_ERR "IP2: failed to download loadware\n" );
824 goto err_release_region;
825 } else {
826 printk ( KERN_INFO "IP2: fv=%d.%d.%d lv=%d.%d.%d\n",
827 pB->i2ePom.e.porVersion,
828 pB->i2ePom.e.porRevision,
829 pB->i2ePom.e.porSubRev, pB->i2eLVersion,
830 pB->i2eLRevision, pB->i2eLSub );
831 }
832
833 switch ( pB->i2ePom.e.porID & ~POR_ID_RESERVED ) {
834
835 default:
836 printk( KERN_ERR "IP2: Unknown board type, ID = %x\n",
837 pB->i2ePom.e.porID );
838 nports = 0;
839 goto err_release_region;
840 break;
841
842 case POR_ID_II_4: /* IntelliPort-II, ISA-4 (4xRJ45) */
843 printk ( KERN_INFO "IP2: ISA-4\n" );
844 nports = 4;
845 break;
846
847 case POR_ID_II_8: /* IntelliPort-II, 8-port using standard brick. */
848 printk ( KERN_INFO "IP2: ISA-8 std\n" );
849 nports = 8;
850 break;
851
852 case POR_ID_II_8R: /* IntelliPort-II, 8-port using RJ11's (no CTS) */
853 printk ( KERN_INFO "IP2: ISA-8 RJ11\n" );
854 nports = 8;
855 break;
856
857 case POR_ID_FIIEX: /* IntelliPort IIEX */
858 {
859 int portnum = IP2_PORTS_PER_BOARD * boardnum;
860 int box;
861
862 for( box = 0; box < ABS_MAX_BOXES; ++box ) {
863 if ( pB->i2eChannelMap[box] != 0 ) {
864 ++nboxes;
865 }
866 for( i = 0; i < ABS_BIGGEST_BOX; ++i ) {
867 if ( pB->i2eChannelMap[box] & 1<< i ) {
868 ++nports;
869 }
870 }
871 }
872 DevTableMem[boardnum] = pCh =
873 kmalloc( sizeof(i2ChanStr) * nports, GFP_KERNEL );
874 if ( !pCh ) {
875 printk ( KERN_ERR "IP2: (i2_init_channel:) Out of memory.\n");
876 goto err_release_region;
877 }
878 if ( !i2InitChannels( pB, nports, pCh ) ) {
879 printk(KERN_ERR "IP2: i2InitChannels failed: %d\n",pB->i2eError);
880 kfree ( pCh );
881 goto err_release_region;
882 }
883 pB->i2eChannelPtr = &DevTable[portnum];
884 pB->i2eChannelCnt = ABS_MOST_PORTS;
885
886 for( box = 0; box < ABS_MAX_BOXES; ++box, portnum += ABS_BIGGEST_BOX ) {
887 for( i = 0; i < ABS_BIGGEST_BOX; ++i ) {
888 if ( pB->i2eChannelMap[box] & (1 << i) ) {
889 DevTable[portnum + i] = pCh;
890 pCh->port_index = portnum + i;
891 pCh++;
892 }
893 }
894 }
895 printk(KERN_INFO "IP2: EX box=%d ports=%d %d bit\n",
896 nboxes, nports, pB->i2eDataWidth16 ? 16 : 8 );
897 }
898 goto ex_exit;
899 }
900 DevTableMem[boardnum] = pCh =
901 kmalloc ( sizeof (i2ChanStr) * nports, GFP_KERNEL );
902 if ( !pCh ) {
903 printk ( KERN_ERR "IP2: (i2_init_channel:) Out of memory.\n");
904 goto err_release_region;
905 }
906 pB->i2eChannelPtr = pCh;
907 pB->i2eChannelCnt = nports;
908 if ( !i2InitChannels( pB, nports, pCh ) ) {
909 printk(KERN_ERR "IP2: i2InitChannels failed: %d\n",pB->i2eError);
910 kfree ( pCh );
911 goto err_release_region;
912 }
913 pB->i2eChannelPtr = &DevTable[IP2_PORTS_PER_BOARD * boardnum];
914
915 for( i = 0; i < pB->i2eChannelCnt; ++i ) {
916 DevTable[IP2_PORTS_PER_BOARD * boardnum + i] = pCh;
917 pCh->port_index = (IP2_PORTS_PER_BOARD * boardnum) + i;
918 pCh++;
919 }
920ex_exit:
David Howellsc4028952006-11-22 14:57:56 +0000921 INIT_WORK(&pB->tqueue_interrupt, ip2_interrupt_bh);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700922 return;
923
924err_release_region:
925 release_region(ip2config.addr[boardnum], 8);
926err_initialize:
927 kfree ( pB );
928 i2BoardPtrTable[boardnum] = NULL;
929 return;
930}
931
932/******************************************************************************/
933/* Function: find_eisa_board ( int start_slot ) */
934/* Parameters: First slot to check */
935/* Returns: Address of EISA IntelliPort II controller */
936/* */
937/* Description: */
938/* This function searches for an EISA IntelliPort controller, starting */
939/* from the specified slot number. If the motherboard is not identified as an */
940/* EISA motherboard, or no valid board ID is selected it returns 0. Otherwise */
941/* it returns the base address of the controller. */
942/******************************************************************************/
Randy Dunlap673e3212006-06-25 05:48:39 -0700943static unsigned short
Linus Torvalds1da177e2005-04-16 15:20:36 -0700944find_eisa_board( int start_slot )
945{
946 int i, j;
947 unsigned int idm = 0;
948 unsigned int idp = 0;
949 unsigned int base = 0;
950 unsigned int value;
951 int setup_address;
952 int setup_irq;
953 int ismine = 0;
954
955 /*
956 * First a check for an EISA motherboard, which we do by comparing the
957 * EISA ID registers for the system board and the first couple of slots.
958 * No slot ID should match the system board ID, but on an ISA or PCI
959 * machine the odds are that an empty bus will return similar values for
960 * each slot.
961 */
962 i = 0x0c80;
963 value = (inb(i) << 24) + (inb(i+1) << 16) + (inb(i+2) << 8) + inb(i+3);
964 for( i = 0x1c80; i <= 0x4c80; i += 0x1000 ) {
965 j = (inb(i)<<24)+(inb(i+1)<<16)+(inb(i+2)<<8)+inb(i+3);
966 if ( value == j )
967 return 0;
968 }
969
970 /*
971 * OK, so we are inclined to believe that this is an EISA machine. Find
972 * an IntelliPort controller.
973 */
974 for( i = start_slot; i < 16; i++ ) {
975 base = i << 12;
976 idm = (inb(base + 0xc80) << 8) | (inb(base + 0xc81) & 0xff);
977 idp = (inb(base + 0xc82) << 8) | (inb(base + 0xc83) & 0xff);
978 ismine = 0;
979 if ( idm == 0x0e8e ) {
980 if ( idp == 0x0281 || idp == 0x0218 ) {
981 ismine = 1;
982 } else if ( idp == 0x0282 || idp == 0x0283 ) {
983 ismine = 3; /* Can do edge-trigger */
984 }
985 if ( ismine ) {
986 Eisa_slot = i;
987 break;
988 }
989 }
990 }
991 if ( !ismine )
992 return 0;
993
994 /* It's some sort of EISA card, but at what address is it configured? */
995
996 setup_address = base + 0xc88;
997 value = inb(base + 0xc86);
998 setup_irq = (value & 8) ? Valid_Irqs[value & 7] : 0;
999
1000 if ( (ismine & 2) && !(value & 0x10) ) {
1001 ismine = 1; /* Could be edging, but not */
1002 }
1003
1004 if ( Eisa_irq == 0 ) {
1005 Eisa_irq = setup_irq;
1006 } else if ( Eisa_irq != setup_irq ) {
1007 printk ( KERN_ERR "IP2: EISA irq mismatch between EISA controllers\n" );
1008 }
1009
1010#ifdef IP2DEBUG_INIT
1011printk(KERN_DEBUG "Computone EISA board in slot %d, I.D. 0x%x%x, Address 0x%x",
1012 base >> 12, idm, idp, setup_address);
1013 if ( Eisa_irq ) {
1014 printk(KERN_DEBUG ", Interrupt %d %s\n",
1015 setup_irq, (ismine & 2) ? "(edge)" : "(level)");
1016 } else {
1017 printk(KERN_DEBUG ", (polled)\n");
1018 }
1019#endif
1020 return setup_address;
1021}
1022
1023/******************************************************************************/
1024/* Function: set_irq() */
1025/* Parameters: index to board in board table */
1026/* IRQ to use */
1027/* Returns: Success (0) */
1028/* */
1029/* Description: */
1030/******************************************************************************/
1031static void
1032set_irq( int boardnum, int boardIrq )
1033{
1034 unsigned char tempCommand[16];
1035 i2eBordStrPtr pB = i2BoardPtrTable[boardnum];
1036 unsigned long flags;
1037
1038 /*
1039 * Notify the boards they may generate interrupts. This is done by
1040 * sending an in-line command to channel 0 on each board. This is why
1041 * the channels have to be defined already. For each board, if the
1042 * interrupt has never been defined, we must do so NOW, directly, since
1043 * board will not send flow control or even give an interrupt until this
1044 * is done. If polling we must send 0 as the interrupt parameter.
1045 */
1046
1047 // We will get an interrupt here at the end of this function
1048
1049 iiDisableMailIrq(pB);
1050
1051 /* We build up the entire packet header. */
1052 CHANNEL_OF(tempCommand) = 0;
1053 PTYPE_OF(tempCommand) = PTYPE_INLINE;
1054 CMD_COUNT_OF(tempCommand) = 2;
1055 (CMD_OF(tempCommand))[0] = CMDVALUE_IRQ;
1056 (CMD_OF(tempCommand))[1] = boardIrq;
1057 /*
1058 * Write to FIFO; don't bother to adjust fifo capacity for this, since
1059 * board will respond almost immediately after SendMail hit.
1060 */
1061 WRITE_LOCK_IRQSAVE(&pB->write_fifo_spinlock,flags);
1062 iiWriteBuf(pB, tempCommand, 4);
1063 WRITE_UNLOCK_IRQRESTORE(&pB->write_fifo_spinlock,flags);
1064 pB->i2eUsingIrq = boardIrq;
1065 pB->i2eOutMailWaiting |= MB_OUT_STUFFED;
1066
1067 /* Need to update number of boards before you enable mailbox int */
1068 ++i2nBoards;
1069
1070 CHANNEL_OF(tempCommand) = 0;
1071 PTYPE_OF(tempCommand) = PTYPE_BYPASS;
1072 CMD_COUNT_OF(tempCommand) = 6;
1073 (CMD_OF(tempCommand))[0] = 88; // SILO
1074 (CMD_OF(tempCommand))[1] = 64; // chars
1075 (CMD_OF(tempCommand))[2] = 32; // ms
1076
1077 (CMD_OF(tempCommand))[3] = 28; // MAX_BLOCK
1078 (CMD_OF(tempCommand))[4] = 64; // chars
1079
1080 (CMD_OF(tempCommand))[5] = 87; // HW_TEST
1081 WRITE_LOCK_IRQSAVE(&pB->write_fifo_spinlock,flags);
1082 iiWriteBuf(pB, tempCommand, 8);
1083 WRITE_UNLOCK_IRQRESTORE(&pB->write_fifo_spinlock,flags);
1084
1085 CHANNEL_OF(tempCommand) = 0;
1086 PTYPE_OF(tempCommand) = PTYPE_BYPASS;
1087 CMD_COUNT_OF(tempCommand) = 1;
1088 (CMD_OF(tempCommand))[0] = 84; /* get BOX_IDS */
1089 iiWriteBuf(pB, tempCommand, 3);
1090
1091#ifdef XXX
1092 // enable heartbeat for test porpoises
1093 CHANNEL_OF(tempCommand) = 0;
1094 PTYPE_OF(tempCommand) = PTYPE_BYPASS;
1095 CMD_COUNT_OF(tempCommand) = 2;
1096 (CMD_OF(tempCommand))[0] = 44; /* get ping */
1097 (CMD_OF(tempCommand))[1] = 200; /* 200 ms */
1098 WRITE_LOCK_IRQSAVE(&pB->write_fifo_spinlock,flags);
1099 iiWriteBuf(pB, tempCommand, 4);
1100 WRITE_UNLOCK_IRQRESTORE(&pB->write_fifo_spinlock,flags);
1101#endif
1102
1103 iiEnableMailIrq(pB);
1104 iiSendPendingMail(pB);
1105}
1106
1107/******************************************************************************/
1108/* Interrupt Handler Section */
1109/******************************************************************************/
1110
1111static inline void
1112service_all_boards(void)
1113{
1114 int i;
1115 i2eBordStrPtr pB;
1116
1117 /* Service every board on the list */
1118 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
1119 pB = i2BoardPtrTable[i];
1120 if ( pB ) {
1121 i2ServiceBoard( pB );
1122 }
1123 }
1124}
1125
1126
1127/******************************************************************************/
David Howellsc4028952006-11-22 14:57:56 +00001128/* Function: ip2_interrupt_bh(work) */
1129/* Parameters: work - pointer to the board structure */
Linus Torvalds1da177e2005-04-16 15:20:36 -07001130/* Returns: Nothing */
1131/* */
1132/* Description: */
1133/* Service the board in a bottom half interrupt handler and then */
1134/* reenable the board's interrupts if it has an IRQ number */
1135/* */
1136/******************************************************************************/
1137static void
David Howellsc4028952006-11-22 14:57:56 +00001138ip2_interrupt_bh(struct work_struct *work)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001139{
David Howellsc4028952006-11-22 14:57:56 +00001140 i2eBordStrPtr pB = container_of(work, i2eBordStr, tqueue_interrupt);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001141// pB better well be set or we have a problem! We can only get
1142// here from the IMMEDIATE queue. Here, we process the boards.
1143// Checking pB doesn't cost much and it saves us from the sanity checkers.
1144
1145 bh_counter++;
1146
1147 if ( pB ) {
1148 i2ServiceBoard( pB );
1149 if( pB->i2eUsingIrq ) {
1150// Re-enable his interrupts
1151 iiEnableMailIrq(pB);
1152 }
1153 }
1154}
1155
1156
1157/******************************************************************************/
David Howells7d12e782006-10-05 14:55:46 +01001158/* Function: ip2_interrupt(int irq, void *dev_id) */
Linus Torvalds1da177e2005-04-16 15:20:36 -07001159/* Parameters: irq - interrupt number */
1160/* pointer to optional device ID structure */
Linus Torvalds1da177e2005-04-16 15:20:36 -07001161/* Returns: Nothing */
1162/* */
1163/* Description: */
1164/* */
1165/* Our task here is simply to identify each board which needs servicing. */
1166/* If we are queuing then, queue it to be serviced, and disable its irq */
1167/* mask otherwise process the board directly. */
1168/* */
1169/* We could queue by IRQ but that just complicates things on both ends */
1170/* with very little gain in performance (how many instructions does */
1171/* it take to iterate on the immediate queue). */
1172/* */
1173/* */
1174/******************************************************************************/
1175static irqreturn_t
David Howells7d12e782006-10-05 14:55:46 +01001176ip2_interrupt(int irq, void *dev_id)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001177{
1178 int i;
1179 i2eBordStrPtr pB;
1180 int handled = 0;
1181
1182 ip2trace (ITRC_NO_PORT, ITRC_INTR, 99, 1, irq );
1183
1184 /* Service just the boards on the list using this irq */
1185 for( i = 0; i < i2nBoards; ++i ) {
1186 pB = i2BoardPtrTable[i];
1187
1188// Only process those boards which match our IRQ.
1189// IRQ = 0 for polled boards, we won't poll "IRQ" boards
1190
1191 if ( pB && (pB->i2eUsingIrq == irq) ) {
1192 handled = 1;
1193#ifdef USE_IQI
1194
1195 if (NO_MAIL_HERE != ( pB->i2eStartMail = iiGetMail(pB))) {
1196// Disable his interrupt (will be enabled when serviced)
1197// This is mostly to protect from reentrancy.
1198 iiDisableMailIrq(pB);
1199
1200// Park the board on the immediate queue for processing.
1201 schedule_work(&pB->tqueue_interrupt);
1202
1203// Make sure the immediate queue is flagged to fire.
1204 }
1205#else
1206// We are using immediate servicing here. This sucks and can
1207// cause all sorts of havoc with ppp and others. The failsafe
1208// check on iiSendPendingMail could also throw a hairball.
1209 i2ServiceBoard( pB );
1210#endif /* USE_IQI */
1211 }
1212 }
1213
1214 ++irq_counter;
1215
1216 ip2trace (ITRC_NO_PORT, ITRC_INTR, ITRC_RETURN, 0 );
1217 return IRQ_RETVAL(handled);
1218}
1219
1220/******************************************************************************/
1221/* Function: ip2_poll(unsigned long arg) */
1222/* Parameters: ? */
1223/* Returns: Nothing */
1224/* */
1225/* Description: */
1226/* This function calls the library routine i2ServiceBoard for each board in */
1227/* the board table. This is used instead of the interrupt routine when polled */
1228/* mode is specified. */
1229/******************************************************************************/
1230static void
1231ip2_poll(unsigned long arg)
1232{
1233 ip2trace (ITRC_NO_PORT, ITRC_INTR, 100, 0 );
1234
1235 TimerOn = 0; // it's the truth but not checked in service
1236
1237 // Just polled boards, IRQ = 0 will hit all non-interrupt boards.
1238 // It will NOT poll boards handled by hard interrupts.
1239 // The issue of queued BH interrups is handled in ip2_interrupt().
David Howells7d12e782006-10-05 14:55:46 +01001240 ip2_interrupt(0, NULL);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001241
1242 PollTimer.expires = POLL_TIMEOUT;
1243 add_timer( &PollTimer );
1244 TimerOn = 1;
1245
1246 ip2trace (ITRC_NO_PORT, ITRC_INTR, ITRC_RETURN, 0 );
1247}
1248
David Howellsc4028952006-11-22 14:57:56 +00001249static void do_input(struct work_struct *work)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001250{
David Howellsc4028952006-11-22 14:57:56 +00001251 i2ChanStrPtr pCh = container_of(work, i2ChanStr, tqueue_input);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001252 unsigned long flags;
1253
1254 ip2trace(CHANN, ITRC_INPUT, 21, 0 );
1255
1256 // Data input
1257 if ( pCh->pTTY != NULL ) {
1258 READ_LOCK_IRQSAVE(&pCh->Ibuf_spinlock,flags)
1259 if (!pCh->throttled && (pCh->Ibuf_stuff != pCh->Ibuf_strip)) {
1260 READ_UNLOCK_IRQRESTORE(&pCh->Ibuf_spinlock,flags)
1261 i2Input( pCh );
1262 } else
1263 READ_UNLOCK_IRQRESTORE(&pCh->Ibuf_spinlock,flags)
1264 } else {
1265 ip2trace(CHANN, ITRC_INPUT, 22, 0 );
1266
1267 i2InputFlush( pCh );
1268 }
1269}
1270
1271// code duplicated from n_tty (ldisc)
1272static inline void isig(int sig, struct tty_struct *tty, int flush)
1273{
1274 if (tty->pgrp > 0)
1275 kill_pg(tty->pgrp, sig, 1);
1276 if (flush || !L_NOFLSH(tty)) {
1277 if ( tty->ldisc.flush_buffer )
1278 tty->ldisc.flush_buffer(tty);
1279 i2InputFlush( tty->driver_data );
1280 }
1281}
1282
David Howellsc4028952006-11-22 14:57:56 +00001283static void do_status(struct work_struct *work)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001284{
David Howellsc4028952006-11-22 14:57:56 +00001285 i2ChanStrPtr pCh = container_of(work, i2ChanStr, tqueue_status);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001286 int status;
1287
1288 status = i2GetStatus( pCh, (I2_BRK|I2_PAR|I2_FRA|I2_OVR) );
1289
1290 ip2trace (CHANN, ITRC_STATUS, 21, 1, status );
1291
1292 if (pCh->pTTY && (status & (I2_BRK|I2_PAR|I2_FRA|I2_OVR)) ) {
1293 if ( (status & I2_BRK) ) {
1294 // code duplicated from n_tty (ldisc)
1295 if (I_IGNBRK(pCh->pTTY))
1296 goto skip_this;
1297 if (I_BRKINT(pCh->pTTY)) {
1298 isig(SIGINT, pCh->pTTY, 1);
1299 goto skip_this;
1300 }
1301 wake_up_interruptible(&pCh->pTTY->read_wait);
1302 }
1303#ifdef NEVER_HAPPENS_AS_SETUP_XXX
1304 // and can't work because we don't know the_char
1305 // as the_char is reported on a separate path
1306 // The intelligent board does this stuff as setup
1307 {
1308 char brkf = TTY_NORMAL;
1309 unsigned char brkc = '\0';
1310 unsigned char tmp;
1311 if ( (status & I2_BRK) ) {
1312 brkf = TTY_BREAK;
1313 brkc = '\0';
1314 }
1315 else if (status & I2_PAR) {
1316 brkf = TTY_PARITY;
1317 brkc = the_char;
1318 } else if (status & I2_FRA) {
1319 brkf = TTY_FRAME;
1320 brkc = the_char;
1321 } else if (status & I2_OVR) {
1322 brkf = TTY_OVERRUN;
1323 brkc = the_char;
1324 }
1325 tmp = pCh->pTTY->real_raw;
1326 pCh->pTTY->real_raw = 0;
1327 pCh->pTTY->ldisc.receive_buf( pCh->pTTY, &brkc, &brkf, 1 );
1328 pCh->pTTY->real_raw = tmp;
1329 }
1330#endif /* NEVER_HAPPENS_AS_SETUP_XXX */
1331 }
1332skip_this:
1333
1334 if ( status & (I2_DDCD | I2_DDSR | I2_DCTS | I2_DRI) ) {
1335 wake_up_interruptible(&pCh->delta_msr_wait);
1336
1337 if ( (pCh->flags & ASYNC_CHECK_CD) && (status & I2_DDCD) ) {
1338 if ( status & I2_DCD ) {
1339 if ( pCh->wopen ) {
1340 wake_up_interruptible ( &pCh->open_wait );
1341 }
1342 } else {
1343 if (pCh->pTTY && (!(pCh->pTTY->termios->c_cflag & CLOCAL)) ) {
1344 tty_hangup( pCh->pTTY );
1345 }
1346 }
1347 }
1348 }
1349
1350 ip2trace (CHANN, ITRC_STATUS, 26, 0 );
1351}
1352
1353/******************************************************************************/
1354/* Device Open/Close/Ioctl Entry Point Section */
1355/******************************************************************************/
1356
1357/******************************************************************************/
1358/* Function: open_sanity_check() */
1359/* Parameters: Pointer to tty structure */
1360/* Pointer to file structure */
1361/* Returns: Success or failure */
1362/* */
1363/* Description: */
1364/* Verifies the structure magic numbers and cross links. */
1365/******************************************************************************/
1366#ifdef IP2DEBUG_OPEN
1367static void
1368open_sanity_check( i2ChanStrPtr pCh, i2eBordStrPtr pBrd )
1369{
1370 if ( pBrd->i2eValid != I2E_MAGIC ) {
1371 printk(KERN_ERR "IP2: invalid board structure\n" );
1372 } else if ( pBrd != pCh->pMyBord ) {
1373 printk(KERN_ERR "IP2: board structure pointer mismatch (%p)\n",
1374 pCh->pMyBord );
1375 } else if ( pBrd->i2eChannelCnt < pCh->port_index ) {
1376 printk(KERN_ERR "IP2: bad device index (%d)\n", pCh->port_index );
1377 } else if (&((i2ChanStrPtr)pBrd->i2eChannelPtr)[pCh->port_index] != pCh) {
1378 } else {
1379 printk(KERN_INFO "IP2: all pointers check out!\n" );
1380 }
1381}
1382#endif
1383
1384
1385/******************************************************************************/
1386/* Function: ip2_open() */
1387/* Parameters: Pointer to tty structure */
1388/* Pointer to file structure */
1389/* Returns: Success or failure */
1390/* */
1391/* Description: (MANDATORY) */
1392/* A successful device open has to run a gauntlet of checks before it */
1393/* completes. After some sanity checking and pointer setup, the function */
1394/* blocks until all conditions are satisfied. It then initialises the port to */
1395/* the default characteristics and returns. */
1396/******************************************************************************/
1397static int
1398ip2_open( PTTY tty, struct file *pFile )
1399{
1400 wait_queue_t wait;
1401 int rc = 0;
1402 int do_clocal = 0;
1403 i2ChanStrPtr pCh = DevTable[tty->index];
1404
1405 ip2trace (tty->index, ITRC_OPEN, ITRC_ENTER, 0 );
1406
1407 if ( pCh == NULL ) {
1408 return -ENODEV;
1409 }
1410 /* Setup pointer links in device and tty structures */
1411 pCh->pTTY = tty;
1412 tty->driver_data = pCh;
1413
1414#ifdef IP2DEBUG_OPEN
1415 printk(KERN_DEBUG \
1416 "IP2:open(tty=%p,pFile=%p):dev=%s,ch=%d,idx=%d\n",
1417 tty, pFile, tty->name, pCh->infl.hd.i2sChannel, pCh->port_index);
1418 open_sanity_check ( pCh, pCh->pMyBord );
1419#endif
1420
1421 i2QueueCommands(PTYPE_INLINE, pCh, 100, 3, CMD_DTRUP,CMD_RTSUP,CMD_DCD_REP);
1422 pCh->dataSetOut |= (I2_DTR | I2_RTS);
1423 serviceOutgoingFifo( pCh->pMyBord );
1424
1425 /* Block here until the port is ready (per serial and istallion) */
1426 /*
1427 * 1. If the port is in the middle of closing wait for the completion
1428 * and then return the appropriate error.
1429 */
1430 init_waitqueue_entry(&wait, current);
1431 add_wait_queue(&pCh->close_wait, &wait);
1432 set_current_state( TASK_INTERRUPTIBLE );
1433
1434 if ( tty_hung_up_p(pFile) || ( pCh->flags & ASYNC_CLOSING )) {
1435 if ( pCh->flags & ASYNC_CLOSING ) {
1436 schedule();
1437 }
1438 if ( tty_hung_up_p(pFile) ) {
1439 set_current_state( TASK_RUNNING );
1440 remove_wait_queue(&pCh->close_wait, &wait);
1441 return( pCh->flags & ASYNC_HUP_NOTIFY ) ? -EAGAIN : -ERESTARTSYS;
1442 }
1443 }
1444 set_current_state( TASK_RUNNING );
1445 remove_wait_queue(&pCh->close_wait, &wait);
1446
1447 /*
1448 * 3. Handle a non-blocking open of a normal port.
1449 */
1450 if ( (pFile->f_flags & O_NONBLOCK) || (tty->flags & (1<<TTY_IO_ERROR) )) {
1451 pCh->flags |= ASYNC_NORMAL_ACTIVE;
1452 goto noblock;
1453 }
1454 /*
1455 * 4. Now loop waiting for the port to be free and carrier present
1456 * (if required).
1457 */
1458 if ( tty->termios->c_cflag & CLOCAL )
1459 do_clocal = 1;
1460
1461#ifdef IP2DEBUG_OPEN
1462 printk(KERN_DEBUG "OpenBlock: do_clocal = %d\n", do_clocal);
1463#endif
1464
1465 ++pCh->wopen;
1466
1467 init_waitqueue_entry(&wait, current);
1468 add_wait_queue(&pCh->open_wait, &wait);
1469
1470 for(;;) {
1471 i2QueueCommands(PTYPE_INLINE, pCh, 100, 2, CMD_DTRUP, CMD_RTSUP);
1472 pCh->dataSetOut |= (I2_DTR | I2_RTS);
1473 set_current_state( TASK_INTERRUPTIBLE );
1474 serviceOutgoingFifo( pCh->pMyBord );
1475 if ( tty_hung_up_p(pFile) ) {
1476 set_current_state( TASK_RUNNING );
1477 remove_wait_queue(&pCh->open_wait, &wait);
1478 return ( pCh->flags & ASYNC_HUP_NOTIFY ) ? -EBUSY : -ERESTARTSYS;
1479 }
1480 if (!(pCh->flags & ASYNC_CLOSING) &&
1481 (do_clocal || (pCh->dataSetIn & I2_DCD) )) {
1482 rc = 0;
1483 break;
1484 }
1485
1486#ifdef IP2DEBUG_OPEN
1487 printk(KERN_DEBUG "ASYNC_CLOSING = %s\n",
1488 (pCh->flags & ASYNC_CLOSING)?"True":"False");
1489 printk(KERN_DEBUG "OpenBlock: waiting for CD or signal\n");
1490#endif
1491 ip2trace (CHANN, ITRC_OPEN, 3, 2, 0,
1492 (pCh->flags & ASYNC_CLOSING) );
1493 /* check for signal */
1494 if (signal_pending(current)) {
1495 rc = (( pCh->flags & ASYNC_HUP_NOTIFY ) ? -EAGAIN : -ERESTARTSYS);
1496 break;
1497 }
1498 schedule();
1499 }
1500 set_current_state( TASK_RUNNING );
1501 remove_wait_queue(&pCh->open_wait, &wait);
1502
1503 --pCh->wopen; //why count?
1504
1505 ip2trace (CHANN, ITRC_OPEN, 4, 0 );
1506
1507 if (rc != 0 ) {
1508 return rc;
1509 }
1510 pCh->flags |= ASYNC_NORMAL_ACTIVE;
1511
1512noblock:
1513
1514 /* first open - Assign termios structure to port */
1515 if ( tty->count == 1 ) {
1516 i2QueueCommands(PTYPE_INLINE, pCh, 0, 2, CMD_CTSFL_DSAB, CMD_RTSFL_DSAB);
1517 /* Now we must send the termios settings to the loadware */
1518 set_params( pCh, NULL );
1519 }
1520
1521 /*
1522 * Now set any i2lib options. These may go away if the i2lib code ends
1523 * up rolled into the mainline.
1524 */
1525 pCh->channelOptions |= CO_NBLOCK_WRITE;
1526
1527#ifdef IP2DEBUG_OPEN
1528 printk (KERN_DEBUG "IP2: open completed\n" );
1529#endif
1530 serviceOutgoingFifo( pCh->pMyBord );
1531
1532 ip2trace (CHANN, ITRC_OPEN, ITRC_RETURN, 0 );
1533
1534 return 0;
1535}
1536
1537/******************************************************************************/
1538/* Function: ip2_close() */
1539/* Parameters: Pointer to tty structure */
1540/* Pointer to file structure */
1541/* Returns: Nothing */
1542/* */
1543/* Description: */
1544/* */
1545/* */
1546/******************************************************************************/
1547static void
1548ip2_close( PTTY tty, struct file *pFile )
1549{
1550 i2ChanStrPtr pCh = tty->driver_data;
1551
1552 if ( !pCh ) {
1553 return;
1554 }
1555
1556 ip2trace (CHANN, ITRC_CLOSE, ITRC_ENTER, 0 );
1557
1558#ifdef IP2DEBUG_OPEN
1559 printk(KERN_DEBUG "IP2:close %s:\n",tty->name);
1560#endif
1561
1562 if ( tty_hung_up_p ( pFile ) ) {
1563
1564 ip2trace (CHANN, ITRC_CLOSE, 2, 1, 2 );
1565
1566 return;
1567 }
1568 if ( tty->count > 1 ) { /* not the last close */
1569
1570 ip2trace (CHANN, ITRC_CLOSE, 2, 1, 3 );
1571
1572 return;
1573 }
1574 pCh->flags |= ASYNC_CLOSING; // last close actually
1575
1576 tty->closing = 1;
1577
1578 if (pCh->ClosingWaitTime != ASYNC_CLOSING_WAIT_NONE) {
1579 /*
1580 * Before we drop DTR, make sure the transmitter has completely drained.
1581 * This uses an timeout, after which the close
1582 * completes.
1583 */
1584 ip2_wait_until_sent(tty, pCh->ClosingWaitTime );
1585 }
1586 /*
1587 * At this point we stop accepting input. Here we flush the channel
1588 * input buffer which will allow the board to send up more data. Any
1589 * additional input is tossed at interrupt/poll time.
1590 */
1591 i2InputFlush( pCh );
1592
1593 /* disable DSS reporting */
1594 i2QueueCommands(PTYPE_INLINE, pCh, 100, 4,
1595 CMD_DCD_NREP, CMD_CTS_NREP, CMD_DSR_NREP, CMD_RI_NREP);
1596 if ( !tty || (tty->termios->c_cflag & HUPCL) ) {
1597 i2QueueCommands(PTYPE_INLINE, pCh, 100, 2, CMD_RTSDN, CMD_DTRDN);
1598 pCh->dataSetOut &= ~(I2_DTR | I2_RTS);
1599 i2QueueCommands( PTYPE_INLINE, pCh, 100, 1, CMD_PAUSE(25));
1600 }
1601
1602 serviceOutgoingFifo ( pCh->pMyBord );
1603
1604 if ( tty->driver->flush_buffer )
1605 tty->driver->flush_buffer(tty);
1606 if ( tty->ldisc.flush_buffer )
1607 tty->ldisc.flush_buffer(tty);
1608 tty->closing = 0;
1609
1610 pCh->pTTY = NULL;
1611
1612 if (pCh->wopen) {
1613 if (pCh->ClosingDelay) {
1614 msleep_interruptible(jiffies_to_msecs(pCh->ClosingDelay));
1615 }
1616 wake_up_interruptible(&pCh->open_wait);
1617 }
1618
1619 pCh->flags &=~(ASYNC_NORMAL_ACTIVE|ASYNC_CLOSING);
1620 wake_up_interruptible(&pCh->close_wait);
1621
1622#ifdef IP2DEBUG_OPEN
1623 DBG_CNT("ip2_close: after wakeups--");
1624#endif
1625
1626
1627 ip2trace (CHANN, ITRC_CLOSE, ITRC_RETURN, 1, 1 );
1628
1629 return;
1630}
1631
1632/******************************************************************************/
1633/* Function: ip2_hangup() */
1634/* Parameters: Pointer to tty structure */
1635/* Returns: Nothing */
1636/* */
1637/* Description: */
1638/* */
1639/* */
1640/******************************************************************************/
1641static void
1642ip2_hangup ( PTTY tty )
1643{
1644 i2ChanStrPtr pCh = tty->driver_data;
1645
1646 if( !pCh ) {
1647 return;
1648 }
1649
1650 ip2trace (CHANN, ITRC_HANGUP, ITRC_ENTER, 0 );
1651
1652 ip2_flush_buffer(tty);
1653
1654 /* disable DSS reporting */
1655
1656 i2QueueCommands(PTYPE_BYPASS, pCh, 0, 1, CMD_DCD_NREP);
1657 i2QueueCommands(PTYPE_INLINE, pCh, 0, 2, CMD_CTSFL_DSAB, CMD_RTSFL_DSAB);
1658 if ( (tty->termios->c_cflag & HUPCL) ) {
1659 i2QueueCommands(PTYPE_BYPASS, pCh, 0, 2, CMD_RTSDN, CMD_DTRDN);
1660 pCh->dataSetOut &= ~(I2_DTR | I2_RTS);
1661 i2QueueCommands( PTYPE_INLINE, pCh, 100, 1, CMD_PAUSE(25));
1662 }
1663 i2QueueCommands(PTYPE_INLINE, pCh, 1, 3,
1664 CMD_CTS_NREP, CMD_DSR_NREP, CMD_RI_NREP);
1665 serviceOutgoingFifo ( pCh->pMyBord );
1666
1667 wake_up_interruptible ( &pCh->delta_msr_wait );
1668
1669 pCh->flags &= ~ASYNC_NORMAL_ACTIVE;
1670 pCh->pTTY = NULL;
1671 wake_up_interruptible ( &pCh->open_wait );
1672
1673 ip2trace (CHANN, ITRC_HANGUP, ITRC_RETURN, 0 );
1674}
1675
1676/******************************************************************************/
1677/******************************************************************************/
1678/* Device Output Section */
1679/******************************************************************************/
1680/******************************************************************************/
1681
1682/******************************************************************************/
1683/* Function: ip2_write() */
1684/* Parameters: Pointer to tty structure */
1685/* Flag denoting data is in user (1) or kernel (0) space */
1686/* Pointer to data */
1687/* Number of bytes to write */
1688/* Returns: Number of bytes actually written */
1689/* */
1690/* Description: (MANDATORY) */
1691/* */
1692/* */
1693/******************************************************************************/
1694static int
Alan Coxd9e39532006-01-09 20:54:20 -08001695ip2_write( PTTY tty, const unsigned char *pData, int count)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001696{
1697 i2ChanStrPtr pCh = tty->driver_data;
1698 int bytesSent = 0;
1699 unsigned long flags;
1700
1701 ip2trace (CHANN, ITRC_WRITE, ITRC_ENTER, 2, count, -1 );
1702
1703 /* Flush out any buffered data left over from ip2_putchar() calls. */
1704 ip2_flush_chars( tty );
1705
1706 /* This is the actual move bit. Make sure it does what we need!!!!! */
1707 WRITE_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
Al Virof061c582006-10-11 17:45:47 +01001708 bytesSent = i2Output( pCh, pData, count);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001709 WRITE_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1710
1711 ip2trace (CHANN, ITRC_WRITE, ITRC_RETURN, 1, bytesSent );
1712
1713 return bytesSent > 0 ? bytesSent : 0;
1714}
1715
1716/******************************************************************************/
1717/* Function: ip2_putchar() */
1718/* Parameters: Pointer to tty structure */
1719/* Character to write */
1720/* Returns: Nothing */
1721/* */
1722/* Description: */
1723/* */
1724/* */
1725/******************************************************************************/
1726static void
1727ip2_putchar( PTTY tty, unsigned char ch )
1728{
1729 i2ChanStrPtr pCh = tty->driver_data;
1730 unsigned long flags;
1731
1732// ip2trace (CHANN, ITRC_PUTC, ITRC_ENTER, 1, ch );
1733
1734 WRITE_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
1735 pCh->Pbuf[pCh->Pbuf_stuff++] = ch;
1736 if ( pCh->Pbuf_stuff == sizeof pCh->Pbuf ) {
1737 WRITE_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1738 ip2_flush_chars( tty );
1739 } else
1740 WRITE_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1741
1742// ip2trace (CHANN, ITRC_PUTC, ITRC_RETURN, 1, ch );
1743}
1744
1745/******************************************************************************/
1746/* Function: ip2_flush_chars() */
1747/* Parameters: Pointer to tty structure */
1748/* Returns: Nothing */
1749/* */
1750/* Description: */
1751/* */
1752/******************************************************************************/
1753static void
1754ip2_flush_chars( PTTY tty )
1755{
1756 int strip;
1757 i2ChanStrPtr pCh = tty->driver_data;
1758 unsigned long flags;
1759
1760 WRITE_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
1761 if ( pCh->Pbuf_stuff ) {
1762
1763// ip2trace (CHANN, ITRC_PUTC, 10, 1, strip );
1764
1765 //
1766 // We may need to restart i2Output if it does not fullfill this request
1767 //
Al Virof061c582006-10-11 17:45:47 +01001768 strip = i2Output( pCh, pCh->Pbuf, pCh->Pbuf_stuff);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001769 if ( strip != pCh->Pbuf_stuff ) {
1770 memmove( pCh->Pbuf, &pCh->Pbuf[strip], pCh->Pbuf_stuff - strip );
1771 }
1772 pCh->Pbuf_stuff -= strip;
1773 }
1774 WRITE_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1775}
1776
1777/******************************************************************************/
1778/* Function: ip2_write_room() */
1779/* Parameters: Pointer to tty structure */
1780/* Returns: Number of bytes that the driver can accept */
1781/* */
1782/* Description: */
1783/* */
1784/******************************************************************************/
1785static int
1786ip2_write_room ( PTTY tty )
1787{
1788 int bytesFree;
1789 i2ChanStrPtr pCh = tty->driver_data;
1790 unsigned long flags;
1791
1792 READ_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
1793 bytesFree = i2OutputFree( pCh ) - pCh->Pbuf_stuff;
1794 READ_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1795
1796 ip2trace (CHANN, ITRC_WRITE, 11, 1, bytesFree );
1797
1798 return ((bytesFree > 0) ? bytesFree : 0);
1799}
1800
1801/******************************************************************************/
1802/* Function: ip2_chars_in_buf() */
1803/* Parameters: Pointer to tty structure */
1804/* Returns: Number of bytes queued for transmission */
1805/* */
1806/* Description: */
1807/* */
1808/* */
1809/******************************************************************************/
1810static int
1811ip2_chars_in_buf ( PTTY tty )
1812{
1813 i2ChanStrPtr pCh = tty->driver_data;
1814 int rc;
1815 unsigned long flags;
1816
1817 ip2trace (CHANN, ITRC_WRITE, 12, 1, pCh->Obuf_char_count + pCh->Pbuf_stuff );
1818
1819#ifdef IP2DEBUG_WRITE
1820 printk (KERN_DEBUG "IP2: chars in buffer = %d (%d,%d)\n",
1821 pCh->Obuf_char_count + pCh->Pbuf_stuff,
1822 pCh->Obuf_char_count, pCh->Pbuf_stuff );
1823#endif
1824 READ_LOCK_IRQSAVE(&pCh->Obuf_spinlock,flags);
1825 rc = pCh->Obuf_char_count;
1826 READ_UNLOCK_IRQRESTORE(&pCh->Obuf_spinlock,flags);
1827 READ_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
1828 rc += pCh->Pbuf_stuff;
1829 READ_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1830 return rc;
1831}
1832
1833/******************************************************************************/
1834/* Function: ip2_flush_buffer() */
1835/* Parameters: Pointer to tty structure */
1836/* Returns: Nothing */
1837/* */
1838/* Description: */
1839/* */
1840/* */
1841/******************************************************************************/
1842static void
1843ip2_flush_buffer( PTTY tty )
1844{
1845 i2ChanStrPtr pCh = tty->driver_data;
1846 unsigned long flags;
1847
1848 ip2trace (CHANN, ITRC_FLUSH, ITRC_ENTER, 0 );
1849
1850#ifdef IP2DEBUG_WRITE
1851 printk (KERN_DEBUG "IP2: flush buffer\n" );
1852#endif
1853 WRITE_LOCK_IRQSAVE(&pCh->Pbuf_spinlock,flags);
1854 pCh->Pbuf_stuff = 0;
1855 WRITE_UNLOCK_IRQRESTORE(&pCh->Pbuf_spinlock,flags);
1856 i2FlushOutput( pCh );
1857 ip2_owake(tty);
1858
1859 ip2trace (CHANN, ITRC_FLUSH, ITRC_RETURN, 0 );
1860
1861}
1862
1863/******************************************************************************/
1864/* Function: ip2_wait_until_sent() */
1865/* Parameters: Pointer to tty structure */
1866/* Timeout for wait. */
1867/* Returns: Nothing */
1868/* */
1869/* Description: */
1870/* This function is used in place of the normal tty_wait_until_sent, which */
1871/* only waits for the driver buffers to be empty (or rather, those buffers */
1872/* reported by chars_in_buffer) which doesn't work for IP2 due to the */
1873/* indeterminate number of bytes buffered on the board. */
1874/******************************************************************************/
1875static void
1876ip2_wait_until_sent ( PTTY tty, int timeout )
1877{
1878 int i = jiffies;
1879 i2ChanStrPtr pCh = tty->driver_data;
1880
1881 tty_wait_until_sent(tty, timeout );
1882 if ( (i = timeout - (jiffies -i)) > 0)
1883 i2DrainOutput( pCh, i );
1884}
1885
1886/******************************************************************************/
1887/******************************************************************************/
1888/* Device Input Section */
1889/******************************************************************************/
1890/******************************************************************************/
1891
1892/******************************************************************************/
1893/* Function: ip2_throttle() */
1894/* Parameters: Pointer to tty structure */
1895/* Returns: Nothing */
1896/* */
1897/* Description: */
1898/* */
1899/* */
1900/******************************************************************************/
1901static void
1902ip2_throttle ( PTTY tty )
1903{
1904 i2ChanStrPtr pCh = tty->driver_data;
1905
1906#ifdef IP2DEBUG_READ
1907 printk (KERN_DEBUG "IP2: throttle\n" );
1908#endif
1909 /*
1910 * Signal the poll/interrupt handlers not to forward incoming data to
1911 * the line discipline. This will cause the buffers to fill up in the
1912 * library and thus cause the library routines to send the flow control
1913 * stuff.
1914 */
1915 pCh->throttled = 1;
1916}
1917
1918/******************************************************************************/
1919/* Function: ip2_unthrottle() */
1920/* Parameters: Pointer to tty structure */
1921/* Returns: Nothing */
1922/* */
1923/* Description: */
1924/* */
1925/* */
1926/******************************************************************************/
1927static void
1928ip2_unthrottle ( PTTY tty )
1929{
1930 i2ChanStrPtr pCh = tty->driver_data;
1931 unsigned long flags;
1932
1933#ifdef IP2DEBUG_READ
1934 printk (KERN_DEBUG "IP2: unthrottle\n" );
1935#endif
1936
1937 /* Pass incoming data up to the line discipline again. */
1938 pCh->throttled = 0;
1939 i2QueueCommands(PTYPE_BYPASS, pCh, 0, 1, CMD_RESUME);
1940 serviceOutgoingFifo( pCh->pMyBord );
1941 READ_LOCK_IRQSAVE(&pCh->Ibuf_spinlock,flags)
1942 if ( pCh->Ibuf_stuff != pCh->Ibuf_strip ) {
1943 READ_UNLOCK_IRQRESTORE(&pCh->Ibuf_spinlock,flags)
1944#ifdef IP2DEBUG_READ
1945 printk (KERN_DEBUG "i2Input called from unthrottle\n" );
1946#endif
1947 i2Input( pCh );
1948 } else
1949 READ_UNLOCK_IRQRESTORE(&pCh->Ibuf_spinlock,flags)
1950}
1951
1952static void
1953ip2_start ( PTTY tty )
1954{
1955 i2ChanStrPtr pCh = DevTable[tty->index];
1956
1957 i2QueueCommands(PTYPE_BYPASS, pCh, 0, 1, CMD_RESUME);
1958 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_UNSUSPEND);
1959 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_RESUME);
1960#ifdef IP2DEBUG_WRITE
1961 printk (KERN_DEBUG "IP2: start tx\n" );
1962#endif
1963}
1964
1965static void
1966ip2_stop ( PTTY tty )
1967{
1968 i2ChanStrPtr pCh = DevTable[tty->index];
1969
1970 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_SUSPEND);
1971#ifdef IP2DEBUG_WRITE
1972 printk (KERN_DEBUG "IP2: stop tx\n" );
1973#endif
1974}
1975
1976/******************************************************************************/
1977/* Device Ioctl Section */
1978/******************************************************************************/
1979
1980static int ip2_tiocmget(struct tty_struct *tty, struct file *file)
1981{
1982 i2ChanStrPtr pCh = DevTable[tty->index];
Alan Coxd9e39532006-01-09 20:54:20 -08001983#ifdef ENABLE_DSSNOW
Linus Torvalds1da177e2005-04-16 15:20:36 -07001984 wait_queue_t wait;
Alan Coxd9e39532006-01-09 20:54:20 -08001985#endif
Linus Torvalds1da177e2005-04-16 15:20:36 -07001986
1987 if (pCh == NULL)
1988 return -ENODEV;
1989
1990/*
1991 FIXME - the following code is causing a NULL pointer dereference in
1992 2.3.51 in an interrupt handler. It's suppose to prompt the board
1993 to return the DSS signal status immediately. Why doesn't it do
1994 the same thing in 2.2.14?
1995*/
1996
1997/* This thing is still busted in the 1.2.12 driver on 2.4.x
1998 and even hoses the serial console so the oops can be trapped.
1999 /\/\|=mhw=|\/\/ */
2000
2001#ifdef ENABLE_DSSNOW
2002 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_DSS_NOW);
2003
2004 init_waitqueue_entry(&wait, current);
2005 add_wait_queue(&pCh->dss_now_wait, &wait);
2006 set_current_state( TASK_INTERRUPTIBLE );
2007
2008 serviceOutgoingFifo( pCh->pMyBord );
2009
2010 schedule();
2011
2012 set_current_state( TASK_RUNNING );
2013 remove_wait_queue(&pCh->dss_now_wait, &wait);
2014
2015 if (signal_pending(current)) {
2016 return -EINTR;
2017 }
2018#endif
2019 return ((pCh->dataSetOut & I2_RTS) ? TIOCM_RTS : 0)
2020 | ((pCh->dataSetOut & I2_DTR) ? TIOCM_DTR : 0)
2021 | ((pCh->dataSetIn & I2_DCD) ? TIOCM_CAR : 0)
2022 | ((pCh->dataSetIn & I2_RI) ? TIOCM_RNG : 0)
2023 | ((pCh->dataSetIn & I2_DSR) ? TIOCM_DSR : 0)
2024 | ((pCh->dataSetIn & I2_CTS) ? TIOCM_CTS : 0);
2025}
2026
2027static int ip2_tiocmset(struct tty_struct *tty, struct file *file,
2028 unsigned int set, unsigned int clear)
2029{
2030 i2ChanStrPtr pCh = DevTable[tty->index];
2031
2032 if (pCh == NULL)
2033 return -ENODEV;
2034
2035 if (set & TIOCM_RTS) {
2036 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_RTSUP);
2037 pCh->dataSetOut |= I2_RTS;
2038 }
2039 if (set & TIOCM_DTR) {
2040 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DTRUP);
2041 pCh->dataSetOut |= I2_DTR;
2042 }
2043
2044 if (clear & TIOCM_RTS) {
2045 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_RTSDN);
2046 pCh->dataSetOut &= ~I2_RTS;
2047 }
2048 if (clear & TIOCM_DTR) {
2049 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DTRDN);
2050 pCh->dataSetOut &= ~I2_DTR;
2051 }
2052 serviceOutgoingFifo( pCh->pMyBord );
2053 return 0;
2054}
2055
2056/******************************************************************************/
2057/* Function: ip2_ioctl() */
2058/* Parameters: Pointer to tty structure */
2059/* Pointer to file structure */
2060/* Command */
2061/* Argument */
2062/* Returns: Success or failure */
2063/* */
2064/* Description: */
2065/* */
2066/* */
2067/******************************************************************************/
2068static int
2069ip2_ioctl ( PTTY tty, struct file *pFile, UINT cmd, ULONG arg )
2070{
2071 wait_queue_t wait;
2072 i2ChanStrPtr pCh = DevTable[tty->index];
Alan Coxd9e39532006-01-09 20:54:20 -08002073 i2eBordStrPtr pB;
Linus Torvalds1da177e2005-04-16 15:20:36 -07002074 struct async_icount cprev, cnow; /* kernel counter temps */
2075 struct serial_icounter_struct __user *p_cuser;
2076 int rc = 0;
2077 unsigned long flags;
2078 void __user *argp = (void __user *)arg;
2079
Alan Coxd9e39532006-01-09 20:54:20 -08002080 if ( pCh == NULL )
Linus Torvalds1da177e2005-04-16 15:20:36 -07002081 return -ENODEV;
Alan Coxd9e39532006-01-09 20:54:20 -08002082
2083 pB = pCh->pMyBord;
Linus Torvalds1da177e2005-04-16 15:20:36 -07002084
2085 ip2trace (CHANN, ITRC_IOCTL, ITRC_ENTER, 2, cmd, arg );
2086
2087#ifdef IP2DEBUG_IOCTL
2088 printk(KERN_DEBUG "IP2: ioctl cmd (%x), arg (%lx)\n", cmd, arg );
2089#endif
2090
2091 switch(cmd) {
2092 case TIOCGSERIAL:
2093
2094 ip2trace (CHANN, ITRC_IOCTL, 2, 1, rc );
2095
2096 rc = get_serial_info(pCh, argp);
2097 if (rc)
2098 return rc;
2099 break;
2100
2101 case TIOCSSERIAL:
2102
2103 ip2trace (CHANN, ITRC_IOCTL, 3, 1, rc );
2104
2105 rc = set_serial_info(pCh, argp);
2106 if (rc)
2107 return rc;
2108 break;
2109
2110 case TCXONC:
2111 rc = tty_check_change(tty);
2112 if (rc)
2113 return rc;
2114 switch (arg) {
2115 case TCOOFF:
2116 //return -ENOIOCTLCMD;
2117 break;
2118 case TCOON:
2119 //return -ENOIOCTLCMD;
2120 break;
2121 case TCIOFF:
2122 if (STOP_CHAR(tty) != __DISABLED_CHAR) {
2123 i2QueueCommands( PTYPE_BYPASS, pCh, 100, 1,
2124 CMD_XMIT_NOW(STOP_CHAR(tty)));
2125 }
2126 break;
2127 case TCION:
2128 if (START_CHAR(tty) != __DISABLED_CHAR) {
2129 i2QueueCommands( PTYPE_BYPASS, pCh, 100, 1,
2130 CMD_XMIT_NOW(START_CHAR(tty)));
2131 }
2132 break;
2133 default:
2134 return -EINVAL;
2135 }
2136 return 0;
2137
2138 case TCSBRK: /* SVID version: non-zero arg --> no break */
2139 rc = tty_check_change(tty);
2140
2141 ip2trace (CHANN, ITRC_IOCTL, 4, 1, rc );
2142
2143 if (!rc) {
2144 ip2_wait_until_sent(tty,0);
2145 if (!arg) {
2146 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_SEND_BRK(250));
2147 serviceOutgoingFifo( pCh->pMyBord );
2148 }
2149 }
2150 break;
2151
2152 case TCSBRKP: /* support for POSIX tcsendbreak() */
2153 rc = tty_check_change(tty);
2154
2155 ip2trace (CHANN, ITRC_IOCTL, 5, 1, rc );
2156
2157 if (!rc) {
2158 ip2_wait_until_sent(tty,0);
2159 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1,
2160 CMD_SEND_BRK(arg ? arg*100 : 250));
2161 serviceOutgoingFifo ( pCh->pMyBord );
2162 }
2163 break;
2164
2165 case TIOCGSOFTCAR:
2166
2167 ip2trace (CHANN, ITRC_IOCTL, 6, 1, rc );
2168
2169 rc = put_user(C_CLOCAL(tty) ? 1 : 0, (unsigned long __user *)argp);
2170 if (rc)
2171 return rc;
2172 break;
2173
2174 case TIOCSSOFTCAR:
2175
2176 ip2trace (CHANN, ITRC_IOCTL, 7, 1, rc );
2177
2178 rc = get_user(arg,(unsigned long __user *) argp);
2179 if (rc)
2180 return rc;
2181 tty->termios->c_cflag = ((tty->termios->c_cflag & ~CLOCAL)
2182 | (arg ? CLOCAL : 0));
2183
2184 break;
2185
2186 /*
2187 * Wait for any of the 4 modem inputs (DCD,RI,DSR,CTS) to change - mask
2188 * passed in arg for lines of interest (use |'ed TIOCM_RNG/DSR/CD/CTS
2189 * for masking). Caller should use TIOCGICOUNT to see which one it was
2190 */
2191 case TIOCMIWAIT:
Alan Coxd9e39532006-01-09 20:54:20 -08002192 WRITE_LOCK_IRQSAVE(&pB->read_fifo_spinlock, flags);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002193 cprev = pCh->icount; /* note the counters on entry */
Alan Coxd9e39532006-01-09 20:54:20 -08002194 WRITE_UNLOCK_IRQRESTORE(&pB->read_fifo_spinlock, flags);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002195 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 4,
2196 CMD_DCD_REP, CMD_CTS_REP, CMD_DSR_REP, CMD_RI_REP);
2197 init_waitqueue_entry(&wait, current);
2198 add_wait_queue(&pCh->delta_msr_wait, &wait);
2199 set_current_state( TASK_INTERRUPTIBLE );
2200
2201 serviceOutgoingFifo( pCh->pMyBord );
2202 for(;;) {
2203 ip2trace (CHANN, ITRC_IOCTL, 10, 0 );
2204
2205 schedule();
2206
2207 ip2trace (CHANN, ITRC_IOCTL, 11, 0 );
2208
2209 /* see if a signal did it */
2210 if (signal_pending(current)) {
2211 rc = -ERESTARTSYS;
2212 break;
2213 }
Alan Coxd9e39532006-01-09 20:54:20 -08002214 WRITE_LOCK_IRQSAVE(&pB->read_fifo_spinlock, flags);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002215 cnow = pCh->icount; /* atomic copy */
Alan Coxd9e39532006-01-09 20:54:20 -08002216 WRITE_UNLOCK_IRQRESTORE(&pB->read_fifo_spinlock, flags);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002217 if (cnow.rng == cprev.rng && cnow.dsr == cprev.dsr &&
2218 cnow.dcd == cprev.dcd && cnow.cts == cprev.cts) {
2219 rc = -EIO; /* no change => rc */
2220 break;
2221 }
2222 if (((arg & TIOCM_RNG) && (cnow.rng != cprev.rng)) ||
2223 ((arg & TIOCM_DSR) && (cnow.dsr != cprev.dsr)) ||
2224 ((arg & TIOCM_CD) && (cnow.dcd != cprev.dcd)) ||
2225 ((arg & TIOCM_CTS) && (cnow.cts != cprev.cts)) ) {
2226 rc = 0;
2227 break;
2228 }
2229 cprev = cnow;
2230 }
2231 set_current_state( TASK_RUNNING );
2232 remove_wait_queue(&pCh->delta_msr_wait, &wait);
2233
2234 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 3,
2235 CMD_CTS_NREP, CMD_DSR_NREP, CMD_RI_NREP);
2236 if ( ! (pCh->flags & ASYNC_CHECK_CD)) {
2237 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_DCD_NREP);
2238 }
2239 serviceOutgoingFifo( pCh->pMyBord );
2240 return rc;
2241 break;
2242
2243 /*
2244 * Get counter of input serial line interrupts (DCD,RI,DSR,CTS)
2245 * Return: write counters to the user passed counter struct
2246 * NB: both 1->0 and 0->1 transitions are counted except for RI where
2247 * only 0->1 is counted. The controller is quite capable of counting
2248 * both, but this done to preserve compatibility with the standard
2249 * serial driver.
2250 */
2251 case TIOCGICOUNT:
2252 ip2trace (CHANN, ITRC_IOCTL, 11, 1, rc );
2253
Alan Coxd9e39532006-01-09 20:54:20 -08002254 WRITE_LOCK_IRQSAVE(&pB->read_fifo_spinlock, flags);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002255 cnow = pCh->icount;
Alan Coxd9e39532006-01-09 20:54:20 -08002256 WRITE_UNLOCK_IRQRESTORE(&pB->read_fifo_spinlock, flags);
Linus Torvalds1da177e2005-04-16 15:20:36 -07002257 p_cuser = argp;
2258 rc = put_user(cnow.cts, &p_cuser->cts);
2259 rc = put_user(cnow.dsr, &p_cuser->dsr);
2260 rc = put_user(cnow.rng, &p_cuser->rng);
2261 rc = put_user(cnow.dcd, &p_cuser->dcd);
2262 rc = put_user(cnow.rx, &p_cuser->rx);
2263 rc = put_user(cnow.tx, &p_cuser->tx);
2264 rc = put_user(cnow.frame, &p_cuser->frame);
2265 rc = put_user(cnow.overrun, &p_cuser->overrun);
2266 rc = put_user(cnow.parity, &p_cuser->parity);
2267 rc = put_user(cnow.brk, &p_cuser->brk);
2268 rc = put_user(cnow.buf_overrun, &p_cuser->buf_overrun);
2269 break;
2270
2271 /*
2272 * The rest are not supported by this driver. By returning -ENOIOCTLCMD they
2273 * will be passed to the line discipline for it to handle.
2274 */
2275 case TIOCSERCONFIG:
2276 case TIOCSERGWILD:
2277 case TIOCSERGETLSR:
2278 case TIOCSERSWILD:
2279 case TIOCSERGSTRUCT:
2280 case TIOCSERGETMULTI:
2281 case TIOCSERSETMULTI:
2282
2283 default:
2284 ip2trace (CHANN, ITRC_IOCTL, 12, 0 );
2285
2286 rc = -ENOIOCTLCMD;
2287 break;
2288 }
2289
2290 ip2trace (CHANN, ITRC_IOCTL, ITRC_RETURN, 0 );
2291
2292 return rc;
2293}
2294
2295/******************************************************************************/
2296/* Function: GetSerialInfo() */
2297/* Parameters: Pointer to channel structure */
2298/* Pointer to old termios structure */
2299/* Returns: Nothing */
2300/* */
2301/* Description: */
2302/* This is to support the setserial command, and requires processing of the */
2303/* standard Linux serial structure. */
2304/******************************************************************************/
2305static int
2306get_serial_info ( i2ChanStrPtr pCh, struct serial_struct __user *retinfo )
2307{
2308 struct serial_struct tmp;
2309
2310 memset ( &tmp, 0, sizeof(tmp) );
2311 tmp.type = pCh->pMyBord->channelBtypes.bid_value[(pCh->port_index & (IP2_PORTS_PER_BOARD-1))/16];
2312 if (BID_HAS_654(tmp.type)) {
2313 tmp.type = PORT_16650;
2314 } else {
2315 tmp.type = PORT_CIRRUS;
2316 }
2317 tmp.line = pCh->port_index;
2318 tmp.port = pCh->pMyBord->i2eBase;
2319 tmp.irq = ip2config.irq[pCh->port_index/64];
2320 tmp.flags = pCh->flags;
2321 tmp.baud_base = pCh->BaudBase;
2322 tmp.close_delay = pCh->ClosingDelay;
2323 tmp.closing_wait = pCh->ClosingWaitTime;
2324 tmp.custom_divisor = pCh->BaudDivisor;
2325 return copy_to_user(retinfo,&tmp,sizeof(*retinfo));
2326}
2327
2328/******************************************************************************/
2329/* Function: SetSerialInfo() */
2330/* Parameters: Pointer to channel structure */
2331/* Pointer to old termios structure */
2332/* Returns: Nothing */
2333/* */
2334/* Description: */
2335/* This function provides support for setserial, which uses the TIOCSSERIAL */
2336/* ioctl. Not all setserial parameters are relevant. If the user attempts to */
2337/* change the IRQ, address or type of the port the ioctl fails. */
2338/******************************************************************************/
2339static int
2340set_serial_info( i2ChanStrPtr pCh, struct serial_struct __user *new_info )
2341{
2342 struct serial_struct ns;
2343 int old_flags, old_baud_divisor;
2344
2345 if (copy_from_user(&ns, new_info, sizeof (ns)))
2346 return -EFAULT;
2347
2348 /*
2349 * We don't allow setserial to change IRQ, board address, type or baud
2350 * base. Also line nunber as such is meaningless but we use it for our
2351 * array index so it is fixed also.
2352 */
2353 if ( (ns.irq != ip2config.irq[pCh->port_index])
2354 || ((int) ns.port != ((int) (pCh->pMyBord->i2eBase)))
2355 || (ns.baud_base != pCh->BaudBase)
2356 || (ns.line != pCh->port_index) ) {
2357 return -EINVAL;
2358 }
2359
2360 old_flags = pCh->flags;
2361 old_baud_divisor = pCh->BaudDivisor;
2362
2363 if ( !capable(CAP_SYS_ADMIN) ) {
2364 if ( ( ns.close_delay != pCh->ClosingDelay ) ||
2365 ( (ns.flags & ~ASYNC_USR_MASK) !=
2366 (pCh->flags & ~ASYNC_USR_MASK) ) ) {
2367 return -EPERM;
2368 }
2369
2370 pCh->flags = (pCh->flags & ~ASYNC_USR_MASK) |
2371 (ns.flags & ASYNC_USR_MASK);
2372 pCh->BaudDivisor = ns.custom_divisor;
2373 } else {
2374 pCh->flags = (pCh->flags & ~ASYNC_FLAGS) |
2375 (ns.flags & ASYNC_FLAGS);
2376 pCh->BaudDivisor = ns.custom_divisor;
2377 pCh->ClosingDelay = ns.close_delay * HZ/100;
2378 pCh->ClosingWaitTime = ns.closing_wait * HZ/100;
2379 }
2380
2381 if ( ( (old_flags & ASYNC_SPD_MASK) != (pCh->flags & ASYNC_SPD_MASK) )
2382 || (old_baud_divisor != pCh->BaudDivisor) ) {
2383 // Invalidate speed and reset parameters
2384 set_params( pCh, NULL );
2385 }
2386
2387 return 0;
2388}
2389
2390/******************************************************************************/
2391/* Function: ip2_set_termios() */
2392/* Parameters: Pointer to tty structure */
2393/* Pointer to old termios structure */
2394/* Returns: Nothing */
2395/* */
2396/* Description: */
2397/* */
2398/* */
2399/******************************************************************************/
2400static void
2401ip2_set_termios( PTTY tty, struct termios *old_termios )
2402{
2403 i2ChanStrPtr pCh = (i2ChanStrPtr)tty->driver_data;
2404
2405#ifdef IP2DEBUG_IOCTL
2406 printk (KERN_DEBUG "IP2: set termios %p\n", old_termios );
2407#endif
2408
2409 set_params( pCh, old_termios );
2410}
2411
2412/******************************************************************************/
2413/* Function: ip2_set_line_discipline() */
2414/* Parameters: Pointer to tty structure */
2415/* Returns: Nothing */
2416/* */
2417/* Description: Does nothing */
2418/* */
2419/* */
2420/******************************************************************************/
2421static void
2422ip2_set_line_discipline ( PTTY tty )
2423{
2424#ifdef IP2DEBUG_IOCTL
2425 printk (KERN_DEBUG "IP2: set line discipline\n" );
2426#endif
2427
2428 ip2trace (((i2ChanStrPtr)tty->driver_data)->port_index, ITRC_IOCTL, 16, 0 );
2429
2430}
2431
2432/******************************************************************************/
2433/* Function: SetLine Characteristics() */
2434/* Parameters: Pointer to channel structure */
2435/* Returns: Nothing */
2436/* */
2437/* Description: */
2438/* This routine is called to update the channel structure with the new line */
2439/* characteristics, and send the appropriate commands to the board when they */
2440/* change. */
2441/******************************************************************************/
2442static void
2443set_params( i2ChanStrPtr pCh, struct termios *o_tios )
2444{
2445 tcflag_t cflag, iflag, lflag;
2446 char stop_char, start_char;
2447 struct termios dummy;
2448
2449 lflag = pCh->pTTY->termios->c_lflag;
2450 cflag = pCh->pTTY->termios->c_cflag;
2451 iflag = pCh->pTTY->termios->c_iflag;
2452
2453 if (o_tios == NULL) {
2454 dummy.c_lflag = ~lflag;
2455 dummy.c_cflag = ~cflag;
2456 dummy.c_iflag = ~iflag;
2457 o_tios = &dummy;
2458 }
2459
2460 {
2461 switch ( cflag & CBAUD ) {
2462 case B0:
2463 i2QueueCommands( PTYPE_BYPASS, pCh, 100, 2, CMD_RTSDN, CMD_DTRDN);
2464 pCh->dataSetOut &= ~(I2_DTR | I2_RTS);
2465 i2QueueCommands( PTYPE_INLINE, pCh, 100, 1, CMD_PAUSE(25));
2466 pCh->pTTY->termios->c_cflag |= (CBAUD & o_tios->c_cflag);
2467 goto service_it;
2468 break;
2469 case B38400:
2470 /*
2471 * This is the speed that is overloaded with all the other high
2472 * speeds, depending upon the flag settings.
2473 */
2474 if ( ( pCh->flags & ASYNC_SPD_MASK ) == ASYNC_SPD_HI ) {
2475 pCh->speed = CBR_57600;
2476 } else if ( (pCh->flags & ASYNC_SPD_MASK) == ASYNC_SPD_VHI ) {
2477 pCh->speed = CBR_115200;
2478 } else if ( (pCh->flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST ) {
2479 pCh->speed = CBR_C1;
2480 } else {
2481 pCh->speed = CBR_38400;
2482 }
2483 break;
2484 case B50: pCh->speed = CBR_50; break;
2485 case B75: pCh->speed = CBR_75; break;
2486 case B110: pCh->speed = CBR_110; break;
2487 case B134: pCh->speed = CBR_134; break;
2488 case B150: pCh->speed = CBR_150; break;
2489 case B200: pCh->speed = CBR_200; break;
2490 case B300: pCh->speed = CBR_300; break;
2491 case B600: pCh->speed = CBR_600; break;
2492 case B1200: pCh->speed = CBR_1200; break;
2493 case B1800: pCh->speed = CBR_1800; break;
2494 case B2400: pCh->speed = CBR_2400; break;
2495 case B4800: pCh->speed = CBR_4800; break;
2496 case B9600: pCh->speed = CBR_9600; break;
2497 case B19200: pCh->speed = CBR_19200; break;
2498 case B57600: pCh->speed = CBR_57600; break;
2499 case B115200: pCh->speed = CBR_115200; break;
2500 case B153600: pCh->speed = CBR_153600; break;
2501 case B230400: pCh->speed = CBR_230400; break;
2502 case B307200: pCh->speed = CBR_307200; break;
2503 case B460800: pCh->speed = CBR_460800; break;
2504 case B921600: pCh->speed = CBR_921600; break;
2505 default: pCh->speed = CBR_9600; break;
2506 }
2507 if ( pCh->speed == CBR_C1 ) {
2508 // Process the custom speed parameters.
2509 int bps = pCh->BaudBase / pCh->BaudDivisor;
2510 if ( bps == 921600 ) {
2511 pCh->speed = CBR_921600;
2512 } else {
2513 bps = bps/10;
2514 i2QueueCommands( PTYPE_INLINE, pCh, 100, 1, CMD_BAUD_DEF1(bps) );
2515 }
2516 }
2517 i2QueueCommands( PTYPE_INLINE, pCh, 100, 1, CMD_SETBAUD(pCh->speed));
2518
2519 i2QueueCommands ( PTYPE_INLINE, pCh, 100, 2, CMD_DTRUP, CMD_RTSUP);
2520 pCh->dataSetOut |= (I2_DTR | I2_RTS);
2521 }
2522 if ( (CSTOPB & cflag) ^ (CSTOPB & o_tios->c_cflag))
2523 {
2524 i2QueueCommands ( PTYPE_INLINE, pCh, 100, 1,
2525 CMD_SETSTOP( ( cflag & CSTOPB ) ? CST_2 : CST_1));
2526 }
2527 if (((PARENB|PARODD) & cflag) ^ ((PARENB|PARODD) & o_tios->c_cflag))
2528 {
2529 i2QueueCommands ( PTYPE_INLINE, pCh, 100, 1,
2530 CMD_SETPAR(
2531 (cflag & PARENB ? (cflag & PARODD ? CSP_OD : CSP_EV) : CSP_NP)
2532 )
2533 );
2534 }
2535 /* byte size and parity */
2536 if ( (CSIZE & cflag)^(CSIZE & o_tios->c_cflag))
2537 {
2538 int datasize;
2539 switch ( cflag & CSIZE ) {
2540 case CS5: datasize = CSZ_5; break;
2541 case CS6: datasize = CSZ_6; break;
2542 case CS7: datasize = CSZ_7; break;
2543 case CS8: datasize = CSZ_8; break;
2544 default: datasize = CSZ_5; break; /* as per serial.c */
2545 }
2546 i2QueueCommands ( PTYPE_INLINE, pCh, 100, 1, CMD_SETBITS(datasize) );
2547 }
2548 /* Process CTS flow control flag setting */
2549 if ( (cflag & CRTSCTS) ) {
2550 i2QueueCommands(PTYPE_INLINE, pCh, 100,
2551 2, CMD_CTSFL_ENAB, CMD_RTSFL_ENAB);
2552 } else {
2553 i2QueueCommands(PTYPE_INLINE, pCh, 100,
2554 2, CMD_CTSFL_DSAB, CMD_RTSFL_DSAB);
2555 }
2556 //
2557 // Process XON/XOFF flow control flags settings
2558 //
2559 stop_char = STOP_CHAR(pCh->pTTY);
2560 start_char = START_CHAR(pCh->pTTY);
2561
2562 //////////// can't be \000
2563 if (stop_char == __DISABLED_CHAR )
2564 {
2565 stop_char = ~__DISABLED_CHAR;
2566 }
2567 if (start_char == __DISABLED_CHAR )
2568 {
2569 start_char = ~__DISABLED_CHAR;
2570 }
2571 /////////////////////////////////
2572
2573 if ( o_tios->c_cc[VSTART] != start_char )
2574 {
2575 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_DEF_IXON(start_char));
2576 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DEF_OXON(start_char));
2577 }
2578 if ( o_tios->c_cc[VSTOP] != stop_char )
2579 {
2580 i2QueueCommands(PTYPE_BYPASS, pCh, 100, 1, CMD_DEF_IXOFF(stop_char));
2581 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DEF_OXOFF(stop_char));
2582 }
2583 if (stop_char == __DISABLED_CHAR )
2584 {
2585 stop_char = ~__DISABLED_CHAR; //TEST123
2586 goto no_xoff;
2587 }
2588 if ((iflag & (IXOFF))^(o_tios->c_iflag & (IXOFF)))
2589 {
2590 if ( iflag & IXOFF ) { // Enable XOFF output flow control
2591 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_OXON_OPT(COX_XON));
2592 } else { // Disable XOFF output flow control
2593no_xoff:
2594 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_OXON_OPT(COX_NONE));
2595 }
2596 }
2597 if (start_char == __DISABLED_CHAR )
2598 {
2599 goto no_xon;
2600 }
2601 if ((iflag & (IXON|IXANY)) ^ (o_tios->c_iflag & (IXON|IXANY)))
2602 {
2603 if ( iflag & IXON ) {
2604 if ( iflag & IXANY ) { // Enable XON/XANY output flow control
2605 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_IXON_OPT(CIX_XANY));
2606 } else { // Enable XON output flow control
2607 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_IXON_OPT(CIX_XON));
2608 }
2609 } else { // Disable XON output flow control
2610no_xon:
2611 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_IXON_OPT(CIX_NONE));
2612 }
2613 }
2614 if ( (iflag & ISTRIP) ^ ( o_tios->c_iflag & (ISTRIP)) )
2615 {
2616 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1,
2617 CMD_ISTRIP_OPT((iflag & ISTRIP ? 1 : 0)));
2618 }
2619 if ( (iflag & INPCK) ^ ( o_tios->c_iflag & (INPCK)) )
2620 {
2621 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1,
2622 CMD_PARCHK((iflag & INPCK) ? CPK_ENAB : CPK_DSAB));
2623 }
2624
2625 if ( (iflag & (IGNBRK|PARMRK|BRKINT|IGNPAR))
2626 ^ ( o_tios->c_iflag & (IGNBRK|PARMRK|BRKINT|IGNPAR)) )
2627 {
2628 char brkrpt = 0;
2629 char parrpt = 0;
2630
2631 if ( iflag & IGNBRK ) { /* Ignore breaks altogether */
2632 /* Ignore breaks altogether */
2633 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_BRK_NREP);
2634 } else {
2635 if ( iflag & BRKINT ) {
2636 if ( iflag & PARMRK ) {
2637 brkrpt = 0x0a; // exception an inline triple
2638 } else {
2639 brkrpt = 0x1a; // exception and NULL
2640 }
2641 brkrpt |= 0x04; // flush input
2642 } else {
2643 if ( iflag & PARMRK ) {
2644 brkrpt = 0x0b; //POSIX triple \0377 \0 \0
2645 } else {
2646 brkrpt = 0x01; // Null only
2647 }
2648 }
2649 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_BRK_REP(brkrpt));
2650 }
2651
2652 if (iflag & IGNPAR) {
2653 parrpt = 0x20;
2654 /* would be 2 for not cirrus bug */
2655 /* would be 0x20 cept for cirrus bug */
2656 } else {
2657 if ( iflag & PARMRK ) {
2658 /*
2659 * Replace error characters with 3-byte sequence (\0377,\0,char)
2660 */
2661 parrpt = 0x04 ;
2662 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_ISTRIP_OPT((char)0));
2663 } else {
2664 parrpt = 0x03;
2665 }
2666 }
2667 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_SET_ERROR(parrpt));
2668 }
2669 if (cflag & CLOCAL) {
2670 // Status reporting fails for DCD if this is off
2671 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DCD_NREP);
2672 pCh->flags &= ~ASYNC_CHECK_CD;
2673 } else {
2674 i2QueueCommands(PTYPE_INLINE, pCh, 100, 1, CMD_DCD_REP);
2675 pCh->flags |= ASYNC_CHECK_CD;
2676 }
2677
Linus Torvalds1da177e2005-04-16 15:20:36 -07002678service_it:
2679 i2DrainOutput( pCh, 100 );
2680}
2681
2682/******************************************************************************/
2683/* IPL Device Section */
2684/******************************************************************************/
2685
2686/******************************************************************************/
2687/* Function: ip2_ipl_read() */
2688/* Parameters: Pointer to device inode */
2689/* Pointer to file structure */
2690/* Pointer to data */
2691/* Number of bytes to read */
2692/* Returns: Success or failure */
2693/* */
2694/* Description: Ugly */
2695/* */
2696/* */
2697/******************************************************************************/
2698
2699static
2700ssize_t
2701ip2_ipl_read(struct file *pFile, char __user *pData, size_t count, loff_t *off )
2702{
2703 unsigned int minor = iminor(pFile->f_dentry->d_inode);
2704 int rc = 0;
2705
2706#ifdef IP2DEBUG_IPL
2707 printk (KERN_DEBUG "IP2IPL: read %p, %d bytes\n", pData, count );
2708#endif
2709
2710 switch( minor ) {
2711 case 0: // IPL device
2712 rc = -EINVAL;
2713 break;
2714 case 1: // Status dump
2715 rc = -EINVAL;
2716 break;
2717 case 2: // Ping device
2718 rc = -EINVAL;
2719 break;
2720 case 3: // Trace device
2721 rc = DumpTraceBuffer ( pData, count );
2722 break;
2723 case 4: // Trace device
2724 rc = DumpFifoBuffer ( pData, count );
2725 break;
2726 default:
2727 rc = -ENODEV;
2728 break;
2729 }
2730 return rc;
2731}
2732
2733static int
2734DumpFifoBuffer ( char __user *pData, int count )
2735{
2736#ifdef DEBUG_FIFO
2737 int rc;
2738 rc = copy_to_user(pData, DBGBuf, count);
2739
2740 printk(KERN_DEBUG "Last index %d\n", I );
2741
2742 return count;
2743#endif /* DEBUG_FIFO */
2744 return 0;
2745}
2746
2747static int
2748DumpTraceBuffer ( char __user *pData, int count )
2749{
2750#ifdef IP2DEBUG_TRACE
2751 int rc;
2752 int dumpcount;
2753 int chunk;
2754 int *pIndex = (int __user *)pData;
2755
2756 if ( count < (sizeof(int) * 6) ) {
2757 return -EIO;
2758 }
2759 rc = put_user(tracewrap, pIndex );
2760 rc = put_user(TRACEMAX, ++pIndex );
2761 rc = put_user(tracestrip, ++pIndex );
2762 rc = put_user(tracestuff, ++pIndex );
2763 pData += sizeof(int) * 6;
2764 count -= sizeof(int) * 6;
2765
2766 dumpcount = tracestuff - tracestrip;
2767 if ( dumpcount < 0 ) {
2768 dumpcount += TRACEMAX;
2769 }
2770 if ( dumpcount > count ) {
2771 dumpcount = count;
2772 }
2773 chunk = TRACEMAX - tracestrip;
2774 if ( dumpcount > chunk ) {
2775 rc = copy_to_user(pData, &tracebuf[tracestrip],
2776 chunk * sizeof(tracebuf[0]) );
2777 pData += chunk * sizeof(tracebuf[0]);
2778 tracestrip = 0;
2779 chunk = dumpcount - chunk;
2780 } else {
2781 chunk = dumpcount;
2782 }
2783 rc = copy_to_user(pData, &tracebuf[tracestrip],
2784 chunk * sizeof(tracebuf[0]) );
2785 tracestrip += chunk;
2786 tracewrap = 0;
2787
2788 rc = put_user(tracestrip, ++pIndex );
2789 rc = put_user(tracestuff, ++pIndex );
2790
2791 return dumpcount;
2792#else
2793 return 0;
2794#endif
2795}
2796
2797/******************************************************************************/
2798/* Function: ip2_ipl_write() */
2799/* Parameters: */
2800/* Pointer to file structure */
2801/* Pointer to data */
2802/* Number of bytes to write */
2803/* Returns: Success or failure */
2804/* */
2805/* Description: */
2806/* */
2807/* */
2808/******************************************************************************/
2809static ssize_t
2810ip2_ipl_write(struct file *pFile, const char __user *pData, size_t count, loff_t *off)
2811{
2812#ifdef IP2DEBUG_IPL
2813 printk (KERN_DEBUG "IP2IPL: write %p, %d bytes\n", pData, count );
2814#endif
2815 return 0;
2816}
2817
2818/******************************************************************************/
2819/* Function: ip2_ipl_ioctl() */
2820/* Parameters: Pointer to device inode */
2821/* Pointer to file structure */
2822/* Command */
2823/* Argument */
2824/* Returns: Success or failure */
2825/* */
2826/* Description: */
2827/* */
2828/* */
2829/******************************************************************************/
2830static int
2831ip2_ipl_ioctl ( struct inode *pInode, struct file *pFile, UINT cmd, ULONG arg )
2832{
2833 unsigned int iplminor = iminor(pInode);
2834 int rc = 0;
2835 void __user *argp = (void __user *)arg;
2836 ULONG __user *pIndex = argp;
2837 i2eBordStrPtr pB = i2BoardPtrTable[iplminor / 4];
2838 i2ChanStrPtr pCh;
2839
2840#ifdef IP2DEBUG_IPL
2841 printk (KERN_DEBUG "IP2IPL: ioctl cmd %d, arg %ld\n", cmd, arg );
2842#endif
2843
2844 switch ( iplminor ) {
2845 case 0: // IPL device
2846 rc = -EINVAL;
2847 break;
2848 case 1: // Status dump
2849 case 5:
2850 case 9:
2851 case 13:
2852 switch ( cmd ) {
2853 case 64: /* Driver - ip2stat */
2854 rc = put_user(ip2_tty_driver->refcount, pIndex++ );
2855 rc = put_user(irq_counter, pIndex++ );
2856 rc = put_user(bh_counter, pIndex++ );
2857 break;
2858
2859 case 65: /* Board - ip2stat */
2860 if ( pB ) {
2861 rc = copy_to_user(argp, pB, sizeof(i2eBordStr));
2862 rc = put_user(INB(pB->i2eStatus),
2863 (ULONG __user *)(arg + (ULONG)(&pB->i2eStatus) - (ULONG)pB ) );
2864 } else {
2865 rc = -ENODEV;
2866 }
2867 break;
2868
2869 default:
2870 if (cmd < IP2_MAX_PORTS) {
2871 pCh = DevTable[cmd];
2872 if ( pCh )
2873 {
2874 rc = copy_to_user(argp, pCh, sizeof(i2ChanStr));
2875 } else {
2876 rc = -ENODEV;
2877 }
2878 } else {
2879 rc = -EINVAL;
2880 }
2881 }
2882 break;
2883
2884 case 2: // Ping device
2885 rc = -EINVAL;
2886 break;
2887 case 3: // Trace device
Andrew Mortondef93912006-02-03 03:04:47 -08002888 /*
2889 * akpm: This used to write a whole bunch of function addresses
2890 * to userspace, which generated lots of put_user() warnings.
2891 * I killed it all. Just return "success" and don't do
2892 * anything.
2893 */
2894 if (cmd == 1)
2895 rc = 0;
2896 else
Linus Torvalds1da177e2005-04-16 15:20:36 -07002897 rc = -EINVAL;
Linus Torvalds1da177e2005-04-16 15:20:36 -07002898 break;
2899
2900 default:
2901 rc = -ENODEV;
2902 break;
2903 }
2904 return rc;
2905}
2906
2907/******************************************************************************/
2908/* Function: ip2_ipl_open() */
2909/* Parameters: Pointer to device inode */
2910/* Pointer to file structure */
2911/* Returns: Success or failure */
2912/* */
2913/* Description: */
2914/* */
2915/* */
2916/******************************************************************************/
2917static int
2918ip2_ipl_open( struct inode *pInode, struct file *pFile )
2919{
2920 unsigned int iplminor = iminor(pInode);
2921 i2eBordStrPtr pB;
2922 i2ChanStrPtr pCh;
2923
2924#ifdef IP2DEBUG_IPL
2925 printk (KERN_DEBUG "IP2IPL: open\n" );
2926#endif
2927
2928 switch(iplminor) {
2929 // These are the IPL devices
2930 case 0:
2931 case 4:
2932 case 8:
2933 case 12:
2934 break;
2935
2936 // These are the status devices
2937 case 1:
2938 case 5:
2939 case 9:
2940 case 13:
2941 break;
2942
2943 // These are the debug devices
2944 case 2:
2945 case 6:
2946 case 10:
2947 case 14:
2948 pB = i2BoardPtrTable[iplminor / 4];
2949 pCh = (i2ChanStrPtr) pB->i2eChannelPtr;
2950 break;
2951
2952 // This is the trace device
2953 case 3:
2954 break;
2955 }
2956 return 0;
2957}
2958/******************************************************************************/
2959/* Function: ip2_read_procmem */
2960/* Parameters: */
2961/* */
2962/* Returns: Length of output */
2963/* */
2964/* Description: */
2965/* Supplies some driver operating parameters */
2966/* Not real useful unless your debugging the fifo */
2967/* */
2968/******************************************************************************/
2969
2970#define LIMIT (PAGE_SIZE - 120)
2971
2972static int
2973ip2_read_procmem(char *buf, char **start, off_t offset, int len)
2974{
2975 i2eBordStrPtr pB;
2976 i2ChanStrPtr pCh;
2977 PTTY tty;
2978 int i;
2979
2980 len = 0;
2981
2982#define FMTLINE "%3d: 0x%08x 0x%08x 0%011o 0%011o\n"
2983#define FMTLIN2 " 0x%04x 0x%04x tx flow 0x%x\n"
2984#define FMTLIN3 " 0x%04x 0x%04x rc flow\n"
2985
2986 len += sprintf(buf+len,"\n");
2987
2988 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
2989 pB = i2BoardPtrTable[i];
2990 if ( pB ) {
2991 len += sprintf(buf+len,"board %d:\n",i);
2992 len += sprintf(buf+len,"\tFifo rem: %d mty: %x outM %x\n",
2993 pB->i2eFifoRemains,pB->i2eWaitingForEmptyFifo,pB->i2eOutMailWaiting);
2994 }
2995 }
2996
2997 len += sprintf(buf+len,"#: tty flags, port flags, cflags, iflags\n");
2998 for (i=0; i < IP2_MAX_PORTS; i++) {
2999 if (len > LIMIT)
3000 break;
3001 pCh = DevTable[i];
3002 if (pCh) {
3003 tty = pCh->pTTY;
3004 if (tty && tty->count) {
3005 len += sprintf(buf+len,FMTLINE,i,(int)tty->flags,pCh->flags,
3006 tty->termios->c_cflag,tty->termios->c_iflag);
3007
3008 len += sprintf(buf+len,FMTLIN2,
3009 pCh->outfl.asof,pCh->outfl.room,pCh->channelNeeds);
3010 len += sprintf(buf+len,FMTLIN3,pCh->infl.asof,pCh->infl.room);
3011 }
3012 }
3013 }
3014 return len;
3015}
3016
3017/*
3018 * This is the handler for /proc/tty/driver/ip2
3019 *
3020 * This stretch of code has been largely plagerized from at least three
3021 * different sources including ip2mkdev.c and a couple of other drivers.
3022 * The bugs are all mine. :-) =mhw=
3023 */
3024static int ip2_read_proc(char *page, char **start, off_t off,
3025 int count, int *eof, void *data)
3026{
3027 int i, j, box;
3028 int len = 0;
3029 int boxes = 0;
3030 int ports = 0;
3031 int tports = 0;
3032 off_t begin = 0;
3033 i2eBordStrPtr pB;
3034
3035 len += sprintf(page, "ip2info: 1.0 driver: %s\n", pcVersion );
3036 len += sprintf(page+len, "Driver: SMajor=%d CMajor=%d IMajor=%d MaxBoards=%d MaxBoxes=%d MaxPorts=%d\n",
3037 IP2_TTY_MAJOR, IP2_CALLOUT_MAJOR, IP2_IPL_MAJOR,
3038 IP2_MAX_BOARDS, ABS_MAX_BOXES, ABS_BIGGEST_BOX);
3039
3040 for( i = 0; i < IP2_MAX_BOARDS; ++i ) {
3041 /* This need to be reset for a board by board count... */
3042 boxes = 0;
3043 pB = i2BoardPtrTable[i];
3044 if( pB ) {
3045 switch( pB->i2ePom.e.porID & ~POR_ID_RESERVED )
3046 {
3047 case POR_ID_FIIEX:
3048 len += sprintf( page+len, "Board %d: EX ports=", i );
3049 for( box = 0; box < ABS_MAX_BOXES; ++box )
3050 {
3051 ports = 0;
3052
3053 if( pB->i2eChannelMap[box] != 0 ) ++boxes;
3054 for( j = 0; j < ABS_BIGGEST_BOX; ++j )
3055 {
3056 if( pB->i2eChannelMap[box] & 1<< j ) {
3057 ++ports;
3058 }
3059 }
3060 len += sprintf( page+len, "%d,", ports );
3061 tports += ports;
3062 }
3063
3064 --len; /* Backup over that last comma */
3065
3066 len += sprintf( page+len, " boxes=%d width=%d", boxes, pB->i2eDataWidth16 ? 16 : 8 );
3067 break;
3068
3069 case POR_ID_II_4:
3070 len += sprintf(page+len, "Board %d: ISA-4 ports=4 boxes=1", i );
3071 tports = ports = 4;
3072 break;
3073
3074 case POR_ID_II_8:
3075 len += sprintf(page+len, "Board %d: ISA-8-std ports=8 boxes=1", i );
3076 tports = ports = 8;
3077 break;
3078
3079 case POR_ID_II_8R:
3080 len += sprintf(page+len, "Board %d: ISA-8-RJ11 ports=8 boxes=1", i );
3081 tports = ports = 8;
3082 break;
3083
3084 default:
3085 len += sprintf(page+len, "Board %d: unknown", i );
3086 /* Don't try and probe for minor numbers */
3087 tports = ports = 0;
3088 }
3089
3090 } else {
3091 /* Don't try and probe for minor numbers */
3092 len += sprintf(page+len, "Board %d: vacant", i );
3093 tports = ports = 0;
3094 }
3095
3096 if( tports ) {
3097 len += sprintf(page+len, " minors=" );
3098
3099 for ( box = 0; box < ABS_MAX_BOXES; ++box )
3100 {
3101 for ( j = 0; j < ABS_BIGGEST_BOX; ++j )
3102 {
3103 if ( pB->i2eChannelMap[box] & (1 << j) )
3104 {
3105 len += sprintf (page+len,"%d,",
3106 j + ABS_BIGGEST_BOX *
3107 (box+i*ABS_MAX_BOXES));
3108 }
3109 }
3110 }
3111
3112 page[ len - 1 ] = '\n'; /* Overwrite that last comma */
3113 } else {
3114 len += sprintf (page+len,"\n" );
3115 }
3116
3117 if (len+begin > off+count)
3118 break;
3119 if (len+begin < off) {
3120 begin += len;
3121 len = 0;
3122 }
3123 }
3124
3125 if (i >= IP2_MAX_BOARDS)
3126 *eof = 1;
3127 if (off >= len+begin)
3128 return 0;
3129
3130 *start = page + (off-begin);
3131 return ((count < begin+len-off) ? count : begin+len-off);
3132 }
3133
3134/******************************************************************************/
3135/* Function: ip2trace() */
3136/* Parameters: Value to add to trace buffer */
3137/* Returns: Nothing */
3138/* */
3139/* Description: */
3140/* */
3141/* */
3142/******************************************************************************/
3143#ifdef IP2DEBUG_TRACE
3144void
3145ip2trace (unsigned short pn, unsigned char cat, unsigned char label, unsigned long codes, ...)
3146{
3147 long flags;
3148 unsigned long *pCode = &codes;
3149 union ip2breadcrumb bc;
3150 i2ChanStrPtr pCh;
3151
3152
3153 tracebuf[tracestuff++] = jiffies;
3154 if ( tracestuff == TRACEMAX ) {
3155 tracestuff = 0;
3156 }
3157 if ( tracestuff == tracestrip ) {
3158 if ( ++tracestrip == TRACEMAX ) {
3159 tracestrip = 0;
3160 }
3161 ++tracewrap;
3162 }
3163
3164 bc.hdr.port = 0xff & pn;
3165 bc.hdr.cat = cat;
3166 bc.hdr.codes = (unsigned char)( codes & 0xff );
3167 bc.hdr.label = label;
3168 tracebuf[tracestuff++] = bc.value;
3169
3170 for (;;) {
3171 if ( tracestuff == TRACEMAX ) {
3172 tracestuff = 0;
3173 }
3174 if ( tracestuff == tracestrip ) {
3175 if ( ++tracestrip == TRACEMAX ) {
3176 tracestrip = 0;
3177 }
3178 ++tracewrap;
3179 }
3180
3181 if ( !codes-- )
3182 break;
3183
3184 tracebuf[tracestuff++] = *++pCode;
3185 }
3186}
3187#endif
3188
3189
3190MODULE_LICENSE("GPL");
Chuck Shorteb0e71c2006-07-10 04:43:59 -07003191
3192static struct pci_device_id ip2main_pci_tbl[] __devinitdata = {
3193 { PCI_DEVICE(PCI_VENDOR_ID_COMPUTONE, PCI_DEVICE_ID_COMPUTONE_IP2EX) },
3194 { }
3195};
3196
3197MODULE_DEVICE_TABLE(pci, ip2main_pci_tbl);