1 /*****************************************************************************
2 * fake.c : Fake video input for VLC
3 *****************************************************************************
4 * Copyright (C) 2005 the VideoLAN team
7 * Author: Christophe Massiot <massiot@via.ecp.fr>
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.
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.
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., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22 *****************************************************************************/
24 /*****************************************************************************
26 *****************************************************************************/
32 #include <vlc/input.h>
34 /*****************************************************************************
36 *****************************************************************************/
37 static int Open ( vlc_object_t * );
38 static void Close( vlc_object_t * );
40 #define CACHING_TEXT N_("Caching value in ms")
41 #define CACHING_LONGTEXT N_( \
42 "Default caching value for fake streams. This " \
43 "value should be set in milliseconds." )
44 #define FPS_TEXT N_("Framerate")
45 #define FPS_LONGTEXT N_( \
46 "Number of frames per second (eg. 24, 25, 29.97, 30).")
47 #define ID_TEXT N_("ID")
48 #define ID_LONGTEXT N_( \
49 "Set the ID of the fake elementary stream for use in " \
50 "#duplicate{} constructs (default 0).")
51 #define DURATION_TEXT N_("Duration in ms")
52 #define DURATION_LONGTEXT N_( \
53 "Duration of the fake streaming before faking an " \
54 "end-of-file (default is 0, meaning that the stream is unlimited).")
57 set_shortname( _("Fake") );
58 set_description( _("Fake input") );
59 set_category( CAT_INPUT );
60 set_subcategory( SUBCAT_INPUT_ACCESS );
62 add_integer( "fake-caching", DEFAULT_PTS_DELAY / 1000, NULL,
63 CACHING_TEXT, CACHING_LONGTEXT, VLC_TRUE );
64 add_float( "fake-fps", 25.0, NULL, FPS_TEXT, FPS_LONGTEXT, VLC_TRUE );
65 add_integer( "fake-id", 0, NULL, ID_TEXT, ID_LONGTEXT, VLC_TRUE );
66 add_integer( "fake-duration", 0, NULL, DURATION_TEXT, DURATION_LONGTEXT,
69 add_shortcut( "fake" );
70 set_capability( "access_demux", 0 );
71 set_callbacks( Open, Close );
74 /*****************************************************************************
75 * Access: local prototypes
76 *****************************************************************************/
77 static int Demux ( demux_t * );
78 static int Control( demux_t *, int, va_list );
83 mtime_t i_last_pts, i_duration, i_first_pts, i_end_pts, i_pause_pts;
85 es_out_id_t *p_es_video;
88 /*****************************************************************************
89 * Open: opens fake device
90 *****************************************************************************/
91 static int Open( vlc_object_t *p_this )
93 demux_t *p_demux = (demux_t*)p_this;
98 /* Only when selected */
99 if( *p_demux->psz_access == '\0' )
103 p_demux->pf_demux = Demux;
104 p_demux->pf_control = Control;
105 p_demux->info.i_update = 0;
106 p_demux->info.i_title = 0;
107 p_demux->info.i_seekpoint = 0;
108 p_demux->p_sys = p_sys = malloc( sizeof( demux_sys_t ) );
109 memset( p_sys, 0, sizeof( demux_sys_t ) );
111 var_Create( p_demux, "fake-duration", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
112 var_Get( p_demux, "fake-duration", &val );
113 p_sys->i_duration = val.i_int * 1000;
115 var_Create( p_demux, "fake-fps", VLC_VAR_FLOAT | VLC_VAR_DOINHERIT );
116 var_Get( p_demux, "fake-fps", &val );
117 p_sys->f_fps = val.f_float;
119 /* Declare the elementary stream */
120 es_format_Init( &fmt, VIDEO_ES, VLC_FOURCC('f','a','k','e') );
121 var_Create( p_demux, "fake-id", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
122 var_Get( p_demux, "fake-id", &val );
123 fmt.i_id = val.i_int;
124 p_sys->p_es_video = es_out_Add( p_demux->out, &fmt );
126 /* Update default_pts to a suitable value for access */
127 var_Create( p_demux, "fake-caching", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
132 /*****************************************************************************
133 * Close: close device, free resources
134 *****************************************************************************/
135 static void Close( vlc_object_t *p_this )
137 demux_t *p_demux = (demux_t *)p_this;
138 demux_sys_t *p_sys = p_demux->p_sys;
143 /*****************************************************************************
145 *****************************************************************************/
146 static int Control( demux_t *p_demux, int i_query, va_list args )
148 demux_sys_t *p_sys = p_demux->p_sys;
155 /* Special for access_demux */
156 case DEMUX_CAN_PAUSE:
157 case DEMUX_CAN_CONTROL_PACE:
158 pb = (vlc_bool_t *)va_arg( args, vlc_bool_t * );
162 case DEMUX_SET_PAUSE_STATE:
163 b = (vlc_bool_t)va_arg( args, vlc_bool_t );
166 p_sys->i_pause_pts = mdate();
168 else if ( p_sys->i_pause_pts )
170 mtime_t i_pause_duration = mdate() - p_sys->i_pause_pts;
171 p_sys->i_first_pts += i_pause_duration;
172 p_sys->i_last_pts += i_pause_duration;
173 if ( p_sys->i_duration )
174 p_sys->i_end_pts += i_pause_duration;
175 p_sys->i_pause_pts = 0;
179 case DEMUX_GET_PTS_DELAY:
180 pi64 = (int64_t *)va_arg( args, int64_t * );
181 *pi64 = (int64_t)var_GetInteger( p_demux, "fake-caching" ) * 1000;
184 case DEMUX_GET_POSITION:
185 pf = (double*)va_arg( args, double* );
186 if( p_sys->i_duration > 0 )
188 *pf = (double)( p_sys->i_last_pts - p_sys->i_first_pts )
189 / (double)(p_sys->i_duration);
197 case DEMUX_SET_POSITION:
198 f = (double)va_arg( args, double );
199 i64 = f * (double)p_sys->i_duration;
200 p_sys->i_first_pts = p_sys->i_last_pts - i64;
201 p_sys->i_end_pts = p_sys->i_first_pts + p_sys->i_duration;
205 pi64 = (int64_t *)va_arg( args, int64_t * );
206 if ( p_sys->i_duration )
207 *pi64 = p_sys->i_last_pts - p_sys->i_first_pts;
209 *pi64 = p_sys->i_last_pts;
212 case DEMUX_GET_LENGTH:
213 pi64 = (int64_t*)va_arg( args, int64_t * );
214 *pi64 = p_sys->i_duration;
218 i64 = (int64_t)va_arg( args, int64_t );
219 p_sys->i_first_pts = p_sys->i_last_pts - i64;
220 p_sys->i_end_pts = p_sys->i_first_pts + p_sys->i_duration;
223 /* TODO implement others */
231 /*****************************************************************************
233 *****************************************************************************/
234 static int Demux( demux_t *p_demux )
236 demux_sys_t *p_sys = p_demux->p_sys;
237 block_t *p_block = block_New( p_demux, 1 );
239 if ( !p_sys->i_last_pts )
241 p_sys->i_last_pts = p_sys->i_first_pts = mdate();
242 if ( p_sys->i_duration )
243 p_sys->i_end_pts = p_sys->i_first_pts + p_sys->i_duration;
247 p_sys->i_last_pts += (mtime_t)(1000000.0 / p_sys->f_fps);
248 if ( p_sys->i_duration && p_sys->i_last_pts > p_sys->i_end_pts )
250 mwait( p_sys->i_last_pts );
253 p_block->i_flags |= BLOCK_FLAG_TYPE_I;
254 p_block->i_dts = p_block->i_pts = p_sys->i_last_pts;
256 es_out_Control( p_demux->out, ES_OUT_SET_PCR, p_block->i_pts );
257 es_out_Send( p_demux->out, p_sys->p_es_video, p_block );