[fdkaac.git] / src / main.c

/* 
 * Copyright (C) 2013 nu774
 * For conditions of distribution and use, see copyright notice in COPYING
 */
#if HAVE_CONFIG_H
#  include "config.h"
#endif
#if HAVE_STDINT_H
#  include <stdint.h>
#endif
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <locale.h>
#include <errno.h>
#include <sys/stat.h>
#include <getopt.h>
#if HAVE_UNISTD_H
#include <unistd.h>
#endif
#ifdef _WIN32
#include <io.h>
#endif
#include "compat.h"
#include "wav_reader.h"
#include "aacenc.h"
#include "m4af.h"
#include "progress.h"
#include "version.h"

#define PROGNAME "fdkaac"

static
int read_callback(void *cookie, void *data, uint32_t size)
{
    size_t rc = fread(data, 1, size, (FILE*)cookie);
    return ferror((FILE*)cookie) ? -1 : (int)rc;
}

static
int write_callback(void *cookie, const void *data, uint32_t size)
{
    size_t rc = fwrite(data, 1, size, (FILE*)cookie);
    return ferror((FILE*)cookie) ? -1 : (int)rc;
}

static
int seek_callback(void *cookie, int64_t off, int whence)
{
    return fseeko((FILE*)cookie, off, whence);
}

static
int64_t tell_callback(void *cookie)
{
    return ftello((FILE*)cookie);
}

static
void usage(void)
{
    printf(
PROGNAME " %s\n"
"Usage: " PROGNAME " [options] input_file\n"
"Options:\n"
" -h, --help                    Print this help message\n"
" -p, --profile <n>             Profile (audio object type)\n"
"                                 2: MPEG-4 AAC LC (default)\n"
"                                 5: MPEG-4 HE-AAC (SBR)\n"
"                                29: MPEG-4 HE-AAC v2 (SBR+PS)\n"
"                                23: MPEG-4 AAC LD\n"
"                                39: MPEG-4 AAC ELD\n"
"                               129: MPEG-2 AAC LC\n"
"                               132: MPEG-2 HE-AAC (SBR)\n"
"                               156: MPEG-2 HE-AAC v2 (SBR+PS)\n"
" -b, --bitrate <n>             Bitrate in bits per seconds (for CBR)\n"
" -m, --bitrate-mode <n>        Bitrate configuration\n"
"                                 0: CBR (default)\n"
"                                 1-5: VBR\n"
"                               (VBR mode is not officially supported, and\n"
"                                works only on a certain combination of\n"
"                                parameter settings, sample rate, and\n"
"                                channel configuration)\n"
" -w, --bandwidth <n>           Frequency bandwidth in Hz (AAC LC only)\n"
" -a, --afterburner <n>         Afterburner\n"
"                                 0: Off\n"
"                                 1: On(default)\n"
" -L, --lowdelay-sbr            Enable ELD-SBR (AAC ELD only)\n"
" -s, --sbr-signaling <n>       SBR signaling mode\n"
"                                 0: Implicit, backward compatible(default)\n"
"                                 1: Explicit SBR and implicit PS\n"
"                                 2: Explicit hierarchical signaling\n"
" -f, --transport-format <n>    Transport format\n"
"                                 0: RAW (default, muxed into M4A)\n"
"                                 1: ADIF\n"
"                                 2: ADTS\n"
"                                 6: LATM MCP=1\n"
"                                 7: LATM MCP=0\n"
"                                10: LOAS/LATM (LATM within LOAS)\n"
" -c, --adts-crc-check          Add CRC protection on ADTS header\n"
" -h, --header-period <n>       StreamMuxConfig/PCE repetition period in\n"
"                               transport layer\n"
"\n"
" -o <filename>                 Output filename\n"
" --ignore-length               Ignore length of WAV header\n"
"\n"
"Tagging options:\n"
" --title <string>\n"
" --artist <string>\n"
" --album <string>\n"
" --genre <string>\n"
" --date <string>\n"
" --composer <string>\n"
" --grouping <string>\n"
" --comment <string>\n"
" --album-artist <string>\n"
" --track <number[/total]>\n"
" --disk <number[/total]>\n"
" --tempo <n>\n"
    , fdkaac_version);
}

typedef struct aacenc_tag_entry_t {
    uint32_t tag;
    const char *data;
} aacenc_tag_entry_t;

typedef struct aacenc_param_ex_t {
    AACENC_PARAMS

    char *input_filename;
    char *output_filename;
    unsigned ignore_length;

    aacenc_tag_entry_t *tag_table;
    unsigned tag_count;
    unsigned tag_table_capacity;
} aacenc_param_ex_t;

