aac_afh.c

   1 /* Copyright (C) 2006 Andre Noll <maan@tuebingen.mpg.de>, see file COPYING. */
   2 /*
   3  * based in parts on libfaad, Copyright (C) 2003-2005 M. Bakker,
   4  * Ahead Software AG
   5  */
   6
   7 /** \file aac_afh.c para_server's aac audio format handler. */
   8
   9 #include <regex.h>
  10 #include <neaacdec.h>
  11
  12 #include "para.h"
  13 #include "mp4.h"
  14 #include "error.h"
  15 #include "portable_io.h"
  16 #include "afh.h"
  17 #include "string.h"
  18 #include "fd.h"
  19
  20
  21 struct aac_afh_context {
  22         const void *map;
  23         size_t mapsize;
  24         size_t fpos;
  25         int32_t track;
  26         mp4ff_t *mp4ff;
  27         mp4AudioSpecificConfig masc;
  28         mp4ff_callback_t cb;
  29 };
  30
  31 static uint32_t aac_afh_read_cb(void *user_data, void *dest, uint32_t want)
  32 {
  33         struct aac_afh_context *c = user_data;
  34         size_t have, rv;
  35
  36         if (want == 0 || c->fpos >= c->mapsize)
  37                 return 0;
  38         have = c->mapsize - c->fpos;
  39         rv = PARA_MIN(have, (size_t)want);
  40         PARA_DEBUG_LOG("reading %zu bytes @%zu\n", rv, c->fpos);
  41         memcpy(dest, c->map + c->fpos, rv);
  42         c->fpos += rv;
  43         return rv;
  44 }
  45
  46 static uint32_t aac_afh_seek_cb(void *user_data, uint64_t pos)
  47 {
  48         struct aac_afh_context *c = user_data;
  49         c->fpos = pos;
  50         return 0;
  51 }
  52
  53 static int32_t aac_afh_get_track(mp4ff_t *mp4ff, mp4AudioSpecificConfig *masc)
  54 {
  55         int32_t i, rc, num_tracks = mp4ff_total_tracks(mp4ff);
  56
  57         assert(num_tracks >= 0);
  58         for (i = 0; i < num_tracks; i++) {
  59                 unsigned char *buf = NULL;
  60                 unsigned buf_size = 0;
  61
  62                 mp4ff_get_decoder_config(mp4ff, i, &buf, &buf_size);
  63                 if (buf) {
  64                         rc = NeAACDecAudioSpecificConfig(buf, buf_size, masc);
  65                         free(buf);
  66                         if (rc < 0)
  67                                 continue;
  68                         return i;
  69                 }
  70         }
  71         return -1; /* no audio track */
  72 }
  73
  74 static int aac_afh_open(const void *map, size_t mapsize, void **afh_context)
  75 {
  76         int ret;
  77         struct aac_afh_context *c = para_malloc(sizeof(*c));
  78
  79         c->map = map;
  80         c->mapsize = mapsize;
  81         c->fpos = 0;
  82         c->cb.read = aac_afh_read_cb;
  83         c->cb.seek = aac_afh_seek_cb;
  84         c->cb.user_data = c;
  85
  86         ret = -E_MP4FF_OPEN;
  87         c->mp4ff = mp4ff_open_read(&c->cb);
  88         if (!c->mp4ff)
  89                 goto free_ctx;
  90         c->track = aac_afh_get_track(c->mp4ff, &c->masc);
  91         ret = -E_MP4FF_TRACK;
  92         if (c->track < 0)
  93                 goto close_mp4ff;
  94         *afh_context = c;
  95         return 0;
  96 close_mp4ff:
  97         mp4ff_close(c->mp4ff);
  98 free_ctx:
  99         free(c);
 100         *afh_context = NULL;
 101         return ret;
 102 }
 103
 104 static void aac_afh_close(void *afh_context)
 105 {
 106         struct aac_afh_context *c = afh_context;
 107         mp4ff_close(c->mp4ff);
 108         free(c);
 109 }
 110
 111 /**
 112  * Libmp4ff function to reposition the file to the given sample.
 113  *
 114  * \param f The opaque handle returned by mp4ff_open_read().
 115  * \param track The number of the (audio) track.
 116  * \param sample Destination.
 117  *
 118  * We need this function to obtain the offset of the sample within the audio
 119  * file. Unfortunately, it is not exposed in the mp4ff header.
 120  *
 121  * \return This function always returns 0.
 122  */
 123 int32_t mp4ff_set_sample_position(mp4ff_t *f, const int32_t track, const int32_t sample);
 124
 125 static int aac_afh_get_chunk(uint32_t chunk_num, void *afh_context,
 126                 const char **buf, uint32_t *len)
 127 {
 128         struct aac_afh_context *c = afh_context;
 129         int32_t ss;
 130         size_t offset;
 131
 132         assert(chunk_num <= INT_MAX);
 133         /* this function always returns zero */
 134         mp4ff_set_sample_position(c->mp4ff, c->track, chunk_num);
 135         offset = c->fpos;
 136         ss = mp4ff_read_sample_getsize(c->mp4ff, c->track, chunk_num);
 137         if (ss <= 0)
 138                 return -E_MP4FF_BAD_SAMPLE;
 139         assert(ss + offset <= c->mapsize);
 140         *buf = c->map + offset;
 141         *len = ss;
 142         return 1;
 143 }
 144
 145 static void _aac_afh_get_taginfo(const mp4ff_t *mp4ff, struct taginfo *tags)
 146 {
 147         mp4ff_meta_get_artist(mp4ff, &tags->artist);
 148         mp4ff_meta_get_title(mp4ff, &tags->title);
 149         mp4ff_meta_get_date(mp4ff, &tags->year);
 150         mp4ff_meta_get_album(mp4ff, &tags->album);
 151         mp4ff_meta_get_comment(mp4ff, &tags->comment);
 152 }
 153
 154 /*
 155  * Init m4a file and write some tech data to given pointers.
 156  */
 157 static int aac_get_file_info(char *map, size_t numbytes, __a_unused int fd,
 158                 struct afh_info *afhi)
 159 {
 160         int ret;
 161         int32_t rv;
 162         struct aac_afh_context *c;
 163         int64_t tmp;
 164         const char *buf;
 165         uint32_t n, len;
 166
 167         ret = aac_afh_open(map, numbytes, (void **)&c);
 168         if (ret < 0)
 169                 return ret;
 170
 171         ret = -E_MP4FF_BAD_SAMPLERATE;
 172         rv = mp4ff_get_sample_rate(c->mp4ff, c->track);
 173         if (rv <= 0)
 174                 goto close;
 175         afhi->frequency = rv;
 176
 177         ret = -E_MP4FF_BAD_CHANNEL_COUNT;
 178         rv = mp4ff_get_channel_count(c->mp4ff, c->track);
 179         if (rv <= 0)
 180                 goto close;
 181         afhi->channels = rv;
 182
 183         ret = -E_MP4FF_BAD_SAMPLE_COUNT;
 184         rv = mp4ff_num_samples(c->mp4ff, c->track);
 185         if (rv <= 0)
 186                 goto close;
 187         afhi->chunks_total = rv;
 188         afhi->max_chunk_size = 0;
 189         for (n = 0; n < afhi->chunks_total; n++) {
 190                 if (aac_afh_get_chunk(n, c, &buf, &len) < 0)
 191                         break;
 192                 afhi->max_chunk_size = PARA_MAX(afhi->max_chunk_size, len);
 193         }
 194
 195         tmp = c->masc.sbr_present_flag == 1? 2048 : 1024;
 196         afhi->seconds_total = tmp * afhi->chunks_total / afhi->frequency;
 197         ms2tv(1000 * tmp / afhi->frequency, &afhi->chunk_tv);
 198
 199         if (aac_afh_get_chunk(0, c, &buf, &len) >= 0)
 200                 numbytes -= buf - map;
 201         afhi->bitrate = 8 * numbytes / afhi->seconds_total / 1000;
 202         _aac_afh_get_taginfo(c->mp4ff, &afhi->tags);
 203         ret = 1;
 204 close:
 205         aac_afh_close(c);
 206         return ret;
 207 }
 208
 209 static uint32_t aac_afh_meta_read_cb(void *user_data, void *dest, uint32_t want)
 210 {
 211         int fd = *(int *)user_data;
 212         return read(fd, dest, want);
 213 }
 214
 215 static uint32_t aac_afh_meta_seek_cb(void *user_data, uint64_t pos)
 216 {
 217         int fd = *(int *)user_data;
 218         return lseek(fd, pos, SEEK_SET);
 219 }
 220
 221 static uint32_t aac_afh_meta_write_cb(void *user_data, void *dest, uint32_t want)
 222 {
 223         int fd = *(int *)user_data;
 224         return write(fd, dest, want);
 225 }
 226
 227 static uint32_t aac_afh_meta_truncate_cb(void *user_data)
 228 {
 229         int fd = *(int *)user_data;
 230         off_t offset = lseek(fd, 0, SEEK_CUR);
 231         return ftruncate(fd, offset);
 232 }
 233
 234 static void replace_tag(mp4ff_tag_t *tag, const char *new_val, bool *found)
 235 {
 236         free(tag->value);
 237         tag->value = para_strdup(new_val);
 238         *found = true;
 239 }
 240
 241 static void add_tag(mp4ff_metadata_t *md, const char *item, const char *value)
 242 {
 243         md->tags[md->count].item = para_strdup(item);
 244         md->tags[md->count].value = para_strdup(value);
 245         md->count++;
 246 }
 247
 248 static int aac_afh_rewrite_tags(const char *map, size_t mapsize,
 249                 struct taginfo *tags, int fd, __a_unused const char *filename)
 250 {
 251         int ret, i;
 252         int32_t rv;
 253         mp4ff_metadata_t metadata;
 254         mp4ff_t *mp4ff;
 255         mp4ff_callback_t cb = {
 256                 .read = aac_afh_meta_read_cb,
 257                 .seek = aac_afh_meta_seek_cb,
 258                 .write = aac_afh_meta_write_cb,
 259                 .truncate = aac_afh_meta_truncate_cb,
 260                 .user_data = &fd
 261         };
 262         bool found_artist = false, found_title = false, found_album = false,
 263                 found_year = false, found_comment = false;
 264
 265         ret = write_all(fd, map, mapsize);
 266         if (ret < 0)
 267                 return ret;
 268         lseek(fd, 0, SEEK_SET);
 269
 270         mp4ff = mp4ff_open_read_metaonly(&cb);
 271         if (!mp4ff)
 272                 return -E_MP4FF_OPEN;
 273
 274         ret = -E_MP4FF_META_READ;
 275         rv = mp4ff_meta_get_num_items(mp4ff);
 276         if (rv < 0)
 277                 goto close;
 278         metadata.count = rv;
 279         PARA_NOTICE_LOG("%d metadata item(s) found\n", rv);
 280
 281         metadata.tags = para_malloc((metadata.count + 5) * sizeof(mp4ff_tag_t));
 282         for (i = 0; i < metadata.count; i++) {
 283                 mp4ff_tag_t *tag = metadata.tags + i;
 284
 285                 ret = -E_MP4FF_META_READ;
 286                 if (!mp4ff_meta_get_by_index(mp4ff, i, &tag->item, &tag->value))
 287                         goto free_tags;
 288                 PARA_INFO_LOG("found: %s: %s\n", tag->item, tag->value);
 289                 if (!strcmp(tag->item, "artist"))
 290                         replace_tag(tag, tags->artist, &found_artist);
 291                 else if (!strcmp(tag->item, "title"))
 292                         replace_tag(tag, tags->title, &found_title);
 293                 else if (!strcmp(tag->item, "album"))
 294                         replace_tag(tag, tags->album, &found_album);
 295                 else if (!strcmp(tag->item, "date"))
 296                         replace_tag(tag, tags->year, &found_year);
 297                 else if (!strcmp(tag->item, "comment"))
 298                         replace_tag(tag, tags->comment, &found_comment);
 299         }
 300         if (!found_artist)
 301                 add_tag(&metadata, "artist", tags->artist);
 302         if (!found_title)
 303                 add_tag(&metadata, "title", tags->title);
 304         if (!found_album)
 305                 add_tag(&metadata, "album", tags->album);
 306         if (!found_year)
 307                 add_tag(&metadata, "date", tags->year);
 308         if (!found_comment)
 309                 add_tag(&metadata, "comment", tags->comment);
 310         ret = -E_MP4FF_META_WRITE;
 311         if (!mp4ff_meta_update(&cb, &metadata))
 312                 goto free_tags;
 313         ret = 1;
 314 free_tags:
 315         for (; i > 0; i--) {
 316                 free(metadata.tags[i - 1].item);
 317                 free(metadata.tags[i - 1].value);
 318         }
 319         free(metadata.tags);
 320 close:
 321         mp4ff_close(mp4ff);
 322         return ret;
 323 }
 324
 325 static const char * const aac_suffixes[] = {"m4a", "mp4", NULL};
 326
 327 /**
 328  * The audio format handler for the Advanced Audio Codec.
 329  *
 330  * This is only compiled in if the faad library is installed.
 331  */
 332 const struct audio_format_handler aac_afh = {
 333         .get_file_info = aac_get_file_info,
 334         .suffixes = aac_suffixes,
 335         .rewrite_tags = aac_afh_rewrite_tags,
 336         .open = aac_afh_open,
 337         .get_chunk = aac_afh_get_chunk,
 338         .close = aac_afh_close,
 339 };