From 724f722d7f284076e717d59c8565b7ed27dadae3 Mon Sep 17 00:00:00 2001 From: wm4 Date: Tue, 20 Jan 2015 21:15:04 +0100 Subject: vo_opengl_old: remove this VO At this point, there is probably no hardware left that doesn't do OpenGL 2.1, and at the same time is fast enough to handle video. --- DOCS/man/vo.rst | 181 +--- old-makefile | 4 +- video/out/gl_common.c | 2 - video/out/pnm_loader.c | 97 -- video/out/pnm_loader.h | 52 -- video/out/vo.c | 4 - video/out/vo_opengl_old.c | 2167 --------------------------------------------- wscript_build.py | 2 - 8 files changed, 2 insertions(+), 2507 deletions(-) delete mode 100644 video/out/pnm_loader.c delete mode 100644 video/out/pnm_loader.h delete mode 100644 video/out/vo_opengl_old.c diff --git a/DOCS/man/vo.rst b/DOCS/man/vo.rst index d56dec4caf..4d97a281c0 100644 --- a/DOCS/man/vo.rst +++ b/DOCS/man/vo.rst @@ -278,8 +278,7 @@ Available video output drivers are: ``opengl-hq`` to use this driver with defaults set to high quality rendering. - Requires at least OpenGL 2.1 and the ``GL_ARB_texture_rg`` extension. For - older drivers, ``opengl-old`` may work. + Requires at least OpenGL 2.1. Some features are available with OpenGL 3 capable graphics drivers only (or if the necessary extensions are available). @@ -624,184 +623,6 @@ Available video output drivers are: float texture support, and some OS X setups being very slow with ``rgb16`` but fast with ``rgb32f``. -``opengl-old`` - OpenGL video output driver, old version. Video size must be smaller - than the maximum texture size of your OpenGL implementation. Intended to - work even with the most basic OpenGL implementations, but also makes use - of newer extensions which allow support for more color spaces. - - The code performs very few checks, so if a feature does not work, this - might be because it is not supported by your card and/or OpenGL - implementation, even if you do not get any error message. Use ``glxinfo`` - or a similar tool to display the supported OpenGL extensions. - - .. note:: This driver is for compatibility with old systems. - - ``(no-)ati-hack`` - ATI drivers may give a corrupted image when PBOs are used (when using - ``force-pbo``). This option fixes this, at the expense of using a bit - more memory. - ``(no-)force-pbo`` - Always uses PBOs to transfer textures even if this involves an extra - copy. Currently this gives a little extra speed with NVIDIA drivers - and a lot more speed with ATI drivers. May need the ``ati-hack`` - suboption to work correctly. - ``(no-)scaled-osd`` - Scales the OSD and subtitles instead of rendering them at display size - (default: disabled). - ``rectangle=<0,1,2>`` - Select usage of rectangular textures, which saves video RAM, but often - is slower (default: 0). - - 0 - Use power-of-two textures (default). - 1 - Use the ``GL_ARB_texture_rectangle`` extension. - 2 - Use the ``GL_ARB_texture_non_power_of_two`` extension. In some - cases only supported in software and thus very slow. - - ``swapinterval=`` - Minimum interval between two buffer swaps, counted in displayed frames - (default: 1). 1 is equivalent to enabling VSYNC, 0 to disabling VSYNC. - Values below 0 will leave it at the system default. This limits the - framerate to (horizontal refresh rate / n). Requires - ``GLX_SGI_swap_control`` support to work. With some (most/all?) - implementations this only works in fullscreen mode. - ``ycbcr`` - Use the ``GL_MESA_ycbcr_texture`` extension to convert YUV to RGB. In - most cases this is probably slower than doing software conversion to - RGB. - ``yuv=`` - Select the type of YUV to RGB conversion. The default is - auto-detection deciding between values 0 and 2. - - 0 - Use software conversion. Compatible with all OpenGL versions. - Provides brightness, contrast and saturation control. - 1 - Same as 2. This used to use NVIDIA-specific extensions, which - did not provide any advantages over using fragment programs, except - possibly on very ancient graphics cards. It produced a gray-ish - output, which is why it has been removed. - 2 - Use a fragment program. Needs the ``GL_ARB_fragment_program`` - extension and at least three texture units. Provides brightness, - contrast, saturation and hue control. - 3 - Use a fragment program using the ``POW`` instruction. Needs the - ``GL_ARB_fragment_program`` extension and at least three texture - units. Provides brightness, contrast, saturation, hue and gamma - control. Gamma can also be set independently for red, green and - blue. Method 4 is usually faster. - 4 - Use a fragment program with additional lookup. Needs the - ``GL_ARB_fragment_program`` extension and at least four texture - units. Provides brightness, contrast, saturation, hue and gamma - control. Gamma can also be set independently for red, green and - blue. - 5 - Removed. Used ATI-specific method (for older cards). - 6 - Use a 3D texture to do conversion via lookup. Needs the - ``GL_ARB_fragment_program extension`` and at least four texture - units. Extremely slow (software emulation) on some (all?) ATI - cards since it uses a texture with border pixels. Provides - brightness, contrast, saturation, hue and gamma control. Gamma can - also be set independently for red, green and blue. Speed depends - more on GPU memory bandwidth than other methods. - - ``lscale=`` - Select the scaling function to use for luminance scaling. Only valid - for yuv modes 2, 3, 4 and 6. - - 0 - Use simple linear filtering (default). - 1 - Use bicubic B-spline filtering (better quality). Needs one - additional texture unit. Older cards will not be able to handle - this for chroma at least in fullscreen mode. - 2 - Use cubic filtering in horizontal, linear filtering in vertical - direction. Works on a few more cards than method 1. - 3 - Same as 1 but does not use a lookup texture. Might be faster on - some cards. - 4 - Use experimental unsharp masking with 3x3 support and a default - strength of 0.5 (see ``filter-strength``). - 5 - Use experimental unsharp masking with 5x5 support and a default - strength of 0.5 (see ``filter-strength``). - - ``cscale=`` - Select the scaling function to use for chrominance scaling. For - details see ``lscale``. - ``filter-strength=`` - Set the effect strength for the ``lscale``/``cscale`` filters that - support it. - ``stereo=`` - Select a method for stereo display. You may have to use - ``--video-aspect`` to fix the aspect value. Experimental, do not expect - too much from it. - - 0 - Normal 2D display - 1 - Convert side by side input to full-color red-cyan stereo. - 2 - Convert side by side input to full-color green-magenta stereo. - 3 - Convert side by side input to quad buffered stereo. Only supported - by very few OpenGL cards. - - The following options are only useful if writing your own fragment programs. - - ``customprog=`` - Load a custom fragment program from ````. - ``customtex=`` - Load a custom "gamma ramp" texture from ````. This can be used - in combination with ``yuv=4`` or with the ``customprog`` option. - ``(no-)customtlin`` - If enabled (default) use ``GL_LINEAR`` interpolation, otherwise use - ``GL_NEAREST`` for customtex texture. - ``(no-)customtrect`` - If enabled, use ``texture_rectangle`` for the ``customtex`` texture. - Default is disabled. - ``(no-)mipmapgen`` - If enabled, mipmaps for the video are automatically generated. This - should be useful together with the ``customprog`` and the ``TXB`` - instruction to implement blur filters with a large radius. For most - OpenGL implementations, this is very slow for any non-RGB formats. - Default is disabled. - - Normally there is no reason to use the following options; they mostly - exist for testing purposes. - - ``(no-)glfinish`` - Call ``glFinish()`` before swapping buffers. Slower but in some cases - more correct output (default: disabled). - ``(no-)manyfmts`` - Enables support for more (RGB and BGR) color formats (default: enabled). - Needs OpenGL version >= 1.2. - ``slice-height=<0-...>`` - Number of lines copied to texture in one piece (default: 0). 0 for - whole image. - ``sw`` - Continue even if a software renderer is detected. - - ``backend=`` - auto - auto-select (default) - cocoa - Cocoa/OS X - win - Win32/WGL - x11 - X11/GLX - wayland - Wayland/EGL - ``sdl`` SDL 2.0+ Render video output driver, depending on system with or without hardware acceleration. Should work on all platforms supported by SDL 2.0. diff --git a/old-makefile b/old-makefile index b3c97babe3..2d899ca7e2 100644 --- a/old-makefile +++ b/old-makefile @@ -63,9 +63,7 @@ SOURCES-$(GL) += video/out/gl_common.c video/out/gl_osd.c \ video/out/vo_opengl.c video/out/gl_lcms.c \ video/out/gl_video.c video/out/dither.c \ video/out/gl_hwdec.c \ - video/out/vo_opengl_cb.c \ - video/out/vo_opengl_old.c \ - video/out/pnm_loader.c + video/out/vo_opengl_cb.c SOURCES-$(ENCODING) += video/out/vo_lavc.c audio/out/ao_lavc.c \ common/encode_lavc.c diff --git a/video/out/gl_common.c b/video/out/gl_common.c index dcfaf32398..3eeef29ea5 100644 --- a/video/out/gl_common.c +++ b/video/out/gl_common.c @@ -960,8 +960,6 @@ MPGLContext *mpgl_init(struct vo *vo, const char *backend_name, if (gl_flavor >= 210 && !(ctx->gl->mpgl_caps & MPGL_CAP_GL21)) { MP_WARN(ctx->vo, "At least OpenGL 2.1 required.\n"); - if (!vo->probing && (ctx->gl->mpgl_caps & MPGL_CAP_GL_LEGACY)) - MP_WARN(ctx->vo, "Try with: --vo=opengl-old\n"); goto cleanup; } else if (gl_flavor < 210 && !(ctx->gl->mpgl_caps & MPGL_CAP_GL_LEGACY)) { MP_WARN(ctx->vo, "OpenGL context creation failed!\n"); diff --git a/video/out/pnm_loader.c b/video/out/pnm_loader.c deleted file mode 100644 index 70afe0fa23..0000000000 --- a/video/out/pnm_loader.c +++ /dev/null @@ -1,97 +0,0 @@ -/* - * PNM image files loader - * - * copyleft (C) 2005-2010 Reimar Döffinger - * - * This file is part of MPlayer. - * - * MPlayer 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. - * - * MPlayer 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 MPlayer; if not, write to the Free Software Foundation, Inc., - * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. - * - * 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. - */ - -/** - * \file pnm_loader.c - * \brief PNM image files loader - */ - -#include -#include -#include -#include "misc/ctype.h" -#include "pnm_loader.h" - -/** - * \brief skips whitespace and comments - * \param f file to read from - */ -static void ppm_skip(FILE *f) { - int c, comment = 0; - do { - c = fgetc(f); - if (c == '#') - comment = 1; - if (c == '\n') - comment = 0; - } while (c != EOF && (mp_isspace(c) || comment)); - if (c != EOF) - ungetc(c, f); -} - -#define MAXDIM (16 * 1024) - -uint8_t *read_pnm(FILE *f, int *width, int *height, - int *bytes_per_pixel, int *maxval) { - uint8_t *data; - int type; - unsigned w, h, m, val, bpp; - *width = *height = *bytes_per_pixel = *maxval = 0; - ppm_skip(f); - if (fgetc(f) != 'P') - return NULL; - type = fgetc(f); - if (type != '5' && type != '6') - return NULL; - ppm_skip(f); - if (fscanf(f, "%u", &w) != 1) - return NULL; - ppm_skip(f); - if (fscanf(f, "%u", &h) != 1) - return NULL; - ppm_skip(f); - if (fscanf(f, "%u", &m) != 1) - return NULL; - val = fgetc(f); - if (!mp_isspace(val)) - return NULL; - if (w > MAXDIM || h > MAXDIM) - return NULL; - bpp = (m > 255) ? 2 : 1; - if (type == '6') - bpp *= 3; - data = malloc(w * h * bpp); - if (fread(data, w * bpp, h, f) != h) { - free(data); - return NULL; - } - *width = w; - *height = h; - *bytes_per_pixel = bpp; - *maxval = m; - return data; -} diff --git a/video/out/pnm_loader.h b/video/out/pnm_loader.h deleted file mode 100644 index e00cce2e63..0000000000 --- a/video/out/pnm_loader.h +++ /dev/null @@ -1,52 +0,0 @@ -/* - * PNM image files loader - * - * This file is part of MPlayer. - * - * MPlayer 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. - * - * MPlayer 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 MPlayer; if not, write to the Free Software Foundation, Inc., - * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. - * - * 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. - */ - -#ifndef MPLAYER_PNM_LOADER_H -#define MPLAYER_PNM_LOADER_H - -#include -#include - -/** - * Read a "portable anymap" image. - * Supports raw PGM (P5) and PNM (P6). - * - * @param[in] f input stream. - * @param[out] width width of the loaded image. - * @param[out] height height of the loaded image. - * @param[out] bytes_per_pixel format of the loaded image. - * @param[out] maxval maximum pixel value; possible values are: - * 1 for 8 bits gray, - * 2 for 16 bits gray, - * 3 for 8 bits per component RGB, - * 6 for 16 bits per component RGB. - * @return a newly allocated array of - * width*height*bytes_per_pixel bytes, - * or NULL in case of error. - */ -uint8_t *read_pnm(FILE *f, int *width, int *height, - int *bytes_per_pixel, int *maxval); - -#endif /* MPLAYER_PNM_LOADER_H */ diff --git a/video/out/vo.c b/video/out/vo.c index 251f32e6af..53a32a72ed 100644 --- a/video/out/vo.c +++ b/video/out/vo.c @@ -54,7 +54,6 @@ extern const struct vo_driver video_out_vdpau; extern const struct vo_driver video_out_xv; extern const struct vo_driver video_out_opengl; extern const struct vo_driver video_out_opengl_hq; -extern const struct vo_driver video_out_opengl_old; extern const struct vo_driver video_out_opengl_cb; extern const struct vo_driver video_out_null; extern const struct vo_driver video_out_image; @@ -84,9 +83,6 @@ const struct vo_driver *const video_out_drivers[] = #if HAVE_SDL2 &video_out_sdl, #endif -#if HAVE_GL - &video_out_opengl_old, -#endif #if HAVE_VAAPI &video_out_vaapi, #endif diff --git a/video/out/vo_opengl_old.c b/video/out/vo_opengl_old.c deleted file mode 100644 index f39f5709cf..0000000000 --- a/video/out/vo_opengl_old.c +++ /dev/null @@ -1,2167 +0,0 @@ -/* - * This file is part of MPlayer. - * - * Original author: Reimar Doeffinger - * - * MPlayer 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. - * - * MPlayer 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 MPlayer; if not, write to the Free Software Foundation, Inc., - * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. - * - * 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 -#include -#include -#include -#include - -#include "config.h" -#include "talloc.h" -#include "common/msg.h" -#include "misc/ctype.h" -#include "options/m_option.h" -#include "vo.h" -#include "video/vfcap.h" -#include "video/mp_image.h" -#include "sub/osd.h" - -#include "gl_common.h" -#include "gl_osd.h" -#include "video/memcpy_pic.h" -#include "pnm_loader.h" - -//for gl_priv.use_yuv -#define MASK_ALL_YUV (~(1 << YUV_CONVERSION_NONE)) -#define MASK_NOT_COMBINERS (~((1 << YUV_CONVERSION_NONE) | (1 << YUV_CONVERSION_COMBINERS))) -#define MASK_GAMMA_SUPPORT (MASK_NOT_COMBINERS & ~(1 << YUV_CONVERSION_FRAGMENT)) - -struct gl_priv { - MPGLContext *glctx; - GL *gl; - - int allow_sw; - - int scaled_osd; - struct mpgl_osd *osd; - int osd_color; - double osd_pts; - - int use_ycbcr; - int use_yuv; - int is_yuv; - int lscale; - int cscale; - float filter_strength; - float noise_strength; - int yuvconvtype; - int use_rectangle; - int err_shown; - uint32_t image_width; - uint32_t image_height; - uint32_t image_format; - int many_fmts; - int have_texture_rg; - int max_tex_component_size; - int ati_hack; - int force_pbo; - int use_glFinish; - int swap_interval; - GLenum target; - GLint texfmt; - GLenum gl_format; - GLenum gl_type; - GLuint buffer; - GLuint buffer_uv[2]; - int buffersize; - int buffersize_uv; - void *bufferptr; - void *bufferptr_uv[2]; - GLuint fragprog; - GLuint default_texs[22]; - char *custom_prog; - char *custom_tex; - int custom_tlin; - int custom_trect; - int mipmap_gen; - int stereo_mode; - char *backend_arg; - - struct mp_csp_equalizer video_eq; - - int texture_width; - int texture_height; - int mpi_flipped; - int vo_flipped; - - struct mp_rect src_rect; // displayed part of the source video - struct mp_rect dst_rect; // video rectangle on output window - struct mp_osd_res osd_res; - - int slice_height; -}; - -static int glFindFormat(uint32_t format, int have_texture_rg, int *bpp, - GLint *gl_texfmt, GLenum *gl_format, GLenum *gl_type); -static void glCreateClearTex(GL *gl, GLenum target, GLenum fmt, GLenum format, - GLenum type, GLint filter, int w, int h, - unsigned char val); -static int glCreatePPMTex(GL *gl, GLenum target, GLenum fmt, GLint filter, - FILE *f, int *width, int *height, int *maxval); -static void glDrawTex(GL *gl, GLfloat x, GLfloat y, GLfloat w, GLfloat h, - GLfloat tx, GLfloat ty, GLfloat tw, GLfloat th, - int sx, int sy, int rect_tex, int is_yv12, int flip); -static int loadGPUProgram(struct vo *vo, GL *gl, GLenum target, char *prog); -//! do not use YUV conversion, this should always stay 0 -#define YUV_CONVERSION_NONE 0 -//! use nVidia specific register combiners for YUV conversion -//! implementation has been removed -#define YUV_CONVERSION_COMBINERS 1 -//! use a fragment program for YUV conversion -#define YUV_CONVERSION_FRAGMENT 2 -//! use a fragment program for YUV conversion with gamma using POW -#define YUV_CONVERSION_FRAGMENT_POW 3 -//! use a fragment program with additional table lookup for YUV conversion -#define YUV_CONVERSION_FRAGMENT_LOOKUP 4 -//! use ATI specific register combiners ("fragment program") -#define YUV_CONVERSION_COMBINERS_ATI 5 -//! use a fragment program with 3D table lookup for YUV conversion -#define YUV_CONVERSION_FRAGMENT_LOOKUP3D 6 -//! use ATI specific "text" register combiners ("fragment program") -#define YUV_CONVERSION_TEXT_FRAGMENT 7 -//! use normal bilinear scaling for textures -#define YUV_SCALER_BILIN 0 -//! use higher quality bicubic scaling for textures -#define YUV_SCALER_BICUB 1 -//! use cubic scaling in X and normal linear scaling in Y direction -#define YUV_SCALER_BICUB_X 2 -//! use cubic scaling without additional lookup texture -#define YUV_SCALER_BICUB_NOTEX 3 -#define YUV_SCALER_UNSHARP 4 -#define YUV_SCALER_UNSHARP2 5 -//! mask for conversion type -#define YUV_CONVERSION_MASK 0xF -//! mask for scaler type -#define YUV_SCALER_MASK 0xF -//! shift value for luminance scaler type -#define YUV_LUM_SCALER_SHIFT 8 -//! shift value for chrominance scaler type -#define YUV_CHROM_SCALER_SHIFT 12 -//! extract conversion out of type -#define YUV_CONVERSION(t) ((t) & YUV_CONVERSION_MASK) -//! extract luminance scaler out of type -#define YUV_LUM_SCALER(t) (((t) >> YUV_LUM_SCALER_SHIFT) & YUV_SCALER_MASK) -//! extract chrominance scaler out of type -#define YUV_CHROM_SCALER(t) (((t) >> YUV_CHROM_SCALER_SHIFT) & YUV_SCALER_MASK) -#define SET_YUV_CONVERSION(c) ((c) & YUV_CONVERSION_MASK) -#define SET_YUV_LUM_SCALER(s) (((s) & YUV_SCALER_MASK) << YUV_LUM_SCALER_SHIFT) -#define SET_YUV_CHROM_SCALER(s) (((s) & YUV_SCALER_MASK) << YUV_CHROM_SCALER_SHIFT) -//! returns whether the yuv conversion supports large brightness range etc. -static inline int glYUVLargeRange(int conv) -{ - switch (conv) { - case YUV_CONVERSION_NONE: - case YUV_CONVERSION_FRAGMENT_LOOKUP3D: - case YUV_CONVERSION_TEXT_FRAGMENT: - return 0; - } - return 1; -} -typedef struct { - GLenum target; - int type; - struct mp_csp_params csp_params; - int texw; - int texh; - int chrom_texw; - int chrom_texh; - float filter_strength; - float noise_strength; -} gl_conversion_params_t; - -static int glAutodetectYUVConversion(GL *gl); -static void glSetupYUVConversion(struct vo *vo, GL *gl, - gl_conversion_params_t *params); -static void glEnableYUVConversion(GL *gl, GLenum target, int type); -static void glDisableYUVConversion(GL *gl, GLenum target, int type); - - -#define GL_3D_RED_CYAN 1 -#define GL_3D_GREEN_MAGENTA 2 -#define GL_3D_QUADBUFFER 3 - -static void glEnable3DLeft(GL *gl, int type) -{ - GLint buffer; - switch (type) { - case GL_3D_RED_CYAN: - gl->ColorMask(GL_TRUE, GL_FALSE, GL_FALSE, GL_FALSE); - break; - case GL_3D_GREEN_MAGENTA: - gl->ColorMask(GL_FALSE, GL_TRUE, GL_FALSE, GL_FALSE); - break; - case GL_3D_QUADBUFFER: - gl->GetIntegerv(GL_DRAW_BUFFER, &buffer); - switch (buffer) { - case GL_FRONT: - case GL_FRONT_LEFT: - case GL_FRONT_RIGHT: - buffer = GL_FRONT_LEFT; - break; - case GL_BACK: - case GL_BACK_LEFT: - case GL_BACK_RIGHT: - buffer = GL_BACK_LEFT; - break; - } - gl->DrawBuffer(buffer); - break; - } -} - -static void glEnable3DRight(GL *gl, int type) -{ - GLint buffer; - switch (type) { - case GL_3D_RED_CYAN: - gl->ColorMask(GL_FALSE, GL_TRUE, GL_TRUE, GL_FALSE); - break; - case GL_3D_GREEN_MAGENTA: - gl->ColorMask(GL_TRUE, GL_FALSE, GL_TRUE, GL_FALSE); - break; - case GL_3D_QUADBUFFER: - gl->GetIntegerv(GL_DRAW_BUFFER, &buffer); - switch (buffer) { - case GL_FRONT: - case GL_FRONT_LEFT: - case GL_FRONT_RIGHT: - buffer = GL_FRONT_RIGHT; - break; - case GL_BACK: - case GL_BACK_LEFT: - case GL_BACK_RIGHT: - buffer = GL_BACK_RIGHT; - break; - } - gl->DrawBuffer(buffer); - break; - } -} - -static void glDisable3D(GL *gl, int type) -{ - GLint buffer; - switch (type) { - case GL_3D_RED_CYAN: - case GL_3D_GREEN_MAGENTA: - gl->ColorMask(GL_TRUE, GL_TRUE, GL_TRUE, GL_TRUE); - break; - case GL_3D_QUADBUFFER: - gl->DrawBuffer(GL_BACK); - gl->GetIntegerv(GL_DRAW_BUFFER, &buffer); - switch (buffer) { - case GL_FRONT: - case GL_FRONT_LEFT: - case GL_FRONT_RIGHT: - buffer = GL_FRONT; - break; - case GL_BACK: - case GL_BACK_LEFT: - case GL_BACK_RIGHT: - buffer = GL_BACK; - break; - } - gl->DrawBuffer(buffer); - break; - } -} - -//! always return this format as internal texture format in glFindFormat -#define TEXTUREFORMAT_ALWAYS GL_RGB8 -#undef TEXTUREFORMAT_ALWAYS - -/** - * \brief find the OpenGL settings coresponding to format. - * - * All parameters may be NULL. - * \param fmt MPlayer format to analyze. - * \param dummy reserved - * \param gl_texfmt [OUT] internal texture format that fits the - * image format, not necessarily the best for performance. - * \param gl_format [OUT] OpenGL format for this image format. - * \param gl_type [OUT] OpenGL type for this image format. - * \return 1 if format is supported by OpenGL, 0 if not. - * \ingroup gltexture - */ -static int glFindFormat(uint32_t fmt, int have_texture_rg, int *dummy, - GLint *gl_texfmt, GLenum *gl_format, GLenum *gl_type) -{ - int supported = 1; - GLenum dummy2; - GLint dummy3; - if (!gl_texfmt) - gl_texfmt = &dummy3; - if (!gl_format) - gl_format = &dummy2; - if (!gl_type) - gl_type = &dummy2; - - struct mp_imgfmt_desc desc = mp_imgfmt_get_desc(fmt); - if (desc.flags & MP_IMGFLAG_YUV_P) { - // reduce the possible cases a bit - if (desc.plane_bits > 8) - fmt = IMGFMT_420P16; - else - fmt = IMGFMT_420P; - } - - *gl_texfmt = 3; - switch (fmt) { - case IMGFMT_RGB48: - *gl_format = GL_RGB; - *gl_type = GL_UNSIGNED_SHORT; - break; - case IMGFMT_RGB24: - *gl_format = GL_RGB; - *gl_type = GL_UNSIGNED_BYTE; - break; - case IMGFMT_RGBA: - *gl_texfmt = 4; - *gl_format = GL_RGBA; - *gl_type = GL_UNSIGNED_BYTE; - break; - case IMGFMT_420P16: - supported = 0; // no native YUV support - *gl_texfmt = have_texture_rg ? GL_R16 : GL_LUMINANCE16; - *gl_format = have_texture_rg ? GL_RED : GL_LUMINANCE; - *gl_type = GL_UNSIGNED_SHORT; - break; - case IMGFMT_420P: - supported = 0; // no native YV12 support - case IMGFMT_Y8: - *gl_texfmt = 1; - *gl_format = GL_LUMINANCE; - *gl_type = GL_UNSIGNED_BYTE; - break; - case IMGFMT_UYVY: - *gl_texfmt = GL_YCBCR_MESA; - *gl_format = GL_YCBCR_MESA; - *gl_type = fmt == IMGFMT_UYVY ? GL_UNSIGNED_SHORT_8_8 : GL_UNSIGNED_SHORT_8_8_REV; - break; -#if 0 - // we do not support palettized formats, although the format the - // swscale produces works - case IMGFMT_RGB8: - *gl_format = GL_RGB; - *gl_type = GL_UNSIGNED_BYTE_2_3_3_REV; - break; -#endif - case IMGFMT_BGR555: - *gl_format = GL_RGBA; - *gl_type = GL_UNSIGNED_SHORT_1_5_5_5_REV; - break; - case IMGFMT_BGR565: - *gl_format = GL_RGB; - *gl_type = GL_UNSIGNED_SHORT_5_6_5_REV; - break; -#if 0 - case IMGFMT_BGR8: - // special case as red and blue have a different number of bits. - // GL_BGR and GL_UNSIGNED_BYTE_3_3_2 isn't supported at least - // by nVidia drivers, and in addition would give more bits to - // blue than to red, which isn't wanted - *gl_format = GL_RGB; - *gl_type = GL_UNSIGNED_BYTE_3_3_2; - break; -#endif - case IMGFMT_RGB555: - *gl_format = GL_BGRA; - *gl_type = GL_UNSIGNED_SHORT_1_5_5_5_REV; - break; - case IMGFMT_RGB565: - *gl_format = GL_RGB; - *gl_type = GL_UNSIGNED_SHORT_5_6_5; - break; - case IMGFMT_BGR24: - *gl_format = GL_BGR; - *gl_type = GL_UNSIGNED_BYTE; - break; - case IMGFMT_BGRA: - *gl_texfmt = 4; - *gl_format = GL_BGRA; - *gl_type = GL_UNSIGNED_BYTE; - break; - default: - *gl_texfmt = 4; - *gl_format = GL_RGBA; - *gl_type = GL_UNSIGNED_BYTE; - supported = 0; - } -#ifdef TEXTUREFORMAT_ALWAYS - *gl_texfmt = TEXTUREFORMAT_ALWAYS; -#endif - return supported; -} - -/** - * \brief create a texture and set some defaults - * \param target texture taget, usually GL_TEXTURE_2D - * \param fmt internal texture format - * \param format texture host data format - * \param type texture host data type - * \param filter filter used for scaling, e.g. GL_LINEAR - * \param w texture width - * \param h texture height - * \param val luminance value to fill texture with - * \ingroup gltexture - */ -static void glCreateClearTex(GL *gl, GLenum target, GLenum fmt, GLenum format, - GLenum type, GLint filter, int w, int h, - unsigned char val) -{ - GLfloat fval = (GLfloat)val / 255.0; - GLfloat border[4] = { - fval, fval, fval, fval - }; - int stride; - char *init; - if (w == 0) - w = 1; - if (h == 0) - h = 1; - stride = w * glFmt2bpp(format, type); - if (!stride) - return; - init = malloc(stride * h); - memset(init, val, stride * h); - glAdjustAlignment(gl, stride); - gl->PixelStorei(GL_UNPACK_ROW_LENGTH, w); - gl->TexImage2D(target, 0, fmt, w, h, 0, format, type, init); - gl->TexParameterf(target, GL_TEXTURE_PRIORITY, 1.0); - gl->TexParameteri(target, GL_TEXTURE_MIN_FILTER, filter); - gl->TexParameteri(target, GL_TEXTURE_MAG_FILTER, filter); - gl->TexParameteri(target, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE); - gl->TexParameteri(target, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE); - // Border texels should not be used with CLAMP_TO_EDGE - // We set a sane default anyway. - gl->TexParameterfv(target, GL_TEXTURE_BORDER_COLOR, border); - free(init); -} - -static GLint detect_hqtexfmt(GL *gl) -{ - const char *extensions = (const char *)gl->GetString(GL_EXTENSIONS); - if (strstr(extensions, "_texture_float")) - return GL_RGB32F; - else if (strstr(extensions, "NV_float_buffer")) - return GL_FLOAT_RGB32_NV; - return GL_RGB16; -} - -/** - * \brief creates a texture from a PPM file - * \param target texture taget, usually GL_TEXTURE_2D - * \param fmt internal texture format, 0 for default - * \param filter filter used for scaling, e.g. GL_LINEAR - * \param f file to read PPM from - * \param width [out] width of texture - * \param height [out] height of texture - * \param maxval [out] maxval value from PPM file - * \return 0 on error, 1 otherwise - * \ingroup gltexture - */ -static int glCreatePPMTex(GL *gl, GLenum target, GLenum fmt, GLint filter, - FILE *f, int *width, int *height, int *maxval) -{ - int w, h, m, bpp; - GLenum type; - uint8_t *data = read_pnm(f, &w, &h, &bpp, &m); - GLint hqtexfmt = detect_hqtexfmt(gl); - if (!data || (bpp != 3 && bpp != 6)) { - free(data); - return 0; - } - if (!fmt) { - fmt = bpp == 6 ? hqtexfmt : 3; - if (fmt == GL_FLOAT_RGB32_NV && target != GL_TEXTURE_RECTANGLE) - fmt = GL_RGB16; - } - type = bpp == 6 ? GL_UNSIGNED_SHORT : GL_UNSIGNED_BYTE; - glCreateClearTex(gl, target, fmt, GL_RGB, type, filter, w, h, 0); - glUploadTex(gl, target, GL_RGB, type, - data, w * bpp, 0, 0, w, h, 0); - free(data); - if (width) - *width = w; - if (height) - *height = h; - if (maxval) - *maxval = m; - return 1; -} - -// Replace all occurances of variables named "$"+name (e.g. $foo) in *text with -// replace, and return the result. *text must have been allocated with talloc. -static void replace_var_str(char **text, const char *name, const char *replace) -{ - size_t namelen = strlen(name); - char *nextvar = *text; - void *parent = talloc_parent(*text); - for (;;) { - nextvar = strchr(nextvar, '$'); - if (!nextvar) - break; - char *until = nextvar; - nextvar++; - if (strncmp(nextvar, name, namelen) != 0) - continue; - nextvar += namelen; - // try not to replace prefixes of other vars (e.g. $foo vs. $foo_bar) - char term = nextvar[0]; - if (mp_isalnum(term) || term == '_') - continue; - int prelength = until - *text; - int postlength = nextvar - *text; - char *n = talloc_asprintf(parent, "%.*s%s%s", prelength, *text, replace, - nextvar); - talloc_free(*text); - *text = n; - nextvar = *text + postlength; - } -} - -static void replace_var_float(char **text, const char *name, float replace) -{ - char *s = talloc_asprintf(NULL, "%e", replace); - replace_var_str(text, name, s); - talloc_free(s); -} - -static void replace_var_char(char **text, const char *name, char replace) -{ - char s[2] = { replace, '\0' }; - replace_var_str(text, name, s); -} - -// Append template to *text. Possibly initialize *text if it's NULL. -static void append_template(char **text, const char* template) -{ - if (!*text) - *text = talloc_strdup(NULL, template); - else - *text = talloc_strdup_append(*text, template); -} - -/** - * \brief helper function for gen_spline_lookup_tex - * \param x subpixel-position ((0,1) range) to calculate weights for - * \param dst where to store transformed weights, must provide space for 4 GLfloats - * - * calculates the weights and stores them after appropriate transformation - * for the scaler fragment program. - */ -static void store_weights(float x, GLfloat *dst) -{ - float w0 = (((-1 * x + 3) * x - 3) * x + 1) / 6; - float w1 = (((3 * x - 6) * x + 0) * x + 4) / 6; - float w2 = (((-3 * x + 3) * x + 3) * x + 1) / 6; - float w3 = (((1 * x + 0) * x + 0) * x + 0) / 6; - *dst++ = 1 + x - w1 / (w0 + w1); - *dst++ = 1 - x + w3 / (w2 + w3); - *dst++ = w0 + w1; - *dst++ = 0; -} - -//! to avoid artefacts this should be rather large -#define LOOKUP_BSPLINE_RES (2 * 1024) -/** - * \brief creates the 1D lookup texture needed for fast higher-order filtering - * \param unit texture unit to attach texture to - */ -static void gen_spline_lookup_tex(GL *gl, GLenum unit) -{ - GLfloat *tex = calloc(4 * LOOKUP_BSPLINE_RES, sizeof(*tex)); - GLfloat *tp = tex; - int i; - for (i = 0; i < LOOKUP_BSPLINE_RES; i++) { - float x = (float)(i + 0.5) / LOOKUP_BSPLINE_RES; - store_weights(x, tp); - tp += 4; - } - store_weights(0, tex); - store_weights(1, &tex[4 * (LOOKUP_BSPLINE_RES - 1)]); - gl->ActiveTexture(unit); - gl->TexImage1D(GL_TEXTURE_1D, 0, GL_RGBA16, LOOKUP_BSPLINE_RES, 0, GL_RGBA, - GL_FLOAT, tex); - gl->TexParameterf(GL_TEXTURE_1D, GL_TEXTURE_PRIORITY, 1.0); - gl->TexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MIN_FILTER, GL_NEAREST); - gl->TexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MAG_FILTER, GL_NEAREST); - gl->TexParameteri(GL_TEXTURE_1D, GL_TEXTURE_WRAP_S, GL_REPEAT); - gl->ActiveTexture(GL_TEXTURE0); - free(tex); -} - -#define NOISE_RES 2048 - -/** - * \brief creates the 1D lookup texture needed to generate pseudo-random numbers. - * \param unit texture unit to attach texture to - */ -static void gen_noise_lookup_tex(GL *gl, GLenum unit) { - GLfloat *tex = calloc(NOISE_RES, sizeof(*tex)); - uint32_t lcg = 0x79381c11; - int i; - for (i = 0; i < NOISE_RES; i++) - tex[i] = (double)i / (NOISE_RES - 1); - for (i = 0; i < NOISE_RES - 1; i++) { - int remain = NOISE_RES - i; - int idx = i + (lcg >> 16) % remain; - GLfloat tmp = tex[i]; - tex[i] = tex[idx]; - tex[idx] = tmp; - lcg = lcg * 1664525 + 1013904223; - } - gl->ActiveTexture(unit); - gl->TexImage1D(GL_TEXTURE_1D, 0, 1, NOISE_RES, 0, GL_RED, GL_FLOAT, tex); - gl->TexParameterf(GL_TEXTURE_1D, GL_TEXTURE_PRIORITY, 1.0); - gl->TexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MIN_FILTER, GL_NEAREST); - gl->TexParameteri(GL_TEXTURE_1D, GL_TEXTURE_MAG_FILTER, GL_NEAREST); - gl->TexParameteri(GL_TEXTURE_1D, GL_TEXTURE_WRAP_S, GL_REPEAT); - gl->ActiveTexture(GL_TEXTURE0); - free(tex); -} - -#define SAMPLE(dest, coord, texture) \ - "TEX textemp, " coord ", " texture ", $tex_type;\n" \ - "MOV " dest ", textemp.r;\n" - -static const char bilin_filt_template[] = - SAMPLE("yuv.$out_comp","fragment.texcoord[$in_tex]","texture[$in_tex]"); - -#define BICUB_FILT_MAIN \ - /* first y-interpolation */ \ - "ADD coord, fragment.texcoord[$in_tex].xyxy, cdelta.xyxw;\n" \ - "ADD coord2, fragment.texcoord[$in_tex].xyxy, cdelta.zyzw;\n" \ - SAMPLE("a.r","coord.xyxy","texture[$in_tex]") \ - SAMPLE("a.g","coord.zwzw","texture[$in_tex]") \ - /* second y-interpolation */ \ - SAMPLE("b.r","coord2.xyxy","texture[$in_tex]") \ - SAMPLE("b.g","coord2.zwzw","texture[$in_tex]") \ - "LRP a.b, parmy.b, a.rrrr, a.gggg;\n" \ - "LRP a.a, parmy.b, b.rrrr, b.gggg;\n" \ - /* x-interpolation */ \ - "LRP yuv.$out_comp, parmx.b, a.bbbb, a.aaaa;\n" - -static const char bicub_filt_template_2D[] = - "MAD coord.xy, fragment.texcoord[$in_tex], {$texw, $texh}, {0.5, 0.5};\n" - "TEX parmx, coord.x, texture[$texs], 1D;\n" - "MUL cdelta.xz, parmx.rrgg, {-$ptw, 0, $ptw, 0};\n" - "TEX parmy, coord.y, texture[$texs], 1D;\n" - "MUL cdelta.yw, parmy.rrgg, {0, -$pth, 0, $pth};\n" - BICUB_FILT_MAIN; - -static const char bicub_filt_template_RECT[] = - "ADD coord, fragment.texcoord[$in_tex], {0.5, 0.5};\n" - "TEX parmx, coord.x, texture[$texs], 1D;\n" - "MUL cdelta.xz, parmx.rrgg, {-1, 0, 1, 0};\n" - "TEX parmy, coord.y, texture[$texs], 1D;\n" - "MUL cdelta.yw, parmy.rrgg, {0, -1, 0, 1};\n" - BICUB_FILT_MAIN; - -#define CALCWEIGHTS(t, s) \ - "MAD "t ", {-0.5, 0.1666, 0.3333, -0.3333}, "s ", {1, 0, -0.5, 0.5};\n" \ - "MAD "t ", "t ", "s ", {0, 0, -0.5, 0.5};\n" \ - "MAD "t ", "t ", "s ", {-0.6666, 0, 0.8333, 0.1666};\n" \ - "RCP a.x, "t ".z;\n" \ - "RCP a.y, "t ".w;\n" \ - "MAD "t ".xy, "t ".xyxy, a.xyxy, {1, 1, 0, 0};\n" \ - "ADD "t ".x, "t ".xxxx, "s ";\n" \ - "SUB "t ".y, "t ".yyyy, "s ";\n" - -static const char bicub_notex_filt_template_2D[] = - "MAD coord.xy, fragment.texcoord[$in_tex], {$texw, $texh}, {0.5, 0.5};\n" - "FRC coord.xy, coord.xyxy;\n" - CALCWEIGHTS("parmx", "coord.xxxx") - "MUL cdelta.xz, parmx.rrgg, {-$ptw, 0, $ptw, 0};\n" - CALCWEIGHTS("parmy", "coord.yyyy") - "MUL cdelta.yw, parmy.rrgg, {0, -$pth, 0, $pth};\n" - BICUB_FILT_MAIN; - -static const char bicub_notex_filt_template_RECT[] = - "ADD coord, fragment.texcoord[$in_tex], {0.5, 0.5};\n" - "FRC coord.xy, coord.xyxy;\n" - CALCWEIGHTS("parmx", "coord.xxxx") - "MUL cdelta.xz, parmx.rrgg, {-1, 0, 1, 0};\n" - CALCWEIGHTS("parmy", "coord.yyyy") - "MUL cdelta.yw, parmy.rrgg, {0, -1, 0, 1};\n" - BICUB_FILT_MAIN; - -#define BICUB_X_FILT_MAIN \ - "ADD coord.xy, fragment.texcoord[$in_tex].xyxy, cdelta.xyxy;\n" \ - "ADD coord2.xy, fragment.texcoord[$in_tex].xyxy, cdelta.zyzy;\n" \ - SAMPLE("a.r","coord","texture[$in_tex]") \ - SAMPLE("b.r","coord2","texture[$in_tex]") \ - /* x-interpolation */ \ - "LRP yuv.$out_comp, parmx.b, a.rrrr, b.rrrr;\n" - -static const char bicub_x_filt_template_2D[] = - "MAD coord.x, fragment.texcoord[$in_tex], {$texw}, {0.5};\n" - "TEX parmx, coord, texture[$texs], 1D;\n" - "MUL cdelta.xyz, parmx.rrgg, {-$ptw, 0, $ptw};\n" - BICUB_X_FILT_MAIN; - -static const char bicub_x_filt_template_RECT[] = - "ADD coord.x, fragment.texcoord[$in_tex], {0.5};\n" - "TEX parmx, coord, texture[$texs], 1D;\n" - "MUL cdelta.xyz, parmx.rrgg, {-1, 0, 1};\n" - BICUB_X_FILT_MAIN; - -static const char unsharp_filt_template[] = - "PARAM dcoord$out_comp = {$ptw_05, $pth_05, $ptw_05, -$pth_05};\n" - "ADD coord, fragment.texcoord[$in_tex].xyxy, dcoord$out_comp;\n" - "SUB coord2, fragment.texcoord[$in_tex].xyxy, dcoord$out_comp;\n" - SAMPLE("a.r","fragment.texcoord[$in_tex]","texture[$in_tex]") - SAMPLE("b.r","coord.xyxy","texture[$in_tex]") - SAMPLE("b.g","coord.zwzw","texture[$in_tex]") - "ADD b.r, b.r, b.g;\n" - SAMPLE("b.b","coord2.xyxy","texture[$in_tex]") - SAMPLE("b.g","coord2.zwzw","texture[$in_tex]") - "DP3 b, b, {0.25, 0.25, 0.25};\n" - "SUB b.r, a.r, b.r;\n" - "MAD textemp.r, b.r, {$strength}, a.r;\n" - "MOV yuv.$out_comp, textemp.r;\n"; - -static const char unsharp_filt_template2[] = - "PARAM dcoord$out_comp = {$ptw_12, $pth_12, $ptw_12, -$pth_12};\n" - "PARAM dcoord2$out_comp = {$ptw_15, 0, 0, $pth_15};\n" - "ADD coord, fragment.texcoord[$in_tex].xyxy, dcoord$out_comp;\n" - "SUB coord2, fragment.texcoord[$in_tex].xyxy, dcoord$out_comp;\n" - SAMPLE("a.r","fragment.texcoord[$in_tex]","texture[$in_tex]") - SAMPLE("b.r","coord.xyxy","texture[$in_tex]") - SAMPLE("b.g","coord.zwzw","texture[$in_tex]") - "ADD b.r, b.r, b.g;\n" - SAMPLE("b.b","coord2.xyxy","texture[$in_tex]") - SAMPLE("b.g","coord2.zwzw","texture[$in_tex]") - "ADD b.r, b.r, b.b;\n" - "ADD b.a, b.r, b.g;\n" - "ADD coord, fragment.texcoord[$in_tex].xyxy, dcoord2$out_comp;\n" - "SUB coord2, fragment.texcoord[$in_tex].xyxy, dcoord2$out_comp;\n" - SAMPLE("b.r","coord.xyxy","texture[$in_tex]") - SAMPLE("b.g","coord.zwzw","texture[$in_tex]") - "ADD b.r, b.r, b.g;\n" - SAMPLE("b.b","coord2.xyxy","texture[$in_tex]") - SAMPLE("b.g","coord2.zwzw","texture[$in_tex]") - "DP4 b.r, b, {-0.1171875, -0.1171875, -0.1171875, -0.09765625};\n" - "MAD b.r, a.r, {0.859375}, b.r;\n" - "MAD textemp.r, b.r, {$strength}, a.r;\n" - "MOV yuv.$out_comp, textemp.r;\n"; - -static const char yuv_prog_template[] = - "PARAM ycoef = {$cm11, $cm21, $cm31};\n" - "PARAM ucoef = {$cm12, $cm22, $cm32};\n" - "PARAM vcoef = {$cm13, $cm23, $cm33};\n" - "PARAM offsets = {$cm14, $cm24, $cm34};\n" - "TEMP res;\n" - "MAD res.rgb, yuv.rrrr, ycoef, offsets;\n" - "MAD res.rgb, yuv.gggg, ucoef, res;\n" - "MAD res.rgb, yuv.bbbb, vcoef, res;\n"; - -static const char yuv_pow_prog_template[] = - "PARAM ycoef = {$cm11, $cm21, $cm31};\n" - "PARAM ucoef = {$cm12, $cm22, $cm32};\n" - "PARAM vcoef = {$cm13, $cm23, $cm33};\n" - "PARAM offsets = {$cm14, $cm24, $cm34};\n" - "PARAM gamma = {$gamma_r, $gamma_g, $gamma_b};\n" - "TEMP res;\n" - "MAD res.rgb, yuv.rrrr, ycoef, offsets;\n" - "MAD res.rgb, yuv.gggg, ucoef, res;\n" - "MAD_SAT res.rgb, yuv.bbbb, vcoef, res;\n" - "POW res.r, res.r, gamma.r;\n" - "POW res.g, res.g, gamma.g;\n" - "POW res.b, res.b, gamma.b;\n"; - -static const char yuv_lookup_prog_template[] = - "PARAM ycoef = {$cm11, $cm21, $cm31, 0};\n" - "PARAM ucoef = {$cm12, $cm22, $cm32, 0};\n" - "PARAM vcoef = {$cm13, $cm23, $cm33, 0};\n" - "PARAM offsets = {$cm14, $cm24, $cm34, 0.125};\n" - "TEMP res;\n" - "MAD res, yuv.rrrr, ycoef, offsets;\n" - "MAD res.rgb, yuv.gggg, ucoef, res;\n" - "MAD res.rgb, yuv.bbbb, vcoef, res;\n" - "TEX res.r, res.raaa, texture[$conv_tex0], 2D;\n" - "ADD res.a, res.a, 0.25;\n" - "TEX res.g, res.gaaa, texture[$conv_tex0], 2D;\n" - "ADD res.a, res.a, 0.25;\n" - "TEX res.b, res.baaa, texture[$conv_tex0], 2D;\n"; - -static const char yuv_lookup3d_prog_template[] = - "TEMP res;\n" - "TEX res, yuv, texture[$conv_tex0], 3D;\n"; - -static const char noise_filt_template[] = - "MUL coord.xy, fragment.texcoord[0], {$noise_sx, $noise_sy};\n" - "TEMP rand;\n" - "TEX rand.r, coord.x, texture[$noise_filt_tex], 1D;\n" - "ADD rand.r, rand.r, coord.y;\n" - "TEX rand.r, rand.r, texture[$noise_filt_tex], 1D;\n" - "MAD res.rgb, rand.rrrr, {$noise_str, $noise_str, $noise_str}, res;\n"; - -/** - * \brief creates and initializes helper textures needed for scaling texture read - * \param scaler scaler type to create texture for - * \param texu contains next free texture unit number - * \param texs texture unit ids for the scaler are stored in this array - */ -static void create_scaler_textures(struct vo *vo, GL *gl, int scaler, int *texu, - char *texs) -{ - switch (scaler) { - case YUV_SCALER_BILIN: - case YUV_SCALER_BICUB_NOTEX: - case YUV_SCALER_UNSHARP: - case YUV_SCALER_UNSHARP2: - break; - case YUV_SCALER_BICUB: - case YUV_SCALER_BICUB_X: - texs[0] = (*texu)++; - gen_spline_lookup_tex(gl, GL_TEXTURE0 + texs[0]); - texs[0] += '0'; - break; - default: - MP_ERR(vo, "unknown scaler type %i\n", scaler); - } -} - -//! resolution of texture for gamma lookup table -#define LOOKUP_RES 512 -//! resolution for 3D yuv->rgb conversion lookup table -#define LOOKUP_3DRES 32 -/** - * \brief creates and initializes helper textures needed for yuv conversion - * \param params struct containing parameters like brightness, gamma, ... - * \param texu contains next free texture unit number - * \param texs texture unit ids for the conversion are stored in this array - */ -static void create_conv_textures(struct vo *vo, GL *gl, - gl_conversion_params_t *params, - int *texu, char *texs) -{ - unsigned char *lookup_data = NULL; - int conv = YUV_CONVERSION(params->type); - switch (conv) { - case YUV_CONVERSION_FRAGMENT: - case YUV_CONVERSION_FRAGMENT_POW: - break; - case YUV_CONVERSION_FRAGMENT_LOOKUP: - texs[0] = (*texu)++; - gl->ActiveTexture(GL_TEXTURE0 + texs[0]); - lookup_data = malloc(4 * LOOKUP_RES); - mp_gen_gamma_map(lookup_data, LOOKUP_RES, params->csp_params.rgamma); - mp_gen_gamma_map(&lookup_data[LOOKUP_RES], LOOKUP_RES, - params->csp_params.ggamma); - mp_gen_gamma_map(&lookup_data[2 * LOOKUP_RES], LOOKUP_RES, - params->csp_params.bgamma); - glCreateClearTex(gl, GL_TEXTURE_2D, GL_LUMINANCE8, GL_LUMINANCE, - GL_UNSIGNED_BYTE, GL_LINEAR, LOOKUP_RES, 4, 0); - glUploadTex(gl, GL_TEXTURE_2D, GL_LUMINANCE, GL_UNSIGNED_BYTE, - lookup_data, LOOKUP_RES, 0, 0, LOOKUP_RES, 4, 0); - gl->ActiveTexture(GL_TEXTURE0); - texs[0] += '0'; - break; - case YUV_CONVERSION_FRAGMENT_LOOKUP3D: - { - int sz = LOOKUP_3DRES + 2; // texture size including borders - if (!gl->TexImage3D) { - MP_ERR(vo, "Missing 3D texture function!\n"); - break; - } - texs[0] = (*texu)++; - gl->ActiveTexture(GL_TEXTURE0 + texs[0]); - lookup_data = malloc(3 * sz * sz * sz); - mp_gen_yuv2rgb_map(¶ms->csp_params, lookup_data, LOOKUP_3DRES); - glAdjustAlignment(gl, sz); - gl->PixelStorei(GL_UNPACK_ROW_LENGTH, 0); - gl->TexImage3D(GL_TEXTURE_3D, 0, 3, sz, sz, sz, 1, - GL_RGB, GL_UNSIGNED_BYTE, lookup_data); - gl->TexParameterf(GL_TEXTURE_3D, GL_TEXTURE_PRIORITY, 1.0); - gl->TexParameteri(GL_TEXTURE_3D, GL_TEXTURE_MIN_FILTER, GL_LINEAR); - gl->TexParameteri(GL_TEXTURE_3D, GL_TEXTURE_MAG_FILTER, GL_LINEAR); - gl->TexParameteri(GL_TEXTURE_3D, GL_TEXTURE_WRAP_S, GL_CLAMP); - gl->TexParameteri(GL_TEXTURE_3D, GL_TEXTURE_WRAP_T, GL_CLAMP); - gl->TexParameteri(GL_TEXTURE_3D, GL_TEXTURE_WRAP_R, GL_CLAMP); - gl->ActiveTexture(GL_TEXTURE0); - texs[0] += '0'; - } - break; - default: - MP_ERR(vo, "unknown conversion type %i\n", conv); - } - free(lookup_data); -} - -/** - * \brief adds a scaling texture read at the current fragment program position - * \param scaler type of scaler to insert - * \param prog pointer to fragment program so far - * \param texs array containing the texture unit identifiers for this scaler - * \param in_tex texture unit the scaler should read from - * \param out_comp component of the yuv variable the scaler stores the result in - * \param rect if rectangular (pixel) adressing should be used for in_tex - * \param texw width of the in_tex texture - * \param texh height of the in_tex texture - * \param strength strength of filter effect if the scaler does some kind of filtering - */ -static void add_scaler(int scaler, char **prog, char *texs, - char in_tex, char out_comp, int rect, int texw, int texh, - double strength) -{ - const char *ttype = rect ? "RECT" : "2D"; - const float ptw = rect ? 1.0 : 1.0 / texw; - const float pth = rect ? 1.0 : 1.0 / texh; - switch (scaler) { - case YUV_SCALER_BILIN: - append_template(prog, bilin_filt_template); - break; - case YUV_SCALER_BICUB: - if (rect) - append_template(prog, bicub_filt_template_RECT); - else - append_template(prog, bicub_filt_template_2D); - break; - case YUV_SCALER_BICUB_X: - if (rect) - append_template(prog, bicub_x_filt_template_RECT); - else - append_template(prog, bicub_x_filt_template_2D); - break; - case YUV_SCALER_BICUB_NOTEX: - if (rect) - append_template(prog, bicub_notex_filt_template_RECT); - else - append_template(prog, bicub_notex_filt_template_2D); - break; - case YUV_SCALER_UNSHARP: - append_template(prog, unsharp_filt_template); - break; - case YUV_SCALER_UNSHARP2: - append_template(prog, unsharp_filt_template2); - break; - } - - replace_var_char(prog, "texs", texs[0]); - replace_var_char(prog, "in_tex", in_tex); - replace_var_char(prog, "out_comp", out_comp); - replace_var_str(prog, "tex_type", ttype); - replace_var_float(prog, "texw", texw); - replace_var_float(prog, "texh", texh); - replace_var_float(prog, "ptw", ptw); - replace_var_float(prog, "pth", pth); - - // this is silly, not sure if that couldn't be in the shader source instead - replace_var_float(prog, "ptw_05", ptw * 0.5); - replace_var_float(prog, "pth_05", pth * 0.5); - replace_var_float(prog, "ptw_15", ptw * 1.5); - replace_var_float(prog, "pth_15", pth * 1.5); - replace_var_float(prog, "ptw_12", ptw * 1.2); - replace_var_float(prog, "pth_12", pth * 1.2); - - replace_var_float(prog, "strength", strength); -} - -static const struct { - const char *name; - GLenum cur; - GLenum max; -} progstats[] = { - {"instructions", 0x88A0, 0x88A1}, - {"native instructions", 0x88A2, 0x88A3}, - {"temporaries", 0x88A4, 0x88A5}, - {"native temporaries", 0x88A6, 0x88A7}, - {"parameters", 0x88A8, 0x88A9}, - {"native parameters", 0x88AA, 0x88AB}, - {"attribs", 0x88AC, 0x88AD}, - {"native attribs", 0x88AE, 0x88AF}, - {"ALU instructions", 0x8805, 0x880B}, - {"TEX instructions", 0x8806, 0x880C}, - {"TEX indirections", 0x8807, 0x880D}, - {"native ALU instructions", 0x8808, 0x880E}, - {"native TEX instructions", 0x8809, 0x880F}, - {"native TEX indirections", 0x880A, 0x8810}, - {NULL, 0, 0} -}; - -/** - * \brief load the specified GPU Program - * \param target program target to load into, only GL_FRAGMENT_PROGRAM is tested - * \param prog program string - * \return 1 on success, 0 otherwise - */ -static int loadGPUProgram(struct vo *vo, GL *gl, GLenum target, char *prog) -{ - int i; - GLint cur = 0, max = 0, err = 0; - if (!gl->ProgramString) { - MP_ERR(vo, "Missing GPU program function\n"); - return 0; - } - gl->ProgramString(target, GL_PROGRAM_FORMAT_ASCII, strlen(prog), prog); - gl->GetIntegerv(GL_PROGRAM_ERROR_POSITION, &err); - if (err != -1) { - MP_ERR(vo, - "Error compiling fragment program, make sure your card supports\n" - " GL_ARB_fragment_program (use glxinfo to check).\n" - " Error message:\n %s at %.10s\n", - gl->GetString(GL_PROGRAM_ERROR_STRING), &prog[err]); - return 0; - } - if (!gl->GetProgramivARB) - return 1; - MP_VERBOSE(vo, "Program statistics:\n"); - for (i = 0; progstats[i].name; i++) { - gl->GetProgramivARB(target, progstats[i].cur, &cur); - gl->GetProgramivARB(target, progstats[i].max, &max); - MP_VERBOSE(vo, " %s: %i/%i\n", progstats[i].name, cur, max); - } - return 1; -} - -#define MAX_PROGSZ (1024 * 1024) - -/** - * \brief setup a fragment program that will do YUV->RGB conversion - * \param parms struct containing parameters like conversion and scaler type, - * brightness, ... - */ -static void glSetupYUVFragprog(struct vo *vo, GL *gl, - gl_conversion_params_t *params) -{ - int type = params->type; - int texw = params->texw; - int texh = params->texh; - int rect = params->target == GL_TEXTURE_RECTANGLE; - static const char prog_hdr[] = - "!!ARBfp1.0\n" - "OPTION ARB_precision_hint_fastest;\n" - // all scaler variables must go here so they aren't defined - // multiple times when the same scaler is used more than once - "TEMP coord, coord2, cdelta, parmx, parmy, a, b, yuv, textemp;\n"; - char *yuv_prog = NULL; - char **prog = &yuv_prog; - int cur_texu = 3; - char lum_scale_texs[1] = {0}; - char chrom_scale_texs[1] = {0}; - char conv_texs[1]; - char filt_texs[1] = {0}; - GLint i; - // this is the conversion matrix, with y, u, v factors - // for red, green, blue and the constant offsets - struct mp_cmat yuv2rgb; - int noise = params->noise_strength != 0; - create_conv_textures(vo, gl, params, &cur_texu, conv_texs); - create_scaler_textures(vo, gl, YUV_LUM_SCALER(type), &cur_texu, lum_scale_texs); - if (YUV_CHROM_SCALER(type) == YUV_LUM_SCALER(type)) - memcpy(chrom_scale_texs, lum_scale_texs, sizeof(chrom_scale_texs)); - else - create_scaler_textures(vo, gl, YUV_CHROM_SCALER(type), &cur_texu, - chrom_scale_texs); - - if (noise) { - gen_noise_lookup_tex(gl, cur_texu); - filt_texs[0] = '0' + cur_texu++; - } - - gl->GetIntegerv(GL_MAX_TEXTURE_IMAGE_UNITS, &i); - if (i < cur_texu) - MP_ERR(vo, "%i texture units needed for this type of YUV fragment support (found %i)\n", - cur_texu, i); - if (!gl->ProgramString) { - MP_FATAL(vo, "ProgramString function missing!\n"); - return; - } - append_template(prog, prog_hdr); - add_scaler(YUV_LUM_SCALER(type), prog, lum_scale_texs, - '0', 'r', rect, texw, texh, params->filter_strength); - add_scaler(YUV_CHROM_SCALER(type), prog, - chrom_scale_texs, '1', 'g', rect, params->chrom_texw, - params->chrom_texh, params->filter_strength); - add_scaler(YUV_CHROM_SCALER(type), prog, - chrom_scale_texs, '2', 'b', rect, params->chrom_texw, - params->chrom_texh, params->filter_strength); - mp_get_yuv2rgb_coeffs(¶ms->csp_params, &yuv2rgb); - switch (YUV_CONVERSION(type)) { - case YUV_CONVERSION_FRAGMENT: - append_template(prog, yuv_prog_template); - break; - case YUV_CONVERSION_FRAGMENT_POW: - append_template(prog, yuv_pow_prog_template); - break; - case YUV_CONVERSION_FRAGMENT_LOOKUP: - append_template(prog, yuv_lookup_prog_template); - break; - case YUV_CONVERSION_FRAGMENT_LOOKUP3D: - append_template(prog, yuv_lookup3d_prog_template); - break; - default: - MP_ERR(vo, "unknown conversion type %i\n", YUV_CONVERSION(type)); - break; - } - for (int r = 0; r < 3; r++) { - for (int c = 0; c < 3; c++) { - // "mRC" - char var[] = { 'c', 'm', '1' + r, '1' + c, '\0' }; - replace_var_float(prog, var, yuv2rgb.m[r][c]); - } - // "mR4" - char var[] = { 'c', 'm', '1' + r, '4', '\0' }; - replace_var_float(prog, var, yuv2rgb.c[r]); - } - replace_var_float(prog, "gamma_r", (float)1.0 / params->csp_params.rgamma); - replace_var_float(prog, "gamma_g", (float)1.0 / params->csp_params.ggamma); - replace_var_float(prog, "gamma_b", (float)1.0 / params->csp_params.bgamma); - replace_var_char(prog, "conv_tex0", conv_texs[0]); - - if (noise) { - // 1.0 strength is suitable for dithering 8 to 6 bit - double str = params->noise_strength * (1.0 / 64); - double scale_x = (double)NOISE_RES / texw; - double scale_y = (double)NOISE_RES / texh; - if (rect) { - scale_x /= texw; - scale_y /= texh; - } - append_template(prog, noise_filt_template); - replace_var_float(prog, "noise_sx", scale_x); - replace_var_float(prog, "noise_sy", scale_y); - replace_var_char(prog, "noise_filt_tex", filt_texs[0]); - replace_var_float(prog, "noise_str", str); - } - - append_template(prog, "MOV result.color.rgb, res;\nEND"); - - MP_DBG(vo, "generated fragment program:\n%s\n", yuv_prog); - loadGPUProgram(vo, gl, GL_FRAGMENT_PROGRAM, yuv_prog); - talloc_free(yuv_prog); -} - -/** - * \brief detect the best YUV->RGB conversion method available - */ -static int glAutodetectYUVConversion(GL *gl) -{ - const char *extensions = gl->GetString(GL_EXTENSIONS); - if (!extensions || !gl->MultiTexCoord2f) - return YUV_CONVERSION_NONE; - if (strstr(extensions, "GL_ARB_fragment_program")) - return YUV_CONVERSION_FRAGMENT; - return YUV_CONVERSION_NONE; -} - -/** - * \brief setup YUV->RGB conversion - * \param parms struct containing parameters like conversion and scaler type, - * brightness, ... - * \ingroup glconversion - */ -static void glSetupYUVConversion(struct vo *vo, GL *gl, - gl_conversion_params_t *params) -{ - if (params->chrom_texw == 0) - params->chrom_texw = 1; - if (params->chrom_texh == 0) - params->chrom_texh = 1; - switch (YUV_CONVERSION(params->type)) { - case YUV_CONVERSION_FRAGMENT_LOOKUP: - case YUV_CONVERSION_FRAGMENT_LOOKUP3D: - case YUV_CONVERSION_FRAGMENT: - case YUV_CONVERSION_FRAGMENT_POW: - glSetupYUVFragprog(vo, gl, params); - break; - case YUV_CONVERSION_NONE: - break; - default: - MP_ERR(vo, "unknown conversion type %i\n", YUV_CONVERSION(params->type)); - } -} - -/** - * \brief enable the specified YUV conversion - * \param target texture target for Y, U and V textures (e.g. GL_TEXTURE_2D) - * \param type type of YUV conversion - * \ingroup glconversion - */ -static void glEnableYUVConversion(GL *gl, GLenum target, int type) -{ - switch (YUV_CONVERSION(type)) { - case YUV_CONVERSION_FRAGMENT_LOOKUP3D: - case YUV_CONVERSION_FRAGMENT_LOOKUP: - case YUV_CONVERSION_FRAGMENT_POW: - case YUV_CONVERSION_FRAGMENT: - case YUV_CONVERSION_NONE: - gl->Enable(GL_FRAGMENT_PROGRAM); - break; - } -} - -/** - * \brief disable the specified YUV conversion - * \param target texture target for Y, U and V textures (e.g. GL_TEXTURE_2D) - * \param type type of YUV conversion - * \ingroup glconversion - */ -static void glDisableYUVConversion(GL *gl, GLenum target, int type) -{ - switch (YUV_CONVERSION(type)) { - case YUV_CONVERSION_FRAGMENT_LOOKUP3D: - case YUV_CONVERSION_FRAGMENT_LOOKUP: - case YUV_CONVERSION_FRAGMENT_POW: - case YUV_CONVERSION_FRAGMENT: - case YUV_CONVERSION_NONE: - gl->Disable(GL_FRAGMENT_PROGRAM); - break; - } -} - - -/** - * \brief draw a texture part at given 2D coordinates - * \param x screen top coordinate - * \param y screen left coordinate - * \param w screen width coordinate - * \param h screen height coordinate - * \param tx texture top coordinate in pixels - * \param ty texture left coordinate in pixels - * \param tw texture part width in pixels - * \param th texture part height in pixels - * \param sx width of texture in pixels - * \param sy height of texture in pixels - * \param rect_tex whether this texture uses texture_rectangle extension - * \param is_yv12 if != 0, also draw the textures from units 1 and 2, - * bits 8 - 15 and 16 - 23 specify the x and y scaling of those textures - * \param flip flip the texture upside down - * \ingroup gltexture - */ -static void glDrawTex(GL *gl, GLfloat x, GLfloat y, GLfloat w, GLfloat h, - GLfloat tx, GLfloat ty, GLfloat tw, GLfloat th, - int sx, int sy, int rect_tex, int is_yv12, int flip) -{ - int chroma_x_shift = (is_yv12 >> 8) & 31; - int chroma_y_shift = (is_yv12 >> 16) & 31; - GLfloat xscale = 1 << chroma_x_shift; - GLfloat yscale = 1 << chroma_y_shift; - GLfloat tx2 = tx / xscale, ty2 = ty / yscale, tw2 = tw / xscale, th2 = th / yscale; - if (!rect_tex) { - tx /= sx; - ty /= sy; - tw /= sx; - th /= sy; - tx2 = tx, ty2 = ty, tw2 = tw, th2 = th; - } - if (flip) { - y += h; - h = -h; - } - gl->Begin(GL_QUADS); - gl->TexCoord2f(tx, ty); - if (is_yv12) { - gl->MultiTexCoord2f(GL_TEXTURE1, tx2, ty2); - gl->MultiTexCoord2f(GL_TEXTURE2, tx2, ty2); - } - gl->Vertex2f(x, y); - gl->TexCoord2f(tx, ty + th); - if (is_yv12) { - gl->MultiTexCoord2f(GL_TEXTURE1, tx2, ty2 + th2); - gl->MultiTexCoord2f(GL_TEXTURE2, tx2, ty2 + th2); - } - gl->Vertex2f(x, y + h); - gl->TexCoord2f(tx + tw, ty + th); - if (is_yv12) { - gl->MultiTexCoord2f(GL_TEXTURE1, tx2 + tw2, ty2 + th2); - gl->MultiTexCoord2f(GL_TEXTURE2, tx2 + tw2, ty2 + th2); - } - gl->Vertex2f(x + w, y + h); - gl->TexCoord2f(tx + tw, ty); - if (is_yv12) { - gl->MultiTexCoord2f(GL_TEXTURE1, tx2 + tw2, ty2); - gl->MultiTexCoord2f(GL_TEXTURE2, tx2 + tw2, ty2); - } - gl->Vertex2f(x + w, y); - gl->End(); -} - -static void resize(struct vo *vo, int x, int y) -{ - struct gl_priv *p = vo->priv; - GL *gl = p->gl; - - MP_VERBOSE(vo, "Resize: %dx%d\n", x, y); - gl->Viewport(0, 0, x, y); - - vo_get_src_dst_rects(vo, &p->src_rect, &p->dst_rect, &p->osd_res); - - gl->MatrixMode(GL_MODELVIEW); - gl->LoadIdentity(); - gl->Ortho(0, vo->dwidth, vo->dheight, 0, -1, 1); - - gl->Clear(GL_COLOR_BUFFER_BIT); - vo->want_redraw = true; -} - -static void texSize(struct vo *vo, int w, int h, int *texw, int *texh) -{ - struct gl_priv *p = vo->priv; - - if (p->use_rectangle) { - *texw = w; - *texh = h; - } else { - *texw = 32; - while (*texw < w) - *texw *= 2; - *texh = 32; - while (*texh < h) - *texh *= 2; - } - if (p->ati_hack) - *texw = (*texw + 511) & ~511; -} - -//! maximum size of custom fragment program -#define MAX_CUSTOM_PR