static
int parse_options(int argc, char **argv, aacenc_param_ex_t *params)
{
    int ch;
    unsigned n;
    aacenc_tag_entry_t *tag;

    static struct option long_options[] = {
        { "help",             no_argument,       0, 'h' },
        { "profile",          required_argument, 0, 'p' },
        { "bitrate",          required_argument, 0, 'b' },
        { "biterate-mode",    required_argument, 0, 'm' },
        { "bandwidth",        required_argument, 0, 'w' },
        { "afterburner",      required_argument, 0, 'a' },
        { "lowdelay-sbr",     no_argument,       0, 'L' },
        { "sbr-signaling",    required_argument, 0, 's' },
        { "transport-format", required_argument, 0, 'f' },
        { "adts-crc-check",   no_argument,       0, 'c' },
        { "header-period",    required_argument, 0, 'P' },

        { "ignore-length",    no_argument,       0, 'I' },

        { "title",            required_argument, 0,  M4AF_TAG_TITLE        },
        { "artist",           required_argument, 0,  M4AF_TAG_ARTIST       },
        { "album",            required_argument, 0,  M4AF_TAG_ALBUM        },
        { "genre",            required_argument, 0,  M4AF_TAG_GENRE        },
        { "date",             required_argument, 0,  M4AF_TAG_DATE         },
        { "composer",         required_argument, 0,  M4AF_TAG_COMPOSER     },
        { "grouping",         required_argument, 0,  M4AF_TAG_GROUPING     },
        { "comment",          required_argument, 0,  M4AF_TAG_COMMENT      },
        { "album-artist",     required_argument, 0,  M4AF_TAG_ALBUM_ARTIST },
        { "track",            required_argument, 0,  M4AF_TAG_TRACK        },
        { "disk",             required_argument, 0,  M4AF_TAG_DISK         },
        { "tempo",            required_argument, 0,  M4AF_TAG_TEMPO        },
    };
    params->afterburner = 1;

    aacenc_getmainargs(&argc, &argv);
    while ((ch = getopt_long(argc, argv, "hp:b:m:w:a:Ls:f:cP:Io:",
                             long_options, 0)) != EOF) {
        switch (ch) {
        case 'h':
            return usage(), -1;
        case 'p':
            if (sscanf(optarg, "%u", &n) != 1) {
                fprintf(stderr, "invalid arg for profile\n");
                return -1;
            }
            params->profile = n;
            break;
        case 'b':
            if (sscanf(optarg, "%u", &n) != 1) {
                fprintf(stderr, "invalid arg for bitrate\n");
                return -1;
            }
            params->bitrate = n;
            break;
        case 'm':
            if (sscanf(optarg, "%u", &n) != 1 || n > 5) {
                fprintf(stderr, "invalid arg for bitrate-mode\n");
                return -1;
            }
            params->bitrate_mode = n;
            break;
        case 'w':
            if (sscanf(optarg, "%u", &n) != 1) {
                fprintf(stderr, "invalid arg for bandwidth\n");
                return -1;
            }
            params->bandwidth = n;
            break;
        case 'a':
            if (sscanf(optarg, "%u", &n) != 1 || n > 1) {
                fprintf(stderr, "invalid arg for afterburner\n");
                return -1;
            }
            params->afterburner = n;
            break;
        case 'L':
            params->lowdelay_sbr = 1;
            break;
        case 's':
            if (sscanf(optarg, "%u", &n) != 1 || n > 2) {
                fprintf(stderr, "invalid arg for sbr-signaling\n");
                return -1;
            }
            params->sbr_signaling = n;
            break;
        case 'f':
            if (sscanf(optarg, "%u", &n) != 1) {
                fprintf(stderr, "invalid arg for transport-format\n");
                return -1;
            }
            params->transport_format = n;
            break;
        case 'c':
            params->adts_crc_check = 1;
            break;
        case 'P':
            if (sscanf(optarg, "%u", &n) != 1) {
                fprintf(stderr, "invalid arg for header-period\n");
                return -1;
            }
            params->header_period = n;
            break;
        case 'o':
            params->output_filename = optarg;
            break;
        case 'I':
            params->ignore_length = 1;
            break;
        case M4AF_TAG_TITLE:
        case M4AF_TAG_ARTIST:
        case M4AF_TAG_ALBUM:
        case M4AF_TAG_GENRE:
        case M4AF_TAG_DATE:
        case M4AF_TAG_COMPOSER:
        case M4AF_TAG_GROUPING:
        case M4AF_TAG_COMMENT:
        case M4AF_TAG_ALBUM_ARTIST:
        case M4AF_TAG_TRACK:
        case M4AF_TAG_DISK:
        case M4AF_TAG_TEMPO:
            if (params->tag_count == params->tag_table_capacity) {
                unsigned newsize = params->tag_table_capacity;
                newsize = newsize ? newsize * 2 : 1;
                params->tag_table =
                    realloc(params->tag_table,
                            newsize * sizeof(aacenc_tag_entry_t));
                params->tag_table_capacity = newsize;
            }
            tag = params->tag_table + params->tag_count;
            tag->tag = ch;
            tag->data = optarg;
            params->tag_count++;
            break;
        default:
            return usage(), -1;
        }
    }
    if (argc == optind)
        return usage(), -1;
    if (!params->bitrate && !params->bitrate_mode) {
        fprintf(stderr, "bitrate or bitrate-mode is mandatory\n");
        return -1;
    }
    if (params->output_filename && !strcmp(params->output_filename, "-") &&
        !params->transport_format) {
        fprintf(stderr, "stdout streaming is not available on M4A output\n");
        return -1;
    }
    if (params->bitrate && params->bitrate < 10000)
        params->bitrate *= 1000;
    params->input_filename = argv[optind];
    return 0;
};

static
int write_sample(FILE *ofp, m4af_writer_t *m4af,
                 const void *data, uint32_t size, uint32_t duration)
{
    if (!m4af) {
        fwrite(data, 1, size, ofp);
        if (ferror(ofp)) {
            fprintf(stderr, "ERROR: fwrite(): %s\n", strerror(errno));
            return -1;
        }
    } else if (m4af_write_sample(m4af, 0, data, size, duration) < 0) {
        fprintf(stderr, "ERROR: failed to write m4a sample\n");
        return -1;
    }
    return 0;
}

