ogg_afh_common.c

   1 /* Copyright (C) 2004 Andre Noll <maan@tuebingen.mpg.de>, see file COPYING. */
   2
   3 /** \file ogg_afh_common.c Functions common to all ogg/ codecs. */
   4
   5 #include <ogg/ogg.h>
   6 #include <regex.h>
   7
   8 #include "para.h"
   9 #include "afh.h"
  10 #include "error.h"
  11 #include "string.h"
  12 #include "ogg_afh_common.h"
  13 #include "fd.h"
  14
  15 /* Taken from decoder_example.c of libvorbis-1.2.3. */
  16 static int process_packets_2_and_3(ogg_sync_state *oss,
  17                 ogg_stream_state *stream, struct afh_info *afhi,
  18                 struct oac_callback_info *ci)
  19 {
  20         ogg_page page;
  21         ogg_packet packet;
  22         int i = 0;
  23
  24         while (i < 2) {
  25                 while (i < 2) {
  26                         int ret = ogg_sync_pageout(oss, &page);
  27                         if (ret == 0)
  28                                 break; /* Need more data */
  29                         if (ret != 1)
  30                                 continue;
  31                         /*
  32                          * We can ignore any errors here as they'll also become
  33                          * apparent at packetout.
  34                          */
  35                         ogg_stream_pagein(stream, &page);
  36                         PARA_INFO_LOG("ogg page serial: %d\n",
  37                                 ogg_page_serialno(&page));
  38                         while (i < 2) {
  39                                 ret = ogg_stream_packetout(stream, &packet);
  40                                 if (ret == 0)
  41                                         break;
  42                                 if (ret < 0)
  43                                         return -E_STREAM_PACKETOUT;
  44                                 ret = ci->packet_callback(&packet, i + 1,
  45                                         ogg_page_serialno(&page), afhi,
  46                                         ci->private_data);
  47                                 if (ret < 0)
  48                                         return ret;
  49                                 if (ret == 0) /* header complete */
  50                                         return 1;
  51                                 i++;
  52                         }
  53                 }
  54         }
  55         return 1;
  56 }
  57
  58 static int process_ogg_packets(ogg_sync_state *oss, struct afh_info *afhi,
  59                 struct oac_callback_info *ci)
  60 {
  61         ogg_packet packet;
  62         ogg_stream_state stream;
  63         ogg_page page;
  64         int ret;
  65
  66         if (ogg_sync_pageout(oss, &page) != 1)
  67                 return -E_SYNC_PAGEOUT;
  68
  69         ret = ogg_page_serialno(&page);
  70         ogg_stream_init(&stream, ret);
  71
  72         ret = -E_STREAM_PAGEIN;
  73         if (ogg_stream_pagein(&stream, &page) < 0)
  74                 goto out;
  75
  76         ret = -E_STREAM_PACKETOUT;
  77         if (ogg_stream_packetout(&stream, &packet) != 1)
  78                 goto out;
  79         ret = ci->packet_callback(&packet, 0, ogg_page_serialno(&page),
  80                 afhi, ci->private_data);
  81         if (ret < 0)
  82                 goto out;
  83         ret = process_packets_2_and_3(oss, &stream, afhi, ci);
  84         if (ret < 0)
  85                 goto out;
  86         ret = 1;
  87 out:
  88         ogg_stream_clear(&stream);
  89         return ret;
  90 }
  91
  92 static void set_chunk_tv(int frames_per_chunk, int frequency,
  93                 struct timeval *result)
  94 {
  95         uint64_t x = (uint64_t)frames_per_chunk * 1000 * 1000 / frequency;
  96
  97         result->tv_sec = x / 1000 / 1000;
  98         result->tv_usec = x % (1000 * 1000);
  99         PARA_INFO_LOG("%d frames per chunk, chunk time: %lums\n",
 100                 frames_per_chunk, tv2ms(result));
 101 }
 102
 103 /**
 104  * Pass first three ogg packets to callback and build the chunk table.
 105  *
 106  * This function extracts the first three ogg packets of the audio data
 107  * given by \a map and \a numbytes and passes each packet to the callback
 108  * defined by \a ci.
 109  *
 110  * If the packet callback indicates success and \a afhi is not \p NULL, the
 111  * chunk table is built. Chunk zero contains the first three ogg packets while
 112  * all other chunks consist of exactly one ogg page.
 113  *
 114  * \param map Audio file data.
 115  * \param numbytes The length of \a map.
 116  * \param afhi Passed to the packet callback, contains chunk table.
 117  * \param ci The callback structure.
 118  *
 119  * \return Standard.
 120  */
 121 int oac_get_file_info(char *map, size_t numbytes, struct afh_info *afhi,
 122                 struct oac_callback_info *ci)
 123 {
 124         ogg_sync_state oss;
 125         ogg_page op;
 126         char *buf;
 127         int ret, i, j, frames_per_chunk, ct_size, prev_pageno = 0;
 128         long long unsigned granule_skip = 0, num_frames = 0;
 129         int64_t granule = 0, prev_granule = 0;
 130
 131         ogg_sync_init(&oss);
 132         ret = -E_OGG_SYNC;
 133         buf = ogg_sync_buffer(&oss, numbytes);
 134         if (!buf)
 135                 goto out;
 136         memcpy(buf, map, numbytes);
 137         ret = -E_OGG_SYNC;
 138         if (ogg_sync_wrote(&oss, numbytes) < 0)
 139                 goto out;
 140         ret = process_ogg_packets(&oss, afhi, ci);
 141         if (ret < 0)
 142                 goto out;
 143         if (!afhi)
 144                 goto out;
 145         afhi->header_len = oss.returned;
 146         oss.returned = 0;
 147         oss.fill = numbytes;
 148         /* count ogg pages and get duration of the file */
 149         for (i = 0; ogg_sync_pageseek(&oss, &op) > 0; i++) {
 150                 int this_pageno = ogg_page_pageno(&op);
 151                 int64_t this_granule = ogg_page_granulepos(&op);
 152                 if (this_granule >= 0)
 153                         granule = this_granule;
 154                 if (i > 0 && this_pageno != prev_pageno + 1) /* hole */
 155                         granule_skip += granule - prev_granule;
 156                 prev_pageno = this_pageno;
 157                 prev_granule = granule;
 158         }
 159         num_frames = granule - granule_skip;
 160         PARA_INFO_LOG("%d pages, %llu frames\n", i, num_frames);
 161         ret = -E_OGG_EMPTY;
 162         if (i == 0)
 163                 goto out;
 164         afhi->seconds_total = num_frames / afhi->frequency;
 165         /* use roughly one page per chunk */
 166         frames_per_chunk = num_frames / i;
 167         PARA_INFO_LOG("%" PRIu32 " seconds, %d frames/chunk\n",
 168                 afhi->seconds_total, frames_per_chunk);
 169         ct_size = 250;
 170         afhi->chunk_table = para_malloc(ct_size * sizeof(uint32_t));
 171         afhi->chunk_table[0] = 0;
 172         afhi->chunk_table[1] = afhi->header_len;
 173         oss.returned = afhi->header_len;
 174         oss.fill = numbytes;
 175         for (j = 1; ogg_sync_pageseek(&oss, &op) > 0; /* nothing */) {
 176                 granule = ogg_page_granulepos(&op);
 177
 178                 while (granule >= (j + 1) * frames_per_chunk) {
 179                         j++;
 180                         if (j >= ct_size) {
 181                                 ct_size *= 2;
 182                                 afhi->chunk_table = para_realloc(
 183                                         afhi->chunk_table,
 184                                         ct_size * sizeof(uint32_t));
 185                         }
 186                         afhi->chunk_table[j] = oss.returned;
 187                 }
 188         }
 189         afhi->chunks_total = j;
 190         set_max_chunk_size(afhi);
 191         set_chunk_tv(frames_per_chunk, afhi->frequency, &afhi->chunk_tv);
 192         ret = 0;
 193 out:
 194         ogg_sync_clear(&oss);
 195         return ret;
 196 }
 197
 198 static int write_ogg_page(int fd, const ogg_page *op)
 199 {
 200         int ret;
 201
 202         PARA_DEBUG_LOG("header/body: %li/%li\n", op->header_len, op->body_len);
 203         ret = xwrite(fd, (const char *)op->header, op->header_len);
 204         if (ret < 0)
 205                 return ret;
 206         return xwrite(fd, (const char *)op->body, op->body_len);
 207 }
 208
 209 /**
 210  * Change meta tags of ogg files.
 211  *
 212  * \param map The (read-only) memory map of the input file.
 213  * \param map_sz The size of the input file in bytes.
 214  * \param fd The output file descriptor.
 215  * \param meta_packet Codec-specific packet containing modified tags.
 216  * \param meta_sz Size of the metadata packet.
 217  *
 218  * This function writes a new ogg file content using file descriptor \a fd,
 219  * which must correspond to a file which has been opened for writing.  The
 220  * second packet is supposed to contain the metadata, and is replaced by \a
 221  * meta_packet. This output file has to be closed by the caller.
 222  *
 223  * \return Standard.
 224  */
 225 int oac_rewrite_tags(const char *map, size_t map_sz, int fd,
 226                 char *meta_packet, size_t meta_sz)
 227 {
 228         ogg_sync_state oss_in, oss_out;
 229         ogg_stream_state stream_in, stream_out, *si = NULL, *so = NULL;
 230         ogg_packet packet;
 231         ogg_page op;
 232         char *buf;
 233         int serial, ret;
 234         long len = map_sz;
 235
 236         ogg_sync_init(&oss_in);
 237         ogg_sync_init(&oss_out);
 238
 239         ret = -E_OGG_SYNC;
 240         buf = ogg_sync_buffer(&oss_in, len);
 241         if (!buf)
 242                 goto out;
 243         memcpy(buf, map, len);
 244         ret = -E_OGG_SYNC;
 245         if (ogg_sync_wrote(&oss_in, len) < 0)
 246                 goto out;
 247         if (ogg_sync_pageout(&oss_in, &op) != 1)
 248                 goto out;
 249         ret = ogg_page_serialno(&op);
 250         serial = ret;
 251
 252         si = &stream_in;
 253         ogg_stream_init(si, serial);
 254         /* Packet #0 goes to an own page */
 255         ret = -E_STREAM_PAGEIN;
 256         if (ogg_stream_pagein(si, &op) < 0)
 257                 goto out;
 258         ret = -E_STREAM_PACKETOUT;
 259         if (ogg_stream_packetout(si, &packet) != 1)
 260                 goto out;
 261         ret = -E_STREAM_PACKETIN;
 262         so = &stream_out;
 263         ogg_stream_init(so, serial);
 264         if (ogg_stream_packetin(so, &packet) != 0)
 265                 goto out;
 266         ret = ogg_stream_flush(so, &op);
 267         assert(ret != 0);
 268         /* packets have been flushed into the page. */
 269         ret = write_ogg_page(fd, &op);
 270         if (ret < 0)
 271                 goto out;
 272         /*
 273          * For all supported ogg/xxx audio formats the meta data packet is
 274          * packet #1. Write out our modified version of this packet.
 275          */
 276         packet.packetno = 1;
 277         packet.b_o_s = packet.e_o_s = 0;
 278         packet.packet = (typeof(packet.packet))meta_packet;
 279         packet.bytes = meta_sz;
 280         ret = -E_STREAM_PACKETIN;
 281         if (ogg_stream_packetin(so, &packet) != 0)
 282                 goto out;
 283         /* Copy ogg packets, ignoring the meta data packet. */
 284         for (;;) {
 285                 ret = ogg_stream_packetout(si, &packet);
 286                 if (ret == -1)
 287                         break;
 288                 if (ret != 1) {
 289                         ret = -E_STREAM_PAGEOUT;
 290                         if (ogg_sync_pageout(&oss_in, &op) < 0)
 291                                 goto out;
 292                         ret = -E_STREAM_PAGEIN;
 293                         if (ogg_stream_pagein(si, &op))
 294                                 goto out;
 295                         continue;
 296                 }
 297                 PARA_DEBUG_LOG("packet: bytes: %d, granule: %d, packetno: %d\n",
 298                         (int)packet.bytes, (int)packet.granulepos,
 299                         (int)packet.packetno);
 300                 /* ignore meta data packet which we replaced */
 301                 if (packet.packetno == 1)
 302                         continue;
 303                 ret = -E_STREAM_PACKETIN;
 304                 if (ogg_stream_packetin(so, &packet) != 0)
 305                         goto out;
 306                 /* only create a new ogg page if granulepos is valid */
 307                 if (packet.granulepos == -1)
 308                         continue;
 309                 /* force remaining packets into a page */
 310                 for (;;) {
 311 #ifdef HAVE_OGG_STREAM_FLUSH_FILL
 312                         ret = ogg_stream_flush_fill(so, &op, INT_MAX);
 313 #else
 314                         ret = ogg_stream_flush(so, &op);
 315 #endif
 316                         if (ret <= 0)
 317                                 break;
 318                         PARA_DEBUG_LOG("writing page (%li bytes)\n",
 319                                 op.header_len + op.body_len);
 320                         ret = write_ogg_page(fd, &op);
 321                         if (ret < 0)
 322                                 goto out;
 323                 }
 324         }
 325         if (ogg_stream_flush(so, &op)) {
 326                 /* write remaining data */
 327                 ret = write_ogg_page(fd, &op);
 328                 if (ret < 0)
 329                         goto out;
 330         }
 331         ret = 1;
 332 out:
 333         ogg_sync_clear(&oss_in);
 334         ogg_sync_clear(&oss_out);
 335         if (si)
 336                 ogg_stream_clear(si);
 337         if (so)
 338                 ogg_stream_clear(so);
 339         return ret;
 340 }
 341
 342 /* Structure for providing custom headers for streaming. */
 343 struct oac_custom_header {
 344         char *buf;
 345         size_t len;
 346         ogg_stream_state oss;
 347 };
 348
 349 /**
 350  * Allocate and return a custom header structure.
 351  *
 352  * For some audio codecs which employ the ogg container format, the server side
 353  * wants to replace the meta tags at the beginning of the file because they are
 354  * not needed for streaming and can be arbitrary large. The structure returned
 355  * by this function is typically used as the ->private field of struct \ref
 356  * oac_callback_info for \ref oac_get_file_info(). This allows the audio format
 357  * handler to set up a custom header which is identical to the original header,
 358  * but with the meta data part replaced by fixed length dummy contents.
 359  *
 360  * \return The returned memory must be initialized with the serial number of
 361  * the ogg stream before ogg packets can be submitted to it. This is not done
 362  * here because the header structure is allocated before \ref
 363  * oac_get_file_info() is called, and the serial number is not known at this
 364  * point.
 365  *
 366  * \sa \ref oac_custom_header_init().
 367  */
 368 struct oac_custom_header *oac_custom_header_new(void)
 369 {
 370         return para_calloc(sizeof(struct oac_custom_header));
 371 }
 372
 373 /**
 374  * Set the serial number of an allocated header structure.
 375  *
 376  * \param serial Passed to the callback function.
 377  * \param h As returned from \ref oac_custom_header_new().
 378  *
 379  * This function must be called before any packets are submitted.
 380  */
 381 void oac_custom_header_init(int serial, struct oac_custom_header *h)
 382 {
 383         ogg_stream_init(&h->oss, serial);
 384 }
 385
 386 /**
 387  * Submit an ogg packet to a custom header structure.
 388  *
 389  * \param op The packet to append.
 390  * \param h Must be initialized.
 391  *
 392  * The packet may be the one which was passed to the callback, or a completely
 393  * different one, like a dummy metadata packet.
 394  *
 395  * \return Standard.
 396  */
 397 int oac_custom_header_append(ogg_packet *op, struct oac_custom_header *h)
 398 {
 399         return ogg_stream_packetin(&h->oss, op) < 0? -E_OGG_PACKET_IN : 1;
 400 }
 401
 402 /**
 403  * Force remaining packets into an ogg page.
 404  *
 405  * \param h Should contain submitted but not yet flushed packets.
 406  *
 407  * This is called after the first packet has been submitted with \ref
 408  * oac_custom_header_append() to make sure the first ogg page contains only
 409  * this packet. Also when header processing is complete, the callbacks call
 410  * this to force the previously submitted packets into a page.
 411  */
 412 void oac_custom_header_flush(struct oac_custom_header *h)
 413 {
 414         ogg_page og;
 415
 416         while (ogg_stream_flush(&h->oss, &og)) {
 417                 size_t len = og.header_len + og.body_len;
 418                 h->buf = para_realloc(h->buf, h->len + len);
 419                 memcpy(h->buf + h->len, og.header, og.header_len);
 420                 memcpy(h->buf + h->len + og.header_len, og.body, og.body_len);
 421                 h->len += len;
 422         }
 423 }
 424
 425 /**
 426  * Return the custom header buffer and deallocate resources.
 427  *
 428  * This is called after the ogg packets which comprise the header have been
 429  * submitted and flushed.
 430  *
 431  * \param buf Result pointer.
 432  * \param h Must not be used any more after the call.
 433  *
 434  * \return The size of the header. This is the sum of the sizes of all ogg
 435  * pages that have been flushed out.
 436  */
 437 size_t oac_custom_header_get(char **buf, struct oac_custom_header *h)
 438 {
 439         size_t ret = h->len;
 440
 441         *buf = h->buf;
 442         ogg_stream_clear(&h->oss);
 443         free(h);
 444         return ret;
 445 }