1 /* GD ROM driver for the SEGA Dreamcast
2  * copyright Adrian McMenamin, 2007
3  * With thanks to Marcus Comstedt and Nathan Keynes
4  * for work in reversing PIO and DMA
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License along
17  * with this program; if not, write to the Free Software Foundation, Inc.,
18  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
19  *
20  */
21 
22 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
23 
24 #include <linux/init.h>
25 #include <linux/module.h>
26 #include <linux/fs.h>
27 #include <linux/kernel.h>
28 #include <linux/list.h>
29 #include <linux/slab.h>
30 #include <linux/dma-mapping.h>
31 #include <linux/cdrom.h>
32 #include <linux/genhd.h>
33 #include <linux/bio.h>
34 #include <linux/blkdev.h>
35 #include <linux/interrupt.h>
36 #include <linux/device.h>
37 #include <linux/mutex.h>
38 #include <linux/wait.h>
39 #include <linux/workqueue.h>
40 #include <linux/platform_device.h>
41 #include <scsi/scsi.h>
42 #include <asm/io.h>
43 #include <asm/dma.h>
44 #include <asm/delay.h>
45 #include <mach/dma.h>
46 #include <mach/sysasic.h>
47 
48 #define GDROM_DEV_NAME "gdrom"
49 #define GD_SESSION_OFFSET 150
50 
51 /* GD Rom commands */
52 #define GDROM_COM_SOFTRESET 0x08
53 #define GDROM_COM_EXECDIAG 0x90
54 #define GDROM_COM_PACKET 0xA0
55 #define GDROM_COM_IDDEV 0xA1
56 
57 /* GD Rom registers */
58 #define GDROM_BASE_REG			0xA05F7000
59 #define GDROM_ALTSTATUS_REG		(GDROM_BASE_REG + 0x18)
60 #define GDROM_DATA_REG			(GDROM_BASE_REG + 0x80)
61 #define GDROM_ERROR_REG		(GDROM_BASE_REG + 0x84)
62 #define GDROM_INTSEC_REG		(GDROM_BASE_REG + 0x88)
63 #define GDROM_SECNUM_REG		(GDROM_BASE_REG + 0x8C)
64 #define GDROM_BCL_REG			(GDROM_BASE_REG + 0x90)
65 #define GDROM_BCH_REG			(GDROM_BASE_REG + 0x94)
66 #define GDROM_DSEL_REG			(GDROM_BASE_REG + 0x98)
67 #define GDROM_STATUSCOMMAND_REG	(GDROM_BASE_REG + 0x9C)
68 #define GDROM_RESET_REG		(GDROM_BASE_REG + 0x4E4)
69 
70 #define GDROM_DMA_STARTADDR_REG	(GDROM_BASE_REG + 0x404)
71 #define GDROM_DMA_LENGTH_REG		(GDROM_BASE_REG + 0x408)
72 #define GDROM_DMA_DIRECTION_REG	(GDROM_BASE_REG + 0x40C)
73 #define GDROM_DMA_ENABLE_REG		(GDROM_BASE_REG + 0x414)
74 #define GDROM_DMA_STATUS_REG		(GDROM_BASE_REG + 0x418)
75 #define GDROM_DMA_WAIT_REG		(GDROM_BASE_REG + 0x4A0)
76 #define GDROM_DMA_ACCESS_CTRL_REG	(GDROM_BASE_REG + 0x4B8)
77 
78 #define GDROM_HARD_SECTOR	2048
79 #define BLOCK_LAYER_SECTOR	512
80 #define GD_TO_BLK		4
81 
82 #define GDROM_DEFAULT_TIMEOUT	(HZ * 7)
83 
84 static DEFINE_MUTEX(gdrom_mutex);
85 static const struct {
86 	int sense_key;
87 	const char * const text;
88 } sense_texts[] = {
89 	{NO_SENSE, "OK"},
90 	{RECOVERED_ERROR, "Recovered from error"},
91 	{NOT_READY, "Device not ready"},
92 	{MEDIUM_ERROR, "Disk not ready"},
93 	{HARDWARE_ERROR, "Hardware error"},
94 	{ILLEGAL_REQUEST, "Command has failed"},
95 	{UNIT_ATTENTION, "Device needs attention - disk may have been changed"},
96 	{DATA_PROTECT, "Data protection error"},
97 	{ABORTED_COMMAND, "Command aborted"},
98 };
99 
100 static struct platform_device *pd;
101 static int gdrom_major;
102 static DECLARE_WAIT_QUEUE_HEAD(command_queue);
103 static DECLARE_WAIT_QUEUE_HEAD(request_queue);
104 
105 static DEFINE_SPINLOCK(gdrom_lock);
106 static void gdrom_readdisk_dma(struct work_struct *work);
107 static DECLARE_WORK(work, gdrom_readdisk_dma);
108 static LIST_HEAD(gdrom_deferred);
109 
110 struct gdromtoc {
111 	unsigned int entry[99];
112 	unsigned int first, last;
113 	unsigned int leadout;
114 };
115 
116 static struct gdrom_unit {
117 	struct gendisk *disk;
118 	struct cdrom_device_info *cd_info;
119 	int status;
120 	int pending;
121 	int transfer;
122 	char disk_type;
123 	struct gdromtoc *toc;
124 	struct request_queue *gdrom_rq;
125 } gd;
126 
127 struct gdrom_id {
128 	char mid;
129 	char modid;
130 	char verid;
131 	char padA[13];
132 	char mname[16];
133 	char modname[16];
134 	char firmver[16];
135 	char padB[16];
136 };
137 
138 static int gdrom_getsense(short *bufstring);
139 static int gdrom_packetcommand(struct cdrom_device_info *cd_info,
140 	struct packet_command *command);
141 static int gdrom_hardreset(struct cdrom_device_info *cd_info);
142 
gdrom_is_busy(void)143 static bool gdrom_is_busy(void)
144 {
145 	return (__raw_readb(GDROM_ALTSTATUS_REG) & 0x80) != 0;
146 }
147 
gdrom_data_request(void)148 static bool gdrom_data_request(void)
149 {
150 	return (__raw_readb(GDROM_ALTSTATUS_REG) & 0x88) == 8;
151 }
152 
gdrom_wait_clrbusy(void)153 static bool gdrom_wait_clrbusy(void)
154 {
155 	unsigned long timeout = jiffies + GDROM_DEFAULT_TIMEOUT;
156 	while ((__raw_readb(GDROM_ALTSTATUS_REG) & 0x80) &&
157 		(time_before(jiffies, timeout)))
158 		cpu_relax();
159 	return time_before(jiffies, timeout + 1);
160 }
161 
gdrom_wait_busy_sleeps(void)162 static bool gdrom_wait_busy_sleeps(void)
163 {
164 	unsigned long timeout;
165 	/* Wait to get busy first */
166 	timeout = jiffies + GDROM_DEFAULT_TIMEOUT;
167 	while (!gdrom_is_busy() && time_before(jiffies, timeout))
168 		cpu_relax();
169 	/* Now wait for busy to clear */
170 	return gdrom_wait_clrbusy();
171 }
172 
gdrom_identifydevice(void * buf)173 static void gdrom_identifydevice(void *buf)
174 {
175 	int c;
176 	short *data = buf;
177 	/* If the device won't clear it has probably
178 	* been hit by a serious failure - but we'll
179 	* try to return a sense key even so */
180 	if (!gdrom_wait_clrbusy()) {
181 		gdrom_getsense(NULL);
182 		return;
183 	}
184 	__raw_writeb(GDROM_COM_IDDEV, GDROM_STATUSCOMMAND_REG);
185 	if (!gdrom_wait_busy_sleeps()) {
186 		gdrom_getsense(NULL);
187 		return;
188 	}
189 	/* now read in the data */
190 	for (c = 0; c < 40; c++)
191 		data[c] = __raw_readw(GDROM_DATA_REG);
192 }
193 
gdrom_spicommand(void * spi_string,int buflen)194 static void gdrom_spicommand(void *spi_string, int buflen)
195 {
196 	short *cmd = spi_string;
197 	unsigned long timeout;
198 
199 	/* ensure IRQ_WAIT is set */
200 	__raw_writeb(0x08, GDROM_ALTSTATUS_REG);
201 	/* specify how many bytes we expect back */
202 	__raw_writeb(buflen & 0xFF, GDROM_BCL_REG);
203 	__raw_writeb((buflen >> 8) & 0xFF, GDROM_BCH_REG);
204 	/* other parameters */
205 	__raw_writeb(0, GDROM_INTSEC_REG);
206 	__raw_writeb(0, GDROM_SECNUM_REG);
207 	__raw_writeb(0, GDROM_ERROR_REG);
208 	/* Wait until we can go */
209 	if (!gdrom_wait_clrbusy()) {
210 		gdrom_getsense(NULL);
211 		return;
212 	}
213 	timeout = jiffies + GDROM_DEFAULT_TIMEOUT;
214 	__raw_writeb(GDROM_COM_PACKET, GDROM_STATUSCOMMAND_REG);
215 	while (!gdrom_data_request() && time_before(jiffies, timeout))
216 		cpu_relax();
217 	if (!time_before(jiffies, timeout + 1)) {
218 		gdrom_getsense(NULL);
219 		return;
220 	}
221 	outsw(GDROM_DATA_REG, cmd, 6);
222 }
223 
224 
225 /* gdrom_command_executediagnostic:
226  * Used to probe for presence of working GDROM
227  * Restarts GDROM device and then applies standard ATA 3
228  * Execute Diagnostic Command: a return of '1' indicates device 0
229  * present and device 1 absent
230  */
gdrom_execute_diagnostic(void)231 static char gdrom_execute_diagnostic(void)
232 {
233 	gdrom_hardreset(gd.cd_info);
234 	if (!gdrom_wait_clrbusy())
235 		return 0;
236 	__raw_writeb(GDROM_COM_EXECDIAG, GDROM_STATUSCOMMAND_REG);
237 	if (!gdrom_wait_busy_sleeps())
238 		return 0;
239 	return __raw_readb(GDROM_ERROR_REG);
240 }
241 
242 /*
243  * Prepare disk command
244  * byte 0 = 0x70
245  * byte 1 = 0x1f
246  */
gdrom_preparedisk_cmd(void)247 static int gdrom_preparedisk_cmd(void)
248 {
249 	struct packet_command *spin_command;
250 	spin_command = kzalloc(sizeof(struct packet_command), GFP_KERNEL);
251 	if (!spin_command)
252 		return -ENOMEM;
253 	spin_command->cmd[0] = 0x70;
254 	spin_command->cmd[2] = 0x1f;
255 	spin_command->buflen = 0;
256 	gd.pending = 1;
257 	gdrom_packetcommand(gd.cd_info, spin_command);
258 	/* 60 second timeout */
259 	wait_event_interruptible_timeout(command_queue, gd.pending == 0,
260 		GDROM_DEFAULT_TIMEOUT);
261 	gd.pending = 0;
262 	kfree(spin_command);
263 	if (gd.status & 0x01) {
264 		/* log an error */
265 		gdrom_getsense(NULL);
266 		return -EIO;
267 	}
268 	return 0;
269 }
270 
271 /*
272  * Read TOC command
273  * byte 0 = 0x14
274  * byte 1 = session
275  * byte 3 = sizeof TOC >> 8  ie upper byte
276  * byte 4 = sizeof TOC & 0xff ie lower byte
277  */
gdrom_readtoc_cmd(struct gdromtoc * toc,int session)278 static int gdrom_readtoc_cmd(struct gdromtoc *toc, int session)
279 {
280 	int tocsize;
281 	struct packet_command *toc_command;
282 	int err = 0;
283 
284 	toc_command = kzalloc(sizeof(struct packet_command), GFP_KERNEL);
285 	if (!toc_command)
286 		return -ENOMEM;
287 	tocsize = sizeof(struct gdromtoc);
288 	toc_command->cmd[0] = 0x14;
289 	toc_command->cmd[1] = session;
290 	toc_command->cmd[3] = tocsize >> 8;
291 	toc_command->cmd[4] = tocsize & 0xff;
292 	toc_command->buflen = tocsize;
293 	if (gd.pending) {
294 		err = -EBUSY;
295 		goto cleanup_readtoc_final;
296 	}
297 	gd.pending = 1;
298 	gdrom_packetcommand(gd.cd_info, toc_command);
299 	wait_event_interruptible_timeout(command_queue, gd.pending == 0,
300 		GDROM_DEFAULT_TIMEOUT);
301 	if (gd.pending) {
302 		err = -EINVAL;
303 		goto cleanup_readtoc;
304 	}
305 	insw(GDROM_DATA_REG, toc, tocsize/2);
306 	if (gd.status & 0x01)
307 		err = -EINVAL;
308 
309 cleanup_readtoc:
310 	gd.pending = 0;
311 cleanup_readtoc_final:
312 	kfree(toc_command);
313 	return err;
314 }
315 
316 /* TOC helpers */
get_entry_lba(int track)317 static int get_entry_lba(int track)
318 {
319 	return (cpu_to_be32(track & 0xffffff00) - GD_SESSION_OFFSET);
320 }
321 
get_entry_q_ctrl(int track)322 static int get_entry_q_ctrl(int track)
323 {
324 	return (track & 0x000000f0) >> 4;
325 }
326 
get_entry_track(int track)327 static int get_entry_track(int track)
328 {
329 	return (track & 0x0000ff00) >> 8;
330 }
331 
gdrom_get_last_session(struct cdrom_device_info * cd_info,struct cdrom_multisession * ms_info)332 static int gdrom_get_last_session(struct cdrom_device_info *cd_info,
333 	struct cdrom_multisession *ms_info)
334 {
335 	int fentry, lentry, track, data, tocuse, err;
336 	if (!gd.toc)
337 		return -ENOMEM;
338 	tocuse = 1;
339 	/* Check if GD-ROM */
340 	err = gdrom_readtoc_cmd(gd.toc, 1);
341 	/* Not a GD-ROM so check if standard CD-ROM */
342 	if (err) {
343 		tocuse = 0;
344 		err = gdrom_readtoc_cmd(gd.toc, 0);
345 		if (err) {
346 			pr_info("Could not get CD table of contents\n");
347 			return -ENXIO;
348 		}
349 	}
350 
351 	fentry = get_entry_track(gd.toc->first);
352 	lentry = get_entry_track(gd.toc->last);
353 	/* Find the first data track */
354 	track = get_entry_track(gd.toc->last);
355 	do {
356 		data = gd.toc->entry[track - 1];
357 		if (get_entry_q_ctrl(data))
358 			break;	/* ie a real data track */
359 		track--;
360 	} while (track >= fentry);
361 
362 	if ((track > 100) || (track < get_entry_track(gd.toc->first))) {
363 		pr_info("No data on the last session of the CD\n");
364 		gdrom_getsense(NULL);
365 		return -ENXIO;
366 	}
367 
368 	ms_info->addr_format = CDROM_LBA;
369 	ms_info->addr.lba = get_entry_lba(data);
370 	ms_info->xa_flag = 1;
371 	return 0;
372 }
373 
gdrom_open(struct cdrom_device_info * cd_info,int purpose)374 static int gdrom_open(struct cdrom_device_info *cd_info, int purpose)
375 {
376 	/* spin up the disk */
377 	return gdrom_preparedisk_cmd();
378 }
379 
380 /* this function is required even if empty */
gdrom_release(struct cdrom_device_info * cd_info)381 static void gdrom_release(struct cdrom_device_info *cd_info)
382 {
383 }
384 
gdrom_drivestatus(struct cdrom_device_info * cd_info,int ignore)385 static int gdrom_drivestatus(struct cdrom_device_info *cd_info, int ignore)
386 {
387 	/* read the sense key */
388 	char sense = __raw_readb(GDROM_ERROR_REG);
389 	sense &= 0xF0;
390 	if (sense == 0)
391 		return CDS_DISC_OK;
392 	if (sense == 0x20)
393 		return CDS_DRIVE_NOT_READY;
394 	/* default */
395 	return CDS_NO_INFO;
396 }
397 
gdrom_check_events(struct cdrom_device_info * cd_info,unsigned int clearing,int ignore)398 static unsigned int gdrom_check_events(struct cdrom_device_info *cd_info,
399 				       unsigned int clearing, int ignore)
400 {
401 	/* check the sense key */
402 	return (__raw_readb(GDROM_ERROR_REG) & 0xF0) == 0x60 ?
403 		DISK_EVENT_MEDIA_CHANGE : 0;
404 }
405 
406 /* reset the G1 bus */
gdrom_hardreset(struct cdrom_device_info * cd_info)407 static int gdrom_hardreset(struct cdrom_device_info *cd_info)
408 {
409 	int count;
410 	__raw_writel(0x1fffff, GDROM_RESET_REG);
411 	for (count = 0xa0000000; count < 0xa0200000; count += 4)
412 		__raw_readl(count);
413 	return 0;
414 }
415 
416 /* keep the function looking like the universal
417  * CD Rom specification  - returning int */
gdrom_packetcommand(struct cdrom_device_info * cd_info,struct packet_command * command)418 static int gdrom_packetcommand(struct cdrom_device_info *cd_info,
419 	struct packet_command *command)
420 {
421 	gdrom_spicommand(&command->cmd, command->buflen);
422 	return 0;
423 }
424 
425 /* Get Sense SPI command
426  * From Marcus Comstedt
427  * cmd = 0x13
428  * cmd + 4 = length of returned buffer
429  * Returns 5 16 bit words
430  */
gdrom_getsense(short * bufstring)431 static int gdrom_getsense(short *bufstring)
432 {
433 	struct packet_command *sense_command;
434 	short sense[5];
435 	int sense_key;
436 	int err = -EIO;
437 
438 	sense_command = kzalloc(sizeof(struct packet_command), GFP_KERNEL);
439 	if (!sense_command)
440 		return -ENOMEM;
441 	sense_command->cmd[0] = 0x13;
442 	sense_command->cmd[4] = 10;
443 	sense_command->buflen = 10;
444 	/* even if something is pending try to get
445 	* the sense key if possible */
446 	if (gd.pending && !gdrom_wait_clrbusy()) {
447 		err = -EBUSY;
448 		goto cleanup_sense_final;
449 	}
450 	gd.pending = 1;
451 	gdrom_packetcommand(gd.cd_info, sense_command);
452 	wait_event_interruptible_timeout(command_queue, gd.pending == 0,
453 		GDROM_DEFAULT_TIMEOUT);
454 	if (gd.pending)
455 		goto cleanup_sense;
456 	insw(GDROM_DATA_REG, &sense, sense_command->buflen/2);
457 	if (sense[1] & 40) {
458 		pr_info("Drive not ready - command aborted\n");
459 		goto cleanup_sense;
460 	}
461 	sense_key = sense[1] & 0x0F;
462 	if (sense_key < ARRAY_SIZE(sense_texts))
463 		pr_info("%s\n", sense_texts[sense_key].text);
464 	else
465 		pr_err("Unknown sense key: %d\n", sense_key);
466 	if (bufstring) /* return addional sense data */
467 		memcpy(bufstring, &sense[4], 2);
468 	if (sense_key < 2)
469 		err = 0;
470 
471 cleanup_sense:
472 	gd.pending = 0;
473 cleanup_sense_final:
474 	kfree(sense_command);
475 	return err;
476 }
477 
gdrom_audio_ioctl(struct cdrom_device_info * cdi,unsigned int cmd,void * arg)478 static int gdrom_audio_ioctl(struct cdrom_device_info *cdi, unsigned int cmd,
479 			     void *arg)
480 {
481 	return -EINVAL;
482 }
483 
484 static const struct cdrom_device_ops gdrom_ops = {
485 	.open			= gdrom_open,
486 	.release		= gdrom_release,
487 	.drive_status		= gdrom_drivestatus,
488 	.check_events		= gdrom_check_events,
489 	.get_last_session	= gdrom_get_last_session,
490 	.reset			= gdrom_hardreset,
491 	.audio_ioctl		= gdrom_audio_ioctl,
492 	.generic_packet		= cdrom_dummy_generic_packet,
493 	.capability		= CDC_MULTI_SESSION | CDC_MEDIA_CHANGED |
494 				  CDC_RESET | CDC_DRIVE_STATUS | CDC_CD_R,
495 };
496 
gdrom_bdops_open(struct block_device * bdev,fmode_t mode)497 static int gdrom_bdops_open(struct block_device *bdev, fmode_t mode)
498 {
499 	int ret;
500 
501 	check_disk_change(bdev);
502 
503 	mutex_lock(&gdrom_mutex);
504 	ret = cdrom_open(gd.cd_info, bdev, mode);
505 	mutex_unlock(&gdrom_mutex);
506 	return ret;
507 }
508 
gdrom_bdops_release(struct gendisk * disk,fmode_t mode)509 static void gdrom_bdops_release(struct gendisk *disk, fmode_t mode)
510 {
511 	mutex_lock(&gdrom_mutex);
512 	cdrom_release(gd.cd_info, mode);
513 	mutex_unlock(&gdrom_mutex);
514 }
515 
gdrom_bdops_check_events(struct gendisk * disk,unsigned int clearing)516 static unsigned int gdrom_bdops_check_events(struct gendisk *disk,
517 					     unsigned int clearing)
518 {
519 	return cdrom_check_events(gd.cd_info, clearing);
520 }
521 
gdrom_bdops_ioctl(struct block_device * bdev,fmode_t mode,unsigned cmd,unsigned long arg)522 static int gdrom_bdops_ioctl(struct block_device *bdev, fmode_t mode,
523 	unsigned cmd, unsigned long arg)
524 {
525 	int ret;
526 
527 	mutex_lock(&gdrom_mutex);
528 	ret = cdrom_ioctl(gd.cd_info, bdev, mode, cmd, arg);
529 	mutex_unlock(&gdrom_mutex);
530 
531 	return ret;
532 }
533 
534 static const struct block_device_operations gdrom_bdops = {
535 	.owner			= THIS_MODULE,
536 	.open			= gdrom_bdops_open,
537 	.release		= gdrom_bdops_release,
538 	.check_events		= gdrom_bdops_check_events,
539 	.ioctl			= gdrom_bdops_ioctl,
540 };
541 
gdrom_command_interrupt(int irq,void * dev_id)542 static irqreturn_t gdrom_command_interrupt(int irq, void *dev_id)
543 {
544 	gd.status = __raw_readb(GDROM_STATUSCOMMAND_REG);
545 	if (gd.pending != 1)
546 		return IRQ_HANDLED;
547 	gd.pending = 0;
548 	wake_up_interruptible(&command_queue);
549 	return IRQ_HANDLED;
550 }
551 
gdrom_dma_interrupt(int irq,void * dev_id)552 static irqreturn_t gdrom_dma_interrupt(int irq, void *dev_id)
553 {
554 	gd.status = __raw_readb(GDROM_STATUSCOMMAND_REG);
555 	if (gd.transfer != 1)
556 		return IRQ_HANDLED;
557 	gd.transfer = 0;
558 	wake_up_interruptible(&request_queue);
559 	return IRQ_HANDLED;
560 }
561 
gdrom_set_interrupt_handlers(void)562 static int gdrom_set_interrupt_handlers(void)
563 {
564 	int err;
565 
566 	err = request_irq(HW_EVENT_GDROM_CMD, gdrom_command_interrupt,
567 		0, "gdrom_command", &gd);
568 	if (err)
569 		return err;
570 	err = request_irq(HW_EVENT_GDROM_DMA, gdrom_dma_interrupt,
571 		0, "gdrom_dma", &gd);
572 	if (err)
573 		free_irq(HW_EVENT_GDROM_CMD, &gd);
574 	return err;
575 }
576 
577 /* Implement DMA read using SPI command
578  * 0 -> 0x30
579  * 1 -> mode
580  * 2 -> block >> 16
581  * 3 -> block >> 8
582  * 4 -> block
583  * 8 -> sectors >> 16
584  * 9 -> sectors >> 8
585  * 10 -> sectors
586  */
gdrom_readdisk_dma(struct work_struct * work)587 static void gdrom_readdisk_dma(struct work_struct *work)
588 {
589 	int block, block_cnt;
590 	blk_status_t err;
591 	struct packet_command *read_command;
592 	struct list_head *elem, *next;
593 	struct request *req;
594 	unsigned long timeout;
595 
596 	if (list_empty(&gdrom_deferred))
597 		return;
598 	read_command = kzalloc(sizeof(struct packet_command), GFP_KERNEL);
599 	if (!read_command)
600 		return; /* get more memory later? */
601 	read_command->cmd[0] = 0x30;
602 	read_command->cmd[1] = 0x20;
603 	spin_lock(&gdrom_lock);
604 	list_for_each_safe(elem, next, &gdrom_deferred) {
605 		req = list_entry(elem, struct request, queuelist);
606 		spin_unlock(&gdrom_lock);
607 		block = blk_rq_pos(req)/GD_TO_BLK + GD_SESSION_OFFSET;
608 		block_cnt = blk_rq_sectors(req)/GD_TO_BLK;
609 		__raw_writel(virt_to_phys(bio_data(req->bio)), GDROM_DMA_STARTADDR_REG);
610 		__raw_writel(block_cnt * GDROM_HARD_SECTOR, GDROM_DMA_LENGTH_REG);
611 		__raw_writel(1, GDROM_DMA_DIRECTION_REG);
612 		__raw_writel(1, GDROM_DMA_ENABLE_REG);
613 		read_command->cmd[2] = (block >> 16) & 0xFF;
614 		read_command->cmd[3] = (block >> 8) & 0xFF;
615 		read_command->cmd[4] = block & 0xFF;
616 		read_command->cmd[8] = (block_cnt >> 16) & 0xFF;
617 		read_command->cmd[9] = (block_cnt >> 8) & 0xFF;
618 		read_command->cmd[10] = block_cnt & 0xFF;
619 		/* set for DMA */
620 		__raw_writeb(1, GDROM_ERROR_REG);
621 		/* other registers */
622 		__raw_writeb(0, GDROM_SECNUM_REG);
623 		__raw_writeb(0, GDROM_BCL_REG);
624 		__raw_writeb(0, GDROM_BCH_REG);
625 		__raw_writeb(0, GDROM_DSEL_REG);
626 		__raw_writeb(0, GDROM_INTSEC_REG);
627 		/* Wait for registers to reset after any previous activity */
628 		timeout = jiffies + HZ / 2;
629 		while (gdrom_is_busy() && time_before(jiffies, timeout))
630 			cpu_relax();
631 		__raw_writeb(GDROM_COM_PACKET, GDROM_STATUSCOMMAND_REG);
632 		timeout = jiffies + HZ / 2;
633 		/* Wait for packet command to finish */
634 		while (gdrom_is_busy() && time_before(jiffies, timeout))
635 			cpu_relax();
636 		gd.pending = 1;
637 		gd.transfer = 1;
638 		outsw(GDROM_DATA_REG, &read_command->cmd, 6);
639 		timeout = jiffies + HZ / 2;
640 		/* Wait for any pending DMA to finish */
641 		while (__raw_readb(GDROM_DMA_STATUS_REG) &&
642 			time_before(jiffies, timeout))
643 			cpu_relax();
644 		/* start transfer */
645 		__raw_writeb(1, GDROM_DMA_STATUS_REG);
646 		wait_event_interruptible_timeout(request_queue,
647 			gd.transfer == 0, GDROM_DEFAULT_TIMEOUT);
648 		err = gd.transfer ? BLK_STS_IOERR : BLK_STS_OK;
649 		gd.transfer = 0;
650 		gd.pending = 0;
651 		/* now seek to take the request spinlock
652 		* before handling ending the request */
653 		spin_lock(&gdrom_lock);
654 		list_del_init(&req->queuelist);
655 		__blk_end_request_all(req, err);
656 	}
657 	spin_unlock(&gdrom_lock);
658 	kfree(read_command);
659 }
660 
gdrom_request(struct request_queue * rq)661 static void gdrom_request(struct request_queue *rq)
662 {
663 	struct request *req;
664 
665 	while ((req = blk_fetch_request(rq)) != NULL) {
666 		switch (req_op(req)) {
667 		case REQ_OP_READ:
668 			/*
669 			 * Add to list of deferred work and then schedule
670 			 * workqueue.
671 			 */
672 			list_add_tail(&req->queuelist, &gdrom_deferred);
673 			schedule_work(&work);
674 			break;
675 		case REQ_OP_WRITE:
676 			pr_notice("Read only device - write request ignored\n");
677 			__blk_end_request_all(req, BLK_STS_IOERR);
678 			break;
679 		default:
680 			printk(KERN_DEBUG "gdrom: Non-fs request ignored\n");
681 			__blk_end_request_all(req, BLK_STS_IOERR);
682 			break;
683 		}
684 	}
685 }
686 
687 /* Print string identifying GD ROM device */
gdrom_outputversion(void)688 static int gdrom_outputversion(void)
689 {
690 	struct gdrom_id *id;
691 	char *model_name, *manuf_name, *firmw_ver;
692 	int err = -ENOMEM;
693 
694 	/* query device ID */
695 	id = kzalloc(sizeof(struct gdrom_id), GFP_KERNEL);
696 	if (!id)
697 		return err;
698 	gdrom_identifydevice(id);
699 	model_name = kstrndup(id->modname, 16, GFP_KERNEL);
700 	if (!model_name)
701 		goto free_id;
702 	manuf_name = kstrndup(id->mname, 16, GFP_KERNEL);
703 	if (!manuf_name)
704 		goto free_model_name;
705 	firmw_ver = kstrndup(id->firmver, 16, GFP_KERNEL);
706 	if (!firmw_ver)
707 		goto free_manuf_name;
708 	pr_info("%s from %s with firmware %s\n",
709 		model_name, manuf_name, firmw_ver);
710 	err = 0;
711 	kfree(firmw_ver);
712 free_manuf_name:
713 	kfree(manuf_name);
714 free_model_name:
715 	kfree(model_name);
716 free_id:
717 	kfree(id);
718 	return err;
719 }
720 
721 /* set the default mode for DMA transfer */
gdrom_init_dma_mode(void)722 static int gdrom_init_dma_mode(void)
723 {
724 	__raw_writeb(0x13, GDROM_ERROR_REG);
725 	__raw_writeb(0x22, GDROM_INTSEC_REG);
726 	if (!gdrom_wait_clrbusy())
727 		return -EBUSY;
728 	__raw_writeb(0xEF, GDROM_STATUSCOMMAND_REG);
729 	if (!gdrom_wait_busy_sleeps())
730 		return -EBUSY;
731 	/* Memory protection setting for GDROM DMA
732 	* Bits 31 - 16 security: 0x8843
733 	* Bits 15 and 7 reserved (0)
734 	* Bits 14 - 8 start of transfer range in 1 MB blocks OR'ed with 0x80
735 	* Bits 6 - 0 end of transfer range in 1 MB blocks OR'ed with 0x80
736 	* (0x40 | 0x80) = start range at 0x0C000000
737 	* (0x7F | 0x80) = end range at 0x0FFFFFFF */
738 	__raw_writel(0x8843407F, GDROM_DMA_ACCESS_CTRL_REG);
739 	__raw_writel(9, GDROM_DMA_WAIT_REG); /* DMA word setting */
740 	return 0;
741 }
742 
probe_gdrom_setupcd(void)743 static void probe_gdrom_setupcd(void)
744 {
745 	gd.cd_info->ops = &gdrom_ops;
746 	gd.cd_info->capacity = 1;
747 	strcpy(gd.cd_info->name, GDROM_DEV_NAME);
748 	gd.cd_info->mask = CDC_CLOSE_TRAY|CDC_OPEN_TRAY|CDC_LOCK|
749 		CDC_SELECT_DISC;
750 }
751 
probe_gdrom_setupdisk(void)752 static void probe_gdrom_setupdisk(void)
753 {
754 	gd.disk->major = gdrom_major;
755 	gd.disk->first_minor = 1;
756 	gd.disk->minors = 1;
757 	strcpy(gd.disk->disk_name, GDROM_DEV_NAME);
758 }
759 
probe_gdrom_setupqueue(void)760 static int probe_gdrom_setupqueue(void)
761 {
762 	blk_queue_logical_block_size(gd.gdrom_rq, GDROM_HARD_SECTOR);
763 	/* using DMA so memory will need to be contiguous */
764 	blk_queue_max_segments(gd.gdrom_rq, 1);
765 	/* set a large max size to get most from DMA */
766 	blk_queue_max_segment_size(gd.gdrom_rq, 0x40000);
767 	gd.disk->queue = gd.gdrom_rq;
768 	return gdrom_init_dma_mode();
769 }
770 
771 /*
772  * register this as a block device and as compliant with the
773  * universal CD Rom driver interface
774  */
probe_gdrom(struct platform_device * devptr)775 static int probe_gdrom(struct platform_device *devptr)
776 {
777 	int err;
778 
779 	/*
780 	 * Ensure our "one" device is initialized properly in case of previous
781 	 * usages of it
782 	 */
783 	memset(&gd, 0, sizeof(gd));
784 
785 	/* Start the device */
786 	if (gdrom_execute_diagnostic() != 1) {
787 		pr_warning("ATA Probe for GDROM failed\n");
788 		return -ENODEV;
789 	}
790 	/* Print out firmware ID */
791 	if (gdrom_outputversion())
792 		return -ENOMEM;
793 	/* Register GDROM */
794 	gdrom_major = register_blkdev(0, GDROM_DEV_NAME);
795 	if (gdrom_major <= 0)
796 		return gdrom_major;
797 	pr_info("Registered with major number %d\n",
798 		gdrom_major);
799 	/* Specify basic properties of drive */
800 	gd.cd_info = kzalloc(sizeof(struct cdrom_device_info), GFP_KERNEL);
801 	if (!gd.cd_info) {
802 		err = -ENOMEM;
803 		goto probe_fail_no_mem;
804 	}
805 	probe_gdrom_setupcd();
806 	gd.disk = alloc_disk(1);
807 	if (!gd.disk) {
808 		err = -ENODEV;
809 		goto probe_fail_no_disk;
810 	}
811 	probe_gdrom_setupdisk();
812 	if (register_cdrom(gd.cd_info)) {
813 		err = -ENODEV;
814 		goto probe_fail_cdrom_register;
815 	}
816 	gd.disk->fops = &gdrom_bdops;
817 	/* latch on to the interrupt */
818 	err = gdrom_set_interrupt_handlers();
819 	if (err)
820 		goto probe_fail_cmdirq_register;
821 	gd.gdrom_rq = blk_init_queue(gdrom_request, &gdrom_lock);
822 	if (!gd.gdrom_rq) {
823 		err = -ENOMEM;
824 		goto probe_fail_requestq;
825 	}
826 	blk_queue_bounce_limit(gd.gdrom_rq, BLK_BOUNCE_HIGH);
827 
828 	err = probe_gdrom_setupqueue();
829 	if (err)
830 		goto probe_fail_toc;
831 
832 	gd.toc = kzalloc(sizeof(struct gdromtoc), GFP_KERNEL);
833 	if (!gd.toc) {
834 		err = -ENOMEM;
835 		goto probe_fail_toc;
836 	}
837 	add_disk(gd.disk);
838 	return 0;
839 
840 probe_fail_toc:
841 	blk_cleanup_queue(gd.gdrom_rq);
842 probe_fail_requestq:
843 	free_irq(HW_EVENT_GDROM_DMA, &gd);
844 	free_irq(HW_EVENT_GDROM_CMD, &gd);
845 probe_fail_cmdirq_register:
846 probe_fail_cdrom_register:
847 	del_gendisk(gd.disk);
848 probe_fail_no_disk:
849 	kfree(gd.cd_info);
850 probe_fail_no_mem:
851 	unregister_blkdev(gdrom_major, GDROM_DEV_NAME);
852 	gdrom_major = 0;
853 	pr_warning("Probe failed - error is 0x%X\n", err);
854 	return err;
855 }
856 
remove_gdrom(struct platform_device * devptr)857 static int remove_gdrom(struct platform_device *devptr)
858 {
859 	flush_work(&work);
860 	blk_cleanup_queue(gd.gdrom_rq);
861 	free_irq(HW_EVENT_GDROM_CMD, &gd);
862 	free_irq(HW_EVENT_GDROM_DMA, &gd);
863 	del_gendisk(gd.disk);
864 	if (gdrom_major)
865 		unregister_blkdev(gdrom_major, GDROM_DEV_NAME);
866 	unregister_cdrom(gd.cd_info);
867 	kfree(gd.cd_info);
868 	kfree(gd.toc);
869 
870 	return 0;
871 }
872 
873 static struct platform_driver gdrom_driver = {
874 	.probe = probe_gdrom,
875 	.remove = remove_gdrom,
876 	.driver = {
877 			.name = GDROM_DEV_NAME,
878 	},
879 };
880 
init_gdrom(void)881 static int __init init_gdrom(void)
882 {
883 	int rc;
884 
885 	rc = platform_driver_register(&gdrom_driver);
886 	if (rc)
887 		return rc;
888 	pd = platform_device_register_simple(GDROM_DEV_NAME, -1, NULL, 0);
889 	if (IS_ERR(pd)) {
890 		platform_driver_unregister(&gdrom_driver);
891 		return PTR_ERR(pd);
892 	}
893 	return 0;
894 }
895 
exit_gdrom(void)896 static void __exit exit_gdrom(void)
897 {
898 	platform_device_unregister(pd);
899 	platform_driver_unregister(&gdrom_driver);
900 }
901 
902 module_init(init_gdrom);
903 module_exit(exit_gdrom);
904 MODULE_AUTHOR("Adrian McMenamin <adrian@mcmen.demon.co.uk>");
905 MODULE_DESCRIPTION("SEGA Dreamcast GD-ROM Driver");
906 MODULE_LICENSE("GPL");
907