static
int encode(wav_reader_t *wavf, HANDLE_AACENCODER encoder,
           uint32_t frame_length, FILE *ofp, m4af_writer_t *m4af)
{
    uint8_t *ibuf = 0;
    int16_t *pcmbuf = 0;
    uint32_t pcmsize = 0;
    uint8_t *obuf = 0;
    uint32_t olen;
    uint32_t osize = 0;
    int nread = 1;
    int consumed;
    int rc = -1;
    int frames_written = 0;
    aacenc_progress_t progress = { 0 };
    const pcm_sample_description_t *format = wav_get_format(wavf);

    ibuf = malloc(frame_length * format->bytes_per_frame);
    aacenc_progress_init(&progress, wav_get_length(wavf), format->sample_rate);
    do {
        if (nread) {
            if ((nread = wav_read_frames(wavf, ibuf, frame_length)) < 0) {
                fprintf(stderr, "ERROR: read failed\n");
                goto END;
            } else if (nread > 0) {
                if (pcm_convert_to_native_sint16(format, ibuf, nread,
                                                 &pcmbuf, &pcmsize) < 0) {
                    fprintf(stderr, "ERROR: unsupported sample format\n");
                    goto END;
                }
            }
            aacenc_progress_update(&progress, wav_get_position(wavf),
                                   format->sample_rate * 2);
        }
        if ((consumed = aac_encode_frame(encoder, format, pcmbuf, nread,
                                         &obuf, &olen, &osize)) < 0)
            goto END;
        if (olen > 0) {
            if (write_sample(ofp, m4af, obuf, olen, frame_length) < 0)
                goto END;
            ++frames_written;
        }
    } while (nread > 0 || olen > 0);
    aacenc_progress_finish(&progress, wav_get_position(wavf));
    rc = frames_written;
END:
    if (ibuf) free(ibuf);
    if (pcmbuf) free(pcmbuf);
    if (obuf) free(obuf);
    return rc;
}

static
int finalize_m4a(m4af_writer_t *m4af, const aacenc_param_ex_t *params,
                 HANDLE_AACENCODER encoder)
{
    unsigned i;
    aacenc_tag_entry_t *tag = params->tag_table;

    for (i = 0; i < params->tag_count; ++i, ++tag) {
        switch (tag->tag) {
        case M4AF_TAG_TRACK:
            {
                unsigned m, n = 0;
                if (sscanf(tag->data, "%u/%u", &m, &n) >= 1)
                    m4af_add_itmf_track_tag(m4af, m, n);
                break;
            }
        case M4AF_TAG_DISK:
            {
                unsigned m, n = 0;
                if (sscanf(tag->data, "%u/%u", &m, &n) >= 1)
                    m4af_add_itmf_disk_tag(m4af, m, n);
                break;
            }
        case M4AF_TAG_TEMPO:
            {
                unsigned n;
                if (sscanf(tag->data, "%u", &n) == 1)
                    m4af_add_itmf_int16_tag(m4af, tag->tag, n);
                break;
            }
        default:
            {
                char *u8 = aacenc_to_utf8(tag->data);
                m4af_add_itmf_string_tag(m4af, tag->tag, u8);
                free(u8);
            }
        }
    }
    {
        char tool_info[256];
        char *p = tool_info;
        LIB_INFO *lib_info = 0;

        p += sprintf(p, PROGNAME " %s, ", fdkaac_version);

        lib_info = calloc(FDK_MODULE_LAST, sizeof(LIB_INFO));
        if (aacEncGetLibInfo(lib_info) == AACENC_OK) {
            for (i = 0; i < FDK_MODULE_LAST; ++i)
                if (lib_info[i].module_id == FDK_AACENC)
                    break;
            p += sprintf(p, "libfdk-aac %s, ", lib_info[i].versionStr);
        }
        free(lib_info);
        if (params->bitrate_mode)
            sprintf(p, "VBR mode %d", params->bitrate_mode);
        else
            sprintf(p, "CBR %dkbps",
                    aacEncoder_GetParam(encoder, AACENC_BITRATE) / 1000);

        m4af_add_itmf_string_tag(m4af, M4AF_TAG_TOOL, tool_info);
    }
    if (m4af_finalize(m4af) < 0) {
        fprintf(stderr, "ERROR: failed to finalize m4a\n");
        return -1;
    }
    return 0;
}

static
const char *basename(const char *filename)
{
    char *p = strrchr(filename, '/');
#ifdef _WIN32
    char *q = strrchr(filename, '\\');
    if (p < q) p = q;
#endif
    return p ? p + 1 : filename;
}

static
char *generate_output_filename(const char *filename, const char *ext)
{
    char *p = 0;
    size_t ext_len = strlen(ext);

    if (strcmp(filename, "-") == 0) {
        p = malloc(ext_len + 6);
        sprintf(p, "stdin%s", ext);
    } else {
        const char *base = basename(filename);
        size_t ilen = strlen(base);
        const char *ext_org = strrchr(base, '.');
        if (ext_org) ilen = ext_org - base;
        p = malloc(ilen + ext_len + 1);
        sprintf(p, "%.*s%s", ilen, base, ext);
    }
    return p;
}

