sx.c 74.7 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200

/* sx.c -- driver for the Specialix SX series cards. 
 *
 *  This driver will also support the older SI, and XIO cards.
 *
 *
 *   (C) 1998 - 2004  R.E.Wolff@BitWizard.nl
 *
 *  Simon Allen (simonallen@cix.compulink.co.uk) wrote a previous
 *  version of this driver. Some fragments may have been copied. (none
 *  yet :-)
 *
 * Specialix pays for the development and support of this driver.
 * Please DO contact support@specialix.co.uk if you require
 * support. But please read the documentation (sx.txt) first.
 *
 *
 *
 *      This program is free software; you can redistribute it and/or
 *      modify it under the terms of the GNU General Public License as
 *      published by the Free Software Foundation; either version 2 of
 *      the License, or (at your option) any later version.
 *
 *      This program is distributed in the hope that it will be
 *      useful, but WITHOUT ANY WARRANTY; without even the implied
 *      warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
 *      PURPOSE.  See the GNU General Public License for more details.
 *
 *      You should have received a copy of the GNU General Public
 *      License along with this program; if not, write to the Free
 *      Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139,
 *      USA.
 *
 * Revision history:
 * Revision 1.33  2000/03/09 10:00:00  pvdl,wolff
 * - Fixed module and port counting
 * - Fixed signal handling
 * - Fixed an Ooops
 * 
 * Revision 1.32  2000/03/07 09:00:00  wolff,pvdl
 * - Fixed some sx_dprintk typos
 * - added detection for an invalid board/module configuration
 *
 * Revision 1.31  2000/03/06 12:00:00  wolff,pvdl
 * - Added support for EISA
 *
 * Revision 1.30  2000/01/21 17:43:06  wolff
 * - Added support for SX+
 *
 * Revision 1.26  1999/08/05 15:22:14  wolff
 * - Port to 2.3.x
 * - Reformatted to Linus' liking.
 *
 * Revision 1.25  1999/07/30 14:24:08  wolff
 * Had accidentally left "gs_debug" set to "-1" instead of "off" (=0).
 *
 * Revision 1.24  1999/07/28 09:41:52  wolff
 * - I noticed the remark about use-count straying in sx.txt. I checked
 *   sx_open, and found a few places where that could happen. I hope it's
 *   fixed now.
 *
 * Revision 1.23  1999/07/28 08:56:06  wolff
 * - Fixed crash when sx_firmware run twice.
 * - Added sx_slowpoll as a module parameter (I guess nobody really wanted
 *   to change it from the default... )
 * - Fixed a stupid editing problem I introduced in 1.22.
 * - Fixed dropping characters on a termios change.
 *
 * Revision 1.22  1999/07/26 21:01:43  wolff
 * Russell Brown noticed that I had overlooked 4 out of six modem control
 * signals in sx_getsignals. Ooops.
 *
 * Revision 1.21  1999/07/23 09:11:33  wolff
 * I forgot to free dynamically allocated memory when the driver is unloaded.
 *
 * Revision 1.20  1999/07/20 06:25:26  wolff
 * The "closing wait" wasn't honoured. Thanks to James Griffiths for
 * reporting this.
 *
 * Revision 1.19  1999/07/11 08:59:59  wolff
 * Fixed an oops in close, when an open was pending. Changed the memtest
 * a bit. Should also test the board in word-mode, however my card fails the
 * memtest then. I still have to figure out what is wrong...
 *
 * Revision 1.18  1999/06/10 09:38:42  wolff
 * Changed the format of the firmware revision from %04x to %x.%02x .
 *
 * Revision 1.17  1999/06/04 09:44:35  wolff
 * fixed problem: reference to pci stuff when config_pci was off...
 * Thanks to Jorge Novo for noticing this.
 *
 * Revision 1.16  1999/06/02 08:30:15  wolff
 * added/removed the workaround for the DCD bug in the Firmware.
 * A bit more debugging code to locate that...
 *
 * Revision 1.15  1999/06/01 11:35:30  wolff
 * when DCD is left low (floating?), on TA's the firmware first tells us
 * that DCD is high, but after a short while suddenly comes to the
 * conclusion that it is low. All this would be fine, if it weren't that
 * Unix requires us to send a "hangup" signal in that case. This usually
 * all happens BEFORE the program has had a chance to ioctl the device
 * into clocal mode..
 *
 * Revision 1.14  1999/05/25 11:18:59  wolff
 * Added PCI-fix.
 * Added checks for return code of sx_sendcommand.
 * Don't issue "reconfig" if port isn't open yet. (bit us on TA modules...)
 *
 * Revision 1.13  1999/04/29 15:18:01  wolff
 * Fixed an "oops" that showed on SuSE 6.0 systems.
 * Activate DTR again after stty 0.
 *
 * Revision 1.12  1999/04/29 07:49:52  wolff
 * Improved "stty 0" handling a bit. (used to change baud to 9600 assuming
 *     the connection would be dropped anyway. That is not always the case,
 *     and confuses people).
 * Told the card to always monitor the modem signals.
 * Added support for dynamic  gs_debug adjustments.
 * Now tells the rest of the system the number of ports.
 *
 * Revision 1.11  1999/04/24 11:11:30  wolff
 * Fixed two stupid typos in the memory test.
 *
 * Revision 1.10  1999/04/24 10:53:39  wolff
 * Added some of Christian's suggestions.
 * Fixed an HW_COOK_IN bug (ISIG was not in I_OTHER. We used to trust the
 * card to send the signal to the process.....)
 *
 * Revision 1.9  1999/04/23 07:26:38  wolff
 * Included Christian Lademann's 2.0 compile-warning fixes and interrupt
 *    assignment redesign.
 * Cleanup of some other stuff.
 *
 * Revision 1.8  1999/04/16 13:05:30  wolff
 * fixed a DCD change unnoticed bug.
 *
 * Revision 1.7  1999/04/14 22:19:51  wolff
 * Fixed typo that showed up in 2.0.x builds (get_user instead of Get_user!)
 *
 * Revision 1.6  1999/04/13 18:40:20  wolff
 * changed misc-minor to 161, as assigned by HPA.
 *
 * Revision 1.5  1999/04/13 15:12:25  wolff
 * Fixed use-count leak when "hangup" occurred.
 * Added workaround for a stupid-PCIBIOS bug.
 *
 *
 * Revision 1.4  1999/04/01 22:47:40  wolff
 * Fixed < 1M linux-2.0 problem.
 * (vremap isn't compatible with ioremap in that case)
 *
 * Revision 1.3  1999/03/31 13:45:45  wolff
 * Firmware loading is now done through a separate IOCTL.
 *
 * Revision 1.2  1999/03/28 12:22:29  wolff
 * rcs cleanup
 *
 * Revision 1.1  1999/03/28 12:10:34  wolff
 * Readying for release on 2.0.x (sorry David, 1.01 becomes 1.1 for RCS). 
 *
 * Revision 0.12  1999/03/28 09:20:10  wolff
 * Fixed problem in 0.11, continueing cleanup.
 *
 * Revision 0.11  1999/03/28 08:46:44  wolff
 * cleanup. Not good.
 *
 * Revision 0.10  1999/03/28 08:09:43  wolff
 * Fixed loosing characters on close.
 *
 * Revision 0.9  1999/03/21 22:52:01  wolff
 * Ported back to 2.2.... (minor things)
 *
 * Revision 0.8  1999/03/21 22:40:33  wolff
 * Port to 2.0
 *
 * Revision 0.7  1999/03/21 19:06:34  wolff
 * Fixed hangup processing.
 *
 * Revision 0.6  1999/02/05 08:45:14  wolff
 * fixed real_raw problems. Inclusion into kernel imminent.
 *
 * Revision 0.5  1998/12/21 23:51:06  wolff
 * Snatched a nasty bug: sx_transmit_chars was getting re-entered, and it
 * shouldn't have. THATs why I want to have transmit interrupts even when
 * the buffer is empty.
 *
 * Revision 0.4  1998/12/17 09:34:46  wolff
 * PPP works. ioctl works. Basically works!
 *
 * Revision 0.3  1998/12/15 13:05:18  wolff
 * It works! Wow! Gotta start implementing IOCTL and stuff....
 *
 * Revision 0.2  1998/12/01 08:33:53  wolff
 * moved over to 2.1.130
 *
 * Revision 0.1  1998/11/03 21:23:51  wolff
 * Initial revision. Detects SX card.
 *
 * */

201
#define SX_VERSION	1.33
L
Linus Torvalds 已提交
202 203 204 205 206 207 208 209 210 211 212 213 214 215 216

#include <linux/module.h>
#include <linux/kdev_t.h>
#include <linux/kernel.h>
#include <linux/sched.h>
#include <linux/ioport.h>
#include <linux/interrupt.h>
#include <linux/errno.h>
#include <linux/tty.h>
#include <linux/tty_flip.h>
#include <linux/mm.h>
#include <linux/serial.h>
#include <linux/fcntl.h>
#include <linux/major.h>
#include <linux/delay.h>
J
Jiri Slaby 已提交
217
#include <linux/eisa.h>
L
Linus Torvalds 已提交
218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275
#include <linux/pci.h>
#include <linux/slab.h>
#include <linux/init.h>
#include <linux/miscdevice.h>
#include <linux/bitops.h>

#include <asm/io.h>
#include <asm/uaccess.h>

/* The 3.0.0 version of sxboards/sxwindow.h  uses BYTE and WORD.... */
#define BYTE u8
#define WORD u16

/* .... but the 3.0.4 version uses _u8 and _u16. */
#define _u8 u8
#define _u16 u16

#include "sxboards.h"
#include "sxwindow.h"

#include <linux/generic_serial.h>
#include "sx.h"

/* I don't think that this driver can handle more than 256 ports on
   one machine. You'll have to increase the number of boards in sx.h
   if you want more than 4 boards.  */

#ifndef PCI_DEVICE_ID_SPECIALIX_SX_XIO_IO8
#define PCI_DEVICE_ID_SPECIALIX_SX_XIO_IO8 0x2000
#endif

/* Configurable options: 
   (Don't be too sure that it'll work if you toggle them) */

/* Am I paranoid or not ? ;-) */
#undef SX_PARANOIA_CHECK

/* 20 -> 2000 per second. The card should rate-limit interrupts at 100
   Hz, but it is user configurable. I don't recommend going above 1000
   Hz. The interrupt ratelimit might trigger if the interrupt is
   shared with a very active other device. */
#define IRQ_RATE_LIMIT 20

/* Sharing interrupts is possible now. If the other device wants more
   than 2000 interrupts per second, we'd gracefully decline further
   interrupts. That's not what we want. On the other hand, if the
   other device interrupts 2000 times a second, don't use the SX
   interrupt. Use polling. */
#undef IRQ_RATE_LIMIT

#if 0
/* Not implemented */
/* 
 * The following defines are mostly for testing purposes. But if you need
 * some nice reporting in your syslog, you can define them also.
 */
#define SX_REPORT_FIFO
#define SX_REPORT_OVERRUN
J
Jiri Slaby 已提交
276
#endif
L
Linus Torvalds 已提交
277 278

/* Function prototypes */
J
Jiri Slaby 已提交
279 280 281 282 283 284 285 286 287 288 289 290 291
static void sx_disable_tx_interrupts(void *ptr);
static void sx_enable_tx_interrupts(void *ptr);
static void sx_disable_rx_interrupts(void *ptr);
static void sx_enable_rx_interrupts(void *ptr);
static int sx_get_CD(void *ptr);
static void sx_shutdown_port(void *ptr);
static int sx_set_real_termios(void *ptr);
static void sx_close(void *ptr);
static int sx_chars_in_buffer(void *ptr);
static int sx_init_board(struct sx_board *board);
static int sx_init_portstructs(int nboards, int nports);
static int sx_fw_ioctl(struct inode *inode, struct file *filp,
		unsigned int cmd, unsigned long arg);
L
Linus Torvalds 已提交
292 293 294 295
static int sx_init_drivers(void);

static struct tty_driver *sx_driver;

J
Jiri Slaby 已提交
296
static DEFINE_MUTEX(sx_boards_lock);
L
Linus Torvalds 已提交
297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320
static struct sx_board boards[SX_NBOARDS];
static struct sx_port *sx_ports;
static int sx_initialized;
static int sx_nports;
static int sx_debug;

/* You can have the driver poll your card. 
    - Set sx_poll to 1 to poll every timer tick (10ms on Intel). 
      This is used when the card cannot use an interrupt for some reason.

    - set sx_slowpoll to 100 to do an extra poll once a second (on Intel). If 
      the driver misses an interrupt (report this if it DOES happen to you!)
      everything will continue to work.... 
 */
static int sx_poll = 1;
static int sx_slowpoll;

/* The card limits the number of interrupts per second. 
   At 115k2 "100" should be sufficient. 
   If you're using higher baudrates, you can increase this...
 */

static int sx_maxints = 100;

J
Jiri Slaby 已提交
321 322
#ifdef CONFIG_ISA

L
Linus Torvalds 已提交
323 324 325 326
/* These are the only open spaces in my computer. Yours may have more
   or less.... -- REW 
   duh: Card at 0xa0000 is possible on HP Netserver?? -- pvdl
*/
J
Jiri Slaby 已提交
327 328 329 330 331 332 333 334 335 336 337
static int sx_probe_addrs[] = {
	0xc0000, 0xd0000, 0xe0000,
	0xc8000, 0xd8000, 0xe8000
};
static int si_probe_addrs[] = {
	0xc0000, 0xd0000, 0xe0000,
	0xc8000, 0xd8000, 0xe8000, 0xa0000
};
static int si1_probe_addrs[] = {
	0xd0000
};
L
Linus Torvalds 已提交
338

339 340 341
#define NR_SX_ADDRS ARRAY_SIZE(sx_probe_addrs)
#define NR_SI_ADDRS ARRAY_SIZE(si_probe_addrs)
#define NR_SI1_ADDRS ARRAY_SIZE(si1_probe_addrs)
L
Linus Torvalds 已提交
342

J
Jiri Slaby 已提交
343 344 345
module_param_array(sx_probe_addrs, int, NULL, 0);
module_param_array(si_probe_addrs, int, NULL, 0);
#endif
L
Linus Torvalds 已提交
346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364

/* Set the mask to all-ones. This alas, only supports 32 interrupts. 
   Some architectures may need more. */
static int sx_irqmask = -1;

module_param(sx_poll, int, 0);
module_param(sx_slowpoll, int, 0);
module_param(sx_maxints, int, 0);
module_param(sx_debug, int, 0);
module_param(sx_irqmask, int, 0);

MODULE_LICENSE("GPL");

static struct real_driver sx_real_driver = {
	sx_disable_tx_interrupts,
	sx_enable_tx_interrupts,
	sx_disable_rx_interrupts,
	sx_enable_rx_interrupts,
	sx_get_CD,
J
Jiri Slaby 已提交
365 366
	sx_shutdown_port,
	sx_set_real_termios,
L
Linus Torvalds 已提交
367 368 369 370 371 372 373 374 375 376 377 378 379 380 381
	sx_chars_in_buffer,
	sx_close,
};

/* 
   This driver can spew a whole lot of debugging output at you. If you
   need maximum performance, you should disable the DEBUG define. To
   aid in debugging in the field, I'm leaving the compile-time debug
   features enabled, and disable them "runtime". That allows me to
   instruct people with problems to enable debugging without requiring
   them to recompile... 
*/
#define DEBUG

#ifdef DEBUG
J
Jiri Slaby 已提交
382
#define sx_dprintk(f, str...)	if (sx_debug & f) printk (str)
L
Linus Torvalds 已提交
383
#else
J
Jiri Slaby 已提交
384
#define sx_dprintk(f, str...)	/* nothing */
L
Linus Torvalds 已提交
385 386
#endif

387 388
#define func_enter()	sx_dprintk(SX_DEBUG_FLOW, "sx: enter %s\n",__func__)
#define func_exit()	sx_dprintk(SX_DEBUG_FLOW, "sx: exit  %s\n",__func__)
L
Linus Torvalds 已提交
389

J
Jiri Slaby 已提交
390
#define func_enter2()	sx_dprintk(SX_DEBUG_FLOW, "sx: enter %s (port %d)\n", \
391
				__func__, port->line)
L
Linus Torvalds 已提交
392 393 394 395 396 397

/* 
 *  Firmware loader driver specific routines
 *
 */

398
static const struct file_operations sx_fw_fops = {
J
Jiri Slaby 已提交
399 400
	.owner = THIS_MODULE,
	.ioctl = sx_fw_ioctl,
L
Linus Torvalds 已提交
401 402 403 404 405 406 407 408 409 410
};

static struct miscdevice sx_fw_device = {
	SXCTL_MISC_MINOR, "sxctl", &sx_fw_fops
};

#ifdef SX_PARANOIA_CHECK

/* This doesn't work. Who's paranoid around here? Not me! */

J
Jiri Slaby 已提交
411
static inline int sx_paranoia_check(struct sx_port const *port,
L
Linus Torvalds 已提交
412 413
				    char *name, const char *routine)
{
J
Jiri Slaby 已提交
414 415 416 417
	static const char *badmagic = KERN_ERR "sx: Warning: bad sx port magic "
			"number for device %s in %s\n";
	static const char *badinfo = KERN_ERR "sx: Warning: null sx port for "
			"device %s in %s\n";
L
Linus Torvalds 已提交
418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446

	if (!port) {
		printk(badinfo, name, routine);
		return 1;
	}
	if (port->magic != SX_MAGIC) {
		printk(badmagic, name, routine);
		return 1;
	}

	return 0;
}
#else
#define sx_paranoia_check(a,b,c) 0
#endif

/* The timeouts. First try 30 times as fast as possible. Then give
   the card some time to breathe between accesses. (Otherwise the
   processor on the card might not be able to access its OWN bus... */

#define TIMEOUT_1 30
#define TIMEOUT_2 1000000

