msdos/cdrom.c - wine - Git at Google


 /*
  *  Cdrom - device driver emulation - Audio features.
  *  (c) 1998 Petr Tomasek <tomasek@etf.cuni.cz>
  *
  */

 #ifdef linux

 #include "config.h"
 #include <fcntl.h>
 #include <sys/ioctl.h>
 #include <sys/types.h>
 /* FIXME - how to make this OS independent ?? */
 #ifdef HAVE_LINUX_CDROM_H
 # include <linux/cdrom.h>
 #endif
 #ifdef HAVE_LINUX_UCDROM_H
 # include <linux/ucdrom.h>
 #endif

 #include "ldt.h"
 #include "drive.h"
 #include "msdos.h"
 #include "miscemu.h"
 #include "module.h"
 #include "debug.h"


 /*  FIXME - more general ?? */
 #define cdrom_dev "/dev/cdrom"

 u_char cdrom_a_status (int fd)
 {
 struct cdrom_subchnl sc;

 ioctl(fd,CDROMSUBCHNL,&sc);
 return sc.cdsc_audiostatus;
 }

 BYTE * get_io_stru (WORD * reqh,int dorealmode)
 {
 WORD ofst,segm;
 BYTE * io_stru;
 ofst = reqh[7]; segm = reqh[8];

 if (dorealmode)
   io_stru = DOSMEM_MapRealToLinear (MAKELONG(ofst,segm));
 else
   io_stru = PTR_SEG_OFF_TO_LIN(segm,ofst);

 return io_stru;
 }

 DWORD msf0_to_abs (struct cdrom_msf0 msf)
 {
 return  (msf.minute *60 +
         msf.second) *75 +
         msf.frame-150;
 }

 void abs_to_msf0 (DWORD abs, struct cdrom_msf0 * msf)
 {
 DWORD d;
 d=abs+150;
 msf->frame=d%75;  d=d/75;
 msf->second=d%60; msf->minute=d/60;
 }

 void msf0_to_msf (struct cdrom_msf0 from, struct cdrom_msf0 to, struct cdrom_msf * msf)
 {
 msf->cdmsf_min0=from.minute;
 msf->cdmsf_min1=to.minute;
 msf->cdmsf_sec0=from.second;
 msf->cdmsf_sec1=to.second;
 msf->cdmsf_frame0=from.frame;
 msf->cdmsf_frame1=to.frame;
 }

 void abs_to_msf (DWORD from, DWORD to, struct cdrom_msf * msf)
 {
 struct cdrom_msf0 fr,tt;
 abs_to_msf0(from, &fr);
 abs_to_msf0(to, &tt);
 msf0_to_msf(fr,tt,msf);
 }

 /************************************************************
  *
  *   Cdrom ms-dos driver emulation.
  *    (accesible throught the MSCDEX 0x10 function.)
  */

 extern void do_mscdex_dd (CONTEXT * context, int dorealmode)
  {
  BYTE * driver_request;
  BYTE * io_stru;
  static int fdcd=-1; /* file descriptor.. */
  struct cdrom_tochdr tochdr; /* the Toc header */
  struct cdrom_tocentry tocentry; /* a Toc entry */
  struct cdrom_msf msf;
  struct cdrom_subchnl subchnl;
  u_char Error=255; /*No Error */

 if (dorealmode)
   driver_request=DOSMEM_MapRealToLinear
                         (MAKELONG(BX_reg(context),ES_reg(context)));
 else
   driver_request=PTR_SEG_OFF_TO_LIN(ES_reg(context),BX_reg(context));

 if (!driver_request)
      {             /* FIXME - to be deleted ?? */
 	ERR(int,"   ES:BX==0 ! SEGFAULT ?\n");
 	ERR(int," -->BX=0x%04x, ES=0x%04lx, DS=0x%04lx, CX=0x%04x\n\n",
 		BX_reg(context),
 		ES_reg(context),
 		DS_reg(context),
 		CX_reg(context));
      }
 else

 /* FIXME - would be best to open the device at the begining of the wine
    session .... */
  if (fdcd<0) fdcd=open(cdrom_dev,O_RDONLY);

    TRACE(int,"CDROM device driver -> command <%d>\n",
          (unsigned char)driver_request[2]);

 /* set status to 0 */
  driver_request[3]=0;
  driver_request[4]=0;


  switch(driver_request[2])
  {
  case 3:
    io_stru=get_io_stru((WORD *)driver_request,dorealmode);
    FIXME(int," --> IOCTL INPUT <%d>\n",io_stru[0]);
    switch (io_stru[0])
 	{
 	case 1: /* location of head */
 	 if (io_stru[1]==0)
           {
           ioctl(fdcd,CDROMSUBCHNL,&subchnl);
 	((DWORD*)io_stru+2)[0]=(DWORD)msf0_to_abs(subchnl.cdsc_absaddr.msf);
          FIXME(int," ----> HEAD LOCATION <%ld>\n\n",
                                 ((DWORD *)io_stru+2)[0]);
 	  }
          else
      	  {
  	 ERR(int,"CDRom-Driver: Unsupported address mode !!\n");
    	 Error=0x0c;
     	  }
 	 break;

 	case 6: /* device status */
               /* FIXME .. does this work properly ?? */
 	 io_stru[3]=io_stru[4]=0;
 	 io_stru[2]=1; /* supports audio channels (?? FIXME ??) */
 	 io_stru[1]=16; /* data read and plays audio racks */
 #if defined(CDROM_DRIVE_STATUS) && defined(CDS_TRAY_OPEN)
 	 io_stru[1]|=(ioctl(fdcd,CDROM_DRIVE_STATUS,0)==CDS_TRAY_OPEN);
 #endif
          TRACE(int," ----> DEVICE STATUS <0x%08lx>\n\n",(DWORD)io_stru[1]);
 	 break;

 	case 9: /* media changed ? */
 #ifdef CDROM_MEDIA_CHANGED
 	 if (ioctl(fdcd,CDROM_MEDIA_CHANGED,0))
           io_stru[1]=0xff;
          else
 #endif
 	  io_stru[0]=0; /* FIXME? 1? */
 	 break;

 	case 10: /* audio disk info */
          ioctl(fdcd,CDROMREADTOCHDR,&tochdr);
 	 io_stru[1]=tochdr.cdth_trk0; /* staring track of the disc */
 	 io_stru[2]=tochdr.cdth_trk1; /* ending track */
          tocentry.cdte_track=CDROM_LEADOUT; /* Now the leadout track ...*/
          tocentry.cdte_format=CDROM_MSF;
          ioctl(fdcd,CDROMREADTOCENTRY,&tocentry); /* ... get position of it */
 	 ((DWORD*)io_stru+3)[0]=(DWORD)msf0_to_abs(tocentry.cdte_addr.msf);
          TRACE(int," ----> AUDIO DISK INFO <%d-%d/%ld>\n\n",
 				io_stru[1],io_stru[2],
                                 ((DWORD *)io_stru+3)[0]);
 	 break;


 	case 11: /* audio track info */
 	 tocentry.cdte_track=io_stru[1]; /* track of the disc */
          tocentry.cdte_format=CDROM_MSF;
          ioctl(fdcd,CDROMREADTOCENTRY,&tocentry);
 	 ((DWORD*)io_stru+2)[0]=(DWORD)msf0_to_abs(tocentry.cdte_addr.msf);
                         /* starting point if the track */
          io_stru[6]=tocentry.cdte_adr+16*tocentry.cdte_ctrl;
          TRACE(int," ----> AUDIO TRACK INFO <track=%d>[%ld] \n\n",
                          io_stru[1],((DWORD *)io_stru+2)[0]);
 	 break;

 	case 12: /* get Q-Channel / Subchannel (??) info */
 	 subchnl.cdsc_format=CDROM_MSF;
 	 ioctl(fdcd,CDROMSUBCHNL,&subchnl);
 	 io_stru[1]=subchnl.cdsc_adr+16*subchnl.cdsc_ctrl;
 	 io_stru[2]=subchnl.cdsc_trk;
 	 io_stru[3]=subchnl.cdsc_ind; /* FIXME - ?? */
 	 io_stru[4]=subchnl.cdsc_reladdr.msf.minute;
 	 io_stru[5]=subchnl.cdsc_reladdr.msf.second;
 	 io_stru[6]=subchnl.cdsc_reladdr.msf.frame;
 	 io_stru[7]=0; /* always zero */
 	 io_stru[8]=subchnl.cdsc_absaddr.msf.minute;
 	 io_stru[9]=subchnl.cdsc_absaddr.msf.second;
 	 io_stru[10]=subchnl.cdsc_absaddr.msf.frame;
 	 break;

 	case 15: /* fixme !!!!!!! just a small workaround ! */
 	 /* !!!! FIXME FIXME FIXME !! */
          tocentry.cdte_track=CDROM_LEADOUT; /* Now the leadout track ...*/
          tocentry.cdte_format=CDROM_MSF;
          ioctl(fdcd,CDROMREADTOCENTRY,&tocentry); /* ... get position of it */
 	 ((DWORD*)io_stru+7)[0]=(DWORD)msf0_to_abs(tocentry.cdte_addr.msf);
  	break;

 	default:
          FIXME(int," Cdrom-driver: IOCTL INPUT: Unimplemented <%d>!! \n",
                                                              io_stru[0]);
 	 Error=0x0c;
 	 break;
 	}
    break;

  case 12:
    io_stru=get_io_stru((WORD *)driver_request,dorealmode);
    TRACE(int," --> IOCTL OUTPUT <%d>\n",io_stru[0]);
    switch (io_stru[0])
 	{
 	case 0: /* eject */
 	 ioctl (fdcd,CDROMEJECT);
          TRACE(int," ----> EJECT \n\n");
 	 break;
 	case 5: /* close tray */
 	 ioctl (fdcd,CDROMCLOSETRAY);
          TRACE(int," ----> CLOSE TRAY \n\n");
 	 break;
 	case 2: /* reset drive */
 	 ioctl (fdcd,CDROMRESET);
          TRACE(int," ----> RESET \n\n");
 	 break;
 	default:
          FIXME(int," Cdrom-driver: IOCTL OUPUT: Unimplemented <%d>!! \n",
                                                              io_stru[0]);
 	 Error=0x0c;
 	 break;
 	}
    break;

 case 133:
    if (cdrom_a_status(fdcd)==CDROM_AUDIO_PLAY)
      {
      ioctl (fdcd,CDROMPAUSE);
      TRACE(int," --> STOP AUDIO (Paused)\n\n");
      }
    else
      {
      ioctl (fdcd,CDROMSTOP);
      TRACE(int," --> STOP AUDIO (Stopped)\n\n");
      }
    break;

  case 132:  /* FIXME - It didn't function for me... */
    FIXME(int," --> PLAY AUDIO \n");
      ioctl (fdcd,CDROMSTART);
    FIXME(int,"Mode :<0x%02X> , [%ld-%ld]\n\n",
           (unsigned char)driver_request[13],
           ((DWORD*)driver_request+14)[0],
           ((DWORD*)driver_request+18)[0]);
    if (driver_request[13]==0)
      {
     abs_to_msf(((DWORD*)driver_request+14)[0],
                ((DWORD*)driver_request+18)[0],&msf);
     ioctl(fdcd,CDROMPLAYMSF,&msf);
      }
    else
      {
     ERR(int,"CDRom-Driver: Unsupported address mode !!\n");
     Error=0x0c;
      }
    break;
  case 136:
    TRACE(int," --> RESUME AUDIO \n\n");
    ioctl(fdcd,CDROMRESUME);
    break;
  default:
    FIXME(int," CDRom-Driver - ioctl uninplemented <%d>\n",driver_request[2]);
    Error=0x0c;

  }

 if (Error<255)
  {
  driver_request[4]|=127;
  driver_request[3]=Error;
  }
  driver_request[4]|=2*(cdrom_a_status(fdcd)==CDROM_AUDIO_PLAY);

 /*  close (fdcd); FIXME !! -- cannot use close when ejecting
     the cd-rom - close would close it again */
 }

 #endif

	/*
	* Cdrom - device driver emulation - Audio features.
	* (c) 1998 Petr Tomasek <tomasek@etf.cuni.cz>
	*
	*/

	#ifdef linux

	#include "config.h"
	#include <fcntl.h>
	#include <sys/ioctl.h>
	#include <sys/types.h>
	/* FIXME - how to make this OS independent ?? */
	#ifdef HAVE_LINUX_CDROM_H
	# include <linux/cdrom.h>
	#endif
	#ifdef HAVE_LINUX_UCDROM_H
	# include <linux/ucdrom.h>
	#endif

	#include "ldt.h"
	#include "drive.h"
	#include "msdos.h"
	#include "miscemu.h"
	#include "module.h"
	#include "debug.h"


	/* FIXME - more general ?? */
	#define cdrom_dev "/dev/cdrom"

	u_char cdrom_a_status (int fd)
	{
	struct cdrom_subchnl sc;

	ioctl(fd,CDROMSUBCHNL,&sc);
	return sc.cdsc_audiostatus;
	}

	BYTE * get_io_stru (WORD * reqh,int dorealmode)
	{
	WORD ofst,segm;
	BYTE * io_stru;
	ofst = reqh[7]; segm = reqh[8];

	if (dorealmode)
	io_stru = DOSMEM_MapRealToLinear (MAKELONG(ofst,segm));
	else
	io_stru = PTR_SEG_OFF_TO_LIN(segm,ofst);

	return io_stru;
	}

	DWORD msf0_to_abs (struct cdrom_msf0 msf)
	{
	return (msf.minute *60 +
	msf.second) *75 +
	msf.frame-150;
	}

	void abs_to_msf0 (DWORD abs, struct cdrom_msf0 * msf)
	{
	DWORD d;
	d=abs+150;
	msf->frame=d%75; d=d/75;
	msf->second=d%60; msf->minute=d/60;
	}

	void msf0_to_msf (struct cdrom_msf0 from, struct cdrom_msf0 to, struct cdrom_msf * msf)
	{
	msf->cdmsf_min0=from.minute;
	msf->cdmsf_min1=to.minute;
	msf->cdmsf_sec0=from.second;
	msf->cdmsf_sec1=to.second;
	msf->cdmsf_frame0=from.frame;
	msf->cdmsf_frame1=to.frame;
	}

	void abs_to_msf (DWORD from, DWORD to, struct cdrom_msf * msf)
	{
	struct cdrom_msf0 fr,tt;
	abs_to_msf0(from, &fr);
	abs_to_msf0(to, &tt);
	msf0_to_msf(fr,tt,msf);
	}

	/************************************************************
	*
	* Cdrom ms-dos driver emulation.
	* (accesible throught the MSCDEX 0x10 function.)
	*/

	extern void do_mscdex_dd (CONTEXT * context, int dorealmode)
	{
	BYTE * driver_request;
	BYTE * io_stru;
	static int fdcd=-1; /* file descriptor.. */
	struct cdrom_tochdr tochdr; /* the Toc header */
	struct cdrom_tocentry tocentry; /* a Toc entry */
	struct cdrom_msf msf;
	struct cdrom_subchnl subchnl;
	u_char Error=255; /No Error /

	if (dorealmode)
	driver_request=DOSMEM_MapRealToLinear
	(MAKELONG(BX_reg(context),ES_reg(context)));
	else
	driver_request=PTR_SEG_OFF_TO_LIN(ES_reg(context),BX_reg(context));

	if (!driver_request)
	{ /* FIXME - to be deleted ?? */
	ERR(int," ES:BX==0 ! SEGFAULT ?\n");
	ERR(int," -->BX=0x%04x, ES=0x%04lx, DS=0x%04lx, CX=0x%04x\n\n",
	BX_reg(context),
	ES_reg(context),
	DS_reg(context),
	CX_reg(context));
	}
	else

	/* FIXME - would be best to open the device at the begining of the wine
	session .... */
	if (fdcd<0) fdcd=open(cdrom_dev,O_RDONLY);

	TRACE(int,"CDROM device driver -> command <%d>\n",
	(unsigned char)driver_request[2]);

	/* set status to 0 */
	driver_request[3]=0;
	driver_request[4]=0;


	switch(driver_request[2])
	{
	case 3:
	io_stru=get_io_stru((WORD *)driver_request,dorealmode);
	FIXME(int," --> IOCTL INPUT <%d>\n",io_stru[0]);
	switch (io_stru[0])
	{
	case 1: /* location of head */
	if (io_stru[1]==0)
	{
	ioctl(fdcd,CDROMSUBCHNL,&subchnl);
	((DWORD*)io_stru+2)[0]=(DWORD)msf0_to_abs(subchnl.cdsc_absaddr.msf);
	FIXME(int," ----> HEAD LOCATION <%ld>\n\n",
	((DWORD *)io_stru+2)[0]);
	}
	else
	{
	ERR(int,"CDRom-Driver: Unsupported address mode !!\n");
	Error=0x0c;
	}
	break;

	case 6: /* device status */
	/* FIXME .. does this work properly ?? */
	io_stru[3]=io_stru[4]=0;
	io_stru[2]=1; /* supports audio channels (?? FIXME ??) */
	io_stru[1]=16; /* data read and plays audio racks */
	#if defined(CDROM_DRIVE_STATUS) && defined(CDS_TRAY_OPEN)
	io_stru[1]\|=(ioctl(fdcd,CDROM_DRIVE_STATUS,0)==CDS_TRAY_OPEN);
	#endif
	TRACE(int," ----> DEVICE STATUS <0x%08lx>\n\n",(DWORD)io_stru[1]);
	break;

	case 9: /* media changed ? */
	#ifdef CDROM_MEDIA_CHANGED
	if (ioctl(fdcd,CDROM_MEDIA_CHANGED,0))
	io_stru[1]=0xff;
	else
	#endif
	io_stru[0]=0; /* FIXME? 1? */
	break;

	case 10: /* audio disk info */
	ioctl(fdcd,CDROMREADTOCHDR,&tochdr);
	io_stru[1]=tochdr.cdth_trk0; /* staring track of the disc */
	io_stru[2]=tochdr.cdth_trk1; /* ending track */
	tocentry.cdte_track=CDROM_LEADOUT; /* Now the leadout track ...*/
	tocentry.cdte_format=CDROM_MSF;
	ioctl(fdcd,CDROMREADTOCENTRY,&tocentry); /* ... get position of it */
	((DWORD*)io_stru+3)[0]=(DWORD)msf0_to_abs(tocentry.cdte_addr.msf);
	TRACE(int," ----> AUDIO DISK INFO <%d-%d/%ld>\n\n",
	io_stru[1],io_stru[2],
	((DWORD *)io_stru+3)[0]);
	break;


	case 11: /* audio track info */
	tocentry.cdte_track=io_stru[1]; /* track of the disc */
	tocentry.cdte_format=CDROM_MSF;
	ioctl(fdcd,CDROMREADTOCENTRY,&tocentry);
	((DWORD*)io_stru+2)[0]=(DWORD)msf0_to_abs(tocentry.cdte_addr.msf);
	/* starting point if the track */
	io_stru[6]=tocentry.cdte_adr+16*tocentry.cdte_ctrl;
	TRACE(int," ----> AUDIO TRACK INFO <track=%d>[%ld] \n\n",
	io_stru[1],((DWORD *)io_stru+2)[0]);
	break;

	case 12: /* get Q-Channel / Subchannel (??) info */
	subchnl.cdsc_format=CDROM_MSF;
	ioctl(fdcd,CDROMSUBCHNL,&subchnl);
	io_stru[1]=subchnl.cdsc_adr+16*subchnl.cdsc_ctrl;
	io_stru[2]=subchnl.cdsc_trk;
	io_stru[3]=subchnl.cdsc_ind; /* FIXME - ?? */
	io_stru[4]=subchnl.cdsc_reladdr.msf.minute;
	io_stru[5]=subchnl.cdsc_reladdr.msf.second;
	io_stru[6]=subchnl.cdsc_reladdr.msf.frame;
	io_stru[7]=0; /* always zero */
	io_stru[8]=subchnl.cdsc_absaddr.msf.minute;
	io_stru[9]=subchnl.cdsc_absaddr.msf.second;
	io_stru[10]=subchnl.cdsc_absaddr.msf.frame;
	break;

	case 15: /* fixme !!!!!!! just a small workaround ! */
	/* !!!! FIXME FIXME FIXME !! */
	tocentry.cdte_track=CDROM_LEADOUT; /* Now the leadout track ...*/
	tocentry.cdte_format=CDROM_MSF;
	ioctl(fdcd,CDROMREADTOCENTRY,&tocentry); /* ... get position of it */
	((DWORD*)io_stru+7)[0]=(DWORD)msf0_to_abs(tocentry.cdte_addr.msf);
	break;

	default:
	FIXME(int," Cdrom-driver: IOCTL INPUT: Unimplemented <%d>!! \n",
	io_stru[0]);
	Error=0x0c;
	break;
	}
	break;

	case 12:
	io_stru=get_io_stru((WORD *)driver_request,dorealmode);
	TRACE(int," --> IOCTL OUTPUT <%d>\n",io_stru[0]);
	switch (io_stru[0])
	{
	case 0: /* eject */
	ioctl (fdcd,CDROMEJECT);
	TRACE(int," ----> EJECT \n\n");
	break;
	case 5: /* close tray */
	ioctl (fdcd,CDROMCLOSETRAY);
	TRACE(int," ----> CLOSE TRAY \n\n");
	break;
	case 2: /* reset drive */
	ioctl (fdcd,CDROMRESET);
	TRACE(int," ----> RESET \n\n");
	break;
	default:
	FIXME(int," Cdrom-driver: IOCTL OUPUT: Unimplemented <%d>!! \n",
	io_stru[0]);
	Error=0x0c;
	break;
	}
	break;

	case 133:
	if (cdrom_a_status(fdcd)==CDROM_AUDIO_PLAY)
	{
	ioctl (fdcd,CDROMPAUSE);
	TRACE(int," --> STOP AUDIO (Paused)\n\n");
	}
	else
	{
	ioctl (fdcd,CDROMSTOP);
	TRACE(int," --> STOP AUDIO (Stopped)\n\n");
	}
	break;

	case 132: /* FIXME - It didn't function for me... */
	FIXME(int," --> PLAY AUDIO \n");
	ioctl (fdcd,CDROMSTART);
	FIXME(int,"Mode :<0x%02X> , [%ld-%ld]\n\n",
	(unsigned char)driver_request[13],
	((DWORD*)driver_request+14)[0],
	((DWORD*)driver_request+18)[0]);
	if (driver_request[13]==0)
	{
	abs_to_msf(((DWORD*)driver_request+14)[0],
	((DWORD*)driver_request+18)[0],&msf);
	ioctl(fdcd,CDROMPLAYMSF,&msf);
	}
	else
	{
	ERR(int,"CDRom-Driver: Unsupported address mode !!\n");
	Error=0x0c;
	}
	break;
	case 136:
	TRACE(int," --> RESUME AUDIO \n\n");
	ioctl(fdcd,CDROMRESUME);
	break;
	default:
	FIXME(int," CDRom-Driver - ioctl uninplemented <%d>\n",driver_request[2]);
	Error=0x0c;

	}

	if (Error<255)
	{
	driver_request[4]\|=127;
	driver_request[3]=Error;
	}
	driver_request[4]\|=2*(cdrom_a_status(fdcd)==CDROM_AUDIO_PLAY);

	/* close (fdcd); FIXME !! -- cannot use close when ejecting
	the cd-rom - close would close it again */
	}

	#endif