int main(int argc, char **argv)
{
    wav_io_context_t wav_io = { read_callback, seek_callback };
    m4af_io_callbacks_t m4af_io = {
        write_callback, seek_callback, tell_callback };
    aacenc_param_ex_t params = { 0 };

    int result = 2;
    FILE *ifp = 0;
    FILE *ofp = 0;
    char *output_filename = 0;
    wav_reader_t *wavf = 0;
    HANDLE_AACENCODER encoder = 0;
    AACENC_InfoStruct aacinfo = { 0 };
    m4af_writer_t *m4af = 0;
    const pcm_sample_description_t *sample_format;
    int downsampled_timescale = 0;
    int frame_count = 0;
    struct stat stb = { 0 };

    setlocale(LC_CTYPE, "");
    setbuf(stderr, 0);

    if (parse_options(argc, argv, &params) < 0)
        return 1;

    if ((ifp = aacenc_fopen(params.input_filename, "rb")) == 0) {
        aacenc_fprintf(stderr, "ERROR: %s: %s\n", params.input_filename,
                       strerror(errno));
        goto END;
    }

    if (fstat(fileno(ifp), &stb) == 0 && (stb.st_mode & S_IFMT) != S_IFREG)
        wav_io.seek = 0;

    if ((wavf = wav_open(&wav_io, ifp, params.ignore_length)) == 0) {
        fprintf(stderr, "ERROR: broken / unsupported input file\n");
        goto END;
    }
    sample_format = wav_get_format(wavf);

    if (aacenc_init(&encoder, (aacenc_param_t*)&params, sample_format,
                    &aacinfo) < 0)
        goto END;

    if (!params.output_filename) {
        const char *ext = params.transport_format ? ".aac" : ".m4a";
        output_filename = generate_output_filename(params.input_filename, ext);
        params.output_filename = output_filename;
    }

    if ((ofp = aacenc_fopen(params.output_filename, "wb")) == 0) {
        aacenc_fprintf(stderr, "ERROR: %s: %s\n", params.output_filename,
                       strerror(errno));
        goto END;
    }
    if (!params.transport_format) {
        uint32_t scale;
        unsigned framelen = aacinfo.frameLength;
	int sbr_mode = aacenc_is_sbr_active((aacenc_param_t*)&params);
	int sig_mode = aacEncoder_GetParam(encoder, AACENC_SIGNALING_MODE);
	if (sbr_mode && !sig_mode)
	    downsampled_timescale = 1;
        scale = sample_format->sample_rate >> downsampled_timescale;
        if ((m4af = m4af_create(M4AF_CODEC_MP4A, scale, &m4af_io, ofp)) < 0)
            goto END;
        m4af_decoder_specific_info(m4af, 0, aacinfo.confBuf, aacinfo.confSize);
        m4af_set_fixed_frame_duration(m4af, 0,
                                      framelen >> downsampled_timescale);
        m4af_begin_write(m4af);
    }
    frame_count = encode(wavf, encoder, aacinfo.frameLength, ofp, m4af);
    if (frame_count < 0)
        goto END;
    if (m4af) {
        uint32_t delay = aacinfo.encoderDelay;
	int64_t frames_read = wav_get_position(wavf);
        uint32_t padding = frame_count * aacinfo.frameLength
                            - frames_read - aacinfo.encoderDelay;
        m4af_set_priming(m4af, 0, delay >> downsampled_timescale,
                         padding >> downsampled_timescale);
        if (finalize_m4a(m4af, &params, encoder) < 0)
            goto END;
    }
    result = 0;
END:
    if (wavf) wav_teardown(&wavf);
    if (ifp) fclose(ifp);
    if (m4af) m4af_teardown(&m4af);
    if (ofp) fclose(ofp);
    if (encoder) aacEncClose(&encoder);
    if (output_filename) free(output_filename);
    if (params.tag_table) free(params.tag_table);

    return result;
}
Commit	Line	Data
48e2f01c	1	/*
	2	* Copyright (C) 2013 nu774
	3	* For conditions of distribution and use, see copyright notice in COPYING
	4	*/
	5	#if HAVE_CONFIG_H
	6	# include "config.h"
	7	#endif
	8	#if HAVE_STDINT_H
	9	# include <stdint.h>
	10	#endif
	11	#include <stdio.h>
	12	#include <stdlib.h>
	13	#include <string.h>
	14	#include <locale.h>
	15	#include <errno.h>
7222b0b5	16	#include <sys/stat.h>
48e2f01c	17	#include <getopt.h>
7222b0b5	18	#if HAVE_UNISTD_H
	19	#include <unistd.h>
	20	#endif
	21	#ifdef _WIN32
	22	#include <io.h>
	23	#endif
