C'est lié au bug de traitement d'exception dont on avait un peu parlé?
J'ai ce patch de test non commité sur mon code (attaché). Cela
résolvait un problème dans le cas du streaming vidéo.
Au cas où...
diff -r 41cc9835a30e liquidsoap/src/decoder/ogg_decoder.ml
--- a/liquidsoap/src/decoder/ogg_decoder.ml Mon Jan 30 20:04:03 2012 +0100
+++ b/liquidsoap/src/decoder/ogg_decoder.ml Tue Mar 20 09:35:26 2012 +0100
@@ -199,6 +199,7 @@
failwith "Ogg stream does not contain required data"
in
let decode buffer =
+ try
if not !started then
begin
init ~reset:false buffer;
@@ -263,7 +264,8 @@
* which implies that the stream has already been
* parsed as ogg. Indeed, Ogg.Out_of_sync when
* parsing ogg means that the stream is not ogg... *)
- | Ogg.Out_of_sync when source = `Stream -> ()
+ | _ -> () (* Ogg.Out_of_sync when source = `Stream -> () *)
+ with _ -> ()
in
let seek offset =
try
diff -r 41cc9835a30e liquidsoap/src/decoder/taglib_plug.ml
--- a/liquidsoap/src/decoder/taglib_plug.ml Mon Jan 30 20:04:03 2012 +0100
+++ b/liquidsoap/src/decoder/taglib_plug.ml Tue Mar 20 09:35:26 2012 +0100
@@ -44,7 +44,7 @@
~log fname) then
raise Not_found ;
try
- let f = File.open_file `Autodetect fname in
+ let f = File.open_file `Mpeg fname in
Tutils.finalize ~k:(fun () -> File.close_file f)
(fun () ->
let gt l (n, t) =
------------------------------------------------------------------------------
This SF email is sponsosred by:
Try Windows Azure free for 90 days Click Here
http://p.sf.net/sfu/sfd2d-msazure
_______________________________________________
Savonet-users mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/savonet-users
