aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/image_writer.c
blob: 0b3028d050c2c8655319034f6b4f381336fabfca (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
#include "../include/image_writer.h"
#include "../include/egl.h"
#include "../include/utils.h"

#define STB_IMAGE_WRITE_IMPLEMENTATION
#include "../external/stb_image_write.h"

#include <stdlib.h>
#include <stdint.h>
#include <stdio.h>
#include <assert.h>
#include <dlfcn.h>

#define TJPF_RGBA 7
#define TJSAMP_420 2

typedef void* tjhandle;
typedef tjhandle (*FUNC_tjInitCompress)(void);
typedef int (*FUNC_tjCompress2)(tjhandle handle, const unsigned char *srcBuf,
                                int width, int pitch, int height, int pixelFormat,
                                unsigned char **jpegBuf, unsigned long *jpegSize,
                                int jpegSubsamp, int jpegQual, int flags);
typedef int (*FUNC_tjDestroy)(tjhandle handle);
typedef void (*FUNC_tjFree)(unsigned char *buffer);

static bool write_buffer_to_file(const char *filepath, const unsigned char *data, unsigned long size) {
    FILE *file = fopen(filepath, "wb");
    if(!file)
        return false;

    const bool success = fwrite(data, size, 1, file) == 1;
    fclose(file);
    return success;
}

static bool write_jpeg_with_libturbojpeg(const char *filepath, int width, int height, const void *data, int quality) {
    void *libturbojpeg_lib = dlopen("libturbojpeg.so.0", RTLD_LAZY);
    if(!libturbojpeg_lib)
        return false;

    bool success = false;
    const FUNC_tjInitCompress tjInitCompress_func = (FUNC_tjInitCompress)dlsym(libturbojpeg_lib, "tjInitCompress");
    const FUNC_tjCompress2 tjCompress2_func = (FUNC_tjCompress2)dlsym(libturbojpeg_lib, "tjCompress2");
    const FUNC_tjDestroy tjDestroy_func = (FUNC_tjDestroy)dlsym(libturbojpeg_lib, "tjDestroy");
    const FUNC_tjFree tjFree_func = (FUNC_tjFree)dlsym(libturbojpeg_lib, "tjFree");
    if(!tjInitCompress_func || !tjCompress2_func || !tjDestroy_func || !tjFree_func) {
        dlclose(libturbojpeg_lib);
        return false;
    }

    tjhandle compressor = tjInitCompress_func();
    if(compressor) {
        unsigned char *jpeg_data = NULL;
        unsigned long jpeg_size = 0;
        if(tjCompress2_func(compressor, data, width, width * 4, height, TJPF_RGBA, &jpeg_data, &jpeg_size, TJSAMP_420, quality, 0) == 0)
            success = write_buffer_to_file(filepath, jpeg_data, jpeg_size);

        if(jpeg_data)
            tjFree_func(jpeg_data);
        tjDestroy_func(compressor);
    }

    dlclose(libturbojpeg_lib);
    return success;
}

/* TODO: Support hdr/10-bit */
bool gsr_image_writer_init_opengl(gsr_image_writer *self, gsr_egl *egl, int width, int height) {
    memset(self, 0, sizeof(*self));
    self->egl = egl;
    self->width = width;
    self->height = height;
    self->texture = gl_create_texture(self->egl, self->width, self->height, GL_RGBA8, GL_RGBA, GL_NEAREST); /* TODO: use GL_RGB16 instead of GL_RGB8 for hdr/10-bit */
    if(self->texture == 0) {
        fprintf(stderr, "gsr error: gsr_image_writer_init: failed to create texture\n");
        return false;
    }
    return true;
}

void gsr_image_writer_deinit(gsr_image_writer *self) {
    if(self->texture) {
        self->egl->glDeleteTextures(1, &self->texture);
        self->texture = 0;
    }
}

static bool gsr_image_writer_write_memory_to_file(gsr_image_writer *self, const char *filepath, gsr_image_format image_format, int quality, const void *data) {
    if(quality < 1)
        quality = 1;
    else if(quality > 100)
        quality = 100;

    bool success = false;
    switch(image_format) {
        case GSR_IMAGE_FORMAT_JPEG:
            success = write_jpeg_with_libturbojpeg(filepath, self->width, self->height, data, quality);
            if(!success)
                success = stbi_write_jpg(filepath, self->width, self->height, 4, data, quality);
            break;
        case GSR_IMAGE_FORMAT_PNG:
            success = stbi_write_png(filepath, self->width, self->height, 4, data, 0);
            break;
    }

    if(!success)
        fprintf(stderr, "gsr error: gsr_image_writer_write_to_file: failed to write image data to output file %s\n", filepath);

    return success;
}

static bool gsr_image_writer_write_opengl_texture_to_file(gsr_image_writer *self, const char *filepath, gsr_image_format image_format, int quality) {
    uint8_t *frame_data = malloc(self->width * self->height * 4);
    if(!frame_data) {
        fprintf(stderr, "gsr error: gsr_image_writer_write_to_file: failed to allocate memory for image frame\n");
        return false;
    }

    unsigned int fbo = 0;
    self->egl->glGenFramebuffers(1, &fbo);
    self->egl->glBindFramebuffer(GL_FRAMEBUFFER, fbo);
    self->egl->glFramebufferTexture2D(GL_FRAMEBUFFER, GL_COLOR_ATTACHMENT0, GL_TEXTURE_2D, self->texture, 0);

    self->egl->glReadPixels(0, 0, self->width, self->height, GL_RGBA, GL_UNSIGNED_BYTE, frame_data);

    self->egl->glBindFramebuffer(GL_FRAMEBUFFER, 0);
    self->egl->glDeleteFramebuffers(1, &fbo);

    self->egl->glFlush();
    self->egl->glFinish();
    
    const bool success = gsr_image_writer_write_memory_to_file(self, filepath, image_format, quality, frame_data);
    free(frame_data);
    return success;
}

bool gsr_image_writer_write_to_file(gsr_image_writer *self, const char *filepath, gsr_image_format image_format, int quality) {
    return gsr_image_writer_write_opengl_texture_to_file(self, filepath, image_format, quality);
}