Initial working, but messy and incomplete, cd rom session disk scanner module

git-svn-id: file:///srv/svn/repos/haiku/trunk/current@2326 a95241bf-73f2-0310-859d-f6bbb57e9c96
This commit is contained in:
Tyler Dauwalder 2002-12-31 07:23:55 +00:00
parent 22aef14b93
commit 4267a32ec4
1 changed files with 461 additions and 0 deletions

View File

@ -0,0 +1,461 @@
// cdrom.c
#include <errno.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <ByteOrder.h>
#include <fs_device.h>
#include <KernelExport.h>
#include <scsi.h>
#include <disk_scanner/session.h>
#define TRACE(x)
//#define TRACE(x) dprintf x
static void dump_full_table_of_contents(uchar *data, uint16 data_length);
#define ISO9660_SESSION_MODULE_NAME "disk_scanner/session/cdrom/v1"
static const char *kModuleDebugName = "session/cdrom";
/*! \brief raw_device_command flags
This is the only combination of flags that works on my system. :-)
*/
const uint8 kScsiFlags = B_RAW_DEVICE_DATA_IN
| B_RAW_DEVICE_REPORT_RESIDUAL
| B_RAW_DEVICE_SHORT_READ_VALID;
/*! \brief Timeout value used when making scsi commands
*/
const uint32 kScsiTimeout = 1000000;
//! SCSI "READ TOC/PMA/ATIP" command struct
typedef struct {
uint8 command; //!< 0x43 == READ TOC/PMA/ATIP
uint8 reserved2:1,
msf:1, //!< addressing format: 0 == LBA, 1 == MSF; try lba first, then msf if that fails
reserved1:3,
reserved0:3;
uint8 format:4, //!< sub-command: 0x0 == "TOC", 0x1 == "Session Info", 0x2 == "Full TOC"
reserved3:4;
uint8 reserved4;
uint8 reserved5;
uint8 reserved6;
uint8 number; //!< track/session number
uint16 length; //!< length of data buffer passed in raw_device_command.data; BIG-ENDIAN!!!
uint8 control; //!< control codes; 0x0 should be fine
} __attribute__((packed)) scsi_table_of_contents_command;
// formats of interest
const uint8 kTableOfContentsFormat = 0x00;
const uint8 kSessionFormat = 0x01;
const uint8 kFullTableOfContentsFormat = 0x10;
/*! \brief Minutes:Seconds:Frames format address
*/
typedef struct {
uint8 reserved;
uint8 minutes;
uint8 seconds;
uint8 frames;
} msf_address;
#define CDROM_FRAMES_PER_SECOND (75)
#define CDROM_FRAMES_PER_MINUTE (CDROM_FRAMES_PER_SECOND*60)
static
inline
msf_address
make_msf_address(uint8 minutes, uint8 seconds, uint8 frames)
{
msf_address result;
result.reserved = 0;
result.minutes = minutes;
result.seconds = seconds;
result.frames = frames;
return result;
}
static
inline
uint32
msf_to_lba(msf_address msf)
{
return (CDROM_FRAMES_PER_MINUTE * msf.minutes)
+ (CDROM_FRAMES_PER_SECOND * msf.seconds)
+ msf.frames - 150;
}
/*! \brief Header for data returned by all formats of SCSI
"READ TOC/PMA/ATIP" command.
*/
typedef struct {
uint16 length; //!< Length of data in reply (not including these 2 bytes); BIG ENDIAN!!!
uint8 first; //!< First track/session in reply
uint8 last; //!< Last track/session in reply
} cdrom_table_of_contents_header;
/*! Type of entries returned by "READ TOC/PMA/ATIP" when called with format
\c kTableOfContentsFormat == 0x00
*/
typedef struct {
uint8 reserved0;
uint8 control:4,
adr:4;
uint8 track_number;
uint8 reserved1;
uint32 address;
} cdrom_table_of_contents_entry;
/*! Type of entries returned by "READ TOC/PMA/ATIP" when called with format
\c kFullTableOfContentsFormat == 0x10
*/
typedef struct {
uint8 session;
uint8 control:4,
adr:4;
uint8 tno;
uint8 point;
uint8 minutes;
uint8 seconds;
uint8 frames;
uint8 zero;
uint8 pminutes;
uint8 pseconds;
uint8 pframes;
} cdrom_full_table_of_contents_entry;
// std_ops
static
status_t
std_ops(int32 op, ...)
{
TRACE(("%s: std_ops(0x%lx)\n", kModuleDebugName, op));
switch(op) {
case B_MODULE_INIT:
case B_MODULE_UNINIT:
return B_OK;
}
return B_ERROR;
}
// read_block
static
status_t
read_block(int fd, off_t offset, size_t size, uchar **block)
{
status_t error = (block && size > 0 ? B_OK : B_BAD_VALUE);
if (error == B_OK) {
*block = malloc(size);
if (*block) {
if (read_pos(fd, offset, *block, size) != (ssize_t)size) {
error = errno;
if (error == B_OK)
error = B_ERROR;
free(*block);
*block = NULL;
}
} else
error = B_NO_MEMORY;
}
return error;
}
static
void
dump_scsi_command(raw_device_command *cmd) {
int i;
int j;
scsi_table_of_contents_command *scsi_command = (scsi_table_of_contents_command*)(&(cmd->command));
for (i = 0; i < cmd->command_length; i++)
TRACE(("%.2x,", cmd->command[i]));
TRACE(("\n"));
TRACE(("raw_device_command:\n"));
TRACE((" command:\n"));
TRACE((" command = %d (0x%.2x)\n", scsi_command->command, scsi_command->command));
TRACE((" msf = %d\n", scsi_command->msf));
TRACE((" format = %d (0x%.2x)\n", scsi_command->format, scsi_command->format));
TRACE((" number = %d\n", scsi_command->number));
TRACE((" length = %d\n", B_BENDIAN_TO_HOST_INT16(scsi_command->length)));
TRACE((" control = %d\n", scsi_command->control));
TRACE((" command_length = %ld\n", cmd->command_length));
TRACE((" flags = %ld\n", cmd->flags));
TRACE((" scsi_status = 0x%lx\n", cmd->scsi_status));
TRACE((" cam_status = 0x%lx\n", cmd->cam_status));
TRACE((" data = %p\n", cmd->data));
TRACE((" data_length = %ld\n", cmd->data_length));
TRACE((" sense_data = %p\n", cmd->sense_data));
TRACE((" sense_data_length = %ld\n", cmd->sense_data_length));
TRACE((" timeout = %ld\n", cmd->timeout));
TRACE(("data dump:\n"));
for (j = 0; j < 2048; j++) {//cmd->data_length; j++) {
uchar c = ((uchar*)cmd->data)[j];
if (('a' <= c && c <= 'z') || ('A' <= c && c <= 'Z') || ('0' <= c && c <= '9'))
TRACE(("\\%c,", c));
else
TRACE(("%.2x,", c));
}
TRACE(("\n"));
TRACE(("sense_data dump:\n"));
for (j = 0; j < cmd->sense_data_length; j++) {
uchar c = ((uchar*)cmd->sense_data)[j];
if (('a' <= c && c <= 'z') || ('A' <= c && c <= 'Z') || ('0' <= c && c <= '9'))
TRACE(("%c", c));
else if (c == 0)
TRACE(("_"));
else
TRACE(("-"));
}
TRACE(("\n"));
}
// cdrom_identify
static
bool
cdrom_session_identify(int deviceFD, off_t deviceSize, int32 blockSize)
{
device_geometry geometry;
bool result = false;
if (ioctl(deviceFD, B_GET_GEOMETRY, &geometry) == 0)
result = (geometry.device_type == B_CD);
else
dprintf("WARNING: %s: Unable to get device geometry\n", kModuleDebugName);
return result;
}
// cdrom_session_get_nth_info
static
status_t
read_table_of_contents(int deviceFD, uint32 first_session, uchar *buffer,
uint16 buffer_length, bool msf)
{
raw_device_command raw_command;
scsi_table_of_contents_command *scsi_command = NULL;
const uint32 sense_data_length = 1024;
uchar sense_data[sense_data_length];
status_t error = buffer ? B_OK : B_BAD_VALUE;
scsi_table_of_contents_command cmdo;
TRACE(("%s: read_table_of_contents: (%d, %p, %ld)\n", kModuleDebugName,
deviceFD, buffer, buffer_length));
if (error)
return error;
memset(raw_command.command, 0, 16);
scsi_command = (scsi_table_of_contents_command*)(raw_command.command);
cmdo.command = 0x43;
cmdo.msf = 0;
cmdo.format = 2;
cmdo.number = first_session;
cmdo.length = B_HOST_TO_BENDIAN_INT16(buffer_length);
cmdo.control = 0;
cmdo.reserved0 = cmdo.reserved1 = cmdo.reserved2 = cmdo.reserved3 = cmdo.reserved4
= cmdo.reserved5 = cmdo.reserved6 = 0;
/* scsi_command->command = 0x43;
scsi_command->msf = msf;
dprintf("format == 0x%lx\n", scsi_command->format);
scsi_command->format = 0x10;//kFullTableOfContentsFormat;
dprintf("format == 0x%lx\n", scsi_command->format);
scsi_command->number = 0;
scsi_command->length = B_HOST_TO_BENDIAN_INT16(buffer_length);
scsi_command->control = 0;
scsi_command->reserved0 = scsi_command->reserved1 = scsi_command->reserved2
= scsi_command->reserved3 = scsi_command->reserved4
= scsi_command->reserved5 = scsi_command->reserved6 = 0;
*/
memcpy(raw_command.command, &cmdo, sizeof(cmdo));
raw_command.command_length = 10;
raw_command.flags = kScsiFlags;
raw_command.scsi_status = 0;
raw_command.cam_status = 0;
raw_command.data = buffer;
raw_command.data_length = buffer_length;
memset(raw_command.data, 0, raw_command.data_length);
raw_command.sense_data = sense_data;
raw_command.sense_data_length = sense_data_length;
memset(raw_command.sense_data, 0, raw_command.sense_data_length);
raw_command.timeout = kScsiTimeout;
dump_scsi_command((uchar*)&raw_command);
if (ioctl(deviceFD, B_RAW_DEVICE_COMMAND, &raw_command) == 0) {
dump_scsi_command((uchar*)&raw_command);
if (raw_command.scsi_status == 0 && raw_command.cam_status == 1) {
// SUCCESS!!!
// dump_full_table_of_contents(buffer, buffer_length);
} else {
error = B_FILE_ERROR;
TRACE(("%s: scsi ioctl succeeded, but scsi command failed\n",
kModuleDebugName));
}
} else {
error = errno;
TRACE(("%s: scsi command failed with error 0x%lx\n", kModuleDebugName,
error));
}
return error;
}
static
void
dump_full_table_of_contents(uchar *data, uint16 data_length)
{
cdrom_table_of_contents_header *header;
cdrom_full_table_of_contents_entry *entries;
int i, count;
header = (cdrom_table_of_contents_header*)data;
entries = (cdrom_full_table_of_contents_entry*)(data+4);
header->length = B_BENDIAN_TO_HOST_INT16(header->length);
if (data_length < header->length) {
TRACE(("dump_full_table_of_contents: warning, data buffer not large enough (%ld < %ld)\n",
data_length, header->length));
header->length = data_length;
}
TRACE(("header:\n"));
TRACE((" length = %d\n", header->length));
TRACE((" first = %d\n", header->first));
TRACE((" last = %d\n", header->last));
count = (header->length-2) / sizeof(cdrom_full_table_of_contents_entry);
TRACE(("\n"));
TRACE(("entry count = %d\n", count));
TRACE(("\n"));
for (i = 0; i < count; i++) {
TRACE(("entry #%d:\n", i));
TRACE((" session = %d\n", entries[i].session));
TRACE((" adr = %d\n", entries[i].adr));
TRACE((" control = %d\n", entries[i].control));
TRACE((" tno = %d\n", entries[i].tno));
TRACE((" point = %d (0x%.2x)\n", entries[i].point, entries[i].point));
TRACE((" minutes = %d\n", entries[i].minutes));
TRACE((" frames = %d\n", entries[i].seconds));
TRACE((" seconds = %d\n", entries[i].frames));
TRACE((" zero = %d\n", entries[i].zero));
TRACE((" pminutes = %d\n", entries[i].pminutes));
TRACE((" pseconds = %d\n", entries[i].pseconds));
TRACE((" pframes = %d\n", entries[i].pframes));
TRACE((" lba = %ld\n", msf_to_lba(make_msf_address(entries[i].pminutes,
entries[i].pseconds, entries[i].pframes))));
TRACE(("\n"));
}
}
// cdrom_get_nth_info
static
status_t
cdrom_session_get_nth_info(int deviceFD, int32 index, off_t deviceSize,
int32 blockSize, struct session_info *sessionInfo)
{
status_t error = sessionInfo && index >= 0 ? B_OK : B_BAD_VALUE;
uchar data[2048];
int32 session = index+1;
off_t start_lba = 0;
off_t end_lba = 0;
TRACE(("%s: get_nth_info(%d, %ld, %lld, %ld, %p)\n", kModuleDebugName,
deviceFD, index, deviceSize, blockSize, sessionInfo));
// As with identify(), this is just a bogus function that
// treats the whole device as a single session.
if (!error) {
error = read_table_of_contents(deviceFD, index+1, data, 2048,
false);
}
if (!error) {
cdrom_table_of_contents_header *header;
cdrom_full_table_of_contents_entry *entries;
int i, count;
int trace = 0;
int first_track = session;
header = (cdrom_table_of_contents_header*)data;
entries = (cdrom_full_table_of_contents_entry*)(data+4);
header->length = B_BENDIAN_TO_HOST_INT16(header->length);
count = (header->length-2) / sizeof(cdrom_full_table_of_contents_entry);
// Check for a valid session index
if (session < header->first || session > header->last)
error = B_ENTRY_NOT_FOUND;
if (!error) {
for (i = 0; i < count; i++) {
switch (entries[i].point) {
case 0xa0:
// PMin holds first track in session
if (entries[i].session == session)
first_track = entries[i].pminutes;
break;
case 0xa2:
// PMSF holds end of session
if (entries[i].session == session) {
end_lba = msf_to_lba(make_msf_address(entries[i].pminutes,
entries[i].pseconds, entries[i].pframes));
trace++;
}
break;
default:
if (entries[i].session == session && entries[i].point == first_track) {
start_lba = msf_to_lba(make_msf_address(entries[i].pminutes,
entries[i].pseconds, entries[i].pframes));
trace++;
}
break;
}
}
if (trace == 2) {
TRACE(("%s: found session #%ld info\n", kModuleDebugName, session));
sessionInfo->offset = start_lba * blockSize;
sessionInfo->size = (end_lba - start_lba) * blockSize;
sessionInfo->logical_block_size = blockSize;
sessionInfo->index = index;
sessionInfo->flags = B_DATA_SESSION; // possibly B_AUDIO_SESSION for audio tracks?
// dump_full_table_of_contents(data);
} else {
dprintf("%s: bad trace: %d\n", kModuleDebugName, trace);
error = B_ENTRY_NOT_FOUND;
}
}
}
if (error)
dprintf("%s: get_nth error 0x%lx\n", kModuleDebugName, error);
return error;
}
static session_module_info cdrom_session_module =
{
// module_info
{
ISO9660_SESSION_MODULE_NAME,
0, // better B_KEEP_LOADED?
std_ops
},
cdrom_session_identify,
cdrom_session_get_nth_info
};
_EXPORT session_module_info *modules[] =
{
&cdrom_session_module,
NULL
};