FryingPan/DTLib/rAIFFAudio.cpp

   1 /*
   2  * FryingPan - Amiga CD/DVD Recording Software (User Interface and supporting Libraries only)
   3  * Copyright (C) 2001-2011 Tomasz Wiszkowski Tomasz.Wiszkowski at gmail.com
   4  *
   5  * This program is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public License
   7  * as published by the Free Software Foundation; either version 2.1
   8  * of the License, or (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
  18  */
  19
  20 #include "rAIFFAudio.h"
  21 #include <libclass/dos.h>
  22 #include <libclass/exec.h>
  23 #include <libclass/utility.h>
  24
  25 #define MKID(a,b,c,d) (((a&255)<<24)|((b&255)<<16)|((c&255)<<8)|(d&255))
  26 #define ID_FORM MKID('F','O','R','M')
  27 #define ID_COMM MKID('C','O','M','M')
  28 #define ID_AIFF MKID('A','I','F','F')
  29 #define ID_SSND MKID('S','S','N','D')
  30
  31
  32 IFileReader         *rAIFFAudio::openRead(const char* sFile, EDtError &rc)
  33 {
  34    rAIFFAudio *pSkel = 0;
  35    if (true == checkFile(sFile, rc))
  36    {
  37       pSkel = new rAIFFAudio(sFile, rc);
  38    }
  39    return pSkel;
  40 }
  41
  42 rAIFFAudio::rAIFFAudio(const char *sName, EDtError &rc)
  43    : FileReader(sName, rc)
  44 {
  45    if (rc != DT_OK)
  46       return;
  47
  48    readHeaders();
  49    setBlockSize(2352);
  50    setLittleEndian(false);
  51    setType(Data_Audio);
  52 }
  53
  54 void                 rAIFFAudio::readHeaders()
  55 {
  56    unsigned int     buff;
  57    int              c=0;
  58
  59    DOS->Seek(getFile(), 0, OFFSET_BEGINNING);
  60
  61    if (DOS->Read(getFile(), &buff, 4)!=4)
  62       return;
  63    buff = L2BE(buff);
  64    if (buff != ID_FORM)
  65       return;
  66
  67    DOS->Seek(getFile(), 4, OFFSET_CURRENT);
  68    if (DOS->Read(getFile(), &buff, 4)!=4)
  69       return;
  70    buff = L2BE(buff);
  71    if (buff != ID_AIFF)
  72       return;
  73
  74    for (c=0; c<2;)
  75    {
  76       if (DOS->Read(getFile(), &buff, 4)!=4)
  77          return;
  78
  79       if (buff == ID_COMM)
  80       {
  81          c++;
  82       }
  83       else if (buff == ID_SSND)
  84       {
  85          c++;
  86          if (DOS->Read(getFile(), &buff, 4)!=4)
  87             return;
  88          setDataOffset(DOS->Seek(getFile(), 0, OFFSET_CURRENT));
  89          setDataSize(L2BE(buff));
  90          DOS->Seek(getFile(), -4, OFFSET_CURRENT);
  91
  92       }
  93
  94       if (DOS->Read(getFile(), &buff, 4)!=4)
  95          return;
  96       buff = L2BE(buff);
  97       DOS->Seek(getFile(), buff, OFFSET_CURRENT);
  98    }
  99
 100    return;
 101 }
 102
 103 bool                 rAIFFAudio::checkFile(const char* sFileName, EDtError &rc)
 104 {
 105    unsigned int    buff;
 106    int             c=0;
 107    BPTR            fh;
 108
 109    rc = DT_UnableToOpenFile;
 110
 111    fh = DOS->Open(const_cast<char*>(sFileName), MODE_OLDFILE);
 112    if (0 == fh)
 113       return false;
 114
 115    /*
 116     * open file at its beginning
 117     */
 118    DOS->Seek(fh, 0, OFFSET_BEGINNING);
 119    if (DOS->Read(fh, &buff, 4)!=4)
 120    {
 121       rc = DT_FileMalformed;
 122       DOS->Close(fh);
 123       return false;
 124    }
 125
 126    /*
 127     * check if we have a FORM header
 128     */
 129    buff = L2BE(buff);
 130    if (buff != ID_FORM)
 131    {
 132       rc = DT_InvalidFormat;
 133       DOS->Close(fh);
 134       return false;
 135    }
 136
 137    /*
 138     * if so - see if it is an AIFF file
 139     */
 140    DOS->Seek(fh, 4, OFFSET_CURRENT);
 141    if (DOS->Read(fh, &buff, 4)!=4)
 142    {
 143       rc = DT_FileMalformed;
 144       DOS->Close(fh);
 145       return false;
 146    }
 147
 148    buff = L2BE(buff);
 149    if (buff != ID_AIFF)
 150    {
 151       rc = DT_InvalidFormat;
 152       DOS->Close(fh);
 153       return false;
 154    }
 155
 156    /*
 157     * alright! read what you can.
 158     */
 159    for (c=0;c<2;)
 160    {
 161       if (DOS->Read(fh, &buff, 4)!=4)
 162       {
 163          DOS->Close(fh);
 164          return false;
 165       }
 166
 167       buff = L2BE(buff);
 168
 169       if (buff == ID_COMM)
 170       {
 171          c++;
 172       }
 173       else if (buff == ID_SSND)
 174       {
 175          c++;
 176       }
 177
 178       if (DOS->Read(fh, &buff, 4)!=4)
 179       {
 180          rc = DT_FileMalformed;
 181          DOS->Close(fh);
 182          return false;
 183       }
 184
 185       buff = L2BE(buff);
 186       DOS->Seek(fh, buff, OFFSET_CURRENT);
 187    }
 188
 189    rc = DT_OK;
 190    DOS->Close(fh);
 191    return true;
 192 }
 193
 194 const char          *rAIFFAudio::static_getName()
 195 {
 196    return "AIFF Audio Track";
 197 }
 198
 199 bool                 rAIFFAudio::static_isAudio()
 200 {
 201    return true;
 202 }
 203
 204 bool                 rAIFFAudio::static_isData()
 205 {
 206    return false;
 207 }
 208
 209 bool                 rAIFFAudio::static_isSession()
 210 {
 211    return false;
 212 }
 213
 214 bool                 rAIFFAudio::isAudio()
 215 {
 216    return static_isAudio();
 217 }
 218
 219 bool                 rAIFFAudio::isData()
 220 {
 221    return static_isData();
 222 }
 223
 224 const char          *rAIFFAudio::getName()
 225 {
 226    return static_getName();
 227 }
 228
 229 // vim: ts=3 et