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