#ifndef TGA_INC_CPP
#define TGA_INC_CPP


#include <cstdio>


bool tgaSave(const char *filename, const unsigned char *data, int w, int h, int ch) {
    if (!data || w <= 0 || h <= 0 || w > 0xffff || h > 0xffff || (ch != 3 && ch != 4)) {
        printf("ERROR: cannot save image (bad image): %s\n", filename);
        return false;
    }

    FILE *f = fopen(filename, "wb");
    if (!f) {
        printf("ERROR: cannot open file: %s\n", filename);
        return false;
    }

    #pragma pack(push,1)
    struct Header {
        unsigned char  idLength;
        unsigned char  colormapType;
        unsigned char  imageType;
        unsigned char  colormapIndex[2];
        unsigned char  colormapLength[2];
        unsigned char  colormapSize;
        unsigned char  xOrigin[2];
        unsigned char  yOrigin[2];
        unsigned char  width[2];
        unsigned char  height[2];
        unsigned char  pixelSize;
        unsigned char  attributes;
    };
    #pragma pack(pop)
    Header header = {};
    header.imageType = 2;
    header.width[0] = w;
    header.width[1] = w >> 8;
    header.height[0] = h;
    header.height[1] = h >> 8;
    header.pixelSize = ch == 4 ? 32 : 24;
    fwrite(&header, sizeof(header), 1, f);

    int rowSize = w*ch;
    int size = h*rowSize;
    const unsigned char *row = data + size;
    for(unsigned short r = h; r; --r, row -= rowSize) {
        for(const unsigned char *c = row - rowSize; c < row; c += ch) {
            fputc(c[2], f);
            fputc(c[1], f);
            fputc(c[0], f);
            if (ch == 4) fputc(c[3], f);
        }
    }
    fclose(f);

    return true;
}


#endif