wall.c: shut up two compiler warnings. Fix two (only one actually
[vlc.git] / modules / video_filter / wall.c
1 /*****************************************************************************
2  * wall.c : Wall video plugin for vlc
3  *****************************************************************************
4  * Copyright (C) 2000, 2001, 2002, 2003 VideoLAN
5  * $Id$
6  *
7  * Authors: Samuel Hocevar <sam@zoy.org>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
22  *****************************************************************************/
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27 #include <stdlib.h>                                      /* malloc(), free() */
28 #include <string.h>
29
30 #include <vlc/vlc.h>
31 #include <vlc/vout.h>
32
33 #include "filter_common.h"
34
35 /*****************************************************************************
36  * Local prototypes
37  *****************************************************************************/
38 static int  Create    ( vlc_object_t * );
39 static void Destroy   ( vlc_object_t * );
40
41 static int  Init      ( vout_thread_t * );
42 static void End       ( vout_thread_t * );
43 static void Render    ( vout_thread_t *, picture_t * );
44
45 static void RemoveAllVout  ( vout_thread_t *p_vout );
46
47 static int  SendEvents( vlc_object_t *, char const *,
48                         vlc_value_t, vlc_value_t, void * );
49
50 /*****************************************************************************
51  * Module descriptor
52  *****************************************************************************/
53 #define COLS_TEXT N_("Number of columns")
54 #define COLS_LONGTEXT N_("Select the number of horizontal video windows in " \
55     "which to split the video.")
56
57 #define ROWS_TEXT N_("Number of rows")
58 #define ROWS_LONGTEXT N_("Select the number of vertical video windows in " \
59     "which to split the video.")
60
61 #define ACTIVE_TEXT N_("Active windows")
62 #define ACTIVE_LONGTEXT N_("Comma separated list of active windows, " \
63     "defaults to all")
64
65 vlc_module_begin();
66     set_description( _("wall video filter") );
67     set_shortname( N_("Image wall" ));
68     set_capability( "video filter", 0 );
69     set_category( CAT_VIDEO );
70     set_subcategory( SUBCAT_VIDEO_VFILTER );
71
72     add_integer( "wall-cols", 3, NULL, COLS_TEXT, COLS_LONGTEXT, VLC_FALSE );
73     add_integer( "wall-rows", 3, NULL, ROWS_TEXT, ROWS_LONGTEXT, VLC_FALSE );
74     add_string( "wall-active", NULL, NULL, ACTIVE_TEXT, ACTIVE_LONGTEXT, VLC_FALSE );
75
76     add_shortcut( "wall" );
77     set_callbacks( Create, Destroy );
78 vlc_module_end();
79
80 /*****************************************************************************
81  * vout_sys_t: Wall video output method descriptor
82  *****************************************************************************
83  * This structure is part of the video output thread descriptor.
84  * It describes the Wall specific properties of an output thread.
85  *****************************************************************************/
86 struct vout_sys_t
87 {
88     int    i_col;
89     int    i_row;
90     int    i_vout;
91     struct vout_list_t
92     {
93         vlc_bool_t b_active;
94         int i_width;
95         int i_height;
96         int i_left;
97         int i_top;
98         vout_thread_t *p_vout;
99     } *pp_vout;
100 };
101
102 /*****************************************************************************
103  * Control: control facility for the vout (forwards to child vout)
104  *****************************************************************************/
105 static int Control( vout_thread_t *p_vout, int i_query, va_list args )
106 {
107     int i_row, i_col, i_vout = 0;
108
109     for( i_row = 0; i_row < p_vout->p_sys->i_row; i_row++ )
110     {
111         for( i_col = 0; i_col < p_vout->p_sys->i_col; i_col++ )
112         {
113             vout_vaControl( p_vout->p_sys->pp_vout[ i_vout ].p_vout,
114                             i_query, args );
115             i_vout++;
116         }
117     }
118     return VLC_SUCCESS;
119 }
120
121 /*****************************************************************************
122  * Create: allocates Wall video thread output method
123  *****************************************************************************
124  * This function allocates and initializes a Wall vout method.
125  *****************************************************************************/
126 static int Create( vlc_object_t *p_this )
127 {
128     vout_thread_t *p_vout = (vout_thread_t *)p_this;
129     char *psz_method, *psz_tmp, *psz_method_tmp;
130     int i_vout;
131
132     /* Allocate structure */
133     p_vout->p_sys = malloc( sizeof( vout_sys_t ) );
134     if( p_vout->p_sys == NULL )
135     {
136         msg_Err( p_vout, "out of memory" );
137         return VLC_ENOMEM;
138     }
139
140     p_vout->pf_init = Init;
141     p_vout->pf_end = End;
142     p_vout->pf_manage = NULL;
143     p_vout->pf_render = Render;
144     p_vout->pf_display = NULL;
145     p_vout->pf_control = Control;
146
147     /* Look what method was requested */
148     p_vout->p_sys->i_col = config_GetInt( p_vout, "wall-cols" );
149     p_vout->p_sys->i_row = config_GetInt( p_vout, "wall-rows" );
150
151     p_vout->p_sys->i_col = __MAX( 1, __MIN( 15, p_vout->p_sys->i_col ) );
152     p_vout->p_sys->i_row = __MAX( 1, __MIN( 15, p_vout->p_sys->i_row ) );
153
154     msg_Dbg( p_vout, "opening a %i x %i wall",
155              p_vout->p_sys->i_col, p_vout->p_sys->i_row );
156
157     p_vout->p_sys->pp_vout = malloc( p_vout->p_sys->i_row *
158                                      p_vout->p_sys->i_col *
159                                      sizeof(struct vout_list_t) );
160     if( p_vout->p_sys->pp_vout == NULL )
161     {
162         msg_Err( p_vout, "out of memory" );
163         free( p_vout->p_sys );
164         return VLC_ENOMEM;
165     }
166
167     psz_method_tmp = psz_method = config_GetPsz( p_vout, "wall-active" );
168
169     /* If no trailing vout are specified, take them all */
170     if( psz_method == NULL )
171     {
172         for( i_vout = p_vout->p_sys->i_row * p_vout->p_sys->i_col;
173              i_vout--; )
174         {
175             p_vout->p_sys->pp_vout[i_vout].b_active = 1;
176         }
177     }
178     /* If trailing vout are specified, activate only the requested ones */
179     else
180     {
181         for( i_vout = p_vout->p_sys->i_row * p_vout->p_sys->i_col;
182              i_vout--; )
183         {
184             p_vout->p_sys->pp_vout[i_vout].b_active = 0;
185         }
186
187         while( *psz_method )
188         {
189             psz_tmp = psz_method;
190             while( *psz_tmp && *psz_tmp != ',' )
191             {
192                 psz_tmp++;
193             }
194
195             if( *psz_tmp )
196             {
197                 *psz_tmp = '\0';
198                 i_vout = atoi( psz_method );
199                 psz_method = psz_tmp + 1;
200             }
201             else
202             {
203                 i_vout = atoi( psz_method );
204                 psz_method = psz_tmp;
205             }
206
207             if( i_vout >= 0 &&
208                 i_vout < p_vout->p_sys->i_row * p_vout->p_sys->i_col )
209             {
210                 p_vout->p_sys->pp_vout[i_vout].b_active = 1;
211             }
212         }
213     }
214
215     free( psz_method_tmp );
216
217     return VLC_SUCCESS;
218 }
219
220 /*****************************************************************************
221  * Init: initialize Wall video thread output method
222  *****************************************************************************/
223 static int Init( vout_thread_t *p_vout )
224 {
225     int i_index, i_row, i_col, i_width, i_height, i_left, i_top;
226     unsigned int i_target_width,i_target_height;
227     picture_t *p_pic;
228     int i_aspect = 4*VOUT_ASPECT_FACTOR/3;
229     int i_align = 0;
230     unsigned int i_hstart, i_hend, i_vstart, i_vend;
231     unsigned int w1,h1,w2,h2;
232     int i_xpos, i_ypos;
233     int i_vstart_rounded = 0, i_hstart_rounded = 0;
234
235     i_xpos = var_CreateGetInteger( p_vout, "video-x" );
236     i_ypos = var_CreateGetInteger( p_vout, "video-y" );
237     if( i_xpos < 0 ) i_xpos = 0;
238     if( i_ypos < 0 ) i_ypos = 0;
239
240     I_OUTPUTPICTURES = 0;
241
242     /* Initialize the output structure */
243     p_vout->output.i_chroma = p_vout->render.i_chroma;
244     p_vout->output.i_width  = p_vout->render.i_width;
245     p_vout->output.i_height = p_vout->render.i_height;
246     p_vout->output.i_aspect = p_vout->render.i_aspect;
247     var_Create( p_vout, "align", VLC_VAR_INTEGER );
248
249     w1 = p_vout->output.i_width / p_vout->p_sys->i_col;
250     w1 &= ~1;
251     h1 = w1 * VOUT_ASPECT_FACTOR / i_aspect&~1;
252     h1 &= ~1;
253     
254     h2 = p_vout->output.i_height / p_vout->p_sys->i_row&~1;
255     h2 &= ~1;
256     w2 = h2 * i_aspect / VOUT_ASPECT_FACTOR&~1;
257     w2 &= ~1;
258     
259     if ( h1 * p_vout->p_sys->i_row < p_vout->output.i_height )
260     {
261         unsigned int i_tmp;
262         i_target_width = w2;        
263         i_target_height = h2;
264         i_vstart = 0;
265         i_vend = p_vout->output.i_height;
266         i_tmp = i_target_width * p_vout->p_sys->i_col;
267         while( i_tmp < p_vout->output.i_width ) i_tmp += p_vout->p_sys->i_col;
268         i_hstart = (( i_tmp - p_vout->output.i_width ) / 2)&~1;
269         i_hstart_rounded  = ( ( i_tmp - p_vout->output.i_width ) % 2 ) ||
270             ( ( ( i_tmp - p_vout->output.i_width ) / 2 ) & 1 );
271         i_hend = i_hstart + p_vout->output.i_width;
272     }
273     else
274     {
275         unsigned int i_tmp;
276         i_target_height = h1;
277         i_target_width = w1;
278         i_hstart = 0;
279         i_hend = p_vout->output.i_width;
280         i_tmp = i_target_height * p_vout->p_sys->i_row;
281         while( i_tmp < p_vout->output.i_height ) i_tmp += p_vout->p_sys->i_row;
282         i_vstart = ( ( i_tmp - p_vout->output.i_height ) / 2 ) & ~1;
283         i_vstart_rounded  = ( ( i_tmp - p_vout->output.i_height ) % 2 ) ||
284             ( ( ( i_tmp - p_vout->output.i_height ) / 2 ) & 1 );
285         i_vend = i_vstart + p_vout->output.i_height;
286     }
287     msg_Dbg( p_vout, "target resolution %dx%d", i_target_width, i_target_height );
288
289     /* Try to open the real video output */
290     msg_Dbg( p_vout, "spawning the real video outputs" );
291
292     p_vout->p_sys->i_vout = 0;
293     msg_Dbg( p_vout, "target window (%d,%d)-(%d,%d)", i_hstart,i_vstart,i_hend,i_vend );
294     
295
296     i_top = 0;
297     i_height = 0;
298     for( i_row = 0; i_row < p_vout->p_sys->i_row; i_row++ )
299     {
300         i_left = 0;
301         i_top += i_height;
302         for( i_col = 0; i_col < p_vout->p_sys->i_col; i_col++ )
303         {
304             i_align = 0;
305
306             if( i_col*i_target_width >= i_hstart &&
307                 (i_col+1)*i_target_width <= i_hend )
308             {
309                 i_width = i_target_width;
310             }
311             else if( ( i_col + 1 ) * i_target_width < i_hstart ||
312                      ( i_col * i_target_width ) > i_hend )
313             {
314                 i_width = 0;                
315             }
316             else
317             {
318                 i_width = ( i_target_width - i_hstart % i_target_width );
319                 if( i_col > ( p_vout->p_sys->i_col / 2 ) )
320                 {
321                     i_align |= VOUT_ALIGN_LEFT;
322                     i_width -= i_hstart_rounded ? 2: 0;
323                 }
324                 else
325                 {
326                     i_align |= VOUT_ALIGN_RIGHT;
327                 }
328             }
329             
330             if( i_row * i_target_height >= i_vstart &&
331                 ( i_row + 1 ) * i_target_height <= i_vend )
332             {
333                 i_height = i_target_height;
334             }
335             else if( ( i_row + 1 ) * i_target_height < i_vstart ||
336                      ( i_row * i_target_height ) > i_vend )
337             {
338                 i_height = 0;
339             }
340             else
341             {
342                 i_height = ( i_target_height -
343                              i_vstart%i_target_height );
344                 if(  i_row > ( p_vout->p_sys->i_row / 2 ) )
345                 {
346                     i_align |= VOUT_ALIGN_TOP;
347                     i_height -= i_vstart_rounded ? 2: 0;
348                 }
349                 else
350                 {
351                     i_align |= VOUT_ALIGN_BOTTOM;
352                 }
353             }
354             if( i_height == 0 || i_width == 0 )
355             {
356                 p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].b_active = VLC_FALSE;
357             }
358
359             p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].i_width = i_width;
360             p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].i_height = i_height;
361             p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].i_left = i_left;
362             p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].i_top = i_top;
363             i_left += i_width;
364
365             if( !p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].b_active )
366             {
367                 p_vout->p_sys->i_vout++;
368                 continue;
369             }
370             var_SetInteger( p_vout, "align", i_align );
371             var_SetInteger( p_vout, "video-x", i_left + i_xpos - i_width);
372             var_SetInteger( p_vout, "video-y", i_top + i_ypos );
373
374             p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].p_vout =
375                 vout_Create( p_vout, i_width, i_height,
376                              p_vout->render.i_chroma,
377                              i_aspect * i_target_height / i_height *
378                              i_width / i_target_width );
379             if( p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].p_vout == NULL )
380             {
381                 msg_Err( p_vout, "failed to get %ix%i vout threads",
382                                  p_vout->p_sys->i_col, p_vout->p_sys->i_row );
383                 RemoveAllVout( p_vout );
384                 return VLC_EGENERIC;
385             }
386             ADD_CALLBACKS(
387                 p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].p_vout,
388                 SendEvents );
389             p_vout->p_sys->i_vout++;
390         }
391     }
392
393     ALLOCATE_DIRECTBUFFERS( VOUT_MAX_PICTURES );
394
395     ADD_PARENT_CALLBACKS( SendEventsToChild );
396
397     return VLC_SUCCESS;
398 }
399
400 /*****************************************************************************
401  * End: terminate Wall video thread output method
402  *****************************************************************************/
403 static void End( vout_thread_t *p_vout )
404 {
405     int i_index;
406
407     /* Free the fake output buffers we allocated */
408     for( i_index = I_OUTPUTPICTURES ; i_index ; )
409     {
410         i_index--;
411         free( PP_OUTPUTPICTURE[ i_index ]->p_data_orig );
412     }
413 }
414
415 /*****************************************************************************
416  * Destroy: destroy Wall video thread output method
417  *****************************************************************************
418  * Terminate an output method created by WallCreateOutputMethod
419  *****************************************************************************/
420 static void Destroy( vlc_object_t *p_this )
421 {
422     vout_thread_t *p_vout = (vout_thread_t *)p_this;
423
424     RemoveAllVout( p_vout );
425
426     DEL_PARENT_CALLBACKS( SendEventsToChild );
427
428     free( p_vout->p_sys->pp_vout );
429     free( p_vout->p_sys );
430 }
431
432 /*****************************************************************************
433  * Render: displays previously rendered output
434  *****************************************************************************
435  * This function send the currently rendered image to Wall image, waits
436  * until it is displayed and switch the two rendering buffers, preparing next
437  * frame.
438  *****************************************************************************/
439 static void Render( vout_thread_t *p_vout, picture_t *p_pic )
440 {
441     picture_t *p_outpic = NULL;
442     int i_col, i_row, i_vout, i_plane;
443     int pi_left_skip[VOUT_MAX_PLANES], pi_top_skip[VOUT_MAX_PLANES];
444
445     i_vout = 0;
446
447     for( i_row = 0; i_row < p_vout->p_sys->i_row; i_row++ )
448     {
449         for( i_col = 0; i_col < p_vout->p_sys->i_col; i_col++ )
450         {
451             for( i_plane = 0 ; i_plane < p_pic->i_planes ; i_plane++ )
452             {
453                 pi_left_skip[i_plane] = p_vout->p_sys->pp_vout[ i_vout ].i_left * p_pic->p[ i_plane ].i_pitch / p_vout->output.i_width;
454                 pi_top_skip[i_plane] = (p_vout->p_sys->pp_vout[ i_vout ].i_top * p_pic->p[ i_plane ].i_lines / p_vout->output.i_height)*p_pic->p[i_plane].i_pitch;
455             }
456
457             if( !p_vout->p_sys->pp_vout[ i_vout ].b_active )
458             {
459                 i_vout++;
460                 continue;
461             }
462
463             while( ( p_outpic =
464                 vout_CreatePicture( p_vout->p_sys->pp_vout[ i_vout ].p_vout,
465                                     0, 0, 0 )
466                    ) == NULL )
467             {
468                 if( p_vout->b_die || p_vout->b_error )
469                 {
470                     vout_DestroyPicture(
471                         p_vout->p_sys->pp_vout[ i_vout ].p_vout, p_outpic );
472                     return;
473                 }
474
475                 msleep( VOUT_OUTMEM_SLEEP );
476             }
477
478             vout_DatePicture( p_vout->p_sys->pp_vout[ i_vout ].p_vout,
479                               p_outpic, p_pic->date );
480             vout_LinkPicture( p_vout->p_sys->pp_vout[ i_vout ].p_vout,
481                               p_outpic );
482
483             for( i_plane = 0 ; i_plane < p_pic->i_planes ; i_plane++ )
484             {
485                 uint8_t *p_in, *p_in_end, *p_out;
486                 int i_in_pitch = p_pic->p[i_plane].i_pitch;
487                 int i_out_pitch = p_outpic->p[i_plane].i_pitch;
488                 int i_copy_pitch = p_outpic->p[i_plane].i_visible_pitch;
489
490                 p_in = p_pic->p[i_plane].p_pixels
491                         + pi_top_skip[i_plane] + pi_left_skip[i_plane];
492
493                 p_in_end = p_in + p_outpic->p[i_plane].i_visible_lines
494                                    * p_pic->p[i_plane].i_pitch;
495
496                 p_out = p_outpic->p[i_plane].p_pixels;
497
498                 while( p_in < p_in_end )
499                 {
500                     p_vout->p_vlc->pf_memcpy( p_out, p_in, i_copy_pitch );
501                     p_in += i_in_pitch;
502                     p_out += i_out_pitch;
503                 }
504
505 //                pi_left_skip[i_plane] += i_copy_pitch;
506             }
507
508             vout_UnlinkPicture( p_vout->p_sys->pp_vout[ i_vout ].p_vout,
509                                 p_outpic );
510             vout_DisplayPicture( p_vout->p_sys->pp_vout[ i_vout ].p_vout,
511                                  p_outpic );
512
513             i_vout++;
514         }
515
516 /*         for( i_plane = 0 ; i_plane < p_pic->i_planes ; i_plane++ ) */
517 /*         { */
518 /*             pi_top_skip[i_plane] += p_vout->p_sys->pp_vout[ i_vout ].i_height */
519 /*                                      * p_pic->p[i_plane].i_visible_lines */
520 /*                                      / p_vout->output.i_height */
521 /*                                      * p_pic->p[i_plane].i_pitch; */
522 /*         } */
523     }
524 }
525
526 /*****************************************************************************
527  * RemoveAllVout: destroy all the child video output threads
528  *****************************************************************************/
529 static void RemoveAllVout( vout_thread_t *p_vout )
530 {
531     while( p_vout->p_sys->i_vout )
532     {
533          --p_vout->p_sys->i_vout;
534          if( p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].b_active )
535          {
536              DEL_CALLBACKS(
537                  p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].p_vout,
538                  SendEvents );
539              vlc_object_detach(
540                  p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].p_vout );
541              vout_Destroy(
542                  p_vout->p_sys->pp_vout[ p_vout->p_sys->i_vout ].p_vout );
543          }
544     }
545 }
546
547 /*****************************************************************************
548  * SendEvents: forward mouse and keyboard events to the parent p_vout
549  *****************************************************************************/
550 static int SendEvents( vlc_object_t *p_this, char const *psz_var,
551                        vlc_value_t oldval, vlc_value_t newval, void *_p_vout )
552 {
553     vout_thread_t *p_vout = (vout_thread_t *)_p_vout;
554     int i_vout;
555     vlc_value_t sentval = newval;
556
557     /* Find the video output index */
558     for( i_vout = 0; i_vout < p_vout->p_sys->i_vout; i_vout++ )
559     {
560         if( p_this == (vlc_object_t *)p_vout->p_sys->pp_vout[ i_vout ].p_vout )
561         {
562             break;
563         }
564     }
565
566     if( i_vout == p_vout->p_sys->i_vout )
567     {
568         return VLC_EGENERIC;
569     }
570
571     /* Translate the mouse coordinates */
572     if( !strcmp( psz_var, "mouse-x" ) )
573     {
574         sentval.i_int += p_vout->output.i_width
575                           * (i_vout % p_vout->p_sys->i_col)
576                           / p_vout->p_sys->i_col;
577     }
578     else if( !strcmp( psz_var, "mouse-y" ) )
579     {
580         sentval.i_int += p_vout->output.i_height
581                           * (i_vout / p_vout->p_sys->i_row)
582                           / p_vout->p_sys->i_row;
583     }
584
585     var_Set( p_vout, psz_var, sentval );
586
587     return VLC_SUCCESS;
588 }
589
590 /*****************************************************************************
591  * SendEventsToChild: forward events to the child/children vout
592  *****************************************************************************/
593 static int SendEventsToChild( vlc_object_t *p_this, char const *psz_var,
594                        vlc_value_t oldval, vlc_value_t newval, void *p_data )
595 {
596     vout_thread_t *p_vout = (vout_thread_t *)p_this;
597     int i_row, i_col, i_vout = 0;
598
599     for( i_row = 0; i_row < p_vout->p_sys->i_row; i_row++ )
600     {
601         for( i_col = 0; i_col < p_vout->p_sys->i_col; i_col++ )
602         {
603             var_Set( p_vout->p_sys->pp_vout[ i_vout ].p_vout, psz_var, newval);
604             if( !strcmp( psz_var, "fullscreen" ) ) break;
605             i_vout++;
606         }
607     }
608
609     return VLC_SUCCESS;
610 }