#include "cvt_xmi2mid.hpp"
#include <stdio.h>
#include <sys/stat.h>
#if !defined(_WIN32)
#include <unistd.h>
#else
#include <io.h>
#define fileno(fd) _fileno(fd)
#define isatty(fd) _isatty(fd)
#endif

int main(int argc, char *argv[])
{
    int songNumber = 0;

    (void)Convert_xmi2midi_multi; /* Shut up the warning */

    if(argc != 2 && argc != 3)
    {
        fprintf(stderr, "Usage: xmi2mid <midi-file> [song-number 0...N-1]\n");
        return 1;
    }

    const char *filename = argv[1];

    if(argc > 2)
        songNumber = atoi(argv[2]);

    FILE *fh = fopen(filename, "rb");
    if(!fh)
    {
        fprintf(stderr, "Error opening file.\n");
        return 1;
    }

    struct stat st;
    if(fstat(fileno(fh), &st) != 0)
    {
        fprintf(stderr, "Error reading file status.\n");
        return 1;
    }

    size_t insize = (size_t)st.st_size;
    if(insize > 8 * 1024 * 1024)
    {
        fprintf(stderr, "File too large.\n");
        return 1;
    }

    uint8_t *filedata = new uint8_t[insize];
    if(fread(filedata, 1, insize, fh) != insize)
    {
        fprintf(stderr, "Error reading file data.\n");
        return 1;
    }

    uint8_t *xmidata = NULL;
    uint32_t xmisize = 0;

    if(Convert_xmi2midi(filedata, insize, &xmidata, &xmisize, XMIDI_CONVERT_NOCONVERSION, songNumber) < 0)
    {
        fprintf(stderr, "Error converting XMI to SMF.\n");
        return 1;
    }

    FILE *out = stdout;
    if(isatty(fileno(out)))
    {
        fprintf(stderr, "Not writing SMF data on the text terminal.\n");
    }
    else
    {
        if (fwrite(xmidata, 1, xmisize, out) != xmisize || fflush(out) != 0)
        {
            fprintf(stderr, "Error writing SMF data.\n");
            return 1;
        }
    }

    return 0;
}