You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdemultimedia/kscd/libwm/plat_sun_cdda.c

381 lines
9.2 KiB

/*
* $Id$
*
* This file is part of WorkMan, the civilized CD player library
* (c) 1991-1997 by Steven Grimm (original author)
* (c) by Dirk F<EFBFBD>rsterling (current 'author' = maintainer)
* The maintainer can be contacted by his e-mail address:
* milliByte@DeathsDoor.com
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Library General Public
* License as published by the Free Software Foundation; either
* version 2 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Library General Public License for more details.
*
* You should have received a copy of the GNU Library General Public
* License along with this library; if not, write to the Free
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*
*
* Sun (really Solaris) CDDA functions.
*/
#include "include/wm_cdda.h"
#if defined(sun) || defined(__sun__) && defined(SYSV) && defined(BUILD_CDDA)
#include "include/wm_struct.h"
#include "include/wm_cdda.h"
/* types.h and cdio.h are included by wm_cdda.h */
#include <stdio.h>
#include <math.h>
#include <sys/ioctl.h>
#include <malloc.h>
#include <errno.h>
#define WM_MSG_CLASS WM_MSG_CLASS_PLATFORM
#define CDDABLKSIZE 2368
#define SAMPLES_PER_BLK 588
/* Address of next block to read. */
int current_position = 0;
/* Address of first and last blocks to read. */
int starting_position = 0;
int ending_position = 0;
/* Playback direction. */
int direction = 1;
/* Number of blocks to read at once; initialize to the maximum. */
/* (was 30. Set to 15 for INTeL. Maybe config option? */
int numblocks = 15;
/*
* This is the fastest way to convert from BCD to 8-bit.
*/
unsigned char unbcd[256] = {
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0,0,0,0,0,0,
10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 0,0,0,0,0,0,
20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 0,0,0,0,0,0,
30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 0,0,0,0,0,0,
40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 0,0,0,0,0,0,
50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 0,0,0,0,0,0,
60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 0,0,0,0,0,0,
70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 0,0,0,0,0,0,
80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 0,0,0,0,0,0,
90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
};
static long wmcdda_normalize(struct cdda_block *block);
/*
* Initialize the CDDA data buffer and open the appropriate device.
*
* NOTE: We allocate twice as much space as we need to actually read a block;
* this lets us do audio manipulations without bothering to malloc a second
* buffer.
*
* Also, test to see if we can actually *do* CDDA on this drive; if not, we
* need to exit right away so the UI doesn't show the user any CDDA controls.
*/
int
wmcdda_init(struct cdda_device* pdev, struct cdda_block *block)
{
struct cdrom_cdda cdda;
int i;
if (pdev->fd > -1)
return -1;
for (i = 0; i < pdev->numblocks; i++) {
/* in Linux const */
pdev->blocks[i].buflen = pdev->frames_at_once * CDDABLKSIZE;
pdev->blocks[i].buf = malloc(pdev->blocks[i].buflen);
if (!pdev->blocks[i].buf)
return -ENOMEM;
}
pdev->fd = open(pdev->devname, 0);
if (pdev->fd == -1)
pdev->fd = open("/dev/rdsk/c0t6d0s2", 0);
if (pdev->fd > -1)
{
cdda.cdda_addr = 200;
cdda.cdda_length = 1;
cdda.cdda_data = pdev->blocks[0].buf;
cdda.cdda_subcode = CDROM_DA_SUBQ;
if (ioctl(pdev->fd, CDROMCDDA, &cdda) < 0)
{
block->status = WM_CDM_STOPPED;
return -1;
} else {
block->status = WM_CDM_STOPPED;
return 0;
}
} else {
block->status = WM_CDM_EJECTED;
return -1;
}
}
/*
* Close the CD-ROM device in preparation for exiting.
*/
int
wmcdda_close(struct cdda_device* pdev)
{
int i;
if(-1 == pdev->fd)
return -1;
close(pdev->fd);
pdev->fd = -1;
for (i = 0; i < pdev->numblocks; i++) {
free(pdev->blocks[i].buf);
pdev->blocks[i].buf = 0;
pdev->blocks[i].buflen = 0;
}
return 0;
}
/*
* Set up for playing the CD. Actually this doesn't play a thing, just sets a
* couple variables so we'll know what to do when we're called.
*/
int
wmcdda_setup(int start, int end, int realstart)
{
current_position = start - 150;
ending_position = end - 150;
starting_position = realstart - 150;
/*
* Special case: don't start at the "end" of a track if we're
* playing backwards!
*/
if (direction == -1 && start == realstart)
current_position = ending_position - numblocks;
return 0;
}
/*
* Read some blocks from the CD. Stop if we hit the end of the current region.
*
* Returns number of bytes read, -1 on error, 0 if stopped for a benign reason.
*/
long
wmcdda_read(struct cdda_device* pdev, struct cdda_block *block)
{
struct cdrom_cdda cdda;
int blk;
unsigned char *q;
extern int speed;
unsigned char* rawbuf = block->buf;
if(pdev->fd < 0 && (wmcdda_init(pdev, block) < 0)) {
return -1;
}
/*
* Hit the end of the CD, probably.
*/
if ((direction > 0 && current_position >= ending_position) ||
(direction < 0 && current_position < starting_position))
{
block->status = WM_CDM_TRACK_DONE;
return (0);
}
cdda.cdda_addr = current_position;
if (ending_position && current_position + pdev->frames_at_once > ending_position)
cdda.cdda_length = ending_position - current_position;
else
cdda.cdda_length = pdev->frames_at_once;
cdda.cdda_data = (unsigned char*)block->buf;
cdda.cdda_subcode = CDROM_DA_SUBQ;
if (ioctl(pdev->fd, CDROMCDDA, &cdda) < 0)
{
if (errno == ENXIO) /* CD ejected! */
{
block->status = WM_CDM_EJECTED;
return (-1);
}
/* Sometimes it fails once, dunno why */
if (ioctl(pdev->fd, CDROMCDDA, &cdda) < 0)
{
if (ioctl(pdev->fd, CDROMCDDA, &cdda) < 0)
{
if (ioctl(pdev->fd, CDROMCDDA, &cdda) < 0)
{
perror("CDROMCDDA");
block->status = WM_CDM_CDDAERROR;
return (-1);
}
}
}
}
if (speed > 148)
{
/*
* We want speed=148 to advance by cdda_length, but
* speed=256 to advance cdda_length * 4.
*/
current_position = current_position +
(cdda.cdda_length * direction * (speed - 112)) / 36;
}
else
current_position = current_position + cdda.cdda_length * direction;
for (blk = 0; blk < numblocks; blk++)
{
/*
* New valid Q-subchannel information? Update the block
* status.
*/
q = &rawbuf[blk * CDDABLKSIZE + SAMPLES_PER_BLK * 4];
if (*q == 1)
{
block->track = unbcd[q[1]];
block->index = unbcd[q[2]];
/*block->minute = unbcd[q[7]];
block->second = unbcd[q[8]];*/
block->frame = unbcd[q[9]];
block->status = WM_CDM_PLAYING;
block->buflen = cdda.cdda_length;
}
}
return wmcdda_normalize(block);
}
/*
* Normalize a bunch of CDDA data. Basically this means ripping out the
* Q subchannel data and doing byte-swapping, since the CD audio is in
* littleendian format.
*
* Scanning is handled here too.
*
* XXX - do byte swapping on Intel boxes?
*/
long
wmcdda_normalize(struct cdda_block *block)
{
int i, nextq;
long buflen = block->buflen;
int blocks = buflen / CDDABLKSIZE;
unsigned char *rawbuf = block->buf;
unsigned char *dest = rawbuf;
unsigned char tmp;
long *buf32 = (long *)rawbuf, tmp32;
/*
* this was #ifndef LITTLEENDIAN
* in wmcdda it was called LITTLE_ENDIAN. Was this a flaw?
*/
#if WM_BIG_ENDIAN
if (blocks--)
for (i = 0; i < SAMPLES_PER_BLK * 2; i++)
{
/* Only need to use temp buffer on first block. */
tmp = *rawbuf++;
*dest++ = *rawbuf++;
*dest++ = tmp;
}
#endif
while (blocks--)
{
/* Skip over Q data. */
rawbuf += 16;
for (i = 0; i < SAMPLES_PER_BLK * 2; i++)
{
#if WM_LITTLE_ENDIAN
*dest++ = *rawbuf++;
*dest++ = *rawbuf++;
#else
*dest++ = rawbuf[1];
*dest++ = rawbuf[0];
rawbuf += 2;
#endif
}
}
buflen -= ((buflen / CDDABLKSIZE) * 16);
/*
* Reverse the data here if we're playing backwards.
* XXX - ideally this should be done above.
*/
if (direction < 0)
{
buflen /= 4; /* we can move 32 bits at a time. */
for (i = 0; i < buflen / 2; i++)
{
tmp32 = buf32[i];
buf32[i] = buf32[buflen - i - 1];
buf32[buflen - i - 1] = tmp32;
}
buflen *= 4;
}
return (buflen);
}
/*
* Set the playback direction.
*/
void
wmcdda_direction(int newdir)
{
if (newdir == 0)
{
numblocks = 20;
direction = 1;
}
else
{
numblocks = 30;
direction = -1;
}
}
/*
* Do system-specific stuff to get ready to play at a particular speed.
*/
void
wmcdda_speed(int speed)
{
if (speed > 128)
numblocks = 12;
else
numblocks = direction > 0 ? 20 : 30;
}
#endif /* } */