2 * This file is part of MPlayer.
4 * MPlayer is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * MPlayer is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License along
15 * with MPlayer; if not, write to the Free Software Foundation, Inc.,
16 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
23 #include <sys/types.h>
26 #include <sys/ioctl.h>
41 #include <libavutil/common.h>
44 #include "osdep/shmem.h"
45 #include "osdep/timer.h"
48 #include "libmpdemux/demuxer.h"
49 #include "ffmpeg_files/intreadwrite.h"
57 static int (*stream_check_interrupt_cb
)(struct input_ctx
*ctx
, int time
);
58 static struct input_ctx
*stream_check_interrupt_ctx
;
60 extern const stream_info_t stream_info_vcd
;
61 extern const stream_info_t stream_info_cdda
;
62 extern const stream_info_t stream_info_netstream
;
63 extern const stream_info_t stream_info_pnm
;
64 extern const stream_info_t stream_info_asf
;
65 extern const stream_info_t stream_info_rtsp
;
66 extern const stream_info_t stream_info_rtp
;
67 extern const stream_info_t stream_info_udp
;
68 extern const stream_info_t stream_info_http1
;
69 extern const stream_info_t stream_info_http2
;
70 extern const stream_info_t stream_info_dvb
;
71 extern const stream_info_t stream_info_tv
;
72 extern const stream_info_t stream_info_radio
;
73 extern const stream_info_t stream_info_pvr
;
74 extern const stream_info_t stream_info_ftp
;
75 extern const stream_info_t stream_info_vstream
;
76 extern const stream_info_t stream_info_dvdnav
;
77 extern const stream_info_t stream_info_smb
;
78 extern const stream_info_t stream_info_sdp
;
79 extern const stream_info_t stream_info_rtsp_sip
;
81 extern const stream_info_t stream_info_cue
;
82 extern const stream_info_t stream_info_null
;
83 extern const stream_info_t stream_info_mf
;
84 extern const stream_info_t stream_info_ffmpeg
;
85 extern const stream_info_t stream_info_file
;
86 extern const stream_info_t stream_info_ifo
;
87 extern const stream_info_t stream_info_dvd
;
88 extern const stream_info_t stream_info_bluray
;
90 static const stream_info_t
* const auto_open_streams
[] = {
97 #ifdef CONFIG_NETWORKING
98 &stream_info_netstream
,
103 #ifdef CONFIG_LIVE555
105 &stream_info_rtsp_sip
,
126 #ifdef CONFIG_VSTREAM
127 &stream_info_vstream
,
129 #ifdef CONFIG_LIBSMBCLIENT
133 #ifdef CONFIG_DVDREAD
140 #ifdef CONFIG_LIBBLURAY
151 static stream_t
*open_stream_plugin(const stream_info_t
*sinfo
,
152 const char *filename
,
153 int mode
, struct MPOpts
*options
,
154 int *file_format
, int *ret
,
155 char **redirected_url
)
159 m_struct_t
* desc
= (m_struct_t
*)sinfo
->opts
;
163 arg
= m_struct_alloc(desc
);
164 if(sinfo
->opts_url
) {
166 { "stream url", arg
, CONF_TYPE_CUSTOM_URL
, 0, 0 ,0, (void *)sinfo
->opts
};
167 if (m_option_parse(&url_opt
, bstr("stream url"), bstr(filename
), false, arg
) < 0) {
168 mp_tmsg(MSGT_OPEN
,MSGL_ERR
, "URL parsing failed on url %s\n",filename
);
169 m_struct_free(desc
,arg
);
174 s
= new_stream(-2,-2);
176 s
->url
=strdup(filename
);
178 *ret
= sinfo
->open(s
,mode
,arg
,file_format
);
179 if((*ret
) != STREAM_OK
) {
180 #ifdef CONFIG_NETWORKING
181 if (*ret
== STREAM_REDIRECTED
&& redirected_url
) {
182 if (s
->streaming_ctrl
&& s
->streaming_ctrl
->url
183 && s
->streaming_ctrl
->url
->url
)
184 *redirected_url
= strdup(s
->streaming_ctrl
->url
->url
);
186 *redirected_url
= NULL
;
188 streaming_ctrl_free(s
->streaming_ctrl
);
195 mp_msg(MSGT_OPEN
,MSGL_WARN
, "Warning streams need a type !!!!\n");
196 if(s
->flags
& MP_STREAM_SEEK
&& !s
->seek
)
197 s
->flags
&= ~MP_STREAM_SEEK
;
198 if(s
->seek
&& !(s
->flags
& MP_STREAM_SEEK
))
199 s
->flags
|= MP_STREAM_SEEK
;
203 mp_msg(MSGT_OPEN
,MSGL_V
, "STREAM: [%s] %s\n",sinfo
->name
,filename
);
204 mp_msg(MSGT_OPEN
,MSGL_V
, "STREAM: Description: %s\n",sinfo
->info
);
205 mp_msg(MSGT_OPEN
,MSGL_V
, "STREAM: Author: %s\n", sinfo
->author
);
206 mp_msg(MSGT_OPEN
,MSGL_V
, "STREAM: Comment: %s\n", sinfo
->comment
);
212 stream_t
*open_stream_full(const char *filename
, int mode
,
213 struct MPOpts
*options
, int *file_format
)
216 const stream_info_t
* sinfo
;
218 char *redirected_url
= NULL
;
220 for(i
= 0 ; auto_open_streams
[i
] ; i
++) {
221 sinfo
= auto_open_streams
[i
];
222 if(!sinfo
->protocols
) {
223 mp_msg(MSGT_OPEN
,MSGL_WARN
, "Stream type %s has protocols == NULL, it's a bug\n", sinfo
->name
);
226 for(j
= 0 ; sinfo
->protocols
[j
] ; j
++) {
227 l
= strlen(sinfo
->protocols
[j
]);
228 // l == 0 => Don't do protocol matching (ie network and filenames)
229 if((l
== 0 && !strstr(filename
, "://")) ||
230 ((strncasecmp(sinfo
->protocols
[j
],filename
,l
) == 0) &&
231 (strncmp("://",filename
+l
,3) == 0))) {
232 *file_format
= DEMUXER_TYPE_UNKNOWN
;
233 s
= open_stream_plugin(sinfo
,filename
,mode
,options
,file_format
,&r
,
236 if(r
== STREAM_REDIRECTED
&& redirected_url
) {
237 mp_msg(MSGT_OPEN
,MSGL_V
, "[%s] open %s redirected to %s\n",
238 sinfo
->info
, filename
, redirected_url
);
239 s
= open_stream_full(redirected_url
, mode
, options
, file_format
);
240 free(redirected_url
);
243 else if(r
!= STREAM_UNSUPPORTED
) {
244 mp_tmsg(MSGT_OPEN
,MSGL_ERR
, "Failed to open %s.\n",filename
);
252 mp_tmsg(MSGT_OPEN
,MSGL_ERR
, "No stream found to handle url %s\n", filename
);
256 stream_t
*open_output_stream(const char *filename
, struct MPOpts
*options
)
258 int file_format
; //unused
260 mp_msg(MSGT_OPEN
,MSGL_ERR
,"open_output_stream(), NULL filename, report this bug\n");
264 return open_stream_full(filename
,STREAM_WRITE
,options
,&file_format
);
267 //=================== STREAMER =========================
269 void stream_capture_do(stream_t
*s
)
271 if (fwrite(s
->buffer
, s
->buf_len
, 1, s
->capture_file
) < 1) {
272 mp_tmsg(MSGT_GLOBAL
, MSGL_ERR
, "Error writing capture file: %s\n",
274 fclose(s
->capture_file
);
275 s
->capture_file
= NULL
;
279 int stream_read_internal(stream_t
*s
, void *buf
, int len
)
282 // we will retry even if we already reached EOF previously.
284 case STREAMTYPE_STREAM
:
285 #ifdef CONFIG_NETWORKING
286 if( s
->streaming_ctrl
!=NULL
&& s
->streaming_ctrl
->streaming_read
) {
287 len
=s
->streaming_ctrl
->streaming_read(s
->fd
, buf
, len
, s
->streaming_ctrl
);
288 if (s
->streaming_ctrl
->status
== streaming_stopped_e
)
293 len
= s
->fill_buffer(s
, buf
, len
);
295 len
= read(s
->fd
, buf
, len
);
298 len
= demux_read_data((demux_stream_t
*)s
->priv
, buf
, len
);
303 len
= s
->fill_buffer
? s
->fill_buffer(s
, buf
, len
) : 0;
307 // do not retry if this looks like proper eof
308 if (s
->eof
|| (s
->end_pos
&& pos
== s
->end_pos
))
310 // dvdnav has some horrible hacks to "suspend" reads,
311 // we need to skip this code or seeks will hang.
312 if (s
->type
== STREAMTYPE_DVDNAV
)
315 // just in case this is an error e.g. due to network
316 // timeout reset and retry
317 // Seeking is used as a hack to make network streams
318 // reopen the connection, ideally they would implement
319 // e.g. a STREAM_CTRL_RECONNECT to do this
322 if (stream_seek_internal(s
, pos
) >= 0 || s
->pos
!= pos
) // seek failed
324 // make sure EOF is set to ensure no endless loops
326 return stream_read_internal(s
, buf
, orig_len
);
332 // When reading succeeded we are obviously not at eof.
333 // This e.g. avoids issues with eof getting stuck when lavf seeks in MPEG-TS
339 int stream_fill_buffer(stream_t
*s
){
340 int len
= stream_read_internal(s
, s
->buffer
, STREAM_BUFFER_SIZE
);
345 // printf("[%d]",len);fflush(stdout);
347 stream_capture_do(s
);
351 int stream_write_buffer(stream_t
*s
, unsigned char *buf
, int len
) {
355 rd
= s
->write_buffer(s
, buf
, len
);
359 assert(rd
== len
&& "stream_write_buffer(): unexpected short write");
363 int stream_seek_internal(stream_t
*s
, off_t newpos
)
365 if(newpos
==0 || newpos
!=s
->pos
){
367 case STREAMTYPE_STREAM
:
368 //s->pos=newpos; // real seek
369 // Some streaming protocol allow to seek backward and forward
370 // A function call that return -1 can tell that the protocol
371 // doesn't support seeking.
372 #ifdef CONFIG_NETWORKING
373 if(s
->seek
) { // new stream seek is much cleaner than streaming_ctrl one
374 if(!s
->seek(s
,newpos
)) {
375 mp_tmsg(MSGT_STREAM
,MSGL_ERR
, "Seek failed\n");
381 if( s
->streaming_ctrl
!=NULL
&& s
->streaming_ctrl
->streaming_seek
) {
382 if( s
->streaming_ctrl
->streaming_seek( s
->fd
, newpos
, s
->streaming_ctrl
)<0 ) {
383 mp_tmsg(MSGT_STREAM
,MSGL_INFO
,"Stream not seekable!\n");
390 mp_tmsg(MSGT_STREAM
, MSGL_INFO
,
391 "Cannot seek backward in linear streams!\n");
396 // This should at the beginning as soon as all streams are converted
400 if(!s
->seek(s
,newpos
)) {
401 mp_tmsg(MSGT_STREAM
,MSGL_ERR
, "Seek failed\n");
405 // putchar('.');fflush(stdout);
407 // putchar('%');fflush(stdout);
412 int stream_seek_long(stream_t
*s
,off_t pos
){
416 // if( mp_msg_test(MSGT_STREAM,MSGL_DBG3) ) printf("seek_long to 0x%X\n",(unsigned int)pos);
418 s
->buf_pos
=s
->buf_len
=0;
420 if(s
->mode
== STREAM_WRITE
) {
421 if(!s
->seek
|| !s
->seek(s
,pos
))
427 newpos
= (pos
/s
->sector_size
)*s
->sector_size
;
429 newpos
= pos
&(~((off_t
)STREAM_BUFFER_SIZE
-1));
431 if( mp_msg_test(MSGT_STREAM
,MSGL_DBG3
) ){
432 mp_msg(MSGT_STREAM
,MSGL_DBG3
, "s->pos=%"PRIX64
" newpos=%"PRIX64
" new_bufpos=%"PRIX64
" buflen=%X \n",
433 (int64_t)s
->pos
,(int64_t)newpos
,(int64_t)pos
,s
->buf_len
);
437 res
= stream_seek_internal(s
, newpos
);
441 while(s
->pos
<newpos
){
442 if(stream_fill_buffer(s
)<=0) break; // EOF
445 s
->eof
= 0; // EOF reset when seek succeeds.
446 while (stream_fill_buffer(s
) > 0) {
448 s
->buf_pos
=pos
; // byte position in sector
453 // Fill failed, but seek still is a success.
458 mp_msg(MSGT_STREAM
,MSGL_V
,
459 "stream_seek: Seek to/past EOF: no buffer preloaded.\n");
464 void stream_reset(stream_t
*s
){
467 s
->buf_pos
=s
->buf_len
=0;
470 if(s
->control
) s
->control(s
,STREAM_CTRL_RESET
,NULL
);
474 int stream_control(stream_t
*s
, int cmd
, void *arg
){
475 if(!s
->control
) return STREAM_UNSUPPORTED
;
476 #ifdef CONFIG_STREAM_CACHE
478 return cache_do_control(s
, cmd
, arg
);
480 return s
->control(s
, cmd
, arg
);
483 stream_t
* new_memory_stream(unsigned char* data
,int len
){
488 s
=calloc(1, sizeof(stream_t
)+len
);
490 s
->type
=STREAMTYPE_MEMORY
;
491 s
->buf_pos
=0; s
->buf_len
=len
;
492 s
->start_pos
=0; s
->end_pos
=len
;
495 memcpy(s
->buffer
,data
,len
);
499 stream_t
* new_stream(int fd
,int type
){
500 stream_t
*s
=calloc(1, sizeof(stream_t
));
501 if(s
==NULL
) return NULL
;
506 int temp
= WSAStartup(0x0202, &wsdata
); // there might be a better place for this (-> later)
507 mp_msg(MSGT_STREAM
,MSGL_V
,"WINSOCK2 init: %i\n", temp
);
513 s
->buf_pos
=s
->buf_len
=0;
514 s
->start_pos
=s
->end_pos
=0;
522 void free_stream(stream_t
*s
){
523 // printf("\n*** free_stream() called ***\n");
524 #ifdef CONFIG_STREAM_CACHE
527 if (s
->capture_file
) {
528 fclose(s
->capture_file
);
529 s
->capture_file
= NULL
;
532 if(s
->close
) s
->close(s
);
534 /* on unix we define closesocket to close
535 on windows however we have to distinguish between
536 network socket and file */
537 if(s
->url
&& strstr(s
->url
,"://"))
542 mp_msg(MSGT_STREAM
,MSGL_V
,"WINSOCK2 uninit\n");
543 WSACleanup(); // there might be a better place for this (-> later)
545 // Disabled atm, i don't like that. s->priv can be anything after all
546 // streams should destroy their priv on close
552 stream_t
* new_ds_stream(demux_stream_t
*ds
) {
553 stream_t
* s
= new_stream(-1,STREAMTYPE_DS
);
558 void stream_set_interrupt_callback(int (*cb
)(struct input_ctx
*, int),
559 struct input_ctx
*ctx
)
561 stream_check_interrupt_cb
= cb
;
562 stream_check_interrupt_ctx
= ctx
;
565 int stream_check_interrupt(int time
) {
566 if(!stream_check_interrupt_cb
) {
567 usec_sleep(time
* 1000);
570 return stream_check_interrupt_cb(stream_check_interrupt_ctx
, time
);
574 * Helper function to read 16 bits little-endian and advance pointer
576 static uint16_t get_le16_inc(const uint8_t **buf
)
578 uint16_t v
= AV_RL16(*buf
);
584 * Helper function to read 16 bits big-endian and advance pointer
586 static uint16_t get_be16_inc(const uint8_t **buf
)
588 uint16_t v
= AV_RB16(*buf
);
594 * Find a newline character in buffer
595 * \param buf buffer to search
596 * \param len amount of bytes to search in buffer, may not overread
597 * \param utf16 chose between UTF-8/ASCII/other and LE and BE UTF-16
598 * 0 = UTF-8/ASCII/other, 1 = UTF-16-LE, 2 = UTF-16-BE
600 static const uint8_t *find_newline(const uint8_t *buf
, int len
, int utf16
)
603 const uint8_t *end
= buf
+ len
;
606 return (uint8_t *)memchr(buf
, '\n', len
);
608 while (buf
< end
- 1) {
609 GET_UTF16(c
, buf
< end
- 1 ? get_le16_inc(&buf
) : 0, return NULL
;)
610 if (buf
<= end
&& c
== '\n')
615 while (buf
< end
- 1) {
616 GET_UTF16(c
, buf
< end
- 1 ? get_be16_inc(&buf
) : 0, return NULL
;)
617 if (buf
<= end
&& c
== '\n')
626 * Copy a number of bytes, converting to UTF-8 if input is UTF-16
627 * \param dst buffer to copy to
628 * \param dstsize size of dst buffer
629 * \param src buffer to copy from
630 * \param len amount of bytes to copy from src
631 * \param utf16 chose between UTF-8/ASCII/other and LE and BE UTF-16
632 * 0 = UTF-8/ASCII/other, 1 = UTF-16-LE, 2 = UTF-16-BE
634 static int copy_characters(uint8_t *dst
, int dstsize
,
635 const uint8_t *src
, int *len
, int utf16
)
638 uint8_t *dst_end
= dst
+ dstsize
;
639 const uint8_t *end
= src
+ *len
;
644 memcpy(dst
, src
, *len
);
647 while (src
< end
- 1 && dst_end
- dst
> 8) {
649 GET_UTF16(c
, src
< end
- 1 ? get_le16_inc(&src
) : 0, ;)
650 PUT_UTF8(c
, tmp
, *dst
++ = tmp
;)
653 return dstsize
- (dst_end
- dst
);
655 while (src
< end
- 1 && dst_end
- dst
> 8) {
657 GET_UTF16(c
, src
< end
- 1 ? get_be16_inc(&src
) : 0, ;)
658 PUT_UTF8(c
, tmp
, *dst
++ = tmp
;)
661 return dstsize
- (dst_end
- dst
);
666 unsigned char* stream_read_line(stream_t
*s
,unsigned char* mem
, int max
, int utf16
) {
668 const unsigned char *end
;
669 unsigned char *ptr
= mem
;
670 if (max
< 1) return NULL
;
671 max
--; // reserve one for 0-termination
673 len
= s
->buf_len
-s
->buf_pos
;
674 // try to fill the buffer
676 (!cache_stream_fill_buffer(s
) ||
677 (len
= s
->buf_len
-s
->buf_pos
) <= 0)) break;
678 end
= find_newline(s
->buffer
+s
->buf_pos
, len
, utf16
);
679 if(end
) len
= end
- (s
->buffer
+s
->buf_pos
) + 1;
680 if(len
> 0 && max
> 0) {
681 int l
= copy_characters(ptr
, max
, s
->buffer
+s
->buf_pos
, &len
, utf16
);
690 if(s
->eof
&& ptr
== mem
) return NULL
;
694 struct bstr
stream_read_complete(struct stream
*s
, void *talloc_ctx
,
695 int max_size
, int padding_bytes
)
697 if (max_size
> 1000000000)
702 int padding
= FFMAX(padding_bytes
, 1);
704 if (s
->end_pos
> max_size
)
705 return (struct bstr
){NULL
, 0};
707 bufsize
= s
->end_pos
+ padding
;
711 buf
= talloc_realloc_size(talloc_ctx
, buf
, bufsize
);
712 int readsize
= stream_read(s
, buf
+ total_read
, bufsize
- total_read
);
713 total_read
+= readsize
;
714 if (total_read
< bufsize
)
716 if (bufsize
> max_size
) {
718 return (struct bstr
){NULL
, 0};
720 bufsize
= FFMIN(bufsize
+ (bufsize
>> 1), max_size
+ padding
);
722 buf
= talloc_realloc_size(talloc_ctx
, buf
, total_read
+ padding
);
723 return (struct bstr
){buf
, total_read
};