From deebc55014074fef121c1df6b117e9c0bf97d516 Mon Sep 17 00:00:00 2001 From: Niklas Haas Date: Sat, 29 Aug 2015 01:10:30 +0200 Subject: vo_opengl: move gl_* files to their own subdir This is mainly just to keep things a bit more organized and separated inside the codebase. --- video/out/gl_lcms.c | 344 ---------------------------------------------------- 1 file changed, 344 deletions(-) delete mode 100644 video/out/gl_lcms.c (limited to 'video/out/gl_lcms.c') diff --git a/video/out/gl_lcms.c b/video/out/gl_lcms.c deleted file mode 100644 index ec3013c553..0000000000 --- a/video/out/gl_lcms.c +++ /dev/null @@ -1,344 +0,0 @@ -/* - * This file is part of mpv. - * - * mpv is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 2 of the License, or - * (at your option) any later version. - * - * mpv is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License along - * with mpv. If not, see . - * - * You can alternatively redistribute this file and/or - * modify it under the terms of the GNU Lesser General Public - * License as published by the Free Software Foundation; either - * version 2.1 of the License, or (at your option) any later version. - */ - -#include - -#include "talloc.h" - -#include "config.h" - -#include "stream/stream.h" -#include "common/common.h" -#include "misc/bstr.h" -#include "common/msg.h" -#include "options/m_option.h" -#include "options/path.h" - -#include "gl_video.h" -#include "gl_lcms.h" - -#include "osdep/io.h" - -#if HAVE_LCMS2 - -#include -#include -#include - -struct gl_lcms { - void *icc_data; - size_t icc_size; - char *icc_path; - bool changed; - - struct mp_log *log; - struct mpv_global *global; - struct mp_icc_opts opts; -}; - -static bool parse_3dlut_size(const char *arg, int *p1, int *p2, int *p3) -{ - if (sscanf(arg, "%dx%dx%d", p1, p2, p3) != 3) - return false; - for (int n = 0; n < 3; n++) { - int s = ((int[]) { *p1, *p2, *p3 })[n]; - if (s < 2 || s > 512 || ((s - 1) & s)) - return false; - } - return true; -} - -static int validate_3dlut_size_opt(struct mp_log *log, const m_option_t *opt, - struct bstr name, struct bstr param) -{ - int p1, p2, p3; - char s[20]; - snprintf(s, sizeof(s), "%.*s", BSTR_P(param)); - return parse_3dlut_size(s, &p1, &p2, &p3); -} - -#define OPT_BASE_STRUCT struct mp_icc_opts -const struct m_sub_options mp_icc_conf = { - .opts = (const m_option_t[]) { - OPT_STRING("icc-profile", profile, 0), - OPT_FLAG("icc-profile-auto", profile_auto, 0), - OPT_STRING("icc-cache-dir", cache_dir, 0), - OPT_INT("icc-intent", intent, 0), - OPT_STRING_VALIDATE("3dlut-size", size_str, 0, validate_3dlut_size_opt), - - OPT_REMOVED("icc-cache", "see icc-cache-dir"), - {0} - }, - .size = sizeof(struct mp_icc_opts), - .defaults = &(const struct mp_icc_opts) { - .size_str = "128x256x64", - .intent = INTENT_RELATIVE_COLORIMETRIC, - }, -}; - -static void lcms2_error_handler(cmsContext ctx, cmsUInt32Number code, - const char *msg) -{ - struct gl_lcms *p = cmsGetContextUserData(ctx); - MP_ERR(p, "lcms2: %s\n", msg); -} - -static bool load_profile(struct gl_lcms *p) -{ - if (p->icc_data && p->icc_size) - return true; - - if (!p->icc_path) - return false; - - char *fname = mp_get_user_path(NULL, p->global, p->icc_path); - MP_VERBOSE(p, "Opening ICC profile '%s'\n", fname); - struct bstr iccdata = stream_read_file(fname, p, p->global, - 100000000); // 100 MB - talloc_free(fname); - if (!iccdata.len) - return false; - - p->icc_data = iccdata.start; - p->icc_size = iccdata.len; - return true; -} - -struct gl_lcms *gl_lcms_init(void *talloc_ctx, struct mp_log *log, - struct mpv_global *global) -{ - struct gl_lcms *p = talloc_ptrtype(talloc_ctx, p); - *p = (struct gl_lcms) { - .global = global, - .log = log, - .changed = true, - }; - return p; -} - -void gl_lcms_set_options(struct gl_lcms *p, struct mp_icc_opts *opts) -{ - p->opts = *opts; - p->icc_path = talloc_strdup(p, p->opts.profile); - load_profile(p); - p->changed = true; // probably -} - -// Warning: profile.start must point to a ta allocation, and the function -// takes over ownership. -void gl_lcms_set_memory_profile(struct gl_lcms *p, bstr *profile) -{ - if (!p->opts.profile_auto) { - talloc_free(profile->start); - return; - } - - if (!p->icc_path && p->icc_data && profile->start && - profile->len == p->icc_size && - memcmp(profile->start, p->icc_data, p->icc_size) == 0) - { - talloc_free(profile->start); - return; - } - - p->changed = true; - - talloc_free(p->icc_path); - p->icc_path = NULL; - - talloc_free(p->icc_data); - - p->icc_data = talloc_steal(p, profile->start); - p->icc_size = profile->len; -} - -// Return and _reset_ whether the lookul table has changed since the last call. -// If it has changed, gl_lcms_get_lut3d() should be called. -bool gl_lcms_has_changed(struct gl_lcms *p) -{ - bool change = p->changed; - p->changed = false; - return change; -} - -bool gl_lcms_get_lut3d(struct gl_lcms *p, struct lut3d **result_lut3d) -{ - int s_r, s_g, s_b; - bool result = false; - - if (!parse_3dlut_size(p->opts.size_str, &s_r, &s_g, &s_b)) - return false; - - if (!p->icc_data && !p->icc_path) - return false; - - void *tmp = talloc_new(NULL); - uint16_t *output = talloc_array(tmp, uint16_t, s_r * s_g * s_b * 3); - struct lut3d *lut = NULL; - cmsContext cms = NULL; - - char *cache_file = NULL; - if (p->opts.cache_dir && p->opts.cache_dir[0]) { - // Gamma is included in the header to help uniquely identify it, - // because we may change the parameter in the future or make it - // customizable, same for the primaries. - char *cache_info = talloc_asprintf(tmp, - "ver=1.1, intent=%d, size=%dx%dx%d, gamma=2.4, prim=bt2020\n", - p->opts.intent, s_r, s_g, s_b); - - uint8_t hash[32]; - struct AVSHA *sha = av_sha_alloc(); - if (!sha) - abort(); - av_sha_init(sha, 256); - av_sha_update(sha, cache_info, strlen(cache_info)); - av_sha_update(sha, p->icc_data, p->icc_size); - av_sha_final(sha, hash); - av_free(sha); - - char *cache_dir = mp_get_user_path(tmp, p->global, p->opts.cache_dir); - cache_file = talloc_strdup(tmp, ""); - for (int i = 0; i < sizeof(hash); i++) - cache_file = talloc_asprintf_append(cache_file, "%02X", hash[i]); - cache_file = mp_path_join(tmp, cache_dir, cache_file); - - mp_mkdirp(cache_dir); - } - - // check cache - if (cache_file) { - MP_VERBOSE(p, "Opening 3D LUT cache in file '%s'.\n", cache_file); - struct bstr cachedata = stream_read_file(cache_file, tmp, p->global, - 1000000000); // 1 GB - if (cachedata.len == talloc_get_size(output)) { - memcpy(output, cachedata.start, cachedata.len); - goto done; - } else { - MP_WARN(p, "3D LUT cache invalid!\n"); - } - } - - cms = cmsCreateContext(NULL, p); - if (!cms) - goto error_exit; - cmsSetLogErrorHandlerTHR(cms, lcms2_error_handler); - - cmsHPROFILE profile = - cmsOpenProfileFromMemTHR(cms, p->icc_data, p->icc_size); - if (!profile) - goto error_exit; - - // We always generate the 3DLUT against BT.2020, and transform into this - // space inside the shader if the source differs. - struct mp_csp_primaries csp = mp_get_csp_primaries(MP_CSP_PRIM_BT_2020); - - cmsCIExyY wp = {csp.white.x, csp.white.y, 1.0}; - cmsCIExyYTRIPLE prim = { - .Red = {csp.red.x, csp.red.y, 1.0}, - .Green = {csp.green.x, csp.green.y, 1.0}, - .Blue = {csp.blue.x, csp.blue.y, 1.0}, - }; - - // 2.4 is arbitrarily used as a gamma compression factor for the 3DLUT, - // reducing artifacts due to rounding errors on wide gamut profiles - cmsToneCurve *tonecurve = cmsBuildGamma(cms, 2.4); - cmsHPROFILE vid_profile = cmsCreateRGBProfileTHR(cms, &wp, &prim, - (cmsToneCurve*[3]){tonecurve, tonecurve, tonecurve}); - cmsFreeToneCurve(tonecurve); - cmsHTRANSFORM trafo = cmsCreateTransformTHR(cms, vid_profile, TYPE_RGB_16, - profile, TYPE_RGB_16, - p->opts.intent, - cmsFLAGS_HIGHRESPRECALC); - cmsCloseProfile(profile); - cmsCloseProfile(vid_profile); - - if (!trafo) - goto error_exit; - - // transform a (s_r)x(s_g)x(s_b) cube, with 3 components per channel - uint16_t *input = talloc_array(tmp, uint16_t, s_r * 3); - for (int b = 0; b < s_b; b++) { - for (int g = 0; g < s_g; g++) { - for (int r = 0; r < s_r; r++) { - input[r * 3 + 0] = r * 65535 / (s_r - 1); - input[r * 3 + 1] = g * 65535 / (s_g - 1); - input[r * 3 + 2] = b * 65535 / (s_b - 1); - } - size_t base = (b * s_r * s_g + g * s_r) * 3; - cmsDoTransform(trafo, input, output + base, s_r); - } - } - - cmsDeleteTransform(trafo); - - if (cache_file) { - FILE *out = fopen(cache_file, "wb"); - if (out) { - fwrite(output, talloc_get_size(output), 1, out); - fclose(out); - } - } - -done: ; - - lut = talloc_ptrtype(NULL, lut); - *lut = (struct lut3d) { - .data = talloc_steal(lut, output), - .size = {s_r, s_g, s_b}, - }; - - *result_lut3d = lut; - result = true; - -error_exit: - - if (cms) - cmsDeleteContext(cms); - - if (!lut) - MP_FATAL(p, "Error loading ICC profile.\n"); - - talloc_free(tmp); - return result; -} - -#else /* HAVE_LCMS2 */ - -const struct m_sub_options mp_icc_conf = { - .opts = (const m_option_t[]) { {0} }, - .size = sizeof(struct mp_icc_opts), - .defaults = &(const struct mp_icc_opts) {0}, -}; - - -struct gl_lcms *gl_lcms_init(void *talloc_ctx, struct mp_log *log, - struct mpv_global *global) -{ - return (struct gl_lcms *) talloc_new(talloc_ctx); -} - -void gl_lcms_set_options(struct gl_lcms *p, struct mp_icc_opts *opts) { } -void gl_lcms_set_memory_profile(struct gl_lcms *p, bstr *profile) { } -bool gl_lcms_get_lut3d(struct gl_lcms *p, struct lut3d **x) { return false; } -bool gl_lcms_has_changed(struct gl_lcms *p) { return false; } - -#endif -- cgit v1.2.3