dockapps/ascd/libworkman/plat_irix.c

457 lines
11 KiB
C
Raw Normal View History

/*
* $Id: plat_irix.c,v 1.6 1999/03/07 08:36:40 dirk Exp $
*
* 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
*
* IRIX specific.
*
* Taken from the kscd distribution
*
* Paul Kendall
* paul@orion.co.nz, or
* paul@kcbbs.gen.nz
*/
#ifdef sgi
static char plat_irix_id[] = "$Id: plat_irix.c,v 1.6 1999/03/07 08:36:40 dirk Exp $";
#include "include/wm_config.h"
/*
* Yes, it was designed for WorkMan 1.4b3
* Because I did start over from 1.3a, I disable it here.
* There is no guarantee of getting working code by defining
* CDDA yourself.
*
*/
#undef CDDA
/*#define CDDA*/
#include <sys/types.h>
#include <sys/time.h>
#include <stdio.h>
#include <ctype.h>
#include <string.h>
#include <fcntl.h>
#include <stdlib.h>
#include <unistd.h>
#include <signal.h>
#include <sigfpe.h>
#include <dmedia/cdaudio.h>
#include <dmedia/audio.h>
#include <errno.h>
#include "include/wm_struct.h"
#define WM_MSG_CLASS WM_MSG_CLASS_PLATFORM
void *malloc();
char *strchr();
int min_volume = 0;
int max_volume = 255;
extern char *cd_device;
#ifdef CDDA
static int playing = STOPPED;
static CDPLAYER *icd;
static CDPARSER *icdp;
static CDFRAME cdbuf[12];
static ALport audioport;
static ALconfig aconfig;
static struct itimerval audiotimer = { {0,0}, {0,25000} };
static int cdtrack=0;
static int cdframe=0;
static int cdstopframe=0;
cbprognum(void *arg, CDDATATYPES type, CDPROGNUM* prognum)
{
cdtrack = prognum->value;
}
cbabstime(void *arg, CDDATATYPES type, struct cdtimecode* atime)
{
cdframe = CDtctoframe(atime);
if( cdframe == cdstopframe )
playing = STOPPED;
}
cbplayaudio(void *arg, CDDATATYPES type, short* audio)
{
if(playing != PLAYING) return;
ALwritesamps(audioport, audio, CDDA_NUMSAMPLES);
}
static void alarmsignal()
{
int n, i;
if(playing != PLAYING) return;
if( ALgetfilled(audioport) < CDDA_NUMSAMPLES*8 ) {
/* Only get more samples and play them if we're getting low
* this ensures that the CD stays close to the sound
*/
n = CDreadda(icd, cdbuf, 12);
if( n == 0 ) return;
for( i=0 ; i<12 ; i++ )
CDparseframe(icdp, &cdbuf[i]);
}
signal(SIGALRM, alarmsignal);
setitimer(ITIMER_REAL, &audiotimer, NULL);
}
#endif
/*--------------------------------------------------------*
* Initialize the drive. A no-op for the generic driver.
*--------------------------------------------------------*/
int
gen_init( struct wm_drive *d )
{
#ifdef CDDA
long Param[4];
/* Set the audio rate to 44100Hz 16bit 2s-comp stereo */
aconfig = ALnewconfig();
ALsetwidth(aconfig, AL_SAMPLE_16);
ALsetsampfmt(aconfig, AL_SAMPFMT_TWOSCOMP);
ALsetchannels(aconfig, 2);
Param[0] = AL_OUTPUT_RATE; Param[1] = AL_RATE_44100;
Param[2] = AL_CHANNEL_MODE; Param[3] = AL_STEREO;
ALsetparams(AL_DEFAULT_DEVICE, Param, 4);
audioport = ALopenport("KDE KSCD Audio", "w", aconfig);
/* setup cdparser */
icdp = CDcreateparser();
CDaddcallback(icdp, cd_audio, (CDCALLBACKFUNC)cbplayaudio, 0);
CDaddcallback(icdp, cd_pnum, (CDCALLBACKFUNC)cbprognum, 0);
CDaddcallback(icdp, cd_atime, (CDCALLBACKFUNC)cbabstime, 0);
/* Lets handle those floating point exceptions expeditiously. */
sigfpe_[_UNDERFL].repls = _ZERO;
handle_sigfpes(_ON, _EN_UNDERFL, NULL, _ABORT_ON_ERROR, NULL);
#endif
return 0;
}
/*-------------------------------------*
* Get the number of tracks on the CD.
*-------------------------------------*/
int
gen_get_trackcount( struct wm_drive *d, int *tracks )
{
CDSTATUS s;
if( CDgetstatus(d->daux, &s)==0 )
return -1;
*tracks = s.last;
return 0;
}
/*---------------------------------------------------------*
* Get the start time and mode (data or audio) of a track.
*---------------------------------------------------------*/
int
gen_get_trackinfo( struct wm_drive *d, int track, int *data, int *startframe)
{
CDTRACKINFO i;
int ret = CDgettrackinfo(d->daux, track, &i);
if( ret == 0 )
return -1;
*data = 0;
*startframe = CDmsftoframe(i.start_min,i.start_sec,i.start_frame);
return 0;
}
/*-------------------------------------*
* Get the number of frames on the CD.
*-------------------------------------*/
int
gen_get_cdlen( struct wm_drive *d, int *frames )
{
CDSTATUS s;
if( CDgetstatus(d->daux, &s)==0 )
return -1;
*frames = CDmsftoframe(s.total_min,s.total_sec,s.total_frame);
return 0;
}
/*--------------------------------------------------------------------------*
* Get the current status of the drive: the current play mode, the absolute
* position from start of disc (in frames), and the current track and index
* numbers if the CD is playing or paused.
*--------------------------------------------------------------------------*/
int
gen_get_drive_status( struct wm_drive *d, enum wm_cd_modes oldmode,
enum wm_cd_modes *mode, int *pos, int *track,
int *index )
{
#ifdef CDDA
*mode = playing;
*track = cdtrack;
*pos = cdframe;
*index = 0;
#else
CDSTATUS s;
if( CDgetstatus(d->daux, &s)==0 )
return -1;
*pos = CDmsftoframe(s.min,s.sec,s.frame);
*track = s.track;
*index = 0;
switch( s.state )
{
case CD_READY: *mode = WM_CDM_STOPPED;
break;
case CD_STILL:
case CD_PAUSED: *mode = WM_CDM_PAUSED;
break;
case CD_PLAYING: *mode = WM_CDM_PLAYING;
break;
default: *mode = WM_CDM_UNKNOWN;
}
#endif
return 0;
}
/*---------------------------------------------------------------------*
* Set the volume level for the left and right channels. Their values
* range from 0 to 100.
*---------------------------------------------------------------------*/
int
gen_set_volume( struct wm_drive *d, int left, int right )
{
long Param[4];
Param[0] = AL_LEFT_SPEAKER_GAIN; Param[1] = left*255/100;
Param[2] = AL_RIGHT_SPEAKER_GAIN; Param[3] = right*255/100;
ALsetparams(AL_DEFAULT_DEVICE, Param, 4);
return 0;
}
/*---------------------------------------------------------------------*
* Read the initial volume from the drive, if available. Each channel
* ranges from 0 to 100, with -1 indicating data not available.
*---------------------------------------------------------------------*/
int
gen_get_volume( struct wm_drive *d, int *left, int *right )
{
long Param[4];
Param[0] = AL_LEFT_SPEAKER_GAIN; Param[1] = 0;
Param[2] = AL_RIGHT_SPEAKER_GAIN; Param[3] = 0;
ALgetparams(AL_DEFAULT_DEVICE, Param, 4);
*left = Param[1] * 100 / 255;
*right = Param[3] * 100 / 255;
return 0;
}
/*---------------*
* Pause the CD.
*---------------*/
int
gen_pause( struct wm_drive *d )
{
#ifdef CDDA
playing = WM_CDM_PAUSED;
#else
CDSTATUS s;
if( CDgetstatus(d->daux, &s)==0 )
return -1;
if(s.state == CD_PLAYING)
CDtogglepause(d->daux);
#endif
return 0;
}
/*-------------------------------------------------*
* Resume playing the CD (assuming it was paused.)
*-------------------------------------------------*/
int
gen_resume( struct wm_drive *d )
{
#ifdef CDDA
playing = WM_CDM_PLAYING;
signal(SIGALRM, alarmsignal);
setitimer(ITIMER_REAL, &audiotimer, NULL);
#else
CDSTATUS s;
if( CDgetstatus(d->daux, &s)==0 )
return -1;
if(s.state == CD_PAUSED)
CDtogglepause(d->daux);
#endif
return 0;
}
/*--------------*
* Stop the CD.
*--------------*/
int
gen_stop( struct wm_drive *d )
{
#ifdef CDDA
playing = WM_CDM_STOPPED;
#else
CDstop(d->daux);
#endif
return 0;
}
/*------------------------------------------------------------*
* Play the CD from one position to another (both in frames.)
*------------------------------------------------------------*/
int
gen_play( struct wm_drive *d, int start, int end )
{
#ifdef CDDA
int m, s, f;
CDframetomsf(start, &m, &s, &f);
CDseek(icd, m, s, f);
cdstopframe = end;
playing = PLAYING;
signal(SIGALRM, alarmsignal);
setitimer(ITIMER_REAL, &audiotimer, NULL);
#else
int m, s, f;
CDframetomsf(start, &m, &s, &f);
CDplayabs(d->daux, m, s, f, 1);
#endif
return 0;
}
/*----------------------------------------*
* Eject the current CD, if there is one.
*----------------------------------------*/
int
gen_eject( struct wm_drive *d )
{
#ifdef CDDA
playing = WM_CDM_STOPPED;
#endif
CDeject(d->daux);
return 0;
}
/*----------------------------------------*
* Close the CD tray
*
* Please edit and send changes to
* milliByte@Deathsdoor.com
*----------------------------------------*/
int gen_closetray(struct wm_drive *d)
{
#ifdef CAN_CLOSE
if(!close(d->fd))
{
d->fd=-1;
return(wmcd_reopen(d));
} else {
return(-1);
}
#else
/* Always succeed if the drive can't close */
return(0);
#endif /* CAN_CLOSE */
} /* gen_closetray() */
/*-------------------------------------------------------------*
* Open the CD and figure out which kind of drive is attached.
*-------------------------------------------------------------*/
int
wmcd_open( struct wm_drive *d )
{
int fd;
CDSTATUS s;
if (d->fd < 0) /* Device already open? */
{
if (cd_device == NULL)
cd_device = DEFAULT_CD_DEVICE;
d->fd = 1;
/* Now fill in the relevant parts of the wm_drive structure. */
fd = d->fd;
*d = *(find_drive_struct("", "", ""));
d->fd = fd;
(d->init)(d);
d->daux = CDopen(cd_device,"r");
if (d->daux == 0)
{
perror(cd_device);
exit(1);
}
#ifdef CDDA
icd = d->daux;
#endif
}
CDgetstatus(d->daux, &s);
if( s.state==CD_NODISC || s.state==CD_ERROR )
return 1;
return (0);
} /* wmcd_open() */
/*
* Re-Open the device if it is open.
*/
int
wmcd_reopen( struct wm_drive *d )
{
int status;
do {
wm_lib_message(WM_MSG_LEVEL_DEBUG|WM_MSG_CLASS, "wmcd_reopen ");
if (d->fd >= 0) /* Device really open? */
{
wm_lib_message(WM_MSG_LEVEL_DEBUG|WM_MSG_CLASS, "closes the device and ");
status = close( d->fd ); /* close it! */
/* we know, that the file is closed, do we? */
d->fd = -1;
}
wm_susleep( 1000 );
wm_lib_message(WM_MSG_LEVEL_DEBUG|WM_MSG_CLASS, "calls wmcd_open()\n");
status = wmcd_open( d ); /* open it as usual */
wm_susleep( 1000 );
} while ( status != 0 );
return status;
} /* wmcd_reopen() */
/*----------------------------------*
* Send a SCSI command out the bus.
*----------------------------------*/
int
wm_scsi(d, xcdb, cdblen, retbuf, retbuflen, getreply)
struct wm_drive *d;
unsigned char *xcdb;
int cdblen;
int getreply;
char *retbuf;
int retbuflen;
{
return -1;
}
#endif