48e2f01c	24	#include "compat.h"
	25	#include "wav_reader.h"
	26	#include "aacenc.h"
	27	#include "m4af.h"
	28	#include "progress.h"
	29	#include "version.h"
	30
	31	#define PROGNAME "fdkaac"
	32
	33	static
	34	int read_callback(void cookie, void data, uint32_t size)
	35	{
5e1168a4	36	size_t rc = fread(data, 1, size, (FILE*)cookie);
5e1168a4	37	return ferror((FILE*)cookie) ? -1 : (int)rc;
48e2f01c	38	}
	39
	40	static
	41	int write_callback(void cookie, const void data, uint32_t size)
	42	{
5e1168a4	43	size_t rc = fwrite(data, 1, size, (FILE*)cookie);
5e1168a4	44	return ferror((FILE*)cookie) ? -1 : (int)rc;
48e2f01c	45	}
	46
	47	static
	48	int seek_callback(void *cookie, int64_t off, int whence)
	49	{
	50	return fseeko((FILE*)cookie, off, whence);
	51	}
	52
	53	static
	54	int64_t tell_callback(void *cookie)
	55	{
	56	return ftello((FILE*)cookie);
	57	}
	58
	59	static
	60	void usage(void)
	61	{
	62	printf(
	63	PROGNAME " %s\n"
	64	"Usage: " PROGNAME " [options] input_file\n"
	65	"Options:\n"
	66	" -h, --help Print this help message\n"
	67	" -p, --profile <n> Profile (audio object type)\n"
	68	" 2: MPEG-4 AAC LC (default)\n"
	69	" 5: MPEG-4 HE-AAC (SBR)\n"
	70	" 29: MPEG-4 HE-AAC v2 (SBR+PS)\n"
	71	" 23: MPEG-4 AAC LD\n"
	72	" 39: MPEG-4 AAC ELD\n"
	73	" 129: MPEG-2 AAC LC\n"
	74	" 132: MPEG-2 HE-AAC (SBR)\n"
	75	" 156: MPEG-2 HE-AAC v2 (SBR+PS)\n"
	76	" -b, --bitrate <n> Bitrate in bits per seconds (for CBR)\n"
	77	" -m, --bitrate-mode <n> Bitrate configuration\n"
	78	" 0: CBR (default)\n"
	79	" 1-5: VBR\n"
	80	" (VBR mode is not officially supported, and\n"
	81	" works only on a certain combination of\n"
	82	" parameter settings, sample rate, and\n"
	83	" channel configuration)\n"
	84	" -w, --bandwidth <n> Frequency bandwidth in Hz (AAC LC only)\n"
097ef9a8	85	" -a, --afterburner <n> Afterburner\n"
48e2f01c	86	" 0: Off\n"
	87	" 1: On(default)\n"
	88	" -L, --lowdelay-sbr Enable ELD-SBR (AAC ELD only)\n"
	89	" -s, --sbr-signaling <n> SBR signaling mode\n"
	90	" 0: Implicit, backward compatible(default)\n"
	91	" 1: Explicit SBR and implicit PS\n"
	92	" 2: Explicit hierarchical signaling\n"
	93	" -f, --transport-format <n> Transport format\n"
	94	" 0: RAW (default, muxed into M4A)\n"
	95	" 1: ADIF\n"
	96	" 2: ADTS\n"
	97	" 6: LATM MCP=1\n"
	98	" 7: LATM MCP=0\n"
	99	" 10: LOAS/LATM (LATM within LOAS)\n"
	100	" -c, --adts-crc-check Add CRC protection on ADTS header\n"
	101	" -h, --header-period <n> StreamMuxConfig/PCE repetition period in\n"
	102	" transport layer\n"
	103	"\n"
	104	" -o <filename> Output filename\n"
	105	" --ignore-length Ignore length of WAV header\n"
	106	"\n"
	107	"Tagging options:\n"
	108	" --title <string>\n"
	109	" --artist <string>\n"
	110	" --album <string>\n"
	111	" --genre <string>\n"
	112	" --date <string>\n"
	113	" --composer <string>\n"
	114	" --grouping <string>\n"
	115	" --comment <string>\n"
	116	" --album-artist <string>\n"
	117	" --track <number[/total]>\n"
	118	" --disk <number[/total]>\n"
	119	" --tempo <n>\n"
	120	, fdkaac_version);
	121	}
	122
	123	typedef struct aacenc_tag_entry_t {
	124	uint32_t tag;
	125	const char *data;
	126	} aacenc_tag_entry_t;
	127
	128	typedef struct aacenc_param_ex_t {
	129	AACENC_PARAMS
	130
	131	char *input_filename;
	132	char *output_filename;
	133	unsigned ignore_length;
	134
	135	aacenc_tag_entry_t *tag_table;
	136	unsigned tag_count;
	137	unsigned tag_table_capacity;
	138	} aacenc_param_ex_t;
	139
	140	static
	141	int parse_options(int argc, char *argv, aacenc_param_ex_t params)
	142	{
	143	int ch;
	144	unsigned n;
	145	aacenc_tag_entry_t *tag;
	146
	147	static struct option long_options[] = {
	148	{ "help", no_argument, 0, 'h' },
	149	{ "profile", required_argument, 0, 'p' },
150	{ "bitrate", required_argument, 0, 'b' },
151	{ "biterate-mode", required_argument, 0, 'm' },
152	{ "bandwidth", required_argument, 0, 'w' },
153	{ "afterburner", required_argument, 0, 'a' },
154	{ "lowdelay-sbr", no_argument, 0, 'L' },
155	{ "sbr-signaling", required_argument, 0, 's' },
156	{ "transport-format", required_argument, 0, 'f' },
157	{ "adts-crc-check", no_argument, 0, 'c' },
158	{ "header-period", required_argument, 0, 'P' },
159
160	{ "ignore-length", no_argument, 0, 'I' },
161
162	{ "title", required_argument, 0, M4AF_TAG_TITLE },
163	{ "artist", required_argument, 0, M4AF_TAG_ARTIST },
164	{ "album", required_argument, 0, M4AF_TAG_ALBUM },
165	{ "genre", required_argument, 0, M4AF_TAG_GENRE },
166	{ "date", required_argument, 0, M4AF_TAG_DATE },
167	{ "composer", required_argument, 0, M4AF_TAG_COMPOSER },
168	{ "grouping", required_argument, 0, M4AF_TAG_GROUPING },
169	{ "comment", required_argument, 0, M4AF_TAG_COMMENT },
170	{ "album-artist", required_argument, 0, M4AF_TAG_ALBUM_ARTIST },
171	{ "track", required_argument, 0, M4AF_TAG_TRACK },
172	{ "disk", required_argument, 0, M4AF_TAG_DISK },
173	{ "tempo", required_argument, 0, M4AF_TAG_TEMPO },
174	};
175	params->afterburner = 1;
176
177	aacenc_getmainargs(&argc, &argv);
178	while ((ch = getopt_long(argc, argv, "hp:b:m:w:a:Ls:f:cP:Io:",
179	long_options, 0)) != EOF) {
180	switch (ch) {
181	case 'h':
182	return usage(), -1;
183	case 'p':
184	if (sscanf(optarg, "%u", &n) != 1) {
185	fprintf(stderr, "invalid arg for profile\n");
186	return -1;
187	}
188	params->profile = n;
189	break;
190	case 'b':
191	if (sscanf(optarg, "%u", &n) != 1) {
192	fprintf(stderr, "invalid arg for bitrate\n");
193	return -1;
194	}
195	params->bitrate = n;
196	break;
197	case 'm':
198	if (sscanf(optarg, "%u", &n) != 1 \|\| n > 5) {
199	fprintf(stderr, "invalid arg for bitrate-mode\n");
200	return -1;
201	}
202	params->bitrate_mode = n;
203	break;
204	case 'w':
205	if (sscanf(optarg, "%u", &n) != 1) {
206	fprintf(stderr, "invalid arg for bandwidth\n");
207	return -1;
208	}
209	params->bandwidth = n;
210	break;
211	case 'a':
212	if (sscanf(optarg, "%u", &n) != 1 \|\| n > 1) {
213	fprintf(stderr, "invalid arg for afterburner\n");
214	return -1;
215	}
216	params->afterburner = n;
217	break;
218	case 'L':
219	params->lowdelay_sbr = 1;
220	break;
221	case 's':
222	if (sscanf(optarg, "%u", &n) != 1 \|\| n > 2) {
223	fprintf(stderr, "invalid arg for sbr-signaling\n");
224	return -1;
225	}
226	params->sbr_signaling = n;
227	break;
228	case 'f':
229	if (sscanf(optarg, "%u", &n) != 1) {
230	fprintf(stderr, "invalid arg for transport-format\n");
231	return -1;
232	}
233	params->transport_format = n;
234	break;
235	case 'c':
236	params->adts_crc_check = 1;
237	break;
238	case 'P':
239	if (sscanf(optarg, "%u", &n) != 1) {
240	fprintf(stderr, "invalid arg for header-period\n");
241	return -1;
242	}
243	params->header_period = n;
244	break;
245	case 'o':
246	params->output_filename = optarg;
247	break;
248	case 'I':
249	params->ignore_length = 1;
250	break;
251	case M4AF_TAG_TITLE:
252	case M4AF_TAG_ARTIST:
253	case M4AF_TAG_ALBUM:
254	case M4AF_TAG_GENRE:
255	case M4AF_TAG_DATE:
256	case M4AF_TAG_COMPOSER:
257	case M4AF_TAG_GROUPING:
258	case M4AF_TAG_COMMENT:
259	case M4AF_TAG_ALBUM_ARTIST:
260	case M4AF_TAG_TRACK:
261	case M4AF_TAG_DISK:
262	case M4AF_TAG_TEMPO:
263	if (params->tag_count == params->tag_table_capacity) {
264	unsigned newsize = params->tag_table_capacity;
265	newsize = newsize ? newsize * 2 : 1;
266	params->tag_table =
267	realloc(params->tag_table,
268	newsize * sizeof(aacenc_tag_entry_t));
269	params->tag_table_capacity = newsize;
270	}
271	tag = params->tag_table + params->tag_count;
272	tag->tag = ch;
273	tag->data = optarg;
274	params->tag_count++;
275	break;
276	default:
277	return usage(), -1;
278	}
279	}
280	if (argc == optind)
281	return usage(), -1;
282	if (!params->bitrate && !params->bitrate_mode) {
283	fprintf(stderr, "bitrate or bitrate-mode is mandatory\n");
284	return -1;
285	}
286	if (params->output_filename && !strcmp(params->output_filename, "-") &&
287	!params->transport_format) {
288	fprintf(stderr, "stdout streaming is not available on M4A output\n");
289	return -1;
290	}
291	if (params->bitrate && params->bitrate < 10000)
292	params->bitrate *= 1000;
293	params->input_filename = argv[optind];
294	return 0;
295	};
296
297	static
298	int write_sample(FILE ofp, m4af_writer_t m4af,
299	const void *data, uint32_t size, uint32_t duration)
300	{
301	if (!m4af) {
5e1168a4	302	fwrite(data, 1, size, ofp);
5e1168a4	303	if (ferror(ofp)) {
48e2f01c	304	fprintf(stderr, "ERROR: fwrite(): %s\n", strerror(errno));
	305	return -1;
	306	}
	307	} else if (m4af_write_sample(m4af, 0, data, size, duration) < 0) {
	308	fprintf(stderr, "ERROR: failed to write m4a sample\n");
	309	return -1;
	310	}
	311	return 0;
	312	}
	313
	314	static
	315	int encode(wav_reader_t *wavf, HANDLE_AACENCODER encoder,
	316	uint32_t frame_length, FILE ofp, m4af_writer_t m4af)
	317	{
	318	uint8_t *ibuf = 0;
	319	int16_t *pcmbuf = 0;
	320	uint32_t pcmsize = 0;
	321	uint8_t *obuf = 0;
	322	uint32_t olen;
	323	uint32_t osize = 0;
	324	int nread = 1;
	325	int consumed;
	326	int rc = -1;
	327	int frames_written = 0;
	328	aacenc_progress_t progress = { 0 };
	329	const pcm_sample_description_t *format = wav_get_format(wavf);
	330
	331	ibuf = malloc(frame_length * format->bytes_per_frame);
	332	aacenc_progress_init(&progress, wav_get_length(wavf), format->sample_rate);
	333	do {
	334	if (nread) {
	335	if ((nread = wav_read_frames(wavf, ibuf, frame_length)) < 0) {
	336	fprintf(stderr, "ERROR: read failed\n");
	337	goto END;
	338	} else if (nread > 0) {
	339	if (pcm_convert_to_native_sint16(format, ibuf, nread,
	340	&pcmbuf, &pcmsize) < 0) {
	341	fprintf(stderr, "ERROR: unsupported sample format\n");
	342	goto END;
	343	}
	344	}
	345	aacenc_progress_update(&progress, wav_get_position(wavf),
	346	format->sample_rate * 2);
	347	}
	348	if ((consumed = aac_encode_frame(encoder, format, pcmbuf, nread,
	349	&obuf, &olen, &osize)) < 0)
	350	goto END;
	351	if (olen > 0) {
	352	if (write_sample(ofp, m4af, obuf, olen, frame_length) < 0)
	353	goto END;
	354	++frames_written;
	355	}
	356	} while (nread > 0 \|\| olen > 0);
	357	aacenc_progress_finish(&progress, wav_get_position(wavf));
	358	rc = frames_written;
	359	END:
	360	if (ibuf) free(ibuf);
	361	if (pcmbuf) free(pcmbuf);
	362	if (obuf) free(obuf);
	363	return rc;
	364	}
	365
	366	static
	367	int finalize_m4a(m4af_writer_t m4af, const aacenc_param_ex_t params,
368	HANDLE_AACENCODER encoder)
369	{
370	unsigned i;
371	aacenc_tag_entry_t *tag = params->tag_table;
372
373	for (i = 0; i < params->tag_count; ++i, ++tag) {
374	switch (tag->tag) {
375	case M4AF_TAG_TRACK:
376	{
377	unsigned m, n = 0;
378	if (sscanf(tag->data, "%u/%u", &m, &n) >= 1)
379	m4af_add_itmf_track_tag(m4af, m, n);
380	break;
381	}
382	case M4AF_TAG_DISK:
383	{
384	unsigned m, n = 0;
385	if (sscanf(tag->data, "%u/%u", &m, &n) >= 1)
386	m4af_add_itmf_disk_tag(m4af, m, n);
387	break;
388	}
389	case M4AF_TAG_TEMPO:
390	{
391	unsigned n;
392	if (sscanf(tag->data, "%u", &n) == 1)
393	m4af_add_itmf_int16_tag(m4af, tag->tag, n);
394	break;
395	}
396	default:
397	{
398	char *u8 = aacenc_to_utf8(tag->data);
399	m4af_add_itmf_string_tag(m4af, tag->tag, u8);
400	free(u8);
401	}
402	}
403	}
404	{
405	char tool_info[256];
406	char *p = tool_info;
407	LIB_INFO *lib_info = 0;
408
409	p += sprintf(p, PROGNAME " %s, ", fdkaac_version);
410
d1ce2536	411	lib_info = calloc(FDK_MODULE_LAST, sizeof(LIB_INFO));
48e2f01c	412	if (aacEncGetLibInfo(lib_info) == AACENC_OK) {
	413	for (i = 0; i < FDK_MODULE_LAST; ++i)
	414	if (lib_info[i].module_id == FDK_AACENC)
	415	break;
	416	p += sprintf(p, "libfdk-aac %s, ", lib_info[i].versionStr);
	417	}
	418	free(lib_info);
	419	if (params->bitrate_mode)
	420	sprintf(p, "VBR mode %d", params->bitrate_mode);
	421	else
112fdaf4	422	sprintf(p, "CBR %dkbps",
112fdaf4	423	aacEncoder_GetParam(encoder, AACENC_BITRATE) / 1000);
48e2f01c	424
	425	m4af_add_itmf_string_tag(m4af, M4AF_TAG_TOOL, tool_info);
	426	}
	427	if (m4af_finalize(m4af) < 0) {
	428	fprintf(stderr, "ERROR: failed to finalize m4a\n");
	429	return -1;
	430	}
	431	return 0;
	432	}
	433