#ifdef DEBUG
static void my_hd_io(void __iomem *p, int len)
{
	int i, j, ch;
	unsigned char __iomem *addr = p;

J
Jiri Slaby 已提交
447 448 449 450 451
	for (i = 0; i < len; i += 16) {
		printk("%p ", addr + i);
		for (j = 0; j < 16; j++) {
			printk("%02x %s", readb(addr + j + i),
					(j == 7) ? " " : "");
L
Linus Torvalds 已提交
452
		}
J
Jiri Slaby 已提交
453 454 455 456
		for (j = 0; j < 16; j++) {
			ch = readb(addr + j + i);
			printk("%c", (ch < 0x20) ? '.' :
					((ch > 0x7f) ? '.' : ch));
L
Linus Torvalds 已提交
457
		}
J
Jiri Slaby 已提交
458
		printk("\n");
L
Linus Torvalds 已提交
459 460 461 462 463 464 465
	}
}
static void my_hd(void *p, int len)
{
	int i, j, ch;
	unsigned char *addr = p;

J
Jiri Slaby 已提交
466 467 468 469
	for (i = 0; i < len; i += 16) {
		printk("%p ", addr + i);
		for (j = 0; j < 16; j++) {
			printk("%02x %s", addr[j + i], (j == 7) ? " " : "");
L
Linus Torvalds 已提交
470
		}
J
Jiri Slaby 已提交
471 472 473 474
		for (j = 0; j < 16; j++) {
			ch = addr[j + i];
			printk("%c", (ch < 0x20) ? '.' :
					((ch > 0x7f) ? '.' : ch));
L
Linus Torvalds 已提交
475
		}
J
Jiri Slaby 已提交
476
		printk("\n");
L
Linus Torvalds 已提交
477 478 479 480 481 482
	}
}
#endif

/* This needs redoing for Alpha -- REW -- Done. */

J
Jiri Slaby 已提交
483
static inline void write_sx_byte(struct sx_board *board, int offset, u8 byte)
L
Linus Torvalds 已提交
484
{
J
Jiri Slaby 已提交
485
	writeb(byte, board->base + offset);
L
Linus Torvalds 已提交
486 487
}

J
Jiri Slaby 已提交
488
static inline u8 read_sx_byte(struct sx_board *board, int offset)
L
Linus Torvalds 已提交
489
{
J
Jiri Slaby 已提交
490
	return readb(board->base + offset);
L
Linus Torvalds 已提交
491 492
}

J
Jiri Slaby 已提交
493
static inline void write_sx_word(struct sx_board *board, int offset, u16 word)
L
Linus Torvalds 已提交
494
{
J
Jiri Slaby 已提交
495
	writew(word, board->base + offset);
L
Linus Torvalds 已提交
496 497
}

J
Jiri Slaby 已提交
498
static inline u16 read_sx_word(struct sx_board *board, int offset)
L
Linus Torvalds 已提交
499
{
J
Jiri Slaby 已提交
500
	return readw(board->base + offset);
L
Linus Torvalds 已提交
501 502
}

J
Jiri Slaby 已提交
503 504
static int sx_busy_wait_eq(struct sx_board *board,
		int offset, int mask, int correctval)
L
Linus Torvalds 已提交
505 506 507
{
	int i;

J
Jiri Slaby 已提交
508
	func_enter();
L
Linus Torvalds 已提交
509

J
Jiri Slaby 已提交
510 511 512
	for (i = 0; i < TIMEOUT_1; i++)
		if ((read_sx_byte(board, offset) & mask) == correctval) {
			func_exit();
L
Linus Torvalds 已提交
513 514 515
			return 1;
		}

J
Jiri Slaby 已提交
516 517 518
	for (i = 0; i < TIMEOUT_2; i++) {
		if ((read_sx_byte(board, offset) & mask) == correctval) {
			func_exit();
L
Linus Torvalds 已提交
519 520
			return 1;
		}
J
Jiri Slaby 已提交
521
		udelay(1);
L
Linus Torvalds 已提交
522 523
	}

J
Jiri Slaby 已提交
524
	func_exit();
L
Linus Torvalds 已提交
525 526 527
	return 0;
}

J
Jiri Slaby 已提交
528 529
static int sx_busy_wait_neq(struct sx_board *board,
		int offset, int mask, int badval)
L
Linus Torvalds 已提交
530 531 532
{
	int i;

J
Jiri Slaby 已提交
533
	func_enter();
L
Linus Torvalds 已提交
534

J
Jiri Slaby 已提交
535 536 537
	for (i = 0; i < TIMEOUT_1; i++)
		if ((read_sx_byte(board, offset) & mask) != badval) {
			func_exit();
L
Linus Torvalds 已提交
538 539 540
			return 1;
		}

J
Jiri Slaby 已提交
541 542 543
	for (i = 0; i < TIMEOUT_2; i++) {
		if ((read_sx_byte(board, offset) & mask) != badval) {
			func_exit();
L
Linus Torvalds 已提交
544 545
			return 1;
		}
J
Jiri Slaby 已提交
546
		udelay(1);
L
Linus Torvalds 已提交
547 548
	}

J
Jiri Slaby 已提交
549
	func_exit();
L
Linus Torvalds 已提交
550 551 552 553
	return 0;
}

/* 5.6.4 of 6210028 r2.3 */
J
Jiri Slaby 已提交
554
static int sx_reset(struct sx_board *board)
L
Linus Torvalds 已提交
555
{
J
Jiri Slaby 已提交
556
	func_enter();
L
Linus Torvalds 已提交
557

J
Jiri Slaby 已提交
558
	if (IS_SX_BOARD(board)) {
L
Linus Torvalds 已提交
559

J
Jiri Slaby 已提交
560 561
		write_sx_byte(board, SX_CONFIG, 0);
		write_sx_byte(board, SX_RESET, 1); /* Value doesn't matter */
L
Linus Torvalds 已提交
562

J
Jiri Slaby 已提交
563 564 565
		if (!sx_busy_wait_eq(board, SX_RESET_STATUS, 1, 0)) {
			printk(KERN_INFO "sx: Card doesn't respond to "
					"reset...\n");
L
Linus Torvalds 已提交
566 567 568
			return 0;
		}
	} else if (IS_EISA_BOARD(board)) {
J
Jiri Slaby 已提交
569
		outb(board->irq << 4, board->eisa_base + 0xc02);
L
Linus Torvalds 已提交
570
	} else if (IS_SI1_BOARD(board)) {
J
Jiri Slaby 已提交
571
		write_sx_byte(board, SI1_ISA_RESET, 0);	/*value doesn't matter*/
L
Linus Torvalds 已提交
572 573
	} else {
		/* Gory details of the SI/ISA board */
J
Jiri Slaby 已提交
574 575 576 577 578 579
		write_sx_byte(board, SI2_ISA_RESET, SI2_ISA_RESET_SET);
		write_sx_byte(board, SI2_ISA_IRQ11, SI2_ISA_IRQ11_CLEAR);
		write_sx_byte(board, SI2_ISA_IRQ12, SI2_ISA_IRQ12_CLEAR);
		write_sx_byte(board, SI2_ISA_IRQ15, SI2_ISA_IRQ15_CLEAR);
		write_sx_byte(board, SI2_ISA_INTCLEAR, SI2_ISA_INTCLEAR_CLEAR);
		write_sx_byte(board, SI2_ISA_IRQSET, SI2_ISA_IRQSET_CLEAR);
L
Linus Torvalds 已提交
580 581
	}

J
Jiri Slaby 已提交
582
	func_exit();
L
Linus Torvalds 已提交
583 584 585 586 587 588 589 590
	return 1;
}

/* This doesn't work on machines where "NULL" isn't 0 */
/* If you have one of those, someone will need to write 
   the equivalent of this, which will amount to about 3 lines. I don't
   want to complicate this right now. -- REW
   (See, I do write comments every now and then :-) */
J
Jiri Slaby 已提交
591
#define OFFSETOF(strct, elem)	((long)&(((struct strct *)NULL)->elem))
L
Linus Torvalds 已提交
592

J
Jiri Slaby 已提交
593 594 595
#define CHAN_OFFSET(port,elem)	(port->ch_base + OFFSETOF (_SXCHANNEL, elem))
#define MODU_OFFSET(board,addr,elem)	(addr + OFFSETOF (_SXMODULE, elem))
#define  BRD_OFFSET(board,elem)	(OFFSETOF (_SXCARD, elem))
L
Linus Torvalds 已提交
596 597

#define sx_write_channel_byte(port, elem, val) \
J
Jiri Slaby 已提交
598
	write_sx_byte (port->board, CHAN_OFFSET (port, elem), val)
L
Linus Torvalds 已提交
599 600

#define sx_read_channel_byte(port, elem) \
J
Jiri Slaby 已提交
601
	read_sx_byte (port->board, CHAN_OFFSET (port, elem))
L
Linus Torvalds 已提交
602 603

#define sx_write_channel_word(port, elem, val) \
J
Jiri Slaby 已提交
604
	write_sx_word (port->board, CHAN_OFFSET (port, elem), val)
L
Linus Torvalds 已提交
605 606

#define sx_read_channel_word(port, elem) \
J
Jiri Slaby 已提交
607
	read_sx_word (port->board, CHAN_OFFSET (port, elem))
L
Linus Torvalds 已提交
608 609

#define sx_write_module_byte(board, addr, elem, val) \
J
Jiri Slaby 已提交
610
	write_sx_byte (board, MODU_OFFSET (board, addr, elem), val)
L
Linus Torvalds 已提交
611 612

#define sx_read_module_byte(board, addr, elem) \
J
Jiri Slaby 已提交
613
	read_sx_byte (board, MODU_OFFSET (board, addr, elem))
L
Linus Torvalds 已提交
614 615

#define sx_write_module_word(board, addr, elem, val) \
J
Jiri Slaby 已提交
616
	write_sx_word (board, MODU_OFFSET (board, addr, elem), val)
L
Linus Torvalds 已提交
617 618

#define sx_read_module_word(board, addr, elem) \
J
Jiri Slaby 已提交
619
	read_sx_word (board, MODU_OFFSET (board, addr, elem))
L
Linus Torvalds 已提交
620 621

#define sx_write_board_byte(board, elem, val) \
J
Jiri Slaby 已提交
622
	write_sx_byte (board, BRD_OFFSET (board, elem), val)
L
Linus Torvalds 已提交
623 624

#define sx_read_board_byte(board, elem) \
J
Jiri Slaby 已提交
625
	read_sx_byte (board, BRD_OFFSET (board, elem))
L
Linus Torvalds 已提交
626 627

#define sx_write_board_word(board, elem, val) \
J
Jiri Slaby 已提交
628
	write_sx_word (board, BRD_OFFSET (board, elem), val)
L
Linus Torvalds 已提交
629 630

#define sx_read_board_word(board, elem) \
J
Jiri Slaby 已提交
631
	read_sx_word (board, BRD_OFFSET (board, elem))
L
Linus Torvalds 已提交
632

J
Jiri Slaby 已提交
633
static int sx_start_board(struct sx_board *board)
L
Linus Torvalds 已提交
634
{
J
Jiri Slaby 已提交
635 636
	if (IS_SX_BOARD(board)) {
		write_sx_byte(board, SX_CONFIG, SX_CONF_BUSEN);
L
Linus Torvalds 已提交
637 638
	} else if (IS_EISA_BOARD(board)) {
		write_sx_byte(board, SI2_EISA_OFF, SI2_EISA_VAL);
J
Jiri Slaby 已提交
639
		outb((board->irq << 4) | 4, board->eisa_base + 0xc02);
L
Linus Torvalds 已提交
640
	} else if (IS_SI1_BOARD(board)) {
J
Jiri Slaby 已提交
641 642
		write_sx_byte(board, SI1_ISA_RESET_CLEAR, 0);
		write_sx_byte(board, SI1_ISA_INTCL, 0);
L
Linus Torvalds 已提交
643 644 645
	} else {
		/* Don't bug me about the clear_set. 
		   I haven't the foggiest idea what it's about -- REW */
J
Jiri Slaby 已提交
646 647
		write_sx_byte(board, SI2_ISA_RESET, SI2_ISA_RESET_CLEAR);
		write_sx_byte(board, SI2_ISA_INTCLEAR, SI2_ISA_INTCLEAR_SET);
L
Linus Torvalds 已提交
648 649 650 651 652
	}
	return 1;
}

#define SX_IRQ_REG_VAL(board) \
J
Jiri Slaby 已提交
653
	((board->flags & SX_ISA_BOARD) ? (board->irq << 4) : 0)
L
Linus Torvalds 已提交
654 655 656

/* Note. The SX register is write-only. Therefore, we have to enable the
   bus too. This is a no-op, if you don't mess with this driver... */
J
Jiri Slaby 已提交
657
static int sx_start_interrupts(struct sx_board *board)
L
Linus Torvalds 已提交
658 659 660 661 662
{

	/* Don't call this with board->irq == 0 */

	if (IS_SX_BOARD(board)) {
J
Jiri Slaby 已提交
663 664
		write_sx_byte(board, SX_CONFIG, SX_IRQ_REG_VAL(board) |
				SX_CONF_BUSEN | SX_CONF_HOSTIRQ);
L
Linus Torvalds 已提交
665
	} else if (IS_EISA_BOARD(board)) {
J
Jiri Slaby 已提交
666
		inb(board->eisa_base + 0xc03);
L
Linus Torvalds 已提交
667
	} else if (IS_SI1_BOARD(board)) {
J
Jiri Slaby 已提交
668 669
		write_sx_byte(board, SI1_ISA_INTCL, 0);
		write_sx_byte(board, SI1_ISA_INTCL_CLEAR, 0);
L
Linus Torvalds 已提交
670 671
	} else {
		switch (board->irq) {
J
Jiri Slaby 已提交
672 673 674 675 676 677 678 679 680 681 682 683 684
		case 11:
			write_sx_byte(board, SI2_ISA_IRQ11, SI2_ISA_IRQ11_SET);
			break;
		case 12:
			write_sx_byte(board, SI2_ISA_IRQ12, SI2_ISA_IRQ12_SET);
			break;
		case 15:
			write_sx_byte(board, SI2_ISA_IRQ15, SI2_ISA_IRQ15_SET);
			break;
		default:
			printk(KERN_INFO "sx: SI/XIO card doesn't support "
					"interrupt %d.\n", board->irq);
			return 0;
L
Linus Torvalds 已提交
685
		}
J
Jiri Slaby 已提交
686
		write_sx_byte(board, SI2_ISA_INTCLEAR, SI2_ISA_INTCLEAR_SET);
L
Linus Torvalds 已提交
687 688 689 690 691
	}

	return 1;
}

J
Jiri Slaby 已提交
692 693
static int sx_send_command(struct sx_port *port,
		int command, int mask, int newstat)
L
Linus Torvalds 已提交
694
{
J
Jiri Slaby 已提交
695 696 697 698 699
	func_enter2();
	write_sx_byte(port->board, CHAN_OFFSET(port, hi_hstat), command);
	func_exit();
	return sx_busy_wait_eq(port->board, CHAN_OFFSET(port, hi_hstat), mask,
			newstat);
L
Linus Torvalds 已提交
700 701
}

J
Jiri Slaby 已提交
702
static char *mod_type_s(int module_type)
L
Linus Torvalds 已提交
703 704
{
	switch (module_type) {
J
Jiri Slaby 已提交
705 706 707 708 709 710 711 712 713 714 715 716 717 718
	case TA4:
		return "TA4";
	case TA8:
		return "TA8";
	case TA4_ASIC:
		return "TA4_ASIC";
	case TA8_ASIC:
		return "TA8_ASIC";
	case MTA_CD1400:
		return "MTA_CD1400";
	case SXDC:
		return "SXDC";
	default:
		return "Unknown/invalid";
L
Linus Torvalds 已提交
719 720 721
	}
}

J
Jiri Slaby 已提交
722
static char *pan_type_s(int pan_type)
L
Linus Torvalds 已提交
723 724
{
	switch (pan_type) {
J
Jiri Slaby 已提交
725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746
	case MOD_RS232DB25:
		return "MOD_RS232DB25";
	case MOD_RS232RJ45:
		return "MOD_RS232RJ45";
	case MOD_RS422DB25:
		return "MOD_RS422DB25";
	case MOD_PARALLEL:
		return "MOD_PARALLEL";
	case MOD_2_RS232DB25:
		return "MOD_2_RS232DB25";
	case MOD_2_RS232RJ45:
		return "MOD_2_RS232RJ45";
	case MOD_2_RS422DB25:
		return "MOD_2_RS422DB25";
	case MOD_RS232DB25MALE:
		return "MOD_RS232DB25MALE";
	case MOD_2_PARALLEL:
		return "MOD_2_PARALLEL";
	case MOD_BLANK:
		return "empty";
	default:
		return "invalid";
L
Linus Torvalds 已提交
747 748 749
	}
}

J
Jiri Slaby 已提交
750
static int mod_compat_type(int module_type)
L
Linus Torvalds 已提交
751 752 753 754 755 756
{
	return module_type >> 4;
}

static void sx_reconfigure_port(struct sx_port *port)
{
J
Jiri Slaby 已提交
757 758 759 760
	if (sx_read_channel_byte(port, hi_hstat) == HS_IDLE_OPEN) {
		if (sx_send_command(port, HS_CONFIG, -1, HS_IDLE_OPEN) != 1) {
			printk(KERN_WARNING "sx: Sent reconfigure command, but "
					"card didn't react.\n");
L
Linus Torvalds 已提交
761 762
		}
	} else {
J
Jiri Slaby 已提交
763 764 765 766
		sx_dprintk(SX_DEBUG_TERMIOS, "sx: Not sending reconfigure: "
				"port isn't open (%02x).\n",
				sx_read_channel_byte(port, hi_hstat));
	}
L
Linus Torvalds 已提交
767 768
}

