src/flac/iffscan.c

   1 /* iffscan - Simple AIFF/RIFF chunk scanner
   2  * Copyright (C) 2007,2008,2009  Josh Coalson
   3  *
   4  * This program is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU General Public License
   6  * as published by the Free Software Foundation; either version 2
   7  * of the License, or (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  17  */
  18
  19 #if HAVE_CONFIG_H
  20 #  include <config.h>
  21 #endif
  22
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26 #include "share/compat.h"
  27 #include "foreign_metadata.h"
  28
  29 static FLAC__uint32 unpack32be_(const FLAC__byte *b)
  30 {
  31         return ((FLAC__uint32)b[0]<<24) + ((FLAC__uint32)b[1]<<16) + ((FLAC__uint32)b[2]<<8) + (FLAC__uint32)b[3];
  32 }
  33
  34 static FLAC__uint32 unpack32le_(const FLAC__byte *b)
  35 {
  36         return (FLAC__uint32)b[0] + ((FLAC__uint32)b[1]<<8) + ((FLAC__uint32)b[2]<<16) + ((FLAC__uint32)b[3]<<24);
  37 }
  38
  39 static FLAC__uint64 unpack64le_(const FLAC__byte *b)
  40 {
  41         return (FLAC__uint64)b[0] + ((FLAC__uint64)b[1]<<8) + ((FLAC__uint64)b[2]<<16) + ((FLAC__uint64)b[3]<<24) + ((FLAC__uint64)b[4]<<32) + ((FLAC__uint64)b[5]<<40) + ((FLAC__uint64)b[6]<<48) + ((FLAC__uint64)b[7]<<56);
  42 }
  43
  44 static FLAC__uint32 unpack32_(const FLAC__byte *b, foreign_block_type_t type)
  45 {
  46         if(type == FOREIGN_BLOCK_TYPE__AIFF)
  47                 return unpack32be_(b);
  48         else
  49                 return unpack32le_(b);
  50 }
  51
  52 int main(int argc, char *argv[])
  53 {
  54         FILE *f;
  55         char buf[36];
  56         foreign_metadata_t *fm;
  57         const char *fn, *error;
  58         size_t i;
  59         FLAC__uint32 size;
  60
  61         if(argc != 2) {
  62                 fprintf(stderr, "usage: %s { file.wav | file.aif }\n", argv[0]);
  63                 return 1;
  64         }
  65         fn = argv[1];
  66         if(0 == (f = fopen(fn, "rb")) || fread(buf, 1, 4, f) != 4) {
  67                 fprintf(stderr, "ERROR opening %s for reading\n", fn);
  68                 return 1;
  69         }
  70         fclose(f);
  71         if(0 == (fm = flac__foreign_metadata_new(memcmp(buf, "RIFF", 4) && memcmp(buf, "RF64", 4)? FOREIGN_BLOCK_TYPE__AIFF : FOREIGN_BLOCK_TYPE__RIFF))) {
  72                 fprintf(stderr, "ERROR: out of memory\n");
  73                 return 1;
  74         }
  75         if(fm->type == FOREIGN_BLOCK_TYPE__AIFF) {
  76                 if(!flac__foreign_metadata_read_from_aiff(fm, fn, &error)) {
  77                         fprintf(stderr, "ERROR reading chunks from %s: %s\n", fn, error);
  78                         return 1;
  79                 }
  80         }
  81         else {
  82                 if(!flac__foreign_metadata_read_from_wave(fm, fn, &error)) {
  83                         fprintf(stderr, "ERROR reading chunks from %s: %s\n", fn, error);
  84                         return 1;
  85                 }
  86         }
  87         if(0 == (f = fopen(fn, "rb"))) {
  88                 fprintf(stderr, "ERROR opening %s for reading\n", fn);
  89                 return 1;
  90         }
  91         for(i = 0; i < fm->num_blocks; i++) {
  92                 if(fseeko(f, fm->blocks[i].offset, SEEK_SET) < 0) {
  93                         fprintf(stderr, "ERROR seeking in %s\n", fn);
  94                         return 1;
  95                 }
  96                 if(fread(buf, 1, i==0?12:8, f) != (i==0?12:8)) {
  97                         fprintf(stderr, "ERROR reading %s\n", fn);
  98                         return 1;
  99                 }
 100                 size = unpack32_((const FLAC__byte*)buf+4, fm->type);
 101                 printf("block:[%c%c%c%c] size=%08x=(%10u)", buf[0], buf[1], buf[2], buf[3], size, size);
 102                 if(i == 0)
 103                         printf(" type:[%c%c%c%c]", buf[8], buf[9], buf[10], buf[11]);
 104                 else if(fm->type == FOREIGN_BLOCK_TYPE__AIFF && i == fm->audio_block)
 105                         printf(" offset size=%08x=(%10u)", fm->ssnd_offset_size, fm->ssnd_offset_size);
 106                 else if(fm->type == FOREIGN_BLOCK_TYPE__RIFF && i == 1 && !memcmp(buf, "ds64", 4)) {
 107                         if(fread(buf+8, 1, 36-8, f) != 36-8) {
 108                                 fprintf(stderr, "ERROR reading %s\n", fn);
 109                                 return 1;
 110                         }
 111                         printf(" RIFF size=%016" PRIx64 "=(" PRIu64 ")", unpack64le_(buf+8), unpack64le_(buf+8));
 112                         printf(" data size=%016" PRIx64 "=(" PRIu64 ")", unpack64le_(buf+16), unpack64le_(buf+16));
 113                         printf(" sample count=%016" PRIx64 "=(" PRIu64 ")", unpack64le_(buf+24), unpack64le_(buf+24));
 114                         printf(" table size=%08x=(%u)", unpack32le_(buf+32), unpack32le_(buf+32));
 115                 }
 116                 printf("\n");
 117         }
 118         fclose(f);
 119         flac__foreign_metadata_delete(fm);
 120         return 0;
 121 }