patch-1.3.72 linux/drivers/char/ftape/fc-10.c

• Lines: 162
• Date: Wed Mar 6 15:07:19 1996
• Orig file: v1.3.71/linux/drivers/char/ftape/fc-10.c
• Orig date: Thu Jan 1 02:00:00 1970

diff -u --recursive --new-file v1.3.71/linux/drivers/char/ftape/fc-10.c linux/drivers/char/ftape/fc-10.c
@@ -0,0 +1,161 @@
+/* Yo, Emacs! we're -*- Linux-C -*-
+ *
+ 
+   Copyright (C) 1993,1994 Jon Tombs.
+
+   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.
+
+   The entire guts of this program was written by dosemu, modified to
+   record reads and writes to the ports in the 0x180-0x188 address space,
+   while running the CMS program TAPE.EXE V2.0.5 supplied with the drive.
+
+   Modified to use an array of addresses and generally cleaned up (made
+   much shorter) 4 June 94, dosemu isn't that good at writing short code it
+   would seem :-). Made independant of 0x180, but I doubt it will work
+   at any other address.
+
+   Modified for distribution with ftape source. 21 June 94, SJL.
+
+   Modifications on 20 October 95, by Daniel Cohen (catman@wpi.edu):
+   Modified to support different DMA, IRQ, and IO Ports.  Borland's
+   Turbo Debugger in virtual 8086 mode (TD386.EXE with hardware breakpoints
+   provided by the TDH386.SYS Device Driver) was used on the CMS program
+   TAPE V4.0.5.  I set breakpoints on I/O to ports 0x180-0x187.  Note that
+   CMS's program will not successfully configure the tape drive if you set
+   breakpoints on IO Reads, but you can set them on IO Writes without problems.
+   Known problems:
+   - You can not use DMA Channels 5 or 7.
+
+   Modification on 29 January 96, by Daniel Cohen (catman@wpi.edu):
+   Modified to only accept IRQs 3 - 7, or 9.  Since we can only send a 3 bit
+   number representing the IRQ to the card, special handling is required when
+   IRQ 9 is selected.  IRQ 2 and 9 are the same, and we should request IRQ 9
+   from the kernel while telling the card to use IRQ 2.  Thanks to Greg
+   Crider (gcrider@iclnet.org) for finding and locating this bug, as well as
+   testing the patch.
+
+ *
+ *      This file contains code for the CMS FC-10/FC-20 card.
+ */
+
+#include <linux/module.h>
+#include <linux/ftape.h>
+#include <asm/io.h>
+
+#include "tracing.h"
+#include "fdc-io.h"
+#include "fc-10.h"
+
+#ifdef PROBE_FC10
+
+/*  This code will only work if the FC-10 (or FC-20) is set to
+ *  use DMA channels 1, 2, or 3.  DMA channels 5 and 7 seem to be 
+ *  initialized by the same command as channels 1 and 3, respectively.
+ */
+#if (FDC_DMA > 3)
+#error : The FC-10/20 must be set to use DMA channels 1, 2, or 3!
+#endif
+
+/*  Only allow the FC-10/20 to use IRQ 3-7, or 9.  Note that CMS's program
+ *  only accepts IRQ's 2-7, but in linux, IRQ 2 is the same as IRQ 9.
+ */
+#if (FDC_IRQ < 3 || FDC_IRQ == 8 || FDC_IRQ > 9)
+#error : The FC-10/20 must be set to use IRQ levels 3 - 7, or 9!
+#error :              Note IRQ 9 is the same as IRQ 2
+#endif
+
+unsigned short inbs_magic[] = {
+	0x3, 0x3, 0x0, 0x4, 0x7, 0x2, 0x5, 0x3, 0x1, 0x4,
+	0x3, 0x5, 0x2, 0x0, 0x3, 0x7, 0x4, 0x2,
+	0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7
+};
+
+unsigned short fc10_ports[] = {
+	0x180, 0x210, 0x2A0, 0x300, 0x330, 0x340, 0x370
+};
+
+int fc10_enable(void)
+{
+	int i;
+	byte cardConfig = 0x00;
+	byte x;
+
+	/*  Clear state machine ???
+	 */
+	for (i = 0; i < NR_ITEMS(inbs_magic); i++) {
+		inb(FDC_BASE + inbs_magic[i]);
+	}
+	outb(0x0, FDC_BASE);
+
+	x = inb(FDC_BASE);
+	if (x == 0x13 || x == 0x93) {
+		for (i = 1; i < 8; i++) {
+			if (inb(FDC_BASE + i) != x) {
+				return 0;
+			}
+		}
+	} else {
+		return 0;
+	}
+
+	outb(0x8, FDC_BASE);
+
+	for (i = 0; i < 8; i++) {
+		if (inb(FDC_BASE + i) != 0x0) {
+			return 0;
+		}
+	}
+	outb(0x10, FDC_BASE);
+
+	for (i = 0; i < 8; i++) {
+		if (inb(FDC_BASE + i) != 0xff) {
+			return 0;
+		}
+	}
+
+	/*  Okay, we found a FC-10 card ! ???
+	 */
+	outb(0x0, fdc.ccr);
+
+	/*  Clear state machine again ???
+	 */
+	for (i = 0; i < NR_ITEMS(inbs_magic); i++) {
+		inb(FDC_BASE + inbs_magic[i]);
+	}
+	/* Send io port */
+	for (i = 0; i < NR_ITEMS(fc10_ports); i++)
+		if (FDC_BASE == fc10_ports[i])
+			cardConfig = i + 1;
+	if (cardConfig == 0)
+		return 0;	/* Invalid I/O Port */
+	/* and IRQ - If using IRQ 9, tell the FC card it is actually IRQ 2 */
+	if (FDC_IRQ != 9)
+		cardConfig |= FDC_IRQ << 3;
+	else
+		cardConfig |= 2 << 3;
+
+	/* and finally DMA Channel */
+	cardConfig |= FDC_DMA << 6;
+	outb(cardConfig, FDC_BASE);	/* DMA [2 bits]/IRQ [3 bits]/BASE [3 bits] */
+
+	/*  Enable FC-10 ???
+	 */
+	outb(0, fdc.ccr);
+	outb(0, FDC_BASE + 0x6);
+	outb(8, fdc.dor);
+	outb(8, fdc.dor);
+	outb(1, FDC_BASE + 0x6);
+
+	/*  Initialize fdc, select drive B:
+	 */
+	outb(0x08, fdc.dor);	/* assert reset, dma & irq enabled */
+	outb(0x0c, fdc.dor);	/* release reset */
+	outb(0x2d, fdc.dor);	/* select drive 1 */
+
+	return (x == 0x93) ? 2 : 1;
+}
+
+#endif /* CMS_FC10_CONTROLLER */