J
Jiri Slaby 已提交
769
static void sx_setsignals(struct sx_port *port, int dtr, int rts)
L
Linus Torvalds 已提交
770 771
{
	int t;
J
Jiri Slaby 已提交
772
	func_enter2();
L
Linus Torvalds 已提交
773

J
Jiri Slaby 已提交
774 775 776 777 778 779 780
	t = sx_read_channel_byte(port, hi_op);
	if (dtr >= 0)
		t = dtr ? (t | OP_DTR) : (t & ~OP_DTR);
	if (rts >= 0)
		t = rts ? (t | OP_RTS) : (t & ~OP_RTS);
	sx_write_channel_byte(port, hi_op, t);
	sx_dprintk(SX_DEBUG_MODEMSIGNALS, "setsignals: %d/%d\n", dtr, rts);
L
Linus Torvalds 已提交
781

J
Jiri Slaby 已提交
782
	func_exit();
L
Linus Torvalds 已提交
783 784
}

J
Jiri Slaby 已提交
785
static int sx_getsignals(struct sx_port *port)
L
Linus Torvalds 已提交
786
{
J
Jiri Slaby 已提交
787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804
	int i_stat, o_stat;

	o_stat = sx_read_channel_byte(port, hi_op);
	i_stat = sx_read_channel_byte(port, hi_ip);

	sx_dprintk(SX_DEBUG_MODEMSIGNALS, "getsignals: %d/%d  (%d/%d) "
			"%02x/%02x\n",
			(o_stat & OP_DTR) != 0, (o_stat & OP_RTS) != 0,
			port->c_dcd, sx_get_CD(port),
			sx_read_channel_byte(port, hi_ip),
			sx_read_channel_byte(port, hi_state));

	return (((o_stat & OP_DTR) ? TIOCM_DTR : 0) |
		((o_stat & OP_RTS) ? TIOCM_RTS : 0) |
		((i_stat & IP_CTS) ? TIOCM_CTS : 0) |
		((i_stat & IP_DCD) ? TIOCM_CAR : 0) |
		((i_stat & IP_DSR) ? TIOCM_DSR : 0) |
		((i_stat & IP_RI) ? TIOCM_RNG : 0));
L
Linus Torvalds 已提交
805 806
}

J
Jiri Slaby 已提交
807
static void sx_set_baud(struct sx_port *port)
L
Linus Torvalds 已提交
808 809 810 811 812
{
	int t;

	if (port->board->ta_type == MOD_SXDC) {
		switch (port->gs.baud) {
J
Jiri Slaby 已提交
813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849
			/* Save some typing work... */
#define e(x) case x: t = BAUD_ ## x; break
			e(50);
			e(75);
			e(110);
			e(150);
			e(200);
			e(300);
			e(600);
			e(1200);
			e(1800);
			e(2000);
			e(2400);
			e(4800);
			e(7200);
			e(9600);
			e(14400);
			e(19200);
			e(28800);
			e(38400);
			e(56000);
			e(57600);
			e(64000);
			e(76800);
			e(115200);
			e(128000);
			e(150000);
			e(230400);
			e(256000);
			e(460800);
			e(921600);
		case 134:
			t = BAUD_134_5;
			break;
		case 0:
			t = -1;
			break;
L
Linus Torvalds 已提交
850 851 852
		default:
			/* Can I return "invalid"? */
			t = BAUD_9600;
J
Jiri Slaby 已提交
853 854
			printk(KERN_INFO "sx: unsupported baud rate: %d.\n",
					port->gs.baud);
L
Linus Torvalds 已提交
855 856 857 858
			break;
		}
#undef e
		if (t > 0) {
J
Jiri Slaby 已提交
859 860
/* The baud rate is not set to 0, so we're enabeling DTR... -- REW */
			sx_setsignals(port, 1, -1);
L
Linus Torvalds 已提交
861
			/* XXX This is not TA & MTA compatible */
J
Jiri Slaby 已提交
862
			sx_write_channel_byte(port, hi_csr, 0xff);
L
Linus Torvalds 已提交
863

J
Jiri Slaby 已提交
864 865
			sx_write_channel_byte(port, hi_txbaud, t);
			sx_write_channel_byte(port, hi_rxbaud, t);
L
Linus Torvalds 已提交
866
		} else {
J
Jiri Slaby 已提交
867
			sx_setsignals(port, 0, -1);
L
Linus Torvalds 已提交
868 869 870
		}
	} else {
		switch (port->gs.baud) {
J
Jiri Slaby 已提交
871 872 873 874 875 876 877 878 879 880 881 882 883 884 885
#define e(x) case x: t = CSR_ ## x; break
			e(75);
			e(150);
			e(300);
			e(600);
			e(1200);
			e(2400);
			e(4800);
			e(1800);
			e(9600);
			e(19200);
			e(57600);
			e(38400);
/* TA supports 110, but not 115200, MTA supports 115200, but not 110 */
		case 110:
L
Linus Torvalds 已提交
886 887 888 889 890
			if (port->board->ta_type == MOD_TA) {
				t = CSR_110;
				break;
			} else {
				t = CSR_9600;
J
Jiri Slaby 已提交
891 892
				printk(KERN_INFO "sx: Unsupported baud rate: "
						"%d.\n", port->gs.baud);
L
Linus Torvalds 已提交
893 894
				break;
			}
J
Jiri Slaby 已提交
895
		case 115200:
L
Linus Torvalds 已提交
896 897
			if (port->board->ta_type == MOD_TA) {
				t = CSR_9600;
J
Jiri Slaby 已提交
898 899
				printk(KERN_INFO "sx: Unsupported baud rate: "
						"%d.\n", port->gs.baud);
L
Linus Torvalds 已提交
900 901 902 903 904
				break;
			} else {
				t = CSR_110;
				break;
			}
J
Jiri Slaby 已提交
905 906 907
		case 0:
			t = -1;
			break;
L
Linus Torvalds 已提交
908 909
		default:
			t = CSR_9600;
J
Jiri Slaby 已提交
910 911
			printk(KERN_INFO "sx: Unsupported baud rate: %d.\n",
					port->gs.baud);
L
Linus Torvalds 已提交
912 913 914 915
			break;
		}
#undef e
		if (t >= 0) {
J
Jiri Slaby 已提交
916 917
			sx_setsignals(port, 1, -1);
			sx_write_channel_byte(port, hi_csr, t * 0x11);
L
Linus Torvalds 已提交
918
		} else {
J
Jiri Slaby 已提交
919
			sx_setsignals(port, 0, -1);
L
Linus Torvalds 已提交
920 921 922 923 924 925 926
		}
	}
}

/* Simon Allen's version of this routine was 225 lines long. 85 is a lot
   better. -- REW */

J
Jiri Slaby 已提交
927
static int sx_set_real_termios(void *ptr)
L
Linus Torvalds 已提交
928 929 930 931 932 933 934 935 936 937 938 939 940 941
{
	struct sx_port *port = ptr;

	func_enter2();

	if (!port->gs.tty)
		return 0;

	/* What is this doing here? -- REW
	   Ha! figured it out. It is to allow you to get DTR active again
	   if you've dropped it with stty 0. Moved to set_baud, where it
	   belongs (next to the drop dtr if baud == 0) -- REW */
	/* sx_setsignals (port, 1, -1); */

J
Jiri Slaby 已提交
942
	sx_set_baud(port);
L
Linus Torvalds 已提交
943 944

#define CFLAG port->gs.tty->termios->c_cflag
J
Jiri Slaby 已提交
945 946 947 948 949 950 951 952 953 954 955 956 957
	sx_write_channel_byte(port, hi_mr1,
			(C_PARENB(port->gs.tty) ? MR1_WITH : MR1_NONE) |
			(C_PARODD(port->gs.tty) ? MR1_ODD : MR1_EVEN) |
			(C_CRTSCTS(port->gs.tty) ? MR1_RTS_RXFLOW : 0) |
			(((CFLAG & CSIZE) == CS8) ? MR1_8_BITS : 0) |
			(((CFLAG & CSIZE) == CS7) ? MR1_7_BITS : 0) |
			(((CFLAG & CSIZE) == CS6) ? MR1_6_BITS : 0) |
			(((CFLAG & CSIZE) == CS5) ? MR1_5_BITS : 0));

	sx_write_channel_byte(port, hi_mr2,
			(C_CRTSCTS(port->gs.tty) ? MR2_CTS_TXFLOW : 0) |
			(C_CSTOPB(port->gs.tty) ? MR2_2_STOP :
			MR2_1_STOP));
L
Linus Torvalds 已提交
958 959

	switch (CFLAG & CSIZE) {
J
Jiri Slaby 已提交
960 961 962 963 964 965 966 967 968 969 970 971
	case CS8:
		sx_write_channel_byte(port, hi_mask, 0xff);
		break;
	case CS7:
		sx_write_channel_byte(port, hi_mask, 0x7f);
		break;
	case CS6:
		sx_write_channel_byte(port, hi_mask, 0x3f);
		break;
	case CS5:
		sx_write_channel_byte(port, hi_mask, 0x1f);
		break;
L
Linus Torvalds 已提交
972
	default:
973 974
		printk(KERN_INFO "sx: Invalid wordsize: %u\n",
			(unsigned int)CFLAG & CSIZE);
L
Linus Torvalds 已提交
975 976 977
		break;
	}

J
Jiri Slaby 已提交
978 979 980 981
	sx_write_channel_byte(port, hi_prtcl,
			(I_IXON(port->gs.tty) ? SP_TXEN : 0) |
			(I_IXOFF(port->gs.tty) ? SP_RXEN : 0) |
			(I_IXANY(port->gs.tty) ? SP_TANY : 0) | SP_DCEN);
L
Linus Torvalds 已提交
982

J
Jiri Slaby 已提交
983 984 985
	sx_write_channel_byte(port, hi_break,
			(I_IGNBRK(port->gs.tty) ? BR_IGN : 0 |
			I_BRKINT(port->gs.tty) ? BR_INT : 0));
L
Linus Torvalds 已提交
986

J
Jiri Slaby 已提交
987 988 989 990
	sx_write_channel_byte(port, hi_txon, START_CHAR(port->gs.tty));
	sx_write_channel_byte(port, hi_rxon, START_CHAR(port->gs.tty));
	sx_write_channel_byte(port, hi_txoff, STOP_CHAR(port->gs.tty));
	sx_write_channel_byte(port, hi_rxoff, STOP_CHAR(port->gs.tty));
L
Linus Torvalds 已提交
991 992 993 994

	sx_reconfigure_port(port);

	/* Tell line discipline whether we will do input cooking */
J
Jiri Slaby 已提交
995
	if (I_OTHER(port->gs.tty)) {
L
Linus Torvalds 已提交
996 997 998 999
		clear_bit(TTY_HW_COOK_IN, &port->gs.tty->flags);
	} else {
		set_bit(TTY_HW_COOK_IN, &port->gs.tty->flags);
	}
J
Jiri Slaby 已提交
1000
	sx_dprintk(SX_DEBUG_TERMIOS, "iflags: %x(%d) ",
1001 1002
			(unsigned int)port->gs.tty->termios->c_iflag,
			I_OTHER(port->gs.tty));
L
Linus Torvalds 已提交
1003 1004 1005 1006 1007 1008

/* Tell line discipline whether we will do output cooking.
 * If OPOST is set and no other output flags are set then we can do output
 * processing.  Even if only *one* other flag in the O_OTHER group is set
 * we do cooking in software.
 */
J
Jiri Slaby 已提交
1009
	if (O_OPOST(port->gs.tty) && !O_OTHER(port->gs.tty)) {
L
Linus Torvalds 已提交
1010 1011 1012 1013
		set_bit(TTY_HW_COOK_OUT, &port->gs.tty->flags);
	} else {
		clear_bit(TTY_HW_COOK_OUT, &port->gs.tty->flags);
	}
J
Jiri Slaby 已提交
1014
	sx_dprintk(SX_DEBUG_TERMIOS, "oflags: %x(%d)\n",
1015 1016
			(unsigned int)port->gs.tty->termios->c_oflag,
			O_OTHER(port->gs.tty));
L
Linus Torvalds 已提交
1017
	/* port->c_dcd = sx_get_CD (port); */
J
Jiri Slaby 已提交
1018
	func_exit();
L
Linus Torvalds 已提交
1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036
	return 0;
}

/* ********************************************************************** *
 *                   the interrupt related routines                       *
 * ********************************************************************** */

/* Note:
   Other drivers use the macro "MIN" to calculate how much to copy.
   This has the disadvantage that it will evaluate parts twice. That's
   expensive when it's IO (and the compiler cannot optimize those away!).
   Moreover, I'm not sure that you're race-free. 

   I assign a value, and then only allow the value to decrease. This
   is always safe. This makes the code a few lines longer, and you
   know I'm dead against that, but I think it is required in this
   case.  */

J
Jiri Slaby 已提交
1037
static void sx_transmit_chars(struct sx_port *port)
L
Linus Torvalds 已提交
1038 1039 1040 1041 1042
{
	int c;
	int tx_ip;
	int txroom;

J
Jiri Slaby 已提交
1043 1044 1045
	func_enter2();
	sx_dprintk(SX_DEBUG_TRANSMIT, "Port %p: transmit %d chars\n",
			port, port->gs.xmit_cnt);
L
Linus Torvalds 已提交
1046

J
Jiri Slaby 已提交
1047
	if (test_and_set_bit(SX_PORT_TRANSMIT_LOCK, &port->locks)) {
L
Linus Torvalds 已提交
1048 1049 1050 1051 1052 1053
		return;
	}

	while (1) {
		c = port->gs.xmit_cnt;

J
Jiri Slaby 已提交
1054 1055
		sx_dprintk(SX_DEBUG_TRANSMIT, "Copying %d ", c);
		tx_ip = sx_read_channel_byte(port, hi_txipos);
L
Linus Torvalds 已提交
1056 1057 1058

		/* Took me 5 minutes to deduce this formula. 
		   Luckily it is literally in the manual in section 6.5.4.3.5 */
J
Jiri Slaby 已提交
1059 1060
		txroom = (sx_read_channel_byte(port, hi_txopos) - tx_ip - 1) &
				0xff;
L
Linus Torvalds 已提交
1061 1062 1063 1064

		/* Don't copy more bytes than there is room for in the buffer */
		if (c > txroom)
			c = txroom;
J
Jiri Slaby 已提交
1065
		sx_dprintk(SX_DEBUG_TRANSMIT, " %d(%d) ", c, txroom);
L
Linus Torvalds 已提交
1066 1067

		/* Don't copy past the end of the hardware transmit buffer */
J
Jiri Slaby 已提交
1068
		if (c > 0x100 - tx_ip)
L
Linus Torvalds 已提交
1069 1070
			c = 0x100 - tx_ip;

J
Jiri Slaby 已提交
1071
		sx_dprintk(SX_DEBUG_TRANSMIT, " %d(%d) ", c, 0x100 - tx_ip);
L
Linus Torvalds 已提交
1072 1073

		/* Don't copy pas the end of the source buffer */
J
Jiri Slaby 已提交
1074
		if (c > SERIAL_XMIT_SIZE - port->gs.xmit_tail)
L
Linus Torvalds 已提交
1075 1076
			c = SERIAL_XMIT_SIZE - port->gs.xmit_tail;

J
Jiri Slaby 已提交
1077 1078
		sx_dprintk(SX_DEBUG_TRANSMIT, " %d(%ld) \n",
				c, SERIAL_XMIT_SIZE - port->gs.xmit_tail);
L
Linus Torvalds 已提交
1079

J
Jiri Slaby 已提交
1080 1081 1082 1083
		/* If for one reason or another, we can't copy more data, we're
		   done! */
		if (c == 0)
			break;
L
Linus Torvalds 已提交
1084

J
Jiri Slaby 已提交
1085 1086
		memcpy_toio(port->board->base + CHAN_OFFSET(port, hi_txbuf) +
			tx_ip, port->gs.xmit_buf + port->gs.xmit_tail, c);
L
Linus Torvalds 已提交
1087 1088

		/* Update the pointer in the card */
J
Jiri Slaby 已提交
1089
		sx_write_channel_byte(port, hi_txipos, (tx_ip + c) & 0xff);
L
Linus Torvalds 已提交
1090 1091

		/* Update the kernel buffer end */
J
Jiri Slaby 已提交
1092 1093
		port->gs.xmit_tail = (port->gs.xmit_tail + c) &
				(SERIAL_XMIT_SIZE - 1);
L
Linus Torvalds 已提交
1094 1095

		/* This one last. (this is essential)
J
Jiri Slaby 已提交
1096 1097
		   It would allow others to start putting more data into the
		   buffer! */
L
Linus Torvalds 已提交
1098 1099 1100 1101
		port->gs.xmit_cnt -= c;
	}

	if (port->gs.xmit_cnt == 0) {
J
Jiri Slaby 已提交
1102
		sx_disable_tx_interrupts(port);
L
Linus Torvalds 已提交
1103 1104 1105 1106
	}

	if ((port->gs.xmit_cnt <= port->gs.wakeup_chars) && port->gs.tty) {
		tty_wakeup(port->gs.tty);
J
Jiri Slaby 已提交
1107 1108
		sx_dprintk(SX_DEBUG_TRANSMIT, "Waking up.... ldisc (%d)....\n",
				port->gs.wakeup_chars);
L
Linus Torvalds 已提交
1109 1110
	}

J
Jiri Slaby 已提交
1111 1112
	clear_bit(SX_PORT_TRANSMIT_LOCK, &port->locks);
	func_exit();
L
Linus Torvalds 已提交
1113 1114 1115 1116 1117 1118 1119
}

/* Note the symmetry between receiving chars and transmitting them!
   Note: The kernel should have implemented both a receive buffer and
   a transmit buffer. */

