apps/metadata/asap.c

   1 /***************************************************************************
   2  *             __________               __   ___.
   3  *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
   4  *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
   5  *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
   6  *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
   7  *                     \/            \/     \/    \/            \/
   8  * $Id$
   9  *
  10  * Copyright (C) 2008 Dominik Wenger
  11  *
  12  * This program is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU General Public License
  14  * as published by the Free Software Foundation; either version 2
  15  * of the License, or (at your option) any later version.
  16  *
  17  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  18  * KIND, either express or implied.
  19  *
  20  ****************************************************************************/
  21 #include <stdio.h>
  22 #include <string.h>
  23 #include <stdlib.h>
  24 #include <ctype.h>
  25 #include <inttypes.h>
  26
  27 #include "system.h"
  28 #include "metadata.h"
  29 #include "metadata_common.h"
  30 #include "metadata_parsers.h"
  31 #include "rbunicode.h"
  32 #include "debug.h"
  33
  34 #define MAX_SONGS  32
  35
  36 static bool parse_dec(int *retval, const char *p, int minval, int maxval)
  37 {
  38     int r = 0;
  39     do {
  40         char c = *p;
  41         if (c >= '0' && c <= '9')
  42             r = 10 * r + c - '0';
  43         else
  44             return false;
  45         if (r > maxval)
  46             return false;
  47     } while (*++p != '\0');
  48     if (r < minval)
  49         return false;
  50     *retval = r;
  51     return true;
  52 }
  53
  54 static bool parse_text(char *retval, const char *p)
  55 {
  56     int i;
  57     if (*p != '"')
  58         return false;
  59     p++;
  60     if (p[0] == '<' && p[1] == '?' && p[2] == '>' && p[3] == '"')
  61         return true;
  62     i = 0;
  63     while (*p != '"') {
  64         if (i >= 127)
  65             return false;
  66         if (*p == '\0')
  67             return false;
  68         retval[i++] = *p++;
  69     }
  70     retval[i] = '\0';
  71     return true;
  72 }
  73
  74 static int ASAP_ParseDuration(const char *s)
  75 {
  76     int r;
  77     if (*s < '0' || *s > '9')
  78         return -1;
  79     r = *s++ - '0';
  80     if (*s >= '0' && *s <= '9')
  81         r = 10 * r + *s++ - '0';
  82     if (*s == ':') {
  83         s++;
  84         if (*s < '0' || *s > '5')
  85             return -1;
  86         r = 60 * r + (*s++ - '0') * 10;
  87         if (*s < '0' || *s > '9')
  88             return -1;
  89         r += *s++ - '0';
  90     }
  91     r *= 1000;
  92     if (*s != '.')
  93         return r;
  94     s++;
  95     if (*s < '0' || *s > '9')
  96         return r;
  97     r += 100 * (*s++ - '0');
  98     if (*s < '0' || *s > '9')
  99         return r;
 100     r += 10 * (*s++ - '0');
 101     if (*s < '0' || *s > '9')
 102         return r;
 103     r += *s - '0';
 104     return r;
 105 }
 106
 107 static bool read_asap_string(char* source, char** buf, char** buffer_end, char** dest)
 108 {
 109     if(parse_text(*buf,source) == false)
 110         return false;
 111
 112     /* set dest pointer */
 113     *dest = *buf;
 114
 115     /* move buf ptr */
 116     *buf += strlen(*buf)+1;
 117
 118     /* check size */
 119     if(*buf >= *buffer_end)
 120     {
 121         DEBUGF("Buffer full\n");
 122         return false;
 123     }
 124     return true;
 125 }
 126
 127 static bool parse_sap_header(int fd, struct mp3entry* id3, int file_len)
 128 {
 129     int module_index = 0;
 130     int sap_signature = -1;
 131     int duration_index = 0;
 132     unsigned char cur_char = 0;
 133     int i;
 134
 135     /* set defaults */
 136     int numSongs = 1;
 137     int defSong = 0;
 138     int numChannels = 1;
 139     int durations[MAX_SONGS];
 140     int loops[MAX_SONGS];
 141     for (i = 0; i < MAX_SONGS; i++) {
 142         durations[i] = -1;
 143         loops[i] = 0;
 144     }
 145
 146     /* use id3v2 buffer for our strings */
 147     char* buffer = id3->id3v2buf;
 148     char* buffer_end = id3->id3v2buf + ID3V2_BUF_SIZE;
 149
 150     /* parse file */
 151     while (1)
 152     {
 153         char line[256];
 154         char *p;
 155
 156         if (module_index + 8 >= file_len)
 157             return false;
 158         /* read a char */
 159         read(fd,&cur_char,1);
 160         /* end of header */
 161         if (cur_char == 0xff)
 162             break;
 163
 164         i = 0;
 165         while (cur_char != 0x0d)
 166         {
 167             line[i++] = cur_char;
 168             module_index++;
 169             if (module_index >= file_len || (unsigned)i >= sizeof(line) - 1)
 170                 return false;
 171             /* read a char */
 172             read(fd,&cur_char,1);
 173         }
 174         if (++module_index >= file_len )
 175             return false;
 176         /* read a char */
 177         read(fd,&cur_char,1);
 178         if ( cur_char != 0x0a)
 179             return false;
 180
 181         line[i] = '\0';
 182         for (p = line; *p != '\0'; p++) {
 183             if (*p == ' ') {
 184                 *p++ = '\0';
 185                 break;
 186             }
 187         }
 188
 189         /* parse tags */
 190         if(strcmp(line, "SAP") == 0)
 191             sap_signature = 1;
 192         if (sap_signature == -1)
 193             return false;
 194         if (strcmp(line, "AUTHOR") == 0)
 195         {
 196             if(read_asap_string(p, &buffer, &buffer_end, &id3->artist) == false)
 197                 return false;
 198         }
 199         else if(strcmp(line, "NAME") == 0)
 200         {
 201             if(read_asap_string(p, &buffer, &buffer_end, &id3->title) == false)
 202                 return false;
 203         }
 204         else if(strcmp(line, "DATE") == 0)
 205         {
 206             if(read_asap_string(p, &buffer, &buffer_end, &id3->year_string) == false)
 207                 return false;
 208         }
 209         else if (strcmp(line, "SONGS") == 0)
 210         {
 211             if (parse_dec(&numSongs, p, 1, MAX_SONGS) == false )
 212                 return false;
 213         }
 214         else if (strcmp(line, "DEFSONG") == 0)
 215         {
 216             if (parse_dec(&defSong, p, 0, MAX_SONGS) == false)
 217                 return false;
 218         }
 219         else if (strcmp(line, "STEREO") == 0)
 220         {
 221             numChannels = 2;
 222         }
 223         else if (strcmp(line, "TIME") == 0)
 224         {
 225             int durationTemp = ASAP_ParseDuration(p);
 226             if (durationTemp < 0 || duration_index >= MAX_SONGS)
 227                 return false;
 228             durations[duration_index] = durationTemp;
 229             if (strstr(p, "LOOP") != NULL)
 230                 loops[duration_index] = 1;
 231             duration_index++;
 232         }
 233     }
 234
 235     /* set length: */
 236     int length =  durations[defSong];
 237     if (length < 0)
 238         length = 180 * 1000;
 239     id3->length = length;
 240
 241     lseek(fd, 0, SEEK_SET);
 242     return true;
 243 }
 244
 245
 246 bool get_asap_metadata(int fd, struct mp3entry* id3)
 247 {
 248
 249     int filelength = filesize(fd);
 250
 251     if(parse_sap_header(fd, id3, filelength) == false)
 252     {
 253         DEBUGF("parse sap header failed.\n");
 254         return false;
 255     }
 256
 257     id3->bitrate = 706;
 258     id3->frequency = 44100;
 259
 260     id3->vbr = false;
 261     id3->filesize = filelength;
 262
 263     return true;
 264 }