af8fa38d	434	static
	435	const char basename(const char filename)
	436	{
	437	char *p = strrchr(filename, '/');
	438	#ifdef _WIN32
	439	char *q = strrchr(filename, '\\');
	440	if (p < q) p = q;
	441	#endif
	442	return p ? p + 1 : filename;
	443	}
	444
	445	static
	446	char generate_output_filename(const char filename, const char *ext)
	447	{
	448	char *p = 0;
	449	size_t ext_len = strlen(ext);
	450
	451	if (strcmp(filename, "-") == 0) {
	452	p = malloc(ext_len + 6);
	453	sprintf(p, "stdin%s", ext);
	454	} else {
	455	const char *base = basename(filename);
	456	size_t ilen = strlen(base);
	457	const char *ext_org = strrchr(base, '.');
	458	if (ext_org) ilen = ext_org - base;
	459	p = malloc(ilen + ext_len + 1);
	460	sprintf(p, "%.*s%s", ilen, base, ext);
	461	}
	462	return p;
	463	}
	464
48e2f01c	465	int main(int argc, char **argv)
	466	{
	467	wav_io_context_t wav_io = { read_callback, seek_callback };
	468	m4af_io_callbacks_t m4af_io = {
	469	write_callback, seek_callback, tell_callback };
	470	aacenc_param_ex_t params = { 0 };
	471
	472	int result = 2;
	473	FILE *ifp = 0;
	474	FILE *ofp = 0;
	475	char *output_filename = 0;
	476	wav_reader_t *wavf = 0;
	477	HANDLE_AACENCODER encoder = 0;
	478	AACENC_InfoStruct aacinfo = { 0 };
	479	m4af_writer_t *m4af = 0;
	480	const pcm_sample_description_t *sample_format;
	481	int downsampled_timescale = 0;
	482	int frame_count = 0;
7222b0b5	483	struct stat stb = { 0 };
48e2f01c	484
	485	setlocale(LC_CTYPE, "");
	486	setbuf(stderr, 0);
	487
	488	if (parse_options(argc, argv, &params) < 0)
	489	return 1;
	490
	491	if ((ifp = aacenc_fopen(params.input_filename, "rb")) == 0) {
	492	aacenc_fprintf(stderr, "ERROR: %s: %s\n", params.input_filename,
	493	strerror(errno));
	494	goto END;
	495	}
	496
7222b0b5	497	if (fstat(fileno(ifp), &stb) == 0 && (stb.st_mode & S_IFMT) != S_IFREG)
48e2f01c	498	wav_io.seek = 0;
	499
	500	if ((wavf = wav_open(&wav_io, ifp, params.ignore_length)) == 0) {
	501	fprintf(stderr, "ERROR: broken / unsupported input file\n");
	502	goto END;
	503	}
	504	sample_format = wav_get_format(wavf);
	505
	506	if (aacenc_init(&encoder, (aacenc_param_t*)&params, sample_format,
	507	&aacinfo) < 0)
	508	goto END;
	509
	510	if (!params.output_filename) {
af8fa38d	511	const char *ext = params.transport_format ? ".aac" : ".m4a";
af8fa38d	512	output_filename = generate_output_filename(params.input_filename, ext);
48e2f01c	513	params.output_filename = output_filename;
	514	}
	515
	516	if ((ofp = aacenc_fopen(params.output_filename, "wb")) == 0) {
	517	aacenc_fprintf(stderr, "ERROR: %s: %s\n", params.output_filename,
	518	strerror(errno));
	519	goto END;
	520	}
	521	if (!params.transport_format) {
	522	uint32_t scale;
	523	unsigned framelen = aacinfo.frameLength;
	524	int sbr_mode = aacenc_is_sbr_active((aacenc_param_t*)&params);
	525	int sig_mode = aacEncoder_GetParam(encoder, AACENC_SIGNALING_MODE);
	526	if (sbr_mode && !sig_mode)
	527	downsampled_timescale = 1;
	528	scale = sample_format->sample_rate >> downsampled_timescale;
	529	if ((m4af = m4af_create(M4AF_CODEC_MP4A, scale, &m4af_io, ofp)) < 0)
	530	goto END;
	531	m4af_decoder_specific_info(m4af, 0, aacinfo.confBuf, aacinfo.confSize);
	532	m4af_set_fixed_frame_duration(m4af, 0,
	533	framelen >> downsampled_timescale);
	534	m4af_begin_write(m4af);
	535	}
	536	frame_count = encode(wavf, encoder, aacinfo.frameLength, ofp, m4af);
	537	if (frame_count < 0)
	538	goto END;
	539	if (m4af) {
	540	uint32_t delay = aacinfo.encoderDelay;
	541	int64_t frames_read = wav_get_position(wavf);
	542	uint32_t padding = frame_count * aacinfo.frameLength
	543	- frames_read - aacinfo.encoderDelay;
	544	m4af_set_priming(m4af, 0, delay >> downsampled_timescale,
	545	padding >> downsampled_timescale);
	546	if (finalize_m4a(m4af, &params, encoder) < 0)
	547	goto END;
	548	}
	549	result = 0;
	550	END:
	551	if (wavf) wav_teardown(&wavf);
	552	if (ifp) fclose(ifp);
	553	if (m4af) m4af_teardown(&m4af);
	554	if (ofp) fclose(ofp);
	555	if (encoder) aacEncClose(&encoder);
	556	if (output_filename) free(output_filename);
	557	if (params.tag_table) free(params.tag_table);
	558
	559	return result;
	560	}