/* Inlined: Called only once. Remove the inline when you add another call */
J
Jiri Slaby 已提交
1120
static inline void sx_receive_chars(struct sx_port *port)
L
Linus Torvalds 已提交
1121 1122 1123 1124
{
	int c;
	int rx_op;
	struct tty_struct *tty;
J
Jiri Slaby 已提交
1125
	int copied = 0;
A
Alan Cox 已提交
1126
	unsigned char *rp;
L
Linus Torvalds 已提交
1127

J
Jiri Slaby 已提交
1128
	func_enter2();
L
Linus Torvalds 已提交
1129 1130
	tty = port->gs.tty;
	while (1) {
J
Jiri Slaby 已提交
1131 1132
		rx_op = sx_read_channel_byte(port, hi_rxopos);
		c = (sx_read_channel_byte(port, hi_rxipos) - rx_op) & 0xff;
L
Linus Torvalds 已提交
1133

J
Jiri Slaby 已提交
1134
		sx_dprintk(SX_DEBUG_RECEIVE, "rxop=%d, c = %d.\n", rx_op, c);
L
Linus Torvalds 已提交
1135

1136
		/* Don't copy past the end of the hardware receive buffer */
J
Jiri Slaby 已提交
1137 1138
		if (rx_op + c > 0x100)
			c = 0x100 - rx_op;
1139

J
Jiri Slaby 已提交
1140
		sx_dprintk(SX_DEBUG_RECEIVE, "c = %d.\n", c);
1141

L
Linus Torvalds 已提交
1142
		/* Don't copy more bytes than there is room for in the buffer */
A
Alan Cox 已提交
1143 1144

		c = tty_prepare_flip_string(tty, &rp, c);
L
Linus Torvalds 已提交
1145

J
Jiri Slaby 已提交
1146
		sx_dprintk(SX_DEBUG_RECEIVE, "c = %d.\n", c);
L
Linus Torvalds 已提交
1147 1148

		/* If for one reason or another, we can't copy more data, we're done! */
J
Jiri Slaby 已提交
1149 1150
		if (c == 0)
			break;
L
Linus Torvalds 已提交
1151

J
Jiri Slaby 已提交
1152 1153 1154 1155 1156 1157
		sx_dprintk(SX_DEBUG_RECEIVE, "Copying over %d chars. First is "
				"%d at %lx\n", c, read_sx_byte(port->board,
					CHAN_OFFSET(port, hi_rxbuf) + rx_op),
				CHAN_OFFSET(port, hi_rxbuf));
		memcpy_fromio(rp, port->board->base +
				CHAN_OFFSET(port, hi_rxbuf) + rx_op, c);
L
Linus Torvalds 已提交
1158 1159

		/* This one last. ( Not essential.)
J
Jiri Slaby 已提交
1160 1161
		   It allows the card to start putting more data into the
		   buffer!
L
Linus Torvalds 已提交
1162
		   Update the pointer in the card */
J
Jiri Slaby 已提交
1163
		sx_write_channel_byte(port, hi_rxopos, (rx_op + c) & 0xff);
L
Linus Torvalds 已提交
1164 1165 1166 1167 1168 1169

		copied += c;
	}
	if (copied) {
		struct timeval tv;

J
Jiri Slaby 已提交
1170 1171 1172 1173 1174
		do_gettimeofday(&tv);
		sx_dprintk(SX_DEBUG_RECEIVE, "pushing flipq port %d (%3d "
				"chars): %d.%06d  (%d/%d)\n", port->line,
				copied, (int)(tv.tv_sec % 60), (int)tv.tv_usec,
				tty->raw, tty->real_raw);
L
Linus Torvalds 已提交
1175

J
Jiri Slaby 已提交
1176 1177 1178
		/* Tell the rest of the system the news. Great news. New
		   characters! */
		tty_flip_buffer_push(tty);
L
Linus Torvalds 已提交
1179 1180 1181
		/*    tty_schedule_flip (tty); */
	}

J
Jiri Slaby 已提交
1182
	func_exit();
L
Linus Torvalds 已提交
1183 1184 1185 1186
}

/* Inlined: it is called only once. Remove the inline if you add another 
   call */
J
Jiri Slaby 已提交
1187
static inline void sx_check_modem_signals(struct sx_port *port)
L
Linus Torvalds 已提交
1188 1189 1190 1191
{
	int hi_state;
	int c_dcd;

J
Jiri Slaby 已提交
1192 1193 1194
	hi_state = sx_read_channel_byte(port, hi_state);
	sx_dprintk(SX_DEBUG_MODEMSIGNALS, "Checking modem signals (%d/%d)\n",
			port->c_dcd, sx_get_CD(port));
L
Linus Torvalds 已提交
1195 1196 1197

	if (hi_state & ST_BREAK) {
		hi_state &= ~ST_BREAK;
J
Jiri Slaby 已提交
1198 1199 1200
		sx_dprintk(SX_DEBUG_MODEMSIGNALS, "got a break.\n");
		sx_write_channel_byte(port, hi_state, hi_state);
		gs_got_break(&port->gs);
L
Linus Torvalds 已提交
1201 1202 1203
	}
	if (hi_state & ST_DCD) {
		hi_state &= ~ST_DCD;
J
Jiri Slaby 已提交
1204 1205 1206 1207
		sx_dprintk(SX_DEBUG_MODEMSIGNALS, "got a DCD change.\n");
		sx_write_channel_byte(port, hi_state, hi_state);
		c_dcd = sx_get_CD(port);
		sx_dprintk(SX_DEBUG_MODEMSIGNALS, "DCD is now %d\n", c_dcd);
L
Linus Torvalds 已提交
1208 1209
		if (c_dcd != port->c_dcd) {
			port->c_dcd = c_dcd;
J
Jiri Slaby 已提交
1210
			if (sx_get_CD(port)) {
L
Linus Torvalds 已提交
1211
				/* DCD went UP */
J
Jiri Slaby 已提交
1212 1213 1214 1215 1216 1217 1218 1219 1220
				if ((sx_read_channel_byte(port, hi_hstat) !=
						HS_IDLE_CLOSED) &&
						!(port->gs.tty->termios->
							c_cflag & CLOCAL)) {
					/* Are we blocking in open? */
					sx_dprintk(SX_DEBUG_MODEMSIGNALS, "DCD "
						"active, unblocking open\n");
					wake_up_interruptible(&port->gs.
							open_wait);
L
Linus Torvalds 已提交
1221
				} else {
J
Jiri Slaby 已提交
1222 1223
					sx_dprintk(SX_DEBUG_MODEMSIGNALS, "DCD "
						"raised. Ignoring.\n");
L
Linus Torvalds 已提交
1224 1225 1226
				}
			} else {
				/* DCD went down! */
J
Jiri Slaby 已提交
1227 1228 1229 1230
				if (!(port->gs.tty->termios->c_cflag & CLOCAL)){
					sx_dprintk(SX_DEBUG_MODEMSIGNALS, "DCD "
						"dropped. hanging up....\n");
					tty_hangup(port->gs.tty);
L
Linus Torvalds 已提交
1231
				} else {
J
Jiri Slaby 已提交
1232 1233
					sx_dprintk(SX_DEBUG_MODEMSIGNALS, "DCD "
						"dropped. ignoring.\n");
L
Linus Torvalds 已提交
1234 1235 1236
				}
			}
		} else {
J
Jiri Slaby 已提交
1237 1238
			sx_dprintk(SX_DEBUG_MODEMSIGNALS, "Hmmm. card told us "
				"DCD changed, but it didn't.\n");
L
Linus Torvalds 已提交
1239 1240 1241 1242 1243 1244 1245 1246
		}
	}
}

/* This is what an interrupt routine should look like. 
 * Small, elegant, clear.
 */

J
Jiri Slaby 已提交
1247
static irqreturn_t sx_interrupt(int irq, void *ptr)
L
Linus Torvalds 已提交
1248 1249 1250 1251 1252
{
	struct sx_board *board = ptr;
	struct sx_port *port;
	int i;

J
Jiri Slaby 已提交
1253 1254 1255
	func_enter();
	sx_dprintk(SX_DEBUG_FLOW, "sx: enter sx_interrupt (%d/%d)\n", irq,
			board->irq);
L
Linus Torvalds 已提交
1256 1257 1258 1259 1260

	/* AAargh! The order in which to do these things is essential and
	   not trivial. 

	   - Rate limit goes before "recursive". Otherwise a series of
J
Jiri Slaby 已提交
1261
	   recursive calls will hang the machine in the interrupt routine.
L
Linus Torvalds 已提交
1262 1263

	   - hardware twiddling goes before "recursive". Otherwise when we
J
Jiri Slaby 已提交
1264 1265 1266
	   poll the card, and a recursive interrupt happens, we won't
	   ack the card, so it might keep on interrupting us. (especially
	   level sensitive interrupt systems like PCI).
L
Linus Torvalds 已提交
1267 1268

	   - Rate limit goes before hardware twiddling. Otherwise we won't
J
Jiri Slaby 已提交
1269
	   catch a card that has gone bonkers.
L
Linus Torvalds 已提交
1270 1271

	   - The "initialized" test goes after the hardware twiddling. Otherwise
J
Jiri Slaby 已提交
1272
	   the card will stick us in the interrupt routine again.
L
Linus Torvalds 已提交
1273 1274

	   - The initialized test goes before recursive. 
J
Jiri Slaby 已提交
1275
	 */
L
Linus Torvalds 已提交
1276 1277 1278

#ifdef IRQ_RATE_LIMIT
	/* Aaargh! I'm ashamed. This costs more lines-of-code than the
J
Jiri Slaby 已提交
1279 1280
	   actual interrupt routine!. (Well, used to when I wrote that
	   comment) */
L
Linus Torvalds 已提交
1281 1282
	{
		static int lastjif;
J
Jiri Slaby 已提交
1283
		static int nintr = 0;
L
Linus Torvalds 已提交
1284 1285 1286

		if (lastjif == jiffies) {
			if (++nintr > IRQ_RATE_LIMIT) {
J
Jiri Slaby 已提交
1287 1288 1289 1290
				free_irq(board->irq, board);
				printk(KERN_ERR "sx: Too many interrupts. "
						"Turning off interrupt %d.\n",
						board->irq);
L
Linus Torvalds 已提交
1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301
			}
		} else {
			lastjif = jiffies;
			nintr = 0;
		}
	}
#endif

	if (board->irq == irq) {
		/* Tell the card we've noticed the interrupt. */

J
Jiri Slaby 已提交
1302 1303 1304
		sx_write_board_word(board, cc_int_pending, 0);
		if (IS_SX_BOARD(board)) {
			write_sx_byte(board, SX_RESET_IRQ, 1);
L
Linus Torvalds 已提交
1305
		} else if (IS_EISA_BOARD(board)) {
J
Jiri Slaby 已提交
1306 1307
			inb(board->eisa_base + 0xc03);
			write_sx_word(board, 8, 0);
L
Linus Torvalds 已提交
1308
		} else {
J
Jiri Slaby 已提交
1309 1310 1311 1312
			write_sx_byte(board, SI2_ISA_INTCLEAR,
					SI2_ISA_INTCLEAR_CLEAR);
			write_sx_byte(board, SI2_ISA_INTCLEAR,
					SI2_ISA_INTCLEAR_SET);
L
Linus Torvalds 已提交
1313 1314 1315 1316 1317 1318 1319 1320
		}
	}

	if (!sx_initialized)
		return IRQ_HANDLED;
	if (!(board->flags & SX_BOARD_INITIALIZED))
		return IRQ_HANDLED;

J
Jiri Slaby 已提交
1321 1322
	if (test_and_set_bit(SX_BOARD_INTR_LOCK, &board->locks)) {
		printk(KERN_ERR "Recursive interrupt! (%d)\n", board->irq);
L
Linus Torvalds 已提交
1323 1324 1325
		return IRQ_HANDLED;
	}

J
Jiri Slaby 已提交
1326
	for (i = 0; i < board->nports; i++) {
L
Linus Torvalds 已提交
1327 1328
		port = &board->ports[i];
		if (port->gs.flags & GS_ACTIVE) {
J
Jiri Slaby 已提交
1329 1330 1331 1332
			if (sx_read_channel_byte(port, hi_state)) {
				sx_dprintk(SX_DEBUG_INTERRUPTS, "Port %d: "
						"modem signal change?... \n",i);
				sx_check_modem_signals(port);
L
Linus Torvalds 已提交
1333 1334
			}
			if (port->gs.xmit_cnt) {
J
Jiri Slaby 已提交
1335
				sx_transmit_chars(port);
L
Linus Torvalds 已提交
1336 1337
			}
			if (!(port->gs.flags & SX_RX_THROTTLE)) {
J
Jiri Slaby 已提交
1338
				sx_receive_chars(port);
L
Linus Torvalds 已提交
1339 1340 1341 1342
			}
		}
	}

J
Jiri Slaby 已提交
1343
	clear_bit(SX_BOARD_INTR_LOCK, &board->locks);
L
Linus Torvalds 已提交
1344

J
Jiri Slaby 已提交
1345 1346 1347
	sx_dprintk(SX_DEBUG_FLOW, "sx: exit sx_interrupt (%d/%d)\n", irq,
			board->irq);
	func_exit();
L
Linus Torvalds 已提交
1348 1349 1350
	return IRQ_HANDLED;
}

J
Jiri Slaby 已提交
1351
static void sx_pollfunc(unsigned long data)
L
Linus Torvalds 已提交
1352
{
J
Jiri Slaby 已提交
1353
	struct sx_board *board = (struct sx_board *)data;
L
Linus Torvalds 已提交
1354

J
Jiri Slaby 已提交
1355
	func_enter();
L
Linus Torvalds 已提交
1356

J
Jiri Slaby 已提交
1357
	sx_interrupt(0, board);
L
Linus Torvalds 已提交
1358

1359
	mod_timer(&board->timer, jiffies + sx_poll);
J
Jiri Slaby 已提交
1360
	func_exit();
L
Linus Torvalds 已提交
1361 1362 1363 1364 1365 1366 1367 1368 1369 1370
}

/* ********************************************************************** *
 *                Here are the routines that actually                     *
 *              interface with the generic_serial driver                  *
 * ********************************************************************** */

/* Ehhm. I don't know how to fiddle with interrupts on the SX card. --REW */
/* Hmm. Ok I figured it out. You don't.  */

J
Jiri Slaby 已提交
1371
static void sx_disable_tx_interrupts(void *ptr)
L
Linus Torvalds 已提交
1372
{
J
Jiri Slaby 已提交
1373
	struct sx_port *port = ptr;
L
Linus Torvalds 已提交
1374 1375 1376 1377 1378 1379 1380
	func_enter2();

	port->gs.flags &= ~GS_TX_INTEN;

	func_exit();
}

J
Jiri Slaby 已提交
1381
static void sx_enable_tx_interrupts(void *ptr)
L
Linus Torvalds 已提交
1382
{
J
Jiri Slaby 已提交
1383
	struct sx_port *port = ptr;
L
Linus Torvalds 已提交
1384 1385 1386 1387
	int data_in_buffer;
	func_enter2();

	/* First transmit the characters that we're supposed to */
J
Jiri Slaby 已提交
1388
	sx_transmit_chars(port);
L
Linus Torvalds 已提交
1389 1390 1391

	/* The sx card will never interrupt us if we don't fill the buffer
	   past 25%. So we keep considering interrupts off if that's the case. */
J
Jiri Slaby 已提交
1392 1393
	data_in_buffer = (sx_read_channel_byte(port, hi_txipos) -
			  sx_read_channel_byte(port, hi_txopos)) & 0xff;
L
Linus Torvalds 已提交
1394 1395

	/* XXX Must be "HIGH_WATER" for SI card according to doc. */
J
Jiri Slaby 已提交
1396
	if (data_in_buffer < LOW_WATER)
L
Linus Torvalds 已提交
1397 1398 1399 1400 1401
		port->gs.flags &= ~GS_TX_INTEN;

	func_exit();
}

J
Jiri Slaby 已提交
1402
static void sx_disable_rx_interrupts(void *ptr)
L
Linus Torvalds 已提交
1403 1404 1405 1406 1407 1408 1409
{
	/*  struct sx_port *port = ptr; */
	func_enter();

	func_exit();
}

J
Jiri Slaby 已提交
1410
static void sx_enable_rx_interrupts(void *ptr)
L
Linus Torvalds 已提交
1411 1412 1413 1414 1415 1416 1417 1418
{
	/*  struct sx_port *port = ptr; */
	func_enter();

	func_exit();
}

/* Jeez. Isn't this simple? */
J
Jiri Slaby 已提交
1419
static int sx_get_CD(void *ptr)
L
Linus Torvalds 已提交
1420 1421 1422 1423 1424
{
	struct sx_port *port = ptr;
	func_enter2();

	func_exit();
J
Jiri Slaby 已提交
1425
	return ((sx_read_channel_byte(port, hi_ip) & IP_DCD) != 0);
L
Linus Torvalds 已提交
1426 1427 1428
}

/* Jeez. Isn't this simple? */
J
Jiri Slaby 已提交
1429
static int sx_chars_in_buffer(void *ptr)
L
Linus Torvalds 已提交
1430 1431 1432 1433 1434
{
	struct sx_port *port = ptr;
	func_enter2();

	func_exit();
J
Jiri Slaby 已提交
1435 1436
	return ((sx_read_channel_byte(port, hi_txipos) -
		 sx_read_channel_byte(port, hi_txopos)) & 0xff);
L
Linus Torvalds 已提交
1437 1438
}

J
Jiri Slaby 已提交
1439
static void sx_shutdown_port(void *ptr)
L
Linus Torvalds 已提交
1440
{
J
Jiri Slaby 已提交
1441
	struct sx_port *port = ptr;
L
Linus Torvalds 已提交
1442 1443 1444

	func_enter();

J
Jiri Slaby 已提交
1445
	port->gs.flags &= ~GS_ACTIVE;
L
Linus Torvalds 已提交
1446
	if (port->gs.tty && (port->gs.tty->termios->c_cflag & HUPCL)) {
J
Jiri Slaby 已提交
1447
		sx_setsignals(port, 0, 0);
L
Linus Torvalds 已提交
1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458
		sx_reconfigure_port(port);
	}

	func_exit();
}

