]> git.sesse.net Git - vlc/blob - modules/visualization/visual/effects.c
Merge branch 'master' into lpcm_encoder
[vlc] / modules / visualization / visual / effects.c
1 /*****************************************************************************
2  * effects.c : Effects for the visualization system
3  *****************************************************************************
4  * Copyright (C) 2002-2009 the VideoLAN team
5  * $Id$
6  *
7  * Authors: ClĂ©ment Stenac <zorglub@via.ecp.fr>
8  *          Adrien Maglo <magsoft@videolan.org>
9  *
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.
14  *
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.
19  *
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  *****************************************************************************/
24
25 /*****************************************************************************
26  * Preamble
27  *****************************************************************************/
28 #ifdef HAVE_CONFIG_H
29 # include "config.h"
30 #endif
31
32 #include <vlc_common.h>
33 #include <vlc_vout.h>
34 #include <vlc_aout.h>
35
36 #include "visual.h"
37 #include <math.h>
38
39 #include "fft.h"
40
41 #define PEAK_SPEED 1
42 #define BAR_DECREASE_SPEED 5
43
44 #define GRAD_ANGLE_MIN 0.2
45 #define GRAD_ANGLE_MAX 0.5
46 #define GRAD_INCR 0.01
47
48 /*****************************************************************************
49  * dummy_Run
50  *****************************************************************************/
51 int dummy_Run( visual_effect_t * p_effect, vlc_object_t *p_aout,
52                const block_t * p_buffer , picture_t * p_picture)
53 {
54     VLC_UNUSED(p_effect); VLC_UNUSED(p_aout); VLC_UNUSED(p_buffer);
55     VLC_UNUSED(p_picture);
56     return 0;
57 }
58
59 /*****************************************************************************
60  * spectrum_Run: spectrum analyser
61  *****************************************************************************/
62 int spectrum_Run(visual_effect_t * p_effect, vlc_object_t *p_aout,
63                  const block_t * p_buffer , picture_t * p_picture)
64 {
65     spectrum_data *p_data = p_effect->p_data;
66     float p_output[FFT_BUFFER_SIZE];  /* Raw FFT Result  */
67     int *height;                      /* Bar heights */
68     int *peaks;                       /* Peaks */
69     int *prev_heights;                /* Previous bar heights */
70     int i_80_bands;                   /* number of bands : 80 if true else 20 */
71     int i_nb_bands;                   /* number of bands : 80 or 20 */
72     int i_band_width;                 /* width of bands */
73     int i_start;                      /* first band horizontal position */
74     int i_peak;                       /* Should we draw peaks ? */
75
76     /* Horizontal scale for 20-band equalizer */
77     const int xscale1[]={0,1,2,3,4,5,6,7,8,11,15,20,27,
78                         36,47,62,82,107,141,184,255};
79
80     /* Horizontal scale for 80-band equalizer */
81     const int xscale2[] =
82     {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,
83      19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,
84      35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,
85      52,53,54,55,56,57,58,59,61,63,67,72,77,82,87,93,99,105,
86      110,115,121,130,141,152,163,174,185,200,255};
87     const int *xscale;
88
89     fft_state *p_state;                 /* internal FFT data */
90
91     int i , j , y , k;
92     int i_line;
93     int16_t p_dest[FFT_BUFFER_SIZE];      /* Adapted FFT result */
94     int16_t p_buffer1[FFT_BUFFER_SIZE];   /* Buffer on which we perform
95                                              the FFT (first channel) */
96
97     float *p_buffl =                     /* Original buffer */
98             (float*)p_buffer->p_buffer;
99
100     int16_t  *p_buffs;                    /* int16_t converted buffer */
101     int16_t  *p_s16_buff;                 /* int16_t converted buffer */
102
103     /* Create p_data if needed */
104     if( !p_data )
105     {
106         p_effect->p_data = p_data = malloc( sizeof( spectrum_data ) );
107         if( !p_data )
108             return -1;
109
110         p_data->peaks = calloc( 80, sizeof(int) );
111         p_data->prev_heights = calloc( 80, sizeof(int) );
112
113         p_data->i_prev_nb_samples = 0;
114         p_data->p_prev_s16_buff = NULL;
115     }
116     peaks = (int *)p_data->peaks;
117     prev_heights = (int *)p_data->prev_heights;
118
119     /* Allocate the buffer only if the number of samples change */
120     if( p_buffer->i_nb_samples != p_data->i_prev_nb_samples )
121     {
122         free( p_data->p_prev_s16_buff );
123         p_data->p_prev_s16_buff = malloc( p_buffer->i_nb_samples *
124                                           p_effect->i_nb_chans *
125                                           sizeof(int16_t));
126         p_data->i_prev_nb_samples = p_buffer->i_nb_samples;
127         if( !p_data->p_prev_s16_buff )
128             return -1;
129     }
130     p_buffs = p_s16_buff = p_data->p_prev_s16_buff;
131
132     i_80_bands = var_InheritInteger( p_aout, "visual-80-bands" );
133     i_peak     = var_InheritInteger( p_aout, "visual-peaks" );
134
135     if( i_80_bands != 0)
136     {
137         xscale = xscale2;
138         i_nb_bands = 80;
139     }
140     else
141     {
142         xscale = xscale1;
143         i_nb_bands = 20;
144     }
145
146     height = malloc( i_nb_bands * sizeof(int) );
147     if( !height )
148     {
149         return -1;
150     }
151     /* Convert the buffer to int16_t  */
152     /* Pasted from float32tos16.c */
153     for (i = p_buffer->i_nb_samples * p_effect->i_nb_chans; i--; )
154     {
155         union { float f; int32_t i; } u;
156         u.f = *p_buffl + 384.0;
157         if(u.i >  0x43c07fff ) * p_buffs = 32767;
158         else if ( u.i < 0x43bf8000 ) *p_buffs = -32768;
159         else *p_buffs = u.i - 0x43c00000;
160
161         p_buffl++ ; p_buffs++ ;
162     }
163     p_state  = visual_fft_init();
164     if( !p_state)
165     {
166         free( height );
167         msg_Err(p_aout,"unable to initialize FFT transform");
168         return -1;
169     }
170     p_buffs = p_s16_buff;
171     for ( i = 0 ; i < FFT_BUFFER_SIZE ; i++)
172     {
173         p_output[i]  = 0;
174         p_buffer1[i] = *p_buffs;
175
176         p_buffs += p_effect->i_nb_chans;
177         if( p_buffs >= &p_s16_buff[p_buffer->i_nb_samples * p_effect->i_nb_chans] )
178             p_buffs = p_s16_buff;
179
180     }
181     fft_perform( p_buffer1, p_output, p_state);
182     for( i = 0; i< FFT_BUFFER_SIZE ; i++ )
183         p_dest[i] = p_output[i] *  ( 2 ^ 16 ) / ( ( FFT_BUFFER_SIZE / 2 * 32768 ) ^ 2 );
184
185     /* Compute the horizontal position of the first band */
186     i_band_width = floor( p_effect->i_width / i_nb_bands);
187     i_start = ( p_effect->i_width - i_band_width * i_nb_bands ) / 2;
188
189     for ( i = 0 ; i < i_nb_bands ;i++)
190     {
191         /* We search the maximum on one scale */
192         for( j = xscale[i], y = 0; j< xscale[ i + 1 ]; j++ )
193         {
194             if ( p_dest[j] > y )
195                  y = p_dest[j];
196         }
197         /* Calculate the height of the bar */
198         if( y != 0 )
199         {
200             height[i] = log( y ) * 30;
201             if( height[i] > 380 )
202                 height[i] = 380;
203         }
204         else
205             height[ i ] = 0;
206
207         /* Draw the bar now */
208
209         if( height[i] > peaks[i] )
210         {
211             peaks[i] = height[i];
212         }
213         else if( peaks[i] > 0 )
214         {
215             peaks[i] -= PEAK_SPEED;
216             if( peaks[i] < height[i] )
217             {
218                 peaks[i] = height[i];
219             }
220             if( peaks[i] < 0 )
221             {
222                 peaks[i] = 0;
223             }
224         }
225
226         /* Decrease the bars if needed */
227         if( height[i] <= prev_heights[i] - BAR_DECREASE_SPEED )
228         {
229             height[i] = prev_heights[i];
230             height[i] -= BAR_DECREASE_SPEED;
231         }
232         prev_heights[i] = height[i];
233
234         if( peaks[i] > 0 && i_peak )
235         {
236             if( peaks[i] >= p_effect->i_height )
237                 peaks[i] = p_effect->i_height - 2;
238             i_line = peaks[i];
239
240             for( j = 0; j < i_band_width - 1; j++ )
241             {
242                for( k = 0; k < 3; k ++ )
243                {
244                    /* Draw the peak */
245                    *(p_picture->p[0].p_pixels +
246                     ( p_effect->i_height - i_line -1 -k ) *
247                      p_picture->p[0].i_pitch +
248                      ( i_start + i_band_width*i + j ) )
249                                     = 0xff;
250
251                    *(p_picture->p[1].p_pixels +
252                     ( ( p_effect->i_height - i_line ) / 2 - 1 -k/2 ) *
253                      p_picture->p[1].i_pitch +
254                      ( ( i_start + i_band_width * i + j ) /2  ) )
255                                     = 0x00;
256
257                    if( i_line + k - 0x0f > 0 )
258                    {
259                        if ( i_line + k - 0x0f < 0xff )
260                            *(p_picture->p[2].p_pixels  +
261                             ( ( p_effect->i_height - i_line ) / 2 - 1 -k/2 ) *
262                              p_picture->p[2].i_pitch +
263                              ( ( i_start + i_band_width * i + j ) /2  ) )
264                                     = ( i_line + k ) - 0x0f;
265                        else
266                            *(p_picture->p[2].p_pixels  +
267                             ( ( p_effect->i_height - i_line ) / 2 - 1 -k/2 ) *
268                              p_picture->p[2].i_pitch +
269                              ( ( i_start + i_band_width * i + j ) /2  ) )
270                                     = 0xff;
271                    }
272                    else
273                    {
274                         *(p_picture->p[2].p_pixels  +
275                          ( ( p_effect->i_height - i_line ) / 2 - 1 -k/2 ) *
276                          p_picture->p[2].i_pitch +
277                          ( ( i_start + i_band_width * i + j ) /2  ) )
278                                = 0x10 ;
279                    }
280                }
281             }
282         }
283
284         if(height[i] > p_effect->i_height)
285             height[i] = floor(p_effect->i_height );
286
287         for( i_line = 0; i_line < height[i]; i_line++ )
288         {
289             for( j = 0 ; j < i_band_width - 1; j++)
290             {
291                *(p_picture->p[0].p_pixels +
292                  (p_effect->i_height - i_line - 1) *
293                   p_picture->p[0].i_pitch +
294                   ( i_start + i_band_width*i + j ) ) = 0xff;
295
296                *(p_picture->p[1].p_pixels +
297                  ( ( p_effect->i_height - i_line ) / 2 - 1) *
298                  p_picture->p[1].i_pitch +
299                  ( ( i_start + i_band_width * i + j ) /2  ) ) = 0x00;
300
301                if( i_line - 0x0f > 0 )
302                {
303                     if( i_line - 0x0f < 0xff )
304                          *(p_picture->p[2].p_pixels  +
305                            ( ( p_effect->i_height - i_line ) / 2 - 1) *
306                            p_picture->p[2].i_pitch +
307                            ( ( i_start + i_band_width * i + j ) /2  ) ) =
308                                i_line - 0x0f;
309                     else
310                          *(p_picture->p[2].p_pixels  +
311                            ( ( p_effect->i_height - i_line ) / 2  - 1) *
312                            p_picture->p[2].i_pitch +
313                            ( ( i_start + i_band_width * i + j ) /2  ) ) =
314                                        0xff;
315                }
316                else
317                {
318                     *(p_picture->p[2].p_pixels  +
319                       ( ( p_effect->i_height - i_line ) / 2  - 1) *
320                       p_picture->p[2].i_pitch +
321                       ( ( i_start + i_band_width * i + j ) /2  ) ) =
322                             0x10;
323                }
324             }
325         }
326     }
327
328     fft_close( p_state );
329
330     free( height );
331
332     return 0;
333 }
334
335
336 /*****************************************************************************
337  * spectrometer_Run: derivative spectrum analysis
338  *****************************************************************************/
339 int spectrometer_Run(visual_effect_t * p_effect, vlc_object_t *p_aout,
340                      const block_t * p_buffer , picture_t * p_picture)
341 {
342 #define Y(R,G,B) ((uint8_t)( (R * .299) + (G * .587) + (B * .114) ))
343 #define U(R,G,B) ((uint8_t)( (R * -.169) + (G * -.332) + (B * .500) + 128 ))
344 #define V(R,G,B) ((uint8_t)( (R * .500) + (G * -.419) + (B * -.0813) + 128 ))
345     float p_output[FFT_BUFFER_SIZE];  /* Raw FFT Result  */
346     int *height;                      /* Bar heights */
347     int *peaks;                       /* Peaks */
348     int i_80_bands;                   /* number of bands : 80 if true else 20 */
349     int i_nb_bands;                   /* number of bands : 80 or 20 */
350     int i_band_width;                 /* width of bands */
351     int i_separ;                      /* Should we let blanks ? */
352     int i_amp;                        /* Vertical amplification */
353     int i_peak;                       /* Should we draw peaks ? */
354
355     int i_original;          /* original spectrum graphic routine */
356     int i_rad;               /* radius of circle of base of bands */
357     int i_sections;          /* sections of spectranalysis */
358     int i_extra_width;       /* extra width on peak */
359     int i_peak_height;       /* height of peak */
360     int c;                   /* sentinel container of total spectral sections */
361     double band_sep_angle;   /* angled separation between beginning of each band */
362     double section_sep_angle;/* "   "    '     "    '    "     "    spectrum section */
363     int max_band_length;     /* try not to go out of screen */
364     int i_show_base;         /* Should we draw base of circle ? */
365     int i_show_bands;        /* Should we draw bands ? */
366     //int i_invert_bands;      /* do the bands point inward ? */
367     double a;                /* for various misc angle situations in radians */
368     int x,y,xx,yy;           /* various misc x/y */
369     char color1;             /* V slide on a YUV color cube */
370     //char color2;             /* U slide.. ?  color2 fade color ? */
371
372     /* Horizontal scale for 20-band equalizer */
373     const int xscale1[]={0,1,2,3,4,5,6,7,8,11,15,20,27,
374                         36,47,62,82,107,141,184,255};
375
376     /* Horizontal scale for 80-band equalizer */
377     const int xscale2[] =
378     {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,
379      19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,
380      35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,
381      52,53,54,55,56,57,58,59,61,63,67,72,77,82,87,93,99,105,
382      110,115,121,130,141,152,163,174,185,200,255};
383     const int *xscale;
384     const double y_scale =  3.60673760222;  /* (log 256) */
385
386     fft_state *p_state;                 /* internal FFT data */
387
388     int i , j , k;
389     int i_line = 0;
390     int16_t p_dest[FFT_BUFFER_SIZE];      /* Adapted FFT result */
391     int16_t p_buffer1[FFT_BUFFER_SIZE];   /* Buffer on which we perform
392                                              the FFT (first channel) */
393     float *p_buffl =                     /* Original buffer */
394             (float*)p_buffer->p_buffer;
395
396     int16_t  *p_buffs;                    /* int16_t converted buffer */
397     int16_t  *p_s16_buff;                /* int16_t converted buffer */
398
399     /* Create the data struct if needed */
400     spectrometer_data *p_data = p_effect->p_data;
401     if( !p_data )
402     {
403         p_data = malloc( sizeof(spectrometer_data) );
404         if( !p_data )
405             return -1;
406         p_data->peaks = calloc( 80, sizeof(int) );
407         if( !p_data->peaks )
408         {
409             free( p_data );
410             return -1;
411         }
412         p_data->i_prev_nb_samples = 0;
413         p_data->p_prev_s16_buff = NULL;
414         p_effect->p_data = (void*)p_data;
415     }
416     peaks = p_data->peaks;
417
418     /* Allocate the buffer only if the number of samples change */
419     if( p_buffer->i_nb_samples != p_data->i_prev_nb_samples )
420     {
421         free( p_data->p_prev_s16_buff );
422         p_data->p_prev_s16_buff = malloc( p_buffer->i_nb_samples *
423                                           p_effect->i_nb_chans *
424                                           sizeof(int16_t));
425         p_data->i_prev_nb_samples = p_buffer->i_nb_samples;
426         if( !p_data->p_prev_s16_buff )
427             return -1;
428     }
429     p_buffs = p_s16_buff = p_data->p_prev_s16_buff;
430
431     i_original     = var_InheritInteger( p_aout, "spect-show-original" );
432     i_80_bands     = var_InheritInteger( p_aout, "spect-80-bands" );
433     i_separ        = var_InheritInteger( p_aout, "spect-separ" );
434     i_amp          = var_InheritInteger( p_aout, "spect-amp" );
435     i_peak         = var_InheritInteger( p_aout, "spect-show-peaks" );
436     i_show_base    = var_InheritInteger( p_aout, "spect-show-base" );
437     i_show_bands   = var_InheritInteger( p_aout, "spect-show-bands" );
438     i_rad          = var_InheritInteger( p_aout, "spect-radius" );
439     i_sections     = var_InheritInteger( p_aout, "spect-sections" );
440     i_extra_width  = var_InheritInteger( p_aout, "spect-peak-width" );
441     i_peak_height  = var_InheritInteger( p_aout, "spect-peak-height" );
442     color1         = var_InheritInteger( p_aout, "spect-color" );
443
444     if( i_80_bands != 0)
445     {
446         xscale = xscale2;
447         i_nb_bands = 80;
448     }
449     else
450     {
451         xscale = xscale1;
452         i_nb_bands = 20;
453     }
454
455     height = malloc( i_nb_bands * sizeof(int) );
456     if( !height)
457         return -1;
458
459     /* Convert the buffer to int16_t  */
460     /* Pasted from float32tos16.c */
461     for (i = p_buffer->i_nb_samples * p_effect->i_nb_chans; i--; )
462     {
463         union { float f; int32_t i; } u;
464         u.f = *p_buffl + 384.0;
465         if(u.i >  0x43c07fff ) * p_buffs = 32767;
466         else if ( u.i < 0x43bf8000 ) *p_buffs = -32768;
467         else *p_buffs = u.i - 0x43c00000;
468
469         p_buffl++ ; p_buffs++ ;
470     }
471     p_state  = visual_fft_init();
472     if( !p_state)
473     {
474         msg_Err(p_aout,"unable to initialize FFT transform");
475         free( height );
476         return -1;
477     }
478     p_buffs = p_s16_buff;
479     for ( i = 0 ; i < FFT_BUFFER_SIZE; i++)
480     {
481         p_output[i]    = 0;
482         p_buffer1[i] = *p_buffs;
483
484         p_buffs += p_effect->i_nb_chans;
485         if( p_buffs >= &p_s16_buff[p_buffer->i_nb_samples * p_effect->i_nb_chans] )
486             p_buffs = p_s16_buff;
487     }
488     fft_perform( p_buffer1, p_output, p_state);
489     for(i = 0; i < FFT_BUFFER_SIZE; i++)
490     {
491         int sqrti = sqrt(p_output[i]);
492         p_dest[i] = sqrti >> 8;
493     }
494
495     i_nb_bands *= i_sections;
496
497     for ( i = 0 ; i< i_nb_bands/i_sections ;i++)
498     {
499         /* We search the maximum on one scale */
500         for( j = xscale[i] , y=0 ; j< xscale[ i + 1 ] ; j++ )
501         {
502             if ( p_dest[j] > y )
503                  y = p_dest[j];
504         }
505         /* Calculate the height of the bar */
506         y >>=7;/* remove some noise */
507         if( y != 0)
508         {
509             int logy = log(y);
510             height[i] = logy * y_scale;
511             if(height[i] > 150)
512                 height[i] = 150;
513         }
514         else
515         {
516             height[i] = 0 ;
517         }
518
519         /* Draw the bar now */
520         i_band_width = floor( p_effect->i_width / (i_nb_bands/i_sections)) ;
521
522         if( i_amp * height[i] > peaks[i])
523         {
524             peaks[i] = i_amp * height[i];
525         }
526         else if (peaks[i] > 0 )
527         {
528             peaks[i] -= PEAK_SPEED;
529             if( peaks[i] < i_amp * height[i] )
530             {
531                 peaks[i] = i_amp * height[i];
532             }
533             if( peaks[i] < 0 )
534             {
535                 peaks[i] = 0;
536             }
537         }
538
539         if( i_original != 0 )
540         {
541         if( peaks[i] > 0 && i_peak )
542         {
543             if( peaks[i] >= p_effect->i_height )
544                 peaks[i] = p_effect->i_height - 2;
545             i_line = peaks[i];
546
547             for( j = 0 ; j< i_band_width - i_separ; j++)
548             {
549                for( k = 0 ; k< 3 ; k ++)
550                {
551                    //* Draw the peak
552                      *(p_picture->p[0].p_pixels +
553                     (p_effect->i_height - i_line -1 -k ) *
554                      p_picture->p[0].i_pitch + (i_band_width*i +j) )
555                                     = 0xff;
556
557                     *(p_picture->p[1].p_pixels +
558                      ( ( p_effect->i_height - i_line ) / 2 -1 -k/2 ) *
559                      p_picture->p[1].i_pitch +
560                     ( ( i_band_width * i + j ) /2  ) )
561                                     = 0x00;
562
563                    if( 0x04 * (i_line + k ) - 0x0f > 0 )
564                    {
565                        if ( 0x04 * (i_line + k ) -0x0f < 0xff)
566                            *(p_picture->p[2].p_pixels  +
567                             ( ( p_effect->i_height - i_line ) / 2 - 1 -k/2 ) *
568                              p_picture->p[2].i_pitch +
569                              ( ( i_band_width * i + j ) /2  ) )
570                                     = ( 0x04 * ( i_line + k ) ) -0x0f ;
571                        else
572                            *(p_picture->p[2].p_pixels  +
573                             ( ( p_effect->i_height - i_line ) / 2 - 1 -k/2 ) *
574                              p_picture->p[2].i_pitch +
575                              ( ( i_band_width * i + j ) /2  ) )
576                                     = 0xff;
577                    }
578                    else
579                    {
580                         *(p_picture->p[2].p_pixels  +
581                          ( ( p_effect->i_height - i_line ) / 2 - 1 -k/2 ) *
582                          p_picture->p[2].i_pitch +
583                          ( ( i_band_width * i + j ) /2  ) )
584                                = 0x10 ;
585                    }
586                }
587             }
588         }
589         if(height[i] * i_amp > p_effect->i_height)
590             height[i] = floor(p_effect->i_height / i_amp );
591
592         for(i_line = 0 ; i_line < i_amp * height[i]; i_line ++ )
593         {
594             for( j = 0 ; j< i_band_width - i_separ ; j++)
595             {
596                *(p_picture->p[0].p_pixels +
597                  (p_effect->i_height - i_line -1) *
598                   p_picture->p[0].i_pitch + (i_band_width*i +j) ) = 0xff;
599
600                 *(p_picture->p[1].p_pixels +
601                  ( ( p_effect->i_height - i_line ) / 2 -1) *
602                  p_picture->p[1].i_pitch +
603                  ( ( i_band_width * i + j ) /2  ) ) = 0x00;
604
605                if( 0x04 * i_line - 0x0f > 0 )
606                {
607                     if( 0x04 * i_line - 0x0f < 0xff )
608                          *(p_picture->p[2].p_pixels  +
609                           ( ( p_effect->i_height - i_line ) / 2 - 1) *
610                            p_picture->p[2].i_pitch +
611                            ( ( i_band_width * i + j ) /2  ) ) =
612                                ( 0x04 * i_line) -0x0f ;
613                     else
614                          *(p_picture->p[2].p_pixels  +
615                           ( ( p_effect->i_height - i_line ) / 2 - 1) *
616                            p_picture->p[2].i_pitch +
617                            ( ( i_band_width * i + j ) /2  ) ) =
618                                        0xff;
619                }
620                else
621                {
622                     *(p_picture->p[2].p_pixels  +
623                      ( ( p_effect->i_height - i_line ) / 2 - 1) *
624                      p_picture->p[2].i_pitch +
625                      ( ( i_band_width * i + j ) /2  ) ) =
626                             0x10 ;
627                }
628             }
629         }
630         }
631     }
632
633     band_sep_angle = 360.0 / i_nb_bands;
634     section_sep_angle = 360.0 / i_sections;
635     if( i_peak_height < 1 )
636         i_peak_height = 1;
637     max_band_length = p_effect->i_height / 2 - ( i_rad + i_peak_height + 1 );
638
639     i_band_width = floor( 360 / i_nb_bands - i_separ );
640     if( i_band_width < 1 )
641         i_band_width = 1;
642
643     for( c = 0 ; c < i_sections ; c++ )
644     for( i = 0 ; i < (i_nb_bands / i_sections) ; i++ )
645     {
646         /* DO A PEAK */
647         if( peaks[i] > 0 && i_peak )
648         {
649             if( peaks[i] >= p_effect->i_height )
650                 peaks[i] = p_effect->i_height - 2;
651             i_line = peaks[i];
652
653             /* circular line pattern(so color blend is more visible) */
654             for( j = 0 ; j < i_peak_height ; j++ )
655             {
656                 //x = p_picture->p[0].i_pitch / 2;
657                 x = p_effect->i_width / 2;
658                 y = p_effect->i_height / 2;
659                 xx = x;
660                 yy = y;
661                 for( k = 0 ; k < (i_band_width + i_extra_width) ; k++ )
662                 {
663                     x = xx;
664                     y = yy;
665                     a = ( (i+1) * band_sep_angle + section_sep_angle * (c+1) + k )
666                         * 3.141592 / 180.0;
667                     x += (double)( cos(a) * (double)( i_line + j + i_rad ) );
668                     y += (double)( -sin(a) * (double)( i_line + j + i_rad ) );
669
670                     *(p_picture->p[0].p_pixels + x + y * p_picture->p[0].i_pitch
671                     ) = 255;/* Y(R,G,B); */
672
673                     x /= 2;
674                     y /= 2;
675
676                     *(p_picture->p[1].p_pixels + x + y * p_picture->p[1].i_pitch
677                     ) = 0;/* U(R,G,B); */
678
679                     if( 0x04 * (i_line + k ) - 0x0f > 0 )
680                     {
681                         if ( 0x04 * (i_line + k ) -0x0f < 0xff)
682                             *(p_picture->p[2].p_pixels + x + y * p_picture->p[2].i_pitch
683                             ) = ( 0x04 * ( i_line + k ) ) -(color1-1);/* -V(R,G,B); */
684                         else
685                             *(p_picture->p[2].p_pixels + x + y * p_picture->p[2].i_pitch
686                             ) = 255;/* V(R,G,B); */
687                     }
688                     else
689                     {
690                         *(p_picture->p[2].p_pixels + x + y * p_picture->p[2].i_pitch
691                         ) = color1;/* V(R,G,B); */
692                     }
693                 }
694             }
695         }
696
697         if( (height[i] * i_amp) > p_effect->i_height )
698             height[i] = floor( p_effect->i_height / i_amp );
699
700         /* DO BASE OF BAND (mostly makes a circle) */
701         if( i_show_base != 0 )
702         {
703             //x = p_picture->p[0].i_pitch / 2;
704             x = p_effect->i_width / 2;
705             y = p_effect->i_height / 2;
706
707             a =  ( (i+1) * band_sep_angle + section_sep_angle * (c+1) )
708                 * 3.141592 / 180.0;
709             x += (double)( cos(a) * (double)i_rad );/* newb-forceful casting */
710             y += (double)( -sin(a) * (double)i_rad );
711
712             *(p_picture->p[0].p_pixels + x + y * p_picture->p[0].i_pitch
713             ) = 255;/* Y(R,G,B); */
714
715             x /= 2;
716             y /= 2;
717
718             *(p_picture->p[1].p_pixels + x + y * p_picture->p[1].i_pitch
719             ) = 0;/* U(R,G,B); */
720
721             if( 0x04 * i_line - 0x0f > 0 )
722             {
723                 if( 0x04 * i_line -0x0f < 0xff)
724                     *(p_picture->p[2].p_pixels + x + y * p_picture->p[2].i_pitch
725                     ) = ( 0x04 * i_line) -(color1-1);/* -V(R,G,B); */
726                 else
727                     *(p_picture->p[2].p_pixels + x + y * p_picture->p[2].i_pitch
728                     ) = 255;/* V(R,G,B); */
729             }
730             else
731             {
732                 *(p_picture->p[2].p_pixels + x + y * p_picture->p[2].i_pitch
733                 ) = color1;/* V(R,G,B); */
734             }
735         }
736
737         /* DO A BAND */
738         if( i_show_bands != 0 )
739         for( j = 0 ; j < i_band_width ; j++ )
740         {
741             x = p_effect->i_width / 2;
742             y = p_effect->i_height / 2;
743             xx = x;
744             yy = y;
745             a = ( (i+1) * band_sep_angle + section_sep_angle * (c+1) + j )
746                 * 3.141592/180.0;
747
748             for( k = (i_rad+1) ; k < max_band_length ; k++ )
749             {
750                 if( (k-i_rad) > height[i] )
751                     break;/* uhh.. */
752
753                 x = xx;
754                 y = yy;
755                 x += (double)( cos(a) * (double)k );/* newbed! */
756                 y += (double)( -sin(a) * (double)k );
757
758                 *(p_picture->p[0].p_pixels + x + y * p_picture->p[0].i_pitch
759                 ) = 255;
760
761                 x /= 2;
762                 y /= 2;
763
764                 *(p_picture->p[1].p_pixels + x + y * p_picture->p[1].i_pitch
765                 ) = 0;
766
767                 if( 0x04 * i_line - 0x0f > 0 )
768                 {
769                     if ( 0x04 * i_line -0x0f < 0xff)
770                         *(p_picture->p[2].p_pixels + x + y * p_picture->p[2].i_pitch
771                         ) = ( 0x04 * i_line) -(color1-1);
772                     else
773                         *(p_picture->p[2].p_pixels + x + y * p_picture->p[2].i_pitch
774                         ) = 255;
775                 }
776                 else
777                 {
778                     *(p_picture->p[2].p_pixels + x + y * p_picture->p[2].i_pitch
779                     ) = color1;
780                 }
781             }
782         }
783     }
784
785     fft_close( p_state );
786
787     free( height );
788
789     return 0;
790 }
791
792
793 /*****************************************************************************
794  * scope_Run: scope effect
795  *****************************************************************************/
796 int scope_Run(visual_effect_t * p_effect, vlc_object_t *p_aout,
797               const block_t * p_buffer , picture_t * p_picture)
798 {
799     VLC_UNUSED(p_aout);
800
801     int i_index;
802     float *p_sample ;
803     uint8_t *ppp_area[2][3];
804
805     for( i_index = 0 ; i_index < 2 ; i_index++ )
806     {
807         for( int j = 0 ; j < 3 ; j++ )
808         {
809             ppp_area[i_index][j] =
810                 p_picture->p[j].p_pixels + i_index * p_picture->p[j].i_lines
811                 / 2 * p_picture->p[j].i_pitch;
812         }
813     }
814
815     for( i_index = 0, p_sample = (float *)p_buffer->p_buffer;
816             i_index < __MIN( p_effect->i_width, (int)p_buffer->i_nb_samples );
817             i_index++ )
818     {
819         uint8_t i_value;
820
821         /* Left channel */
822         i_value =  p_sample[p_effect->i_idx_left] * 127;
823         *(ppp_area[0][0]
824                 + p_picture->p[0].i_pitch * i_index / p_effect->i_width
825                 + p_picture->p[0].i_lines * i_value / 512
826                 * p_picture->p[0].i_pitch) = 0xbf;
827         *(ppp_area[0][1]
828                 + p_picture->p[1].i_pitch * i_index / p_effect->i_width
829                 + p_picture->p[1].i_lines * i_value / 512
830                 * p_picture->p[1].i_pitch) = 0xff;
831
832
833         /* Right channel */
834         i_value = p_sample[p_effect->i_idx_right] * 127;
835         *(ppp_area[1][0]
836                 + p_picture->p[0].i_pitch * i_index / p_effect->i_width
837                 + p_picture->p[0].i_lines * i_value / 512
838                 * p_picture->p[0].i_pitch) = 0x9f;
839         *(ppp_area[1][2]
840                 + p_picture->p[2].i_pitch * i_index / p_effect->i_width
841                 + p_picture->p[2].i_lines * i_value / 512
842                 * p_picture->p[2].i_pitch) = 0xdd;
843
844         p_sample += p_effect->i_nb_chans;
845     }
846     return 0;
847 }
848
849
850 /*****************************************************************************
851  * vuMeter_Run: vu meter effect
852  *****************************************************************************/
853 int vuMeter_Run(visual_effect_t * p_effect, vlc_object_t *p_aout,
854                 const block_t * p_buffer , picture_t * p_picture)
855 {
856     VLC_UNUSED(p_aout);
857     float i_value_l = 0;
858     float i_value_r = 0;
859
860     /* Compute the peack values */
861     for ( unsigned i = 0 ; i < p_buffer->i_nb_samples; i++ )
862     {
863         const float *p_sample = (float *)p_buffer->p_buffer;
864         float ch;
865
866         ch = p_sample[p_effect->i_idx_left] * 256;
867         if (ch > i_value_l)
868             i_value_l = ch;
869
870         ch = p_sample[p_effect->i_idx_right] * 256;
871         if (ch > i_value_r)
872             i_value_r = ch;
873
874         p_sample += p_effect->i_nb_chans;
875     }
876
877     i_value_l = abs(i_value_l);
878     i_value_r = abs(i_value_r);
879
880     /* Stay under maximum value admited */
881     if ( i_value_l > 200 * M_PI_2 )
882         i_value_l = 200 * M_PI_2;
883     if ( i_value_r > 200 * M_PI_2 )
884         i_value_r = 200 * M_PI_2;
885
886     float *i_value;
887
888     if( !p_effect->p_data )
889     {
890         /* Allocate memory to save hand positions */
891         p_effect->p_data = malloc( 2 * sizeof(float) );
892         i_value = p_effect->p_data;
893         i_value[0] = i_value_l;
894         i_value[1] = i_value_r;
895     }
896     else
897     {
898         /* Make the hands go down slowly if the current values are slower
899            than the previous */
900         i_value = p_effect->p_data;
901
902         if ( i_value_l > i_value[0] - 6 )
903             i_value[0] = i_value_l;
904         else
905             i_value[0] = i_value[0] - 6;
906
907         if ( i_value_r > i_value[1] - 6 )
908             i_value[1] = i_value_r;
909         else
910             i_value[1] = i_value[1] - 6;
911     }
912
913     int x, y;
914     float teta;
915     float teta_grad;
916
917     int start_x = p_effect->i_width / 2 - 120; /* i_width.min = 532 (visual.c) */
918
919     for ( int j = 0; j < 2; j++ )
920     {
921         /* Draw the two scales */
922         int k = 0;
923         teta_grad = GRAD_ANGLE_MIN;
924         for ( teta = -M_PI_4; teta <= M_PI_4; teta = teta + 0.003 )
925         {
926             for ( unsigned i = 140; i <= 150; i++ )
927             {
928                 y = i * cos(teta) + 20;
929                 x = i * sin(teta) + start_x + 240 * j;
930                 /* Compute the last color for the gradation */
931                 if (teta >= teta_grad + GRAD_INCR && teta_grad <= GRAD_ANGLE_MAX)
932                 {
933                     teta_grad = teta_grad + GRAD_INCR;
934                     k = k + 5;
935                 }
936                 *(p_picture->p[0].p_pixels +
937                         (p_picture->p[0].i_lines - y - 1 ) * p_picture->p[0].i_pitch
938                         + x ) = 0x45;
939                 *(p_picture->p[1].p_pixels +
940                         (p_picture->p[1].i_lines - y / 2 - 1 ) * p_picture->p[1].i_pitch
941                         + x / 2 ) = 0x0;
942                 *(p_picture->p[2].p_pixels +
943                         (p_picture->p[2].i_lines - y / 2 - 1 ) * p_picture->p[2].i_pitch
944                         + x / 2 ) = 0x4D + k;
945             }
946         }
947
948         /* Draw the two hands */
949         teta = (float)i_value[j] / 200 - M_PI_4;
950         for ( int i = 0; i <= 150; i++ )
951         {
952             y = i * cos(teta) + 20;
953             x = i * sin(teta) + start_x + 240 * j;
954             *(p_picture->p[0].p_pixels +
955                     (p_picture->p[0].i_lines - y - 1 ) * p_picture->p[0].i_pitch
956                     + x ) = 0xAD;
957             *(p_picture->p[1].p_pixels +
958                     (p_picture->p[1].i_lines - y / 2 - 1 ) * p_picture->p[1].i_pitch
959                     + x / 2 ) = 0xFC;
960             *(p_picture->p[2].p_pixels +
961                     (p_picture->p[2].i_lines - y / 2 - 1 ) * p_picture->p[2].i_pitch
962                     + x / 2 ) = 0xAC;
963         }
964
965         /* Draw the hand bases */
966         for ( teta = -M_PI_2; teta <= M_PI_2 + 0.01; teta = teta + 0.003 )
967         {
968             for ( int i = 0; i < 10; i++ )
969             {
970                 y = i * cos(teta) + 20;
971                 x = i * sin(teta) + start_x + 240 * j;
972                 *(p_picture->p[0].p_pixels +
973                         (p_picture->p[0].i_lines - y - 1 ) * p_picture->p[0].i_pitch
974                         + x ) = 0xFF;
975                 *(p_picture->p[1].p_pixels +
976                         (p_picture->p[1].i_lines - y / 2 - 1 ) * p_picture->p[1].i_pitch
977                         + x / 2 ) = 0x80;
978                 *(p_picture->p[2].p_pixels +
979                         (p_picture->p[2].i_lines - y / 2 - 1 ) * p_picture->p[2].i_pitch
980                         + x / 2 ) = 0x80;
981             }
982         }
983
984     }
985
986     return 0;
987 }