/* Test the SDL CD-ROM audio functions */

#include <stdlib.h>

#include <stdio.h>

#include <string.h>

#include <ctype.h>

#include "SDL.h"

/* Call this instead of exit(), so we can clean up SDL: atexit() is evil. */

static void quit(int rc)

{

	SDL_Quit();

	exit(rc);

}

static void PrintStatus(int driveindex, SDL_CD *cdrom)

{

	CDstatus status;

	char *status_str;

	status = SDL_CDStatus(cdrom);

	switch (status) {

		case CD_TRAYEMPTY:

			status_str = "tray empty";

			break;

		case CD_STOPPED:

			status_str = "stopped";

			break;

		case CD_PLAYING:

			status_str = "playing";

			break;

		case CD_PAUSED:

			status_str = "paused";

			break;

		case CD_ERROR:

			status_str = "error state";

			break;

	}

	printf("Drive %d status: %s\n", driveindex, status_str);

	if ( status >= CD_PLAYING ) {

		int m, s, f;

		FRAMES_TO_MSF(cdrom->cur_frame, &m, &s, &f);

		printf("Currently playing track %d, %d:%2.2d\n",

			cdrom->track[cdrom->cur_track].id, m, s);

	}

}

static void ListTracks(SDL_CD *cdrom)

{

	int i;

	int m, s, f;

	char* trtype;

	SDL_CDStatus(cdrom);

	printf("Drive tracks: %d\n", cdrom->numtracks);

	for ( i=0; i<cdrom->numtracks; ++i ) {

		FRAMES_TO_MSF(cdrom->track[i].length, &m, &s, &f);

		if ( f > 0 )

			++s;

		switch(cdrom->track[i].type)

		{

		    case SDL_AUDIO_TRACK:

			trtype="audio";

			break;

		    case SDL_DATA_TRACK:

			trtype="data";

			break;

		    default:

			trtype="unknown";

			break;

		}

		printf("\tTrack (index %d) %d: %d:%2.2d / %d [%s track]\n", i,

					cdrom->track[i].id, m, s, cdrom->track[i].length, trtype);

	}

}

static void PrintUsage(char *argv0)

{

	fprintf(stderr, "Usage: %s [drive#] [command] [command] ...\n", argv0);

	fprintf(stderr, "Where 'command' is one of:\n");

	fprintf(stderr, "	-status\n");

	fprintf(stderr, "	-list\n");

	fprintf(stderr, "	-play [first_track] [first_frame] [num_tracks] [num_frames]\n");

	fprintf(stderr, "	-pause\n");

	fprintf(stderr, "	-resume\n");

	fprintf(stderr, "	-stop\n");

	fprintf(stderr, "	-eject\n");

	fprintf(stderr, "	-sleep <milliseconds>\n");

}

int main(int argc, char *argv[])

{

	int drive;

	int i;

	SDL_CD *cdrom;

	/* Initialize SDL first */

	if ( SDL_Init(SDL_INIT_CDROM) < 0 ) {

		fprintf(stderr, "Couldn't initialize SDL: %s\n",SDL_GetError());

		return(1);

	}

	/* Find out how many CD-ROM drives are connected to the system */

	if ( SDL_CDNumDrives() == 0 ) {

		printf("No CD-ROM devices detected\n");

		quit(0);

	}

	printf("Drives available: %d\n", SDL_CDNumDrives());

	for ( i=0; i<SDL_CDNumDrives(); ++i ) {

		printf("Drive %d:  \"%s\"\n", i, SDL_CDName(i));

	}

	/* Open the CD-ROM */

	drive = 0;

	i=1;

	if ( argv[i] && isdigit(argv[i][0]) ) {

		drive = atoi(argv[i++]);

	}

	cdrom = SDL_CDOpen(drive);

	if ( cdrom == NULL ) {

		fprintf(stderr, "Couldn't open drive %d: %s\n", drive,

							SDL_GetError());

		quit(2);

	}

#ifdef TEST_NULLCD

	cdrom = NULL;

#endif

	/* Find out which function to perform */

	for ( ; argv[i]; ++i ) {

		if ( strcmp(argv[i], "-status") == 0 ) {

			/* PrintStatus(drive, cdrom); */

		} else

		if ( strcmp(argv[i], "-list") == 0 ) {

			ListTracks(cdrom);

		} else

		if ( strcmp(argv[i], "-play") == 0 ) {

			int strack, sframe;

			int ntrack, nframe;

			strack = 0;

			if ( argv[i+1] && isdigit(argv[i+1][0]) ) {

				strack = atoi(argv[++i]);

			}

			sframe = 0;

			if ( argv[i+1] && isdigit(argv[i+1][0]) ) {

				sframe = atoi(argv[++i]);

			}

			ntrack = 0;

			if ( argv[i+1] && isdigit(argv[i+1][0]) ) {

				ntrack = atoi(argv[++i]);

			}

			nframe = 0;

			if ( argv[i+1] && isdigit(argv[i+1][0]) ) {

				nframe = atoi(argv[++i]);

			}

			if ( CD_INDRIVE(SDL_CDStatus(cdrom)) ) {

				if ( SDL_CDPlayTracks(cdrom, strack, sframe,

							ntrack, nframe) < 0 ) {

					fprintf(stderr,

			"Couldn't play tracks %d/%d for %d/%d: %s\n",

				strack, sframe, ntrack, nframe, SDL_GetError());

				}

			} else {

				fprintf(stderr, "No CD in drive!\n");

			}

		} else

		if ( strcmp(argv[i], "-pause") == 0 ) {

			if ( SDL_CDPause(cdrom) < 0 ) {

				fprintf(stderr, "Couldn't pause CD: %s\n",

								SDL_GetError());

			}

		} else

		if ( strcmp(argv[i], "-resume") == 0 ) {

			if ( SDL_CDResume(cdrom) < 0 ) {

				fprintf(stderr, "Couldn't resume CD: %s\n",

								SDL_GetError());

			}

		} else

		if ( strcmp(argv[i], "-stop") == 0 ) {

			if ( SDL_CDStop(cdrom) < 0 ) {

				fprintf(stderr, "Couldn't eject CD: %s\n",

								SDL_GetError());

			}

		} else

		if ( strcmp(argv[i], "-eject") == 0 ) {

			if ( SDL_CDEject(cdrom) < 0 ) {

				fprintf(stderr, "Couldn't eject CD: %s\n",

								SDL_GetError());

			}

		} else

		if ( (strcmp(argv[i], "-sleep") == 0) &&

				(argv[i+1] && isdigit(argv[i+1][0])) ) {

			SDL_Delay(atoi(argv[++i]));

			printf("Delayed %d milliseconds\n", atoi(argv[i]));

		} else {

			PrintUsage(argv[0]);

			SDL_CDClose(cdrom);

			quit(1);

		}

	}

	PrintStatus(drive, cdrom);

	SDL_CDClose(cdrom);

	SDL_Quit();

	return(0);

}