From ebde5b55013a11d889ee6cf7f278d8548e4f040c Mon Sep 17 00:00:00 2001
From: Filippo Argiolas <filippo.argiolas@gmail.com>
Date: Thu, 14 Aug 2008 00:07:20 +0200
Subject: [PATCH] [161/906] import squeeze effect from cvs
---
gst/gl/Makefile.am | 3 +-
gst/gl/effects/gstgleffects.h | 1 +
gst/gl/effects/gstgleffectsqueeze.c | 68 ++++++++++++++++++++++++++++
gst/gl/effects/gstgleffectssources.c | 23 +++++++++-
gst/gl/effects/gstgleffectssources.h | 1 +
gst/gl/gstgleffects.c | 5 ++
6 files changed, 99 insertions(+), 2 deletions(-)
create mode 100644 gst/gl/effects/gstgleffectsqueeze.c
diff --git a/gst/gl/Makefile.am b/gst/gl/Makefile.am
index 0fe8339469..55a83dceb8 100644
--- a/gst/gl/Makefile.am
+++ b/gst/gl/Makefile.am
@@ -30,7 +30,8 @@ libgstopengl_la_SOURCES = \
effects/gstgleffectssources.c \
effects/gstgleffectssources.h \
effects/gstgleffectidentity.c \
- effects/gstgleffectmirror.c
+ effects/gstgleffectmirror.c \
+ effects/gstgleffectsqueeze.c
# check order of CFLAGS and LIBS, shouldn't the order be the other way around
diff --git a/gst/gl/effects/gstgleffects.h b/gst/gl/effects/gstgleffects.h
index 174341ba0e..1eb5df30d5 100644
--- a/gst/gl/effects/gstgleffects.h
+++ b/gst/gl/effects/gstgleffects.h
@@ -77,6 +77,7 @@ void gst_gl_effects_draw_texture (GstGLEffects * effects, GLuint tex);
void gst_gl_effects_identity (GstGLEffects *effects);
void gst_gl_effects_mirror (GstGLEffects *effects);
+void gst_gl_effects_squeeze (GstGLEffects *effects);
G_END_DECLS
diff --git a/gst/gl/effects/gstgleffectsqueeze.c b/gst/gl/effects/gstgleffectsqueeze.c
new file mode 100644
index 0000000000..b07a62457d
--- /dev/null
+++ b/gst/gl/effects/gstgleffectsqueeze.c
@@ -0,0 +1,68 @@
+/*
+ * GStreamer
+ * Copyright (C) 2008 Filippo Argiolas <filippo.argiolas@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+#include <gstgleffects.h>
+
+static void
+gst_gl_effects_squeeze_callback (gint width, gint height, guint texture, gpointer data)
+{
+ GstGLEffects* effects = GST_GL_EFFECTS (data);
+
+ GstGLShader *shader;
+ gfloat tex_size[2];
+
+ shader = g_hash_table_lookup (effects->shaderstable, "squeeze0");
+
+ if (!shader) {
+ shader = gst_gl_shader_new ();
+ g_hash_table_insert (effects->shaderstable, "squeeze0", shader);
+ }
+
+ g_return_if_fail (
+ gst_gl_shader_compile_and_check (shader, squeeze_fragment_source,
+ GST_GL_SHADER_FRAGMENT_SOURCE));
+
+ glMatrixMode (GL_PROJECTION);
+ glLoadIdentity ();
+
+ gst_gl_shader_use (shader);
+
+ glActiveTexture (GL_TEXTURE0);
+ glEnable (GL_TEXTURE_RECTANGLE_ARB);
+ glBindTexture (GL_TEXTURE_RECTANGLE_ARB, texture);
+
+ gst_gl_shader_set_uniform_1i (shader, "tex", 0);
+
+ tex_size[0] = GST_GL_FILTER(effects)->width / 2.0;
+ tex_size[1] = GST_GL_FILTER(effects)->height / 2.0;
+
+ gst_gl_shader_set_uniform_1f (shader, "width", tex_size[0]);
+ gst_gl_shader_set_uniform_1f (shader, "height", tex_size[1]);
+
+ gst_gl_effects_draw_texture (effects, texture);
+}
+
+void
+gst_gl_effects_squeeze (GstGLEffects *effects) {
+ GstGLFilter *filter = GST_GL_FILTER (effects);
+
+ gst_gl_filter_render_to_target (filter, effects->intexture, effects->outtexture,
+ gst_gl_effects_squeeze_callback, effects);
+}
diff --git a/gst/gl/effects/gstgleffectssources.c b/gst/gl/effects/gstgleffectssources.c
index e976b3a748..55acdd3b17 100644
--- a/gst/gl/effects/gstgleffectssources.c
+++ b/gst/gl/effects/gstgleffectssources.c
@@ -23,7 +23,8 @@
/* A common file for sources is needed since shader sources can be
* generic and reused by several effects */
-/* Mirror */
+
+/* Mirror effect */
const gchar *mirror_fragment_source =
"#extension GL_ARB_texture_rectangle : enable\n"
"uniform sampler2DRect tex;"
@@ -38,3 +39,23 @@ const gchar *mirror_fragment_source =
" vec4 color = texture2DRect (tex, texturecoord); "
" gl_FragColor = color * gl_Color;"
"}";
+
+
+/* Squeeze effect */
+const gchar *squeeze_fragment_source =
+"#extension GL_ARB_texture_rectangle : enable\n"
+"uniform sampler2DRect tex;"
+"uniform float width, height;"
+"void main () {"
+" vec2 tex_size = vec2 (width, height);"
+" vec2 texturecoord = gl_TexCoord[0].xy;"
+" vec2 normcoord;"
+" normcoord = texturecoord / tex_size - 1.0; "
+" float r = length (normcoord);"
+" r = pow(r, 0.40)*1.3;"
+" normcoord = normcoord / r;"
+" texturecoord = (normcoord + 1.0) * tex_size;"
+" vec4 color = texture2DRect (tex, texturecoord); "
+" gl_FragColor = color * gl_Color;"
+"}";
+
diff --git a/gst/gl/effects/gstgleffectssources.h b/gst/gl/effects/gstgleffectssources.h
index f58fe89b5e..dee149f58d 100644
--- a/gst/gl/effects/gstgleffectssources.h
+++ b/gst/gl/effects/gstgleffectssources.h
@@ -24,5 +24,6 @@
#define __GST_GL_EFFECTS_SOURCES_H__
const gchar *mirror_fragment_source;
+const gchar *squeeze_fragment_source;
#endif /* __GST_GL_EFFECTS_SOURCES_H__ */
diff --git a/gst/gl/gstgleffects.c b/gst/gl/gstgleffects.c
index 43b01788a6..942bea4498 100644
--- a/gst/gl/gstgleffects.c
+++ b/gst/gl/gstgleffects.c
@@ -57,6 +57,7 @@ static const GstElementDetails element_details = GST_ELEMENT_DETAILS (
typedef enum {
GST_GL_EFFECT_IDENTITY,
GST_GL_EFFECT_MIRROR,
+ GST_GL_EFFECT_SQUEEZE,
GST_GL_N_EFFECTS
} GstGLEffectsEffect;
@@ -68,6 +69,7 @@ gst_gl_effects_effect_get_type (void)
static const GEnumValue effect_types [] = {
{ GST_GL_EFFECT_IDENTITY, "Do nothing Effect", "identity" },
{ GST_GL_EFFECT_MIRROR, "Mirror Effect", "mirror" },
+ { GST_GL_EFFECT_SQUEEZE, "Squeeze Effect", "squeeze" },
{ 0, NULL, NULL }
};
@@ -214,6 +216,9 @@ gst_gl_effects_set_effect (GstGLEffects *effects, gint effect_type) {
case GST_GL_EFFECT_MIRROR:
effects->effect = (GstGLEffectProcessFunc) gst_gl_effects_mirror;
break;
+ case GST_GL_EFFECT_SQUEEZE:
+ effects->effect = (GstGLEffectProcessFunc) gst_gl_effects_squeeze;
+ break;
default:
g_assert_not_reached ();
}