File indexing completed on 2024-04-28 08:46:56

 /*
  * This file is part of WorkMan, the civilized CD player library
  * Copyright (C) 1991-1997 by Steven Grimm <koreth@midwinter.com>
  * Copyright (C) by Dirk Försterling <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)
 
 
 #include "include/wm_struct.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)
 {
     current_position = start - 150;
     ending_position = end - 150;
 
     /*
      * Special case: don't start at the "end" of a track if we're
      * playing backwards!
      */
     if (direction == -1)
         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 /* } */