--- linux/kernel/blk_drv/floppy.c 2018/04/24 18:01:40 1.1.1.1 +++ linux/kernel/blk_drv/floppy.c 2018/04/24 18:04:40 1.1.1.4 @@ -5,14 +5,31 @@ */ /* + * 02.12.91 - Changed to static variables to indicate need for reset + * and recalibrate. This makes some things easier (output_byte reset + * checking etc), and means less interrupt jumping in case of errors, + * so the code is hopefully easier to understand. + */ + +/* + * This file is certainly a mess. I've tried my best to get it working, + * but I don't like programming floppies, and I have only one anyway. + * Urgel. I should check for more errors, and do more graceful error + * recovery. Seems there are problems with several drives. I've tried to + * correct them. No promises. + */ + +/* * As with hd.c, all routines within this file can (and will) be called * by interrupts, so extreme caution is needed. A hardware interrupt * handler may not sleep, or a kernel panic will happen. Thus I cannot * call "floppy-on" directly, but have to set a special timer interrupt * etc. - * - * Also, I'm not certain this works on more than 1 floppy. Bugs may - * abund. + */ + +/* + * 28.02.92 - made track-buffering routines, based on the routines written + * by entropy@wintermute.wpi.edu (Lawrence Foard). Linus. */ #include @@ -26,12 +43,11 @@ #define MAJOR_NR 2 #include "blk.h" -static void reset_floppy(void); -static void seek_interrupt(void); -static void rw_interrupt(void); +static int recalibrate = 0; +static int reset = 0; +static int seek = 0; extern unsigned char current_DOR; -extern unsigned char selected; #define immoutb_p(val,port) \ __asm__("outb %0,%1\n\tjmp 1f\n1:\tjmp 1f\n1:"::"a" ((char) (val)),"i" (port)) @@ -39,11 +55,11 @@ __asm__("outb %0,%1\n\tjmp 1f\n1:\tjmp 1 #define TYPE(x) ((x)>>2) #define DRIVE(x) ((x)&0x03) /* - * Note that MAX_ERRORS=10 doesn't imply that we retry every bad read - * max 10 times - some types of errors increase the errorcount by 2, - * so we might actually retry only 6-7 times before giving up. + * Note that MAX_ERRORS=X doesn't imply that we retry every bad read + * max X times - some types of errors increase the errorcount by 2, + * so we might actually retry only X/2 times before giving up. */ -#define MAX_ERRORS 10 +#define MAX_ERRORS 12 /* * globals used by 'result()' @@ -58,16 +74,19 @@ static unsigned char reply_buffer[MAX_RE /* * This struct defines the different floppy types. Unlike minix * linux doesn't have a "search for right type"-type, as the code - * for that is convoluted and weird. + * for that is convoluted and weird. I've got enough problems with + * this driver as it is. * * The 'stretch' tells if the tracks need to be boubled for some * types (ie 360kB diskette in 1.2MB drive etc). Others should * be self-explanatory. */ -static struct floppy_struct { - int size, sect, head, track, stretch; +struct floppy_struct { + unsigned int size, sect, head, track, stretch; unsigned char gap,rate,spec1; -} floppy_type[] = { +}; + +static struct floppy_struct floppy_type[] = { { 0, 0,0, 0,0,0x00,0x00,0x00 }, /* no testing */ { 720, 9,2,40,0,0x2A,0x02,0xDF }, /* 360kB PC diskettes */ { 2400,15,2,80,0,0x1B,0x00,0xDF }, /* 1.2 MB AT-diskettes */ @@ -77,6 +96,7 @@ static struct floppy_struct { { 1440, 9,2,80,0,0x23,0x01,0xDF }, /* 720kB in 1.2MB drive */ { 2880,18,2,80,0,0x1B,0x00,0xCF }, /* 1.44MB diskette */ }; + /* * Rate is 0 for 500kb/s, 2 for 300kbps, 1 for 250kbps * Spec1 is 0xSH, where S is stepping rate (F=1ms, E=2ms, D=3ms etc), @@ -88,12 +108,16 @@ static struct floppy_struct { extern void floppy_interrupt(void); extern char tmp_floppy_area[1024]; +extern char floppy_track_buffer[512*2*18]; /* * These are global variables, as that's the easiest way to give * information to interrupts. They are the data used for the current * request. */ +static int read_track = 0; /* flag to indicate if we want to read all track */ +static int buffer_track = -1; +static int buffer_drive = -1; static int cur_spec1 = -1; static int cur_rate = -1; static struct floppy_struct * floppy = floppy_type; @@ -102,18 +126,36 @@ static unsigned char sector = 0; static unsigned char head = 0; static unsigned char track = 0; static unsigned char seek_track = 0; +static unsigned char current_track = 255; static unsigned char command = 0; +unsigned char selected = 0; +struct task_struct * wait_on_floppy_select = NULL; + +void floppy_deselect(unsigned int nr) +{ + if (nr != (current_DOR & 3)) + printk("floppy_deselect: drive not selected\n\r"); + selected = 0; + wake_up(&wait_on_floppy_select); +} /* * floppy-change is never called from an interrupt, so we can relax a bit - * here. + * here, sleep etc. Note that floppy-on tries to set current_DOR to point + * to the desired drive, but it will probably not survive the sleep if + * several floppies are used at the same time: thus the loop. */ int floppy_change(unsigned int nr) { +repeat: floppy_on(nr); - floppy_select(nr); + while ((current_DOR & 3) != nr && selected) + sleep_on(&wait_on_floppy_select); + if ((current_DOR & 3) != nr) + goto repeat; if (inb(FD_DIR) & 0x80) { floppy_off(nr); + buffer_track = -1; return 1; } floppy_off(nr); @@ -127,9 +169,16 @@ __asm__("cld ; rep ; movsl" \ static void setup_DMA(void) { - long addr = (long) CURRENT->buffer; + unsigned long addr = (long) CURRENT->buffer; + unsigned long count = 1024; - if (addr >= 0x100000) { + cli(); + if (read_track) { +/* mark buffer-track bad, in case all this fails.. */ + buffer_drive = buffer_track = -1; + count = floppy->sect*2*512; + addr = (long) floppy_track_buffer; + } else if (addr >= 0x100000) { addr = (long) tmp_floppy_area; if (command == FD_WRITE) copy_buffer(CURRENT->buffer,tmp_floppy_area); @@ -149,12 +198,15 @@ static void setup_DMA(void) addr >>= 8; /* bits 16-19 of addr */ immoutb_p(addr,0x81); -/* low 8 bits of count-1 (1024-1=0x3ff) */ - immoutb_p(0xff,5); +/* low 8 bits of count-1 */ + count--; + immoutb_p(count,5); + count >>= 8; /* high 8 bits of count-1 */ - immoutb_p(3,5); + immoutb_p(count,5); /* activate DMA 2 */ immoutb_p(0|2,10); + sti(); } static void output_byte(char byte) @@ -162,13 +214,16 @@ static void output_byte(char byte) int counter; unsigned char status; + if (reset) + return; for(counter = 0 ; counter < 10000 ; counter++) { - status = inb(FD_STATUS) & (STATUS_READY | STATUS_DIR); + status = inb_p(FD_STATUS) & (STATUS_READY | STATUS_DIR); if (status == STATUS_READY) { outb(byte,FD_DATA); return; } } + reset = 1; printk("Unable to send byte to FDC\n\r"); } @@ -176,97 +231,115 @@ static int result(void) { int i = 0, counter, status; + if (reset) + return -1; for (counter = 0 ; counter < 10000 ; counter++) { - status = inb(FD_STATUS)&(STATUS_DIR|STATUS_READY|STATUS_BUSY); + status = inb_p(FD_STATUS)&(STATUS_DIR|STATUS_READY|STATUS_BUSY); if (status == STATUS_READY) return i; if (status == (STATUS_DIR|STATUS_READY|STATUS_BUSY)) { if (i >= MAX_REPLIES) break; - reply_buffer[i++] = inb(FD_DATA); + reply_buffer[i++] = inb_p(FD_DATA); } } + reset = 1; printk("Getstatus times out\n\r"); return -1; } +static void bad_flp_intr(void) +{ + current_track = -1; + CURRENT->errors++; + if (CURRENT->errors > MAX_ERRORS) { + floppy_deselect(current_drive); + end_request(0); + } + if (CURRENT->errors > MAX_ERRORS/2) + reset = 1; +} + /* - * This is the routine called after every seek (or recalibrate) interrupt - * from the floppy controller. Note that the "unexpected interrupt" routine - * also does a recalibrate, but doesn't come here. + * Ok, this interrupt is called after a DMA read/write has succeeded, + * so we check the results, and copy any buffers. */ -static void seek_interrupt(void) +static void rw_interrupt(void) { -/* sense drive status */ - output_byte(FD_SENSEI); - if (result() != 2 || (ST0 & 0xF8) != 0x20) { - CURRENT->errors++; - if (CURRENT->errors > MAX_ERRORS) { - floppy_deselect(current_drive); - end_request(0); - reset_floppy(); - return; - } - output_byte(FD_RECALIBRATE); - output_byte(head<<2 | current_drive); - return; - } -/* are we on the right track? */ - if (ST1 != seek_track) { - CURRENT->errors++; - if (CURRENT->errors > MAX_ERRORS) { + char * buffer_area; + + if (result() != 7 || (ST0 & 0xf8) || (ST1 & 0xbf) || (ST2 & 0x73)) { + if (ST1 & 0x02) { + printk("Drive %d is write protected\n\r",current_drive); floppy_deselect(current_drive); end_request(0); - reset_floppy(); - return; - } - output_byte(FD_SEEK); - output_byte(head<<2 | current_drive); - output_byte(seek_track); + } else + bad_flp_intr(); + do_fd_request(); return; } -/* yes - set up DMA and read/write command */ + if (read_track) { + buffer_track = seek_track; + buffer_drive = current_drive; + buffer_area = floppy_track_buffer + + ((sector-1 + head*floppy->sect)<<9); + copy_buffer(buffer_area,CURRENT->buffer); + } else if (command == FD_READ && + (unsigned long)(CURRENT->buffer) >= 0x100000) + copy_buffer(tmp_floppy_area,CURRENT->buffer); + floppy_deselect(current_drive); + end_request(1); + do_fd_request(); +} + +/* + * We try to read tracks, but if we get too many errors, we + * go back to reading just one sector at a time. + * + * This means we should be able to read a sector even if there + * are other bad sectors on this track. + */ +inline void setup_rw_floppy(void) +{ setup_DMA(); do_floppy = rw_interrupt; output_byte(command); - output_byte(head<<2 | current_drive); - output_byte(track); - output_byte(head); - output_byte(sector); + if (read_track) { + output_byte(current_drive); + output_byte(track); + output_byte(0); + output_byte(1); + } else { + output_byte(head<<2 | current_drive); + output_byte(track); + output_byte(head); + output_byte(sector); + } output_byte(2); /* sector size = 512 */ output_byte(floppy->sect); output_byte(floppy->gap); output_byte(0xFF); /* sector size (0xff when n!=0 ?) */ + if (reset) + do_fd_request(); } /* - * Ok, this interrupt is called after a DMA read/write has succeeded, - * so we check the results, and copy any buffers. + * This is the routine called after every seek (or recalibrate) interrupt + * from the floppy controller. Note that the "unexpected interrupt" routine + * also does a recalibrate, but doesn't come here. */ -static void rw_interrupt(void) +static void seek_interrupt(void) { - if (result() != 7 || (ST0 & 0xf8) || (ST1 & 0xbf) || - (ST2 & 0x73)) { - CURRENT->errors++; - if (CURRENT->errors > MAX_ERRORS || (ST1 & 0x02)) { - if (ST1 & 0x02) - printk("Drive %d is write protected\n\r", - current_drive); - floppy_deselect(current_drive); - end_request(0); - do_fd_request(); - return; - } - do_floppy = seek_interrupt; - output_byte(FD_RECALIBRATE); - output_byte(head<<2 | current_drive); +/* sense drive status */ + output_byte(FD_SENSEI); + if (result() != 2 || (ST0 & 0xF8) != 0x20 || ST1 != seek_track) { + recalibrate = 1; + bad_flp_intr(); + do_fd_request(); return; } - if (command == FD_READ && (long)(CURRENT->buffer) >= 0x100000) - copy_buffer(tmp_floppy_area,CURRENT->buffer); - floppy_deselect(current_drive); - end_request(1); - do_fd_request(); + current_track = ST1; + setup_rw_floppy(); } /* @@ -276,6 +349,7 @@ static void rw_interrupt(void) */ static void transfer(void) { + read_track = (command == FD_READ) && (CURRENT->errors < 4); if (cur_spec1 != floppy->spec1) { cur_spec1 = floppy->spec1; output_byte(FD_SPECIFY); @@ -284,15 +358,23 @@ static void transfer(void) } if (cur_rate != floppy->rate) outb_p(cur_rate = floppy->rate,FD_DCR); - do_floppy = seek_interrupt; - if (seek_track) { - output_byte(FD_SEEK); - output_byte(head<<2 | current_drive); - output_byte(seek_track); - } else { - output_byte(FD_RECALIBRATE); - output_byte(head<<2 | current_drive); + if (reset) { + do_fd_request(); + return; + } + if (!seek) { + setup_rw_floppy(); + return; } + do_floppy = seek_interrupt; + output_byte(FD_SEEK); + if (read_track) + output_byte(current_drive); + else + output_byte((head<<2) | current_drive); + output_byte(seek_track); + if (reset) + do_fd_request(); } /* @@ -300,59 +382,96 @@ static void transfer(void) */ static void recal_interrupt(void) { - do_floppy = NULL; output_byte(FD_SENSEI); - if (result()!=2 || (ST0 & 0xE0) == 0x60) { - reset_floppy(); - return; - } + if (result()!=2 || (ST0 & 0xE0) == 0x60) + reset = 1; + else + recalibrate = 0; do_fd_request(); } void unexpected_floppy_interrupt(void) { output_byte(FD_SENSEI); - if (result()!=2 || (ST0 & 0xE0) == 0x60) { - reset_floppy(); - return; - } + if (result()!=2 || (ST0 & 0xE0) == 0x60) + reset = 1; + else + recalibrate = 1; +} + +static void recalibrate_floppy(void) +{ + recalibrate = 0; + current_track = 0; do_floppy = recal_interrupt; output_byte(FD_RECALIBRATE); output_byte(head<<2 | current_drive); + if (reset) + do_fd_request(); } static void reset_interrupt(void) { output_byte(FD_SENSEI); (void) result(); - do_floppy = recal_interrupt; - output_byte(FD_RECALIBRATE); - output_byte(head<<2 | current_drive); + output_byte(FD_SPECIFY); + output_byte(cur_spec1); /* hut etc */ + output_byte(6); /* Head load time =6ms, DMA */ + do_fd_request(); } +/* + * reset is done by pulling bit 2 of DOR low for a while. + */ static void reset_floppy(void) { + int i; + + reset = 0; + cur_spec1 = -1; + cur_rate = -1; + recalibrate = 1; printk("Reset-floppy called\n\r"); + cli(); do_floppy = reset_interrupt; - outb_p(0,FD_DOR); + outb_p(current_DOR & ~0x04,FD_DOR); + for (i=0 ; i<100 ; i++) + __asm__("nop"); outb(current_DOR,FD_DOR); + sti(); } static void floppy_on_interrupt(void) { /* We cannot do a floppy-select, as that might sleep. We just force it */ selected = 1; - current_DOR &= 0xFC; - current_DOR |= current_drive; - transfer(); + if (current_drive != (current_DOR & 3)) { + current_DOR &= 0xFC; + current_DOR |= current_drive; + outb(current_DOR,FD_DOR); + add_timer(2,&transfer); + } else + transfer(); } void do_fd_request(void) { unsigned int block; + char * buffer_area; + seek = 0; + if (reset) { + reset_floppy(); + return; + } + if (recalibrate) { + recalibrate_floppy(); + return; + } INIT_REQUEST; floppy = (MINOR(CURRENT->dev)>>2) + floppy_type; + if (current_drive != CURRENT_DEV) + seek = 1; current_drive = CURRENT_DEV; block = CURRENT->sector; if (block+2 > floppy->size) { @@ -364,18 +483,47 @@ void do_fd_request(void) head = block % floppy->head; track = block / floppy->head; seek_track = track << floppy->stretch; - sector++; if (CURRENT->cmd == READ) command = FD_READ; else if (CURRENT->cmd == WRITE) command = FD_WRITE; - else - panic("do_fd_request: unknown command"); + else { + printk("do_fd_request: unknown command\n"); + end_request(0); + goto repeat; + } + if ((seek_track == buffer_track) && + (current_drive == buffer_drive)) { + buffer_area = floppy_track_buffer + + ((sector + head*floppy->sect)<<9); + if (command == FD_READ) { + copy_buffer(buffer_area,CURRENT->buffer); + end_request(1); + goto repeat; + } else + copy_buffer(CURRENT->buffer,buffer_area); + } + if (seek_track != current_track) + seek = 1; + sector++; add_timer(ticks_to_floppy_on(current_drive),&floppy_on_interrupt); } +static int floppy_sizes[] ={ + 0, 0, 0, 0, + 360, 360 ,360, 360, + 1200,1200,1200,1200, + 360, 360, 360, 360, + 720, 720, 720, 720, + 360, 360, 360, 360, + 720, 720, 720, 720, + 1440,1440,1440,1440 +}; + void floppy_init(void) { + outb(current_DOR,FD_DOR); + blk_size[MAJOR_NR] = floppy_sizes; blk_dev[MAJOR_NR].request_fn = DEVICE_REQUEST; set_intr_gate(0x26,&floppy_interrupt); outb(inb_p(0x21)&~0x40,0x21);