| /* |
| pd.c (c) 1997-8 Grant R. Guenther <grant@torque.net> |
| Under the terms of the GNU General Public License. |
| |
| This is the high-level driver for parallel port IDE hard |
| drives based on chips supported by the paride module. |
| |
| By default, the driver will autoprobe for a single parallel |
| port IDE drive, but if their individual parameters are |
| specified, the driver can handle up to 4 drives. |
| |
| The behaviour of the pd driver can be altered by setting |
| some parameters from the insmod command line. The following |
| parameters are adjustable: |
| |
| drive0 These four arguments can be arrays of |
| drive1 1-8 integers as follows: |
| drive2 |
| drive3 <prt>,<pro>,<uni>,<mod>,<geo>,<sby>,<dly>,<slv> |
| |
| Where, |
| |
| <prt> is the base of the parallel port address for |
| the corresponding drive. (required) |
| |
| <pro> is the protocol number for the adapter that |
| supports this drive. These numbers are |
| logged by 'paride' when the protocol modules |
| are initialised. (0 if not given) |
| |
| <uni> for those adapters that support chained |
| devices, this is the unit selector for the |
| chain of devices on the given port. It should |
| be zero for devices that don't support chaining. |
| (0 if not given) |
| |
| <mod> this can be -1 to choose the best mode, or one |
| of the mode numbers supported by the adapter. |
| (-1 if not given) |
| |
| <geo> this defaults to 0 to indicate that the driver |
| should use the CHS geometry provided by the drive |
| itself. If set to 1, the driver will provide |
| a logical geometry with 64 heads and 32 sectors |
| per track, to be consistent with most SCSI |
| drivers. (0 if not given) |
| |
| <sby> set this to zero to disable the power saving |
| standby mode, if needed. (1 if not given) |
| |
| <dly> some parallel ports require the driver to |
| go more slowly. -1 sets a default value that |
| should work with the chosen protocol. Otherwise, |
| set this to a small integer, the larger it is |
| the slower the port i/o. In some cases, setting |
| this to zero will speed up the device. (default -1) |
| |
| <slv> IDE disks can be jumpered to master or slave. |
| Set this to 0 to choose the master drive, 1 to |
| choose the slave, -1 (the default) to choose the |
| first drive found. |
| |
| |
| major You may use this parameter to override the |
| default major number (45) that this driver |
| will use. Be sure to change the device |
| name as well. |
| |
| name This parameter is a character string that |
| contains the name the kernel will use for this |
| device (in /proc output, for instance). |
| (default "pd") |
| |
| cluster The driver will attempt to aggregate requests |
| for adjacent blocks into larger multi-block |
| clusters. The maximum cluster size (in 512 |
| byte sectors) is set with this parameter. |
| (default 64) |
| |
| verbose This parameter controls the amount of logging |
| that the driver will do. Set it to 0 for |
| normal operation, 1 to see autoprobe progress |
| messages, or 2 to see additional debugging |
| output. (default 0) |
| |
| nice This parameter controls the driver's use of |
| idle CPU time, at the expense of some speed. |
| |
| If this driver is built into the kernel, you can use kernel |
| the following command line parameters, with the same values |
| as the corresponding module parameters listed above: |
| |
| pd.drive0 |
| pd.drive1 |
| pd.drive2 |
| pd.drive3 |
| pd.cluster |
| pd.nice |
| |
| In addition, you can use the parameter pd.disable to disable |
| the driver entirely. |
| |
| */ |
| |
| /* Changes: |
| |
| 1.01 GRG 1997.01.24 Restored pd_reset() |
| Added eject ioctl |
| 1.02 GRG 1998.05.06 SMP spinlock changes, |
| Added slave support |
| 1.03 GRG 1998.06.16 Eliminate an Ugh. |
| 1.04 GRG 1998.08.15 Extra debugging, use HZ in loop timing |
| 1.05 GRG 1998.09.24 Added jumbo support |
| |
| */ |
| |
| #define PD_VERSION "1.05" |
| #define PD_MAJOR 45 |
| #define PD_NAME "pd" |
| #define PD_UNITS 4 |
| |
| /* Here are things one can override from the insmod command. |
| Most are autoprobed by paride unless set here. Verbose is off |
| by default. |
| |
| */ |
| #include <linux/types.h> |
| |
| static int verbose = 0; |
| static int major = PD_MAJOR; |
| static char *name = PD_NAME; |
| static int cluster = 64; |
| static int nice = 0; |
| static int disable = 0; |
| |
| static int drive0[8] = { 0, 0, 0, -1, 0, 1, -1, -1 }; |
| static int drive1[8] = { 0, 0, 0, -1, 0, 1, -1, -1 }; |
| static int drive2[8] = { 0, 0, 0, -1, 0, 1, -1, -1 }; |
| static int drive3[8] = { 0, 0, 0, -1, 0, 1, -1, -1 }; |
| |
| static int (*drives[4])[8] = {&drive0, &drive1, &drive2, &drive3}; |
| |
| enum {D_PRT, D_PRO, D_UNI, D_MOD, D_GEO, D_SBY, D_DLY, D_SLV}; |
| |
| /* end of parameters */ |
| |
| #include <linux/init.h> |
| #include <linux/module.h> |
| #include <linux/gfp.h> |
| #include <linux/fs.h> |
| #include <linux/delay.h> |
| #include <linux/hdreg.h> |
| #include <linux/cdrom.h> /* for the eject ioctl */ |
| #include <linux/blk-mq.h> |
| #include <linux/blkpg.h> |
| #include <linux/kernel.h> |
| #include <linux/mutex.h> |
| #include <linux/uaccess.h> |
| #include <linux/workqueue.h> |
| |
| static DEFINE_MUTEX(pd_mutex); |
| static DEFINE_SPINLOCK(pd_lock); |
| |
| module_param(verbose, int, 0); |
| module_param(major, int, 0); |
| module_param(name, charp, 0); |
| module_param(cluster, int, 0); |
| module_param(nice, int, 0); |
| module_param_array(drive0, int, NULL, 0); |
| module_param_array(drive1, int, NULL, 0); |
| module_param_array(drive2, int, NULL, 0); |
| module_param_array(drive3, int, NULL, 0); |
| |
| #include "paride.h" |
| |
| #define PD_BITS 4 |
| |
| /* numbers for "SCSI" geometry */ |
| |
| #define PD_LOG_HEADS 64 |
| #define PD_LOG_SECTS 32 |
| |
| #define PD_ID_OFF 54 |
| #define PD_ID_LEN 14 |
| |
| #define PD_MAX_RETRIES 5 |
| #define PD_TMO 800 /* interrupt timeout in jiffies */ |
| #define PD_SPIN_DEL 50 /* spin delay in micro-seconds */ |
| |
| #define PD_SPIN (1000000*PD_TMO)/(HZ*PD_SPIN_DEL) |
| |
| #define STAT_ERR 0x00001 |
| #define STAT_INDEX 0x00002 |
| #define STAT_ECC 0x00004 |
| #define STAT_DRQ 0x00008 |
| #define STAT_SEEK 0x00010 |
| #define STAT_WRERR 0x00020 |
| #define STAT_READY 0x00040 |
| #define STAT_BUSY 0x00080 |
| |
| #define ERR_AMNF 0x00100 |
| #define ERR_TK0NF 0x00200 |
| #define ERR_ABRT 0x00400 |
| #define ERR_MCR 0x00800 |
| #define ERR_IDNF 0x01000 |
| #define ERR_MC 0x02000 |
| #define ERR_UNC 0x04000 |
| #define ERR_TMO 0x10000 |
| |
| #define IDE_READ 0x20 |
| #define IDE_WRITE 0x30 |
| #define IDE_READ_VRFY 0x40 |
| #define IDE_INIT_DEV_PARMS 0x91 |
| #define IDE_STANDBY 0x96 |
| #define IDE_ACKCHANGE 0xdb |
| #define IDE_DOORLOCK 0xde |
| #define IDE_DOORUNLOCK 0xdf |
| #define IDE_IDENTIFY 0xec |
| #define IDE_EJECT 0xed |
| |
| #define PD_NAMELEN 8 |
| |
| struct pd_unit { |
| struct pi_adapter pia; /* interface to paride layer */ |
| struct pi_adapter *pi; |
| int access; /* count of active opens ... */ |
| int capacity; /* Size of this volume in sectors */ |
| int heads; /* physical geometry */ |
| int sectors; |
| int cylinders; |
| int can_lba; |
| int drive; /* master=0 slave=1 */ |
| int changed; /* Have we seen a disk change ? */ |
| int removable; /* removable media device ? */ |
| int standby; |
| int alt_geom; |
| char name[PD_NAMELEN]; /* pda, pdb, etc ... */ |
| struct gendisk *gd; |
| struct blk_mq_tag_set tag_set; |
| struct list_head rq_list; |
| }; |
| |
| static struct pd_unit pd[PD_UNITS]; |
| |
| struct pd_req { |
| /* for REQ_OP_DRV_IN: */ |
| enum action (*func)(struct pd_unit *disk); |
| }; |
| |
| static char pd_scratch[512]; /* scratch block buffer */ |
| |
| static char *pd_errs[17] = { "ERR", "INDEX", "ECC", "DRQ", "SEEK", "WRERR", |
| "READY", "BUSY", "AMNF", "TK0NF", "ABRT", "MCR", |
| "IDNF", "MC", "UNC", "???", "TMO" |
| }; |
| |
| static void *par_drv; /* reference of parport driver */ |
| |
| static inline int status_reg(struct pd_unit *disk) |
| { |
| return pi_read_regr(disk->pi, 1, 6); |
| } |
| |
| static inline int read_reg(struct pd_unit *disk, int reg) |
| { |
| return pi_read_regr(disk->pi, 0, reg); |
| } |
| |
| static inline void write_status(struct pd_unit *disk, int val) |
| { |
| pi_write_regr(disk->pi, 1, 6, val); |
| } |
| |
| static inline void write_reg(struct pd_unit *disk, int reg, int val) |
| { |
| pi_write_regr(disk->pi, 0, reg, val); |
| } |
| |
| static inline u8 DRIVE(struct pd_unit *disk) |
| { |
| return 0xa0+0x10*disk->drive; |
| } |
| |
| /* ide command interface */ |
| |
| static void pd_print_error(struct pd_unit *disk, char *msg, int status) |
| { |
| int i; |
| |
| printk("%s: %s: status = 0x%x =", disk->name, msg, status); |
| for (i = 0; i < ARRAY_SIZE(pd_errs); i++) |
| if (status & (1 << i)) |
| printk(" %s", pd_errs[i]); |
| printk("\n"); |
| } |
| |
| static void pd_reset(struct pd_unit *disk) |
| { /* called only for MASTER drive */ |
| write_status(disk, 4); |
| udelay(50); |
| write_status(disk, 0); |
| udelay(250); |
| } |
| |
| #define DBMSG(msg) ((verbose>1)?(msg):NULL) |
| |
| static int pd_wait_for(struct pd_unit *disk, int w, char *msg) |
| { /* polled wait */ |
| int k, r, e; |
| |
| k = 0; |
| while (k < PD_SPIN) { |
| r = status_reg(disk); |
| k++; |
| if (((r & w) == w) && !(r & STAT_BUSY)) |
| break; |
| udelay(PD_SPIN_DEL); |
| } |
| e = (read_reg(disk, 1) << 8) + read_reg(disk, 7); |
| if (k >= PD_SPIN) |
| e |= ERR_TMO; |
| if ((e & (STAT_ERR | ERR_TMO)) && (msg != NULL)) |
| pd_print_error(disk, msg, e); |
| return e; |
| } |
| |
| static void pd_send_command(struct pd_unit *disk, int n, int s, int h, int c0, int c1, int func) |
| { |
| write_reg(disk, 6, DRIVE(disk) + h); |
| write_reg(disk, 1, 0); /* the IDE task file */ |
| write_reg(disk, 2, n); |
| write_reg(disk, 3, s); |
| write_reg(disk, 4, c0); |
| write_reg(disk, 5, c1); |
| write_reg(disk, 7, func); |
| |
| udelay(1); |
| } |
| |
| static void pd_ide_command(struct pd_unit *disk, int func, int block, int count) |
| { |
| int c1, c0, h, s; |
| |
| if (disk->can_lba) { |
| s = block & 255; |
| c0 = (block >>= 8) & 255; |
| c1 = (block >>= 8) & 255; |
| h = ((block >>= 8) & 15) + 0x40; |
| } else { |
| s = (block % disk->sectors) + 1; |
| h = (block /= disk->sectors) % disk->heads; |
| c0 = (block /= disk->heads) % 256; |
| c1 = (block >>= 8); |
| } |
| pd_send_command(disk, count, s, h, c0, c1, func); |
| } |
| |
| /* The i/o request engine */ |
| |
| enum action {Fail = 0, Ok = 1, Hold, Wait}; |
| |
| static struct request *pd_req; /* current request */ |
| static enum action (*phase)(void); |
| |
| static void run_fsm(void); |
| |
| static void ps_tq_int(struct work_struct *work); |
| |
| static DECLARE_DELAYED_WORK(fsm_tq, ps_tq_int); |
| |
| static void schedule_fsm(void) |
| { |
| if (!nice) |
| schedule_delayed_work(&fsm_tq, 0); |
| else |
| schedule_delayed_work(&fsm_tq, nice-1); |
| } |
| |
| static void ps_tq_int(struct work_struct *work) |
| { |
| run_fsm(); |
| } |
| |
| static enum action do_pd_io_start(void); |
| static enum action pd_special(void); |
| static enum action do_pd_read_start(void); |
| static enum action do_pd_write_start(void); |
| static enum action do_pd_read_drq(void); |
| static enum action do_pd_write_done(void); |
| |
| static int pd_queue; |
| static int pd_claimed; |
| |
| static struct pd_unit *pd_current; /* current request's drive */ |
| static PIA *pi_current; /* current request's PIA */ |
| |
| static int set_next_request(void) |
| { |
| struct gendisk *disk; |
| struct request_queue *q; |
| int old_pos = pd_queue; |
| |
| do { |
| disk = pd[pd_queue].gd; |
| q = disk ? disk->queue : NULL; |
| if (++pd_queue == PD_UNITS) |
| pd_queue = 0; |
| if (q) { |
| struct pd_unit *disk = q->queuedata; |
| |
| if (list_empty(&disk->rq_list)) |
| continue; |
| |
| pd_req = list_first_entry(&disk->rq_list, |
| struct request, |
| queuelist); |
| list_del_init(&pd_req->queuelist); |
| blk_mq_start_request(pd_req); |
| break; |
| } |
| } while (pd_queue != old_pos); |
| |
| return pd_req != NULL; |
| } |
| |
| static void run_fsm(void) |
| { |
| while (1) { |
| enum action res; |
| int stop = 0; |
| |
| if (!phase) { |
| pd_current = pd_req->q->disk->private_data; |
| pi_current = pd_current->pi; |
| phase = do_pd_io_start; |
| } |
| |
| switch (pd_claimed) { |
| case 0: |
| pd_claimed = 1; |
| if (!pi_schedule_claimed(pi_current, run_fsm)) |
| return; |
| fallthrough; |
| case 1: |
| pd_claimed = 2; |
| pi_current->proto->connect(pi_current); |
| } |
| |
| switch(res = phase()) { |
| case Ok: case Fail: { |
| blk_status_t err; |
| |
| err = res == Ok ? 0 : BLK_STS_IOERR; |
| pi_disconnect(pi_current); |
| pd_claimed = 0; |
| phase = NULL; |
| spin_lock_irq(&pd_lock); |
| if (!blk_update_request(pd_req, err, |
| blk_rq_cur_bytes(pd_req))) { |
| __blk_mq_end_request(pd_req, err); |
| pd_req = NULL; |
| stop = !set_next_request(); |
| } |
| spin_unlock_irq(&pd_lock); |
| if (stop) |
| return; |
| } |
| fallthrough; |
| case Hold: |
| schedule_fsm(); |
| return; |
| case Wait: |
| pi_disconnect(pi_current); |
| pd_claimed = 0; |
| } |
| } |
| } |
| |
| static int pd_retries = 0; /* i/o error retry count */ |
| static int pd_block; /* address of next requested block */ |
| static int pd_count; /* number of blocks still to do */ |
| static int pd_run; /* sectors in current cluster */ |
| static char *pd_buf; /* buffer for request in progress */ |
| |
| static enum action do_pd_io_start(void) |
| { |
| switch (req_op(pd_req)) { |
| case REQ_OP_DRV_IN: |
| phase = pd_special; |
| return pd_special(); |
| case REQ_OP_READ: |
| case REQ_OP_WRITE: |
| pd_block = blk_rq_pos(pd_req); |
| pd_count = blk_rq_cur_sectors(pd_req); |
| if (pd_block + pd_count > get_capacity(pd_req->q->disk)) |
| return Fail; |
| pd_run = blk_rq_sectors(pd_req); |
| pd_buf = bio_data(pd_req->bio); |
| pd_retries = 0; |
| if (req_op(pd_req) == REQ_OP_READ) |
| return do_pd_read_start(); |
| else |
| return do_pd_write_start(); |
| default: |
| break; |
| } |
| return Fail; |
| } |
| |
| static enum action pd_special(void) |
| { |
| struct pd_req *req = blk_mq_rq_to_pdu(pd_req); |
| |
| return req->func(pd_current); |
| } |
| |
| static int pd_next_buf(void) |
| { |
| unsigned long saved_flags; |
| |
| pd_count--; |
| pd_run--; |
| pd_buf += 512; |
| pd_block++; |
| if (!pd_run) |
| return 1; |
| if (pd_count) |
| return 0; |
| spin_lock_irqsave(&pd_lock, saved_flags); |
| if (!blk_update_request(pd_req, 0, blk_rq_cur_bytes(pd_req))) { |
| __blk_mq_end_request(pd_req, 0); |
| pd_req = NULL; |
| pd_count = 0; |
| pd_buf = NULL; |
| } else { |
| pd_count = blk_rq_cur_sectors(pd_req); |
| pd_buf = bio_data(pd_req->bio); |
| } |
| spin_unlock_irqrestore(&pd_lock, saved_flags); |
| return !pd_count; |
| } |
| |
| static unsigned long pd_timeout; |
| |
| static enum action do_pd_read_start(void) |
| { |
| if (pd_wait_for(pd_current, STAT_READY, "do_pd_read") & STAT_ERR) { |
| if (pd_retries < PD_MAX_RETRIES) { |
| pd_retries++; |
| return Wait; |
| } |
| return Fail; |
| } |
| pd_ide_command(pd_current, IDE_READ, pd_block, pd_run); |
| phase = do_pd_read_drq; |
| pd_timeout = jiffies + PD_TMO; |
| return Hold; |
| } |
| |
| static enum action do_pd_write_start(void) |
| { |
| if (pd_wait_for(pd_current, STAT_READY, "do_pd_write") & STAT_ERR) { |
| if (pd_retries < PD_MAX_RETRIES) { |
| pd_retries++; |
| return Wait; |
| } |
| return Fail; |
| } |
| pd_ide_command(pd_current, IDE_WRITE, pd_block, pd_run); |
| while (1) { |
| if (pd_wait_for(pd_current, STAT_DRQ, "do_pd_write_drq") & STAT_ERR) { |
| if (pd_retries < PD_MAX_RETRIES) { |
| pd_retries++; |
| return Wait; |
| } |
| return Fail; |
| } |
| pi_write_block(pd_current->pi, pd_buf, 512); |
| if (pd_next_buf()) |
| break; |
| } |
| phase = do_pd_write_done; |
| pd_timeout = jiffies + PD_TMO; |
| return Hold; |
| } |
| |
| static inline int pd_ready(void) |
| { |
| return !(status_reg(pd_current) & STAT_BUSY); |
| } |
| |
| static enum action do_pd_read_drq(void) |
| { |
| if (!pd_ready() && !time_after_eq(jiffies, pd_timeout)) |
| return Hold; |
| |
| while (1) { |
| if (pd_wait_for(pd_current, STAT_DRQ, "do_pd_read_drq") & STAT_ERR) { |
| if (pd_retries < PD_MAX_RETRIES) { |
| pd_retries++; |
| phase = do_pd_read_start; |
| return Wait; |
| } |
| return Fail; |
| } |
| pi_read_block(pd_current->pi, pd_buf, 512); |
| if (pd_next_buf()) |
| break; |
| } |
| return Ok; |
| } |
| |
| static enum action do_pd_write_done(void) |
| { |
| if (!pd_ready() && !time_after_eq(jiffies, pd_timeout)) |
| return Hold; |
| |
| if (pd_wait_for(pd_current, STAT_READY, "do_pd_write_done") & STAT_ERR) { |
| if (pd_retries < PD_MAX_RETRIES) { |
| pd_retries++; |
| phase = do_pd_write_start; |
| return Wait; |
| } |
| return Fail; |
| } |
| return Ok; |
| } |
| |
| /* special io requests */ |
| |
| /* According to the ATA standard, the default CHS geometry should be |
| available following a reset. Some Western Digital drives come up |
| in a mode where only LBA addresses are accepted until the device |
| parameters are initialised. |
| */ |
| |
| static void pd_init_dev_parms(struct pd_unit *disk) |
| { |
| pd_wait_for(disk, 0, DBMSG("before init_dev_parms")); |
| pd_send_command(disk, disk->sectors, 0, disk->heads - 1, 0, 0, |
| IDE_INIT_DEV_PARMS); |
| udelay(300); |
| pd_wait_for(disk, 0, "Initialise device parameters"); |
| } |
| |
| static enum action pd_door_lock(struct pd_unit *disk) |
| { |
| if (!(pd_wait_for(disk, STAT_READY, "Lock") & STAT_ERR)) { |
| pd_send_command(disk, 1, 0, 0, 0, 0, IDE_DOORLOCK); |
| pd_wait_for(disk, STAT_READY, "Lock done"); |
| } |
| return Ok; |
| } |
| |
| static enum action pd_door_unlock(struct pd_unit *disk) |
| { |
| if (!(pd_wait_for(disk, STAT_READY, "Lock") & STAT_ERR)) { |
| pd_send_command(disk, 1, 0, 0, 0, 0, IDE_DOORUNLOCK); |
| pd_wait_for(disk, STAT_READY, "Lock done"); |
| } |
| return Ok; |
| } |
| |
| static enum action pd_eject(struct pd_unit *disk) |
| { |
| pd_wait_for(disk, 0, DBMSG("before unlock on eject")); |
| pd_send_command(disk, 1, 0, 0, 0, 0, IDE_DOORUNLOCK); |
| pd_wait_for(disk, 0, DBMSG("after unlock on eject")); |
| pd_wait_for(disk, 0, DBMSG("before eject")); |
| pd_send_command(disk, 0, 0, 0, 0, 0, IDE_EJECT); |
| pd_wait_for(disk, 0, DBMSG("after eject")); |
| return Ok; |
| } |
| |
| static enum action pd_media_check(struct pd_unit *disk) |
| { |
| int r = pd_wait_for(disk, STAT_READY, DBMSG("before media_check")); |
| if (!(r & STAT_ERR)) { |
| pd_send_command(disk, 1, 1, 0, 0, 0, IDE_READ_VRFY); |
| r = pd_wait_for(disk, STAT_READY, DBMSG("RDY after READ_VRFY")); |
| } else |
| disk->changed = 1; /* say changed if other error */ |
| if (r & ERR_MC) { |
| disk->changed = 1; |
| pd_send_command(disk, 1, 0, 0, 0, 0, IDE_ACKCHANGE); |
| pd_wait_for(disk, STAT_READY, DBMSG("RDY after ACKCHANGE")); |
| pd_send_command(disk, 1, 1, 0, 0, 0, IDE_READ_VRFY); |
| r = pd_wait_for(disk, STAT_READY, DBMSG("RDY after VRFY")); |
| } |
| return Ok; |
| } |
| |
| static void pd_standby_off(struct pd_unit *disk) |
| { |
| pd_wait_for(disk, 0, DBMSG("before STANDBY")); |
| pd_send_command(disk, 0, 0, 0, 0, 0, IDE_STANDBY); |
| pd_wait_for(disk, 0, DBMSG("after STANDBY")); |
| } |
| |
| static enum action pd_identify(struct pd_unit *disk) |
| { |
| int j; |
| char id[PD_ID_LEN + 1]; |
| |
| /* WARNING: here there may be dragons. reset() applies to both drives, |
| but we call it only on probing the MASTER. This should allow most |
| common configurations to work, but be warned that a reset can clear |
| settings on the SLAVE drive. |
| */ |
| |
| if (disk->drive == 0) |
| pd_reset(disk); |
| |
| write_reg(disk, 6, DRIVE(disk)); |
| pd_wait_for(disk, 0, DBMSG("before IDENT")); |
| pd_send_command(disk, 1, 0, 0, 0, 0, IDE_IDENTIFY); |
| |
| if (pd_wait_for(disk, STAT_DRQ, DBMSG("IDENT DRQ")) & STAT_ERR) |
| return Fail; |
| pi_read_block(disk->pi, pd_scratch, 512); |
| disk->can_lba = pd_scratch[99] & 2; |
| disk->sectors = le16_to_cpu(*(__le16 *) (pd_scratch + 12)); |
| disk->heads = le16_to_cpu(*(__le16 *) (pd_scratch + 6)); |
| disk->cylinders = le16_to_cpu(*(__le16 *) (pd_scratch + 2)); |
| if (disk->can_lba) |
| disk->capacity = le32_to_cpu(*(__le32 *) (pd_scratch + 120)); |
| else |
| disk->capacity = disk->sectors * disk->heads * disk->cylinders; |
| |
| for (j = 0; j < PD_ID_LEN; j++) |
| id[j ^ 1] = pd_scratch[j + PD_ID_OFF]; |
| j = PD_ID_LEN - 1; |
| while ((j >= 0) && (id[j] <= 0x20)) |
| j--; |
| j++; |
| id[j] = 0; |
| |
| disk->removable = pd_scratch[0] & 0x80; |
| |
| printk("%s: %s, %s, %d blocks [%dM], (%d/%d/%d), %s media\n", |
| disk->name, id, |
| disk->drive ? "slave" : "master", |
| disk->capacity, disk->capacity / 2048, |
| disk->cylinders, disk->heads, disk->sectors, |
| disk->removable ? "removable" : "fixed"); |
| |
| if (disk->capacity) |
| pd_init_dev_parms(disk); |
| if (!disk->standby) |
| pd_standby_off(disk); |
| |
| return Ok; |
| } |
| |
| /* end of io request engine */ |
| |
| static blk_status_t pd_queue_rq(struct blk_mq_hw_ctx *hctx, |
| const struct blk_mq_queue_data *bd) |
| { |
| struct pd_unit *disk = hctx->queue->queuedata; |
| |
| spin_lock_irq(&pd_lock); |
| if (!pd_req) { |
| pd_req = bd->rq; |
| blk_mq_start_request(pd_req); |
| } else |
| list_add_tail(&bd->rq->queuelist, &disk->rq_list); |
| spin_unlock_irq(&pd_lock); |
| |
| run_fsm(); |
| return BLK_STS_OK; |
| } |
| |
| static int pd_special_command(struct pd_unit *disk, |
| enum action (*func)(struct pd_unit *disk)) |
| { |
| struct request *rq; |
| struct pd_req *req; |
| |
| rq = blk_mq_alloc_request(disk->gd->queue, REQ_OP_DRV_IN, 0); |
| if (IS_ERR(rq)) |
| return PTR_ERR(rq); |
| req = blk_mq_rq_to_pdu(rq); |
| |
| req->func = func; |
| blk_execute_rq(rq, false); |
| blk_mq_free_request(rq); |
| return 0; |
| } |
| |
| /* kernel glue structures */ |
| |
| static int pd_open(struct block_device *bdev, fmode_t mode) |
| { |
| struct pd_unit *disk = bdev->bd_disk->private_data; |
| |
| mutex_lock(&pd_mutex); |
| disk->access++; |
| |
| if (disk->removable) { |
| pd_special_command(disk, pd_media_check); |
| pd_special_command(disk, pd_door_lock); |
| } |
| mutex_unlock(&pd_mutex); |
| return 0; |
| } |
| |
| static int pd_getgeo(struct block_device *bdev, struct hd_geometry *geo) |
| { |
| struct pd_unit *disk = bdev->bd_disk->private_data; |
| |
| if (disk->alt_geom) { |
| geo->heads = PD_LOG_HEADS; |
| geo->sectors = PD_LOG_SECTS; |
| geo->cylinders = disk->capacity / (geo->heads * geo->sectors); |
| } else { |
| geo->heads = disk->heads; |
| geo->sectors = disk->sectors; |
| geo->cylinders = disk->cylinders; |
| } |
| |
| return 0; |
| } |
| |
| static int pd_ioctl(struct block_device *bdev, fmode_t mode, |
| unsigned int cmd, unsigned long arg) |
| { |
| struct pd_unit *disk = bdev->bd_disk->private_data; |
| |
| switch (cmd) { |
| case CDROMEJECT: |
| mutex_lock(&pd_mutex); |
| if (disk->access == 1) |
| pd_special_command(disk, pd_eject); |
| mutex_unlock(&pd_mutex); |
| return 0; |
| default: |
| return -EINVAL; |
| } |
| } |
| |
| static void pd_release(struct gendisk *p, fmode_t mode) |
| { |
| struct pd_unit *disk = p->private_data; |
| |
| mutex_lock(&pd_mutex); |
| if (!--disk->access && disk->removable) |
| pd_special_command(disk, pd_door_unlock); |
| mutex_unlock(&pd_mutex); |
| } |
| |
| static unsigned int pd_check_events(struct gendisk *p, unsigned int clearing) |
| { |
| struct pd_unit *disk = p->private_data; |
| int r; |
| if (!disk->removable) |
| return 0; |
| pd_special_command(disk, pd_media_check); |
| r = disk->changed; |
| disk->changed = 0; |
| return r ? DISK_EVENT_MEDIA_CHANGE : 0; |
| } |
| |
| static const struct block_device_operations pd_fops = { |
| .owner = THIS_MODULE, |
| .open = pd_open, |
| .release = pd_release, |
| .ioctl = pd_ioctl, |
| .compat_ioctl = pd_ioctl, |
| .getgeo = pd_getgeo, |
| .check_events = pd_check_events, |
| }; |
| |
| /* probing */ |
| |
| static const struct blk_mq_ops pd_mq_ops = { |
| .queue_rq = pd_queue_rq, |
| }; |
| |
| static int pd_probe_drive(struct pd_unit *disk, int autoprobe, int port, |
| int mode, int unit, int protocol, int delay) |
| { |
| int index = disk - pd; |
| int *parm = *drives[index]; |
| struct gendisk *p; |
| int ret; |
| |
| disk->pi = &disk->pia; |
| disk->access = 0; |
| disk->changed = 1; |
| disk->capacity = 0; |
| disk->drive = parm[D_SLV]; |
| snprintf(disk->name, PD_NAMELEN, "%s%c", name, 'a' + index); |
| disk->alt_geom = parm[D_GEO]; |
| disk->standby = parm[D_SBY]; |
| INIT_LIST_HEAD(&disk->rq_list); |
| |
| if (!pi_init(disk->pi, autoprobe, port, mode, unit, protocol, delay, |
| pd_scratch, PI_PD, verbose, disk->name)) |
| return -ENXIO; |
| |
| memset(&disk->tag_set, 0, sizeof(disk->tag_set)); |
| disk->tag_set.ops = &pd_mq_ops; |
| disk->tag_set.cmd_size = sizeof(struct pd_req); |
| disk->tag_set.nr_hw_queues = 1; |
| disk->tag_set.nr_maps = 1; |
| disk->tag_set.queue_depth = 2; |
| disk->tag_set.numa_node = NUMA_NO_NODE; |
| disk->tag_set.flags = BLK_MQ_F_SHOULD_MERGE | BLK_MQ_F_BLOCKING; |
| ret = blk_mq_alloc_tag_set(&disk->tag_set); |
| if (ret) |
| goto pi_release; |
| |
| p = blk_mq_alloc_disk(&disk->tag_set, disk); |
| if (IS_ERR(p)) { |
| ret = PTR_ERR(p); |
| goto free_tag_set; |
| } |
| disk->gd = p; |
| |
| strcpy(p->disk_name, disk->name); |
| p->fops = &pd_fops; |
| p->major = major; |
| p->first_minor = (disk - pd) << PD_BITS; |
| p->minors = 1 << PD_BITS; |
| p->events = DISK_EVENT_MEDIA_CHANGE; |
| p->private_data = disk; |
| blk_queue_max_hw_sectors(p->queue, cluster); |
| blk_queue_bounce_limit(p->queue, BLK_BOUNCE_HIGH); |
| |
| if (disk->drive == -1) { |
| for (disk->drive = 0; disk->drive <= 1; disk->drive++) { |
| ret = pd_special_command(disk, pd_identify); |
| if (ret == 0) |
| break; |
| } |
| } else { |
| ret = pd_special_command(disk, pd_identify); |
| } |
| if (ret) |
| goto put_disk; |
| set_capacity(disk->gd, disk->capacity); |
| ret = add_disk(disk->gd); |
| if (ret) |
| goto cleanup_disk; |
| return 0; |
| cleanup_disk: |
| put_disk(disk->gd); |
| put_disk: |
| put_disk(p); |
| disk->gd = NULL; |
| free_tag_set: |
| blk_mq_free_tag_set(&disk->tag_set); |
| pi_release: |
| pi_release(disk->pi); |
| return ret; |
| } |
| |
| static int __init pd_init(void) |
| { |
| int found = 0, unit, pd_drive_count = 0; |
| struct pd_unit *disk; |
| |
| if (disable) |
| return -ENODEV; |
| |
| if (register_blkdev(major, name)) |
| return -ENODEV; |
| |
| printk("%s: %s version %s, major %d, cluster %d, nice %d\n", |
| name, name, PD_VERSION, major, cluster, nice); |
| |
| par_drv = pi_register_driver(name); |
| if (!par_drv) { |
| pr_err("failed to register %s driver\n", name); |
| goto out_unregister_blkdev; |
| } |
| |
| for (unit = 0; unit < PD_UNITS; unit++) { |
| int *parm = *drives[unit]; |
| |
| if (parm[D_PRT]) |
| pd_drive_count++; |
| } |
| |
| if (pd_drive_count == 0) { /* nothing spec'd - so autoprobe for 1 */ |
| if (!pd_probe_drive(pd, 1, -1, -1, -1, -1, -1)) |
| found++; |
| } else { |
| for (unit = 0, disk = pd; unit < PD_UNITS; unit++, disk++) { |
| int *parm = *drives[unit]; |
| if (!parm[D_PRT]) |
| continue; |
| if (!pd_probe_drive(disk, 0, parm[D_PRT], parm[D_MOD], |
| parm[D_UNI], parm[D_PRO], parm[D_DLY])) |
| found++; |
| } |
| } |
| if (!found) { |
| printk("%s: no valid drive found\n", name); |
| goto out_pi_unregister_driver; |
| } |
| |
| return 0; |
| |
| out_pi_unregister_driver: |
| pi_unregister_driver(par_drv); |
| out_unregister_blkdev: |
| unregister_blkdev(major, name); |
| return -ENODEV; |
| } |
| |
| static void __exit pd_exit(void) |
| { |
| struct pd_unit *disk; |
| int unit; |
| unregister_blkdev(major, name); |
| for (unit = 0, disk = pd; unit < PD_UNITS; unit++, disk++) { |
| struct gendisk *p = disk->gd; |
| if (p) { |
| disk->gd = NULL; |
| del_gendisk(p); |
| put_disk(p); |
| blk_mq_free_tag_set(&disk->tag_set); |
| pi_release(disk->pi); |
| } |
| } |
| } |
| |
| MODULE_LICENSE("GPL"); |
| module_init(pd_init) |
| module_exit(pd_exit) |