/* ********************************************************************** *
 *                Here are the routines that actually                     *
 *               interface with the rest of the system                    *
 * ********************************************************************** */

J
Jiri Slaby 已提交
1459
static int sx_open(struct tty_struct *tty, struct file *filp)
L
Linus Torvalds 已提交
1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471
{
	struct sx_port *port;
	int retval, line;
	unsigned long flags;

	func_enter();

	if (!sx_initialized) {
		return -EIO;
	}

	line = tty->index;
J
Jiri Slaby 已提交
1472
	sx_dprintk(SX_DEBUG_OPEN, "%d: opening line %d. tty=%p ctty=%p, "
1473
			"np=%d)\n", task_pid_nr(current), line, tty,
J
Jiri Slaby 已提交
1474
			current->signal->tty, sx_nports);
L
Linus Torvalds 已提交
1475 1476 1477 1478

	if ((line < 0) || (line >= SX_NPORTS) || (line >= sx_nports))
		return -ENODEV;

J
Jiri Slaby 已提交
1479
	port = &sx_ports[line];
L
Linus Torvalds 已提交
1480
	port->c_dcd = 0; /* Make sure that the first interrupt doesn't detect a
J
Jiri Slaby 已提交
1481
			    1 -> 0 transition. */
L
Linus Torvalds 已提交
1482

J
Jiri Slaby 已提交
1483
	sx_dprintk(SX_DEBUG_OPEN, "port = %p c_dcd = %d\n", port, port->c_dcd);
L
Linus Torvalds 已提交
1484 1485 1486 1487 1488 1489 1490 1491

	spin_lock_irqsave(&port->gs.driver_lock, flags);

	tty->driver_data = port;
	port->gs.tty = tty;
	port->gs.count++;
	spin_unlock_irqrestore(&port->gs.driver_lock, flags);

J
Jiri Slaby 已提交
1492
	sx_dprintk(SX_DEBUG_OPEN, "starting port\n");
L
Linus Torvalds 已提交
1493 1494 1495 1496 1497

	/*
	 * Start up serial port
	 */
	retval = gs_init_port(&port->gs);
J
Jiri Slaby 已提交
1498
	sx_dprintk(SX_DEBUG_OPEN, "done gs_init\n");
L
Linus Torvalds 已提交
1499 1500 1501 1502 1503 1504 1505
	if (retval) {
		port->gs.count--;
		return retval;
	}

	port->gs.flags |= GS_ACTIVE;
	if (port->gs.count <= 1)
J
Jiri Slaby 已提交
1506
		sx_setsignals(port, 1, 1);
L
Linus Torvalds 已提交
1507 1508 1509

#if 0
	if (sx_debug & SX_DEBUG_OPEN)
J
Jiri Slaby 已提交
1510
		my_hd(port, sizeof(*port));
L
Linus Torvalds 已提交
1511 1512
#else
	if (sx_debug & SX_DEBUG_OPEN)
J
Jiri Slaby 已提交
1513
		my_hd_io(port->board->base + port->ch_base, sizeof(*port));
L
Linus Torvalds 已提交
1514 1515 1516
#endif

	if (port->gs.count <= 1) {
J
Jiri Slaby 已提交
1517 1518 1519
		if (sx_send_command(port, HS_LOPEN, -1, HS_IDLE_OPEN) != 1) {
			printk(KERN_ERR "sx: Card didn't respond to LOPEN "
					"command.\n");
L
Linus Torvalds 已提交
1520 1521 1522 1523 1524 1525 1526 1527
			spin_lock_irqsave(&port->gs.driver_lock, flags);
			port->gs.count--;
			spin_unlock_irqrestore(&port->gs.driver_lock, flags);
			return -EIO;
		}
	}

	retval = gs_block_til_ready(port, filp);
J
Jiri Slaby 已提交
1528 1529
	sx_dprintk(SX_DEBUG_OPEN, "Block til ready returned %d. Count=%d\n",
			retval, port->gs.count);
L
Linus Torvalds 已提交
1530 1531

	if (retval) {
J
Jiri Slaby 已提交
1532 1533 1534
/*
 * Don't lower gs.count here because sx_close() will be called later
 */
L
Linus Torvalds 已提交
1535 1536 1537 1538 1539

		return retval;
	}
	/* tty->low_latency = 1; */

J
Jiri Slaby 已提交
1540 1541
	port->c_dcd = sx_get_CD(port);
	sx_dprintk(SX_DEBUG_OPEN, "at open: cd=%d\n", port->c_dcd);
L
Linus Torvalds 已提交
1542 1543 1544 1545 1546 1547

	func_exit();
	return 0;

}

J
Jiri Slaby 已提交
1548
static void sx_close(void *ptr)
L
Linus Torvalds 已提交
1549
{
J
Jiri Slaby 已提交
1550
	struct sx_port *port = ptr;
L
Linus Torvalds 已提交
1551
	/* Give the port 5 seconds to close down. */
J
Jiri Slaby 已提交
1552
	int to = 5 * HZ;
L
Linus Torvalds 已提交
1553

J
Jiri Slaby 已提交
1554
	func_enter();
L
Linus Torvalds 已提交
1555

J
Jiri Slaby 已提交
1556 1557 1558
	sx_setsignals(port, 0, 0);
	sx_reconfigure_port(port);
	sx_send_command(port, HS_CLOSE, 0, 0);
L
Linus Torvalds 已提交
1559

J
Jiri Slaby 已提交
1560
	while (to-- && (sx_read_channel_byte(port, hi_hstat) != HS_IDLE_CLOSED))
L
Linus Torvalds 已提交
1561 1562
		if (msleep_interruptible(10))
			break;
J
Jiri Slaby 已提交
1563 1564 1565 1566 1567
	if (sx_read_channel_byte(port, hi_hstat) != HS_IDLE_CLOSED) {
		if (sx_send_command(port, HS_FORCE_CLOSED, -1, HS_IDLE_CLOSED)
				!= 1) {
			printk(KERN_ERR "sx: sent the force_close command, but "
					"card didn't react\n");
L
Linus Torvalds 已提交
1568
		} else
J
Jiri Slaby 已提交
1569 1570
			sx_dprintk(SX_DEBUG_CLOSE, "sent the force_close "
					"command.\n");
L
Linus Torvalds 已提交
1571 1572
	}

J
Jiri Slaby 已提交
1573 1574
	sx_dprintk(SX_DEBUG_CLOSE, "waited %d jiffies for close. count=%d\n",
			5 * HZ - to - 1, port->gs.count);
L
Linus Torvalds 已提交
1575

J
Jiri Slaby 已提交
1576 1577 1578 1579
	if (port->gs.count) {
		sx_dprintk(SX_DEBUG_CLOSE, "WARNING port count:%d\n",
				port->gs.count);
		/*printk("%s SETTING port count to zero: %p count: %d\n",
1580
				__func__, port, port->gs.count);
J
Jiri Slaby 已提交
1581
		port->gs.count = 0;*/
L
Linus Torvalds 已提交
1582 1583
	}

J
Jiri Slaby 已提交
1584
	func_exit();
L
Linus Torvalds 已提交
1585 1586 1587
}

/* This is relatively thorough. But then again it is only 20 lines. */
J
Jiri Slaby 已提交
1588 1589 1590 1591 1592 1593
#define MARCHUP		for (i = min; i < max; i++)
#define MARCHDOWN	for (i = max - 1; i >= min; i--)
#define W0		write_sx_byte(board, i, 0x55)
#define W1		write_sx_byte(board, i, 0xaa)
#define R0		if (read_sx_byte(board, i) != 0x55) return 1
#define R1		if (read_sx_byte(board, i) != 0xaa) return 1
L
Linus Torvalds 已提交
1594 1595 1596

/* This memtest takes a human-noticable time. You normally only do it
   once a boot, so I guess that it is worth it. */
J
Jiri Slaby 已提交
1597
static int do_memtest(struct sx_board *board, int min, int max)
L
Linus Torvalds 已提交
1598 1599 1600 1601 1602 1603 1604 1605
{
	int i;

	/* This is a marchb. Theoretically, marchb catches much more than
	   simpler tests. In practise, the longer test just catches more
	   intermittent errors. -- REW
	   (For the theory behind memory testing see: 
	   Testing Semiconductor Memories by A.J. van de Goor.) */
J
Jiri Slaby 已提交
1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632
	MARCHUP {
		W0;
	}
	MARCHUP {
		R0;
		W1;
		R1;
		W0;
		R0;
		W1;
	}
	MARCHUP {
		R1;
		W0;
		W1;
	}
	MARCHDOWN {
		R1;
		W0;
		W1;
		W0;
	}
	MARCHDOWN {
		R0;
		W1;
		W0;
	}
L
Linus Torvalds 已提交
1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643

	return 0;
}

#undef MARCHUP
#undef MARCHDOWN
#undef W0
#undef W1
#undef R0
#undef R1

J
Jiri Slaby 已提交
1644 1645 1646 1647 1648 1649
#define MARCHUP		for (i = min; i < max; i += 2)
#define MARCHDOWN	for (i = max - 1; i >= min; i -= 2)
#define W0		write_sx_word(board, i, 0x55aa)
#define W1		write_sx_word(board, i, 0xaa55)
#define R0		if (read_sx_word(board, i) != 0x55aa) return 1
#define R1		if (read_sx_word(board, i) != 0xaa55) return 1
L
Linus Torvalds 已提交
1650 1651 1652 1653

#if 0
/* This memtest takes a human-noticable time. You normally only do it
   once a boot, so I guess that it is worth it. */
J
Jiri Slaby 已提交
1654
static int do_memtest_w(struct sx_board *board, int min, int max)
L
Linus Torvalds 已提交
1655 1656 1657
{
	int i;

J
Jiri Slaby 已提交
1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684
	MARCHUP {
		W0;
	}
	MARCHUP {
		R0;
		W1;
		R1;
		W0;
		R0;
		W1;
	}
	MARCHUP {
		R1;
		W0;
		W1;
	}
	MARCHDOWN {
		R1;
		W0;
		W1;
		W0;
	}
	MARCHDOWN {
		R0;
		W1;
		W0;
	}
L
Linus Torvalds 已提交
1685 1686 1687 1688 1689

	return 0;
}
#endif

J
Jiri Slaby 已提交
1690 1691
static int sx_fw_ioctl(struct inode *inode, struct file *filp,
		unsigned int cmd, unsigned long arg)
L
Linus Torvalds 已提交
1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702
{
	int rc = 0;
	int __user *descr = (int __user *)arg;
	int i;
	static struct sx_board *board = NULL;
	int nbytes, offset;
	unsigned long data;
	char *tmp;

	func_enter();

J
Jiri Slaby 已提交
1703
#if 0
L
Linus Torvalds 已提交
1704 1705 1706 1707 1708 1709 1710
	/* Removed superuser check: Sysops can use the permissions on the device
	   file to restrict access. Recommendation: Root only. (root.root 600) */
	if (!capable(CAP_SYS_ADMIN)) {
		return -EPERM;
	}
#endif

J
Jiri Slaby 已提交
1711
	sx_dprintk(SX_DEBUG_FIRMWARE, "IOCTL %x: %lx\n", cmd, arg);
L
Linus Torvalds 已提交
1712

J
Jiri Slaby 已提交
1713 1714
	if (!board)
		board = &boards[0];
L
Linus Torvalds 已提交
1715
	if (board->flags & SX_BOARD_PRESENT) {
J
Jiri Slaby 已提交
1716 1717
		sx_dprintk(SX_DEBUG_FIRMWARE, "Board present! (%x)\n",
				board->flags);
L
Linus Torvalds 已提交
1718
	} else {
J
Jiri Slaby 已提交
1719 1720 1721 1722 1723
		sx_dprintk(SX_DEBUG_FIRMWARE, "Board not present! (%x) all:",
				board->flags);
		for (i = 0; i < SX_NBOARDS; i++)
			sx_dprintk(SX_DEBUG_FIRMWARE, "<%x> ", boards[i].flags);
		sx_dprintk(SX_DEBUG_FIRMWARE, "\n");
L
Linus Torvalds 已提交
1724 1725 1726 1727 1728
		return -EIO;
	}

	switch (cmd) {
	case SXIO_SET_BOARD:
J
Jiri Slaby 已提交
1729 1730 1731 1732 1733 1734 1735
		sx_dprintk(SX_DEBUG_FIRMWARE, "set board to %ld\n", arg);
		if (arg >= SX_NBOARDS)
			return -EIO;
		sx_dprintk(SX_DEBUG_FIRMWARE, "not out of range\n");
		if (!(boards[arg].flags & SX_BOARD_PRESENT))
			return -EIO;
		sx_dprintk(SX_DEBUG_FIRMWARE, ".. and present!\n");
L
Linus Torvalds 已提交
1736 1737 1738
		board = &boards[arg];
		break;
	case SXIO_GET_TYPE:
J
Jiri Slaby 已提交
1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750
		rc = -ENOENT;	/* If we manage to miss one, return error. */
		if (IS_SX_BOARD(board))
			rc = SX_TYPE_SX;
		if (IS_CF_BOARD(board))
			rc = SX_TYPE_CF;
		if (IS_SI_BOARD(board))
			rc = SX_TYPE_SI;
		if (IS_SI1_BOARD(board))
			rc = SX_TYPE_SI;
		if (IS_EISA_BOARD(board))
			rc = SX_TYPE_SI;
		sx_dprintk(SX_DEBUG_FIRMWARE, "returning type= %d\n", rc);
L
Linus Torvalds 已提交
1751 1752
		break;
	case SXIO_DO_RAMTEST:
J
Jiri Slaby 已提交
1753
		if (sx_initialized)	/* Already initialized: better not ramtest the board.  */
L
Linus Torvalds 已提交
1754
			return -EPERM;
J
Jiri Slaby 已提交
1755 1756 1757 1758 1759
		if (IS_SX_BOARD(board)) {
			rc = do_memtest(board, 0, 0x7000);
			if (!rc)
				rc = do_memtest(board, 0, 0x7000);
			/*if (!rc) rc = do_memtest_w (board, 0, 0x7000); */
L
Linus Torvalds 已提交
1760
		} else {
J
Jiri Slaby 已提交
1761
			rc = do_memtest(board, 0, 0x7ff8);
L
Linus Torvalds 已提交
1762 1763
			/* if (!rc) rc = do_memtest_w (board, 0, 0x7ff8); */
		}
J
Jiri Slaby 已提交
1764 1765
		sx_dprintk(SX_DEBUG_FIRMWARE, "returning memtest result= %d\n",
			   rc);
L
Linus Torvalds 已提交
1766 1767
		break;
	case SXIO_DOWNLOAD:
J
Jiri Slaby 已提交
1768
		if (sx_initialized)	/* Already initialized */
L
Linus Torvalds 已提交
1769
			return -EEXIST;
J
Jiri Slaby 已提交
1770
		if (!sx_reset(board))
L
Linus Torvalds 已提交
1771
			return -EIO;
J
Jiri Slaby 已提交
1772 1773 1774 1775 1776 1777 1778 1779
		sx_dprintk(SX_DEBUG_INIT, "reset the board...\n");

		tmp = kmalloc(SX_CHUNK_SIZE, GFP_USER);
		if (!tmp)
			return -ENOMEM;
		get_user(nbytes, descr++);
		get_user(offset, descr++);
		get_user(data, descr++);
L
Linus Torvalds 已提交
1780
		while (nbytes && data) {
J
Jiri Slaby 已提交
1781 1782 1783 1784 1785
			for (i = 0; i < nbytes; i += SX_CHUNK_SIZE) {
				if (copy_from_user(tmp, (char __user *)data + i,
						(i + SX_CHUNK_SIZE > nbytes) ?
						nbytes - i : SX_CHUNK_SIZE)) {
					kfree(tmp);
L
Linus Torvalds 已提交
1786 1787
					return -EFAULT;
				}
J
Jiri Slaby 已提交
1788 1789 1790
				memcpy_toio(board->base2 + offset + i, tmp,
						(i + SX_CHUNK_SIZE > nbytes) ?
						nbytes - i : SX_CHUNK_SIZE);
L
Linus Torvalds 已提交
1791 1792
			}

J
Jiri Slaby 已提交
1793 1794 1795
			get_user(nbytes, descr++);
			get_user(offset, descr++);
			get_user(data, descr++);
L
Linus Torvalds 已提交
1796
		}
J
Jiri Slaby 已提交
1797 1798
		kfree(tmp);
		sx_nports += sx_init_board(board);
L
Linus Torvalds 已提交
1799 1800 1801
		rc = sx_nports;
		break;
	case SXIO_INIT:
J
Jiri Slaby 已提交
1802
		if (sx_initialized)	/* Already initialized */
L
Linus Torvalds 已提交
1803 1804
			return -EEXIST;
		/* This is not allowed until all boards are initialized... */
J
Jiri Slaby 已提交
1805 1806 1807
		for (i = 0; i < SX_NBOARDS; i++) {
			if ((boards[i].flags & SX_BOARD_PRESENT) &&
				!(boards[i].flags & SX_BOARD_INITIALIZED))
L
Linus Torvalds 已提交
1808 1809
				return -EIO;
		}
J
Jiri Slaby 已提交
1810 1811 1812 1813 1814 1815 1816 1817 1818 1819
		for (i = 0; i < SX_NBOARDS; i++)
			if (!(boards[i].flags & SX_BOARD_PRESENT))
				break;

		sx_dprintk(SX_DEBUG_FIRMWARE, "initing portstructs, %d boards, "
				"%d channels, first board: %d ports\n",
				i, sx_nports, boards[0].nports);
		rc = sx_init_portstructs(i, sx_nports);
		sx_init_drivers();
		if (rc >= 0)
L
Linus Torvalds 已提交
1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835
			sx_initialized++;
		break;
	case SXIO_SETDEBUG:
		sx_debug = arg;
		break;
	case SXIO_GETDEBUG:
		rc = sx_debug;
		break;
	case SXIO_GETGSDEBUG:
	case SXIO_SETGSDEBUG:
		rc = -EINVAL;
		break;
	case SXIO_GETNPORTS:
		rc = sx_nports;
		break;
	default:
J
Jiri Slaby 已提交
1836 1837
		printk(KERN_WARNING "Unknown ioctl on firmware device (%x).\n",
				cmd);
L
Linus Torvalds 已提交
1838 1839
		break;
	}
J
Jiri Slaby 已提交
1840
	func_exit();
L
Linus Torvalds 已提交
1841 1842 1843
	return rc;
}

