Linux Audio

Check our new training course

Loading...
v6.8
  1// SPDX-License-Identifier: GPL-2.0
  2#include <linux/kernel.h>
  3#include <linux/mm.h>
  4#include <linux/fs.h>
  5#include <linux/errno.h>
  6#include <linux/string.h>
  7#include <linux/blkdev.h>
  8#include <linux/module.h>
  9#include <linux/blkpg.h>
 10#include <linux/cdrom.h>
 11#include <linux/delay.h>
 12#include <linux/slab.h>
 13#include <asm/io.h>
 14#include <linux/uaccess.h>
 15
 16#include <scsi/scsi.h>
 17#include <scsi/scsi_dbg.h>
 18#include <scsi/scsi_device.h>
 19#include <scsi/scsi_eh.h>
 20#include <scsi/scsi_host.h>
 21#include <scsi/scsi_ioctl.h>
 22#include <scsi/scsi_cmnd.h>
 23
 24#include "sr.h"
 25
 26#if 0
 27#define DEBUG
 28#endif
 29
 30/* The sr_is_xa() seems to trigger firmware bugs with some drives :-(
 31 * It is off by default and can be turned on with this module parameter */
 32static int xa_test = 0;
 33
 34module_param(xa_test, int, S_IRUGO | S_IWUSR);
 35
 
 
 
 
 36static int sr_read_tochdr(struct cdrom_device_info *cdi,
 37		struct cdrom_tochdr *tochdr)
 38{
 39	struct scsi_cd *cd = cdi->handle;
 40	struct packet_command cgc;
 41	int result;
 42	unsigned char *buffer;
 43
 44	buffer = kzalloc(32, GFP_KERNEL);
 45	if (!buffer)
 46		return -ENOMEM;
 47
 48	memset(&cgc, 0, sizeof(struct packet_command));
 49	cgc.timeout = IOCTL_TIMEOUT;
 50	cgc.cmd[0] = GPCMD_READ_TOC_PMA_ATIP;
 51	cgc.cmd[8] = 12;		/* LSB of length */
 52	cgc.buffer = buffer;
 53	cgc.buflen = 12;
 54	cgc.quiet = 1;
 55	cgc.data_direction = DMA_FROM_DEVICE;
 56
 57	result = sr_do_ioctl(cd, &cgc);
 58	if (result)
 59		goto err;
 60
 61	tochdr->cdth_trk0 = buffer[2];
 62	tochdr->cdth_trk1 = buffer[3];
 63
 64err:
 65	kfree(buffer);
 66	return result;
 67}
 68
 69static int sr_read_tocentry(struct cdrom_device_info *cdi,
 70		struct cdrom_tocentry *tocentry)
 71{
 72	struct scsi_cd *cd = cdi->handle;
 73	struct packet_command cgc;
 74	int result;
 75	unsigned char *buffer;
 76
 77	buffer = kzalloc(32, GFP_KERNEL);
 78	if (!buffer)
 79		return -ENOMEM;
 80
 81	memset(&cgc, 0, sizeof(struct packet_command));
 82	cgc.timeout = IOCTL_TIMEOUT;
 83	cgc.cmd[0] = GPCMD_READ_TOC_PMA_ATIP;
 84	cgc.cmd[1] |= (tocentry->cdte_format == CDROM_MSF) ? 0x02 : 0;
 85	cgc.cmd[6] = tocentry->cdte_track;
 86	cgc.cmd[8] = 12;		/* LSB of length */
 87	cgc.buffer = buffer;
 88	cgc.buflen = 12;
 89	cgc.data_direction = DMA_FROM_DEVICE;
 90
 91	result = sr_do_ioctl(cd, &cgc);
 92	if (result)
 93		goto err;
 94
 95	tocentry->cdte_ctrl = buffer[5] & 0xf;
 96	tocentry->cdte_adr = buffer[5] >> 4;
 97	tocentry->cdte_datamode = (tocentry->cdte_ctrl & 0x04) ? 1 : 0;
 98	if (tocentry->cdte_format == CDROM_MSF) {
 99		tocentry->cdte_addr.msf.minute = buffer[9];
100		tocentry->cdte_addr.msf.second = buffer[10];
101		tocentry->cdte_addr.msf.frame = buffer[11];
102	} else
103		tocentry->cdte_addr.lba = (((((buffer[8] << 8) + buffer[9]) << 8)
104			+ buffer[10]) << 8) + buffer[11];
105
106err:
107	kfree(buffer);
108	return result;
109}
110
111#define IOCTL_RETRIES 3
112
113/* ATAPI drives don't have a SCMD_PLAYAUDIO_TI command.  When these drives
114   are emulating a SCSI device via the idescsi module, they need to have
115   CDROMPLAYTRKIND commands translated into CDROMPLAYMSF commands for them */
116
117static int sr_fake_playtrkind(struct cdrom_device_info *cdi, struct cdrom_ti *ti)
118{
119	struct cdrom_tocentry trk0_te, trk1_te;
120	struct cdrom_tochdr tochdr;
121	struct packet_command cgc;
122	int ntracks, ret;
123
124	ret = sr_read_tochdr(cdi, &tochdr);
125	if (ret)
126		return ret;
127
128	ntracks = tochdr.cdth_trk1 - tochdr.cdth_trk0 + 1;
129	
130	if (ti->cdti_trk1 == ntracks) 
131		ti->cdti_trk1 = CDROM_LEADOUT;
132	else if (ti->cdti_trk1 != CDROM_LEADOUT)
133		ti->cdti_trk1 ++;
134
135	trk0_te.cdte_track = ti->cdti_trk0;
136	trk0_te.cdte_format = CDROM_MSF;
137	trk1_te.cdte_track = ti->cdti_trk1;
138	trk1_te.cdte_format = CDROM_MSF;
139	
140	ret = sr_read_tocentry(cdi, &trk0_te);
141	if (ret)
142		return ret;
143	ret = sr_read_tocentry(cdi, &trk1_te);
144	if (ret)
145		return ret;
146
147	memset(&cgc, 0, sizeof(struct packet_command));
148	cgc.cmd[0] = GPCMD_PLAY_AUDIO_MSF;
149	cgc.cmd[3] = trk0_te.cdte_addr.msf.minute;
150	cgc.cmd[4] = trk0_te.cdte_addr.msf.second;
151	cgc.cmd[5] = trk0_te.cdte_addr.msf.frame;
152	cgc.cmd[6] = trk1_te.cdte_addr.msf.minute;
153	cgc.cmd[7] = trk1_te.cdte_addr.msf.second;
154	cgc.cmd[8] = trk1_te.cdte_addr.msf.frame;
155	cgc.data_direction = DMA_NONE;
156	cgc.timeout = IOCTL_TIMEOUT;
157	return sr_do_ioctl(cdi->handle, &cgc);
158}
159
160static int sr_play_trkind(struct cdrom_device_info *cdi,
161		struct cdrom_ti *ti)
162
163{
164	struct scsi_cd *cd = cdi->handle;
165	struct packet_command cgc;
166	int result;
167
168	memset(&cgc, 0, sizeof(struct packet_command));
169	cgc.timeout = IOCTL_TIMEOUT;
170	cgc.cmd[0] = GPCMD_PLAYAUDIO_TI;
171	cgc.cmd[4] = ti->cdti_trk0;
172	cgc.cmd[5] = ti->cdti_ind0;
173	cgc.cmd[7] = ti->cdti_trk1;
174	cgc.cmd[8] = ti->cdti_ind1;
175	cgc.data_direction = DMA_NONE;
176
177	result = sr_do_ioctl(cd, &cgc);
178	if (result == -EDRIVE_CANT_DO_THIS)
179		result = sr_fake_playtrkind(cdi, ti);
180
181	return result;
182}
183
184/* We do our own retries because we want to know what the specific
185   error code is.  Normally the UNIT_ATTENTION code will automatically
186   clear after one error */
187
188int sr_do_ioctl(Scsi_CD *cd, struct packet_command *cgc)
189{
190	struct scsi_device *SDev;
191	struct scsi_sense_hdr local_sshdr, *sshdr;
192	int result, err = 0, retries = 0;
193	const struct scsi_exec_args exec_args = {
194		.sshdr = cgc->sshdr ? : &local_sshdr,
195	};
196
197	SDev = cd->device;
198
199	sshdr = exec_args.sshdr;
 
200
201      retry:
202	if (!scsi_block_when_processing_errors(SDev)) {
203		err = -ENODEV;
204		goto out;
205	}
206
207	result = scsi_execute_cmd(SDev, cgc->cmd,
208				  cgc->data_direction == DMA_TO_DEVICE ?
209				  REQ_OP_DRV_OUT : REQ_OP_DRV_IN, cgc->buffer,
210				  cgc->buflen, cgc->timeout, IOCTL_RETRIES,
211				  &exec_args);
212	/* Minimal error checking.  Ignore cases we know about, and report the rest. */
213	if (result < 0) {
214		err = result;
215		goto out;
216	}
217	if (scsi_status_is_check_condition(result)) {
218		switch (sshdr->sense_key) {
219		case UNIT_ATTENTION:
220			SDev->changed = 1;
221			if (!cgc->quiet)
222				sr_printk(KERN_INFO, cd,
223					  "disc change detected.\n");
224			if (retries++ < 10)
225				goto retry;
226			err = -ENOMEDIUM;
227			break;
228		case NOT_READY:	/* This happens if there is no disc in drive */
229			if (sshdr->asc == 0x04 &&
230			    sshdr->ascq == 0x01) {
231				/* sense: Logical unit is in process of becoming ready */
232				if (!cgc->quiet)
233					sr_printk(KERN_INFO, cd,
234						  "CDROM not ready yet.\n");
235				if (retries++ < 10) {
236					/* sleep 2 sec and try again */
237					ssleep(2);
238					goto retry;
239				} else {
240					/* 20 secs are enough? */
241					err = -ENOMEDIUM;
242					break;
243				}
244			}
245			if (!cgc->quiet)
246				sr_printk(KERN_INFO, cd,
247					  "CDROM not ready.  Make sure there "
248					  "is a disc in the drive.\n");
249			err = -ENOMEDIUM;
250			break;
251		case ILLEGAL_REQUEST:
252			err = -EIO;
253			if (sshdr->asc == 0x20 &&
254			    sshdr->ascq == 0x00)
255				/* sense: Invalid command operation code */
256				err = -EDRIVE_CANT_DO_THIS;
257			break;
258		default:
259			err = -EIO;
260		}
261	}
262
263	/* Wake up a process waiting for device */
264      out:
265	cgc->stat = err;
266	return err;
267}
268
269/* ---------------------------------------------------------------------- */
270/* interface to cdrom.c                                                   */
271
272int sr_tray_move(struct cdrom_device_info *cdi, int pos)
273{
274	Scsi_CD *cd = cdi->handle;
275	struct packet_command cgc;
276
277	memset(&cgc, 0, sizeof(struct packet_command));
278	cgc.cmd[0] = GPCMD_START_STOP_UNIT;
279	cgc.cmd[4] = (pos == 0) ? 0x03 /* close */ : 0x02 /* eject */ ;
280	cgc.data_direction = DMA_NONE;
281	cgc.timeout = IOCTL_TIMEOUT;
282	return sr_do_ioctl(cd, &cgc);
283}
284
285int sr_lock_door(struct cdrom_device_info *cdi, int lock)
286{
287	Scsi_CD *cd = cdi->handle;
288
289	return scsi_set_medium_removal(cd->device, lock ?
290		       SCSI_REMOVAL_PREVENT : SCSI_REMOVAL_ALLOW);
291}
292
293int sr_drive_status(struct cdrom_device_info *cdi, int slot)
294{
295	struct scsi_cd *cd = cdi->handle;
296	struct scsi_sense_hdr sshdr;
297	struct media_event_desc med;
298
299	if (CDSL_CURRENT != slot) {
300		/* we have no changer support */
301		return -EINVAL;
302	}
303	if (!scsi_test_unit_ready(cd->device, SR_TIMEOUT, MAX_RETRIES, &sshdr))
304		return CDS_DISC_OK;
305
306	/* SK/ASC/ASCQ of 2/4/1 means "unit is becoming ready" */
307	if (scsi_sense_valid(&sshdr) && sshdr.sense_key == NOT_READY
308			&& sshdr.asc == 0x04 && sshdr.ascq == 0x01)
309		return CDS_DRIVE_NOT_READY;
310
311	if (!cdrom_get_media_event(cdi, &med)) {
312		if (med.media_present)
313			return CDS_DISC_OK;
314		else if (med.door_open)
315			return CDS_TRAY_OPEN;
316		else
317			return CDS_NO_DISC;
318	}
319
320	/*
321	 * SK/ASC/ASCQ of 2/4/2 means "initialization required"
322	 * Using CD_TRAY_OPEN results in an START_STOP_UNIT to close
323	 * the tray, which resolves the initialization requirement.
324	 */
325	if (scsi_sense_valid(&sshdr) && sshdr.sense_key == NOT_READY
326			&& sshdr.asc == 0x04 && sshdr.ascq == 0x02)
327		return CDS_TRAY_OPEN;
328
329	/*
330	 * 0x04 is format in progress .. but there must be a disc present!
331	 */
332	if (sshdr.sense_key == NOT_READY && sshdr.asc == 0x04)
333		return CDS_DISC_OK;
334
335	/*
336	 * If not using Mt Fuji extended media tray reports,
337	 * just return TRAY_OPEN since ATAPI doesn't provide
338	 * any other way to detect this...
339	 */
340	if (scsi_sense_valid(&sshdr) &&
341	    /* 0x3a is medium not present */
342	    sshdr.asc == 0x3a)
343		return CDS_NO_DISC;
344	else
345		return CDS_TRAY_OPEN;
346
347	return CDS_DRIVE_NOT_READY;
348}
349
350int sr_disk_status(struct cdrom_device_info *cdi)
351{
352	Scsi_CD *cd = cdi->handle;
353	struct cdrom_tochdr toc_h;
354	struct cdrom_tocentry toc_e;
355	int i, rc, have_datatracks = 0;
356
357	/* look for data tracks */
358	rc = sr_read_tochdr(cdi, &toc_h);
359	if (rc)
360		return (rc == -ENOMEDIUM) ? CDS_NO_DISC : CDS_NO_INFO;
361
362	for (i = toc_h.cdth_trk0; i <= toc_h.cdth_trk1; i++) {
363		toc_e.cdte_track = i;
364		toc_e.cdte_format = CDROM_LBA;
365		if (sr_read_tocentry(cdi, &toc_e))
366			return CDS_NO_INFO;
367		if (toc_e.cdte_ctrl & CDROM_DATA_TRACK) {
368			have_datatracks = 1;
369			break;
370		}
371	}
372	if (!have_datatracks)
373		return CDS_AUDIO;
374
375	if (cd->xa_flag)
376		return CDS_XA_2_1;
377	else
378		return CDS_DATA_1;
379}
380
381int sr_get_last_session(struct cdrom_device_info *cdi,
382			struct cdrom_multisession *ms_info)
383{
384	Scsi_CD *cd = cdi->handle;
385
386	ms_info->addr.lba = cd->ms_offset;
387	ms_info->xa_flag = cd->xa_flag || cd->ms_offset > 0;
388
389	return 0;
390}
391
392int sr_get_mcn(struct cdrom_device_info *cdi, struct cdrom_mcn *mcn)
393{
394	Scsi_CD *cd = cdi->handle;
395	struct packet_command cgc;
396	char *buffer = kzalloc(32, GFP_KERNEL);
397	int result;
398
399	if (!buffer)
400		return -ENOMEM;
401
402	memset(&cgc, 0, sizeof(struct packet_command));
403	cgc.cmd[0] = GPCMD_READ_SUBCHANNEL;
404	cgc.cmd[2] = 0x40;	/* I do want the subchannel info */
405	cgc.cmd[3] = 0x02;	/* Give me medium catalog number info */
406	cgc.cmd[8] = 24;
407	cgc.buffer = buffer;
408	cgc.buflen = 24;
409	cgc.data_direction = DMA_FROM_DEVICE;
410	cgc.timeout = IOCTL_TIMEOUT;
411	result = sr_do_ioctl(cd, &cgc);
412	if (result)
413		goto err;
414
415	memcpy(mcn->medium_catalog_number, buffer + 9, 13);
416	mcn->medium_catalog_number[13] = 0;
417
418err:
419	kfree(buffer);
420	return result;
421}
422
423int sr_reset(struct cdrom_device_info *cdi)
424{
425	return 0;
426}
427
428int sr_select_speed(struct cdrom_device_info *cdi, int speed)
429{
430	Scsi_CD *cd = cdi->handle;
431	struct packet_command cgc;
432
433	if (speed == 0)
434		speed = 0xffff;	/* set to max */
435	else
436		speed *= 177;	/* Nx to kbyte/s */
437
438	memset(&cgc, 0, sizeof(struct packet_command));
439	cgc.cmd[0] = GPCMD_SET_SPEED;	/* SET CD SPEED */
440	cgc.cmd[2] = (speed >> 8) & 0xff;	/* MSB for speed (in kbytes/sec) */
441	cgc.cmd[3] = speed & 0xff;	/* LSB */
442	cgc.data_direction = DMA_NONE;
443	cgc.timeout = IOCTL_TIMEOUT;
444
445	if (sr_do_ioctl(cd, &cgc))
446		return -EIO;
447	return 0;
448}
449
450/* ----------------------------------------------------------------------- */
451/* this is called by the generic cdrom driver. arg is a _kernel_ pointer,  */
452/* because the generic cdrom driver does the user access stuff for us.     */
453/* only cdromreadtochdr and cdromreadtocentry are left - for use with the  */
454/* sr_disk_status interface for the generic cdrom driver.                  */
455
456int sr_audio_ioctl(struct cdrom_device_info *cdi, unsigned int cmd, void *arg)
457{
458	switch (cmd) {
459	case CDROMREADTOCHDR:
460		return sr_read_tochdr(cdi, arg);
461	case CDROMREADTOCENTRY:
462		return sr_read_tocentry(cdi, arg);
463	case CDROMPLAYTRKIND:
464		return sr_play_trkind(cdi, arg);
465	default:
466		return -EINVAL;
467	}
468}
469
470/* -----------------------------------------------------------------------
471 * a function to read all sorts of funny cdrom sectors using the READ_CD
472 * scsi-3 mmc command
473 *
474 * lba:     linear block address
475 * format:  0 = data (anything)
476 *          1 = audio
477 *          2 = data (mode 1)
478 *          3 = data (mode 2)
479 *          4 = data (mode 2 form1)
480 *          5 = data (mode 2 form2)
481 * blksize: 2048 | 2336 | 2340 | 2352
482 */
483
484static int sr_read_cd(Scsi_CD *cd, unsigned char *dest, int lba, int format, int blksize)
485{
486	struct packet_command cgc;
487
488#ifdef DEBUG
489	sr_printk(KERN_INFO, cd, "sr_read_cd lba=%d format=%d blksize=%d\n",
490		  lba, format, blksize);
491#endif
492
493	memset(&cgc, 0, sizeof(struct packet_command));
494	cgc.cmd[0] = GPCMD_READ_CD;	/* READ_CD */
495	cgc.cmd[1] = ((format & 7) << 2);
496	cgc.cmd[2] = (unsigned char) (lba >> 24) & 0xff;
497	cgc.cmd[3] = (unsigned char) (lba >> 16) & 0xff;
498	cgc.cmd[4] = (unsigned char) (lba >> 8) & 0xff;
499	cgc.cmd[5] = (unsigned char) lba & 0xff;
500	cgc.cmd[8] = 1;
501	switch (blksize) {
502	case 2336:
503		cgc.cmd[9] = 0x58;
504		break;
505	case 2340:
506		cgc.cmd[9] = 0x78;
507		break;
508	case 2352:
509		cgc.cmd[9] = 0xf8;
510		break;
511	default:
512		cgc.cmd[9] = 0x10;
513		break;
514	}
515	cgc.buffer = dest;
516	cgc.buflen = blksize;
517	cgc.data_direction = DMA_FROM_DEVICE;
518	cgc.timeout = IOCTL_TIMEOUT;
519	return sr_do_ioctl(cd, &cgc);
520}
521
522/*
523 * read sectors with blocksizes other than 2048
524 */
525
526static int sr_read_sector(Scsi_CD *cd, int lba, int blksize, unsigned char *dest)
527{
528	struct packet_command cgc;
529	int rc;
530
531	/* we try the READ CD command first... */
532	if (cd->readcd_known) {
533		rc = sr_read_cd(cd, dest, lba, 0, blksize);
534		if (-EDRIVE_CANT_DO_THIS != rc)
535			return rc;
536		cd->readcd_known = 0;
537		sr_printk(KERN_INFO, cd,
538			  "CDROM doesn't support READ CD (0xbe) command\n");
539		/* fall & retry the other way */
540	}
541	/* ... if this fails, we switch the blocksize using MODE SELECT */
542	if (blksize != cd->device->sector_size) {
543		if (0 != (rc = sr_set_blocklength(cd, blksize)))
544			return rc;
545	}
546#ifdef DEBUG
547	sr_printk(KERN_INFO, cd, "sr_read_sector lba=%d blksize=%d\n",
548		  lba, blksize);
549#endif
550
551	memset(&cgc, 0, sizeof(struct packet_command));
552	cgc.cmd[0] = GPCMD_READ_10;
553	cgc.cmd[2] = (unsigned char) (lba >> 24) & 0xff;
554	cgc.cmd[3] = (unsigned char) (lba >> 16) & 0xff;
555	cgc.cmd[4] = (unsigned char) (lba >> 8) & 0xff;
556	cgc.cmd[5] = (unsigned char) lba & 0xff;
557	cgc.cmd[8] = 1;
558	cgc.buffer = dest;
559	cgc.buflen = blksize;
560	cgc.data_direction = DMA_FROM_DEVICE;
561	cgc.timeout = IOCTL_TIMEOUT;
562	rc = sr_do_ioctl(cd, &cgc);
563
564	if (blksize != CD_FRAMESIZE)
565		rc |= sr_set_blocklength(cd, CD_FRAMESIZE);
566	return rc;
567}
568
569/*
570 * read a sector in raw mode to check the sector format
571 * ret: 1 == mode2 (XA), 0 == mode1, <0 == error 
572 */
573
574int sr_is_xa(Scsi_CD *cd)
575{
576	unsigned char *raw_sector;
577	int is_xa;
578
579	if (!xa_test)
580		return 0;
581
582	raw_sector = kmalloc(2048, GFP_KERNEL);
583	if (!raw_sector)
584		return -ENOMEM;
585	if (0 == sr_read_sector(cd, cd->ms_offset + 16,
586				CD_FRAMESIZE_RAW1, raw_sector)) {
587		is_xa = (raw_sector[3] == 0x02) ? 1 : 0;
588	} else {
589		/* read a raw sector failed for some reason. */
590		is_xa = -1;
591	}
592	kfree(raw_sector);
593#ifdef DEBUG
594	sr_printk(KERN_INFO, cd, "sr_is_xa: %d\n", is_xa);
595#endif
596	return is_xa;
597}
v5.4
  1// SPDX-License-Identifier: GPL-2.0
  2#include <linux/kernel.h>
  3#include <linux/mm.h>
  4#include <linux/fs.h>
  5#include <linux/errno.h>
  6#include <linux/string.h>
  7#include <linux/blkdev.h>
  8#include <linux/module.h>
  9#include <linux/blkpg.h>
 10#include <linux/cdrom.h>
 11#include <linux/delay.h>
 12#include <linux/slab.h>
 13#include <asm/io.h>
 14#include <linux/uaccess.h>
 15
 16#include <scsi/scsi.h>
 17#include <scsi/scsi_dbg.h>
 18#include <scsi/scsi_device.h>
 19#include <scsi/scsi_eh.h>
 20#include <scsi/scsi_host.h>
 21#include <scsi/scsi_ioctl.h>
 22#include <scsi/scsi_cmnd.h>
 23
 24#include "sr.h"
 25
 26#if 0
 27#define DEBUG
 28#endif
 29
 30/* The sr_is_xa() seems to trigger firmware bugs with some drives :-(
 31 * It is off by default and can be turned on with this module parameter */
 32static int xa_test = 0;
 33
 34module_param(xa_test, int, S_IRUGO | S_IWUSR);
 35
 36/* primitive to determine whether we need to have GFP_DMA set based on
 37 * the status of the unchecked_isa_dma flag in the host structure */
 38#define SR_GFP_DMA(cd) (((cd)->device->host->unchecked_isa_dma) ? GFP_DMA : 0)
 39
 40static int sr_read_tochdr(struct cdrom_device_info *cdi,
 41		struct cdrom_tochdr *tochdr)
 42{
 43	struct scsi_cd *cd = cdi->handle;
 44	struct packet_command cgc;
 45	int result;
 46	unsigned char *buffer;
 47
 48	buffer = kmalloc(32, GFP_KERNEL | SR_GFP_DMA(cd));
 49	if (!buffer)
 50		return -ENOMEM;
 51
 52	memset(&cgc, 0, sizeof(struct packet_command));
 53	cgc.timeout = IOCTL_TIMEOUT;
 54	cgc.cmd[0] = GPCMD_READ_TOC_PMA_ATIP;
 55	cgc.cmd[8] = 12;		/* LSB of length */
 56	cgc.buffer = buffer;
 57	cgc.buflen = 12;
 58	cgc.quiet = 1;
 59	cgc.data_direction = DMA_FROM_DEVICE;
 60
 61	result = sr_do_ioctl(cd, &cgc);
 
 
 62
 63	tochdr->cdth_trk0 = buffer[2];
 64	tochdr->cdth_trk1 = buffer[3];
 65
 
 66	kfree(buffer);
 67	return result;
 68}
 69
 70static int sr_read_tocentry(struct cdrom_device_info *cdi,
 71		struct cdrom_tocentry *tocentry)
 72{
 73	struct scsi_cd *cd = cdi->handle;
 74	struct packet_command cgc;
 75	int result;
 76	unsigned char *buffer;
 77
 78	buffer = kmalloc(32, GFP_KERNEL | SR_GFP_DMA(cd));
 79	if (!buffer)
 80		return -ENOMEM;
 81
 82	memset(&cgc, 0, sizeof(struct packet_command));
 83	cgc.timeout = IOCTL_TIMEOUT;
 84	cgc.cmd[0] = GPCMD_READ_TOC_PMA_ATIP;
 85	cgc.cmd[1] |= (tocentry->cdte_format == CDROM_MSF) ? 0x02 : 0;
 86	cgc.cmd[6] = tocentry->cdte_track;
 87	cgc.cmd[8] = 12;		/* LSB of length */
 88	cgc.buffer = buffer;
 89	cgc.buflen = 12;
 90	cgc.data_direction = DMA_FROM_DEVICE;
 91
 92	result = sr_do_ioctl(cd, &cgc);
 
 
 93
 94	tocentry->cdte_ctrl = buffer[5] & 0xf;
 95	tocentry->cdte_adr = buffer[5] >> 4;
 96	tocentry->cdte_datamode = (tocentry->cdte_ctrl & 0x04) ? 1 : 0;
 97	if (tocentry->cdte_format == CDROM_MSF) {
 98		tocentry->cdte_addr.msf.minute = buffer[9];
 99		tocentry->cdte_addr.msf.second = buffer[10];
100		tocentry->cdte_addr.msf.frame = buffer[11];
101	} else
102		tocentry->cdte_addr.lba = (((((buffer[8] << 8) + buffer[9]) << 8)
103			+ buffer[10]) << 8) + buffer[11];
104
 
105	kfree(buffer);
106	return result;
107}
108
109#define IOCTL_RETRIES 3
110
111/* ATAPI drives don't have a SCMD_PLAYAUDIO_TI command.  When these drives
112   are emulating a SCSI device via the idescsi module, they need to have
113   CDROMPLAYTRKIND commands translated into CDROMPLAYMSF commands for them */
114
115static int sr_fake_playtrkind(struct cdrom_device_info *cdi, struct cdrom_ti *ti)
116{
117	struct cdrom_tocentry trk0_te, trk1_te;
118	struct cdrom_tochdr tochdr;
119	struct packet_command cgc;
120	int ntracks, ret;
121
122	ret = sr_read_tochdr(cdi, &tochdr);
123	if (ret)
124		return ret;
125
126	ntracks = tochdr.cdth_trk1 - tochdr.cdth_trk0 + 1;
127	
128	if (ti->cdti_trk1 == ntracks) 
129		ti->cdti_trk1 = CDROM_LEADOUT;
130	else if (ti->cdti_trk1 != CDROM_LEADOUT)
131		ti->cdti_trk1 ++;
132
133	trk0_te.cdte_track = ti->cdti_trk0;
134	trk0_te.cdte_format = CDROM_MSF;
135	trk1_te.cdte_track = ti->cdti_trk1;
136	trk1_te.cdte_format = CDROM_MSF;
137	
138	ret = sr_read_tocentry(cdi, &trk0_te);
139	if (ret)
140		return ret;
141	ret = sr_read_tocentry(cdi, &trk1_te);
142	if (ret)
143		return ret;
144
145	memset(&cgc, 0, sizeof(struct packet_command));
146	cgc.cmd[0] = GPCMD_PLAY_AUDIO_MSF;
147	cgc.cmd[3] = trk0_te.cdte_addr.msf.minute;
148	cgc.cmd[4] = trk0_te.cdte_addr.msf.second;
149	cgc.cmd[5] = trk0_te.cdte_addr.msf.frame;
150	cgc.cmd[6] = trk1_te.cdte_addr.msf.minute;
151	cgc.cmd[7] = trk1_te.cdte_addr.msf.second;
152	cgc.cmd[8] = trk1_te.cdte_addr.msf.frame;
153	cgc.data_direction = DMA_NONE;
154	cgc.timeout = IOCTL_TIMEOUT;
155	return sr_do_ioctl(cdi->handle, &cgc);
156}
157
158static int sr_play_trkind(struct cdrom_device_info *cdi,
159		struct cdrom_ti *ti)
160
161{
162	struct scsi_cd *cd = cdi->handle;
163	struct packet_command cgc;
164	int result;
165
166	memset(&cgc, 0, sizeof(struct packet_command));
167	cgc.timeout = IOCTL_TIMEOUT;
168	cgc.cmd[0] = GPCMD_PLAYAUDIO_TI;
169	cgc.cmd[4] = ti->cdti_trk0;
170	cgc.cmd[5] = ti->cdti_ind0;
171	cgc.cmd[7] = ti->cdti_trk1;
172	cgc.cmd[8] = ti->cdti_ind1;
173	cgc.data_direction = DMA_NONE;
174
175	result = sr_do_ioctl(cd, &cgc);
176	if (result == -EDRIVE_CANT_DO_THIS)
177		result = sr_fake_playtrkind(cdi, ti);
178
179	return result;
180}
181
182/* We do our own retries because we want to know what the specific
183   error code is.  Normally the UNIT_ATTENTION code will automatically
184   clear after one error */
185
186int sr_do_ioctl(Scsi_CD *cd, struct packet_command *cgc)
187{
188	struct scsi_device *SDev;
189	struct scsi_sense_hdr local_sshdr, *sshdr = &local_sshdr;
190	int result, err = 0, retries = 0;
 
 
 
191
192	SDev = cd->device;
193
194	if (cgc->sshdr)
195		sshdr = cgc->sshdr;
196
197      retry:
198	if (!scsi_block_when_processing_errors(SDev)) {
199		err = -ENODEV;
200		goto out;
201	}
202
203	result = scsi_execute(SDev, cgc->cmd, cgc->data_direction,
204			      cgc->buffer, cgc->buflen, NULL, sshdr,
205			      cgc->timeout, IOCTL_RETRIES, 0, 0, NULL);
206
 
207	/* Minimal error checking.  Ignore cases we know about, and report the rest. */
208	if (driver_byte(result) != 0) {
 
 
 
 
209		switch (sshdr->sense_key) {
210		case UNIT_ATTENTION:
211			SDev->changed = 1;
212			if (!cgc->quiet)
213				sr_printk(KERN_INFO, cd,
214					  "disc change detected.\n");
215			if (retries++ < 10)
216				goto retry;
217			err = -ENOMEDIUM;
218			break;
219		case NOT_READY:	/* This happens if there is no disc in drive */
220			if (sshdr->asc == 0x04 &&
221			    sshdr->ascq == 0x01) {
222				/* sense: Logical unit is in process of becoming ready */
223				if (!cgc->quiet)
224					sr_printk(KERN_INFO, cd,
225						  "CDROM not ready yet.\n");
226				if (retries++ < 10) {
227					/* sleep 2 sec and try again */
228					ssleep(2);
229					goto retry;
230				} else {
231					/* 20 secs are enough? */
232					err = -ENOMEDIUM;
233					break;
234				}
235			}
236			if (!cgc->quiet)
237				sr_printk(KERN_INFO, cd,
238					  "CDROM not ready.  Make sure there "
239					  "is a disc in the drive.\n");
240			err = -ENOMEDIUM;
241			break;
242		case ILLEGAL_REQUEST:
243			err = -EIO;
244			if (sshdr->asc == 0x20 &&
245			    sshdr->ascq == 0x00)
246				/* sense: Invalid command operation code */
247				err = -EDRIVE_CANT_DO_THIS;
248			break;
249		default:
250			err = -EIO;
251		}
252	}
253
254	/* Wake up a process waiting for device */
255      out:
256	cgc->stat = err;
257	return err;
258}
259
260/* ---------------------------------------------------------------------- */
261/* interface to cdrom.c                                                   */
262
263int sr_tray_move(struct cdrom_device_info *cdi, int pos)
264{
265	Scsi_CD *cd = cdi->handle;
266	struct packet_command cgc;
267
268	memset(&cgc, 0, sizeof(struct packet_command));
269	cgc.cmd[0] = GPCMD_START_STOP_UNIT;
270	cgc.cmd[4] = (pos == 0) ? 0x03 /* close */ : 0x02 /* eject */ ;
271	cgc.data_direction = DMA_NONE;
272	cgc.timeout = IOCTL_TIMEOUT;
273	return sr_do_ioctl(cd, &cgc);
274}
275
276int sr_lock_door(struct cdrom_device_info *cdi, int lock)
277{
278	Scsi_CD *cd = cdi->handle;
279
280	return scsi_set_medium_removal(cd->device, lock ?
281		       SCSI_REMOVAL_PREVENT : SCSI_REMOVAL_ALLOW);
282}
283
284int sr_drive_status(struct cdrom_device_info *cdi, int slot)
285{
286	struct scsi_cd *cd = cdi->handle;
287	struct scsi_sense_hdr sshdr;
288	struct media_event_desc med;
289
290	if (CDSL_CURRENT != slot) {
291		/* we have no changer support */
292		return -EINVAL;
293	}
294	if (!scsi_test_unit_ready(cd->device, SR_TIMEOUT, MAX_RETRIES, &sshdr))
295		return CDS_DISC_OK;
296
297	/* SK/ASC/ASCQ of 2/4/1 means "unit is becoming ready" */
298	if (scsi_sense_valid(&sshdr) && sshdr.sense_key == NOT_READY
299			&& sshdr.asc == 0x04 && sshdr.ascq == 0x01)
300		return CDS_DRIVE_NOT_READY;
301
302	if (!cdrom_get_media_event(cdi, &med)) {
303		if (med.media_present)
304			return CDS_DISC_OK;
305		else if (med.door_open)
306			return CDS_TRAY_OPEN;
307		else
308			return CDS_NO_DISC;
309	}
310
311	/*
312	 * SK/ASC/ASCQ of 2/4/2 means "initialization required"
313	 * Using CD_TRAY_OPEN results in an START_STOP_UNIT to close
314	 * the tray, which resolves the initialization requirement.
315	 */
316	if (scsi_sense_valid(&sshdr) && sshdr.sense_key == NOT_READY
317			&& sshdr.asc == 0x04 && sshdr.ascq == 0x02)
318		return CDS_TRAY_OPEN;
319
320	/*
321	 * 0x04 is format in progress .. but there must be a disc present!
322	 */
323	if (sshdr.sense_key == NOT_READY && sshdr.asc == 0x04)
324		return CDS_DISC_OK;
325
326	/*
327	 * If not using Mt Fuji extended media tray reports,
328	 * just return TRAY_OPEN since ATAPI doesn't provide
329	 * any other way to detect this...
330	 */
331	if (scsi_sense_valid(&sshdr) &&
332	    /* 0x3a is medium not present */
333	    sshdr.asc == 0x3a)
334		return CDS_NO_DISC;
335	else
336		return CDS_TRAY_OPEN;
337
338	return CDS_DRIVE_NOT_READY;
339}
340
341int sr_disk_status(struct cdrom_device_info *cdi)
342{
343	Scsi_CD *cd = cdi->handle;
344	struct cdrom_tochdr toc_h;
345	struct cdrom_tocentry toc_e;
346	int i, rc, have_datatracks = 0;
347
348	/* look for data tracks */
349	rc = sr_read_tochdr(cdi, &toc_h);
350	if (rc)
351		return (rc == -ENOMEDIUM) ? CDS_NO_DISC : CDS_NO_INFO;
352
353	for (i = toc_h.cdth_trk0; i <= toc_h.cdth_trk1; i++) {
354		toc_e.cdte_track = i;
355		toc_e.cdte_format = CDROM_LBA;
356		if (sr_read_tocentry(cdi, &toc_e))
357			return CDS_NO_INFO;
358		if (toc_e.cdte_ctrl & CDROM_DATA_TRACK) {
359			have_datatracks = 1;
360			break;
361		}
362	}
363	if (!have_datatracks)
364		return CDS_AUDIO;
365
366	if (cd->xa_flag)
367		return CDS_XA_2_1;
368	else
369		return CDS_DATA_1;
370}
371
372int sr_get_last_session(struct cdrom_device_info *cdi,
373			struct cdrom_multisession *ms_info)
374{
375	Scsi_CD *cd = cdi->handle;
376
377	ms_info->addr.lba = cd->ms_offset;
378	ms_info->xa_flag = cd->xa_flag || cd->ms_offset > 0;
379
380	return 0;
381}
382
383int sr_get_mcn(struct cdrom_device_info *cdi, struct cdrom_mcn *mcn)
384{
385	Scsi_CD *cd = cdi->handle;
386	struct packet_command cgc;
387	char *buffer = kmalloc(32, GFP_KERNEL | SR_GFP_DMA(cd));
388	int result;
389
390	if (!buffer)
391		return -ENOMEM;
392
393	memset(&cgc, 0, sizeof(struct packet_command));
394	cgc.cmd[0] = GPCMD_READ_SUBCHANNEL;
395	cgc.cmd[2] = 0x40;	/* I do want the subchannel info */
396	cgc.cmd[3] = 0x02;	/* Give me medium catalog number info */
397	cgc.cmd[8] = 24;
398	cgc.buffer = buffer;
399	cgc.buflen = 24;
400	cgc.data_direction = DMA_FROM_DEVICE;
401	cgc.timeout = IOCTL_TIMEOUT;
402	result = sr_do_ioctl(cd, &cgc);
 
 
403
404	memcpy(mcn->medium_catalog_number, buffer + 9, 13);
405	mcn->medium_catalog_number[13] = 0;
406
 
407	kfree(buffer);
408	return result;
409}
410
411int sr_reset(struct cdrom_device_info *cdi)
412{
413	return 0;
414}
415
416int sr_select_speed(struct cdrom_device_info *cdi, int speed)
417{
418	Scsi_CD *cd = cdi->handle;
419	struct packet_command cgc;
420
421	if (speed == 0)
422		speed = 0xffff;	/* set to max */
423	else
424		speed *= 177;	/* Nx to kbyte/s */
425
426	memset(&cgc, 0, sizeof(struct packet_command));
427	cgc.cmd[0] = GPCMD_SET_SPEED;	/* SET CD SPEED */
428	cgc.cmd[2] = (speed >> 8) & 0xff;	/* MSB for speed (in kbytes/sec) */
429	cgc.cmd[3] = speed & 0xff;	/* LSB */
430	cgc.data_direction = DMA_NONE;
431	cgc.timeout = IOCTL_TIMEOUT;
432
433	if (sr_do_ioctl(cd, &cgc))
434		return -EIO;
435	return 0;
436}
437
438/* ----------------------------------------------------------------------- */
439/* this is called by the generic cdrom driver. arg is a _kernel_ pointer,  */
440/* because the generic cdrom driver does the user access stuff for us.     */
441/* only cdromreadtochdr and cdromreadtocentry are left - for use with the  */
442/* sr_disk_status interface for the generic cdrom driver.                  */
443
444int sr_audio_ioctl(struct cdrom_device_info *cdi, unsigned int cmd, void *arg)
445{
446	switch (cmd) {
447	case CDROMREADTOCHDR:
448		return sr_read_tochdr(cdi, arg);
449	case CDROMREADTOCENTRY:
450		return sr_read_tocentry(cdi, arg);
451	case CDROMPLAYTRKIND:
452		return sr_play_trkind(cdi, arg);
453	default:
454		return -EINVAL;
455	}
456}
457
458/* -----------------------------------------------------------------------
459 * a function to read all sorts of funny cdrom sectors using the READ_CD
460 * scsi-3 mmc command
461 *
462 * lba:     linear block address
463 * format:  0 = data (anything)
464 *          1 = audio
465 *          2 = data (mode 1)
466 *          3 = data (mode 2)
467 *          4 = data (mode 2 form1)
468 *          5 = data (mode 2 form2)
469 * blksize: 2048 | 2336 | 2340 | 2352
470 */
471
472static int sr_read_cd(Scsi_CD *cd, unsigned char *dest, int lba, int format, int blksize)
473{
474	struct packet_command cgc;
475
476#ifdef DEBUG
477	sr_printk(KERN_INFO, cd, "sr_read_cd lba=%d format=%d blksize=%d\n",
478		  lba, format, blksize);
479#endif
480
481	memset(&cgc, 0, sizeof(struct packet_command));
482	cgc.cmd[0] = GPCMD_READ_CD;	/* READ_CD */
483	cgc.cmd[1] = ((format & 7) << 2);
484	cgc.cmd[2] = (unsigned char) (lba >> 24) & 0xff;
485	cgc.cmd[3] = (unsigned char) (lba >> 16) & 0xff;
486	cgc.cmd[4] = (unsigned char) (lba >> 8) & 0xff;
487	cgc.cmd[5] = (unsigned char) lba & 0xff;
488	cgc.cmd[8] = 1;
489	switch (blksize) {
490	case 2336:
491		cgc.cmd[9] = 0x58;
492		break;
493	case 2340:
494		cgc.cmd[9] = 0x78;
495		break;
496	case 2352:
497		cgc.cmd[9] = 0xf8;
498		break;
499	default:
500		cgc.cmd[9] = 0x10;
501		break;
502	}
503	cgc.buffer = dest;
504	cgc.buflen = blksize;
505	cgc.data_direction = DMA_FROM_DEVICE;
506	cgc.timeout = IOCTL_TIMEOUT;
507	return sr_do_ioctl(cd, &cgc);
508}
509
510/*
511 * read sectors with blocksizes other than 2048
512 */
513
514static int sr_read_sector(Scsi_CD *cd, int lba, int blksize, unsigned char *dest)
515{
516	struct packet_command cgc;
517	int rc;
518
519	/* we try the READ CD command first... */
520	if (cd->readcd_known) {
521		rc = sr_read_cd(cd, dest, lba, 0, blksize);
522		if (-EDRIVE_CANT_DO_THIS != rc)
523			return rc;
524		cd->readcd_known = 0;
525		sr_printk(KERN_INFO, cd,
526			  "CDROM does'nt support READ CD (0xbe) command\n");
527		/* fall & retry the other way */
528	}
529	/* ... if this fails, we switch the blocksize using MODE SELECT */
530	if (blksize != cd->device->sector_size) {
531		if (0 != (rc = sr_set_blocklength(cd, blksize)))
532			return rc;
533	}
534#ifdef DEBUG
535	sr_printk(KERN_INFO, cd, "sr_read_sector lba=%d blksize=%d\n",
536		  lba, blksize);
537#endif
538
539	memset(&cgc, 0, sizeof(struct packet_command));
540	cgc.cmd[0] = GPCMD_READ_10;
541	cgc.cmd[2] = (unsigned char) (lba >> 24) & 0xff;
542	cgc.cmd[3] = (unsigned char) (lba >> 16) & 0xff;
543	cgc.cmd[4] = (unsigned char) (lba >> 8) & 0xff;
544	cgc.cmd[5] = (unsigned char) lba & 0xff;
545	cgc.cmd[8] = 1;
546	cgc.buffer = dest;
547	cgc.buflen = blksize;
548	cgc.data_direction = DMA_FROM_DEVICE;
549	cgc.timeout = IOCTL_TIMEOUT;
550	rc = sr_do_ioctl(cd, &cgc);
551
 
 
552	return rc;
553}
554
555/*
556 * read a sector in raw mode to check the sector format
557 * ret: 1 == mode2 (XA), 0 == mode1, <0 == error 
558 */
559
560int sr_is_xa(Scsi_CD *cd)
561{
562	unsigned char *raw_sector;
563	int is_xa;
564
565	if (!xa_test)
566		return 0;
567
568	raw_sector = kmalloc(2048, GFP_KERNEL | SR_GFP_DMA(cd));
569	if (!raw_sector)
570		return -ENOMEM;
571	if (0 == sr_read_sector(cd, cd->ms_offset + 16,
572				CD_FRAMESIZE_RAW1, raw_sector)) {
573		is_xa = (raw_sector[3] == 0x02) ? 1 : 0;
574	} else {
575		/* read a raw sector failed for some reason. */
576		is_xa = -1;
577	}
578	kfree(raw_sector);
579#ifdef DEBUG
580	sr_printk(KERN_INFO, cd, "sr_is_xa: %d\n", is_xa);
581#endif
582	return is_xa;
583}