Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | pd.c (c) 1997-8 Grant R. Guenther <grant@torque.net> | |
3 | Under the terms of the GNU General Public License. | |
4 | ||
5 | This is the high-level driver for parallel port IDE hard | |
6 | drives based on chips supported by the paride module. | |
7 | ||
8 | By default, the driver will autoprobe for a single parallel | |
9 | port IDE drive, but if their individual parameters are | |
10 | specified, the driver can handle up to 4 drives. | |
11 | ||
12 | The behaviour of the pd driver can be altered by setting | |
13 | some parameters from the insmod command line. The following | |
14 | parameters are adjustable: | |
15 | ||
16 | drive0 These four arguments can be arrays of | |
17 | drive1 1-8 integers as follows: | |
18 | drive2 | |
19 | drive3 <prt>,<pro>,<uni>,<mod>,<geo>,<sby>,<dly>,<slv> | |
20 | ||
21 | Where, | |
22 | ||
23 | <prt> is the base of the parallel port address for | |
24 | the corresponding drive. (required) | |
25 | ||
26 | <pro> is the protocol number for the adapter that | |
27 | supports this drive. These numbers are | |
28 | logged by 'paride' when the protocol modules | |
29 | are initialised. (0 if not given) | |
30 | ||
31 | <uni> for those adapters that support chained | |
32 | devices, this is the unit selector for the | |
33 | chain of devices on the given port. It should | |
34 | be zero for devices that don't support chaining. | |
35 | (0 if not given) | |
36 | ||
37 | <mod> this can be -1 to choose the best mode, or one | |
38 | of the mode numbers supported by the adapter. | |
39 | (-1 if not given) | |
40 | ||
41 | <geo> this defaults to 0 to indicate that the driver | |
42 | should use the CHS geometry provided by the drive | |
43 | itself. If set to 1, the driver will provide | |
44 | a logical geometry with 64 heads and 32 sectors | |
45 | per track, to be consistent with most SCSI | |
46 | drivers. (0 if not given) | |
47 | ||
48 | <sby> set this to zero to disable the power saving | |
49 | standby mode, if needed. (1 if not given) | |
50 | ||
51 | <dly> some parallel ports require the driver to | |
52 | go more slowly. -1 sets a default value that | |
53 | should work with the chosen protocol. Otherwise, | |
54 | set this to a small integer, the larger it is | |
55 | the slower the port i/o. In some cases, setting | |
56 | this to zero will speed up the device. (default -1) | |
57 | ||
58 | <slv> IDE disks can be jumpered to master or slave. | |
59 | Set this to 0 to choose the master drive, 1 to | |
60 | choose the slave, -1 (the default) to choose the | |
61 | first drive found. | |
62 | ||
63 | ||
64 | major You may use this parameter to overide the | |
65 | default major number (45) that this driver | |
66 | will use. Be sure to change the device | |
67 | name as well. | |
68 | ||
69 | name This parameter is a character string that | |
70 | contains the name the kernel will use for this | |
71 | device (in /proc output, for instance). | |
72 | (default "pd") | |
73 | ||
74 | cluster The driver will attempt to aggregate requests | |
75 | for adjacent blocks into larger multi-block | |
76 | clusters. The maximum cluster size (in 512 | |
77 | byte sectors) is set with this parameter. | |
78 | (default 64) | |
79 | ||
80 | verbose This parameter controls the amount of logging | |
81 | that the driver will do. Set it to 0 for | |
82 | normal operation, 1 to see autoprobe progress | |
83 | messages, or 2 to see additional debugging | |
84 | output. (default 0) | |
85 | ||
86 | nice This parameter controls the driver's use of | |
87 | idle CPU time, at the expense of some speed. | |
88 | ||
89 | If this driver is built into the kernel, you can use kernel | |
90 | the following command line parameters, with the same values | |
91 | as the corresponding module parameters listed above: | |
92 | ||
93 | pd.drive0 | |
94 | pd.drive1 | |
95 | pd.drive2 | |
96 | pd.drive3 | |
97 | pd.cluster | |
98 | pd.nice | |
99 | ||
100 | In addition, you can use the parameter pd.disable to disable | |
101 | the driver entirely. | |
102 | ||
103 | */ | |
104 | ||
105 | /* Changes: | |
106 | ||
107 | 1.01 GRG 1997.01.24 Restored pd_reset() | |
108 | Added eject ioctl | |
109 | 1.02 GRG 1998.05.06 SMP spinlock changes, | |
110 | Added slave support | |
111 | 1.03 GRG 1998.06.16 Eliminate an Ugh. | |
112 | 1.04 GRG 1998.08.15 Extra debugging, use HZ in loop timing | |
113 | 1.05 GRG 1998.09.24 Added jumbo support | |
114 | ||
115 | */ | |
116 | ||
117 | #define PD_VERSION "1.05" | |
118 | #define PD_MAJOR 45 | |
119 | #define PD_NAME "pd" | |
120 | #define PD_UNITS 4 | |
121 | ||
122 | /* Here are things one can override from the insmod command. | |
123 | Most are autoprobed by paride unless set here. Verbose is off | |
124 | by default. | |
125 | ||
126 | */ | |
127 | ||
128 | static int verbose = 0; | |
129 | static int major = PD_MAJOR; | |
130 | static char *name = PD_NAME; | |
131 | static int cluster = 64; | |
132 | static int nice = 0; | |
133 | static int disable = 0; | |
134 | ||
135 | static int drive0[8] = { 0, 0, 0, -1, 0, 1, -1, -1 }; | |
136 | static int drive1[8] = { 0, 0, 0, -1, 0, 1, -1, -1 }; | |
137 | static int drive2[8] = { 0, 0, 0, -1, 0, 1, -1, -1 }; | |
138 | static int drive3[8] = { 0, 0, 0, -1, 0, 1, -1, -1 }; | |
139 | ||
140 | static int (*drives[4])[8] = {&drive0, &drive1, &drive2, &drive3}; | |
141 | ||
142 | enum {D_PRT, D_PRO, D_UNI, D_MOD, D_GEO, D_SBY, D_DLY, D_SLV}; | |
143 | ||
144 | /* end of parameters */ | |
145 | ||
146 | #include <linux/init.h> | |
147 | #include <linux/module.h> | |
148 | #include <linux/fs.h> | |
149 | #include <linux/delay.h> | |
150 | #include <linux/hdreg.h> | |
151 | #include <linux/cdrom.h> /* for the eject ioctl */ | |
152 | #include <linux/blkdev.h> | |
153 | #include <linux/blkpg.h> | |
3b71797e | 154 | #include <linux/kernel.h> |
1da177e4 | 155 | #include <asm/uaccess.h> |
1da177e4 LT |
156 | #include <linux/workqueue.h> |
157 | ||
158 | static DEFINE_SPINLOCK(pd_lock); | |
159 | ||
160 | module_param(verbose, bool, 0); | |
161 | module_param(major, int, 0); | |
162 | module_param(name, charp, 0); | |
163 | module_param(cluster, int, 0); | |
164 | module_param(nice, int, 0); | |
165 | module_param_array(drive0, int, NULL, 0); | |
166 | module_param_array(drive1, int, NULL, 0); | |
167 | module_param_array(drive2, int, NULL, 0); | |
168 | module_param_array(drive3, int, NULL, 0); | |
169 | ||
170 | #include "paride.h" | |
171 | ||
172 | #define PD_BITS 4 | |
173 | ||
174 | /* numbers for "SCSI" geometry */ | |
175 | ||
176 | #define PD_LOG_HEADS 64 | |
177 | #define PD_LOG_SECTS 32 | |
178 | ||
179 | #define PD_ID_OFF 54 | |
180 | #define PD_ID_LEN 14 | |
181 | ||
182 | #define PD_MAX_RETRIES 5 | |
183 | #define PD_TMO 800 /* interrupt timeout in jiffies */ | |
184 | #define PD_SPIN_DEL 50 /* spin delay in micro-seconds */ | |
185 | ||
186 | #define PD_SPIN (1000000*PD_TMO)/(HZ*PD_SPIN_DEL) | |
187 | ||
188 | #define STAT_ERR 0x00001 | |
189 | #define STAT_INDEX 0x00002 | |
190 | #define STAT_ECC 0x00004 | |
191 | #define STAT_DRQ 0x00008 | |
192 | #define STAT_SEEK 0x00010 | |
193 | #define STAT_WRERR 0x00020 | |
194 | #define STAT_READY 0x00040 | |
195 | #define STAT_BUSY 0x00080 | |
196 | ||
197 | #define ERR_AMNF 0x00100 | |
198 | #define ERR_TK0NF 0x00200 | |
199 | #define ERR_ABRT 0x00400 | |
200 | #define ERR_MCR 0x00800 | |
201 | #define ERR_IDNF 0x01000 | |
202 | #define ERR_MC 0x02000 | |
203 | #define ERR_UNC 0x04000 | |
204 | #define ERR_TMO 0x10000 | |
205 | ||
206 | #define IDE_READ 0x20 | |
207 | #define IDE_WRITE 0x30 | |
208 | #define IDE_READ_VRFY 0x40 | |
209 | #define IDE_INIT_DEV_PARMS 0x91 | |
210 | #define IDE_STANDBY 0x96 | |
211 | #define IDE_ACKCHANGE 0xdb | |
212 | #define IDE_DOORLOCK 0xde | |
213 | #define IDE_DOORUNLOCK 0xdf | |
214 | #define IDE_IDENTIFY 0xec | |
215 | #define IDE_EJECT 0xed | |
216 | ||
217 | #define PD_NAMELEN 8 | |
218 | ||
219 | struct pd_unit { | |
220 | struct pi_adapter pia; /* interface to paride layer */ | |
221 | struct pi_adapter *pi; | |
222 | int access; /* count of active opens ... */ | |
223 | int capacity; /* Size of this volume in sectors */ | |
224 | int heads; /* physical geometry */ | |
225 | int sectors; | |
226 | int cylinders; | |
227 | int can_lba; | |
228 | int drive; /* master=0 slave=1 */ | |
229 | int changed; /* Have we seen a disk change ? */ | |
230 | int removable; /* removable media device ? */ | |
231 | int standby; | |
232 | int alt_geom; | |
233 | char name[PD_NAMELEN]; /* pda, pdb, etc ... */ | |
234 | struct gendisk *gd; | |
235 | }; | |
236 | ||
237 | static struct pd_unit pd[PD_UNITS]; | |
238 | ||
239 | static char pd_scratch[512]; /* scratch block buffer */ | |
240 | ||
241 | static char *pd_errs[17] = { "ERR", "INDEX", "ECC", "DRQ", "SEEK", "WRERR", | |
242 | "READY", "BUSY", "AMNF", "TK0NF", "ABRT", "MCR", | |
243 | "IDNF", "MC", "UNC", "???", "TMO" | |
244 | }; | |
245 | ||
246 | static inline int status_reg(struct pd_unit *disk) | |
247 | { | |
248 | return pi_read_regr(disk->pi, 1, 6); | |
249 | } | |
250 | ||
251 | static inline int read_reg(struct pd_unit *disk, int reg) | |
252 | { | |
253 | return pi_read_regr(disk->pi, 0, reg); | |
254 | } | |
255 | ||
256 | static inline void write_status(struct pd_unit *disk, int val) | |
257 | { | |
258 | pi_write_regr(disk->pi, 1, 6, val); | |
259 | } | |
260 | ||
261 | static inline void write_reg(struct pd_unit *disk, int reg, int val) | |
262 | { | |
263 | pi_write_regr(disk->pi, 0, reg, val); | |
264 | } | |
265 | ||
266 | static inline u8 DRIVE(struct pd_unit *disk) | |
267 | { | |
268 | return 0xa0+0x10*disk->drive; | |
269 | } | |
270 | ||
271 | /* ide command interface */ | |
272 | ||
273 | static void pd_print_error(struct pd_unit *disk, char *msg, int status) | |
274 | { | |
275 | int i; | |
276 | ||
277 | printk("%s: %s: status = 0x%x =", disk->name, msg, status); | |
3b71797e | 278 | for (i = 0; i < ARRAY_SIZE(pd_errs); i++) |
1da177e4 LT |
279 | if (status & (1 << i)) |
280 | printk(" %s", pd_errs[i]); | |
281 | printk("\n"); | |
282 | } | |
283 | ||
284 | static void pd_reset(struct pd_unit *disk) | |
285 | { /* called only for MASTER drive */ | |
286 | write_status(disk, 4); | |
287 | udelay(50); | |
288 | write_status(disk, 0); | |
289 | udelay(250); | |
290 | } | |
291 | ||
292 | #define DBMSG(msg) ((verbose>1)?(msg):NULL) | |
293 | ||
294 | static int pd_wait_for(struct pd_unit *disk, int w, char *msg) | |
295 | { /* polled wait */ | |
296 | int k, r, e; | |
297 | ||
298 | k = 0; | |
299 | while (k < PD_SPIN) { | |
300 | r = status_reg(disk); | |
301 | k++; | |
302 | if (((r & w) == w) && !(r & STAT_BUSY)) | |
303 | break; | |
304 | udelay(PD_SPIN_DEL); | |
305 | } | |
306 | e = (read_reg(disk, 1) << 8) + read_reg(disk, 7); | |
307 | if (k >= PD_SPIN) | |
308 | e |= ERR_TMO; | |
309 | if ((e & (STAT_ERR | ERR_TMO)) && (msg != NULL)) | |
310 | pd_print_error(disk, msg, e); | |
311 | return e; | |
312 | } | |
313 | ||
314 | static void pd_send_command(struct pd_unit *disk, int n, int s, int h, int c0, int c1, int func) | |
315 | { | |
316 | write_reg(disk, 6, DRIVE(disk) + h); | |
317 | write_reg(disk, 1, 0); /* the IDE task file */ | |
318 | write_reg(disk, 2, n); | |
319 | write_reg(disk, 3, s); | |
320 | write_reg(disk, 4, c0); | |
321 | write_reg(disk, 5, c1); | |
322 | write_reg(disk, 7, func); | |
323 | ||
324 | udelay(1); | |
325 | } | |
326 | ||
327 | static void pd_ide_command(struct pd_unit *disk, int func, int block, int count) | |
328 | { | |
329 | int c1, c0, h, s; | |
330 | ||
331 | if (disk->can_lba) { | |
332 | s = block & 255; | |
333 | c0 = (block >>= 8) & 255; | |
334 | c1 = (block >>= 8) & 255; | |
335 | h = ((block >>= 8) & 15) + 0x40; | |
336 | } else { | |
337 | s = (block % disk->sectors) + 1; | |
338 | h = (block /= disk->sectors) % disk->heads; | |
339 | c0 = (block /= disk->heads) % 256; | |
340 | c1 = (block >>= 8); | |
341 | } | |
342 | pd_send_command(disk, count, s, h, c0, c1, func); | |
343 | } | |
344 | ||
345 | /* The i/o request engine */ | |
346 | ||
347 | enum action {Fail = 0, Ok = 1, Hold, Wait}; | |
348 | ||
349 | static struct request *pd_req; /* current request */ | |
350 | static enum action (*phase)(void); | |
351 | ||
352 | static void run_fsm(void); | |
353 | ||
c4028958 | 354 | static void ps_tq_int(struct work_struct *work); |
1da177e4 | 355 | |
c4028958 | 356 | static DECLARE_DELAYED_WORK(fsm_tq, ps_tq_int); |
1da177e4 LT |
357 | |
358 | static void schedule_fsm(void) | |
359 | { | |
360 | if (!nice) | |
c4028958 | 361 | schedule_delayed_work(&fsm_tq, 0); |
1da177e4 LT |
362 | else |
363 | schedule_delayed_work(&fsm_tq, nice-1); | |
364 | } | |
365 | ||
c4028958 | 366 | static void ps_tq_int(struct work_struct *work) |
1da177e4 LT |
367 | { |
368 | run_fsm(); | |
369 | } | |
370 | ||
371 | static enum action do_pd_io_start(void); | |
372 | static enum action pd_special(void); | |
373 | static enum action do_pd_read_start(void); | |
374 | static enum action do_pd_write_start(void); | |
375 | static enum action do_pd_read_drq(void); | |
376 | static enum action do_pd_write_done(void); | |
377 | ||
378 | static struct request_queue *pd_queue; | |
379 | static int pd_claimed; | |
380 | ||
381 | static struct pd_unit *pd_current; /* current request's drive */ | |
382 | static PIA *pi_current; /* current request's PIA */ | |
383 | ||
384 | static void run_fsm(void) | |
385 | { | |
386 | while (1) { | |
387 | enum action res; | |
388 | unsigned long saved_flags; | |
389 | int stop = 0; | |
390 | ||
391 | if (!phase) { | |
392 | pd_current = pd_req->rq_disk->private_data; | |
393 | pi_current = pd_current->pi; | |
394 | phase = do_pd_io_start; | |
395 | } | |
396 | ||
397 | switch (pd_claimed) { | |
398 | case 0: | |
399 | pd_claimed = 1; | |
400 | if (!pi_schedule_claimed(pi_current, run_fsm)) | |
401 | return; | |
402 | case 1: | |
403 | pd_claimed = 2; | |
404 | pi_current->proto->connect(pi_current); | |
405 | } | |
406 | ||
407 | switch(res = phase()) { | |
408 | case Ok: case Fail: | |
409 | pi_disconnect(pi_current); | |
410 | pd_claimed = 0; | |
411 | phase = NULL; | |
412 | spin_lock_irqsave(&pd_lock, saved_flags); | |
413 | end_request(pd_req, res); | |
414 | pd_req = elv_next_request(pd_queue); | |
415 | if (!pd_req) | |
416 | stop = 1; | |
417 | spin_unlock_irqrestore(&pd_lock, saved_flags); | |
418 | if (stop) | |
419 | return; | |
420 | case Hold: | |
421 | schedule_fsm(); | |
422 | return; | |
423 | case Wait: | |
424 | pi_disconnect(pi_current); | |
425 | pd_claimed = 0; | |
426 | } | |
427 | } | |
428 | } | |
429 | ||
430 | static int pd_retries = 0; /* i/o error retry count */ | |
431 | static int pd_block; /* address of next requested block */ | |
432 | static int pd_count; /* number of blocks still to do */ | |
433 | static int pd_run; /* sectors in current cluster */ | |
434 | static int pd_cmd; /* current command READ/WRITE */ | |
435 | static char *pd_buf; /* buffer for request in progress */ | |
436 | ||
437 | static enum action do_pd_io_start(void) | |
438 | { | |
4aff5e23 | 439 | if (blk_special_request(pd_req)) { |
1da177e4 LT |
440 | phase = pd_special; |
441 | return pd_special(); | |
442 | } | |
443 | ||
444 | pd_cmd = rq_data_dir(pd_req); | |
445 | if (pd_cmd == READ || pd_cmd == WRITE) { | |
446 | pd_block = pd_req->sector; | |
447 | pd_count = pd_req->current_nr_sectors; | |
448 | if (pd_block + pd_count > get_capacity(pd_req->rq_disk)) | |
449 | return Fail; | |
450 | pd_run = pd_req->nr_sectors; | |
451 | pd_buf = pd_req->buffer; | |
452 | pd_retries = 0; | |
453 | if (pd_cmd == READ) | |
454 | return do_pd_read_start(); | |
455 | else | |
456 | return do_pd_write_start(); | |
457 | } | |
458 | return Fail; | |
459 | } | |
460 | ||
461 | static enum action pd_special(void) | |
462 | { | |
463 | enum action (*func)(struct pd_unit *) = pd_req->special; | |
464 | return func(pd_current); | |
465 | } | |
466 | ||
467 | static int pd_next_buf(void) | |
468 | { | |
469 | unsigned long saved_flags; | |
470 | ||
471 | pd_count--; | |
472 | pd_run--; | |
473 | pd_buf += 512; | |
474 | pd_block++; | |
475 | if (!pd_run) | |
476 | return 1; | |
477 | if (pd_count) | |
478 | return 0; | |
479 | spin_lock_irqsave(&pd_lock, saved_flags); | |
480 | end_request(pd_req, 1); | |
481 | pd_count = pd_req->current_nr_sectors; | |
482 | pd_buf = pd_req->buffer; | |
483 | spin_unlock_irqrestore(&pd_lock, saved_flags); | |
484 | return 0; | |
485 | } | |
486 | ||
487 | static unsigned long pd_timeout; | |
488 | ||
489 | static enum action do_pd_read_start(void) | |
490 | { | |
491 | if (pd_wait_for(pd_current, STAT_READY, "do_pd_read") & STAT_ERR) { | |
492 | if (pd_retries < PD_MAX_RETRIES) { | |
493 | pd_retries++; | |
494 | return Wait; | |
495 | } | |
496 | return Fail; | |
497 | } | |
498 | pd_ide_command(pd_current, IDE_READ, pd_block, pd_run); | |
499 | phase = do_pd_read_drq; | |
500 | pd_timeout = jiffies + PD_TMO; | |
501 | return Hold; | |
502 | } | |
503 | ||
504 | static enum action do_pd_write_start(void) | |
505 | { | |
506 | if (pd_wait_for(pd_current, STAT_READY, "do_pd_write") & STAT_ERR) { | |
507 | if (pd_retries < PD_MAX_RETRIES) { | |
508 | pd_retries++; | |
509 | return Wait; | |
510 | } | |
511 | return Fail; | |
512 | } | |
513 | pd_ide_command(pd_current, IDE_WRITE, pd_block, pd_run); | |
514 | while (1) { | |
515 | if (pd_wait_for(pd_current, STAT_DRQ, "do_pd_write_drq") & STAT_ERR) { | |
516 | if (pd_retries < PD_MAX_RETRIES) { | |
517 | pd_retries++; | |
518 | return Wait; | |
519 | } | |
520 | return Fail; | |
521 | } | |
522 | pi_write_block(pd_current->pi, pd_buf, 512); | |
523 | if (pd_next_buf()) | |
524 | break; | |
525 | } | |
526 | phase = do_pd_write_done; | |
527 | pd_timeout = jiffies + PD_TMO; | |
528 | return Hold; | |
529 | } | |
530 | ||
531 | static inline int pd_ready(void) | |
532 | { | |
533 | return !(status_reg(pd_current) & STAT_BUSY); | |
534 | } | |
535 | ||
536 | static enum action do_pd_read_drq(void) | |
537 | { | |
538 | if (!pd_ready() && !time_after_eq(jiffies, pd_timeout)) | |
539 | return Hold; | |
540 | ||
541 | while (1) { | |
542 | if (pd_wait_for(pd_current, STAT_DRQ, "do_pd_read_drq") & STAT_ERR) { | |
543 | if (pd_retries < PD_MAX_RETRIES) { | |
544 | pd_retries++; | |
545 | phase = do_pd_read_start; | |
546 | return Wait; | |
547 | } | |
548 | return Fail; | |
549 | } | |
550 | pi_read_block(pd_current->pi, pd_buf, 512); | |
551 | if (pd_next_buf()) | |
552 | break; | |
553 | } | |
554 | return Ok; | |
555 | } | |
556 | ||
557 | static enum action do_pd_write_done(void) | |
558 | { | |
559 | if (!pd_ready() && !time_after_eq(jiffies, pd_timeout)) | |
560 | return Hold; | |
561 | ||
562 | if (pd_wait_for(pd_current, STAT_READY, "do_pd_write_done") & STAT_ERR) { | |
563 | if (pd_retries < PD_MAX_RETRIES) { | |
564 | pd_retries++; | |
565 | phase = do_pd_write_start; | |
566 | return Wait; | |
567 | } | |
568 | return Fail; | |
569 | } | |
570 | return Ok; | |
571 | } | |
572 | ||
573 | /* special io requests */ | |
574 | ||
575 | /* According to the ATA standard, the default CHS geometry should be | |
576 | available following a reset. Some Western Digital drives come up | |
577 | in a mode where only LBA addresses are accepted until the device | |
578 | parameters are initialised. | |
579 | */ | |
580 | ||
581 | static void pd_init_dev_parms(struct pd_unit *disk) | |
582 | { | |
583 | pd_wait_for(disk, 0, DBMSG("before init_dev_parms")); | |
584 | pd_send_command(disk, disk->sectors, 0, disk->heads - 1, 0, 0, | |
585 | IDE_INIT_DEV_PARMS); | |
586 | udelay(300); | |
587 | pd_wait_for(disk, 0, "Initialise device parameters"); | |
588 | } | |
589 | ||
590 | static enum action pd_door_lock(struct pd_unit *disk) | |
591 | { | |
592 | if (!(pd_wait_for(disk, STAT_READY, "Lock") & STAT_ERR)) { | |
593 | pd_send_command(disk, 1, 0, 0, 0, 0, IDE_DOORLOCK); | |
594 | pd_wait_for(disk, STAT_READY, "Lock done"); | |
595 | } | |
596 | return Ok; | |
597 | } | |
598 | ||
599 | static enum action pd_door_unlock(struct pd_unit *disk) | |
600 | { | |
601 | if (!(pd_wait_for(disk, STAT_READY, "Lock") & STAT_ERR)) { | |
602 | pd_send_command(disk, 1, 0, 0, 0, 0, IDE_DOORUNLOCK); | |
603 | pd_wait_for(disk, STAT_READY, "Lock done"); | |
604 | } | |
605 | return Ok; | |
606 | } | |
607 | ||
608 | static enum action pd_eject(struct pd_unit *disk) | |
609 | { | |
610 | pd_wait_for(disk, 0, DBMSG("before unlock on eject")); | |
611 | pd_send_command(disk, 1, 0, 0, 0, 0, IDE_DOORUNLOCK); | |
612 | pd_wait_for(disk, 0, DBMSG("after unlock on eject")); | |
613 | pd_wait_for(disk, 0, DBMSG("before eject")); | |
614 | pd_send_command(disk, 0, 0, 0, 0, 0, IDE_EJECT); | |
615 | pd_wait_for(disk, 0, DBMSG("after eject")); | |
616 | return Ok; | |
617 | } | |
618 | ||
619 | static enum action pd_media_check(struct pd_unit *disk) | |
620 | { | |
621 | int r = pd_wait_for(disk, STAT_READY, DBMSG("before media_check")); | |
622 | if (!(r & STAT_ERR)) { | |
623 | pd_send_command(disk, 1, 1, 0, 0, 0, IDE_READ_VRFY); | |
624 | r = pd_wait_for(disk, STAT_READY, DBMSG("RDY after READ_VRFY")); | |
625 | } else | |
626 | disk->changed = 1; /* say changed if other error */ | |
627 | if (r & ERR_MC) { | |
628 | disk->changed = 1; | |
629 | pd_send_command(disk, 1, 0, 0, 0, 0, IDE_ACKCHANGE); | |
630 | pd_wait_for(disk, STAT_READY, DBMSG("RDY after ACKCHANGE")); | |
631 | pd_send_command(disk, 1, 1, 0, 0, 0, IDE_READ_VRFY); | |
632 | r = pd_wait_for(disk, STAT_READY, DBMSG("RDY after VRFY")); | |
633 | } | |
634 | return Ok; | |
635 | } | |
636 | ||
637 | static void pd_standby_off(struct pd_unit *disk) | |
638 | { | |
639 | pd_wait_for(disk, 0, DBMSG("before STANDBY")); | |
640 | pd_send_command(disk, 0, 0, 0, 0, 0, IDE_STANDBY); | |
641 | pd_wait_for(disk, 0, DBMSG("after STANDBY")); | |
642 | } | |
643 | ||
644 | static enum action pd_identify(struct pd_unit *disk) | |
645 | { | |
646 | int j; | |
647 | char id[PD_ID_LEN + 1]; | |
648 | ||
649 | /* WARNING: here there may be dragons. reset() applies to both drives, | |
650 | but we call it only on probing the MASTER. This should allow most | |
651 | common configurations to work, but be warned that a reset can clear | |
652 | settings on the SLAVE drive. | |
653 | */ | |
654 | ||
655 | if (disk->drive == 0) | |
656 | pd_reset(disk); | |
657 | ||
658 | write_reg(disk, 6, DRIVE(disk)); | |
659 | pd_wait_for(disk, 0, DBMSG("before IDENT")); | |
660 | pd_send_command(disk, 1, 0, 0, 0, 0, IDE_IDENTIFY); | |
661 | ||
662 | if (pd_wait_for(disk, STAT_DRQ, DBMSG("IDENT DRQ")) & STAT_ERR) | |
663 | return Fail; | |
664 | pi_read_block(disk->pi, pd_scratch, 512); | |
665 | disk->can_lba = pd_scratch[99] & 2; | |
27d87183 AV |
666 | disk->sectors = le16_to_cpu(*(__le16 *) (pd_scratch + 12)); |
667 | disk->heads = le16_to_cpu(*(__le16 *) (pd_scratch + 6)); | |
668 | disk->cylinders = le16_to_cpu(*(__le16 *) (pd_scratch + 2)); | |
1da177e4 | 669 | if (disk->can_lba) |
27d87183 | 670 | disk->capacity = le32_to_cpu(*(__le32 *) (pd_scratch + 120)); |
1da177e4 LT |
671 | else |
672 | disk->capacity = disk->sectors * disk->heads * disk->cylinders; | |
673 | ||
674 | for (j = 0; j < PD_ID_LEN; j++) | |
675 | id[j ^ 1] = pd_scratch[j + PD_ID_OFF]; | |
676 | j = PD_ID_LEN - 1; | |
677 | while ((j >= 0) && (id[j] <= 0x20)) | |
678 | j--; | |
679 | j++; | |
680 | id[j] = 0; | |
681 | ||
682 | disk->removable = pd_scratch[0] & 0x80; | |
683 | ||
684 | printk("%s: %s, %s, %d blocks [%dM], (%d/%d/%d), %s media\n", | |
685 | disk->name, id, | |
686 | disk->drive ? "slave" : "master", | |
687 | disk->capacity, disk->capacity / 2048, | |
688 | disk->cylinders, disk->heads, disk->sectors, | |
689 | disk->removable ? "removable" : "fixed"); | |
690 | ||
691 | if (disk->capacity) | |
692 | pd_init_dev_parms(disk); | |
693 | if (!disk->standby) | |
694 | pd_standby_off(disk); | |
695 | ||
696 | return Ok; | |
697 | } | |
698 | ||
699 | /* end of io request engine */ | |
700 | ||
165125e1 | 701 | static void do_pd_request(struct request_queue * q) |
1da177e4 LT |
702 | { |
703 | if (pd_req) | |
704 | return; | |
705 | pd_req = elv_next_request(q); | |
706 | if (!pd_req) | |
707 | return; | |
708 | ||
709 | schedule_fsm(); | |
710 | } | |
711 | ||
712 | static int pd_special_command(struct pd_unit *disk, | |
713 | enum action (*func)(struct pd_unit *disk)) | |
714 | { | |
d79c5a67 | 715 | struct request *rq; |
1da177e4 LT |
716 | int err = 0; |
717 | ||
d79c5a67 FT |
718 | rq = blk_get_request(disk->gd->queue, READ, __GFP_WAIT); |
719 | ||
720 | rq->cmd_type = REQ_TYPE_SPECIAL; | |
721 | rq->special = func; | |
722 | ||
723 | err = blk_execute_rq(disk->gd->queue, disk->gd, rq, 0); | |
724 | ||
725 | blk_put_request(rq); | |
1da177e4 LT |
726 | return err; |
727 | } | |
728 | ||
729 | /* kernel glue structures */ | |
730 | ||
b6a89530 | 731 | static int pd_open(struct block_device *bdev, fmode_t mode) |
1da177e4 | 732 | { |
b6a89530 | 733 | struct pd_unit *disk = bdev->bd_disk->private_data; |
1da177e4 LT |
734 | |
735 | disk->access++; | |
736 | ||
737 | if (disk->removable) { | |
738 | pd_special_command(disk, pd_media_check); | |
739 | pd_special_command(disk, pd_door_lock); | |
740 | } | |
741 | return 0; | |
742 | } | |
743 | ||
a885c8c4 CH |
744 | static int pd_getgeo(struct block_device *bdev, struct hd_geometry *geo) |
745 | { | |
746 | struct pd_unit *disk = bdev->bd_disk->private_data; | |
747 | ||
748 | if (disk->alt_geom) { | |
749 | geo->heads = PD_LOG_HEADS; | |
750 | geo->sectors = PD_LOG_SECTS; | |
751 | geo->cylinders = disk->capacity / (geo->heads * geo->sectors); | |
752 | } else { | |
753 | geo->heads = disk->heads; | |
754 | geo->sectors = disk->sectors; | |
755 | geo->cylinders = disk->cylinders; | |
756 | } | |
757 | ||
758 | return 0; | |
759 | } | |
760 | ||
b6a89530 | 761 | static int pd_ioctl(struct block_device *bdev, fmode_t mode, |
1da177e4 LT |
762 | unsigned int cmd, unsigned long arg) |
763 | { | |
b6a89530 | 764 | struct pd_unit *disk = bdev->bd_disk->private_data; |
1da177e4 LT |
765 | |
766 | switch (cmd) { | |
767 | case CDROMEJECT: | |
768 | if (disk->access == 1) | |
769 | pd_special_command(disk, pd_eject); | |
770 | return 0; | |
1da177e4 LT |
771 | default: |
772 | return -EINVAL; | |
773 | } | |
774 | } | |
775 | ||
b6a89530 | 776 | static int pd_release(struct gendisk *p, fmode_t mode) |
1da177e4 | 777 | { |
b6a89530 | 778 | struct pd_unit *disk = p->private_data; |
1da177e4 LT |
779 | |
780 | if (!--disk->access && disk->removable) | |
781 | pd_special_command(disk, pd_door_unlock); | |
782 | ||
783 | return 0; | |
784 | } | |
785 | ||
786 | static int pd_check_media(struct gendisk *p) | |
787 | { | |
788 | struct pd_unit *disk = p->private_data; | |
789 | int r; | |
790 | if (!disk->removable) | |
791 | return 0; | |
792 | pd_special_command(disk, pd_media_check); | |
793 | r = disk->changed; | |
794 | disk->changed = 0; | |
795 | return r; | |
796 | } | |
797 | ||
798 | static int pd_revalidate(struct gendisk *p) | |
799 | { | |
800 | struct pd_unit *disk = p->private_data; | |
801 | if (pd_special_command(disk, pd_identify) == 0) | |
802 | set_capacity(p, disk->capacity); | |
803 | else | |
804 | set_capacity(p, 0); | |
805 | return 0; | |
806 | } | |
807 | ||
808 | static struct block_device_operations pd_fops = { | |
809 | .owner = THIS_MODULE, | |
b6a89530 AV |
810 | .open = pd_open, |
811 | .release = pd_release, | |
812 | .locked_ioctl = pd_ioctl, | |
a885c8c4 | 813 | .getgeo = pd_getgeo, |
1da177e4 LT |
814 | .media_changed = pd_check_media, |
815 | .revalidate_disk= pd_revalidate | |
816 | }; | |
817 | ||
818 | /* probing */ | |
819 | ||
820 | static void pd_probe_drive(struct pd_unit *disk) | |
821 | { | |
822 | struct gendisk *p = alloc_disk(1 << PD_BITS); | |
823 | if (!p) | |
824 | return; | |
825 | strcpy(p->disk_name, disk->name); | |
826 | p->fops = &pd_fops; | |
827 | p->major = major; | |
828 | p->first_minor = (disk - pd) << PD_BITS; | |
829 | disk->gd = p; | |
830 | p->private_data = disk; | |
831 | p->queue = pd_queue; | |
832 | ||
833 | if (disk->drive == -1) { | |
834 | for (disk->drive = 0; disk->drive <= 1; disk->drive++) | |
835 | if (pd_special_command(disk, pd_identify) == 0) | |
836 | return; | |
837 | } else if (pd_special_command(disk, pd_identify) == 0) | |
838 | return; | |
839 | disk->gd = NULL; | |
840 | put_disk(p); | |
841 | } | |
842 | ||
843 | static int pd_detect(void) | |
844 | { | |
845 | int found = 0, unit, pd_drive_count = 0; | |
846 | struct pd_unit *disk; | |
847 | ||
848 | for (unit = 0; unit < PD_UNITS; unit++) { | |
849 | int *parm = *drives[unit]; | |
850 | struct pd_unit *disk = pd + unit; | |
851 | disk->pi = &disk->pia; | |
852 | disk->access = 0; | |
853 | disk->changed = 1; | |
854 | disk->capacity = 0; | |
855 | disk->drive = parm[D_SLV]; | |
856 | snprintf(disk->name, PD_NAMELEN, "%s%c", name, 'a'+unit); | |
857 | disk->alt_geom = parm[D_GEO]; | |
858 | disk->standby = parm[D_SBY]; | |
859 | if (parm[D_PRT]) | |
860 | pd_drive_count++; | |
861 | } | |
862 | ||
863 | if (pd_drive_count == 0) { /* nothing spec'd - so autoprobe for 1 */ | |
864 | disk = pd; | |
865 | if (pi_init(disk->pi, 1, -1, -1, -1, -1, -1, pd_scratch, | |
866 | PI_PD, verbose, disk->name)) { | |
867 | pd_probe_drive(disk); | |
868 | if (!disk->gd) | |
869 | pi_release(disk->pi); | |
870 | } | |
871 | ||
872 | } else { | |
873 | for (unit = 0, disk = pd; unit < PD_UNITS; unit++, disk++) { | |
874 | int *parm = *drives[unit]; | |
875 | if (!parm[D_PRT]) | |
876 | continue; | |
877 | if (pi_init(disk->pi, 0, parm[D_PRT], parm[D_MOD], | |
878 | parm[D_UNI], parm[D_PRO], parm[D_DLY], | |
879 | pd_scratch, PI_PD, verbose, disk->name)) { | |
880 | pd_probe_drive(disk); | |
881 | if (!disk->gd) | |
882 | pi_release(disk->pi); | |
883 | } | |
884 | } | |
885 | } | |
886 | for (unit = 0, disk = pd; unit < PD_UNITS; unit++, disk++) { | |
887 | if (disk->gd) { | |
888 | set_capacity(disk->gd, disk->capacity); | |
889 | add_disk(disk->gd); | |
890 | found = 1; | |
891 | } | |
892 | } | |
893 | if (!found) | |
894 | printk("%s: no valid drive found\n", name); | |
895 | return found; | |
896 | } | |
897 | ||
898 | static int __init pd_init(void) | |
899 | { | |
900 | if (disable) | |
901 | goto out1; | |
902 | ||
903 | pd_queue = blk_init_queue(do_pd_request, &pd_lock); | |
904 | if (!pd_queue) | |
905 | goto out1; | |
906 | ||
907 | blk_queue_max_sectors(pd_queue, cluster); | |
908 | ||
909 | if (register_blkdev(major, name)) | |
910 | goto out2; | |
911 | ||
912 | printk("%s: %s version %s, major %d, cluster %d, nice %d\n", | |
913 | name, name, PD_VERSION, major, cluster, nice); | |
914 | if (!pd_detect()) | |
915 | goto out3; | |
916 | ||
917 | return 0; | |
918 | ||
919 | out3: | |
920 | unregister_blkdev(major, name); | |
921 | out2: | |
922 | blk_cleanup_queue(pd_queue); | |
923 | out1: | |
924 | return -ENODEV; | |
925 | } | |
926 | ||
927 | static void __exit pd_exit(void) | |
928 | { | |
929 | struct pd_unit *disk; | |
930 | int unit; | |
931 | unregister_blkdev(major, name); | |
932 | for (unit = 0, disk = pd; unit < PD_UNITS; unit++, disk++) { | |
933 | struct gendisk *p = disk->gd; | |
934 | if (p) { | |
935 | disk->gd = NULL; | |
936 | del_gendisk(p); | |
937 | put_disk(p); | |
938 | pi_release(disk->pi); | |
939 | } | |
940 | } | |
941 | blk_cleanup_queue(pd_queue); | |
942 | } | |
943 | ||
944 | MODULE_LICENSE("GPL"); | |
945 | module_init(pd_init) | |
946 | module_exit(pd_exit) |