J
Jiri Slaby 已提交
1844
static void sx_break(struct tty_struct *tty, int flag)
L
Linus Torvalds 已提交
1845 1846 1847 1848
{
	struct sx_port *port = tty->driver_data;
	int rv;

J
Jiri Slaby 已提交
1849
	func_enter();
A
Alan Cox 已提交
1850
	lock_kernel();
L
Linus Torvalds 已提交
1851

J
Jiri Slaby 已提交
1852 1853 1854 1855 1856 1857 1858
	if (flag)
		rv = sx_send_command(port, HS_START, -1, HS_IDLE_BREAK);
	else
		rv = sx_send_command(port, HS_STOP, -1, HS_IDLE_OPEN);
	if (rv != 1)
		printk(KERN_ERR "sx: couldn't send break (%x).\n",
			read_sx_byte(port->board, CHAN_OFFSET(port, hi_hstat)));
A
Alan Cox 已提交
1859
	unlock_kernel();
J
Jiri Slaby 已提交
1860
	func_exit();
L
Linus Torvalds 已提交
1861 1862 1863 1864 1865 1866 1867 1868 1869
}

static int sx_tiocmget(struct tty_struct *tty, struct file *file)
{
	struct sx_port *port = tty->driver_data;
	return sx_getsignals(port);
}

static int sx_tiocmset(struct tty_struct *tty, struct file *file,
J
Jiri Slaby 已提交
1870
		unsigned int set, unsigned int clear)
L
Linus Torvalds 已提交
1871 1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888
{
	struct sx_port *port = tty->driver_data;
	int rts = -1, dtr = -1;

	if (set & TIOCM_RTS)
		rts = 1;
	if (set & TIOCM_DTR)
		dtr = 1;
	if (clear & TIOCM_RTS)
		rts = 0;
	if (clear & TIOCM_DTR)
		dtr = 0;

	sx_setsignals(port, dtr, rts);
	sx_reconfigure_port(port);
	return 0;
}

J
Jiri Slaby 已提交
1889 1890
static int sx_ioctl(struct tty_struct *tty, struct file *filp,
		unsigned int cmd, unsigned long arg)
L
Linus Torvalds 已提交
1891 1892 1893 1894 1895 1896 1897 1898
{
	int rc;
	struct sx_port *port = tty->driver_data;
	void __user *argp = (void __user *)arg;

	/* func_enter2(); */

	rc = 0;
A
Alan Cox 已提交
1899
	lock_kernel();
L
Linus Torvalds 已提交
1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910
	switch (cmd) {
	case TIOCGSERIAL:
		rc = gs_getserial(&port->gs, argp);
		break;
	case TIOCSSERIAL:
		rc = gs_setserial(&port->gs, argp);
		break;
	default:
		rc = -ENOIOCTLCMD;
		break;
	}
A
Alan Cox 已提交
1911
	unlock_kernel();
L
Linus Torvalds 已提交
1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932

	/* func_exit(); */
	return rc;
}

/* The throttle/unthrottle scheme for the Specialix card is different
 * from other drivers and deserves some explanation. 
 * The Specialix hardware takes care of XON/XOFF
 * and CTS/RTS flow control itself.  This means that all we have to
 * do when signalled by the upper tty layer to throttle/unthrottle is
 * to make a note of it here.  When we come to read characters from the
 * rx buffers on the card (sx_receive_chars()) we look to see if the
 * upper layer can accept more (as noted here in sx_rx_throt[]). 
 * If it can't we simply don't remove chars from the cards buffer. 
 * When the tty layer can accept chars, we again note that here and when
 * sx_receive_chars() is called it will remove them from the cards buffer.
 * The card will notice that a ports buffer has drained below some low
 * water mark and will unflow control the line itself, using whatever
 * flow control scheme is in use for that port. -- Simon Allen
 */

J
Jiri Slaby 已提交
1933
static void sx_throttle(struct tty_struct *tty)
L
Linus Torvalds 已提交
1934 1935 1936 1937 1938 1939 1940
{
	struct sx_port *port = (struct sx_port *)tty->driver_data;

	func_enter2();
	/* If the port is using any type of input flow
	 * control then throttle the port.
	 */
J
Jiri Slaby 已提交
1941
	if ((tty->termios->c_cflag & CRTSCTS) || (I_IXOFF(tty))) {
L
Linus Torvalds 已提交
1942 1943 1944 1945 1946
		port->gs.flags |= SX_RX_THROTTLE;
	}
	func_exit();
}

J
Jiri Slaby 已提交
1947
static void sx_unthrottle(struct tty_struct *tty)
L
Linus Torvalds 已提交
1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964
{
	struct sx_port *port = (struct sx_port *)tty->driver_data;

	func_enter2();
	/* Always unthrottle even if flow control is not enabled on
	 * this port in case we disabled flow control while the port
	 * was throttled
	 */
	port->gs.flags &= ~SX_RX_THROTTLE;
	func_exit();
	return;
}

/* ********************************************************************** *
 *                    Here are the initialization routines.               *
 * ********************************************************************** */

J
Jiri Slaby 已提交
1965
static int sx_init_board(struct sx_board *board)
L
Linus Torvalds 已提交
1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976
{
	int addr;
	int chans;
	int type;

	func_enter();

	/* This is preceded by downloading the download code. */

	board->flags |= SX_BOARD_INITIALIZED;

J
Jiri Slaby 已提交
1977
	if (read_sx_byte(board, 0))
L
Linus Torvalds 已提交
1978
		/* CF boards may need this. */
J
Jiri Slaby 已提交
1979
		write_sx_byte(board, 0, 0);
L
Linus Torvalds 已提交
1980 1981 1982

	/* This resets the processor again, to make sure it didn't do any
	   foolish things while we were downloading the image */
J
Jiri Slaby 已提交
1983
	if (!sx_reset(board))
L
Linus Torvalds 已提交
1984 1985
		return 0;

J
Jiri Slaby 已提交
1986 1987 1988 1989
	sx_start_board(board);
	udelay(10);
	if (!sx_busy_wait_neq(board, 0, 0xff, 0)) {
		printk(KERN_ERR "sx: Ooops. Board won't initialize.\n");
L
Linus Torvalds 已提交
1990 1991 1992 1993 1994
		return 0;
	}

	/* Ok. So now the processor on the card is running. It gathered
	   some info for us... */
J
Jiri Slaby 已提交
1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008
	sx_dprintk(SX_DEBUG_INIT, "The sxcard structure:\n");
	if (sx_debug & SX_DEBUG_INIT)
		my_hd_io(board->base, 0x10);
	sx_dprintk(SX_DEBUG_INIT, "the first sx_module structure:\n");
	if (sx_debug & SX_DEBUG_INIT)
		my_hd_io(board->base + 0x80, 0x30);

	sx_dprintk(SX_DEBUG_INIT, "init_status: %x, %dk memory, firmware "
			"V%x.%02x,\n",
			read_sx_byte(board, 0), read_sx_byte(board, 1),
			read_sx_byte(board, 5), read_sx_byte(board, 4));

	if (read_sx_byte(board, 0) == 0xff) {
		printk(KERN_INFO "sx: No modules found. Sorry.\n");
L
Linus Torvalds 已提交
2009 2010 2011 2012 2013 2014 2015
		board->nports = 0;
		return 0;
	}

	chans = 0;

	if (IS_SX_BOARD(board)) {
J
Jiri Slaby 已提交
2016
		sx_write_board_word(board, cc_int_count, sx_maxints);
L
Linus Torvalds 已提交
2017 2018
	} else {
		if (sx_maxints)
J
Jiri Slaby 已提交
2019 2020
			sx_write_board_word(board, cc_int_count,
					SI_PROCESSOR_CLOCK / 8 / sx_maxints);
L
Linus Torvalds 已提交
2021 2022 2023
	}

	/* grab the first module type... */
J
Jiri Slaby 已提交
2024 2025 2026
	/* board->ta_type = mod_compat_type (read_sx_byte (board, 0x80 + 0x08)); */
	board->ta_type = mod_compat_type(sx_read_module_byte(board, 0x80,
				mc_chip));
L
Linus Torvalds 已提交
2027 2028

	/* XXX byteorder */
J
Jiri Slaby 已提交
2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046 2047 2048
	for (addr = 0x80; addr != 0; addr = read_sx_word(board, addr) & 0x7fff){
		type = sx_read_module_byte(board, addr, mc_chip);
		sx_dprintk(SX_DEBUG_INIT, "Module at %x: %d channels\n",
				addr, read_sx_byte(board, addr + 2));

		chans += sx_read_module_byte(board, addr, mc_type);

		sx_dprintk(SX_DEBUG_INIT, "module is an %s, which has %s/%s "
				"panels\n",
				mod_type_s(type),
				pan_type_s(sx_read_module_byte(board, addr,
						mc_mods) & 0xf),
				pan_type_s(sx_read_module_byte(board, addr,
						mc_mods) >> 4));

		sx_dprintk(SX_DEBUG_INIT, "CD1400 versions: %x/%x, ASIC "
			"version: %x\n",
			sx_read_module_byte(board, addr, mc_rev1),
			sx_read_module_byte(board, addr, mc_rev2),
			sx_read_module_byte(board, addr, mc_mtaasic_rev));
L
Linus Torvalds 已提交
2049 2050 2051 2052

		/* The following combinations are illegal: It should theoretically
		   work, but timing problems make the bus HANG. */

J
Jiri Slaby 已提交
2053 2054 2055 2056 2057
		if (mod_compat_type(type) != board->ta_type) {
			printk(KERN_ERR "sx: This is an invalid "
				"configuration.\nDon't mix TA/MTA/SXDC on the "
				"same hostadapter.\n");
			chans = 0;
L
Linus Torvalds 已提交
2058 2059
			break;
		}
J
Jiri Slaby 已提交
2060 2061 2062 2063 2064 2065 2066
		if ((IS_EISA_BOARD(board) ||
				IS_SI_BOARD(board)) &&
				(mod_compat_type(type) == 4)) {
			printk(KERN_ERR	"sx: This is an invalid "
				"configuration.\nDon't use SXDCs on an SI/XIO "
				"adapter.\n");
			chans = 0;
L
Linus Torvalds 已提交
2067 2068
			break;
		}
J
Jiri Slaby 已提交
2069
#if 0				/* Problem fixed: firmware 3.05 */
L
Linus Torvalds 已提交
2070 2071 2072
		if (IS_SX_BOARD(board) && (type == TA8)) {
			/* There are some issues with the firmware and the DCD/RTS
			   lines. It might work if you tie them together or something.
J
Jiri Slaby 已提交
2073
			   It might also work if you get a newer sx_firmware.   Therefore
L
Linus Torvalds 已提交
2074
			   this is just a warning. */
J
Jiri Slaby 已提交
2075 2076 2077
			printk(KERN_WARNING
			       "sx: The SX host doesn't work too well "
			       "with the TA8 adapters.\nSpecialix is working on it.\n");
L
Linus Torvalds 已提交
2078 2079 2080 2081 2082
		}
#endif
	}

	if (chans) {
J
Jiri Slaby 已提交
2083
		if (board->irq > 0) {
L
Linus Torvalds 已提交
2084
			/* fixed irq, probably PCI */
J
Jiri Slaby 已提交
2085 2086 2087 2088 2089 2090
			if (sx_irqmask & (1 << board->irq)) {	/* may we use this irq? */
				if (request_irq(board->irq, sx_interrupt,
						IRQF_SHARED | IRQF_DISABLED,
						"sx", board)) {
					printk(KERN_ERR "sx: Cannot allocate "
						"irq %d.\n", board->irq);
L
Linus Torvalds 已提交
2091 2092 2093 2094
					board->irq = 0;
				}
			} else
				board->irq = 0;
J
Jiri Slaby 已提交
2095
		} else if (board->irq < 0 && sx_irqmask) {
L
Linus Torvalds 已提交
2096 2097
			/* auto-allocate irq */
			int irqnr;
J
Jiri Slaby 已提交
2098 2099 2100 2101 2102 2103 2104
			int irqmask = sx_irqmask & (IS_SX_BOARD(board) ?
					SX_ISA_IRQ_MASK : SI2_ISA_IRQ_MASK);
			for (irqnr = 15; irqnr > 0; irqnr--)
				if (irqmask & (1 << irqnr))
					if (!request_irq(irqnr, sx_interrupt,
						IRQF_SHARED | IRQF_DISABLED,
						"sx", board))
L
Linus Torvalds 已提交
2105
						break;
J
Jiri Slaby 已提交
2106
			if (!irqnr)
L
Linus Torvalds 已提交
2107 2108 2109 2110 2111 2112 2113
				printk(KERN_ERR "sx: Cannot allocate IRQ.\n");
			board->irq = irqnr;
		} else
			board->irq = 0;

		if (board->irq) {
			/* Found a valid interrupt, start up interrupts! */
J
Jiri Slaby 已提交
2114 2115 2116
			sx_dprintk(SX_DEBUG_INIT, "Using irq %d.\n",
					board->irq);
			sx_start_interrupts(board);
L
Linus Torvalds 已提交
2117 2118 2119 2120 2121
			board->poll = sx_slowpoll;
			board->flags |= SX_IRQ_ALLOCATED;
		} else {
			/* no irq: setup board for polled operation */
			board->poll = sx_poll;
J
Jiri Slaby 已提交
2122 2123
			sx_dprintk(SX_DEBUG_INIT, "Using poll-interval %d.\n",
					board->poll);
L
Linus Torvalds 已提交
2124 2125
		}

J
Jiri Slaby 已提交
2126 2127
		/* The timer should be initialized anyway: That way we can
		   safely del_timer it when the module is unloaded. */
2128
		setup_timer(&board->timer, sx_pollfunc, (unsigned long)board);
L
Linus Torvalds 已提交
2129

2130 2131
		if (board->poll)
			mod_timer(&board->timer, jiffies + board->poll);
L
Linus Torvalds 已提交
2132 2133 2134 2135 2136
	} else {
		board->irq = 0;
	}

	board->nports = chans;
J
Jiri Slaby 已提交
2137
	sx_dprintk(SX_DEBUG_INIT, "returning %d ports.", board->nports);
L
Linus Torvalds 已提交
2138 2139 2140 2141 2142

	func_exit();
	return chans;
}

2143
static void __devinit printheader(void)
L
Linus Torvalds 已提交
2144 2145 2146 2147
{
	static int header_printed;

	if (!header_printed) {
J
Jiri Slaby 已提交
2148 2149 2150
		printk(KERN_INFO "Specialix SX driver "
			"(C) 1998/1999 R.E.Wolff@BitWizard.nl\n");
		printk(KERN_INFO "sx: version " __stringify(SX_VERSION) "\n");
L
Linus Torvalds 已提交
2151 2152 2153 2154
		header_printed = 1;
	}
}

J
Jiri Slaby 已提交
2155
static int __devinit probe_sx(struct sx_board *board)
L
Linus Torvalds 已提交
2156 2157 2158 2159 2160 2161 2162
{
	struct vpd_prom vpdp;
	char *p;
	int i;

	func_enter();

J
Jiri Slaby 已提交
2163 2164 2165
	if (!IS_CF_BOARD(board)) {
		sx_dprintk(SX_DEBUG_PROBE, "Going to verify vpd prom at %p.\n",
				board->base + SX_VPD_ROM);
L
Linus Torvalds 已提交
2166 2167 2168 2169

		if (sx_debug & SX_DEBUG_PROBE)
			my_hd_io(board->base + SX_VPD_ROM, 0x40);

J
Jiri Slaby 已提交
2170 2171 2172
		p = (char *)&vpdp;
		for (i = 0; i < sizeof(struct vpd_prom); i++)
			*p++ = read_sx_byte(board, SX_VPD_ROM + i * 2);
L
Linus Torvalds 已提交
2173 2174

		if (sx_debug & SX_DEBUG_PROBE)
J
Jiri Slaby 已提交
2175
			my_hd(&vpdp, 0x20);
L
Linus Torvalds 已提交
2176

J
Jiri Slaby 已提交
2177
		sx_dprintk(SX_DEBUG_PROBE, "checking identifier...\n");
L
Linus Torvalds 已提交
2178

J
Jiri Slaby 已提交
2179 2180 2181
		if (strncmp(vpdp.identifier, SX_VPD_IDENT_STRING, 16) != 0) {
			sx_dprintk(SX_DEBUG_PROBE, "Got non-SX identifier: "
					"'%s'\n", vpdp.identifier);
L
Linus Torvalds 已提交
2182 2183 2184 2185
			return 0;
		}
	}

J
Jiri Slaby 已提交
2186
	printheader();
L
Linus Torvalds 已提交
2187

J
Jiri Slaby 已提交
2188 2189 2190 2191 2192 2193 2194
	if (!IS_CF_BOARD(board)) {
		printk(KERN_DEBUG "sx: Found an SX board at %lx\n",
			board->hw_base);
		printk(KERN_DEBUG "sx: hw_rev: %d, assembly level: %d, "
				"uniq ID:%08x, ",
				vpdp.hwrev, vpdp.hwass, vpdp.uniqid);
		printk("Manufactured: %d/%d\n", 1970 + vpdp.myear, vpdp.mweek);
L
Linus Torvalds 已提交
2195

J
Jiri Slaby 已提交
2196 2197 2198 2199 2200 2201 2202
		if ((((vpdp.uniqid >> 24) & SX_UNIQUEID_MASK) !=
				SX_PCI_UNIQUEID1) && (((vpdp.uniqid >> 24) &
				SX_UNIQUEID_MASK) != SX_ISA_UNIQUEID1)) {
			/* This might be a bit harsh. This was the primary
			   reason the SX/ISA card didn't work at first... */
			printk(KERN_ERR "sx: Hmm. Not an SX/PCI or SX/ISA "
					"card. Sorry: giving up.\n");
L
Linus Torvalds 已提交
2203 2204 2205
			return (0);
		}

J
Jiri Slaby 已提交
2206 2207
		if (((vpdp.uniqid >> 24) & SX_UNIQUEID_MASK) ==
				SX_ISA_UNIQUEID1) {
L
Linus Torvalds 已提交
2208
			if (((unsigned long)board->hw_base) & 0x8000) {
J
Jiri Slaby 已提交
2209 2210 2211 2212 2213
				printk(KERN_WARNING "sx: Warning: There may be "
					"hardware problems with the card at "
					"%lx.\n", board->hw_base);
				printk(KERN_WARNING "sx: Read sx.txt for more "
						"info.\n");
L
Linus Torvalds 已提交
2214 2215 2216 2217 2218 2219 2220
			}
		}
	}

	board->nports = -1;

	/* This resets the processor, and keeps it off the bus. */
J
Jiri Slaby 已提交
2221
	if (!sx_reset(board))
L
Linus Torvalds 已提交
2222
		return 0;
J
Jiri Slaby 已提交
2223
	sx_dprintk(SX_DEBUG_INIT, "reset the board...\n");
L
Linus Torvalds 已提交
2224 2225 2226 2227 2228

	func_exit();
	return 1;
}

