Imported Upstream version 3.0.4
[debian/gnuradio] / gr-video-sdl / src / video_sdl_sink_s.cc
1 /* -*- c++ -*- */
2 /*
3  * Copyright 2006 Free Software Foundation, Inc.
4  * 
5  * This file is part of GNU Radio
6  * 
7  * GNU Radio is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 3, or (at your option)
10  * any later version.
11  * 
12  * GNU Radio is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  * 
17  * You should have received a copy of the GNU General Public License
18  * along with GNU Radio; see the file COPYING.  If not, write to
19  * the Free Software Foundation, Inc., 51 Franklin Street,
20  * Boston, MA 02110-1301, USA.
21  */
22
23 #ifdef HAVE_CONFIG_H
24 #include "config.h"
25 #endif
26
27 #include <SDL.h>
28
29 #include <video_sdl_sink_s.h>
30 #include <gr_io_signature.h>
31 #include <sys/types.h>
32 #include <sys/stat.h>
33 #include <fcntl.h>
34 #include <unistd.h>
35 #include <stdio.h>
36 #include <iostream>
37 #include <stdexcept>
38
39
40
41 video_sdl_sink_s::video_sdl_sink_s (double framerate,int width, int height,unsigned int format,int dst_width,int dst_height)
42   : gr_sync_block ("video_sdl_sink_s",
43                    gr_make_io_signature (1, 3, sizeof (short)),
44                    gr_make_io_signature (0, 0, 0)),
45     d_chunk_size (width*height),
46     d_framerate(framerate),
47     d_wanted_frametime_ms(0),
48     d_width(width),
49     d_height (height),
50     d_dst_width(dst_width),
51     d_dst_height(dst_height),
52     d_format(format), 
53     d_current_line(0),
54     d_screen(NULL),
55     d_image(NULL),
56     d_avg_delay(0.0),
57     d_wanted_ticks(0)
58 {
59   if(framerate<=0.0) 
60     d_wanted_frametime_ms=0;//Go as fast as possible
61   else
62     d_wanted_frametime_ms=(int)(1000.0/framerate);
63   if(dst_width<0) d_dst_width=d_width;
64   if(dst_height<0) d_dst_height=d_height;
65   if(0==format) d_format=IMGFMT_YV12;
66   
67   atexit(SDL_Quit);//check if this is the way to do this
68   if ( SDL_Init(SDL_INIT_VIDEO) < 0 ) {
69     std::cerr << "video_sdl_sink_s: Couldn't initialize SDL:" << SDL_GetError() << " \n SDL_Init(SDL_INIT_VIDEO) failed\n";
70     throw std::runtime_error ("video_sdl_sink_s");
71   };
72
73   /* accept any depth */
74   d_screen = SDL_SetVideoMode(dst_width, dst_height, 0, SDL_SWSURFACE|SDL_RESIZABLE|SDL_ANYFORMAT);//SDL_DOUBLEBUF |SDL_SWSURFACE| SDL_HWSURFACE||SDL_FULLSCREEN
75   if ( d_screen == NULL ) {
76     std::cerr << "Unable to set SDL video mode: " << SDL_GetError() <<"\n SDL_SetVideoMode() Failed \n";
77     exit(1);
78   }
79   if ( d_image ) {
80       SDL_FreeYUVOverlay(d_image);
81     }
82   /* Initialize and create the YUV Overlay used for video out */
83   if (!(d_image = SDL_CreateYUVOverlay (d_width, d_height, SDL_YV12_OVERLAY, d_screen))) {
84     std::cerr << "SDL: Couldn't create a YUV overlay: \n"<< SDL_GetError() <<"\n";
85     throw std::runtime_error ("video_sdl_sink_s");
86   }
87
88   printf("SDL screen_mode %d bits-per-pixel\n",
89          d_screen->format->BitsPerPixel);
90   printf("SDL overlay_mode %i \n",
91          d_image->format);
92   d_chunk_size = std::min(1,16384/width); //width*16;
93   d_chunk_size = d_chunk_size*width;
94   //d_chunk_size = (int) (width);
95   set_output_multiple (d_chunk_size);
96   /* Set the default playback area */
97   d_dst_rect.x = 0;
98   d_dst_rect.y = 0;
99   d_dst_rect.w = d_dst_width;
100   d_dst_rect.h = d_dst_height;
101   //clear the surface to grey
102   if ( SDL_LockYUVOverlay( d_image ) ) {
103     std::cerr << "SDL: Couldn't lock YUV overlay: \n"<< SDL_GetError() <<"\n";
104     throw std::runtime_error ("video_sdl_sink_s");
105   }
106   memset(d_image->pixels[0], 128, d_image->pitches[0]*d_height);  
107   memset(d_image->pixels[1], 128, d_image->pitches[1]*d_height/2);  
108   memset(d_image->pixels[2], 128, d_image->pitches[2]*d_height/2);  
109   SDL_UnlockYUVOverlay( d_image );
110 }
111
112 video_sdl_sink_s::~video_sdl_sink_s ()
113 {
114   SDL_Quit();
115 }
116
117 video_sdl_sink_s_sptr
118 video_sdl_make_sink_s (double framerate,int width, int height,unsigned int format,int dst_width,int dst_height)
119 {
120   return video_sdl_sink_s_sptr (new video_sdl_sink_s (framerate, width, height,format,dst_width,dst_height));
121 }
122
123 void
124 video_sdl_sink_s::copy_line_pixel_interleaved(unsigned char *dst_pixels_u,unsigned char *dst_pixels_v,const short * src_pixels,int src_width)
125 {
126   for(int i=0;i<src_width;i++)
127   {
128     dst_pixels_u[i]=(unsigned char)src_pixels[i*2];
129     dst_pixels_v[i]=(unsigned char)src_pixels[i*2+1];
130   }
131   return;
132 }
133
134 void
135 video_sdl_sink_s::copy_line_line_interleaved(unsigned char *dst_pixels_u,unsigned char *dst_pixels_v,const short * src_pixels,int src_width)
136 {
137   for(int i=0;i<src_width;i++)
138   {
139     dst_pixels_u[i]=(unsigned char)src_pixels[i];
140     dst_pixels_v[i]=(unsigned char)src_pixels[i+src_width];
141   }
142   for(int i=src_width;i<src_width*2;i++)
143   {
144     dst_pixels_v[i]=(unsigned char)src_pixels[i];
145   }
146   return;
147 }
148 void
149 video_sdl_sink_s::copy_line_single_plane(unsigned char *dst_pixels,const short * src_pixels,int src_width)
150 {
151   for(int i=0;i<src_width;i++)
152   {
153     dst_pixels[i]=(unsigned char)src_pixels[i];
154   }
155   return;
156 }
157
158 void
159 video_sdl_sink_s::copy_line_single_plane_dec2(unsigned char *dst_pixels,const short * src_pixels,int src_width)
160 {
161   for(int i=0,j=0;i<src_width;i+=2,j++)
162   {
163     dst_pixels[j]=(unsigned char)src_pixels[i];
164   }
165   return;
166 }
167
168 int
169 video_sdl_sink_s::copy_plane_to_surface (int plane,int noutput_items,
170                       const short * src_pixels)
171 {
172     const int first_dst_plane=(12==plane ||1122==plane)?1:plane;
173     const int second_dst_plane=(12==plane ||1122==plane)?2:plane;
174     int current_line=(0==plane)?d_current_line:d_current_line/2;
175     unsigned char * dst_pixels = (unsigned char *)d_image->pixels[first_dst_plane];
176     dst_pixels=&dst_pixels[current_line*d_image->pitches[first_dst_plane]];
177     unsigned char * dst_pixels_2 = (unsigned char *)d_image->pixels[second_dst_plane];
178     dst_pixels_2=&dst_pixels_2[current_line*d_image->pitches[second_dst_plane]];
179     int src_width=(0==plane || 12==plane || 1122==plane)?d_width:d_width/2;
180     int noutput_items_produced=0;
181     int max_height=(0==plane)?d_height-1:d_height/2-1;
182     for (int i = 0; i < noutput_items; i += src_width){
183         //output one line at a time
184         if(12==plane)
185         {
186           copy_line_pixel_interleaved(dst_pixels,dst_pixels_2,src_pixels,src_width);
187           dst_pixels_2 += d_image->pitches[second_dst_plane];
188         }
189         else if (1122==plane)
190           {
191             copy_line_line_interleaved(dst_pixels,dst_pixels_2,src_pixels,src_width);
192             dst_pixels_2 += d_image->pitches[second_dst_plane];
193             src_pixels += src_width;
194           }
195         else if (0==plane)
196           copy_line_single_plane(dst_pixels,src_pixels,src_width);
197         else /* 1==plane || 2==plane*/
198           copy_line_single_plane_dec2(dst_pixels,src_pixels,src_width);//decimate by two horizontally
199
200         src_pixels += src_width;
201         dst_pixels += d_image->pitches[first_dst_plane];
202         noutput_items_produced+=src_width;
203         current_line++;
204         if (current_line>max_height)
205         {
206           //Start new frame
207           //TODO, do this all in a seperate thread
208           current_line=0;
209           dst_pixels=d_image->pixels[first_dst_plane];
210           dst_pixels_2=d_image->pixels[second_dst_plane];
211           if(0==plane)
212           {
213             SDL_DisplayYUVOverlay(d_image, &d_dst_rect);
214             //SDL_Flip(d_screen);
215             unsigned int ticks=SDL_GetTicks();//milliseconds
216             d_wanted_ticks+=d_wanted_frametime_ms;
217             float avg_alpha=0.1;
218             int time_diff=d_wanted_ticks-ticks;
219             d_avg_delay=time_diff*avg_alpha +d_avg_delay*(1.0-avg_alpha);
220           }
221         }
222       }
223     if(0==plane) d_current_line=current_line;
224   return noutput_items_produced;
225 }
226
227 int
228 video_sdl_sink_s::work (int noutput_items,
229                       gr_vector_const_void_star &input_items,
230                       gr_vector_void_star &output_items)
231 {
232   short *src_pixels_0,*src_pixels_1,*src_pixels_2;
233   int noutput_items_produced=0;
234   int plane;
235   int delay=(int)d_avg_delay;
236   if(0==d_wanted_ticks)
237     d_wanted_ticks=SDL_GetTicks();
238   if(delay>0)
239     SDL_Delay((unsigned int)delay);//compensate if running too fast
240
241   if ( SDL_LockYUVOverlay( d_image ) ) {
242     return 0;
243   } 
244   switch (input_items.size ()){
245   case 3:               // first channel=Y, second channel is  U , third channel is V
246     src_pixels_0 = (short *) input_items[0];
247     src_pixels_1 = (short *) input_items[1];
248     src_pixels_2 = (short *) input_items[2];
249     for (int i = 0; i < noutput_items; i += d_chunk_size){
250       copy_plane_to_surface (1,d_chunk_size, src_pixels_1);
251       copy_plane_to_surface (2,d_chunk_size, src_pixels_2);
252       noutput_items_produced+=copy_plane_to_surface (0,d_chunk_size, src_pixels_0);
253       src_pixels_0 += d_chunk_size;
254       src_pixels_1 += d_chunk_size;
255       src_pixels_2 += d_chunk_size;      
256     }
257     break;
258   case 2:
259     if(1) //if(pixel_interleaved_uv)
260     {
261       // first channel=Y, second channel is alternating pixels U and V
262       src_pixels_0 = (short *) input_items[0];
263       src_pixels_1 = (short *) input_items[1];
264       for (int i = 0; i < noutput_items; i += d_chunk_size){
265         copy_plane_to_surface (12,d_chunk_size/2, src_pixels_1);
266         noutput_items_produced+=copy_plane_to_surface (0,d_chunk_size, src_pixels_0);
267         src_pixels_0 += d_chunk_size;
268         src_pixels_1 += d_chunk_size;     
269       }
270     } else
271     {
272       // first channel=Y, second channel is alternating lines U and V
273       src_pixels_0 = (short *) input_items[0];
274       src_pixels_1 = (short *) input_items[1];
275       for (int i = 0; i < noutput_items; i += d_chunk_size){
276         copy_plane_to_surface (1222,d_chunk_size/2, src_pixels_1);
277         noutput_items_produced+=copy_plane_to_surface (0,d_chunk_size, src_pixels_0);
278         src_pixels_0 += d_chunk_size;
279         src_pixels_1 += d_chunk_size;     
280       }
281     }
282     break;
283   case 1:               // grey (Y) input
284     /* Y component */
285     plane=0;
286     src_pixels_0 = (short *) input_items[plane];
287     for (int i = 0; i < noutput_items; i += d_chunk_size){
288       noutput_items_produced+=copy_plane_to_surface (plane,d_chunk_size, src_pixels_0);
289       src_pixels_0 += d_chunk_size;
290     }
291     break;
292   default: //0 or more then 3 channels
293      std::cerr << "video_sdl_sink_s: Wrong number of channels: ";
294      std::cerr <<"1, 2 or 3 channels are supported.\n  Requested number of channels is "<< input_items.size () <<"\n";
295     throw std::runtime_error ("video_sdl_sink_s");
296   }
297
298   SDL_UnlockYUVOverlay( d_image );
299   return noutput_items_produced;
300 }