1 /* 2 * linux/drivers/block/floppy.c 3 * 4 * Copyright (C) 1991, 1992 Linus Torvalds 5 * Copyright (C) 1993, 1994 Alain Knaff 6 * Copyright (C) 1998 Alan Cox 7 */ 8 9 /* 10 * 02.12.91 - Changed to static variables to indicate need for reset 11 * and recalibrate. This makes some things easier (output_byte reset 12 * checking etc), and means less interrupt jumping in case of errors, 13 * so the code is hopefully easier to understand. 14 */ 15 16 /* 17 * This file is certainly a mess. I've tried my best to get it working, 18 * but I don't like programming floppies, and I have only one anyway. 19 * Urgel. I should check for more errors, and do more graceful error 20 * recovery. Seems there are problems with several drives. I've tried to 21 * correct them. No promises. 22 */ 23 24 /* 25 * As with hd.c, all routines within this file can (and will) be called 26 * by interrupts, so extreme caution is needed. A hardware interrupt 27 * handler may not sleep, or a kernel panic will happen. Thus I cannot 28 * call "floppy-on" directly, but have to set a special timer interrupt 29 * etc. 30 */ 31 32 /* 33 * 28.02.92 - made track-buffering routines, based on the routines written 34 * by entropy@wintermute.wpi.edu (Lawrence Foard). Linus. 35 */ 36 37 /* 38 * Automatic floppy-detection and formatting written by Werner Almesberger 39 * (almesber@nessie.cs.id.ethz.ch), who also corrected some problems with 40 * the floppy-change signal detection. 41 */ 42 43 /* 44 * 1992/7/22 -- Hennus Bergman: Added better error reporting, fixed 45 * FDC data overrun bug, added some preliminary stuff for vertical 46 * recording support. 47 * 48 * 1992/9/17: Added DMA allocation & DMA functions. -- hhb. 49 * 50 * TODO: Errors are still not counted properly. 51 */ 52 53 /* 1992/9/20 54 * Modifications for ``Sector Shifting'' by Rob Hooft (hooft@chem.ruu.nl) 55 * modeled after the freeware MS-DOS program fdformat/88 V1.8 by 56 * Christoph H. Hochst\"atter. 57 * I have fixed the shift values to the ones I always use. Maybe a new 58 * ioctl() should be created to be able to modify them. 59 * There is a bug in the driver that makes it impossible to format a 60 * floppy as the first thing after bootup. 61 */ 62 63 /* 64 * 1993/4/29 -- Linus -- cleaned up the timer handling in the kernel, and 65 * this helped the floppy driver as well. Much cleaner, and still seems to 66 * work. 67 */ 68 69 /* 1994/6/24 --bbroad-- added the floppy table entries and made 70 * minor modifications to allow 2.88 floppies to be run. 71 */ 72 73 /* 1994/7/13 -- Paul Vojta -- modified the probing code to allow three or more 74 * disk types. 75 */ 76 77 /* 78 * 1994/8/8 -- Alain Knaff -- Switched to fdpatch driver: Support for bigger 79 * format bug fixes, but unfortunately some new bugs too... 80 */ 81 82 /* 1994/9/17 -- Koen Holtman -- added logging of physical floppy write 83 * errors to allow safe writing by specialized programs. 84 */ 85 86 /* 1995/4/24 -- Dan Fandrich -- added support for Commodore 1581 3.5" disks 87 * by defining bit 1 of the "stretch" parameter to mean put sectors on the 88 * opposite side of the disk, leaving the sector IDs alone (i.e. Commodore's 89 * drives are "upside-down"). 90 */ 91 92 /* 93 * 1995/8/26 -- Andreas Busse -- added Mips support. 94 */ 95 96 /* 97 * 1995/10/18 -- Ralf Baechle -- Portability cleanup; move machine dependent 98 * features to asm/floppy.h. 99 */ 100 101 /* 102 * 1998/1/21 -- Richard Gooch <rgooch@atnf.csiro.au> -- devfs support 103 */ 104 105 /* 106 * 1998/05/07 -- Russell King -- More portability cleanups; moved definition of 107 * interrupt and dma channel to asm/floppy.h. Cleaned up some formatting & 108 * use of '0' for NULL. 109 */ 110 111 /* 112 * 1998/06/07 -- Alan Cox -- Merged the 2.0.34 fixes for resource allocation 113 * failures. 114 */ 115 116 /* 117 * 1998/09/20 -- David Weinehall -- Added slow-down code for buggy PS/2-drives. 118 */ 119 120 /* 121 * 1999/08/13 -- Paul Slootman -- floppy stopped working on Alpha after 24 122 * days, 6 hours, 32 minutes and 32 seconds (i.e. MAXINT jiffies; ints were 123 * being used to store jiffies, which are unsigned longs). 124 */ 125 126 /* 127 * 2000/08/28 -- Arnaldo Carvalho de Melo <acme@conectiva.com.br> 128 * - get rid of check_region 129 * - s/suser/capable/ 130 */ 131 132 /* 133 * 2001/08/26 -- Paul Gortmaker - fix insmod oops on machines with no 134 * floppy controller (lingering task on list after module is gone... boom.) 135 */ 136 137 /* 138 * 2002/02/07 -- Anton Altaparmakov - Fix io ports reservation to correct range 139 * (0x3f2-0x3f5, 0x3f7). This fix is a bit of a hack but the proper fix 140 * requires many non-obvious changes in arch dependent code. 141 */ 142 143 /* 2003/07/28 -- Daniele Bellucci <bellucda@tiscali.it>. 144 * Better audit of register_blkdev. 145 */ 146 147 #undef FLOPPY_SILENT_DCL_CLEAR 148 149 #define REALLY_SLOW_IO 150 151 #define DEBUGT 2 152 153 #define DPRINT(format, args...) \ 154 pr_info("floppy%d: " format, current_drive, ##args) 155 156 #define DCL_DEBUG /* debug disk change line */ 157 #ifdef DCL_DEBUG 158 #define debug_dcl(test, fmt, args...) \ 159 do { if ((test) & FD_DEBUG) DPRINT(fmt, ##args); } while (0) 160 #else 161 #define debug_dcl(test, fmt, args...) \ 162 do { if (0) DPRINT(fmt, ##args); } while (0) 163 #endif 164 165 /* do print messages for unexpected interrupts */ 166 static int print_unex = 1; 167 #include <linux/module.h> 168 #include <linux/sched.h> 169 #include <linux/fs.h> 170 #include <linux/kernel.h> 171 #include <linux/timer.h> 172 #include <linux/workqueue.h> 173 #define FDPATCHES 174 #include <linux/fdreg.h> 175 #include <linux/fd.h> 176 #include <linux/hdreg.h> 177 #include <linux/errno.h> 178 #include <linux/slab.h> 179 #include <linux/mm.h> 180 #include <linux/bio.h> 181 #include <linux/string.h> 182 #include <linux/jiffies.h> 183 #include <linux/fcntl.h> 184 #include <linux/delay.h> 185 #include <linux/mc146818rtc.h> /* CMOS defines */ 186 #include <linux/ioport.h> 187 #include <linux/interrupt.h> 188 #include <linux/init.h> 189 #include <linux/platform_device.h> 190 #include <linux/mod_devicetable.h> 191 #include <linux/mutex.h> 192 #include <linux/io.h> 193 #include <linux/uaccess.h> 194 #include <linux/async.h> 195 #include <linux/compat.h> 196 197 /* 198 * PS/2 floppies have much slower step rates than regular floppies. 199 * It's been recommended that take about 1/4 of the default speed 200 * in some more extreme cases. 201 */ 202 static DEFINE_MUTEX(floppy_mutex); 203 static int slow_floppy; 204 205 #include <asm/dma.h> 206 #include <asm/irq.h> 207 208 static int FLOPPY_IRQ = 6; 209 static int FLOPPY_DMA = 2; 210 static int can_use_virtual_dma = 2; 211 /* ======= 212 * can use virtual DMA: 213 * 0 = use of virtual DMA disallowed by config 214 * 1 = use of virtual DMA prescribed by config 215 * 2 = no virtual DMA preference configured. By default try hard DMA, 216 * but fall back on virtual DMA when not enough memory available 217 */ 218 219 static int use_virtual_dma; 220 /* ======= 221 * use virtual DMA 222 * 0 using hard DMA 223 * 1 using virtual DMA 224 * This variable is set to virtual when a DMA mem problem arises, and 225 * reset back in floppy_grab_irq_and_dma. 226 * It is not safe to reset it in other circumstances, because the floppy 227 * driver may have several buffers in use at once, and we do currently not 228 * record each buffers capabilities 229 */ 230 231 static DEFINE_SPINLOCK(floppy_lock); 232 233 static unsigned short virtual_dma_port = 0x3f0; 234 irqreturn_t floppy_interrupt(int irq, void *dev_id); 235 static int set_dor(int fdc, char mask, char data); 236 237 #define K_64 0x10000 /* 64KB */ 238 239 /* the following is the mask of allowed drives. By default units 2 and 240 * 3 of both floppy controllers are disabled, because switching on the 241 * motor of these drives causes system hangs on some PCI computers. drive 242 * 0 is the low bit (0x1), and drive 7 is the high bit (0x80). Bits are on if 243 * a drive is allowed. 244 * 245 * NOTE: This must come before we include the arch floppy header because 246 * some ports reference this variable from there. -DaveM 247 */ 248 249 static int allowed_drive_mask = 0x33; 250 251 #include <asm/floppy.h> 252 253 static int irqdma_allocated; 254 255 #include <linux/blk-mq.h> 256 #include <linux/blkpg.h> 257 #include <linux/cdrom.h> /* for the compatibility eject ioctl */ 258 #include <linux/completion.h> 259 260 static LIST_HEAD(floppy_reqs); 261 static struct request *current_req; 262 static int set_next_request(void); 263 264 #ifndef fd_get_dma_residue 265 #define fd_get_dma_residue() get_dma_residue(FLOPPY_DMA) 266 #endif 267 268 /* Dma Memory related stuff */ 269 270 #ifndef fd_dma_mem_free 271 #define fd_dma_mem_free(addr, size) free_pages(addr, get_order(size)) 272 #endif 273 274 #ifndef fd_dma_mem_alloc 275 #define fd_dma_mem_alloc(size) __get_dma_pages(GFP_KERNEL, get_order(size)) 276 #endif 277 278 #ifndef fd_cacheflush 279 #define fd_cacheflush(addr, size) /* nothing... */ 280 #endif 281 282 static inline void fallback_on_nodma_alloc(char **addr, size_t l) 283 { 284 #ifdef FLOPPY_CAN_FALLBACK_ON_NODMA 285 if (*addr) 286 return; /* we have the memory */ 287 if (can_use_virtual_dma != 2) 288 return; /* no fallback allowed */ 289 pr_info("DMA memory shortage. Temporarily falling back on virtual DMA\n"); 290 *addr = (char *)nodma_mem_alloc(l); 291 #else 292 return; 293 #endif 294 } 295 296 /* End dma memory related stuff */ 297 298 static unsigned long fake_change; 299 static bool initialized; 300 301 #define ITYPE(x) (((x) >> 2) & 0x1f) 302 #define TOMINOR(x) ((x & 3) | ((x & 4) << 5)) 303 #define UNIT(x) ((x) & 0x03) /* drive on fdc */ 304 #define FDC(x) (((x) & 0x04) >> 2) /* fdc of drive */ 305 /* reverse mapping from unit and fdc to drive */ 306 #define REVDRIVE(fdc, unit) ((unit) + ((fdc) << 2)) 307 308 #define DP (&drive_params[current_drive]) 309 #define DRS (&drive_state[current_drive]) 310 #define DRWE (&write_errors[current_drive]) 311 #define FDCS (&fdc_state[fdc]) 312 313 #define UDP (&drive_params[drive]) 314 #define UDRS (&drive_state[drive]) 315 #define UDRWE (&write_errors[drive]) 316 #define UFDCS (&fdc_state[FDC(drive)]) 317 318 #define PH_HEAD(floppy, head) (((((floppy)->stretch & 2) >> 1) ^ head) << 2) 319 #define STRETCH(floppy) ((floppy)->stretch & FD_STRETCH) 320 321 /* read/write */ 322 #define COMMAND (raw_cmd->cmd[0]) 323 #define DR_SELECT (raw_cmd->cmd[1]) 324 #define TRACK (raw_cmd->cmd[2]) 325 #define HEAD (raw_cmd->cmd[3]) 326 #define SECTOR (raw_cmd->cmd[4]) 327 #define SIZECODE (raw_cmd->cmd[5]) 328 #define SECT_PER_TRACK (raw_cmd->cmd[6]) 329 #define GAP (raw_cmd->cmd[7]) 330 #define SIZECODE2 (raw_cmd->cmd[8]) 331 #define NR_RW 9 332 333 /* format */ 334 #define F_SIZECODE (raw_cmd->cmd[2]) 335 #define F_SECT_PER_TRACK (raw_cmd->cmd[3]) 336 #define F_GAP (raw_cmd->cmd[4]) 337 #define F_FILL (raw_cmd->cmd[5]) 338 #define NR_F 6 339 340 /* 341 * Maximum disk size (in kilobytes). 342 * This default is used whenever the current disk size is unknown. 343 * [Now it is rather a minimum] 344 */ 345 #define MAX_DISK_SIZE 4 /* 3984 */ 346 347 /* 348 * globals used by 'result()' 349 */ 350 #define MAX_REPLIES 16 351 static unsigned char reply_buffer[MAX_REPLIES]; 352 static int inr; /* size of reply buffer, when called from interrupt */ 353 #define ST0 (reply_buffer[0]) 354 #define ST1 (reply_buffer[1]) 355 #define ST2 (reply_buffer[2]) 356 #define ST3 (reply_buffer[0]) /* result of GETSTATUS */ 357 #define R_TRACK (reply_buffer[3]) 358 #define R_HEAD (reply_buffer[4]) 359 #define R_SECTOR (reply_buffer[5]) 360 #define R_SIZECODE (reply_buffer[6]) 361 362 #define SEL_DLY (2 * HZ / 100) 363 364 /* 365 * this struct defines the different floppy drive types. 366 */ 367 static struct { 368 struct floppy_drive_params params; 369 const char *name; /* name printed while booting */ 370 } default_drive_params[] = { 371 /* NOTE: the time values in jiffies should be in msec! 372 CMOS drive type 373 | Maximum data rate supported by drive type 374 | | Head load time, msec 375 | | | Head unload time, msec (not used) 376 | | | | Step rate interval, usec 377 | | | | | Time needed for spinup time (jiffies) 378 | | | | | | Timeout for spinning down (jiffies) 379 | | | | | | | Spindown offset (where disk stops) 380 | | | | | | | | Select delay 381 | | | | | | | | | RPS 382 | | | | | | | | | | Max number of tracks 383 | | | | | | | | | | | Interrupt timeout 384 | | | | | | | | | | | | Max nonintlv. sectors 385 | | | | | | | | | | | | | -Max Errors- flags */ 386 {{0, 500, 16, 16, 8000, 1*HZ, 3*HZ, 0, SEL_DLY, 5, 80, 3*HZ, 20, {3,1,2,0,2}, 0, 387 0, { 7, 4, 8, 2, 1, 5, 3,10}, 3*HZ/2, 0 }, "unknown" }, 388 389 {{1, 300, 16, 16, 8000, 1*HZ, 3*HZ, 0, SEL_DLY, 5, 40, 3*HZ, 17, {3,1,2,0,2}, 0, 390 0, { 1, 0, 0, 0, 0, 0, 0, 0}, 3*HZ/2, 1 }, "360K PC" }, /*5 1/4 360 KB PC*/ 391 392 {{2, 500, 16, 16, 6000, 4*HZ/10, 3*HZ, 14, SEL_DLY, 6, 83, 3*HZ, 17, {3,1,2,0,2}, 0, 393 0, { 2, 5, 6,23,10,20,12, 0}, 3*HZ/2, 2 }, "1.2M" }, /*5 1/4 HD AT*/ 394 395 {{3, 250, 16, 16, 3000, 1*HZ, 3*HZ, 0, SEL_DLY, 5, 83, 3*HZ, 20, {3,1,2,0,2}, 0, 396 0, { 4,22,21,30, 3, 0, 0, 0}, 3*HZ/2, 4 }, "720k" }, /*3 1/2 DD*/ 397 398 {{4, 500, 16, 16, 4000, 4*HZ/10, 3*HZ, 10, SEL_DLY, 5, 83, 3*HZ, 20, {3,1,2,0,2}, 0, 399 0, { 7, 4,25,22,31,21,29,11}, 3*HZ/2, 7 }, "1.44M" }, /*3 1/2 HD*/ 400 401 {{5, 1000, 15, 8, 3000, 4*HZ/10, 3*HZ, 10, SEL_DLY, 5, 83, 3*HZ, 40, {3,1,2,0,2}, 0, 402 0, { 7, 8, 4,25,28,22,31,21}, 3*HZ/2, 8 }, "2.88M AMI BIOS" }, /*3 1/2 ED*/ 403 404 {{6, 1000, 15, 8, 3000, 4*HZ/10, 3*HZ, 10, SEL_DLY, 5, 83, 3*HZ, 40, {3,1,2,0,2}, 0, 405 0, { 7, 8, 4,25,28,22,31,21}, 3*HZ/2, 8 }, "2.88M" } /*3 1/2 ED*/ 406 /* | --autodetected formats--- | | | 407 * read_track | | Name printed when booting 408 * | Native format 409 * Frequency of disk change checks */ 410 }; 411 412 static struct floppy_drive_params drive_params[N_DRIVE]; 413 static struct floppy_drive_struct drive_state[N_DRIVE]; 414 static struct floppy_write_errors write_errors[N_DRIVE]; 415 static struct timer_list motor_off_timer[N_DRIVE]; 416 static struct gendisk *disks[N_DRIVE]; 417 static struct blk_mq_tag_set tag_sets[N_DRIVE]; 418 static struct block_device *opened_bdev[N_DRIVE]; 419 static DEFINE_MUTEX(open_lock); 420 static struct floppy_raw_cmd *raw_cmd, default_raw_cmd; 421 422 /* 423 * This struct defines the different floppy types. 424 * 425 * Bit 0 of 'stretch' tells if the tracks need to be doubled for some 426 * types (e.g. 360kB diskette in 1.2MB drive, etc.). Bit 1 of 'stretch' 427 * tells if the disk is in Commodore 1581 format, which means side 0 sectors 428 * are located on side 1 of the disk but with a side 0 ID, and vice-versa. 429 * This is the same as the Sharp MZ-80 5.25" CP/M disk format, except that the 430 * 1581's logical side 0 is on physical side 1, whereas the Sharp's logical 431 * side 0 is on physical side 0 (but with the misnamed sector IDs). 432 * 'stretch' should probably be renamed to something more general, like 433 * 'options'. 434 * 435 * Bits 2 through 9 of 'stretch' tell the number of the first sector. 436 * The LSB (bit 2) is flipped. For most disks, the first sector 437 * is 1 (represented by 0x00<<2). For some CP/M and music sampler 438 * disks (such as Ensoniq EPS 16plus) it is 0 (represented as 0x01<<2). 439 * For Amstrad CPC disks it is 0xC1 (represented as 0xC0<<2). 440 * 441 * Other parameters should be self-explanatory (see also setfdprm(8)). 442 */ 443 /* 444 Size 445 | Sectors per track 446 | | Head 447 | | | Tracks 448 | | | | Stretch 449 | | | | | Gap 1 size 450 | | | | | | Data rate, | 0x40 for perp 451 | | | | | | | Spec1 (stepping rate, head unload 452 | | | | | | | | /fmt gap (gap2) */ 453 static struct floppy_struct floppy_type[32] = { 454 { 0, 0,0, 0,0,0x00,0x00,0x00,0x00,NULL }, /* 0 no testing */ 455 { 720, 9,2,40,0,0x2A,0x02,0xDF,0x50,"d360" }, /* 1 360KB PC */ 456 { 2400,15,2,80,0,0x1B,0x00,0xDF,0x54,"h1200" }, /* 2 1.2MB AT */ 457 { 720, 9,1,80,0,0x2A,0x02,0xDF,0x50,"D360" }, /* 3 360KB SS 3.5" */ 458 { 1440, 9,2,80,0,0x2A,0x02,0xDF,0x50,"D720" }, /* 4 720KB 3.5" */ 459 { 720, 9,2,40,1,0x23,0x01,0xDF,0x50,"h360" }, /* 5 360KB AT */ 460 { 1440, 9,2,80,0,0x23,0x01,0xDF,0x50,"h720" }, /* 6 720KB AT */ 461 { 2880,18,2,80,0,0x1B,0x00,0xCF,0x6C,"H1440" }, /* 7 1.44MB 3.5" */ 462 { 5760,36,2,80,0,0x1B,0x43,0xAF,0x54,"E2880" }, /* 8 2.88MB 3.5" */ 463 { 6240,39,2,80,0,0x1B,0x43,0xAF,0x28,"E3120" }, /* 9 3.12MB 3.5" */ 464 465 { 2880,18,2,80,0,0x25,0x00,0xDF,0x02,"h1440" }, /* 10 1.44MB 5.25" */ 466 { 3360,21,2,80,0,0x1C,0x00,0xCF,0x0C,"H1680" }, /* 11 1.68MB 3.5" */ 467 { 820,10,2,41,1,0x25,0x01,0xDF,0x2E,"h410" }, /* 12 410KB 5.25" */ 468 { 1640,10,2,82,0,0x25,0x02,0xDF,0x2E,"H820" }, /* 13 820KB 3.5" */ 469 { 2952,18,2,82,0,0x25,0x00,0xDF,0x02,"h1476" }, /* 14 1.48MB 5.25" */ 470 { 3444,21,2,82,0,0x25,0x00,0xDF,0x0C,"H1722" }, /* 15 1.72MB 3.5" */ 471 { 840,10,2,42,1,0x25,0x01,0xDF,0x2E,"h420" }, /* 16 420KB 5.25" */ 472 { 1660,10,2,83,0,0x25,0x02,0xDF,0x2E,"H830" }, /* 17 830KB 3.5" */ 473 { 2988,18,2,83,0,0x25,0x00,0xDF,0x02,"h1494" }, /* 18 1.49MB 5.25" */ 474 { 3486,21,2,83,0,0x25,0x00,0xDF,0x0C,"H1743" }, /* 19 1.74 MB 3.5" */ 475 476 { 1760,11,2,80,0,0x1C,0x09,0xCF,0x00,"h880" }, /* 20 880KB 5.25" */ 477 { 2080,13,2,80,0,0x1C,0x01,0xCF,0x00,"D1040" }, /* 21 1.04MB 3.5" */ 478 { 2240,14,2,80,0,0x1C,0x19,0xCF,0x00,"D1120" }, /* 22 1.12MB 3.5" */ 479 { 3200,20,2,80,0,0x1C,0x20,0xCF,0x2C,"h1600" }, /* 23 1.6MB 5.25" */ 480 { 3520,22,2,80,0,0x1C,0x08,0xCF,0x2e,"H1760" }, /* 24 1.76MB 3.5" */ 481 { 3840,24,2,80,0,0x1C,0x20,0xCF,0x00,"H1920" }, /* 25 1.92MB 3.5" */ 482 { 6400,40,2,80,0,0x25,0x5B,0xCF,0x00,"E3200" }, /* 26 3.20MB 3.5" */ 483 { 7040,44,2,80,0,0x25,0x5B,0xCF,0x00,"E3520" }, /* 27 3.52MB 3.5" */ 484 { 7680,48,2,80,0,0x25,0x63,0xCF,0x00,"E3840" }, /* 28 3.84MB 3.5" */ 485 { 3680,23,2,80,0,0x1C,0x10,0xCF,0x00,"H1840" }, /* 29 1.84MB 3.5" */ 486 487 { 1600,10,2,80,0,0x25,0x02,0xDF,0x2E,"D800" }, /* 30 800KB 3.5" */ 488 { 3200,20,2,80,0,0x1C,0x00,0xCF,0x2C,"H1600" }, /* 31 1.6MB 3.5" */ 489 }; 490 491 #define SECTSIZE (_FD_SECTSIZE(*floppy)) 492 493 /* Auto-detection: Disk type used until the next media change occurs. */ 494 static struct floppy_struct *current_type[N_DRIVE]; 495 496 /* 497 * User-provided type information. current_type points to 498 * the respective entry of this array. 499 */ 500 static struct floppy_struct user_params[N_DRIVE]; 501 502 static sector_t floppy_sizes[256]; 503 504 static char floppy_device_name[] = "floppy"; 505 506 /* 507 * The driver is trying to determine the correct media format 508 * while probing is set. rw_interrupt() clears it after a 509 * successful access. 510 */ 511 static int probing; 512 513 /* Synchronization of FDC access. */ 514 #define FD_COMMAND_NONE -1 515 #define FD_COMMAND_ERROR 2 516 #define FD_COMMAND_OKAY 3 517 518 static volatile int command_status = FD_COMMAND_NONE; 519 static unsigned long fdc_busy; 520 static DECLARE_WAIT_QUEUE_HEAD(fdc_wait); 521 static DECLARE_WAIT_QUEUE_HEAD(command_done); 522 523 /* Errors during formatting are counted here. */ 524 static int format_errors; 525 526 /* Format request descriptor. */ 527 static struct format_descr format_req; 528 529 /* 530 * Rate is 0 for 500kb/s, 1 for 300kbps, 2 for 250kbps 531 * Spec1 is 0xSH, where S is stepping rate (F=1ms, E=2ms, D=3ms etc), 532 * H is head unload time (1=16ms, 2=32ms, etc) 533 */ 534 535 /* 536 * Track buffer 537 * Because these are written to by the DMA controller, they must 538 * not contain a 64k byte boundary crossing, or data will be 539 * corrupted/lost. 540 */ 541 static char *floppy_track_buffer; 542 static int max_buffer_sectors; 543 544 static int *errors; 545 typedef void (*done_f)(int); 546 static const struct cont_t { 547 void (*interrupt)(void); 548 /* this is called after the interrupt of the 549 * main command */ 550 void (*redo)(void); /* this is called to retry the operation */ 551 void (*error)(void); /* this is called to tally an error */ 552 done_f done; /* this is called to say if the operation has 553 * succeeded/failed */ 554 } *cont; 555 556 static void floppy_ready(void); 557 static void floppy_start(void); 558 static void process_fd_request(void); 559 static void recalibrate_floppy(void); 560 static void floppy_shutdown(struct work_struct *); 561 562 static int floppy_request_regions(int); 563 static void floppy_release_regions(int); 564 static int floppy_grab_irq_and_dma(void); 565 static void floppy_release_irq_and_dma(void); 566 567 /* 568 * The "reset" variable should be tested whenever an interrupt is scheduled, 569 * after the commands have been sent. This is to ensure that the driver doesn't 570 * get wedged when the interrupt doesn't come because of a failed command. 571 * reset doesn't need to be tested before sending commands, because 572 * output_byte is automatically disabled when reset is set. 573 */ 574 static void reset_fdc(void); 575 576 /* 577 * These are global variables, as that's the easiest way to give 578 * information to interrupts. They are the data used for the current 579 * request. 580 */ 581 #define NO_TRACK -1 582 #define NEED_1_RECAL -2 583 #define NEED_2_RECAL -3 584 585 static atomic_t usage_count = ATOMIC_INIT(0); 586 587 /* buffer related variables */ 588 static int buffer_track = -1; 589 static int buffer_drive = -1; 590 static int buffer_min = -1; 591 static int buffer_max = -1; 592 593 /* fdc related variables, should end up in a struct */ 594 static struct floppy_fdc_state fdc_state[N_FDC]; 595 static int fdc; /* current fdc */ 596 597 static struct workqueue_struct *floppy_wq; 598 599 static struct floppy_struct *_floppy = floppy_type; 600 static unsigned char current_drive; 601 static long current_count_sectors; 602 static unsigned char fsector_t; /* sector in track */ 603 static unsigned char in_sector_offset; /* offset within physical sector, 604 * expressed in units of 512 bytes */ 605 606 static inline bool drive_no_geom(int drive) 607 { 608 return !current_type[drive] && !ITYPE(UDRS->fd_device); 609 } 610 611 #ifndef fd_eject 612 static inline int fd_eject(int drive) 613 { 614 return -EINVAL; 615 } 616 #endif 617 618 /* 619 * Debugging 620 * ========= 621 */ 622 #ifdef DEBUGT 623 static long unsigned debugtimer; 624 625 static inline void set_debugt(void) 626 { 627 debugtimer = jiffies; 628 } 629 630 static inline void debugt(const char *func, const char *msg) 631 { 632 if (DP->flags & DEBUGT) 633 pr_info("%s:%s dtime=%lu\n", func, msg, jiffies - debugtimer); 634 } 635 #else 636 static inline void set_debugt(void) { } 637 static inline void debugt(const char *func, const char *msg) { } 638 #endif /* DEBUGT */ 639 640 641 static DECLARE_DELAYED_WORK(fd_timeout, floppy_shutdown); 642 static const char *timeout_message; 643 644 static void is_alive(const char *func, const char *message) 645 { 646 /* this routine checks whether the floppy driver is "alive" */ 647 if (test_bit(0, &fdc_busy) && command_status < 2 && 648 !delayed_work_pending(&fd_timeout)) { 649 DPRINT("%s: timeout handler died. %s\n", func, message); 650 } 651 } 652 653 static void (*do_floppy)(void) = NULL; 654 655 #define OLOGSIZE 20 656 657 static void (*lasthandler)(void); 658 static unsigned long interruptjiffies; 659 static unsigned long resultjiffies; 660 static int resultsize; 661 static unsigned long lastredo; 662 663 static struct output_log { 664 unsigned char data; 665 unsigned char status; 666 unsigned long jiffies; 667 } output_log[OLOGSIZE]; 668 669 static int output_log_pos; 670 671 #define current_reqD -1 672 #define MAXTIMEOUT -2 673 674 static void __reschedule_timeout(int drive, const char *message) 675 { 676 unsigned long delay; 677 678 if (drive == current_reqD) 679 drive = current_drive; 680 681 if (drive < 0 || drive >= N_DRIVE) { 682 delay = 20UL * HZ; 683 drive = 0; 684 } else 685 delay = UDP->timeout; 686 687 mod_delayed_work(floppy_wq, &fd_timeout, delay); 688 if (UDP->flags & FD_DEBUG) 689 DPRINT("reschedule timeout %s\n", message); 690 timeout_message = message; 691 } 692 693 static void reschedule_timeout(int drive, const char *message) 694 { 695 unsigned long flags; 696 697 spin_lock_irqsave(&floppy_lock, flags); 698 __reschedule_timeout(drive, message); 699 spin_unlock_irqrestore(&floppy_lock, flags); 700 } 701 702 #define INFBOUND(a, b) (a) = max_t(int, a, b) 703 #define SUPBOUND(a, b) (a) = min_t(int, a, b) 704 705 /* 706 * Bottom half floppy driver. 707 * ========================== 708 * 709 * This part of the file contains the code talking directly to the hardware, 710 * and also the main service loop (seek-configure-spinup-command) 711 */ 712 713 /* 714 * disk change. 715 * This routine is responsible for maintaining the FD_DISK_CHANGE flag, 716 * and the last_checked date. 717 * 718 * last_checked is the date of the last check which showed 'no disk change' 719 * FD_DISK_CHANGE is set under two conditions: 720 * 1. The floppy has been changed after some i/o to that floppy already 721 * took place. 722 * 2. No floppy disk is in the drive. This is done in order to ensure that 723 * requests are quickly flushed in case there is no disk in the drive. It 724 * follows that FD_DISK_CHANGE can only be cleared if there is a disk in 725 * the drive. 726 * 727 * For 1., maxblock is observed. Maxblock is 0 if no i/o has taken place yet. 728 * For 2., FD_DISK_NEWCHANGE is watched. FD_DISK_NEWCHANGE is cleared on 729 * each seek. If a disk is present, the disk change line should also be 730 * cleared on each seek. Thus, if FD_DISK_NEWCHANGE is clear, but the disk 731 * change line is set, this means either that no disk is in the drive, or 732 * that it has been removed since the last seek. 733 * 734 * This means that we really have a third possibility too: 735 * The floppy has been changed after the last seek. 736 */ 737 738 static int disk_change(int drive) 739 { 740 int fdc = FDC(drive); 741 742 if (time_before(jiffies, UDRS->select_date + UDP->select_delay)) 743 DPRINT("WARNING disk change called early\n"); 744 if (!(FDCS->dor & (0x10 << UNIT(drive))) || 745 (FDCS->dor & 3) != UNIT(drive) || fdc != FDC(drive)) { 746 DPRINT("probing disk change on unselected drive\n"); 747 DPRINT("drive=%d fdc=%d dor=%x\n", drive, FDC(drive), 748 (unsigned int)FDCS->dor); 749 } 750 751 debug_dcl(UDP->flags, 752 "checking disk change line for drive %d\n", drive); 753 debug_dcl(UDP->flags, "jiffies=%lu\n", jiffies); 754 debug_dcl(UDP->flags, "disk change line=%x\n", fd_inb(FD_DIR) & 0x80); 755 debug_dcl(UDP->flags, "flags=%lx\n", UDRS->flags); 756 757 if (UDP->flags & FD_BROKEN_DCL) 758 return test_bit(FD_DISK_CHANGED_BIT, &UDRS->flags); 759 if ((fd_inb(FD_DIR) ^ UDP->flags) & 0x80) { 760 set_bit(FD_VERIFY_BIT, &UDRS->flags); 761 /* verify write protection */ 762 763 if (UDRS->maxblock) /* mark it changed */ 764 set_bit(FD_DISK_CHANGED_BIT, &UDRS->flags); 765 766 /* invalidate its geometry */ 767 if (UDRS->keep_data >= 0) { 768 if ((UDP->flags & FTD_MSG) && 769 current_type[drive] != NULL) 770 DPRINT("Disk type is undefined after disk change\n"); 771 current_type[drive] = NULL; 772 floppy_sizes[TOMINOR(drive)] = MAX_DISK_SIZE << 1; 773 } 774 775 return 1; 776 } else { 777 UDRS->last_checked = jiffies; 778 clear_bit(FD_DISK_NEWCHANGE_BIT, &UDRS->flags); 779 } 780 return 0; 781 } 782 783 static inline int is_selected(int dor, int unit) 784 { 785 return ((dor & (0x10 << unit)) && (dor & 3) == unit); 786 } 787 788 static bool is_ready_state(int status) 789 { 790 int state = status & (STATUS_READY | STATUS_DIR | STATUS_DMA); 791 return state == STATUS_READY; 792 } 793 794 static int set_dor(int fdc, char mask, char data) 795 { 796 unsigned char unit; 797 unsigned char drive; 798 unsigned char newdor; 799 unsigned char olddor; 800 801 if (FDCS->address == -1) 802 return -1; 803 804 olddor = FDCS->dor; 805 newdor = (olddor & mask) | data; 806 if (newdor != olddor) { 807 unit = olddor & 0x3; 808 if (is_selected(olddor, unit) && !is_selected(newdor, unit)) { 809 drive = REVDRIVE(fdc, unit); 810 debug_dcl(UDP->flags, 811 "calling disk change from set_dor\n"); 812 disk_change(drive); 813 } 814 FDCS->dor = newdor; 815 fd_outb(newdor, FD_DOR); 816 817 unit = newdor & 0x3; 818 if (!is_selected(olddor, unit) && is_selected(newdor, unit)) { 819 drive = REVDRIVE(fdc, unit); 820 UDRS->select_date = jiffies; 821 } 822 } 823 return olddor; 824 } 825 826 static void twaddle(void) 827 { 828 if (DP->select_delay) 829 return; 830 fd_outb(FDCS->dor & ~(0x10 << UNIT(current_drive)), FD_DOR); 831 fd_outb(FDCS->dor, FD_DOR); 832 DRS->select_date = jiffies; 833 } 834 835 /* 836 * Reset all driver information about the current fdc. 837 * This is needed after a reset, and after a raw command. 838 */ 839 static void reset_fdc_info(int mode) 840 { 841 int drive; 842 843 FDCS->spec1 = FDCS->spec2 = -1; 844 FDCS->need_configure = 1; 845 FDCS->perp_mode = 1; 846 FDCS->rawcmd = 0; 847 for (drive = 0; drive < N_DRIVE; drive++) 848 if (FDC(drive) == fdc && (mode || UDRS->track != NEED_1_RECAL)) 849 UDRS->track = NEED_2_RECAL; 850 } 851 852 /* selects the fdc and drive, and enables the fdc's input/dma. */ 853 static void set_fdc(int drive) 854 { 855 if (drive >= 0 && drive < N_DRIVE) { 856 fdc = FDC(drive); 857 current_drive = drive; 858 } 859 if (fdc != 1 && fdc != 0) { 860 pr_info("bad fdc value\n"); 861 return; 862 } 863 set_dor(fdc, ~0, 8); 864 #if N_FDC > 1 865 set_dor(1 - fdc, ~8, 0); 866 #endif 867 if (FDCS->rawcmd == 2) 868 reset_fdc_info(1); 869 if (fd_inb(FD_STATUS) != STATUS_READY) 870 FDCS->reset = 1; 871 } 872 873 /* locks the driver */ 874 static int lock_fdc(int drive) 875 { 876 if (WARN(atomic_read(&usage_count) == 0, 877 "Trying to lock fdc while usage count=0\n")) 878 return -1; 879 880 if (wait_event_interruptible(fdc_wait, !test_and_set_bit(0, &fdc_busy))) 881 return -EINTR; 882 883 command_status = FD_COMMAND_NONE; 884 885 reschedule_timeout(drive, "lock fdc"); 886 set_fdc(drive); 887 return 0; 888 } 889 890 /* unlocks the driver */ 891 static void unlock_fdc(void) 892 { 893 if (!test_bit(0, &fdc_busy)) 894 DPRINT("FDC access conflict!\n"); 895 896 raw_cmd = NULL; 897 command_status = FD_COMMAND_NONE; 898 cancel_delayed_work(&fd_timeout); 899 do_floppy = NULL; 900 cont = NULL; 901 clear_bit(0, &fdc_busy); 902 wake_up(&fdc_wait); 903 } 904 905 /* switches the motor off after a given timeout */ 906 static void motor_off_callback(struct timer_list *t) 907 { 908 unsigned long nr = t - motor_off_timer; 909 unsigned char mask = ~(0x10 << UNIT(nr)); 910 911 if (WARN_ON_ONCE(nr >= N_DRIVE)) 912 return; 913 914 set_dor(FDC(nr), mask, 0); 915 } 916 917 /* schedules motor off */ 918 static void floppy_off(unsigned int drive) 919 { 920 unsigned long volatile delta; 921 int fdc = FDC(drive); 922 923 if (!(FDCS->dor & (0x10 << UNIT(drive)))) 924 return; 925 926 del_timer(motor_off_timer + drive); 927 928 /* make spindle stop in a position which minimizes spinup time 929 * next time */ 930 if (UDP->rps) { 931 delta = jiffies - UDRS->first_read_date + HZ - 932 UDP->spindown_offset; 933 delta = ((delta * UDP->rps) % HZ) / UDP->rps; 934 motor_off_timer[drive].expires = 935 jiffies + UDP->spindown - delta; 936 } 937 add_timer(motor_off_timer + drive); 938 } 939 940 /* 941 * cycle through all N_DRIVE floppy drives, for disk change testing. 942 * stopping at current drive. This is done before any long operation, to 943 * be sure to have up to date disk change information. 944 */ 945 static void scandrives(void) 946 { 947 int i; 948 int drive; 949 int saved_drive; 950 951 if (DP->select_delay) 952 return; 953 954 saved_drive = current_drive; 955 for (i = 0; i < N_DRIVE; i++) { 956 drive = (saved_drive + i + 1) % N_DRIVE; 957 if (UDRS->fd_ref == 0 || UDP->select_delay != 0) 958 continue; /* skip closed drives */ 959 set_fdc(drive); 960 if (!(set_dor(fdc, ~3, UNIT(drive) | (0x10 << UNIT(drive))) & 961 (0x10 << UNIT(drive)))) 962 /* switch the motor off again, if it was off to 963 * begin with */ 964 set_dor(fdc, ~(0x10 << UNIT(drive)), 0); 965 } 966 set_fdc(saved_drive); 967 } 968 969 static void empty(void) 970 { 971 } 972 973 static void (*floppy_work_fn)(void); 974 975 static void floppy_work_workfn(struct work_struct *work) 976 { 977 floppy_work_fn(); 978 } 979 980 static DECLARE_WORK(floppy_work, floppy_work_workfn); 981 982 static void schedule_bh(void (*handler)(void)) 983 { 984 WARN_ON(work_pending(&floppy_work)); 985 986 floppy_work_fn = handler; 987 queue_work(floppy_wq, &floppy_work); 988 } 989 990 static void (*fd_timer_fn)(void) = NULL; 991 992 static void fd_timer_workfn(struct work_struct *work) 993 { 994 fd_timer_fn(); 995 } 996 997 static DECLARE_DELAYED_WORK(fd_timer, fd_timer_workfn); 998 999 static void cancel_activity(void) 1000 { 1001 do_floppy = NULL; 1002 cancel_delayed_work_sync(&fd_timer); 1003 cancel_work_sync(&floppy_work); 1004 } 1005 1006 /* this function makes sure that the disk stays in the drive during the 1007 * transfer */ 1008 static void fd_watchdog(void) 1009 { 1010 debug_dcl(DP->flags, "calling disk change from watchdog\n"); 1011 1012 if (disk_change(current_drive)) { 1013 DPRINT("disk removed during i/o\n"); 1014 cancel_activity(); 1015 cont->done(0); 1016 reset_fdc(); 1017 } else { 1018 cancel_delayed_work(&fd_timer); 1019 fd_timer_fn = fd_watchdog; 1020 queue_delayed_work(floppy_wq, &fd_timer, HZ / 10); 1021 } 1022 } 1023 1024 static void main_command_interrupt(void) 1025 { 1026 cancel_delayed_work(&fd_timer); 1027 cont->interrupt(); 1028 } 1029 1030 /* waits for a delay (spinup or select) to pass */ 1031 static int fd_wait_for_completion(unsigned long expires, 1032 void (*function)(void)) 1033 { 1034 if (FDCS->reset) { 1035 reset_fdc(); /* do the reset during sleep to win time 1036 * if we don't need to sleep, it's a good 1037 * occasion anyways */ 1038 return 1; 1039 } 1040 1041 if (time_before(jiffies, expires)) { 1042 cancel_delayed_work(&fd_timer); 1043 fd_timer_fn = function; 1044 queue_delayed_work(floppy_wq, &fd_timer, expires - jiffies); 1045 return 1; 1046 } 1047 return 0; 1048 } 1049 1050 static void setup_DMA(void) 1051 { 1052 unsigned long f; 1053 1054 if (raw_cmd->length == 0) { 1055 int i; 1056 1057 pr_info("zero dma transfer size:"); 1058 for (i = 0; i < raw_cmd->cmd_count; i++) 1059 pr_cont("%x,", raw_cmd->cmd[i]); 1060 pr_cont("\n"); 1061 cont->done(0); 1062 FDCS->reset = 1; 1063 return; 1064 } 1065 if (((unsigned long)raw_cmd->kernel_data) % 512) { 1066 pr_info("non aligned address: %p\n", raw_cmd->kernel_data); 1067 cont->done(0); 1068 FDCS->reset = 1; 1069 return; 1070 } 1071 f = claim_dma_lock(); 1072 fd_disable_dma(); 1073 #ifdef fd_dma_setup 1074 if (fd_dma_setup(raw_cmd->kernel_data, raw_cmd->length, 1075 (raw_cmd->flags & FD_RAW_READ) ? 1076 DMA_MODE_READ : DMA_MODE_WRITE, FDCS->address) < 0) { 1077 release_dma_lock(f); 1078 cont->done(0); 1079 FDCS->reset = 1; 1080 return; 1081 } 1082 release_dma_lock(f); 1083 #else 1084 fd_clear_dma_ff(); 1085 fd_cacheflush(raw_cmd->kernel_data, raw_cmd->length); 1086 fd_set_dma_mode((raw_cmd->flags & FD_RAW_READ) ? 1087 DMA_MODE_READ : DMA_MODE_WRITE); 1088 fd_set_dma_addr(raw_cmd->kernel_data); 1089 fd_set_dma_count(raw_cmd->length); 1090 virtual_dma_port = FDCS->address; 1091 fd_enable_dma(); 1092 release_dma_lock(f); 1093 #endif 1094 } 1095 1096 static void show_floppy(void); 1097 1098 /* waits until the fdc becomes ready */ 1099 static int wait_til_ready(void) 1100 { 1101 int status; 1102 int counter; 1103 1104 if (FDCS->reset) 1105 return -1; 1106 for (counter = 0; counter < 10000; counter++) { 1107 status = fd_inb(FD_STATUS); 1108 if (status & STATUS_READY) 1109 return status; 1110 } 1111 if (initialized) { 1112 DPRINT("Getstatus times out (%x) on fdc %d\n", status, fdc); 1113 show_floppy(); 1114 } 1115 FDCS->reset = 1; 1116 return -1; 1117 } 1118 1119 /* sends a command byte to the fdc */ 1120 static int output_byte(char byte) 1121 { 1122 int status = wait_til_ready(); 1123 1124 if (status < 0) 1125 return -1; 1126 1127 if (is_ready_state(status)) { 1128 fd_outb(byte, FD_DATA); 1129 output_log[output_log_pos].data = byte; 1130 output_log[output_log_pos].status = status; 1131 output_log[output_log_pos].jiffies = jiffies; 1132 output_log_pos = (output_log_pos + 1) % OLOGSIZE; 1133 return 0; 1134 } 1135 FDCS->reset = 1; 1136 if (initialized) { 1137 DPRINT("Unable to send byte %x to FDC. Fdc=%x Status=%x\n", 1138 byte, fdc, status); 1139 show_floppy(); 1140 } 1141 return -1; 1142 } 1143 1144 /* gets the response from the fdc */ 1145 static int result(void) 1146 { 1147 int i; 1148 int status = 0; 1149 1150 for (i = 0; i < MAX_REPLIES; i++) { 1151 status = wait_til_ready(); 1152 if (status < 0) 1153 break; 1154 status &= STATUS_DIR | STATUS_READY | STATUS_BUSY | STATUS_DMA; 1155 if ((status & ~STATUS_BUSY) == STATUS_READY) { 1156 resultjiffies = jiffies; 1157 resultsize = i; 1158 return i; 1159 } 1160 if (status == (STATUS_DIR | STATUS_READY | STATUS_BUSY)) 1161 reply_buffer[i] = fd_inb(FD_DATA); 1162 else 1163 break; 1164 } 1165 if (initialized) { 1166 DPRINT("get result error. Fdc=%d Last status=%x Read bytes=%d\n", 1167 fdc, status, i); 1168 show_floppy(); 1169 } 1170 FDCS->reset = 1; 1171 return -1; 1172 } 1173 1174 #define MORE_OUTPUT -2 1175 /* does the fdc need more output? */ 1176 static int need_more_output(void) 1177 { 1178 int status = wait_til_ready(); 1179 1180 if (status < 0) 1181 return -1; 1182 1183 if (is_ready_state(status)) 1184 return MORE_OUTPUT; 1185 1186 return result(); 1187 } 1188 1189 /* Set perpendicular mode as required, based on data rate, if supported. 1190 * 82077 Now tested. 1Mbps data rate only possible with 82077-1. 1191 */ 1192 static void perpendicular_mode(void) 1193 { 1194 unsigned char perp_mode; 1195 1196 if (raw_cmd->rate & 0x40) { 1197 switch (raw_cmd->rate & 3) { 1198 case 0: 1199 perp_mode = 2; 1200 break; 1201 case 3: 1202 perp_mode = 3; 1203 break; 1204 default: 1205 DPRINT("Invalid data rate for perpendicular mode!\n"); 1206 cont->done(0); 1207 FDCS->reset = 1; 1208 /* 1209 * convenient way to return to 1210 * redo without too much hassle 1211 * (deep stack et al.) 1212 */ 1213 return; 1214 } 1215 } else 1216 perp_mode = 0; 1217 1218 if (FDCS->perp_mode == perp_mode) 1219 return; 1220 if (FDCS->version >= FDC_82077_ORIG) { 1221 output_byte(FD_PERPENDICULAR); 1222 output_byte(perp_mode); 1223 FDCS->perp_mode = perp_mode; 1224 } else if (perp_mode) { 1225 DPRINT("perpendicular mode not supported by this FDC.\n"); 1226 } 1227 } /* perpendicular_mode */ 1228 1229 static int fifo_depth = 0xa; 1230 static int no_fifo; 1231 1232 static int fdc_configure(void) 1233 { 1234 /* Turn on FIFO */ 1235 output_byte(FD_CONFIGURE); 1236 if (need_more_output() != MORE_OUTPUT) 1237 return 0; 1238 output_byte(0); 1239 output_byte(0x10 | (no_fifo & 0x20) | (fifo_depth & 0xf)); 1240 output_byte(0); /* pre-compensation from track 1241 0 upwards */ 1242 return 1; 1243 } 1244 1245 #define NOMINAL_DTR 500 1246 1247 /* Issue a "SPECIFY" command to set the step rate time, head unload time, 1248 * head load time, and DMA disable flag to values needed by floppy. 1249 * 1250 * The value "dtr" is the data transfer rate in Kbps. It is needed 1251 * to account for the data rate-based scaling done by the 82072 and 82077 1252 * FDC types. This parameter is ignored for other types of FDCs (i.e. 1253 * 8272a). 1254 * 1255 * Note that changing the data transfer rate has a (probably deleterious) 1256 * effect on the parameters subject to scaling for 82072/82077 FDCs, so 1257 * fdc_specify is called again after each data transfer rate 1258 * change. 1259 * 1260 * srt: 1000 to 16000 in microseconds 1261 * hut: 16 to 240 milliseconds 1262 * hlt: 2 to 254 milliseconds 1263 * 1264 * These values are rounded up to the next highest available delay time. 1265 */ 1266 static void fdc_specify(void) 1267 { 1268 unsigned char spec1; 1269 unsigned char spec2; 1270 unsigned long srt; 1271 unsigned long hlt; 1272 unsigned long hut; 1273 unsigned long dtr = NOMINAL_DTR; 1274 unsigned long scale_dtr = NOMINAL_DTR; 1275 int hlt_max_code = 0x7f; 1276 int hut_max_code = 0xf; 1277 1278 if (FDCS->need_configure && FDCS->version >= FDC_82072A) { 1279 fdc_configure(); 1280 FDCS->need_configure = 0; 1281 } 1282 1283 switch (raw_cmd->rate & 0x03) { 1284 case 3: 1285 dtr = 1000; 1286 break; 1287 case 1: 1288 dtr = 300; 1289 if (FDCS->version >= FDC_82078) { 1290 /* chose the default rate table, not the one 1291 * where 1 = 2 Mbps */ 1292 output_byte(FD_DRIVESPEC); 1293 if (need_more_output() == MORE_OUTPUT) { 1294 output_byte(UNIT(current_drive)); 1295 output_byte(0xc0); 1296 } 1297 } 1298 break; 1299 case 2: 1300 dtr = 250; 1301 break; 1302 } 1303 1304 if (FDCS->version >= FDC_82072) { 1305 scale_dtr = dtr; 1306 hlt_max_code = 0x00; /* 0==256msec*dtr0/dtr (not linear!) */ 1307 hut_max_code = 0x0; /* 0==256msec*dtr0/dtr (not linear!) */ 1308 } 1309 1310 /* Convert step rate from microseconds to milliseconds and 4 bits */ 1311 srt = 16 - DIV_ROUND_UP(DP->srt * scale_dtr / 1000, NOMINAL_DTR); 1312 if (slow_floppy) 1313 srt = srt / 4; 1314 1315 SUPBOUND(srt, 0xf); 1316 INFBOUND(srt, 0); 1317 1318 hlt = DIV_ROUND_UP(DP->hlt * scale_dtr / 2, NOMINAL_DTR); 1319 if (hlt < 0x01) 1320 hlt = 0x01; 1321 else if (hlt > 0x7f) 1322 hlt = hlt_max_code; 1323 1324 hut = DIV_ROUND_UP(DP->hut * scale_dtr / 16, NOMINAL_DTR); 1325 if (hut < 0x1) 1326 hut = 0x1; 1327 else if (hut > 0xf) 1328 hut = hut_max_code; 1329 1330 spec1 = (srt << 4) | hut; 1331 spec2 = (hlt << 1) | (use_virtual_dma & 1); 1332 1333 /* If these parameters did not change, just return with success */ 1334 if (FDCS->spec1 != spec1 || FDCS->spec2 != spec2) { 1335 /* Go ahead and set spec1 and spec2 */ 1336 output_byte(FD_SPECIFY); 1337 output_byte(FDCS->spec1 = spec1); 1338 output_byte(FDCS->spec2 = spec2); 1339 } 1340 } /* fdc_specify */ 1341 1342 /* Set the FDC's data transfer rate on behalf of the specified drive. 1343 * NOTE: with 82072/82077 FDCs, changing the data rate requires a reissue 1344 * of the specify command (i.e. using the fdc_specify function). 1345 */ 1346 static int fdc_dtr(void) 1347 { 1348 /* If data rate not already set to desired value, set it. */ 1349 if ((raw_cmd->rate & 3) == FDCS->dtr) 1350 return 0; 1351 1352 /* Set dtr */ 1353 fd_outb(raw_cmd->rate & 3, FD_DCR); 1354 1355 /* TODO: some FDC/drive combinations (C&T 82C711 with TEAC 1.2MB) 1356 * need a stabilization period of several milliseconds to be 1357 * enforced after data rate changes before R/W operations. 1358 * Pause 5 msec to avoid trouble. (Needs to be 2 jiffies) 1359 */ 1360 FDCS->dtr = raw_cmd->rate & 3; 1361 return fd_wait_for_completion(jiffies + 2UL * HZ / 100, floppy_ready); 1362 } /* fdc_dtr */ 1363 1364 static void tell_sector(void) 1365 { 1366 pr_cont(": track %d, head %d, sector %d, size %d", 1367 R_TRACK, R_HEAD, R_SECTOR, R_SIZECODE); 1368 } /* tell_sector */ 1369 1370 static void print_errors(void) 1371 { 1372 DPRINT(""); 1373 if (ST0 & ST0_ECE) { 1374 pr_cont("Recalibrate failed!"); 1375 } else if (ST2 & ST2_CRC) { 1376 pr_cont("data CRC error"); 1377 tell_sector(); 1378 } else if (ST1 & ST1_CRC) { 1379 pr_cont("CRC error"); 1380 tell_sector(); 1381 } else if ((ST1 & (ST1_MAM | ST1_ND)) || 1382 (ST2 & ST2_MAM)) { 1383 if (!probing) { 1384 pr_cont("sector not found"); 1385 tell_sector(); 1386 } else 1387 pr_cont("probe failed..."); 1388 } else if (ST2 & ST2_WC) { /* seek error */ 1389 pr_cont("wrong cylinder"); 1390 } else if (ST2 & ST2_BC) { /* cylinder marked as bad */ 1391 pr_cont("bad cylinder"); 1392 } else { 1393 pr_cont("unknown error. ST[0..2] are: 0x%x 0x%x 0x%x", 1394 ST0, ST1, ST2); 1395 tell_sector(); 1396 } 1397 pr_cont("\n"); 1398 } 1399 1400 /* 1401 * OK, this error interpreting routine is called after a 1402 * DMA read/write has succeeded 1403 * or failed, so we check the results, and copy any buffers. 1404 * hhb: Added better error reporting. 1405 * ak: Made this into a separate routine. 1406 */ 1407 static int interpret_errors(void) 1408 { 1409 char bad; 1410 1411 if (inr != 7) { 1412 DPRINT("-- FDC reply error\n"); 1413 FDCS->reset = 1; 1414 return 1; 1415 } 1416 1417 /* check IC to find cause of interrupt */ 1418 switch (ST0 & ST0_INTR) { 1419 case 0x40: /* error occurred during command execution */ 1420 if (ST1 & ST1_EOC) 1421 return 0; /* occurs with pseudo-DMA */ 1422 bad = 1; 1423 if (ST1 & ST1_WP) { 1424 DPRINT("Drive is write protected\n"); 1425 clear_bit(FD_DISK_WRITABLE_BIT, &DRS->flags); 1426 cont->done(0); 1427 bad = 2; 1428 } else if (ST1 & ST1_ND) { 1429 set_bit(FD_NEED_TWADDLE_BIT, &DRS->flags); 1430 } else if (ST1 & ST1_OR) { 1431 if (DP->flags & FTD_MSG) 1432 DPRINT("Over/Underrun - retrying\n"); 1433 bad = 0; 1434 } else if (*errors >= DP->max_errors.reporting) { 1435 print_errors(); 1436 } 1437 if (ST2 & ST2_WC || ST2 & ST2_BC) 1438 /* wrong cylinder => recal */ 1439 DRS->track = NEED_2_RECAL; 1440 return bad; 1441 case 0x80: /* invalid command given */ 1442 DPRINT("Invalid FDC command given!\n"); 1443 cont->done(0); 1444 return 2; 1445 case 0xc0: 1446 DPRINT("Abnormal termination caused by polling\n"); 1447 cont->error(); 1448 return 2; 1449 default: /* (0) Normal command termination */ 1450 return 0; 1451 } 1452 } 1453 1454 /* 1455 * This routine is called when everything should be correctly set up 1456 * for the transfer (i.e. floppy motor is on, the correct floppy is 1457 * selected, and the head is sitting on the right track). 1458 */ 1459 static void setup_rw_floppy(void) 1460 { 1461 int i; 1462 int r; 1463 int flags; 1464 unsigned long ready_date; 1465 void (*function)(void); 1466 1467 flags = raw_cmd->flags; 1468 if (flags & (FD_RAW_READ | FD_RAW_WRITE)) 1469 flags |= FD_RAW_INTR; 1470 1471 if ((flags & FD_RAW_SPIN) && !(flags & FD_RAW_NO_MOTOR)) { 1472 ready_date = DRS->spinup_date + DP->spinup; 1473 /* If spinup will take a long time, rerun scandrives 1474 * again just before spinup completion. Beware that 1475 * after scandrives, we must again wait for selection. 1476 */ 1477 if (time_after(ready_date, jiffies + DP->select_delay)) { 1478 ready_date -= DP->select_delay; 1479 function = floppy_start; 1480 } else 1481 function = setup_rw_floppy; 1482 1483 /* wait until the floppy is spinning fast enough */ 1484 if (fd_wait_for_completion(ready_date, function)) 1485 return; 1486 } 1487 if ((flags & FD_RAW_READ) || (flags & FD_RAW_WRITE)) 1488 setup_DMA(); 1489 1490 if (flags & FD_RAW_INTR) 1491 do_floppy = main_command_interrupt; 1492 1493 r = 0; 1494 for (i = 0; i < raw_cmd->cmd_count; i++) 1495 r |= output_byte(raw_cmd->cmd[i]); 1496 1497 debugt(__func__, "rw_command"); 1498 1499 if (r) { 1500 cont->error(); 1501 reset_fdc(); 1502 return; 1503 } 1504 1505 if (!(flags & FD_RAW_INTR)) { 1506 inr = result(); 1507 cont->interrupt(); 1508 } else if (flags & FD_RAW_NEED_DISK) 1509 fd_watchdog(); 1510 } 1511 1512 static int blind_seek; 1513 1514 /* 1515 * This is the routine called after every seek (or recalibrate) interrupt 1516 * from the floppy controller. 1517 */ 1518 static void seek_interrupt(void) 1519 { 1520 debugt(__func__, ""); 1521 if (inr != 2 || (ST0 & 0xF8) != 0x20) { 1522 DPRINT("seek failed\n"); 1523 DRS->track = NEED_2_RECAL; 1524 cont->error(); 1525 cont->redo(); 1526 return; 1527 } 1528 if (DRS->track >= 0 && DRS->track != ST1 && !blind_seek) { 1529 debug_dcl(DP->flags, 1530 "clearing NEWCHANGE flag because of effective seek\n"); 1531 debug_dcl(DP->flags, "jiffies=%lu\n", jiffies); 1532 clear_bit(FD_DISK_NEWCHANGE_BIT, &DRS->flags); 1533 /* effective seek */ 1534 DRS->select_date = jiffies; 1535 } 1536 DRS->track = ST1; 1537 floppy_ready(); 1538 } 1539 1540 static void check_wp(void) 1541 { 1542 if (test_bit(FD_VERIFY_BIT, &DRS->flags)) { 1543 /* check write protection */ 1544 output_byte(FD_GETSTATUS); 1545 output_byte(UNIT(current_drive)); 1546 if (result() != 1) { 1547 FDCS->reset = 1; 1548 return; 1549 } 1550 clear_bit(FD_VERIFY_BIT, &DRS->flags); 1551 clear_bit(FD_NEED_TWADDLE_BIT, &DRS->flags); 1552 debug_dcl(DP->flags, 1553 "checking whether disk is write protected\n"); 1554 debug_dcl(DP->flags, "wp=%x\n", ST3 & 0x40); 1555 if (!(ST3 & 0x40)) 1556 set_bit(FD_DISK_WRITABLE_BIT, &DRS->flags); 1557 else 1558 clear_bit(FD_DISK_WRITABLE_BIT, &DRS->flags); 1559 } 1560 } 1561 1562 static void seek_floppy(void) 1563 { 1564 int track; 1565 1566 blind_seek = 0; 1567 1568 debug_dcl(DP->flags, "calling disk change from %s\n", __func__); 1569 1570 if (!test_bit(FD_DISK_NEWCHANGE_BIT, &DRS->flags) && 1571 disk_change(current_drive) && (raw_cmd->flags & FD_RAW_NEED_DISK)) { 1572 /* the media changed flag should be cleared after the seek. 1573 * If it isn't, this means that there is really no disk in 1574 * the drive. 1575 */ 1576 set_bit(FD_DISK_CHANGED_BIT, &DRS->flags); 1577 cont->done(0); 1578 cont->redo(); 1579 return; 1580 } 1581 if (DRS->track <= NEED_1_RECAL) { 1582 recalibrate_floppy(); 1583 return; 1584 } else if (test_bit(FD_DISK_NEWCHANGE_BIT, &DRS->flags) && 1585 (raw_cmd->flags & FD_RAW_NEED_DISK) && 1586 (DRS->track <= NO_TRACK || DRS->track == raw_cmd->track)) { 1587 /* we seek to clear the media-changed condition. Does anybody 1588 * know a more elegant way, which works on all drives? */ 1589 if (raw_cmd->track) 1590 track = raw_cmd->track - 1; 1591 else { 1592 if (DP->flags & FD_SILENT_DCL_CLEAR) { 1593 set_dor(fdc, ~(0x10 << UNIT(current_drive)), 0); 1594 blind_seek = 1; 1595 raw_cmd->flags |= FD_RAW_NEED_SEEK; 1596 } 1597 track = 1; 1598 } 1599 } else { 1600 check_wp(); 1601 if (raw_cmd->track != DRS->track && 1602 (raw_cmd->flags & FD_RAW_NEED_SEEK)) 1603 track = raw_cmd->track; 1604 else { 1605 setup_rw_floppy(); 1606 return; 1607 } 1608 } 1609 1610 do_floppy = seek_interrupt; 1611 output_byte(FD_SEEK); 1612 output_byte(UNIT(current_drive)); 1613 if (output_byte(track) < 0) { 1614 reset_fdc(); 1615 return; 1616 } 1617 debugt(__func__, ""); 1618 } 1619 1620 static void recal_interrupt(void) 1621 { 1622 debugt(__func__, ""); 1623 if (inr != 2) 1624 FDCS->reset = 1; 1625 else if (ST0 & ST0_ECE) { 1626 switch (DRS->track) { 1627 case NEED_1_RECAL: 1628 debugt(__func__, "need 1 recal"); 1629 /* after a second recalibrate, we still haven't 1630 * reached track 0. Probably no drive. Raise an 1631 * error, as failing immediately might upset 1632 * computers possessed by the Devil :-) */ 1633 cont->error(); 1634 cont->redo(); 1635 return; 1636 case NEED_2_RECAL: 1637 debugt(__func__, "need 2 recal"); 1638 /* If we already did a recalibrate, 1639 * and we are not at track 0, this 1640 * means we have moved. (The only way 1641 * not to move at recalibration is to 1642 * be already at track 0.) Clear the 1643 * new change flag */ 1644 debug_dcl(DP->flags, 1645 "clearing NEWCHANGE flag because of second recalibrate\n"); 1646 1647 clear_bit(FD_DISK_NEWCHANGE_BIT, &DRS->flags); 1648 DRS->select_date = jiffies; 1649 /* fall through */ 1650 default: 1651 debugt(__func__, "default"); 1652 /* Recalibrate moves the head by at 1653 * most 80 steps. If after one 1654 * recalibrate we don't have reached 1655 * track 0, this might mean that we 1656 * started beyond track 80. Try 1657 * again. */ 1658 DRS->track = NEED_1_RECAL; 1659 break; 1660 } 1661 } else 1662 DRS->track = ST1; 1663 floppy_ready(); 1664 } 1665 1666 static void print_result(char *message, int inr) 1667 { 1668 int i; 1669 1670 DPRINT("%s ", message); 1671 if (inr >= 0) 1672 for (i = 0; i < inr; i++) 1673 pr_cont("repl[%d]=%x ", i, reply_buffer[i]); 1674 pr_cont("\n"); 1675 } 1676 1677 /* interrupt handler. Note that this can be called externally on the Sparc */ 1678 irqreturn_t floppy_interrupt(int irq, void *dev_id) 1679 { 1680 int do_print; 1681 unsigned long f; 1682 void (*handler)(void) = do_floppy; 1683 1684 lasthandler = handler; 1685 interruptjiffies = jiffies; 1686 1687 f = claim_dma_lock(); 1688 fd_disable_dma(); 1689 release_dma_lock(f); 1690 1691 do_floppy = NULL; 1692 if (fdc >= N_FDC || FDCS->address == -1) { 1693 /* we don't even know which FDC is the culprit */ 1694 pr_info("DOR0=%x\n", fdc_state[0].dor); 1695 pr_info("floppy interrupt on bizarre fdc %d\n", fdc); 1696 pr_info("handler=%pf\n", handler); 1697 is_alive(__func__, "bizarre fdc"); 1698 return IRQ_NONE; 1699 } 1700 1701 FDCS->reset = 0; 1702 /* We have to clear the reset flag here, because apparently on boxes 1703 * with level triggered interrupts (PS/2, Sparc, ...), it is needed to 1704 * emit SENSEI's to clear the interrupt line. And FDCS->reset blocks the 1705 * emission of the SENSEI's. 1706 * It is OK to emit floppy commands because we are in an interrupt 1707 * handler here, and thus we have to fear no interference of other 1708 * activity. 1709 */ 1710 1711 do_print = !handler && print_unex && initialized; 1712 1713 inr = result(); 1714 if (do_print) 1715 print_result("unexpected interrupt", inr); 1716 if (inr == 0) { 1717 int max_sensei = 4; 1718 do { 1719 output_byte(FD_SENSEI); 1720 inr = result(); 1721 if (do_print) 1722 print_result("sensei", inr); 1723 max_sensei--; 1724 } while ((ST0 & 0x83) != UNIT(current_drive) && 1725 inr == 2 && max_sensei); 1726 } 1727 if (!handler) { 1728 FDCS->reset = 1; 1729 return IRQ_NONE; 1730 } 1731 schedule_bh(handler); 1732 is_alive(__func__, "normal interrupt end"); 1733 1734 /* FIXME! Was it really for us? */ 1735 return IRQ_HANDLED; 1736 } 1737 1738 static void recalibrate_floppy(void) 1739 { 1740 debugt(__func__, ""); 1741 do_floppy = recal_interrupt; 1742 output_byte(FD_RECALIBRATE); 1743 if (output_byte(UNIT(current_drive)) < 0) 1744 reset_fdc(); 1745 } 1746 1747 /* 1748 * Must do 4 FD_SENSEIs after reset because of ``drive polling''. 1749 */ 1750 static void reset_interrupt(void) 1751 { 1752 debugt(__func__, ""); 1753 result(); /* get the status ready for set_fdc */ 1754 if (FDCS->reset) { 1755 pr_info("reset set in interrupt, calling %pf\n", cont->error); 1756 cont->error(); /* a reset just after a reset. BAD! */ 1757 } 1758 cont->redo(); 1759 } 1760 1761 /* 1762 * reset is done by pulling bit 2 of DOR low for a while (old FDCs), 1763 * or by setting the self clearing bit 7 of STATUS (newer FDCs) 1764 */ 1765 static void reset_fdc(void) 1766 { 1767 unsigned long flags; 1768 1769 do_floppy = reset_interrupt; 1770 FDCS->reset = 0; 1771 reset_fdc_info(0); 1772 1773 /* Pseudo-DMA may intercept 'reset finished' interrupt. */ 1774 /* Irrelevant for systems with true DMA (i386). */ 1775 1776 flags = claim_dma_lock(); 1777 fd_disable_dma(); 1778 release_dma_lock(flags); 1779 1780 if (FDCS->version >= FDC_82072A) 1781 fd_outb(0x80 | (FDCS->dtr & 3), FD_STATUS); 1782 else { 1783 fd_outb(FDCS->dor & ~0x04, FD_DOR); 1784 udelay(FD_RESET_DELAY); 1785 fd_outb(FDCS->dor, FD_DOR); 1786 } 1787 } 1788 1789 static void show_floppy(void) 1790 { 1791 int i; 1792 1793 pr_info("\n"); 1794 pr_info("floppy driver state\n"); 1795 pr_info("-------------------\n"); 1796 pr_info("now=%lu last interrupt=%lu diff=%lu last called handler=%pf\n", 1797 jiffies, interruptjiffies, jiffies - interruptjiffies, 1798 lasthandler); 1799 1800 pr_info("timeout_message=%s\n", timeout_message); 1801 pr_info("last output bytes:\n"); 1802 for (i = 0; i < OLOGSIZE; i++) 1803 pr_info("%2x %2x %lu\n", 1804 output_log[(i + output_log_pos) % OLOGSIZE].data, 1805 output_log[(i + output_log_pos) % OLOGSIZE].status, 1806 output_log[(i + output_log_pos) % OLOGSIZE].jiffies); 1807 pr_info("last result at %lu\n", resultjiffies); 1808 pr_info("last redo_fd_request at %lu\n", lastredo); 1809 print_hex_dump(KERN_INFO, "", DUMP_PREFIX_NONE, 16, 1, 1810 reply_buffer, resultsize, true); 1811 1812 pr_info("status=%x\n", fd_inb(FD_STATUS)); 1813 pr_info("fdc_busy=%lu\n", fdc_busy); 1814 if (do_floppy) 1815 pr_info("do_floppy=%pf\n", do_floppy); 1816 if (work_pending(&floppy_work)) 1817 pr_info("floppy_work.func=%pf\n", floppy_work.func); 1818 if (delayed_work_pending(&fd_timer)) 1819 pr_info("delayed work.function=%p expires=%ld\n", 1820 fd_timer.work.func, 1821 fd_timer.timer.expires - jiffies); 1822 if (delayed_work_pending(&fd_timeout)) 1823 pr_info("timer_function=%p expires=%ld\n", 1824 fd_timeout.work.func, 1825 fd_timeout.timer.expires - jiffies); 1826 1827 pr_info("cont=%p\n", cont); 1828 pr_info("current_req=%p\n", current_req); 1829 pr_info("command_status=%d\n", command_status); 1830 pr_info("\n"); 1831 } 1832 1833 static void floppy_shutdown(struct work_struct *arg) 1834 { 1835 unsigned long flags; 1836 1837 if (initialized) 1838 show_floppy(); 1839 cancel_activity(); 1840 1841 flags = claim_dma_lock(); 1842 fd_disable_dma(); 1843 release_dma_lock(flags); 1844 1845 /* avoid dma going to a random drive after shutdown */ 1846 1847 if (initialized) 1848 DPRINT("floppy timeout called\n"); 1849 FDCS->reset = 1; 1850 if (cont) { 1851 cont->done(0); 1852 cont->redo(); /* this will recall reset when needed */ 1853 } else { 1854 pr_info("no cont in shutdown!\n"); 1855 process_fd_request(); 1856 } 1857 is_alive(__func__, ""); 1858 } 1859 1860 /* start motor, check media-changed condition and write protection */ 1861 static int start_motor(void (*function)(void)) 1862 { 1863 int mask; 1864 int data; 1865 1866 mask = 0xfc; 1867 data = UNIT(current_drive); 1868 if (!(raw_cmd->flags & FD_RAW_NO_MOTOR)) { 1869 if (!(FDCS->dor & (0x10 << UNIT(current_drive)))) { 1870 set_debugt(); 1871 /* no read since this drive is running */ 1872 DRS->first_read_date = 0; 1873 /* note motor start time if motor is not yet running */ 1874 DRS->spinup_date = jiffies; 1875 data |= (0x10 << UNIT(current_drive)); 1876 } 1877 } else if (FDCS->dor & (0x10 << UNIT(current_drive))) 1878 mask &= ~(0x10 << UNIT(current_drive)); 1879 1880 /* starts motor and selects floppy */ 1881 del_timer(motor_off_timer + current_drive); 1882 set_dor(fdc, mask, data); 1883 1884 /* wait_for_completion also schedules reset if needed. */ 1885 return fd_wait_for_completion(DRS->select_date + DP->select_delay, 1886 function); 1887 } 1888 1889 static void floppy_ready(void) 1890 { 1891 if (FDCS->reset) { 1892 reset_fdc(); 1893 return; 1894 } 1895 if (start_motor(floppy_ready)) 1896 return; 1897 if (fdc_dtr()) 1898 return; 1899 1900 debug_dcl(DP->flags, "calling disk change from floppy_ready\n"); 1901 if (!(raw_cmd->flags & FD_RAW_NO_MOTOR) && 1902 disk_change(current_drive) && !DP->select_delay) 1903 twaddle(); /* this clears the dcl on certain 1904 * drive/controller combinations */ 1905 1906 #ifdef fd_chose_dma_mode 1907 if ((raw_cmd->flags & FD_RAW_READ) || (raw_cmd->flags & FD_RAW_WRITE)) { 1908 unsigned long flags = claim_dma_lock(); 1909 fd_chose_dma_mode(raw_cmd->kernel_data, raw_cmd->length); 1910 release_dma_lock(flags); 1911 } 1912 #endif 1913 1914 if (raw_cmd->flags & (FD_RAW_NEED_SEEK | FD_RAW_NEED_DISK)) { 1915 perpendicular_mode(); 1916 fdc_specify(); /* must be done here because of hut, hlt ... */ 1917 seek_floppy(); 1918 } else { 1919 if ((raw_cmd->flags & FD_RAW_READ) || 1920 (raw_cmd->flags & FD_RAW_WRITE)) 1921 fdc_specify(); 1922 setup_rw_floppy(); 1923 } 1924 } 1925 1926 static void floppy_start(void) 1927 { 1928 reschedule_timeout(current_reqD, "floppy start"); 1929 1930 scandrives(); 1931 debug_dcl(DP->flags, "setting NEWCHANGE in floppy_start\n"); 1932 set_bit(FD_DISK_NEWCHANGE_BIT, &DRS->flags); 1933 floppy_ready(); 1934 } 1935 1936 /* 1937 * ======================================================================== 1938 * here ends the bottom half. Exported routines are: 1939 * floppy_start, floppy_off, floppy_ready, lock_fdc, unlock_fdc, set_fdc, 1940 * start_motor, reset_fdc, reset_fdc_info, interpret_errors. 1941 * Initialization also uses output_byte, result, set_dor, floppy_interrupt 1942 * and set_dor. 1943 * ======================================================================== 1944 */ 1945 /* 1946 * General purpose continuations. 1947 * ============================== 1948 */ 1949 1950 static void do_wakeup(void) 1951 { 1952 reschedule_timeout(MAXTIMEOUT, "do wakeup"); 1953 cont = NULL; 1954 command_status += 2; 1955 wake_up(&command_done); 1956 } 1957 1958 static const struct cont_t wakeup_cont = { 1959 .interrupt = empty, 1960 .redo = do_wakeup, 1961 .error = empty, 1962 .done = (done_f)empty 1963 }; 1964 1965 static const struct cont_t intr_cont = { 1966 .interrupt = empty, 1967 .redo = process_fd_request, 1968 .error = empty, 1969 .done = (done_f)empty 1970 }; 1971 1972 static int wait_til_done(void (*handler)(void), bool interruptible) 1973 { 1974 int ret; 1975 1976 schedule_bh(handler); 1977 1978 if (interruptible) 1979 wait_event_interruptible(command_done, command_status >= 2); 1980 else 1981 wait_event(command_done, command_status >= 2); 1982 1983 if (command_status < 2) { 1984 cancel_activity(); 1985 cont = &intr_cont; 1986 reset_fdc(); 1987 return -EINTR; 1988 } 1989 1990 if (FDCS->reset) 1991 command_status = FD_COMMAND_ERROR; 1992 if (command_status == FD_COMMAND_OKAY) 1993 ret = 0; 1994 else 1995 ret = -EIO; 1996 command_status = FD_COMMAND_NONE; 1997 return ret; 1998 } 1999 2000 static void generic_done(int result) 2001 { 2002 command_status = result; 2003 cont = &wakeup_cont; 2004 } 2005 2006 static void generic_success(void) 2007 { 2008 cont->done(1); 2009 } 2010 2011 static void generic_failure(void) 2012 { 2013 cont->done(0); 2014 } 2015 2016 static void success_and_wakeup(void) 2017 { 2018 generic_success(); 2019 cont->redo(); 2020 } 2021 2022 /* 2023 * formatting and rw support. 2024 * ========================== 2025 */ 2026 2027 static int next_valid_format(void) 2028 { 2029 int probed_format; 2030 2031 probed_format = DRS->probed_format; 2032 while (1) { 2033 if (probed_format >= 8 || !DP->autodetect[probed_format]) { 2034 DRS->probed_format = 0; 2035 return 1; 2036 } 2037 if (floppy_type[DP->autodetect[probed_format]].sect) { 2038 DRS->probed_format = probed_format; 2039 return 0; 2040 } 2041 probed_format++; 2042 } 2043 } 2044 2045 static void bad_flp_intr(void) 2046 { 2047 int err_count; 2048 2049 if (probing) { 2050 DRS->probed_format++; 2051 if (!next_valid_format()) 2052 return; 2053 } 2054 err_count = ++(*errors); 2055 INFBOUND(DRWE->badness, err_count); 2056 if (err_count > DP->max_errors.abort) 2057 cont->done(0); 2058 if (err_count > DP->max_errors.reset) 2059 FDCS->reset = 1; 2060 else if (err_count > DP->max_errors.recal) 2061 DRS->track = NEED_2_RECAL; 2062 } 2063 2064 static void set_floppy(int drive) 2065 { 2066 int type = ITYPE(UDRS->fd_device); 2067 2068 if (type) 2069 _floppy = floppy_type + type; 2070 else 2071 _floppy = current_type[drive]; 2072 } 2073 2074 /* 2075 * formatting support. 2076 * =================== 2077 */ 2078 static void format_interrupt(void) 2079 { 2080 switch (interpret_errors()) { 2081 case 1: 2082 cont->error(); 2083 case 2: 2084 break; 2085 case 0: 2086 cont->done(1); 2087 } 2088 cont->redo(); 2089 } 2090 2091 #define FM_MODE(x, y) ((y) & ~(((x)->rate & 0x80) >> 1)) 2092 #define CT(x) ((x) | 0xc0) 2093 2094 static void setup_format_params(int track) 2095 { 2096 int n; 2097 int il; 2098 int count; 2099 int head_shift; 2100 int track_shift; 2101 struct fparm { 2102 unsigned char track, head, sect, size; 2103 } *here = (struct fparm *)floppy_track_buffer; 2104 2105 raw_cmd = &default_raw_cmd; 2106 raw_cmd->track = track; 2107 2108 raw_cmd->flags = (FD_RAW_WRITE | FD_RAW_INTR | FD_RAW_SPIN | 2109 FD_RAW_NEED_DISK | FD_RAW_NEED_SEEK); 2110 raw_cmd->rate = _floppy->rate & 0x43; 2111 raw_cmd->cmd_count = NR_F; 2112 COMMAND = FM_MODE(_floppy, FD_FORMAT); 2113 DR_SELECT = UNIT(current_drive) + PH_HEAD(_floppy, format_req.head); 2114 F_SIZECODE = FD_SIZECODE(_floppy); 2115 F_SECT_PER_TRACK = _floppy->sect << 2 >> F_SIZECODE; 2116 F_GAP = _floppy->fmt_gap; 2117 F_FILL = FD_FILL_BYTE; 2118 2119 raw_cmd->kernel_data = floppy_track_buffer; 2120 raw_cmd->length = 4 * F_SECT_PER_TRACK; 2121 2122 /* allow for about 30ms for data transport per track */ 2123 head_shift = (F_SECT_PER_TRACK + 5) / 6; 2124 2125 /* a ``cylinder'' is two tracks plus a little stepping time */ 2126 track_shift = 2 * head_shift + 3; 2127 2128 /* position of logical sector 1 on this track */ 2129 n = (track_shift * format_req.track + head_shift * format_req.head) 2130 % F_SECT_PER_TRACK; 2131 2132 /* determine interleave */ 2133 il = 1; 2134 if (_floppy->fmt_gap < 0x22) 2135 il++; 2136 2137 /* initialize field */ 2138 for (count = 0; count < F_SECT_PER_TRACK; ++count) { 2139 here[count].track = format_req.track; 2140 here[count].head = format_req.head; 2141 here[count].sect = 0; 2142 here[count].size = F_SIZECODE; 2143 } 2144 /* place logical sectors */ 2145 for (count = 1; count <= F_SECT_PER_TRACK; ++count) { 2146 here[n].sect = count; 2147 n = (n + il) % F_SECT_PER_TRACK; 2148 if (here[n].sect) { /* sector busy, find next free sector */ 2149 ++n; 2150 if (n >= F_SECT_PER_TRACK) { 2151 n -= F_SECT_PER_TRACK; 2152 while (here[n].sect) 2153 ++n; 2154 } 2155 } 2156 } 2157 if (_floppy->stretch & FD_SECTBASEMASK) { 2158 for (count = 0; count < F_SECT_PER_TRACK; count++) 2159 here[count].sect += FD_SECTBASE(_floppy) - 1; 2160 } 2161 } 2162 2163 static void redo_format(void) 2164 { 2165 buffer_track = -1; 2166 setup_format_params(format_req.track << STRETCH(_floppy)); 2167 floppy_start(); 2168 debugt(__func__, "queue format request"); 2169 } 2170 2171 static const struct cont_t format_cont = { 2172 .interrupt = format_interrupt, 2173 .redo = redo_format, 2174 .error = bad_flp_intr, 2175 .done = generic_done 2176 }; 2177 2178 static int do_format(int drive, struct format_descr *tmp_format_req) 2179 { 2180 int ret; 2181 2182 if (lock_fdc(drive)) 2183 return -EINTR; 2184 2185 set_floppy(drive); 2186 if (!_floppy || 2187 _floppy->track > DP->tracks || 2188 tmp_format_req->track >= _floppy->track || 2189 tmp_format_req->head >= _floppy->head || 2190 (_floppy->sect << 2) % (1 << FD_SIZECODE(_floppy)) || 2191 !_floppy->fmt_gap) { 2192 process_fd_request(); 2193 return -EINVAL; 2194 } 2195 format_req = *tmp_format_req; 2196 format_errors = 0; 2197 cont = &format_cont; 2198 errors = &format_errors; 2199 ret = wait_til_done(redo_format, true); 2200 if (ret == -EINTR) 2201 return -EINTR; 2202 process_fd_request(); 2203 return ret; 2204 } 2205 2206 /* 2207 * Buffer read/write and support 2208 * ============================= 2209 */ 2210 2211 static void floppy_end_request(struct request *req, blk_status_t error) 2212 { 2213 unsigned int nr_sectors = current_count_sectors; 2214 unsigned int drive = (unsigned long)req->rq_disk->private_data; 2215 2216 /* current_count_sectors can be zero if transfer failed */ 2217 if (error) 2218 nr_sectors = blk_rq_cur_sectors(req); 2219 if (blk_update_request(req, error, nr_sectors << 9)) 2220 return; 2221 __blk_mq_end_request(req, error); 2222 2223 /* We're done with the request */ 2224 floppy_off(drive); 2225 current_req = NULL; 2226 } 2227 2228 /* new request_done. Can handle physical sectors which are smaller than a 2229 * logical buffer */ 2230 static void request_done(int uptodate) 2231 { 2232 struct request *req = current_req; 2233 struct request_queue *q; 2234 int block; 2235 char msg[sizeof("request done ") + sizeof(int) * 3]; 2236 2237 probing = 0; 2238 snprintf(msg, sizeof(msg), "request done %d", uptodate); 2239 reschedule_timeout(MAXTIMEOUT, msg); 2240 2241 if (!req) { 2242 pr_info("floppy.c: no request in request_done\n"); 2243 return; 2244 } 2245 2246 q = req->q; 2247 2248 if (uptodate) { 2249 /* maintain values for invalidation on geometry 2250 * change */ 2251 block = current_count_sectors + blk_rq_pos(req); 2252 INFBOUND(DRS->maxblock, block); 2253 if (block > _floppy->sect) 2254 DRS->maxtrack = 1; 2255 2256 floppy_end_request(req, 0); 2257 } else { 2258 if (rq_data_dir(req) == WRITE) { 2259 /* record write error information */ 2260 DRWE->write_errors++; 2261 if (DRWE->write_errors == 1) { 2262 DRWE->first_error_sector = blk_rq_pos(req); 2263 DRWE->first_error_generation = DRS->generation; 2264 } 2265 DRWE->last_error_sector = blk_rq_pos(req); 2266 DRWE->last_error_generation = DRS->generation; 2267 } 2268 floppy_end_request(req, BLK_STS_IOERR); 2269 } 2270 } 2271 2272 /* Interrupt handler evaluating the result of the r/w operation */ 2273 static void rw_interrupt(void) 2274 { 2275 int eoc; 2276 int ssize; 2277 int heads; 2278 int nr_sectors; 2279 2280 if (R_HEAD >= 2) { 2281 /* some Toshiba floppy controllers occasionnally seem to 2282 * return bogus interrupts after read/write operations, which 2283 * can be recognized by a bad head number (>= 2) */ 2284 return; 2285 } 2286 2287 if (!DRS->first_read_date) 2288 DRS->first_read_date = jiffies; 2289 2290 nr_sectors = 0; 2291 ssize = DIV_ROUND_UP(1 << SIZECODE, 4); 2292 2293 if (ST1 & ST1_EOC) 2294 eoc = 1; 2295 else 2296 eoc = 0; 2297 2298 if (COMMAND & 0x80) 2299 heads = 2; 2300 else 2301 heads = 1; 2302 2303 nr_sectors = (((R_TRACK - TRACK) * heads + 2304 R_HEAD - HEAD) * SECT_PER_TRACK + 2305 R_SECTOR - SECTOR + eoc) << SIZECODE >> 2; 2306 2307 if (nr_sectors / ssize > 2308 DIV_ROUND_UP(in_sector_offset + current_count_sectors, ssize)) { 2309 DPRINT("long rw: %x instead of %lx\n", 2310 nr_sectors, current_count_sectors); 2311 pr_info("rs=%d s=%d\n", R_SECTOR, SECTOR); 2312 pr_info("rh=%d h=%d\n", R_HEAD, HEAD); 2313 pr_info("rt=%d t=%d\n", R_TRACK, TRACK); 2314 pr_info("heads=%d eoc=%d\n", heads, eoc); 2315 pr_info("spt=%d st=%d ss=%d\n", 2316 SECT_PER_TRACK, fsector_t, ssize); 2317 pr_info("in_sector_offset=%d\n", in_sector_offset); 2318 } 2319 2320 nr_sectors -= in_sector_offset; 2321 INFBOUND(nr_sectors, 0); 2322 SUPBOUND(current_count_sectors, nr_sectors); 2323 2324 switch (interpret_errors()) { 2325 case 2: 2326 cont->redo(); 2327 return; 2328 case 1: 2329 if (!current_count_sectors) { 2330 cont->error(); 2331 cont->redo(); 2332 return; 2333 } 2334 break; 2335 case 0: 2336 if (!current_count_sectors) { 2337 cont->redo(); 2338 return; 2339 } 2340 current_type[current_drive] = _floppy; 2341 floppy_sizes[TOMINOR(current_drive)] = _floppy->size; 2342 break; 2343 } 2344 2345 if (probing) { 2346 if (DP->flags & FTD_MSG) 2347 DPRINT("Auto-detected floppy type %s in fd%d\n", 2348 _floppy->name, current_drive); 2349 current_type[current_drive] = _floppy; 2350 floppy_sizes[TOMINOR(current_drive)] = _floppy->size; 2351 probing = 0; 2352 } 2353 2354 if (CT(COMMAND) != FD_READ || 2355 raw_cmd->kernel_data == bio_data(current_req->bio)) { 2356 /* transfer directly from buffer */ 2357 cont->done(1); 2358 } else if (CT(COMMAND) == FD_READ) { 2359 buffer_track = raw_cmd->track; 2360 buffer_drive = current_drive; 2361 INFBOUND(buffer_max, nr_sectors + fsector_t); 2362 } 2363 cont->redo(); 2364 } 2365 2366 /* Compute maximal contiguous buffer size. */ 2367 static int buffer_chain_size(void) 2368 { 2369 struct bio_vec bv; 2370 int size; 2371 struct req_iterator iter; 2372 char *base; 2373 2374 base = bio_data(current_req->bio); 2375 size = 0; 2376 2377 rq_for_each_segment(bv, current_req, iter) { 2378 if (page_address(bv.bv_page) + bv.bv_offset != base + size) 2379 break; 2380 2381 size += bv.bv_len; 2382 } 2383 2384 return size >> 9; 2385 } 2386 2387 /* Compute the maximal transfer size */ 2388 static int transfer_size(int ssize, int max_sector, int max_size) 2389 { 2390 SUPBOUND(max_sector, fsector_t + max_size); 2391 2392 /* alignment */ 2393 max_sector -= (max_sector % _floppy->sect) % ssize; 2394 2395 /* transfer size, beginning not aligned */ 2396 current_count_sectors = max_sector - fsector_t; 2397 2398 return max_sector; 2399 } 2400 2401 /* 2402 * Move data from/to the track buffer to/from the buffer cache. 2403 */ 2404 static void copy_buffer(int ssize, int max_sector, int max_sector_2) 2405 { 2406 int remaining; /* number of transferred 512-byte sectors */ 2407 struct bio_vec bv; 2408 char *buffer; 2409 char *dma_buffer; 2410 int size; 2411 struct req_iterator iter; 2412 2413 max_sector = transfer_size(ssize, 2414 min(max_sector, max_sector_2), 2415 blk_rq_sectors(current_req)); 2416 2417 if (current_count_sectors <= 0 && CT(COMMAND) == FD_WRITE && 2418 buffer_max > fsector_t + blk_rq_sectors(current_req)) 2419 current_count_sectors = min_t(int, buffer_max - fsector_t, 2420 blk_rq_sectors(current_req)); 2421 2422 remaining = current_count_sectors << 9; 2423 if (remaining > blk_rq_bytes(current_req) && CT(COMMAND) == FD_WRITE) { 2424 DPRINT("in copy buffer\n"); 2425 pr_info("current_count_sectors=%ld\n", current_count_sectors); 2426 pr_info("remaining=%d\n", remaining >> 9); 2427 pr_info("current_req->nr_sectors=%u\n", 2428 blk_rq_sectors(current_req)); 2429 pr_info("current_req->current_nr_sectors=%u\n", 2430 blk_rq_cur_sectors(current_req)); 2431 pr_info("max_sector=%d\n", max_sector); 2432 pr_info("ssize=%d\n", ssize); 2433 } 2434 2435 buffer_max = max(max_sector, buffer_max); 2436 2437 dma_buffer = floppy_track_buffer + ((fsector_t - buffer_min) << 9); 2438 2439 size = blk_rq_cur_bytes(current_req); 2440 2441 rq_for_each_segment(bv, current_req, iter) { 2442 if (!remaining) 2443 break; 2444 2445 size = bv.bv_len; 2446 SUPBOUND(size, remaining); 2447 2448 buffer = page_address(bv.bv_page) + bv.bv_offset; 2449 if (dma_buffer + size > 2450 floppy_track_buffer + (max_buffer_sectors << 10) || 2451 dma_buffer < floppy_track_buffer) { 2452 DPRINT("buffer overrun in copy buffer %d\n", 2453 (int)((floppy_track_buffer - dma_buffer) >> 9)); 2454 pr_info("fsector_t=%d buffer_min=%d\n", 2455 fsector_t, buffer_min); 2456 pr_info("current_count_sectors=%ld\n", 2457 current_count_sectors); 2458 if (CT(COMMAND) == FD_READ) 2459 pr_info("read\n"); 2460 if (CT(COMMAND) == FD_WRITE) 2461 pr_info("write\n"); 2462 break; 2463 } 2464 if (((unsigned long)buffer) % 512) 2465 DPRINT("%p buffer not aligned\n", buffer); 2466 2467 if (CT(COMMAND) == FD_READ) 2468 memcpy(buffer, dma_buffer, size); 2469 else 2470 memcpy(dma_buffer, buffer, size); 2471 2472 remaining -= size; 2473 dma_buffer += size; 2474 } 2475 if (remaining) { 2476 if (remaining > 0) 2477 max_sector -= remaining >> 9; 2478 DPRINT("weirdness: remaining %d\n", remaining >> 9); 2479 } 2480 } 2481 2482 /* work around a bug in pseudo DMA 2483 * (on some FDCs) pseudo DMA does not stop when the CPU stops 2484 * sending data. Hence we need a different way to signal the 2485 * transfer length: We use SECT_PER_TRACK. Unfortunately, this 2486 * does not work with MT, hence we can only transfer one head at 2487 * a time 2488 */ 2489 static void virtualdmabug_workaround(void) 2490 { 2491 int hard_sectors; 2492 int end_sector; 2493 2494 if (CT(COMMAND) == FD_WRITE) { 2495 COMMAND &= ~0x80; /* switch off multiple track mode */ 2496 2497 hard_sectors = raw_cmd->length >> (7 + SIZECODE); 2498 end_sector = SECTOR + hard_sectors - 1; 2499 if (end_sector > SECT_PER_TRACK) { 2500 pr_info("too many sectors %d > %d\n", 2501 end_sector, SECT_PER_TRACK); 2502 return; 2503 } 2504 SECT_PER_TRACK = end_sector; 2505 /* make sure SECT_PER_TRACK 2506 * points to end of transfer */ 2507 } 2508 } 2509 2510 /* 2511 * Formulate a read/write request. 2512 * this routine decides where to load the data (directly to buffer, or to 2513 * tmp floppy area), how much data to load (the size of the buffer, the whole 2514 * track, or a single sector) 2515 * All floppy_track_buffer handling goes in here. If we ever add track buffer 2516 * allocation on the fly, it should be done here. No other part should need 2517 * modification. 2518 */ 2519 2520 static int make_raw_rw_request(void) 2521 { 2522 int aligned_sector_t; 2523 int max_sector; 2524 int max_size; 2525 int tracksize; 2526 int ssize; 2527 2528 if (WARN(max_buffer_sectors == 0, "VFS: Block I/O scheduled on unopened device\n")) 2529 return 0; 2530 2531 set_fdc((long)current_req->rq_disk->private_data); 2532 2533 raw_cmd = &default_raw_cmd; 2534 raw_cmd->flags = FD_RAW_SPIN | FD_RAW_NEED_DISK | FD_RAW_NEED_SEEK; 2535 raw_cmd->cmd_count = NR_RW; 2536 if (rq_data_dir(current_req) == READ) { 2537 raw_cmd->flags |= FD_RAW_READ; 2538 COMMAND = FM_MODE(_floppy, FD_READ); 2539 } else if (rq_data_dir(current_req) == WRITE) { 2540 raw_cmd->flags |= FD_RAW_WRITE; 2541 COMMAND = FM_MODE(_floppy, FD_WRITE); 2542 } else { 2543 DPRINT("%s: unknown command\n", __func__); 2544 return 0; 2545 } 2546 2547 max_sector = _floppy->sect * _floppy->head; 2548 2549 TRACK = (int)blk_rq_pos(current_req) / max_sector; 2550 fsector_t = (int)blk_rq_pos(current_req) % max_sector; 2551 if (_floppy->track && TRACK >= _floppy->track) { 2552 if (blk_rq_cur_sectors(current_req) & 1) { 2553 current_count_sectors = 1; 2554 return 1; 2555 } else 2556 return 0; 2557 } 2558 HEAD = fsector_t / _floppy->sect; 2559 2560 if (((_floppy->stretch & (FD_SWAPSIDES | FD_SECTBASEMASK)) || 2561 test_bit(FD_NEED_TWADDLE_BIT, &DRS->flags)) && 2562 fsector_t < _floppy->sect) 2563 max_sector = _floppy->sect; 2564 2565 /* 2M disks have phantom sectors on the first track */ 2566 if ((_floppy->rate & FD_2M) && (!TRACK) && (!HEAD)) { 2567 max_sector = 2 * _floppy->sect / 3; 2568 if (fsector_t >= max_sector) { 2569 current_count_sectors = 2570 min_t(int, _floppy->sect - fsector_t, 2571 blk_rq_sectors(current_req)); 2572 return 1; 2573 } 2574 SIZECODE = 2; 2575 } else 2576 SIZECODE = FD_SIZECODE(_floppy); 2577 raw_cmd->rate = _floppy->rate & 0x43; 2578 if ((_floppy->rate & FD_2M) && (TRACK || HEAD) && raw_cmd->rate == 2) 2579 raw_cmd->rate = 1; 2580 2581 if (SIZECODE) 2582 SIZECODE2 = 0xff; 2583 else 2584 SIZECODE2 = 0x80; 2585 raw_cmd->track = TRACK << STRETCH(_floppy); 2586 DR_SELECT = UNIT(current_drive) + PH_HEAD(_floppy, HEAD); 2587 GAP = _floppy->gap; 2588 ssize = DIV_ROUND_UP(1 << SIZECODE, 4); 2589 SECT_PER_TRACK = _floppy->sect << 2 >> SIZECODE; 2590 SECTOR = ((fsector_t % _floppy->sect) << 2 >> SIZECODE) + 2591 FD_SECTBASE(_floppy); 2592 2593 /* tracksize describes the size which can be filled up with sectors 2594 * of size ssize. 2595 */ 2596 tracksize = _floppy->sect - _floppy->sect % ssize; 2597 if (tracksize < _floppy->sect) { 2598 SECT_PER_TRACK++; 2599 if (tracksize <= fsector_t % _floppy->sect) 2600 SECTOR--; 2601 2602 /* if we are beyond tracksize, fill up using smaller sectors */ 2603 while (tracksize <= fsector_t % _floppy->sect) { 2604 while (tracksize + ssize > _floppy->sect) { 2605 SIZECODE--; 2606 ssize >>= 1; 2607 } 2608 SECTOR++; 2609 SECT_PER_TRACK++; 2610 tracksize += ssize; 2611 } 2612 max_sector = HEAD * _floppy->sect + tracksize; 2613 } else if (!TRACK && !HEAD && !(_floppy->rate & FD_2M) && probing) { 2614 max_sector = _floppy->sect; 2615 } else if (!HEAD && CT(COMMAND) == FD_WRITE) { 2616 /* for virtual DMA bug workaround */ 2617 max_sector = _floppy->sect; 2618 } 2619 2620 in_sector_offset = (fsector_t % _floppy->sect) % ssize; 2621 aligned_sector_t = fsector_t - in_sector_offset; 2622 max_size = blk_rq_sectors(current_req); 2623 if ((raw_cmd->track == buffer_track) && 2624 (current_drive == buffer_drive) && 2625 (fsector_t >= buffer_min) && (fsector_t < buffer_max)) { 2626 /* data already in track buffer */ 2627 if (CT(COMMAND) == FD_READ) { 2628 copy_buffer(1, max_sector, buffer_max); 2629 return 1; 2630 } 2631 } else if (in_sector_offset || blk_rq_sectors(current_req) < ssize) { 2632 if (CT(COMMAND) == FD_WRITE) { 2633 unsigned int sectors; 2634 2635 sectors = fsector_t + blk_rq_sectors(current_req); 2636 if (sectors > ssize && sectors < ssize + ssize) 2637 max_size = ssize + ssize; 2638 else 2639 max_size = ssize; 2640 } 2641 raw_cmd->flags &= ~FD_RAW_WRITE; 2642 raw_cmd->flags |= FD_RAW_READ; 2643 COMMAND = FM_MODE(_floppy, FD_READ); 2644 } else if ((unsigned long)bio_data(current_req->bio) < MAX_DMA_ADDRESS) { 2645 unsigned long dma_limit; 2646 int direct, indirect; 2647 2648 indirect = 2649 transfer_size(ssize, max_sector, 2650 max_buffer_sectors * 2) - fsector_t; 2651 2652 /* 2653 * Do NOT use minimum() here---MAX_DMA_ADDRESS is 64 bits wide 2654 * on a 64 bit machine! 2655 */ 2656 max_size = buffer_chain_size(); 2657 dma_limit = (MAX_DMA_ADDRESS - 2658 ((unsigned long)bio_data(current_req->bio))) >> 9; 2659 if ((unsigned long)max_size > dma_limit) 2660 max_size = dma_limit; 2661 /* 64 kb boundaries */ 2662 if (CROSS_64KB(bio_data(current_req->bio), max_size << 9)) 2663 max_size = (K_64 - 2664 ((unsigned long)bio_data(current_req->bio)) % 2665 K_64) >> 9; 2666 direct = transfer_size(ssize, max_sector, max_size) - fsector_t; 2667 /* 2668 * We try to read tracks, but if we get too many errors, we 2669 * go back to reading just one sector at a time. 2670 * 2671 * This means we should be able to read a sector even if there 2672 * are other bad sectors on this track. 2673 */ 2674 if (!direct || 2675 (indirect * 2 > direct * 3 && 2676 *errors < DP->max_errors.read_track && 2677 ((!probing || 2678 (DP->read_track & (1 << DRS->probed_format)))))) { 2679 max_size = blk_rq_sectors(current_req); 2680 } else { 2681 raw_cmd->kernel_data = bio_data(current_req->bio); 2682 raw_cmd->length = current_count_sectors << 9; 2683 if (raw_cmd->length == 0) { 2684 DPRINT("%s: zero dma transfer attempted\n", __func__); 2685 DPRINT("indirect=%d direct=%d fsector_t=%d\n", 2686 indirect, direct, fsector_t); 2687 return 0; 2688 } 2689 virtualdmabug_workaround(); 2690 return 2; 2691 } 2692 } 2693 2694 if (CT(COMMAND) == FD_READ) 2695 max_size = max_sector; /* unbounded */ 2696 2697 /* claim buffer track if needed */ 2698 if (buffer_track != raw_cmd->track || /* bad track */ 2699 buffer_drive != current_drive || /* bad drive */ 2700 fsector_t > buffer_max || 2701 fsector_t < buffer_min || 2702 ((CT(COMMAND) == FD_READ || 2703 (!in_sector_offset && blk_rq_sectors(current_req) >= ssize)) && 2704 max_sector > 2 * max_buffer_sectors + buffer_min && 2705 max_size + fsector_t > 2 * max_buffer_sectors + buffer_min)) { 2706 /* not enough space */ 2707 buffer_track = -1; 2708 buffer_drive = current_drive; 2709 buffer_max = buffer_min = aligned_sector_t; 2710 } 2711 raw_cmd->kernel_data = floppy_track_buffer + 2712 ((aligned_sector_t - buffer_min) << 9); 2713 2714 if (CT(COMMAND) == FD_WRITE) { 2715 /* copy write buffer to track buffer. 2716 * if we get here, we know that the write 2717 * is either aligned or the data already in the buffer 2718 * (buffer will be overwritten) */ 2719 if (in_sector_offset && buffer_track == -1) 2720 DPRINT("internal error offset !=0 on write\n"); 2721 buffer_track = raw_cmd->track; 2722 buffer_drive = current_drive; 2723 copy_buffer(ssize, max_sector, 2724 2 * max_buffer_sectors + buffer_min); 2725 } else 2726 transfer_size(ssize, max_sector, 2727 2 * max_buffer_sectors + buffer_min - 2728 aligned_sector_t); 2729 2730 /* round up current_count_sectors to get dma xfer size */ 2731 raw_cmd->length = in_sector_offset + current_count_sectors; 2732 raw_cmd->length = ((raw_cmd->length - 1) | (ssize - 1)) + 1; 2733 raw_cmd->length <<= 9; 2734 if ((raw_cmd->length < current_count_sectors << 9) || 2735 (raw_cmd->kernel_data != bio_data(current_req->bio) && 2736 CT(COMMAND) == FD_WRITE && 2737 (aligned_sector_t + (raw_cmd->length >> 9) > buffer_max || 2738 aligned_sector_t < buffer_min)) || 2739 raw_cmd->length % (128 << SIZECODE) || 2740 raw_cmd->length <= 0 || current_count_sectors <= 0) { 2741 DPRINT("fractionary current count b=%lx s=%lx\n", 2742 raw_cmd->length, current_count_sectors); 2743 if (raw_cmd->kernel_data != bio_data(current_req->bio)) 2744 pr_info("addr=%d, length=%ld\n", 2745 (int)((raw_cmd->kernel_data - 2746 floppy_track_buffer) >> 9), 2747 current_count_sectors); 2748 pr_info("st=%d ast=%d mse=%d msi=%d\n", 2749 fsector_t, aligned_sector_t, max_sector, max_size); 2750 pr_info("ssize=%x SIZECODE=%d\n", ssize, SIZECODE); 2751 pr_info("command=%x SECTOR=%d HEAD=%d, TRACK=%d\n", 2752 COMMAND, SECTOR, HEAD, TRACK); 2753 pr_info("buffer drive=%d\n", buffer_drive); 2754 pr_info("buffer track=%d\n", buffer_track); 2755 pr_info("buffer_min=%d\n", buffer_min); 2756 pr_info("buffer_max=%d\n", buffer_max); 2757 return 0; 2758 } 2759 2760 if (raw_cmd->kernel_data != bio_data(current_req->bio)) { 2761 if (raw_cmd->kernel_data < floppy_track_buffer || 2762 current_count_sectors < 0 || 2763 raw_cmd->length < 0 || 2764 raw_cmd->kernel_data + raw_cmd->length > 2765 floppy_track_buffer + (max_buffer_sectors << 10)) { 2766 DPRINT("buffer overrun in schedule dma\n"); 2767 pr_info("fsector_t=%d buffer_min=%d current_count=%ld\n", 2768 fsector_t, buffer_min, raw_cmd->length >> 9); 2769 pr_info("current_count_sectors=%ld\n", 2770 current_count_sectors); 2771 if (CT(COMMAND) == FD_READ) 2772 pr_info("read\n"); 2773 if (CT(COMMAND) == FD_WRITE) 2774 pr_info("write\n"); 2775 return 0; 2776 } 2777 } else if (raw_cmd->length > blk_rq_bytes(current_req) || 2778 current_count_sectors > blk_rq_sectors(current_req)) { 2779 DPRINT("buffer overrun in direct transfer\n"); 2780 return 0; 2781 } else if (raw_cmd->length < current_count_sectors << 9) { 2782 DPRINT("more sectors than bytes\n"); 2783 pr_info("bytes=%ld\n", raw_cmd->length >> 9); 2784 pr_info("sectors=%ld\n", current_count_sectors); 2785 } 2786 if (raw_cmd->length == 0) { 2787 DPRINT("zero dma transfer attempted from make_raw_request\n"); 2788 return 0; 2789 } 2790 2791 virtualdmabug_workaround(); 2792 return 2; 2793 } 2794 2795 static int set_next_request(void) 2796 { 2797 current_req = list_first_entry_or_null(&floppy_reqs, struct request, 2798 queuelist); 2799 if (current_req) { 2800 current_req->error_count = 0; 2801 list_del_init(¤t_req->queuelist); 2802 } 2803 return current_req != NULL; 2804 } 2805 2806 static void redo_fd_request(void) 2807 { 2808 int drive; 2809 int tmp; 2810 2811 lastredo = jiffies; 2812 if (current_drive < N_DRIVE) 2813 floppy_off(current_drive); 2814 2815 do_request: 2816 if (!current_req) { 2817 int pending; 2818 2819 spin_lock_irq(&floppy_lock); 2820 pending = set_next_request(); 2821 spin_unlock_irq(&floppy_lock); 2822 if (!pending) { 2823 do_floppy = NULL; 2824 unlock_fdc(); 2825 return; 2826 } 2827 } 2828 drive = (long)current_req->rq_disk->private_data; 2829 set_fdc(drive); 2830 reschedule_timeout(current_reqD, "redo fd request"); 2831 2832 set_floppy(drive); 2833 raw_cmd = &default_raw_cmd; 2834 raw_cmd->flags = 0; 2835 if (start_motor(redo_fd_request)) 2836 return; 2837 2838 disk_change(current_drive); 2839 if (test_bit(current_drive, &fake_change) || 2840 test_bit(FD_DISK_CHANGED_BIT, &DRS->flags)) { 2841 DPRINT("disk absent or changed during operation\n"); 2842 request_done(0); 2843 goto do_request; 2844 } 2845 if (!_floppy) { /* Autodetection */ 2846 if (!probing) { 2847 DRS->probed_format = 0; 2848 if (next_valid_format()) { 2849 DPRINT("no autodetectable formats\n"); 2850 _floppy = NULL; 2851 request_done(0); 2852 goto do_request; 2853 } 2854 } 2855 probing = 1; 2856 _floppy = floppy_type + DP->autodetect[DRS->probed_format]; 2857 } else 2858 probing = 0; 2859 errors = &(current_req->error_count); 2860 tmp = make_raw_rw_request(); 2861 if (tmp < 2) { 2862 request_done(tmp); 2863 goto do_request; 2864 } 2865 2866 if (test_bit(FD_NEED_TWADDLE_BIT, &DRS->flags)) 2867 twaddle(); 2868 schedule_bh(floppy_start); 2869 debugt(__func__, "queue fd request"); 2870 return; 2871 } 2872 2873 static const struct cont_t rw_cont = { 2874 .interrupt = rw_interrupt, 2875 .redo = redo_fd_request, 2876 .error = bad_flp_intr, 2877 .done = request_done 2878 }; 2879 2880 static void process_fd_request(void) 2881 { 2882 cont = &rw_cont; 2883 schedule_bh(redo_fd_request); 2884 } 2885 2886 static blk_status_t floppy_queue_rq(struct blk_mq_hw_ctx *hctx, 2887 const struct blk_mq_queue_data *bd) 2888 { 2889 blk_mq_start_request(bd->rq); 2890 2891 if (WARN(max_buffer_sectors == 0, 2892 "VFS: %s called on non-open device\n", __func__)) 2893 return BLK_STS_IOERR; 2894 2895 if (WARN(atomic_read(&usage_count) == 0, 2896 "warning: usage count=0, current_req=%p sect=%ld flags=%llx\n", 2897 current_req, (long)blk_rq_pos(current_req), 2898 (unsigned long long) current_req->cmd_flags)) 2899 return BLK_STS_IOERR; 2900 2901 spin_lock_irq(&floppy_lock); 2902 list_add_tail(&bd->rq->queuelist, &floppy_reqs); 2903 spin_unlock_irq(&floppy_lock); 2904 2905 if (test_and_set_bit(0, &fdc_busy)) { 2906 /* fdc busy, this new request will be treated when the 2907 current one is done */ 2908 is_alive(__func__, "old request running"); 2909 return BLK_STS_OK; 2910 } 2911 2912 command_status = FD_COMMAND_NONE; 2913 __reschedule_timeout(MAXTIMEOUT, "fd_request"); 2914 set_fdc(0); 2915 process_fd_request(); 2916 is_alive(__func__, ""); 2917 return BLK_STS_OK; 2918 } 2919 2920 static const struct cont_t poll_cont = { 2921 .interrupt = success_and_wakeup, 2922 .redo = floppy_ready, 2923 .error = generic_failure, 2924 .done = generic_done 2925 }; 2926 2927 static int poll_drive(bool interruptible, int flag) 2928 { 2929 /* no auto-sense, just clear dcl */ 2930 raw_cmd = &default_raw_cmd; 2931 raw_cmd->flags = flag; 2932 raw_cmd->track = 0; 2933 raw_cmd->cmd_count = 0; 2934 cont = &poll_cont; 2935 debug_dcl(DP->flags, "setting NEWCHANGE in poll_drive\n"); 2936 set_bit(FD_DISK_NEWCHANGE_BIT, &DRS->flags); 2937 2938 return wait_til_done(floppy_ready, interruptible); 2939 } 2940 2941 /* 2942 * User triggered reset 2943 * ==================== 2944 */ 2945 2946 static void reset_intr(void) 2947 { 2948 pr_info("weird, reset interrupt called\n"); 2949 } 2950 2951 static const struct cont_t reset_cont = { 2952 .interrupt = reset_intr, 2953 .redo = success_and_wakeup, 2954 .error = generic_failure, 2955 .done = generic_done 2956 }; 2957 2958 static int user_reset_fdc(int drive, int arg, bool interruptible) 2959 { 2960 int ret; 2961 2962 if (lock_fdc(drive)) 2963 return -EINTR; 2964 2965 if (arg == FD_RESET_ALWAYS) 2966 FDCS->reset = 1; 2967 if (FDCS->reset) { 2968 cont = &reset_cont; 2969 ret = wait_til_done(reset_fdc, interruptible); 2970 if (ret == -EINTR) 2971 return -EINTR; 2972 } 2973 process_fd_request(); 2974 return 0; 2975 } 2976 2977 /* 2978 * Misc Ioctl's and support 2979 * ======================== 2980 */ 2981 static inline int fd_copyout(void __user *param, const void *address, 2982 unsigned long size) 2983 { 2984 return copy_to_user(param, address, size) ? -EFAULT : 0; 2985 } 2986 2987 static inline int fd_copyin(void __user *param, void *address, 2988 unsigned long size) 2989 { 2990 return copy_from_user(address, param, size) ? -EFAULT : 0; 2991 } 2992 2993 static const char *drive_name(int type, int drive) 2994 { 2995 struct floppy_struct *floppy; 2996 2997 if (type) 2998 floppy = floppy_type + type; 2999 else { 3000 if (UDP->native_format) 3001 floppy = floppy_type + UDP->native_format; 3002 else 3003 return "(null)"; 3004 } 3005 if (floppy->name) 3006 return floppy->name; 3007 else 3008 return "(null)"; 3009 } 3010 3011 /* raw commands */ 3012 static void raw_cmd_done(int flag) 3013 { 3014 int i; 3015 3016 if (!flag) { 3017 raw_cmd->flags |= FD_RAW_FAILURE; 3018 raw_cmd->flags |= FD_RAW_HARDFAILURE; 3019 } else { 3020 raw_cmd->reply_count = inr; 3021 if (raw_cmd->reply_count > MAX_REPLIES) 3022 raw_cmd->reply_count = 0; 3023 for (i = 0; i < raw_cmd->reply_count; i++) 3024 raw_cmd->reply[i] = reply_buffer[i]; 3025 3026 if (raw_cmd->flags & (FD_RAW_READ | FD_RAW_WRITE)) { 3027 unsigned long flags; 3028 flags = claim_dma_lock(); 3029 raw_cmd->length = fd_get_dma_residue(); 3030 release_dma_lock(flags); 3031 } 3032 3033 if ((raw_cmd->flags & FD_RAW_SOFTFAILURE) && 3034 (!raw_cmd->reply_count || (raw_cmd->reply[0] & 0xc0))) 3035 raw_cmd->flags |= FD_RAW_FAILURE; 3036 3037 if (disk_change(current_drive)) 3038 raw_cmd->flags |= FD_RAW_DISK_CHANGE; 3039 else 3040 raw_cmd->flags &= ~FD_RAW_DISK_CHANGE; 3041 if (raw_cmd->flags & FD_RAW_NO_MOTOR_AFTER) 3042 motor_off_callback(&motor_off_timer[current_drive]); 3043 3044 if (raw_cmd->next && 3045 (!(raw_cmd->flags & FD_RAW_FAILURE) || 3046 !(raw_cmd->flags & FD_RAW_STOP_IF_FAILURE)) && 3047 ((raw_cmd->flags & FD_RAW_FAILURE) || 3048 !(raw_cmd->flags & FD_RAW_STOP_IF_SUCCESS))) { 3049 raw_cmd = raw_cmd->next; 3050 return; 3051 } 3052 } 3053 generic_done(flag); 3054 } 3055 3056 static const struct cont_t raw_cmd_cont = { 3057 .interrupt = success_and_wakeup, 3058 .redo = floppy_start, 3059 .error = generic_failure, 3060 .done = raw_cmd_done 3061 }; 3062 3063 static int raw_cmd_copyout(int cmd, void __user *param, 3064 struct floppy_raw_cmd *ptr) 3065 { 3066 int ret; 3067 3068 while (ptr) { 3069 struct floppy_raw_cmd cmd = *ptr; 3070 cmd.next = NULL; 3071 cmd.kernel_data = NULL; 3072 ret = copy_to_user(param, &cmd, sizeof(cmd)); 3073 if (ret) 3074 return -EFAULT; 3075 param += sizeof(struct floppy_raw_cmd); 3076 if ((ptr->flags & FD_RAW_READ) && ptr->buffer_length) { 3077 if (ptr->length >= 0 && 3078 ptr->length <= ptr->buffer_length) { 3079 long length = ptr->buffer_length - ptr->length; 3080 ret = fd_copyout(ptr->data, ptr->kernel_data, 3081 length); 3082 if (ret) 3083 return ret; 3084 } 3085 } 3086 ptr = ptr->next; 3087 } 3088 3089 return 0; 3090 } 3091 3092 static void raw_cmd_free(struct floppy_raw_cmd **ptr) 3093 { 3094 struct floppy_raw_cmd *next; 3095 struct floppy_raw_cmd *this; 3096 3097 this = *ptr; 3098 *ptr = NULL; 3099 while (this) { 3100 if (this->buffer_length) { 3101 fd_dma_mem_free((unsigned long)this->kernel_data, 3102 this->buffer_length); 3103 this->buffer_length = 0; 3104 } 3105 next = this->next; 3106 kfree(this); 3107 this = next; 3108 } 3109 } 3110 3111 static int raw_cmd_copyin(int cmd, void __user *param, 3112 struct floppy_raw_cmd **rcmd) 3113 { 3114 struct floppy_raw_cmd *ptr; 3115 int ret; 3116 int i; 3117 3118 *rcmd = NULL; 3119 3120 loop: 3121 ptr = kmalloc(sizeof(struct floppy_raw_cmd), GFP_KERNEL); 3122 if (!ptr) 3123 return -ENOMEM; 3124 *rcmd = ptr; 3125 ret = copy_from_user(ptr, param, sizeof(*ptr)); 3126 ptr->next = NULL; 3127 ptr->buffer_length = 0; 3128 ptr->kernel_data = NULL; 3129 if (ret) 3130 return -EFAULT; 3131 param += sizeof(struct floppy_raw_cmd); 3132 if (ptr->cmd_count > 33) 3133 /* the command may now also take up the space 3134 * initially intended for the reply & the 3135 * reply count. Needed for long 82078 commands 3136 * such as RESTORE, which takes ... 17 command 3137 * bytes. Murphy's law #137: When you reserve 3138 * 16 bytes for a structure, you'll one day 3139 * discover that you really need 17... 3140 */ 3141 return -EINVAL; 3142 3143 for (i = 0; i < 16; i++) 3144 ptr->reply[i] = 0; 3145 ptr->resultcode = 0; 3146 3147 if (ptr->flags & (FD_RAW_READ | FD_RAW_WRITE)) { 3148 if (ptr->length <= 0) 3149 return -EINVAL; 3150 ptr->kernel_data = (char *)fd_dma_mem_alloc(ptr->length); 3151 fallback_on_nodma_alloc(&ptr->kernel_data, ptr->length); 3152 if (!ptr->kernel_data) 3153 return -ENOMEM; 3154 ptr->buffer_length = ptr->length; 3155 } 3156 if (ptr->flags & FD_RAW_WRITE) { 3157 ret = fd_copyin(ptr->data, ptr->kernel_data, ptr->length); 3158 if (ret) 3159 return ret; 3160 } 3161 3162 if (ptr->flags & FD_RAW_MORE) { 3163 rcmd = &(ptr->next); 3164 ptr->rate &= 0x43; 3165 goto loop; 3166 } 3167 3168 return 0; 3169 } 3170 3171 static int raw_cmd_ioctl(int cmd, void __user *param) 3172 { 3173 struct floppy_raw_cmd *my_raw_cmd; 3174 int drive; 3175 int ret2; 3176 int ret; 3177 3178 if (FDCS->rawcmd <= 1) 3179 FDCS->rawcmd = 1; 3180 for (drive = 0; drive < N_DRIVE; drive++) { 3181 if (FDC(drive) != fdc) 3182 continue; 3183 if (drive == current_drive) { 3184 if (UDRS->fd_ref > 1) { 3185 FDCS->rawcmd = 2; 3186 break; 3187 } 3188 } else if (UDRS->fd_ref) { 3189 FDCS->rawcmd = 2; 3190 break; 3191 } 3192 } 3193 3194 if (FDCS->reset) 3195 return -EIO; 3196 3197 ret = raw_cmd_copyin(cmd, param, &my_raw_cmd); 3198 if (ret) { 3199 raw_cmd_free(&my_raw_cmd); 3200 return ret; 3201 } 3202 3203 raw_cmd = my_raw_cmd; 3204 cont = &raw_cmd_cont; 3205 ret = wait_til_done(floppy_start, true); 3206 debug_dcl(DP->flags, "calling disk change from raw_cmd ioctl\n"); 3207 3208 if (ret != -EINTR && FDCS->reset) 3209 ret = -EIO; 3210 3211 DRS->track = NO_TRACK; 3212 3213 ret2 = raw_cmd_copyout(cmd, param, my_raw_cmd); 3214 if (!ret) 3215 ret = ret2; 3216 raw_cmd_free(&my_raw_cmd); 3217 return ret; 3218 } 3219 3220 static int invalidate_drive(struct block_device *bdev) 3221 { 3222 /* invalidate the buffer track to force a reread */ 3223 set_bit((long)bdev->bd_disk->private_data, &fake_change); 3224 process_fd_request(); 3225 check_disk_change(bdev); 3226 return 0; 3227 } 3228 3229 static int set_geometry(unsigned int cmd, struct floppy_struct *g, 3230 int drive, int type, struct block_device *bdev) 3231 { 3232 int cnt; 3233 3234 /* sanity checking for parameters. */ 3235 if (g->sect <= 0 || 3236 g->head <= 0 || 3237 g->track <= 0 || g->track > UDP->tracks >> STRETCH(g) || 3238 /* check if reserved bits are set */ 3239 (g->stretch & ~(FD_STRETCH | FD_SWAPSIDES | FD_SECTBASEMASK)) != 0) 3240 return -EINVAL; 3241 if (type) { 3242 if (!capable(CAP_SYS_ADMIN)) 3243 return -EPERM; 3244 mutex_lock(&open_lock); 3245 if (lock_fdc(drive)) { 3246 mutex_unlock(&open_lock); 3247 return -EINTR; 3248 } 3249 floppy_type[type] = *g; 3250 floppy_type[type].name = "user format"; 3251 for (cnt = type << 2; cnt < (type << 2) + 4; cnt++) 3252 floppy_sizes[cnt] = floppy_sizes[cnt + 0x80] = 3253 floppy_type[type].size + 1; 3254 process_fd_request(); 3255 for (cnt = 0; cnt < N_DRIVE; cnt++) { 3256 struct block_device *bdev = opened_bdev[cnt]; 3257 if (!bdev || ITYPE(drive_state[cnt].fd_device) != type) 3258 continue; 3259 __invalidate_device(bdev, true); 3260 } 3261 mutex_unlock(&open_lock); 3262 } else { 3263 int oldStretch; 3264 3265 if (lock_fdc(drive)) 3266 return -EINTR; 3267 if (cmd != FDDEFPRM) { 3268 /* notice a disk change immediately, else 3269 * we lose our settings immediately*/ 3270 if (poll_drive(true, FD_RAW_NEED_DISK) == -EINTR) 3271 return -EINTR; 3272 } 3273 oldStretch = g->stretch; 3274 user_params[drive] = *g; 3275 if (buffer_drive == drive) 3276 SUPBOUND(buffer_max, user_params[drive].sect); 3277 current_type[drive] = &user_params[drive]; 3278 floppy_sizes[drive] = user_params[drive].size; 3279 if (cmd == FDDEFPRM) 3280 DRS->keep_data = -1; 3281 else 3282 DRS->keep_data = 1; 3283 /* invalidation. Invalidate only when needed, i.e. 3284 * when there are already sectors in the buffer cache 3285 * whose number will change. This is useful, because 3286 * mtools often changes the geometry of the disk after 3287 * looking at the boot block */ 3288 if (DRS->maxblock > user_params[drive].sect || 3289 DRS->maxtrack || 3290 ((user_params[drive].sect ^ oldStretch) & 3291 (FD_SWAPSIDES | FD_SECTBASEMASK))) 3292 invalidate_drive(bdev); 3293 else 3294 process_fd_request(); 3295 } 3296 return 0; 3297 } 3298 3299 /* handle obsolete ioctl's */ 3300 static unsigned int ioctl_table[] = { 3301 FDCLRPRM, 3302 FDSETPRM, 3303 FDDEFPRM, 3304 FDGETPRM, 3305 FDMSGON, 3306 FDMSGOFF, 3307 FDFMTBEG, 3308 FDFMTTRK, 3309 FDFMTEND, 3310 FDSETEMSGTRESH, 3311 FDFLUSH, 3312 FDSETMAXERRS, 3313 FDGETMAXERRS, 3314 FDGETDRVTYP, 3315 FDSETDRVPRM, 3316 FDGETDRVPRM, 3317 FDGETDRVSTAT, 3318 FDPOLLDRVSTAT, 3319 FDRESET, 3320 FDGETFDCSTAT, 3321 FDWERRORCLR, 3322 FDWERRORGET, 3323 FDRAWCMD, 3324 FDEJECT, 3325 FDTWADDLE 3326 }; 3327 3328 static int normalize_ioctl(unsigned int *cmd, int *size) 3329 { 3330 int i; 3331 3332 for (i = 0; i < ARRAY_SIZE(ioctl_table); i++) { 3333 if ((*cmd & 0xffff) == (ioctl_table[i] & 0xffff)) { 3334 *size = _IOC_SIZE(*cmd); 3335 *cmd = ioctl_table[i]; 3336 if (*size > _IOC_SIZE(*cmd)) { 3337 pr_info("ioctl not yet supported\n"); 3338 return -EFAULT; 3339 } 3340 return 0; 3341 } 3342 } 3343 return -EINVAL; 3344 } 3345 3346 static int get_floppy_geometry(int drive, int type, struct floppy_struct **g) 3347 { 3348 if (type) 3349 *g = &floppy_type[type]; 3350 else { 3351 if (lock_fdc(drive)) 3352 return -EINTR; 3353 if (poll_drive(false, 0) == -EINTR) 3354 return -EINTR; 3355 process_fd_request(); 3356 *g = current_type[drive]; 3357 } 3358 if (!*g) 3359 return -ENODEV; 3360 return 0; 3361 } 3362 3363 static int fd_getgeo(struct block_device *bdev, struct hd_geometry *geo) 3364 { 3365 int drive = (long)bdev->bd_disk->private_data; 3366 int type = ITYPE(drive_state[drive].fd_device); 3367 struct floppy_struct *g; 3368 int ret; 3369 3370 ret = get_floppy_geometry(drive, type, &g); 3371 if (ret) 3372 return ret; 3373 3374 geo->heads = g->head; 3375 geo->sectors = g->sect; 3376 geo->cylinders = g->track; 3377 return 0; 3378 } 3379 3380 static int fd_locked_ioctl(struct block_device *bdev, fmode_t mode, unsigned int cmd, 3381 unsigned long param) 3382 { 3383 int drive = (long)bdev->bd_disk->private_data; 3384 int type = ITYPE(UDRS->fd_device); 3385 int i; 3386 int ret; 3387 int size; 3388 union inparam { 3389 struct floppy_struct g; /* geometry */ 3390 struct format_descr f; 3391 struct floppy_max_errors max_errors; 3392 struct floppy_drive_params dp; 3393 } inparam; /* parameters coming from user space */ 3394 const void *outparam; /* parameters passed back to user space */ 3395 3396 /* convert compatibility eject ioctls into floppy eject ioctl. 3397 * We do this in order to provide a means to eject floppy disks before 3398 * installing the new fdutils package */ 3399 if (cmd == CDROMEJECT || /* CD-ROM eject */ 3400 cmd == 0x6470) { /* SunOS floppy eject */ 3401 DPRINT("obsolete eject ioctl\n"); 3402 DPRINT("please use floppycontrol --eject\n"); 3403 cmd = FDEJECT; 3404 } 3405 3406 if (!((cmd & 0xff00) == 0x0200)) 3407 return -EINVAL; 3408 3409 /* convert the old style command into a new style command */ 3410 ret = normalize_ioctl(&cmd, &size); 3411 if (ret) 3412 return ret; 3413 3414 /* permission checks */ 3415 if (((cmd & 0x40) && !(mode & (FMODE_WRITE | FMODE_WRITE_IOCTL))) || 3416 ((cmd & 0x80) && !capable(CAP_SYS_ADMIN))) 3417 return -EPERM; 3418 3419 if (WARN_ON(size < 0 || size > sizeof(inparam))) 3420 return -EINVAL; 3421 3422 /* copyin */ 3423 memset(&inparam, 0, sizeof(inparam)); 3424 if (_IOC_DIR(cmd) & _IOC_WRITE) { 3425 ret = fd_copyin((void __user *)param, &inparam, size); 3426 if (ret) 3427 return ret; 3428 } 3429 3430 switch (cmd) { 3431 case FDEJECT: 3432 if (UDRS->fd_ref != 1) 3433 /* somebody else has this drive open */ 3434 return -EBUSY; 3435 if (lock_fdc(drive)) 3436 return -EINTR; 3437 3438 /* do the actual eject. Fails on 3439 * non-Sparc architectures */ 3440 ret = fd_eject(UNIT(drive)); 3441 3442 set_bit(FD_DISK_CHANGED_BIT, &UDRS->flags); 3443 set_bit(FD_VERIFY_BIT, &UDRS->flags); 3444 process_fd_request(); 3445 return ret; 3446 case FDCLRPRM: 3447 if (lock_fdc(drive)) 3448 return -EINTR; 3449 current_type[drive] = NULL; 3450 floppy_sizes[drive] = MAX_DISK_SIZE << 1; 3451 UDRS->keep_data = 0; 3452 return invalidate_drive(bdev); 3453 case FDSETPRM: 3454 case FDDEFPRM: 3455 return set_geometry(cmd, &inparam.g, drive, type, bdev); 3456 case FDGETPRM: 3457 ret = get_floppy_geometry(drive, type, 3458 (struct floppy_struct **)&outparam); 3459 if (ret) 3460 return ret; 3461 memcpy(&inparam.g, outparam, 3462 offsetof(struct floppy_struct, name)); 3463 outparam = &inparam.g; 3464 break; 3465 case FDMSGON: 3466 UDP->flags |= FTD_MSG; 3467 return 0; 3468 case FDMSGOFF: 3469 UDP->flags &= ~FTD_MSG; 3470 return 0; 3471 case FDFMTBEG: 3472 if (lock_fdc(drive)) 3473 return -EINTR; 3474 if (poll_drive(true, FD_RAW_NEED_DISK) == -EINTR) 3475 return -EINTR; 3476 ret = UDRS->flags; 3477 process_fd_request(); 3478 if (ret & FD_VERIFY) 3479 return -ENODEV; 3480 if (!(ret & FD_DISK_WRITABLE)) 3481 return -EROFS; 3482 return 0; 3483 case FDFMTTRK: 3484 if (UDRS->fd_ref != 1) 3485 return -EBUSY; 3486 return do_format(drive, &inparam.f); 3487 case FDFMTEND: 3488 case FDFLUSH: 3489 if (lock_fdc(drive)) 3490 return -EINTR; 3491 return invalidate_drive(bdev); 3492 case FDSETEMSGTRESH: 3493 UDP->max_errors.reporting = (unsigned short)(param & 0x0f); 3494 return 0; 3495 case FDGETMAXERRS: 3496 outparam = &UDP->max_errors; 3497 break; 3498 case FDSETMAXERRS: 3499 UDP->max_errors = inparam.max_errors; 3500 break; 3501 case FDGETDRVTYP: 3502 outparam = drive_name(type, drive); 3503 SUPBOUND(size, strlen((const char *)outparam) + 1); 3504 break; 3505 case FDSETDRVPRM: 3506 *UDP = inparam.dp; 3507 break; 3508 case FDGETDRVPRM: 3509 outparam = UDP; 3510 break; 3511 case FDPOLLDRVSTAT: 3512 if (lock_fdc(drive)) 3513 return -EINTR; 3514 if (poll_drive(true, FD_RAW_NEED_DISK) == -EINTR) 3515 return -EINTR; 3516 process_fd_request(); 3517 /* fall through */ 3518 case FDGETDRVSTAT: 3519 outparam = UDRS; 3520 break; 3521 case FDRESET: 3522 return user_reset_fdc(drive, (int)param, true); 3523 case FDGETFDCSTAT: 3524 outparam = UFDCS; 3525 break; 3526 case FDWERRORCLR: 3527 memset(UDRWE, 0, sizeof(*UDRWE)); 3528 return 0; 3529 case FDWERRORGET: 3530 outparam = UDRWE; 3531 break; 3532 case FDRAWCMD: 3533 if (type) 3534 return -EINVAL; 3535 if (lock_fdc(drive)) 3536 return -EINTR; 3537 set_floppy(drive); 3538 i = raw_cmd_ioctl(cmd, (void __user *)param); 3539 if (i == -EINTR) 3540 return -EINTR; 3541 process_fd_request(); 3542 return i; 3543 case FDTWADDLE: 3544 if (lock_fdc(drive)) 3545 return -EINTR; 3546 twaddle(); 3547 process_fd_request(); 3548 return 0; 3549 default: 3550 return -EINVAL; 3551 } 3552 3553 if (_IOC_DIR(cmd) & _IOC_READ) 3554 return fd_copyout((void __user *)param, outparam, size); 3555 3556 return 0; 3557 } 3558 3559 static int fd_ioctl(struct block_device *bdev, fmode_t mode, 3560 unsigned int cmd, unsigned long param) 3561 { 3562 int ret; 3563 3564 mutex_lock(&floppy_mutex); 3565 ret = fd_locked_ioctl(bdev, mode, cmd, param); 3566 mutex_unlock(&floppy_mutex); 3567 3568 return ret; 3569 } 3570 3571 #ifdef CONFIG_COMPAT 3572 3573 struct compat_floppy_drive_params { 3574 char cmos; 3575 compat_ulong_t max_dtr; 3576 compat_ulong_t hlt; 3577 compat_ulong_t hut; 3578 compat_ulong_t srt; 3579 compat_ulong_t spinup; 3580 compat_ulong_t spindown; 3581 unsigned char spindown_offset; 3582 unsigned char select_delay; 3583 unsigned char rps; 3584 unsigned char tracks; 3585 compat_ulong_t timeout; 3586 unsigned char interleave_sect; 3587 struct floppy_max_errors max_errors; 3588 char flags; 3589 char read_track; 3590 short autodetect[8]; 3591 compat_int_t checkfreq; 3592 compat_int_t native_format; 3593 }; 3594 3595 struct compat_floppy_drive_struct { 3596 signed char flags; 3597 compat_ulong_t spinup_date; 3598 compat_ulong_t select_date; 3599 compat_ulong_t first_read_date; 3600 short probed_format; 3601 short track; 3602 short maxblock; 3603 short maxtrack; 3604 compat_int_t generation; 3605 compat_int_t keep_data; 3606 compat_int_t fd_ref; 3607 compat_int_t fd_device; 3608 compat_int_t last_checked; 3609 compat_caddr_t dmabuf; 3610 compat_int_t bufblocks; 3611 }; 3612 3613 struct compat_floppy_fdc_state { 3614 compat_int_t spec1; 3615 compat_int_t spec2; 3616 compat_int_t dtr; 3617 unsigned char version; 3618 unsigned char dor; 3619 compat_ulong_t address; 3620 unsigned int rawcmd:2; 3621 unsigned int reset:1; 3622 unsigned int need_configure:1; 3623 unsigned int perp_mode:2; 3624 unsigned int has_fifo:1; 3625 unsigned int driver_version; 3626 unsigned char track[4]; 3627 }; 3628 3629 struct compat_floppy_write_errors { 3630 unsigned int write_errors; 3631 compat_ulong_t first_error_sector; 3632 compat_int_t first_error_generation; 3633 compat_ulong_t last_error_sector; 3634 compat_int_t last_error_generation; 3635 compat_uint_t badness; 3636 }; 3637 3638 #define FDSETPRM32 _IOW(2, 0x42, struct compat_floppy_struct) 3639 #define FDDEFPRM32 _IOW(2, 0x43, struct compat_floppy_struct) 3640 #define FDSETDRVPRM32 _IOW(2, 0x90, struct compat_floppy_drive_params) 3641 #define FDGETDRVPRM32 _IOR(2, 0x11, struct compat_floppy_drive_params) 3642 #define FDGETDRVSTAT32 _IOR(2, 0x12, struct compat_floppy_drive_struct) 3643 #define FDPOLLDRVSTAT32 _IOR(2, 0x13, struct compat_floppy_drive_struct) 3644 #define FDGETFDCSTAT32 _IOR(2, 0x15, struct compat_floppy_fdc_state) 3645 #define FDWERRORGET32 _IOR(2, 0x17, struct compat_floppy_write_errors) 3646 3647 static int compat_set_geometry(struct block_device *bdev, fmode_t mode, unsigned int cmd, 3648 struct compat_floppy_struct __user *arg) 3649 { 3650 struct floppy_struct v; 3651 int drive, type; 3652 int err; 3653 3654 BUILD_BUG_ON(offsetof(struct floppy_struct, name) != 3655 offsetof(struct compat_floppy_struct, name)); 3656 3657 if (!(mode & (FMODE_WRITE | FMODE_WRITE_IOCTL))) 3658 return -EPERM; 3659 3660 memset(&v, 0, sizeof(struct floppy_struct)); 3661 if (copy_from_user(&v, arg, offsetof(struct floppy_struct, name))) 3662 return -EFAULT; 3663 3664 mutex_lock(&floppy_mutex); 3665 drive = (long)bdev->bd_disk->private_data; 3666 type = ITYPE(UDRS->fd_device); 3667 err = set_geometry(cmd == FDSETPRM32 ? FDSETPRM : FDDEFPRM, 3668 &v, drive, type, bdev); 3669 mutex_unlock(&floppy_mutex); 3670 return err; 3671 } 3672 3673 static int compat_get_prm(int drive, 3674 struct compat_floppy_struct __user *arg) 3675 { 3676 struct compat_floppy_struct v; 3677 struct floppy_struct *p; 3678 int err; 3679 3680 memset(&v, 0, sizeof(v)); 3681 mutex_lock(&floppy_mutex); 3682 err = get_floppy_geometry(drive, ITYPE(UDRS->fd_device), &p); 3683 if (err) { 3684 mutex_unlock(&floppy_mutex); 3685 return err; 3686 } 3687 memcpy(&v, p, offsetof(struct floppy_struct, name)); 3688 mutex_unlock(&floppy_mutex); 3689 if (copy_to_user(arg, &v, sizeof(struct compat_floppy_struct))) 3690 return -EFAULT; 3691 return 0; 3692 } 3693 3694 static int compat_setdrvprm(int drive, 3695 struct compat_floppy_drive_params __user *arg) 3696 { 3697 struct compat_floppy_drive_params v; 3698 3699 if (!capable(CAP_SYS_ADMIN)) 3700 return -EPERM; 3701 if (copy_from_user(&v, arg, sizeof(struct compat_floppy_drive_params))) 3702 return -EFAULT; 3703 mutex_lock(&floppy_mutex); 3704 UDP->cmos = v.cmos; 3705 UDP->max_dtr = v.max_dtr; 3706 UDP->hlt = v.hlt; 3707 UDP->hut = v.hut; 3708 UDP->srt = v.srt; 3709 UDP->spinup = v.spinup; 3710 UDP->spindown = v.spindown; 3711 UDP->spindown_offset = v.spindown_offset; 3712 UDP->select_delay = v.select_delay; 3713 UDP->rps = v.rps; 3714 UDP->tracks = v.tracks; 3715 UDP->timeout = v.timeout; 3716 UDP->interleave_sect = v.interleave_sect; 3717 UDP->max_errors = v.max_errors; 3718 UDP->flags = v.flags; 3719 UDP->read_track = v.read_track; 3720 memcpy(UDP->autodetect, v.autodetect, sizeof(v.autodetect)); 3721 UDP->checkfreq = v.checkfreq; 3722 UDP->native_format = v.native_format; 3723 mutex_unlock(&floppy_mutex); 3724 return 0; 3725 } 3726 3727 static int compat_getdrvprm(int drive, 3728 struct compat_floppy_drive_params __user *arg) 3729 { 3730 struct compat_floppy_drive_params v; 3731 3732 memset(&v, 0, sizeof(struct compat_floppy_drive_params)); 3733 mutex_lock(&floppy_mutex); 3734 v.cmos = UDP->cmos; 3735 v.max_dtr = UDP->max_dtr; 3736 v.hlt = UDP->hlt; 3737 v.hut = UDP->hut; 3738 v.srt = UDP->srt; 3739 v.spinup = UDP->spinup; 3740 v.spindown = UDP->spindown; 3741 v.spindown_offset = UDP->spindown_offset; 3742 v.select_delay = UDP->select_delay; 3743 v.rps = UDP->rps; 3744 v.tracks = UDP->tracks; 3745 v.timeout = UDP->timeout; 3746 v.interleave_sect = UDP->interleave_sect; 3747 v.max_errors = UDP->max_errors; 3748 v.flags = UDP->flags; 3749 v.read_track = UDP->read_track; 3750 memcpy(v.autodetect, UDP->autodetect, sizeof(v.autodetect)); 3751 v.checkfreq = UDP->checkfreq; 3752 v.native_format = UDP->native_format; 3753 mutex_unlock(&floppy_mutex); 3754 3755 if (copy_from_user(arg, &v, sizeof(struct compat_floppy_drive_params))) 3756 return -EFAULT; 3757 return 0; 3758 } 3759 3760 static int compat_getdrvstat(int drive, bool poll, 3761 struct compat_floppy_drive_struct __user *arg) 3762 { 3763 struct compat_floppy_drive_struct v; 3764 3765 memset(&v, 0, sizeof(struct compat_floppy_drive_struct)); 3766 mutex_lock(&floppy_mutex); 3767 3768 if (poll) { 3769 if (lock_fdc(drive)) 3770 goto Eintr; 3771 if (poll_drive(true, FD_RAW_NEED_DISK) == -EINTR) 3772 goto Eintr; 3773 process_fd_request(); 3774 } 3775 v.spinup_date = UDRS->spinup_date; 3776 v.select_date = UDRS->select_date; 3777 v.first_read_date = UDRS->first_read_date; 3778 v.probed_format = UDRS->probed_format; 3779 v.track = UDRS->track; 3780 v.maxblock = UDRS->maxblock; 3781 v.maxtrack = UDRS->maxtrack; 3782 v.generation = UDRS->generation; 3783 v.keep_data = UDRS->keep_data; 3784 v.fd_ref = UDRS->fd_ref; 3785 v.fd_device = UDRS->fd_device; 3786 v.last_checked = UDRS->last_checked; 3787 v.dmabuf = (uintptr_t)UDRS->dmabuf; 3788 v.bufblocks = UDRS->bufblocks; 3789 mutex_unlock(&floppy_mutex); 3790 3791 if (copy_from_user(arg, &v, sizeof(struct compat_floppy_drive_struct))) 3792 return -EFAULT; 3793 return 0; 3794 Eintr: 3795 mutex_unlock(&floppy_mutex); 3796 return -EINTR; 3797 } 3798 3799 static int compat_getfdcstat(int drive, 3800 struct compat_floppy_fdc_state __user *arg) 3801 { 3802 struct compat_floppy_fdc_state v32; 3803 struct floppy_fdc_state v; 3804 3805 mutex_lock(&floppy_mutex); 3806 v = *UFDCS; 3807 mutex_unlock(&floppy_mutex); 3808 3809 memset(&v32, 0, sizeof(struct compat_floppy_fdc_state)); 3810 v32.spec1 = v.spec1; 3811 v32.spec2 = v.spec2; 3812 v32.dtr = v.dtr; 3813 v32.version = v.version; 3814 v32.dor = v.dor; 3815 v32.address = v.address; 3816 v32.rawcmd = v.rawcmd; 3817 v32.reset = v.reset; 3818 v32.need_configure = v.need_configure; 3819 v32.perp_mode = v.perp_mode; 3820 v32.has_fifo = v.has_fifo; 3821 v32.driver_version = v.driver_version; 3822 memcpy(v32.track, v.track, 4); 3823 if (copy_to_user(arg, &v32, sizeof(struct compat_floppy_fdc_state))) 3824 return -EFAULT; 3825 return 0; 3826 } 3827 3828 static int compat_werrorget(int drive, 3829 struct compat_floppy_write_errors __user *arg) 3830 { 3831 struct compat_floppy_write_errors v32; 3832 struct floppy_write_errors v; 3833 3834 memset(&v32, 0, sizeof(struct compat_floppy_write_errors)); 3835 mutex_lock(&floppy_mutex); 3836 v = *UDRWE; 3837 mutex_unlock(&floppy_mutex); 3838 v32.write_errors = v.write_errors; 3839 v32.first_error_sector = v.first_error_sector; 3840 v32.first_error_generation = v.first_error_generation; 3841 v32.last_error_sector = v.last_error_sector; 3842 v32.last_error_generation = v.last_error_generation; 3843 v32.badness = v.badness; 3844 if (copy_to_user(arg, &v32, sizeof(struct compat_floppy_write_errors))) 3845 return -EFAULT; 3846 return 0; 3847 } 3848 3849 static int fd_compat_ioctl(struct block_device *bdev, fmode_t mode, unsigned int cmd, 3850 unsigned long param) 3851 { 3852 int drive = (long)bdev->bd_disk->private_data; 3853 switch (cmd) { 3854 case FDMSGON: 3855 case FDMSGOFF: 3856 case FDSETEMSGTRESH: 3857 case FDFLUSH: 3858 case FDWERRORCLR: 3859 case FDEJECT: 3860 case FDCLRPRM: 3861 case FDFMTBEG: 3862 case FDRESET: 3863 case FDTWADDLE: 3864 return fd_ioctl(bdev, mode, cmd, param); 3865 case FDSETMAXERRS: 3866 case FDGETMAXERRS: 3867 case FDGETDRVTYP: 3868 case FDFMTEND: 3869 case FDFMTTRK: 3870 case FDRAWCMD: 3871 return fd_ioctl(bdev, mode, cmd, 3872 (unsigned long)compat_ptr(param)); 3873 case FDSETPRM32: 3874 case FDDEFPRM32: 3875 return compat_set_geometry(bdev, mode, cmd, compat_ptr(param)); 3876 case FDGETPRM32: 3877 return compat_get_prm(drive, compat_ptr(param)); 3878 case FDSETDRVPRM32: 3879 return compat_setdrvprm(drive, compat_ptr(param)); 3880 case FDGETDRVPRM32: 3881 return compat_getdrvprm(drive, compat_ptr(param)); 3882 case FDPOLLDRVSTAT32: 3883 return compat_getdrvstat(drive, true, compat_ptr(param)); 3884 case FDGETDRVSTAT32: 3885 return compat_getdrvstat(drive, false, compat_ptr(param)); 3886 case FDGETFDCSTAT32: 3887 return compat_getfdcstat(drive, compat_ptr(param)); 3888 case FDWERRORGET32: 3889 return compat_werrorget(drive, compat_ptr(param)); 3890 } 3891 return -EINVAL; 3892 } 3893 #endif 3894 3895 static void __init config_types(void) 3896 { 3897 bool has_drive = false; 3898 int drive; 3899 3900 /* read drive info out of physical CMOS */ 3901 drive = 0; 3902 if (!UDP->cmos) 3903 UDP->cmos = FLOPPY0_TYPE; 3904 drive = 1; 3905 if (!UDP->cmos && FLOPPY1_TYPE) 3906 UDP->cmos = FLOPPY1_TYPE; 3907 3908 /* FIXME: additional physical CMOS drive detection should go here */ 3909 3910 for (drive = 0; drive < N_DRIVE; drive++) { 3911 unsigned int type = UDP->cmos; 3912 struct floppy_drive_params *params; 3913 const char *name = NULL; 3914 char temparea[32]; 3915 3916 if (type < ARRAY_SIZE(default_drive_params)) { 3917 params = &default_drive_params[type].params; 3918 if (type) { 3919 name = default_drive_params[type].name; 3920 allowed_drive_mask |= 1 << drive; 3921 } else 3922 allowed_drive_mask &= ~(1 << drive); 3923 } else { 3924 params = &default_drive_params[0].params; 3925 snprintf(temparea, sizeof(temparea), 3926 "unknown type %d (usb?)", type); 3927 name = temparea; 3928 } 3929 if (name) { 3930 const char *prepend; 3931 if (!has_drive) { 3932 prepend = ""; 3933 has_drive = true; 3934 pr_info("Floppy drive(s):"); 3935 } else { 3936 prepend = ","; 3937 } 3938 3939 pr_cont("%s fd%d is %s", prepend, drive, name); 3940 } 3941 *UDP = *params; 3942 } 3943 3944 if (has_drive) 3945 pr_cont("\n"); 3946 } 3947 3948 static void floppy_release(struct gendisk *disk, fmode_t mode) 3949 { 3950 int drive = (long)disk->private_data; 3951 3952 mutex_lock(&floppy_mutex); 3953 mutex_lock(&open_lock); 3954 if (!UDRS->fd_ref--) { 3955 DPRINT("floppy_release with fd_ref == 0"); 3956 UDRS->fd_ref = 0; 3957 } 3958 if (!UDRS->fd_ref) 3959 opened_bdev[drive] = NULL; 3960 mutex_unlock(&open_lock); 3961 mutex_unlock(&floppy_mutex); 3962 } 3963 3964 /* 3965 * floppy_open check for aliasing (/dev/fd0 can be the same as 3966 * /dev/PS0 etc), and disallows simultaneous access to the same 3967 * drive with different device numbers. 3968 */ 3969 static int floppy_open(struct block_device *bdev, fmode_t mode) 3970 { 3971 int drive = (long)bdev->bd_disk->private_data; 3972 int old_dev, new_dev; 3973 int try; 3974 int res = -EBUSY; 3975 char *tmp; 3976 3977 mutex_lock(&floppy_mutex); 3978 mutex_lock(&open_lock); 3979 old_dev = UDRS->fd_device; 3980 if (opened_bdev[drive] && opened_bdev[drive] != bdev) 3981 goto out2; 3982 3983 if (!UDRS->fd_ref && (UDP->flags & FD_BROKEN_DCL)) { 3984 set_bit(FD_DISK_CHANGED_BIT, &UDRS->flags); 3985 set_bit(FD_VERIFY_BIT, &UDRS->flags); 3986 } 3987 3988 UDRS->fd_ref++; 3989 3990 opened_bdev[drive] = bdev; 3991 3992 res = -ENXIO; 3993 3994 if (!floppy_track_buffer) { 3995 /* if opening an ED drive, reserve a big buffer, 3996 * else reserve a small one */ 3997 if ((UDP->cmos == 6) || (UDP->cmos == 5)) 3998 try = 64; /* Only 48 actually useful */ 3999 else 4000 try = 32; /* Only 24 actually useful */ 4001 4002 tmp = (char *)fd_dma_mem_alloc(1024 * try); 4003 if (!tmp && !floppy_track_buffer) { 4004 try >>= 1; /* buffer only one side */ 4005 INFBOUND(try, 16); 4006 tmp = (char *)fd_dma_mem_alloc(1024 * try); 4007 } 4008 if (!tmp && !floppy_track_buffer) 4009 fallback_on_nodma_alloc(&tmp, 2048 * try); 4010 if (!tmp && !floppy_track_buffer) { 4011 DPRINT("Unable to allocate DMA memory\n"); 4012 goto out; 4013 } 4014 if (floppy_track_buffer) { 4015 if (tmp) 4016 fd_dma_mem_free((unsigned long)tmp, try * 1024); 4017 } else { 4018 buffer_min = buffer_max = -1; 4019 floppy_track_buffer = tmp; 4020 max_buffer_sectors = try; 4021 } 4022 } 4023 4024 new_dev = MINOR(bdev->bd_dev); 4025 UDRS->fd_device = new_dev; 4026 set_capacity(disks[drive], floppy_sizes[new_dev]); 4027 if (old_dev != -1 && old_dev != new_dev) { 4028 if (buffer_drive == drive) 4029 buffer_track = -1; 4030 } 4031 4032 if (UFDCS->rawcmd == 1) 4033 UFDCS->rawcmd = 2; 4034 4035 if (!(mode & FMODE_NDELAY)) { 4036 if (mode & (FMODE_READ|FMODE_WRITE)) { 4037 UDRS->last_checked = 0; 4038 clear_bit(FD_OPEN_SHOULD_FAIL_BIT, &UDRS->flags); 4039 check_disk_change(bdev); 4040 if (test_bit(FD_DISK_CHANGED_BIT, &UDRS->flags)) 4041 goto out; 4042 if (test_bit(FD_OPEN_SHOULD_FAIL_BIT, &UDRS->flags)) 4043 goto out; 4044 } 4045 res = -EROFS; 4046 if ((mode & FMODE_WRITE) && 4047 !test_bit(FD_DISK_WRITABLE_BIT, &UDRS->flags)) 4048 goto out; 4049 } 4050 mutex_unlock(&open_lock); 4051 mutex_unlock(&floppy_mutex); 4052 return 0; 4053 out: 4054 UDRS->fd_ref--; 4055 4056 if (!UDRS->fd_ref) 4057 opened_bdev[drive] = NULL; 4058 out2: 4059 mutex_unlock(&open_lock); 4060 mutex_unlock(&floppy_mutex); 4061 return res; 4062 } 4063 4064 /* 4065 * Check if the disk has been changed or if a change has been faked. 4066 */ 4067 static unsigned int floppy_check_events(struct gendisk *disk, 4068 unsigned int clearing) 4069 { 4070 int drive = (long)disk->private_data; 4071 4072 if (test_bit(FD_DISK_CHANGED_BIT, &UDRS->flags) || 4073 test_bit(FD_VERIFY_BIT, &UDRS->flags)) 4074 return DISK_EVENT_MEDIA_CHANGE; 4075 4076 if (time_after(jiffies, UDRS->last_checked + UDP->checkfreq)) { 4077 if (lock_fdc(drive)) 4078 return -EINTR; 4079 poll_drive(false, 0); 4080 process_fd_request(); 4081 } 4082 4083 if (test_bit(FD_DISK_CHANGED_BIT, &UDRS->flags) || 4084 test_bit(FD_VERIFY_BIT, &UDRS->flags) || 4085 test_bit(drive, &fake_change) || 4086 drive_no_geom(drive)) 4087 return DISK_EVENT_MEDIA_CHANGE; 4088 return 0; 4089 } 4090 4091 /* 4092 * This implements "read block 0" for floppy_revalidate(). 4093 * Needed for format autodetection, checking whether there is 4094 * a disk in the drive, and whether that disk is writable. 4095 */ 4096 4097 struct rb0_cbdata { 4098 int drive; 4099 struct completion complete; 4100 }; 4101 4102 static void floppy_rb0_cb(struct bio *bio) 4103 { 4104 struct rb0_cbdata *cbdata = (struct rb0_cbdata *)bio->bi_private; 4105 int drive = cbdata->drive; 4106 4107 if (bio->bi_status) { 4108 pr_info("floppy: error %d while reading block 0\n", 4109 bio->bi_status); 4110 set_bit(FD_OPEN_SHOULD_FAIL_BIT, &UDRS->flags); 4111 } 4112 complete(&cbdata->complete); 4113 } 4114 4115 static int __floppy_read_block_0(struct block_device *bdev, int drive) 4116 { 4117 struct bio bio; 4118 struct bio_vec bio_vec; 4119 struct page *page; 4120 struct rb0_cbdata cbdata; 4121 size_t size; 4122 4123 page = alloc_page(GFP_NOIO); 4124 if (!page) { 4125 process_fd_request(); 4126 return -ENOMEM; 4127 } 4128 4129 size = bdev->bd_block_size; 4130 if (!size) 4131 size = 1024; 4132 4133 cbdata.drive = drive; 4134 4135 bio_init(&bio, &bio_vec, 1); 4136 bio_set_dev(&bio, bdev); 4137 bio_add_page(&bio, page, size, 0); 4138 4139 bio.bi_iter.bi_sector = 0; 4140 bio.bi_flags |= (1 << BIO_QUIET); 4141 bio.bi_private = &cbdata; 4142 bio.bi_end_io = floppy_rb0_cb; 4143 bio_set_op_attrs(&bio, REQ_OP_READ, 0); 4144 4145 init_completion(&cbdata.complete); 4146 4147 submit_bio(&bio); 4148 process_fd_request(); 4149 4150 wait_for_completion(&cbdata.complete); 4151 4152 __free_page(page); 4153 4154 return 0; 4155 } 4156 4157 /* revalidate the floppy disk, i.e. trigger format autodetection by reading 4158 * the bootblock (block 0). "Autodetection" is also needed to check whether 4159 * there is a disk in the drive at all... Thus we also do it for fixed 4160 * geometry formats */ 4161 static int floppy_revalidate(struct gendisk *disk) 4162 { 4163 int drive = (long)disk->private_data; 4164 int cf; 4165 int res = 0; 4166 4167 if (test_bit(FD_DISK_CHANGED_BIT, &UDRS->flags) || 4168 test_bit(FD_VERIFY_BIT, &UDRS->flags) || 4169 test_bit(drive, &fake_change) || 4170 drive_no_geom(drive)) { 4171 if (WARN(atomic_read(&usage_count) == 0, 4172 "VFS: revalidate called on non-open device.\n")) 4173 return -EFAULT; 4174 4175 res = lock_fdc(drive); 4176 if (res) 4177 return res; 4178 cf = (test_bit(FD_DISK_CHANGED_BIT, &UDRS->flags) || 4179 test_bit(FD_VERIFY_BIT, &UDRS->flags)); 4180 if (!(cf || test_bit(drive, &fake_change) || drive_no_geom(drive))) { 4181 process_fd_request(); /*already done by another thread */ 4182 return 0; 4183 } 4184 UDRS->maxblock = 0; 4185 UDRS->maxtrack = 0; 4186 if (buffer_drive == drive) 4187 buffer_track = -1; 4188 clear_bit(drive, &fake_change); 4189 clear_bit(FD_DISK_CHANGED_BIT, &UDRS->flags); 4190 if (cf) 4191 UDRS->generation++; 4192 if (drive_no_geom(drive)) { 4193 /* auto-sensing */ 4194 res = __floppy_read_block_0(opened_bdev[drive], drive); 4195 } else { 4196 if (cf) 4197 poll_drive(false, FD_RAW_NEED_DISK); 4198 process_fd_request(); 4199 } 4200 } 4201 set_capacity(disk, floppy_sizes[UDRS->fd_device]); 4202 return res; 4203 } 4204 4205 static const struct block_device_operations floppy_fops = { 4206 .owner = THIS_MODULE, 4207 .open = floppy_open, 4208 .release = floppy_release, 4209 .ioctl = fd_ioctl, 4210 .getgeo = fd_getgeo, 4211 .check_events = floppy_check_events, 4212 .revalidate_disk = floppy_revalidate, 4213 #ifdef CONFIG_COMPAT 4214 .compat_ioctl = fd_compat_ioctl, 4215 #endif 4216 }; 4217 4218 /* 4219 * Floppy Driver initialization 4220 * ============================= 4221 */ 4222 4223 /* Determine the floppy disk controller type */ 4224 /* This routine was written by David C. Niemi */ 4225 static char __init get_fdc_version(void) 4226 { 4227 int r; 4228 4229 output_byte(FD_DUMPREGS); /* 82072 and better know DUMPREGS */ 4230 if (FDCS->reset) 4231 return FDC_NONE; 4232 r = result(); 4233 if (r <= 0x00) 4234 return FDC_NONE; /* No FDC present ??? */ 4235 if ((r == 1) && (reply_buffer[0] == 0x80)) { 4236 pr_info("FDC %d is an 8272A\n", fdc); 4237 return FDC_8272A; /* 8272a/765 don't know DUMPREGS */ 4238 } 4239 if (r != 10) { 4240 pr_info("FDC %d init: DUMPREGS: unexpected return of %d bytes.\n", 4241 fdc, r); 4242 return FDC_UNKNOWN; 4243 } 4244 4245 if (!fdc_configure()) { 4246 pr_info("FDC %d is an 82072\n", fdc); 4247 return FDC_82072; /* 82072 doesn't know CONFIGURE */ 4248 } 4249 4250 output_byte(FD_PERPENDICULAR); 4251 if (need_more_output() == MORE_OUTPUT) { 4252 output_byte(0); 4253 } else { 4254 pr_info("FDC %d is an 82072A\n", fdc); 4255 return FDC_82072A; /* 82072A as found on Sparcs. */ 4256 } 4257 4258 output_byte(FD_UNLOCK); 4259 r = result(); 4260 if ((r == 1) && (reply_buffer[0] == 0x80)) { 4261 pr_info("FDC %d is a pre-1991 82077\n", fdc); 4262 return FDC_82077_ORIG; /* Pre-1991 82077, doesn't know 4263 * LOCK/UNLOCK */ 4264 } 4265 if ((r != 1) || (reply_buffer[0] != 0x00)) { 4266 pr_info("FDC %d init: UNLOCK: unexpected return of %d bytes.\n", 4267 fdc, r); 4268 return FDC_UNKNOWN; 4269 } 4270 output_byte(FD_PARTID); 4271 r = result(); 4272 if (r != 1) { 4273 pr_info("FDC %d init: PARTID: unexpected return of %d bytes.\n", 4274 fdc, r); 4275 return FDC_UNKNOWN; 4276 } 4277 if (reply_buffer[0] == 0x80) { 4278 pr_info("FDC %d is a post-1991 82077\n", fdc); 4279 return FDC_82077; /* Revised 82077AA passes all the tests */ 4280 } 4281 switch (reply_buffer[0] >> 5) { 4282 case 0x0: 4283 /* Either a 82078-1 or a 82078SL running at 5Volt */ 4284 pr_info("FDC %d is an 82078.\n", fdc); 4285 return FDC_82078; 4286 case 0x1: 4287 pr_info("FDC %d is a 44pin 82078\n", fdc); 4288 return FDC_82078; 4289 case 0x2: 4290 pr_info("FDC %d is a S82078B\n", fdc); 4291 return FDC_S82078B; 4292 case 0x3: 4293 pr_info("FDC %d is a National Semiconductor PC87306\n", fdc); 4294 return FDC_87306; 4295 default: 4296 pr_info("FDC %d init: 82078 variant with unknown PARTID=%d.\n", 4297 fdc, reply_buffer[0] >> 5); 4298 return FDC_82078_UNKN; 4299 } 4300 } /* get_fdc_version */ 4301 4302 /* lilo configuration */ 4303 4304 static void __init floppy_set_flags(int *ints, int param, int param2) 4305 { 4306 int i; 4307 4308 for (i = 0; i < ARRAY_SIZE(default_drive_params); i++) { 4309 if (param) 4310 default_drive_params[i].params.flags |= param2; 4311 else 4312 default_drive_params[i].params.flags &= ~param2; 4313 } 4314 DPRINT("%s flag 0x%x\n", param2 ? "Setting" : "Clearing", param); 4315 } 4316 4317 static void __init daring(int *ints, int param, int param2) 4318 { 4319 int i; 4320 4321 for (i = 0; i < ARRAY_SIZE(default_drive_params); i++) { 4322 if (param) { 4323 default_drive_params[i].params.select_delay = 0; 4324 default_drive_params[i].params.flags |= 4325 FD_SILENT_DCL_CLEAR; 4326 } else { 4327 default_drive_params[i].params.select_delay = 4328 2 * HZ / 100; 4329 default_drive_params[i].params.flags &= 4330 ~FD_SILENT_DCL_CLEAR; 4331 } 4332 } 4333 DPRINT("Assuming %s floppy hardware\n", param ? "standard" : "broken"); 4334 } 4335 4336 static void __init set_cmos(int *ints, int dummy, int dummy2) 4337 { 4338 int current_drive = 0; 4339 4340 if (ints[0] != 2) { 4341 DPRINT("wrong number of parameters for CMOS\n"); 4342 return; 4343 } 4344 current_drive = ints[1]; 4345 if (current_drive < 0 || current_drive >= 8) { 4346 DPRINT("bad drive for set_cmos\n"); 4347 return; 4348 } 4349 #if N_FDC > 1 4350 if (current_drive >= 4 && !FDC2) 4351 FDC2 = 0x370; 4352 #endif 4353 DP->cmos = ints[2]; 4354 DPRINT("setting CMOS code to %d\n", ints[2]); 4355 } 4356 4357 static struct param_table { 4358 const char *name; 4359 void (*fn) (int *ints, int param, int param2); 4360 int *var; 4361 int def_param; 4362 int param2; 4363 } config_params[] __initdata = { 4364 {"allowed_drive_mask", NULL, &allowed_drive_mask, 0xff, 0}, /* obsolete */ 4365 {"all_drives", NULL, &allowed_drive_mask, 0xff, 0}, /* obsolete */ 4366 {"asus_pci", NULL, &allowed_drive_mask, 0x33, 0}, 4367 {"irq", NULL, &FLOPPY_IRQ, 6, 0}, 4368 {"dma", NULL, &FLOPPY_DMA, 2, 0}, 4369 {"daring", daring, NULL, 1, 0}, 4370 #if N_FDC > 1 4371 {"two_fdc", NULL, &FDC2, 0x370, 0}, 4372 {"one_fdc", NULL, &FDC2, 0, 0}, 4373 #endif 4374 {"thinkpad", floppy_set_flags, NULL, 1, FD_INVERTED_DCL}, 4375 {"broken_dcl", floppy_set_flags, NULL, 1, FD_BROKEN_DCL}, 4376 {"messages", floppy_set_flags, NULL, 1, FTD_MSG}, 4377 {"silent_dcl_clear", floppy_set_flags, NULL, 1, FD_SILENT_DCL_CLEAR}, 4378 {"debug", floppy_set_flags, NULL, 1, FD_DEBUG}, 4379 {"nodma", NULL, &can_use_virtual_dma, 1, 0}, 4380 {"omnibook", NULL, &can_use_virtual_dma, 1, 0}, 4381 {"yesdma", NULL, &can_use_virtual_dma, 0, 0}, 4382 {"fifo_depth", NULL, &fifo_depth, 0xa, 0}, 4383 {"nofifo", NULL, &no_fifo, 0x20, 0}, 4384 {"usefifo", NULL, &no_fifo, 0, 0}, 4385 {"cmos", set_cmos, NULL, 0, 0}, 4386 {"slow", NULL, &slow_floppy, 1, 0}, 4387 {"unexpected_interrupts", NULL, &print_unex, 1, 0}, 4388 {"no_unexpected_interrupts", NULL, &print_unex, 0, 0}, 4389 {"L40SX", NULL, &print_unex, 0, 0} 4390 4391 EXTRA_FLOPPY_PARAMS 4392 }; 4393 4394 static int __init floppy_setup(char *str) 4395 { 4396 int i; 4397 int param; 4398 int ints[11]; 4399 4400 str = get_options(str, ARRAY_SIZE(ints), ints); 4401 if (str) { 4402 for (i = 0; i < ARRAY_SIZE(config_params); i++) { 4403 if (strcmp(str, config_params[i].name) == 0) { 4404 if (ints[0]) 4405 param = ints[1]; 4406 else 4407 param = config_params[i].def_param; 4408 if (config_params[i].fn) 4409 config_params[i].fn(ints, param, 4410 config_params[i]. 4411 param2); 4412 if (config_params[i].var) { 4413 DPRINT("%s=%d\n", str, param); 4414 *config_params[i].var = param; 4415 } 4416 return 1; 4417 } 4418 } 4419 } 4420 if (str) { 4421 DPRINT("unknown floppy option [%s]\n", str); 4422 4423 DPRINT("allowed options are:"); 4424 for (i = 0; i < ARRAY_SIZE(config_params); i++) 4425 pr_cont(" %s", config_params[i].name); 4426 pr_cont("\n"); 4427 } else 4428 DPRINT("botched floppy option\n"); 4429 DPRINT("Read Documentation/blockdev/floppy.txt\n"); 4430 return 0; 4431 } 4432 4433 static int have_no_fdc = -ENODEV; 4434 4435 static ssize_t floppy_cmos_show(struct device *dev, 4436 struct device_attribute *attr, char *buf) 4437 { 4438 struct platform_device *p = to_platform_device(dev); 4439 int drive; 4440 4441 drive = p->id; 4442 return sprintf(buf, "%X\n", UDP->cmos); 4443 } 4444 4445 static DEVICE_ATTR(cmos, 0444, floppy_cmos_show, NULL); 4446 4447 static struct attribute *floppy_dev_attrs[] = { 4448 &dev_attr_cmos.attr, 4449 NULL 4450 }; 4451 4452 ATTRIBUTE_GROUPS(floppy_dev); 4453 4454 static void floppy_device_release(struct device *dev) 4455 { 4456 } 4457 4458 static int floppy_resume(struct device *dev) 4459 { 4460 int fdc; 4461 4462 for (fdc = 0; fdc < N_FDC; fdc++) 4463 if (FDCS->address != -1) 4464 user_reset_fdc(-1, FD_RESET_ALWAYS, false); 4465 4466 return 0; 4467 } 4468 4469 static const struct dev_pm_ops floppy_pm_ops = { 4470 .resume = floppy_resume, 4471 .restore = floppy_resume, 4472 }; 4473 4474 static struct platform_driver floppy_driver = { 4475 .driver = { 4476 .name = "floppy", 4477 .pm = &floppy_pm_ops, 4478 }, 4479 }; 4480 4481 static const struct blk_mq_ops floppy_mq_ops = { 4482 .queue_rq = floppy_queue_rq, 4483 }; 4484 4485 static struct platform_device floppy_device[N_DRIVE]; 4486 4487 static bool floppy_available(int drive) 4488 { 4489 if (!(allowed_drive_mask & (1 << drive))) 4490 return false; 4491 if (fdc_state[FDC(drive)].version == FDC_NONE) 4492 return false; 4493 return true; 4494 } 4495 4496 static struct kobject *floppy_find(dev_t dev, int *part, void *data) 4497 { 4498 int drive = (*part & 3) | ((*part & 0x80) >> 5); 4499 if (drive >= N_DRIVE || !floppy_available(drive)) 4500 return NULL; 4501 if (((*part >> 2) & 0x1f) >= ARRAY_SIZE(floppy_type)) 4502 return NULL; 4503 *part = 0; 4504 return get_disk_and_module(disks[drive]); 4505 } 4506 4507 static int __init do_floppy_init(void) 4508 { 4509 int i, unit, drive, err; 4510 4511 set_debugt(); 4512 interruptjiffies = resultjiffies = jiffies; 4513 4514 #if defined(CONFIG_PPC) 4515 if (check_legacy_ioport(FDC1)) 4516 return -ENODEV; 4517 #endif 4518 4519 raw_cmd = NULL; 4520 4521 floppy_wq = alloc_ordered_workqueue("floppy", 0); 4522 if (!floppy_wq) 4523 return -ENOMEM; 4524 4525 for (drive = 0; drive < N_DRIVE; drive++) { 4526 disks[drive] = alloc_disk(1); 4527 if (!disks[drive]) { 4528 err = -ENOMEM; 4529 goto out_put_disk; 4530 } 4531 4532 disks[drive]->queue = blk_mq_init_sq_queue(&tag_sets[drive], 4533 &floppy_mq_ops, 2, 4534 BLK_MQ_F_SHOULD_MERGE); 4535 if (IS_ERR(disks[drive]->queue)) { 4536 err = PTR_ERR(disks[drive]->queue); 4537 disks[drive]->queue = NULL; 4538 goto out_put_disk; 4539 } 4540 4541 blk_queue_bounce_limit(disks[drive]->queue, BLK_BOUNCE_HIGH); 4542 blk_queue_max_hw_sectors(disks[drive]->queue, 64); 4543 disks[drive]->major = FLOPPY_MAJOR; 4544 disks[drive]->first_minor = TOMINOR(drive); 4545 disks[drive]->fops = &floppy_fops; 4546 sprintf(disks[drive]->disk_name, "fd%d", drive); 4547 4548 timer_setup(&motor_off_timer[drive], motor_off_callback, 0); 4549 } 4550 4551 err = register_blkdev(FLOPPY_MAJOR, "fd"); 4552 if (err) 4553 goto out_put_disk; 4554 4555 err = platform_driver_register(&floppy_driver); 4556 if (err) 4557 goto out_unreg_blkdev; 4558 4559 blk_register_region(MKDEV(FLOPPY_MAJOR, 0), 256, THIS_MODULE, 4560 floppy_find, NULL, NULL); 4561 4562 for (i = 0; i < 256; i++) 4563 if (ITYPE(i)) 4564 floppy_sizes[i] = floppy_type[ITYPE(i)].size; 4565 else 4566 floppy_sizes[i] = MAX_DISK_SIZE << 1; 4567 4568 reschedule_timeout(MAXTIMEOUT, "floppy init"); 4569 config_types(); 4570 4571 for (i = 0; i < N_FDC; i++) { 4572 fdc = i; 4573 memset(FDCS, 0, sizeof(*FDCS)); 4574 FDCS->dtr = -1; 4575 FDCS->dor = 0x4; 4576 #if defined(__sparc__) || defined(__mc68000__) 4577 /*sparcs/sun3x don't have a DOR reset which we can fall back on to */ 4578 #ifdef __mc68000__ 4579 if (MACH_IS_SUN3X) 4580 #endif 4581 FDCS->version = FDC_82072A; 4582 #endif 4583 } 4584 4585 use_virtual_dma = can_use_virtual_dma & 1; 4586 fdc_state[0].address = FDC1; 4587 if (fdc_state[0].address == -1) { 4588 cancel_delayed_work(&fd_timeout); 4589 err = -ENODEV; 4590 goto out_unreg_region; 4591 } 4592 #if N_FDC > 1 4593 fdc_state[1].address = FDC2; 4594 #endif 4595 4596 fdc = 0; /* reset fdc in case of unexpected interrupt */ 4597 err = floppy_grab_irq_and_dma(); 4598 if (err) { 4599 cancel_delayed_work(&fd_timeout); 4600 err = -EBUSY; 4601 goto out_unreg_region; 4602 } 4603 4604 /* initialise drive state */ 4605 for (drive = 0; drive < N_DRIVE; drive++) { 4606 memset(UDRS, 0, sizeof(*UDRS)); 4607 memset(UDRWE, 0, sizeof(*UDRWE)); 4608 set_bit(FD_DISK_NEWCHANGE_BIT, &UDRS->flags); 4609 set_bit(FD_DISK_CHANGED_BIT, &UDRS->flags); 4610 set_bit(FD_VERIFY_BIT, &UDRS->flags); 4611 UDRS->fd_device = -1; 4612 floppy_track_buffer = NULL; 4613 max_buffer_sectors = 0; 4614 } 4615 /* 4616 * Small 10 msec delay to let through any interrupt that 4617 * initialization might have triggered, to not 4618 * confuse detection: 4619 */ 4620 msleep(10); 4621 4622 for (i = 0; i < N_FDC; i++) { 4623 fdc = i; 4624 FDCS->driver_version = FD_DRIVER_VERSION; 4625 for (unit = 0; unit < 4; unit++) 4626 FDCS->track[unit] = 0; 4627 if (FDCS->address == -1) 4628 continue; 4629 FDCS->rawcmd = 2; 4630 if (user_reset_fdc(-1, FD_RESET_ALWAYS, false)) { 4631 /* free ioports reserved by floppy_grab_irq_and_dma() */ 4632 floppy_release_regions(fdc); 4633 FDCS->address = -1; 4634 FDCS->version = FDC_NONE; 4635 continue; 4636 } 4637 /* Try to determine the floppy controller type */ 4638 FDCS->version = get_fdc_version(); 4639 if (FDCS->version == FDC_NONE) { 4640 /* free ioports reserved by floppy_grab_irq_and_dma() */ 4641 floppy_release_regions(fdc); 4642 FDCS->address = -1; 4643 continue; 4644 } 4645 if (can_use_virtual_dma == 2 && FDCS->version < FDC_82072A) 4646 can_use_virtual_dma = 0; 4647 4648 have_no_fdc = 0; 4649 /* Not all FDCs seem to be able to handle the version command 4650 * properly, so force a reset for the standard FDC clones, 4651 * to avoid interrupt garbage. 4652 */ 4653 user_reset_fdc(-1, FD_RESET_ALWAYS, false); 4654 } 4655 fdc = 0; 4656 cancel_delayed_work(&fd_timeout); 4657 current_drive = 0; 4658 initialized = true; 4659 if (have_no_fdc) { 4660 DPRINT("no floppy controllers found\n"); 4661 err = have_no_fdc; 4662 goto out_release_dma; 4663 } 4664 4665 for (drive = 0; drive < N_DRIVE; drive++) { 4666 if (!floppy_available(drive)) 4667 continue; 4668 4669 floppy_device[drive].name = floppy_device_name; 4670 floppy_device[drive].id = drive; 4671 floppy_device[drive].dev.release = floppy_device_release; 4672 floppy_device[drive].dev.groups = floppy_dev_groups; 4673 4674 err = platform_device_register(&floppy_device[drive]); 4675 if (err) 4676 goto out_remove_drives; 4677 4678 /* to be cleaned up... */ 4679 disks[drive]->private_data = (void *)(long)drive; 4680 disks[drive]->flags |= GENHD_FL_REMOVABLE; 4681 device_add_disk(&floppy_device[drive].dev, disks[drive], NULL); 4682 } 4683 4684 return 0; 4685 4686 out_remove_drives: 4687 while (drive--) { 4688 if (floppy_available(drive)) { 4689 del_gendisk(disks[drive]); 4690 platform_device_unregister(&floppy_device[drive]); 4691 } 4692 } 4693 out_release_dma: 4694 if (atomic_read(&usage_count)) 4695 floppy_release_irq_and_dma(); 4696 out_unreg_region: 4697 blk_unregister_region(MKDEV(FLOPPY_MAJOR, 0), 256); 4698 platform_driver_unregister(&floppy_driver); 4699 out_unreg_blkdev: 4700 unregister_blkdev(FLOPPY_MAJOR, "fd"); 4701 out_put_disk: 4702 destroy_workqueue(floppy_wq); 4703 for (drive = 0; drive < N_DRIVE; drive++) { 4704 if (!disks[drive]) 4705 break; 4706 if (disks[drive]->queue) { 4707 del_timer_sync(&motor_off_timer[drive]); 4708 blk_cleanup_queue(disks[drive]->queue); 4709 disks[drive]->queue = NULL; 4710 blk_mq_free_tag_set(&tag_sets[drive]); 4711 } 4712 put_disk(disks[drive]); 4713 } 4714 return err; 4715 } 4716 4717 #ifndef MODULE 4718 static __init void floppy_async_init(void *data, async_cookie_t cookie) 4719 { 4720 do_floppy_init(); 4721 } 4722 #endif 4723 4724 static int __init floppy_init(void) 4725 { 4726 #ifdef MODULE 4727 return do_floppy_init(); 4728 #else 4729 /* Don't hold up the bootup by the floppy initialization */ 4730 async_schedule(floppy_async_init, NULL); 4731 return 0; 4732 #endif 4733 } 4734 4735 static const struct io_region { 4736 int offset; 4737 int size; 4738 } io_regions[] = { 4739 { 2, 1 }, 4740 /* address + 3 is sometimes reserved by pnp bios for motherboard */ 4741 { 4, 2 }, 4742 /* address + 6 is reserved, and may be taken by IDE. 4743 * Unfortunately, Adaptec doesn't know this :-(, */ 4744 { 7, 1 }, 4745 }; 4746 4747 static void floppy_release_allocated_regions(int fdc, const struct io_region *p) 4748 { 4749 while (p != io_regions) { 4750 p--; 4751 release_region(FDCS->address + p->offset, p->size); 4752 } 4753 } 4754 4755 #define ARRAY_END(X) (&((X)[ARRAY_SIZE(X)])) 4756 4757 static int floppy_request_regions(int fdc) 4758 { 4759 const struct io_region *p; 4760 4761 for (p = io_regions; p < ARRAY_END(io_regions); p++) { 4762 if (!request_region(FDCS->address + p->offset, 4763 p->size, "floppy")) { 4764 DPRINT("Floppy io-port 0x%04lx in use\n", 4765 FDCS->address + p->offset); 4766 floppy_release_allocated_regions(fdc, p); 4767 return -EBUSY; 4768 } 4769 } 4770 return 0; 4771 } 4772 4773 static void floppy_release_regions(int fdc) 4774 { 4775 floppy_release_allocated_regions(fdc, ARRAY_END(io_regions)); 4776 } 4777 4778 static int floppy_grab_irq_and_dma(void) 4779 { 4780 if (atomic_inc_return(&usage_count) > 1) 4781 return 0; 4782 4783 /* 4784 * We might have scheduled a free_irq(), wait it to 4785 * drain first: 4786 */ 4787 flush_workqueue(floppy_wq); 4788 4789 if (fd_request_irq()) { 4790 DPRINT("Unable to grab IRQ%d for the floppy driver\n", 4791 FLOPPY_IRQ); 4792 atomic_dec(&usage_count); 4793 return -1; 4794 } 4795 if (fd_request_dma()) { 4796 DPRINT("Unable to grab DMA%d for the floppy driver\n", 4797 FLOPPY_DMA); 4798 if (can_use_virtual_dma & 2) 4799 use_virtual_dma = can_use_virtual_dma = 1; 4800 if (!(can_use_virtual_dma & 1)) { 4801 fd_free_irq(); 4802 atomic_dec(&usage_count); 4803 return -1; 4804 } 4805 } 4806 4807 for (fdc = 0; fdc < N_FDC; fdc++) { 4808 if (FDCS->address != -1) { 4809 if (floppy_request_regions(fdc)) 4810 goto cleanup; 4811 } 4812 } 4813 for (fdc = 0; fdc < N_FDC; fdc++) { 4814 if (FDCS->address != -1) { 4815 reset_fdc_info(1); 4816 fd_outb(FDCS->dor, FD_DOR); 4817 } 4818 } 4819 fdc = 0; 4820 set_dor(0, ~0, 8); /* avoid immediate interrupt */ 4821 4822 for (fdc = 0; fdc < N_FDC; fdc++) 4823 if (FDCS->address != -1) 4824 fd_outb(FDCS->dor, FD_DOR); 4825 /* 4826 * The driver will try and free resources and relies on us 4827 * to know if they were allocated or not. 4828 */ 4829 fdc = 0; 4830 irqdma_allocated = 1; 4831 return 0; 4832 cleanup: 4833 fd_free_irq(); 4834 fd_free_dma(); 4835 while (--fdc >= 0) 4836 floppy_release_regions(fdc); 4837 atomic_dec(&usage_count); 4838 return -1; 4839 } 4840 4841 static void floppy_release_irq_and_dma(void) 4842 { 4843 int old_fdc; 4844 #ifndef __sparc__ 4845 int drive; 4846 #endif 4847 long tmpsize; 4848 unsigned long tmpaddr; 4849 4850 if (!atomic_dec_and_test(&usage_count)) 4851 return; 4852 4853 if (irqdma_allocated) { 4854 fd_disable_dma(); 4855 fd_free_dma(); 4856 fd_free_irq(); 4857 irqdma_allocated = 0; 4858 } 4859 set_dor(0, ~0, 8); 4860 #if N_FDC > 1 4861 set_dor(1, ~8, 0); 4862 #endif 4863 4864 if (floppy_track_buffer && max_buffer_sectors) { 4865 tmpsize = max_buffer_sectors * 1024; 4866 tmpaddr = (unsigned long)floppy_track_buffer; 4867 floppy_track_buffer = NULL; 4868 max_buffer_sectors = 0; 4869 buffer_min = buffer_max = -1; 4870 fd_dma_mem_free(tmpaddr, tmpsize); 4871 } 4872 #ifndef __sparc__ 4873 for (drive = 0; drive < N_FDC * 4; drive++) 4874 if (timer_pending(motor_off_timer + drive)) 4875 pr_info("motor off timer %d still active\n", drive); 4876 #endif 4877 4878 if (delayed_work_pending(&fd_timeout)) 4879 pr_info("floppy timer still active:%s\n", timeout_message); 4880 if (delayed_work_pending(&fd_timer)) 4881 pr_info("auxiliary floppy timer still active\n"); 4882 if (work_pending(&floppy_work)) 4883 pr_info("work still pending\n"); 4884 old_fdc = fdc; 4885 for (fdc = 0; fdc < N_FDC; fdc++) 4886 if (FDCS->address != -1) 4887 floppy_release_regions(fdc); 4888 fdc = old_fdc; 4889 } 4890 4891 #ifdef MODULE 4892 4893 static char *floppy; 4894 4895 static void __init parse_floppy_cfg_string(char *cfg) 4896 { 4897 char *ptr; 4898 4899 while (*cfg) { 4900 ptr = cfg; 4901 while (*cfg && *cfg != ' ' && *cfg != '\t') 4902 cfg++; 4903 if (*cfg) { 4904 *cfg = '\0'; 4905 cfg++; 4906 } 4907 if (*ptr) 4908 floppy_setup(ptr); 4909 } 4910 } 4911 4912 static int __init floppy_module_init(void) 4913 { 4914 if (floppy) 4915 parse_floppy_cfg_string(floppy); 4916 return floppy_init(); 4917 } 4918 module_init(floppy_module_init); 4919 4920 static void __exit floppy_module_exit(void) 4921 { 4922 int drive; 4923 4924 blk_unregister_region(MKDEV(FLOPPY_MAJOR, 0), 256); 4925 unregister_blkdev(FLOPPY_MAJOR, "fd"); 4926 platform_driver_unregister(&floppy_driver); 4927 4928 destroy_workqueue(floppy_wq); 4929 4930 for (drive = 0; drive < N_DRIVE; drive++) { 4931 del_timer_sync(&motor_off_timer[drive]); 4932 4933 if (floppy_available(drive)) { 4934 del_gendisk(disks[drive]); 4935 platform_device_unregister(&floppy_device[drive]); 4936 } 4937 blk_cleanup_queue(disks[drive]->queue); 4938 blk_mq_free_tag_set(&tag_sets[drive]); 4939 4940 /* 4941 * These disks have not called add_disk(). Don't put down 4942 * queue reference in put_disk(). 4943 */ 4944 if (!(allowed_drive_mask & (1 << drive)) || 4945 fdc_state[FDC(drive)].version == FDC_NONE) 4946 disks[drive]->queue = NULL; 4947 4948 put_disk(disks[drive]); 4949 } 4950 4951 cancel_delayed_work_sync(&fd_timeout); 4952 cancel_delayed_work_sync(&fd_timer); 4953 4954 if (atomic_read(&usage_count)) 4955 floppy_release_irq_and_dma(); 4956 4957 /* eject disk, if any */ 4958 fd_eject(0); 4959 } 4960 4961 module_exit(floppy_module_exit); 4962 4963 module_param(floppy, charp, 0); 4964 module_param(FLOPPY_IRQ, int, 0); 4965 module_param(FLOPPY_DMA, int, 0); 4966 MODULE_AUTHOR("Alain L. Knaff"); 4967 MODULE_SUPPORTED_DEVICE("fd"); 4968 MODULE_LICENSE("GPL"); 4969 4970 /* This doesn't actually get used other than for module information */ 4971 static const struct pnp_device_id floppy_pnpids[] = { 4972 {"PNP0700", 0}, 4973 {} 4974 }; 4975 4976 MODULE_DEVICE_TABLE(pnp, floppy_pnpids); 4977 4978 #else 4979 4980 __setup("floppy=", floppy_setup); 4981 module_init(floppy_init) 4982 #endif 4983 4984 MODULE_ALIAS_BLOCKDEV_MAJOR(FLOPPY_MAJOR); 4985