J
Jiri Slaby 已提交
2229
#if defined(CONFIG_ISA) || defined(CONFIG_EISA)
L
Linus Torvalds 已提交
2230 2231 2232 2233 2234 2235 2236

/* Specialix probes for this card at 32k increments from 640k to 16M.
   I consider machines with less than 16M unlikely nowadays, so I'm
   not probing above 1Mb. Also, 0xa0000, 0xb0000, are taken by the VGA
   card. 0xe0000 and 0xf0000 are taken by the BIOS. That only leaves 
   0xc0000, 0xc8000, 0xd0000 and 0xd8000 . */

J
Jiri Slaby 已提交
2237
static int __devinit probe_si(struct sx_board *board)
L
Linus Torvalds 已提交
2238 2239 2240 2241
{
	int i;

	func_enter();
J
Jiri Slaby 已提交
2242 2243
	sx_dprintk(SX_DEBUG_PROBE, "Going to verify SI signature hw %lx at "
		"%p.\n", board->hw_base, board->base + SI2_ISA_ID_BASE);
L
Linus Torvalds 已提交
2244 2245 2246 2247 2248

	if (sx_debug & SX_DEBUG_PROBE)
		my_hd_io(board->base + SI2_ISA_ID_BASE, 0x8);

	if (!IS_EISA_BOARD(board)) {
J
Jiri Slaby 已提交
2249 2250 2251 2252
		if (IS_SI1_BOARD(board)) {
			for (i = 0; i < 8; i++) {
				write_sx_byte(board, SI2_ISA_ID_BASE + 7 - i,i);
			}
L
Linus Torvalds 已提交
2253
		}
J
Jiri Slaby 已提交
2254 2255 2256 2257
		for (i = 0; i < 8; i++) {
			if ((read_sx_byte(board, SI2_ISA_ID_BASE + 7 - i) & 7)
					!= i) {
				func_exit();
L
Linus Torvalds 已提交
2258 2259 2260 2261 2262 2263 2264 2265 2266
				return 0;
			}
		}
	}

	/* Now we're pretty much convinced that there is an SI board here, 
	   but to prevent trouble, we'd better double check that we don't
	   have an SI1 board when we're probing for an SI2 board.... */

J
Jiri Slaby 已提交
2267 2268
	write_sx_byte(board, SI2_ISA_ID_BASE, 0x10);
	if (IS_SI1_BOARD(board)) {
L
Linus Torvalds 已提交
2269 2270
		/* This should be an SI1 board, which has this
		   location writable... */
J
Jiri Slaby 已提交
2271 2272 2273
		if (read_sx_byte(board, SI2_ISA_ID_BASE) != 0x10) {
			func_exit();
			return 0;
M
Marc Zyngier 已提交
2274
		}
L
Linus Torvalds 已提交
2275 2276 2277
	} else {
		/* This should be an SI2 board, which has the bottom
		   3 bits non-writable... */
J
Jiri Slaby 已提交
2278 2279 2280
		if (read_sx_byte(board, SI2_ISA_ID_BASE) == 0x10) {
			func_exit();
			return 0;
M
Marc Zyngier 已提交
2281
		}
L
Linus Torvalds 已提交
2282 2283 2284 2285 2286 2287
	}

	/* Now we're pretty much convinced that there is an SI board here, 
	   but to prevent trouble, we'd better double check that we don't
	   have an SI1 board when we're probing for an SI2 board.... */

J
Jiri Slaby 已提交
2288 2289
	write_sx_byte(board, SI2_ISA_ID_BASE, 0x10);
	if (IS_SI1_BOARD(board)) {
L
Linus Torvalds 已提交
2290 2291
		/* This should be an SI1 board, which has this
		   location writable... */
J
Jiri Slaby 已提交
2292
		if (read_sx_byte(board, SI2_ISA_ID_BASE) != 0x10) {
L
Linus Torvalds 已提交
2293
			func_exit();
J
Jiri Slaby 已提交
2294
			return 0;
M
Marc Zyngier 已提交
2295
		}
L
Linus Torvalds 已提交
2296 2297 2298
	} else {
		/* This should be an SI2 board, which has the bottom
		   3 bits non-writable... */
J
Jiri Slaby 已提交
2299 2300 2301
		if (read_sx_byte(board, SI2_ISA_ID_BASE) == 0x10) {
			func_exit();
			return 0;
M
Marc Zyngier 已提交
2302
		}
L
Linus Torvalds 已提交
2303 2304
	}

J
Jiri Slaby 已提交
2305
	printheader();
L
Linus Torvalds 已提交
2306

J
Jiri Slaby 已提交
2307
	printk(KERN_DEBUG "sx: Found an SI board at %lx\n", board->hw_base);
L
Linus Torvalds 已提交
2308
	/* Compared to the SX boards, it is a complete guess as to what
J
Jiri Slaby 已提交
2309
	   this card is up to... */
L
Linus Torvalds 已提交
2310 2311 2312 2313

	board->nports = -1;

	/* This resets the processor, and keeps it off the bus. */
J
Jiri Slaby 已提交
2314
	if (!sx_reset(board))
L
Linus Torvalds 已提交
2315
		return 0;
J
Jiri Slaby 已提交
2316
	sx_dprintk(SX_DEBUG_INIT, "reset the board...\n");
L
Linus Torvalds 已提交
2317 2318 2319 2320

	func_exit();
	return 1;
}
J
Jiri Slaby 已提交
2321
#endif
L
Linus Torvalds 已提交
2322

J
Jeff Dike 已提交
2323
static const struct tty_operations sx_ops = {
L
Linus Torvalds 已提交
2324
	.break_ctl = sx_break,
J
Jiri Slaby 已提交
2325
	.open = sx_open,
L
Linus Torvalds 已提交
2326 2327 2328 2329 2330 2331 2332 2333 2334 2335 2336 2337 2338 2339 2340 2341 2342 2343 2344 2345 2346 2347 2348 2349 2350 2351 2352 2353 2354 2355 2356 2357 2358 2359
	.close = gs_close,
	.write = gs_write,
	.put_char = gs_put_char,
	.flush_chars = gs_flush_chars,
	.write_room = gs_write_room,
	.chars_in_buffer = gs_chars_in_buffer,
	.flush_buffer = gs_flush_buffer,
	.ioctl = sx_ioctl,
	.throttle = sx_throttle,
	.unthrottle = sx_unthrottle,
	.set_termios = gs_set_termios,
	.stop = gs_stop,
	.start = gs_start,
	.hangup = gs_hangup,
	.tiocmget = sx_tiocmget,
	.tiocmset = sx_tiocmset,
};

static int sx_init_drivers(void)
{
	int error;

	func_enter();

	sx_driver = alloc_tty_driver(sx_nports);
	if (!sx_driver)
		return 1;
	sx_driver->owner = THIS_MODULE;
	sx_driver->driver_name = "specialix_sx";
	sx_driver->name = "ttyX";
	sx_driver->major = SX_NORMAL_MAJOR;
	sx_driver->type = TTY_DRIVER_TYPE_SERIAL;
	sx_driver->subtype = SERIAL_TYPE_NORMAL;
	sx_driver->init_termios = tty_std_termios;
J
Jiri Slaby 已提交
2360
	sx_driver->init_termios.c_cflag = B9600 | CS8 | CREAD | HUPCL | CLOCAL;
A
Alan Cox 已提交
2361 2362
	sx_driver->init_termios.c_ispeed = 9600;
	sx_driver->init_termios.c_ospeed = 9600;
L
Linus Torvalds 已提交
2363 2364 2365 2366 2367 2368
	sx_driver->flags = TTY_DRIVER_REAL_RAW;
	tty_set_operations(sx_driver, &sx_ops);

	if ((error = tty_register_driver(sx_driver))) {
		put_tty_driver(sx_driver);
		printk(KERN_ERR "sx: Couldn't register sx driver, error = %d\n",
J
Jiri Slaby 已提交
2369
			error);
L
Linus Torvalds 已提交
2370 2371 2372 2373 2374 2375
		return 1;
	}
	func_exit();
	return 0;
}

J
Jiri Slaby 已提交
2376
static int sx_init_portstructs(int nboards, int nports)
L
Linus Torvalds 已提交
2377 2378 2379 2380 2381 2382 2383 2384 2385 2386
{
	struct sx_board *board;
	struct sx_port *port;
	int i, j;
	int addr, chans;
	int portno;

	func_enter();

	/* Many drivers statically allocate the maximum number of ports
J
Jiri Slaby 已提交
2387 2388
	   There is no reason not to allocate them dynamically.
	   Is there? -- REW */
J
Jiri Slaby 已提交
2389
	sx_ports = kcalloc(nports, sizeof(struct sx_port), GFP_KERNEL);
L
Linus Torvalds 已提交
2390 2391 2392 2393 2394 2395 2396
	if (!sx_ports)
		return -ENOMEM;

	port = sx_ports;
	for (i = 0; i < nboards; i++) {
		board = &boards[i];
		board->ports = port;
J
Jiri Slaby 已提交
2397 2398
		for (j = 0; j < boards[i].nports; j++) {
			sx_dprintk(SX_DEBUG_INIT, "initing port %d\n", j);
L
Linus Torvalds 已提交
2399
			port->gs.magic = SX_MAGIC;
J
Jiri Slaby 已提交
2400
			port->gs.close_delay = HZ / 2;
L
Linus Torvalds 已提交
2401 2402 2403 2404
			port->gs.closing_wait = 30 * HZ;
			port->board = board;
			port->gs.rd = &sx_real_driver;
#ifdef NEW_WRITE_LOCKING
2405
			port->gs.port_write_mutex = MUTEX;
L
Linus Torvalds 已提交
2406
#endif
I
Ingo Molnar 已提交
2407
			spin_lock_init(&port->gs.driver_lock);
L
Linus Torvalds 已提交
2408 2409 2410 2411
			/*
			 * Initializing wait queue
			 */
			init_waitqueue_head(&port->gs.open_wait);
J
Jiri Slaby 已提交
2412 2413
			init_waitqueue_head(&port->gs.close_wait);

L
Linus Torvalds 已提交
2414 2415 2416 2417 2418 2419 2420 2421 2422 2423
			port++;
		}
	}

	port = sx_ports;
	portno = 0;
	for (i = 0; i < nboards; i++) {
		board = &boards[i];
		board->port_base = portno;
		/* Possibly the configuration was rejected. */
J
Jiri Slaby 已提交
2424 2425 2426 2427
		sx_dprintk(SX_DEBUG_PROBE, "Board has %d channels\n",
				board->nports);
		if (board->nports <= 0)
			continue;
L
Linus Torvalds 已提交
2428
		/* XXX byteorder ?? */
J
Jiri Slaby 已提交
2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440
		for (addr = 0x80; addr != 0;
				addr = read_sx_word(board, addr) & 0x7fff) {
			chans = sx_read_module_byte(board, addr, mc_type);
			sx_dprintk(SX_DEBUG_PROBE, "Module at %x: %d "
					"channels\n", addr, chans);
			sx_dprintk(SX_DEBUG_PROBE, "Port at");
			for (j = 0; j < chans; j++) {
				/* The "sx-way" is the way it SHOULD be done.
				   That way in the future, the firmware may for
				   example pack the structures a bit more
				   efficient. Neil tells me it isn't going to
				   happen anytime soon though. */
L
Linus Torvalds 已提交
2441
				if (IS_SX_BOARD(board))
J
Jiri Slaby 已提交
2442 2443 2444
					port->ch_base = sx_read_module_word(
							board, addr + j * 2,
							mc_chan_pointer);
L
Linus Torvalds 已提交
2445
				else
J
Jiri Slaby 已提交
2446
					port->ch_base = addr + 0x100 + 0x300 *j;
L
Linus Torvalds 已提交
2447

J
Jiri Slaby 已提交
2448 2449
				sx_dprintk(SX_DEBUG_PROBE, " %x",
						port->ch_base);
L
Linus Torvalds 已提交
2450 2451 2452
				port->line = portno++;
				port++;
			}
J
Jiri Slaby 已提交
2453
			sx_dprintk(SX_DEBUG_PROBE, "\n");
L
Linus Torvalds 已提交
2454 2455 2456 2457 2458 2459 2460 2461 2462
		}
		/* This has to be done earlier. */
		/* board->flags |= SX_BOARD_INITIALIZED; */
	}

	func_exit();
	return 0;
}

J
Jiri Slaby 已提交
2463 2464 2465 2466
static unsigned int sx_find_free_board(void)
{
	unsigned int i;

J
Jiri Slaby 已提交
2467
	for (i = 0; i < SX_NBOARDS; i++)
J
Jiri Slaby 已提交
2468 2469 2470 2471 2472 2473
		if (!(boards[i].flags & SX_BOARD_PRESENT))
			break;

	return i;
}

L
Linus Torvalds 已提交
2474 2475 2476 2477 2478 2479 2480 2481
static void __exit sx_release_drivers(void)
{
	func_enter();
	tty_unregister_driver(sx_driver);
	put_tty_driver(sx_driver);
	func_exit();
}

J
Jiri Slaby 已提交
2482 2483
static void __devexit sx_remove_card(struct sx_board *board,
		struct pci_dev *pdev)
J
Jiri Slaby 已提交
2484 2485 2486 2487 2488 2489 2490 2491 2492 2493
{
	if (board->flags & SX_BOARD_INITIALIZED) {
		/* The board should stop messing with us. (actually I mean the
		   interrupt) */
		sx_reset(board);
		if ((board->irq) && (board->flags & SX_IRQ_ALLOCATED))
			free_irq(board->irq, board);

		/* It is safe/allowed to del_timer a non-active timer */
		del_timer(&board->timer);
J
Jiri Slaby 已提交
2494
		if (pdev) {
J
Jiri Slaby 已提交
2495
#ifdef CONFIG_PCI
J
Jiri Slaby 已提交
2496
			pci_iounmap(pdev, board->base);
J
Jiri Slaby 已提交
2497
			pci_release_region(pdev, IS_CF_BOARD(board) ? 3 : 2);
J
Jiri Slaby 已提交
2498
#endif
J
Jiri Slaby 已提交
2499
		} else {
J
Jiri Slaby 已提交
2500
			iounmap(board->base);
J
Jiri Slaby 已提交
2501 2502
			release_region(board->hw_base, board->hw_len);
		}
J
Jiri Slaby 已提交
2503

J
Jiri Slaby 已提交
2504
		board->flags &= ~(SX_BOARD_INITIALIZED | SX_BOARD_PRESENT);
J
Jiri Slaby 已提交
2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515 2516 2517
	}
}

#ifdef CONFIG_EISA

static int __devinit sx_eisa_probe(struct device *dev)
{
	struct eisa_device *edev = to_eisa_device(dev);
	struct sx_board *board;
	unsigned long eisa_slot = edev->base_addr;
	unsigned int i;
	int retval = -EIO;

J
Jiri Slaby 已提交
2518
	mutex_lock(&sx_boards_lock);
J
Jiri Slaby 已提交
2519
	i = sx_find_free_board();
J
Jiri Slaby 已提交
2520 2521
	if (i == SX_NBOARDS) {
		mutex_unlock(&sx_boards_lock);
J
Jiri Slaby 已提交
2522
		goto err;
J
Jiri Slaby 已提交
2523 2524 2525 2526
	}
	board = &boards[i];
	board->flags |= SX_BOARD_PRESENT;
	mutex_unlock(&sx_boards_lock);
J
Jiri Slaby 已提交
2527 2528

	dev_info(dev, "XIO : Signature found in EISA slot %lu, "
J
Jiri Slaby 已提交
2529 2530 2531 2532
		 "Product %d Rev %d (REPORT THIS TO LKLM)\n",
		 eisa_slot >> 12,
		 inb(eisa_slot + EISA_VENDOR_ID_OFFSET + 2),
		 inb(eisa_slot + EISA_VENDOR_ID_OFFSET + 3));
J
Jiri Slaby 已提交
2533 2534 2535 2536 2537 2538

	board->eisa_base = eisa_slot;
	board->flags &= ~SX_BOARD_TYPE;
	board->flags |= SI_EISA_BOARD;

	board->hw_base = ((inb(eisa_slot + 0xc01) << 8) +
J
Jiri Slaby 已提交
2539
			  inb(eisa_slot + 0xc00)) << 16;
J
Jiri Slaby 已提交
2540 2541 2542 2543 2544
	board->hw_len = SI2_EISA_WINDOW_LEN;
	if (!request_region(board->hw_base, board->hw_len, "sx")) {
		dev_err(dev, "can't request region\n");
		goto err_flag;
	}
J
Jiri Slaby 已提交
2545
	board->base2 =
2546
	board->base = ioremap_nocache(board->hw_base, SI2_EISA_WINDOW_LEN);
J
Jiri Slaby 已提交
2547 2548 2549 2550
	if (!board->base) {
		dev_err(dev, "can't remap memory\n");
		goto err_reg;
	}
J
Jiri Slaby 已提交
2551 2552 2553 2554 2555 2556 2557 2558 2559 2560 2561 2562 2563 2564

	sx_dprintk(SX_DEBUG_PROBE, "IO hw_base address: %lx\n", board->hw_base);
	sx_dprintk(SX_DEBUG_PROBE, "base: %p\n", board->base);
	board->irq = inb(eisa_slot + 0xc02) >> 4;
	sx_dprintk(SX_DEBUG_PROBE, "IRQ: %d\n", board->irq);

	if (!probe_si(board))
		goto err_unmap;

	dev_set_drvdata(dev, board);

	return 0;
err_unmap:
	iounmap(board->base);
J
Jiri Slaby 已提交
2565 2566 2567
err_reg:
	release_region(board->hw_base, board->hw_len);
err_flag:
J
Jiri Slaby 已提交
2568
	board->flags &= ~SX_BOARD_PRESENT;
J
Jiri Slaby 已提交
2569 2570 2571 2572 2573 2574 2575 2576
err:
	return retval;
}

