1 /*****************************************************************************
2 * Psychedelic.c : Psychedelic video effect plugin for vlc
3 *****************************************************************************
4 * Copyright (C) 2000-2006 the VideoLAN team
7 * Authors: Samuel Hocevar <sam@zoy.org>
8 * Antoine Cellerier <dionoea -at- videolan -dot- org>
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23 *****************************************************************************/
25 /*****************************************************************************
27 *****************************************************************************/
33 #include <math.h> /* sin(), cos() */
35 #include <vlc_common.h>
36 #include <vlc_plugin.h>
38 #include <vlc_filter.h>
39 #include <vlc_image.h>
40 #include "filter_picture.h"
42 /*****************************************************************************
44 *****************************************************************************/
45 static int Create ( vlc_object_t
* );
46 static void Destroy ( vlc_object_t
* );
48 static picture_t
*Filter( filter_t
*, picture_t
* );
50 /*****************************************************************************
52 *****************************************************************************/
54 set_description( N_("Psychedelic video filter") )
55 set_shortname( N_( "Psychedelic" ))
56 set_capability( "video filter2", 0 )
57 set_category( CAT_VIDEO
)
58 set_subcategory( SUBCAT_VIDEO_VFILTER
)
60 add_shortcut( "psychedelic" )
61 set_callbacks( Create
, Destroy
)
64 /*****************************************************************************
65 * filter_sys_t: Distort video output method descriptor
66 *****************************************************************************
67 * This structure is part of the video output thread descriptor.
68 * It describes the Distort specific properties of an output thread.
69 *****************************************************************************/
72 image_handler_t
*p_image
;
73 unsigned int x
, y
, scale
;
74 int xinc
, yinc
, scaleinc
;
78 /*****************************************************************************
79 * Create: allocates Distort video thread output method
80 *****************************************************************************
81 * This function allocates and initializes a Distort vout method.
82 *****************************************************************************/
83 static int Create( vlc_object_t
*p_this
)
85 filter_t
*p_filter
= (filter_t
*)p_this
;
87 /* Allocate structure */
88 p_filter
->p_sys
= malloc( sizeof( filter_sys_t
) );
89 if( p_filter
->p_sys
== NULL
)
92 p_filter
->pf_video_filter
= Filter
;
94 p_filter
->p_sys
->x
= 10;
95 p_filter
->p_sys
->y
= 10;
96 p_filter
->p_sys
->scale
= 1;
97 p_filter
->p_sys
->xinc
= 1;
98 p_filter
->p_sys
->yinc
= 1;
99 p_filter
->p_sys
->scaleinc
= 1;
100 p_filter
->p_sys
->u
= 0;
101 p_filter
->p_sys
->v
= 0;
102 p_filter
->p_sys
->p_image
= NULL
;
107 /*****************************************************************************
108 * Destroy: destroy Distort video thread output method
109 *****************************************************************************
110 * Terminate an output method created by DistortCreateOutputMethod
111 *****************************************************************************/
112 static void Destroy( vlc_object_t
*p_this
)
114 filter_t
*p_filter
= (filter_t
*)p_this
;
116 if( p_filter
->p_sys
->p_image
)
117 image_HandlerDelete( p_filter
->p_sys
->p_image
);
118 p_filter
->p_sys
->p_image
= NULL
;
120 free( p_filter
->p_sys
);
123 /*****************************************************************************
124 * Render: displays previously rendered output
125 *****************************************************************************
126 * This function send the currently rendered image to Distort image, waits
127 * until it is displayed and switch the two rendering buffers, preparing next
129 *****************************************************************************/
130 static picture_t
*Filter( filter_t
*p_filter
, picture_t
*p_pic
)
138 picture_t
*p_converted
;
139 video_format_t fmt_out
;
140 memset( &fmt_out
, 0, sizeof(video_format_t
) );
141 fmt_out
.p_palette
= NULL
;
143 if( !p_pic
) return NULL
;
145 p_outpic
= filter_NewPicture( p_filter
);
148 picture_Release( p_pic
);
152 if( !p_filter
->p_sys
->p_image
)
153 p_filter
->p_sys
->p_image
= image_HandlerCreate( p_filter
);
156 u
= p_filter
->p_sys
->u
;
157 v
= p_filter
->p_sys
->v
;
158 for( y
= 0; y
<p_outpic
->p
[U_PLANE
].i_lines
; y
++)
161 p_outpic
->p
[U_PLANE
].p_pixels
+y
*p_outpic
->p
[U_PLANE
].i_pitch
,
162 u
, p_outpic
->p
[U_PLANE
].i_pitch
);
164 p_outpic
->p
[V_PLANE
].p_pixels
+y
*p_outpic
->p
[V_PLANE
].i_pitch
,
165 v
, p_outpic
->p
[V_PLANE
].i_pitch
);
166 if( v
== 0 && u
!= 0 )
177 plane_CopyPixels( &p_outpic
->p
[Y_PLANE
], &p_pic
->p
[Y_PLANE
] );
179 /* image visualization */
180 fmt_out
= p_filter
->fmt_out
.video
;
181 fmt_out
.i_width
= p_filter
->fmt_out
.video
.i_width
*p_filter
->p_sys
->scale
/150;
182 fmt_out
.i_height
= p_filter
->fmt_out
.video
.i_height
*p_filter
->p_sys
->scale
/150;
183 p_converted
= image_Convert( p_filter
->p_sys
->p_image
, p_pic
,
184 &(p_pic
->format
), &fmt_out
);
188 #define copyimage( plane, b ) \
189 for( y=0; y<p_converted->p[plane].i_visible_lines; y++) { \
190 for( x=0; x<p_converted->p[plane].i_visible_pitch; x++) { \
192 if( p_filter->p_sys->yinc == 1 ) \
195 ny = p_converted->p[plane].i_visible_lines-y; \
196 if( p_filter->p_sys->xinc == 1 ) \
199 nx = p_converted->p[plane].i_visible_pitch-x; \
200 p_outpic->p[plane].p_pixels[(p_filter->p_sys->x*b+nx)+(ny+p_filter->p_sys->y*b)*p_outpic->p[plane].i_pitch ] = p_converted->p[plane].p_pixels[y*p_converted->p[plane].i_pitch+x]; \
202 copyimage( Y_PLANE
, 2 );
203 copyimage( U_PLANE
, 1 );
204 copyimage( V_PLANE
, 1 );
207 picture_Release( p_converted
);
211 msg_Err( p_filter
, "Image scaling failed miserably." );
214 p_filter
->p_sys
->x
+= p_filter
->p_sys
->xinc
;
215 p_filter
->p_sys
->y
+= p_filter
->p_sys
->yinc
;
217 p_filter
->p_sys
->scale
+= p_filter
->p_sys
->scaleinc
;
218 if( p_filter
->p_sys
->scale
>= 50 ) p_filter
->p_sys
->scaleinc
= -1;
219 if( p_filter
->p_sys
->scale
<= 1 ) p_filter
->p_sys
->scaleinc
= 1;
221 w
= p_filter
->fmt_out
.video
.i_width
*p_filter
->p_sys
->scale
/150;
222 h
= p_filter
->fmt_out
.video
.i_height
*p_filter
->p_sys
->scale
/150;
223 if( p_filter
->p_sys
->x
*2 + w
>= p_filter
->fmt_out
.video
.i_width
)
224 p_filter
->p_sys
->xinc
= -1;
225 if( p_filter
->p_sys
->x
<= 0 )
226 p_filter
->p_sys
->xinc
= 1;
228 if( p_filter
->p_sys
->x
*2 + w
>= p_filter
->fmt_out
.video
.i_width
)
229 p_filter
->p_sys
->x
= (p_filter
->fmt_out
.video
.i_width
-w
)/2;
230 if( p_filter
->p_sys
->y
*2 + h
>= p_filter
->fmt_out
.video
.i_height
)
231 p_filter
->p_sys
->y
= (p_filter
->fmt_out
.video
.i_height
-h
)/2;
233 if( p_filter
->p_sys
->y
*2 + h
>= p_filter
->fmt_out
.video
.i_height
)
234 p_filter
->p_sys
->yinc
= -1;
235 if( p_filter
->p_sys
->y
<= 0 )
236 p_filter
->p_sys
->yinc
= 1;
238 for( y
= 0; y
< 16; y
++ )
240 if( p_filter
->p_sys
->v
== 0 && p_filter
->p_sys
->u
!= 0 )
241 p_filter
->p_sys
->u
-= 1;
242 else if( p_filter
->p_sys
->u
== 0xff )
243 p_filter
->p_sys
->v
-= 1;
244 else if( p_filter
->p_sys
->v
== 0xff )
245 p_filter
->p_sys
->u
+= 1;
246 else if( p_filter
->p_sys
->u
== 0 )
247 p_filter
->p_sys
->v
+= 1;
250 return CopyInfoAndRelease( p_outpic
, p_pic
);