* standard :
[vlc.git] / modules / stream_out / standard.c
1 /*****************************************************************************
2  * standard.c
3  *****************************************************************************
4  * Copyright (C) 2001, 2002 VideoLAN
5  * $Id: standard.c,v 1.13 2003/08/28 21:02:14 fenrir Exp $
6  *
7  * Authors: Laurent Aimar <fenrir@via.ecp.fr>
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>
28 #include <string.h>
29 #include <unistd.h>
30
31 #include <vlc/vlc.h>
32 #include <vlc/sout.h>
33 #include "announce.h"
34
35 #define DEFAULT_IPV6_SCOPE "8"
36
37 /*****************************************************************************
38  * Exported prototypes
39  *****************************************************************************/
40 static int      Open    ( vlc_object_t * );
41 static void     Close   ( vlc_object_t * );
42
43 static sout_stream_id_t *Add ( sout_stream_t *, sout_format_t * );
44 static int               Del ( sout_stream_t *, sout_stream_id_t * );
45 static int               Send( sout_stream_t *, sout_stream_id_t *, sout_buffer_t* );
46
47 /*****************************************************************************
48  * Module descriptor
49  *****************************************************************************/
50 vlc_module_begin();
51     set_description( _("Standard stream") );
52     set_capability( "sout stream", 50 );
53     add_shortcut( "standard" );
54     add_shortcut( "std" );
55     set_callbacks( Open, Close );
56 vlc_module_end();
57
58 struct sout_stream_sys_t
59 {
60     sout_mux_t           *p_mux;
61     slp_session_t        *p_slp;
62     sap_session_t        *p_sap;
63 };
64
65 /*****************************************************************************
66  * Open:
67  *****************************************************************************/
68 static int Open( vlc_object_t *p_this )
69 {
70     sout_stream_t       *p_stream = (sout_stream_t*)p_this;
71     sout_instance_t     *p_sout = p_stream->p_sout;
72     sout_stream_sys_t   *p_sys = malloc( sizeof( sout_stream_sys_t) );
73
74     char *psz_mux      = sout_cfg_find_value( p_stream->p_cfg, "mux" );
75     char *psz_access   = sout_cfg_find_value( p_stream->p_cfg, "access" );
76     char *psz_url      = sout_cfg_find_value( p_stream->p_cfg, "url" );
77     char *psz_ipv      = sout_cfg_find_value( p_stream->p_cfg, "sap_ipv" );
78     char *psz_v6_scope = sout_cfg_find_value( p_stream->p_cfg, "sap_v6scope" );
79
80     sout_cfg_t *p_sap_cfg = sout_cfg_find( p_stream->p_cfg, "sap" );
81 #ifdef HAVE_SLP_H
82     sout_cfg_t *p_slp_cfg = sout_cfg_find( p_stream->p_cfg, "slp" );
83 #endif
84
85     sout_access_out_t   *p_access;
86     sout_mux_t          *p_mux;
87
88     char                *psz_mux_byext = NULL;
89
90     p_sys->p_sap = NULL;
91     p_sys->p_slp = NULL;
92
93     msg_Dbg( p_this, "creating `%s/%s://%s'",
94              psz_access, psz_mux, psz_url );
95
96     /* ext -> muxer name */
97     if( psz_url && strrchr( psz_url, '.' ) )
98     {
99         /* by extention */
100         static struct { char *ext; char *mux; } exttomux[] =
101         {
102             { "avi", "avi" },
103             { "ogg", "ogg" },
104             { "ogm", "ogg" },
105             { "mp4", "mp4" },
106             { "mov", "mov" },
107             { "moov","mov" },
108             { "asf", "asf" },
109             { "wma", "asf" },
110             { "wmv", "asf" },
111             { "trp", "ts" },
112             { "mpg", "ps" },
113             { "mpeg","ps" },
114             { "mpeg1","mpeg1" },
115             { NULL,  NULL }
116         };
117         char *psz_ext = strrchr( psz_url, '.' ) + 1;
118         int  i;
119
120         msg_Dbg( p_this, "extention is %s", psz_ext );
121         for( i = 0; exttomux[i].ext != NULL; i++ )
122         {
123             if( !strcasecmp( psz_ext, exttomux[i].ext ) )
124             {
125                 psz_mux_byext = exttomux[i].mux;
126                 break;
127             }
128         }
129         msg_Dbg( p_this, "extention -> mux=%s", psz_mux_byext );
130     }
131
132     /* We fix access/mux to valid couple */
133
134     if( ( psz_access == NULL || *psz_access == '\0' )&&
135         ( psz_mux == NULL ||  *psz_mux == '\0' ) )
136     {
137         if( psz_mux_byext )
138         {
139             msg_Warn( p_stream,
140                       "no access _and_ no muxer, extention gives file/%s",
141                       psz_mux_byext );
142             psz_access = "file";
143             psz_mux    = psz_mux_byext;
144         }
145         else
146         {
147             msg_Err( p_stream, "no access _and_ no muxer (fatal error)" );
148             return VLC_EGENERIC;
149         }
150     }
151
152     if( psz_access && *psz_access &&
153         ( psz_mux == NULL || *psz_mux == '\0' ) )
154     {
155         /* access given, no mux */
156         if( !strcmp( psz_access, "mmsh" ) )
157         {
158             psz_mux = "asfh";
159         }
160         else if( !strcmp( psz_access, "udp" ) )
161         {
162             psz_mux = "ts";
163         }
164         else
165         {
166             psz_mux = psz_mux_byext;
167         }
168     }
169     else if( psz_mux && *psz_mux &&
170              ( psz_access == NULL || *psz_access == '\0' ) )
171     {
172         /* mux given, no access */
173         if( !strcmp( psz_mux, "asfh" ) )
174         {
175             psz_access = "mmsh";
176         }
177         else
178         {
179             /* default file */
180             psz_access = "file";
181         }
182     }
183
184     /* fix or warm of incompatible couple */
185     if( psz_mux && *psz_mux && psz_access && *psz_access )
186     {
187         if( !strcmp( psz_access, "mmsh" ) && strcmp( psz_mux, "asfh" ) )
188         {
189             msg_Warn( p_stream, "fixing to mmsh/asfh" );
190             psz_mux = "asfh";
191         }
192         else if( ( !strcmp( psz_access, "rtp" ) ||
193                    !strcmp( psz_access, "udp" ) ) &&
194                  strncmp( psz_mux, "ts", 2 ) )
195         {
196             msg_Err( p_stream, "for now udp and rtp are only valid with TS" );
197         }
198         else if( strcmp( psz_access, "file" ) &&
199                  ( !strcmp( psz_mux, "mov" ) || !strcmp( psz_mux, "mp4" ) ) )
200         {
201             msg_Err( p_stream, "mov and mp4 work only with file output" );
202         }
203     }
204
205     msg_Dbg( p_this, "using `%s/%s://%s'", psz_access, psz_mux, psz_url );
206
207     /* *** find and open appropriate access module *** */
208     p_access = sout_AccessOutNew( p_sout, psz_access, psz_url );
209     if( p_access == NULL )
210     {
211         msg_Err( p_stream, "no suitable sout access module for `%s/%s://%s'",
212                  psz_access, psz_mux, psz_url );
213         return( VLC_EGENERIC );
214     }
215     msg_Dbg( p_stream, "access opened" );
216
217     /* *** find and open appropriate mux module *** */
218     p_mux = sout_MuxNew( p_sout, psz_mux, p_access );
219     if( p_mux == NULL )
220     {
221         msg_Err( p_stream, "no suitable sout mux module for `%s/%s://%s'",
222                  psz_access, psz_mux, psz_url );
223
224         sout_AccessOutDelete( p_access );
225         return( VLC_EGENERIC );
226     }
227     msg_Dbg( p_stream, "mux opened" );
228
229     /*  *** Create the SAP Session structure *** */
230     if( psz_access &&
231         p_sap_cfg &&
232         ( strstr( psz_access, "udp" ) || strstr( psz_access ,  "rtp" ) ) )
233     {
234         msg_Info( p_this, "SAP Enabled");
235
236         if( psz_ipv == NULL )
237         {
238             psz_ipv = "4";
239         }
240         if( psz_v6_scope == NULL )
241         {
242             psz_v6_scope = DEFAULT_IPV6_SCOPE;
243         }
244         msg_Dbg( p_sout , "Creating SAP with IPv%i", atoi(psz_ipv) );
245
246         p_sys->p_sap = sout_SAPNew( p_sout , psz_url ,
247             p_sap_cfg->psz_value ? p_sap_cfg->psz_value : psz_url,
248             atoi(psz_ipv), psz_v6_scope );
249
250         if( !p_sys->p_sap )
251             msg_Err( p_sout,"Unable to initialize SAP. SAP disabled");
252     }
253
254     /* *** Register with slp *** */
255 #ifdef HAVE_SLP_H
256     if( p_slp_cfg && ( strstr( psz_access, "udp" ) ||
257                        strstr( psz_access ,  "rtp" ) ) )
258     {
259         msg_Info( p_this, "SLP Enabled");
260         if( sout_SLPReg( p_sout, psz_url,
261             p_slp_cfg->psz_value ? p_slp_cfg->psz_value : psz_url) )
262         {
263            msg_Warn( p_sout, "SLP Registering failed");
264         }
265         else
266         {
267             p_sys->p_slp = (slp_session_t*)malloc(sizeof(slp_session_t));
268             if(!p_sys->p_slp)
269             {
270                 msg_Warn(p_sout,"Out of memory");
271                 return -1;
272             }
273             p_sys->p_slp->psz_url= strdup(psz_url);
274             p_sys->p_slp->psz_name = strdup(
275                     p_slp_cfg->psz_value ? p_slp_cfg->psz_value : psz_url);
276         }
277     }
278 #endif
279
280     /* XXX beurk */
281     p_sout->i_preheader = __MAX( p_sout->i_preheader, p_mux->i_preheader );
282
283
284     p_sys->p_mux = p_mux;
285
286     p_stream->pf_add    = Add;
287     p_stream->pf_del    = Del;
288     p_stream->pf_send   = Send;
289
290     p_stream->p_sys     = p_sys;
291     return VLC_SUCCESS;
292 }
293
294 /*****************************************************************************
295  * Close:
296  *****************************************************************************/
297
298 static void Close( vlc_object_t * p_this )
299 {
300     sout_stream_t     *p_stream = (sout_stream_t*)p_this;
301     sout_stream_sys_t *p_sys    = p_stream->p_sys;
302     sout_access_out_t *p_access = p_sys->p_mux->p_access;
303
304     if( p_sys->p_sap )
305         sout_SAPDelete( (sout_instance_t *)p_this , p_sys->p_sap );
306
307 #ifdef HAVE_SLP_H
308     if( p_sys->p_slp )
309     {
310             sout_SLPDereg( (sout_instance_t *)p_this,
311                         p_sys->p_slp->psz_url,
312                         p_sys->p_slp->psz_name);
313             free( p_sys->p_slp);
314     }
315 #endif
316
317
318     sout_MuxDelete( p_sys->p_mux );
319     sout_AccessOutDelete( p_access );
320
321     free( p_sys );
322 }
323
324 struct sout_stream_id_t
325 {
326     sout_input_t *p_input;
327 };
328
329
330 static sout_stream_id_t * Add( sout_stream_t *p_stream, sout_format_t *p_fmt )
331 {
332     sout_stream_sys_t *p_sys = p_stream->p_sys;
333     sout_stream_id_t  *id;
334
335     id = malloc( sizeof( sout_stream_id_t ) );
336     if( ( id->p_input = sout_MuxAddStream( p_sys->p_mux, p_fmt ) ) == NULL )
337     {
338         free( id );
339
340         return NULL;
341     }
342
343     return id;
344 }
345
346 static int Del( sout_stream_t *p_stream, sout_stream_id_t *id )
347 {
348     sout_stream_sys_t *p_sys = p_stream->p_sys;
349
350     sout_MuxDeleteStream( p_sys->p_mux, id->p_input );
351
352     free( id );
353
354     return VLC_SUCCESS;
355 }
356
357 static int Send( sout_stream_t *p_stream, sout_stream_id_t *id,
358                  sout_buffer_t *p_buffer )
359 {
360     sout_stream_sys_t *p_sys = p_stream->p_sys;
361     sout_instance_t   *p_sout = p_stream->p_sout;
362
363     sout_MuxSendBuffer( p_sys->p_mux, id->p_input, p_buffer );
364
365     if( p_sys->p_sap )
366        sout_SAPSend( p_sout , p_sys->p_sap );
367
368     return VLC_SUCCESS;
369 }