static int __devexit sx_eisa_remove(struct device *dev)
{
	struct sx_board *board = dev_get_drvdata(dev);

J
Jiri Slaby 已提交
2577
	sx_remove_card(board, NULL);
J
Jiri Slaby 已提交
2578 2579 2580 2581 2582 2583 2584 2585

	return 0;
}

static struct eisa_device_id sx_eisa_tbl[] = {
	{ "SLX" },
	{ "" }
};
J
Jiri Slaby 已提交
2586

J
Jiri Slaby 已提交
2587 2588 2589 2590 2591 2592 2593 2594 2595 2596 2597 2598 2599
MODULE_DEVICE_TABLE(eisa, sx_eisa_tbl);

static struct eisa_driver sx_eisadriver = {
	.id_table = sx_eisa_tbl,
	.driver = {
		.name = "sx",
		.probe = sx_eisa_probe,
		.remove = __devexit_p(sx_eisa_remove),
	}
};

#endif

J
Jiri Slaby 已提交
2600
#ifdef CONFIG_PCI
L
Linus Torvalds 已提交
2601 2602 2603 2604 2605 2606 2607 2608 2609 2610 2611
 /******************************************************** 
 * Setting bit 17 in the CNTRL register of the PLX 9050  * 
 * chip forces a retry on writes while a read is pending.*
 * This is to prevent the card locking up on Intel Xeon  *
 * multiprocessor systems with the NX chipset.    -- NV  *
 ********************************************************/

/* Newer cards are produced with this bit set from the configuration
   EEprom.  As the bit is read/write for the CPU, we can fix it here,
   if we detect that it isn't set correctly. -- REW */

2612
static void __devinit fix_sx_pci(struct pci_dev *pdev, struct sx_board *board)
L
Linus Torvalds 已提交
2613 2614 2615 2616 2617
{
	unsigned int hwbase;
	void __iomem *rebase;
	unsigned int t;

J
Jiri Slaby 已提交
2618 2619
#define CNTRL_REG_OFFSET	0x50
#define CNTRL_REG_GOODVALUE	0x18260000
L
Linus Torvalds 已提交
2620 2621 2622

	pci_read_config_dword(pdev, PCI_BASE_ADDRESS_0, &hwbase);
	hwbase &= PCI_BASE_ADDRESS_MEM_MASK;
2623
	rebase = ioremap_nocache(hwbase, 0x80);
J
Jiri Slaby 已提交
2624
	t = readl(rebase + CNTRL_REG_OFFSET);
L
Linus Torvalds 已提交
2625
	if (t != CNTRL_REG_GOODVALUE) {
J
Jiri Slaby 已提交
2626 2627 2628
		printk(KERN_DEBUG "sx: performing cntrl reg fix: %08x -> "
			"%08x\n", t, CNTRL_REG_GOODVALUE);
		writel(CNTRL_REG_GOODVALUE, rebase + CNTRL_REG_OFFSET);
L
Linus Torvalds 已提交
2629 2630 2631
	}
	iounmap(rebase);
}
J
Jiri Slaby 已提交
2632
#endif
L
Linus Torvalds 已提交
2633

2634
static int __devinit sx_pci_probe(struct pci_dev *pdev,
J
Jiri Slaby 已提交
2635
				  const struct pci_device_id *ent)
2636
{
J
Jiri Slaby 已提交
2637
#ifdef CONFIG_PCI
2638
	struct sx_board *board;
J
Jiri Slaby 已提交
2639
	unsigned int i, reg;
2640 2641
	int retval = -EIO;

J
Jiri Slaby 已提交
2642
	mutex_lock(&sx_boards_lock);
J
Jiri Slaby 已提交
2643
	i = sx_find_free_board();
J
Jiri Slaby 已提交
2644 2645
	if (i == SX_NBOARDS) {
		mutex_unlock(&sx_boards_lock);
2646
		goto err;
J
Jiri Slaby 已提交
2647 2648 2649 2650
	}
	board = &boards[i];
	board->flags |= SX_BOARD_PRESENT;
	mutex_unlock(&sx_boards_lock);
2651 2652 2653

	retval = pci_enable_device(pdev);
	if (retval)
J
Jiri Slaby 已提交
2654
		goto err_flag;
2655 2656 2657

	board->flags &= ~SX_BOARD_TYPE;
	board->flags |= (pdev->subsystem_vendor == 0x200) ? SX_PCI_BOARD :
J
Jiri Slaby 已提交
2658
		SX_CFPCI_BOARD;
2659 2660

	/* CF boards use base address 3.... */
J
Jiri Slaby 已提交
2661
	reg = IS_CF_BOARD(board) ? 3 : 2;
J
Jiri Slaby 已提交
2662 2663 2664 2665 2666
	retval = pci_request_region(pdev, reg, "sx");
	if (retval) {
		dev_err(&pdev->dev, "can't request region\n");
		goto err_flag;
	}
J
Jiri Slaby 已提交
2667
	board->hw_base = pci_resource_start(pdev, reg);
2668
	board->base2 =
J
Jiri Slaby 已提交
2669
	board->base = pci_iomap(pdev, reg, WINDOW_LEN(board));
2670 2671
	if (!board->base) {
		dev_err(&pdev->dev, "ioremap failed\n");
J
Jiri Slaby 已提交
2672
		goto err_reg;
2673 2674 2675
	}

	/* Most of the stuff on the CF board is offset by 0x18000 ....  */
J
Jiri Slaby 已提交
2676
	if (IS_CF_BOARD(board))
2677 2678 2679 2680 2681
		board->base += 0x18000;

	board->irq = pdev->irq;

	dev_info(&pdev->dev, "Got a specialix card: %p(%d) %x.\n", board->base,
J
Jiri Slaby 已提交
2682
		 board->irq, board->flags);
2683 2684 2685 2686 2687 2688 2689 2690 2691 2692 2693 2694

	if (!probe_sx(board)) {
		retval = -EIO;
		goto err_unmap;
	}

	fix_sx_pci(pdev, board);

	pci_set_drvdata(pdev, board);

	return 0;
err_unmap:
J
Jiri Slaby 已提交
2695
	pci_iounmap(pdev, board->base);
J
Jiri Slaby 已提交
2696 2697
err_reg:
	pci_release_region(pdev, reg);
J
Jiri Slaby 已提交
2698 2699
err_flag:
	board->flags &= ~SX_BOARD_PRESENT;
2700 2701
err:
	return retval;
J
Jiri Slaby 已提交
2702 2703 2704
#else
	return -ENODEV;
#endif
2705 2706 2707 2708 2709 2710
}

static void __devexit sx_pci_remove(struct pci_dev *pdev)
{
	struct sx_board *board = pci_get_drvdata(pdev);

J
Jiri Slaby 已提交
2711
	sx_remove_card(board, pdev);
2712 2713 2714 2715 2716 2717
}

/* Specialix has a whole bunch of cards with 0x2000 as the device ID. They say
   its because the standard requires it. So check for SUBVENDOR_ID. */
static struct pci_device_id sx_pci_tbl[] = {
	{ PCI_VENDOR_ID_SPECIALIX, PCI_DEVICE_ID_SPECIALIX_SX_XIO_IO8,
J
Jiri Slaby 已提交
2718
		.subvendor = PCI_ANY_ID, .subdevice = 0x0200 },
2719
	{ PCI_VENDOR_ID_SPECIALIX, PCI_DEVICE_ID_SPECIALIX_SX_XIO_IO8,
J
Jiri Slaby 已提交
2720
		.subvendor = PCI_ANY_ID, .subdevice = 0x0300 },
2721 2722
	{ 0 }
};
J
Jiri Slaby 已提交
2723

2724 2725 2726 2727 2728 2729 2730 2731
MODULE_DEVICE_TABLE(pci, sx_pci_tbl);

static struct pci_driver sx_pcidriver = {
	.name = "sx",
	.id_table = sx_pci_tbl,
	.probe = sx_pci_probe,
	.remove = __devexit_p(sx_pci_remove)
};
L
Linus Torvalds 已提交
2732

J
Jiri Slaby 已提交
2733
static int __init sx_init(void)
L
Linus Torvalds 已提交
2734
{
J
Jiri Slaby 已提交
2735 2736 2737
#ifdef CONFIG_EISA
	int retval1;
#endif
J
Jiri Slaby 已提交
2738
#ifdef CONFIG_ISA
L
Linus Torvalds 已提交
2739
	struct sx_board *board;
J
Jiri Slaby 已提交
2740 2741 2742 2743
	unsigned int i;
#endif
	unsigned int found = 0;
	int retval;
L
Linus Torvalds 已提交
2744 2745

	func_enter();
J
Jiri Slaby 已提交
2746 2747 2748 2749 2750 2751
	sx_dprintk(SX_DEBUG_INIT, "Initing sx module... (sx_debug=%d)\n",
			sx_debug);
	if (abs((long)(&sx_debug) - sx_debug) < 0x10000) {
		printk(KERN_WARNING "sx: sx_debug is an address, instead of a "
				"value. Assuming -1.\n(%p)\n", &sx_debug);
		sx_debug = -1;
L
Linus Torvalds 已提交
2752 2753 2754
	}

	if (misc_register(&sx_fw_device) < 0) {
J
Jiri Slaby 已提交
2755 2756
		printk(KERN_ERR "SX: Unable to register firmware loader "
				"driver.\n");
L
Linus Torvalds 已提交
2757 2758
		return -EIO;
	}
J
Jiri Slaby 已提交
2759
#ifdef CONFIG_ISA
J
Jiri Slaby 已提交
2760
	for (i = 0; i < NR_SX_ADDRS; i++) {
L
Linus Torvalds 已提交
2761 2762
		board = &boards[found];
		board->hw_base = sx_probe_addrs[i];
J
Jiri Slaby 已提交
2763 2764 2765
		board->hw_len = SX_WINDOW_LEN;
		if (!request_region(board->hw_base, board->hw_len, "sx"))
			continue;
L
Linus Torvalds 已提交
2766
		board->base2 =
2767
		board->base = ioremap_nocache(board->hw_base, board->hw_len);
J
Jiri Slaby 已提交
2768 2769
		if (!board->base)
			goto err_sx_reg;
L
Linus Torvalds 已提交
2770
		board->flags &= ~SX_BOARD_TYPE;
J
Jiri Slaby 已提交
2771 2772
		board->flags |= SX_ISA_BOARD;
		board->irq = sx_irqmask ? -1 : 0;
L
Linus Torvalds 已提交
2773

J
Jiri Slaby 已提交
2774
		if (probe_sx(board)) {
J
Jiri Slaby 已提交
2775
			board->flags |= SX_BOARD_PRESENT;
L
Linus Torvalds 已提交
2776 2777 2778
			found++;
		} else {
			iounmap(board->base);
J
Jiri Slaby 已提交
2779 2780
err_sx_reg:
			release_region(board->hw_base, board->hw_len);
L
Linus Torvalds 已提交
2781 2782 2783
		}
	}

J
Jiri Slaby 已提交
2784
	for (i = 0; i < NR_SI_ADDRS; i++) {
L
Linus Torvalds 已提交
2785 2786
		board = &boards[found];
		board->hw_base = si_probe_addrs[i];
J
Jiri Slaby 已提交
2787 2788 2789
		board->hw_len = SI2_ISA_WINDOW_LEN;
		if (!request_region(board->hw_base, board->hw_len, "sx"))
			continue;
L
Linus Torvalds 已提交
2790
		board->base2 =
2791
		board->base = ioremap_nocache(board->hw_base, board->hw_len);
J
Jiri Slaby 已提交
2792 2793
		if (!board->base)
			goto err_si_reg;
L
Linus Torvalds 已提交
2794
		board->flags &= ~SX_BOARD_TYPE;
J
Jiri Slaby 已提交
2795 2796
		board->flags |= SI_ISA_BOARD;
		board->irq = sx_irqmask ? -1 : 0;
L
Linus Torvalds 已提交
2797

J
Jiri Slaby 已提交
2798
		if (probe_si(board)) {
J
Jiri Slaby 已提交
2799
			board->flags |= SX_BOARD_PRESENT;
L
Linus Torvalds 已提交
2800 2801
			found++;
		} else {
J
Jiri Slaby 已提交
2802
			iounmap(board->base);
J
Jiri Slaby 已提交
2803 2804
err_si_reg:
			release_region(board->hw_base, board->hw_len);
L
Linus Torvalds 已提交
2805 2806
		}
	}
J
Jiri Slaby 已提交
2807
	for (i = 0; i < NR_SI1_ADDRS; i++) {
L
Linus Torvalds 已提交
2808 2809
		board = &boards[found];
		board->hw_base = si1_probe_addrs[i];
J
Jiri Slaby 已提交
2810 2811 2812
		board->hw_len = SI1_ISA_WINDOW_LEN;
		if (!request_region(board->hw_base, board->hw_len, "sx"))
			continue;
L
Linus Torvalds 已提交
2813
		board->base2 =
2814
		board->base = ioremap_nocache(board->hw_base, board->hw_len);
J
Jiri Slaby 已提交
2815 2816
		if (!board->base)
			goto err_si1_reg;
L
Linus Torvalds 已提交
2817
		board->flags &= ~SX_BOARD_TYPE;
J
Jiri Slaby 已提交
2818 2819
		board->flags |= SI1_ISA_BOARD;
		board->irq = sx_irqmask ? -1 : 0;
L
Linus Torvalds 已提交
2820

J
Jiri Slaby 已提交
2821
		if (probe_si(board)) {
J
Jiri Slaby 已提交
2822
			board->flags |= SX_BOARD_PRESENT;
L
Linus Torvalds 已提交
2823 2824
			found++;
		} else {
J
Jiri Slaby 已提交
2825
			iounmap(board->base);
J
Jiri Slaby 已提交
2826 2827
err_si1_reg:
			release_region(board->hw_base, board->hw_len);
L
Linus Torvalds 已提交
2828 2829
		}
	}
J
Jiri Slaby 已提交
2830
#endif
J
Jiri Slaby 已提交
2831 2832 2833
#ifdef CONFIG_EISA
	retval1 = eisa_driver_register(&sx_eisadriver);
#endif
2834 2835
	retval = pci_register_driver(&sx_pcidriver);

L
Linus Torvalds 已提交
2836
	if (found) {
J
Jiri Slaby 已提交
2837
		printk(KERN_INFO "sx: total of %d boards detected.\n", found);
2838 2839
		retval = 0;
	} else if (retval) {
J
Jiri Slaby 已提交
2840
#ifdef CONFIG_EISA
2841
		retval = retval1;
J
Jiri Slaby 已提交
2842 2843
		if (retval1)
#endif
J
Jiri Slaby 已提交
2844
			misc_deregister(&sx_fw_device);
L
Linus Torvalds 已提交
2845 2846 2847
	}

	func_exit();
2848
	return retval;
L
Linus Torvalds 已提交
2849 2850
}

J
Jiri Slaby 已提交
2851
static void __exit sx_exit(void)
L
Linus Torvalds 已提交
2852
{
J
Jiri Slaby 已提交
2853
	int i;
L
Linus Torvalds 已提交
2854 2855

	func_enter();
J
Jiri Slaby 已提交
2856 2857 2858
#ifdef CONFIG_EISA
	eisa_driver_unregister(&sx_eisadriver);
#endif
2859
	pci_unregister_driver(&sx_pcidriver);
L
Linus Torvalds 已提交
2860

2861
	for (i = 0; i < SX_NBOARDS; i++)
J
Jiri Slaby 已提交
2862
		sx_remove_card(&boards[i], NULL);
2863

L
Linus Torvalds 已提交
2864
	if (misc_deregister(&sx_fw_device) < 0) {
J
Jiri Slaby 已提交
2865 2866
		printk(KERN_INFO "sx: couldn't deregister firmware loader "
				"device\n");
L
Linus Torvalds 已提交
2867
	}
J
Jiri Slaby 已提交
2868 2869
	sx_dprintk(SX_DEBUG_CLEANUP, "Cleaning up drivers (%d)\n",
			sx_initialized);
L
Linus Torvalds 已提交
2870
	if (sx_initialized)
J
Jiri Slaby 已提交
2871
		sx_release_drivers();
L
Linus Torvalds 已提交
2872

J
Jiri Slaby 已提交
2873
	kfree(sx_ports);
L
Linus Torvalds 已提交
2874 2875 2876 2877 2878
	func_exit();
}

module_init(sx_init);
module_exit(sx_exit);