Backport memory leak fix for savonet/liquidsoap#1146

CHANGES

@@ -1,3 +1,7 @@
+0.1.6 (12-04-2020)
+======
+* Fix return status for native and ogg read callbacks (savonet/liquidosoap#1146)
+
 0.1.5 (27-06-2019)
 =====
 * More cleanup.

configure.ac

@@ -1,6 +1,6 @@
 
 # check for one particular file of the sources 
-AC_INIT([ocaml-flac],[0.1.5],[[email protected]])
+AC_INIT([ocaml-flac],[0.1.6],[[email protected]])
 
 VERSION=$PACKAGE_VERSION
 AC_MSG_RESULT([configuring $PACKAGE_STRING])

src/flac_stubs.c

@@ -358,7 +358,10 @@ static FLAC__StreamDecoderReadStatus dec_read_callback(const FLAC__StreamDecoder
 
   caml_release_runtime_system();
 
-  return FLAC__STREAM_DECODER_READ_STATUS_CONTINUE;
+  if (len ==0)
+    return FLAC__STREAM_DECODER_READ_STATUS_END_OF_STREAM;
+  else
+    return FLAC__STREAM_DECODER_READ_STATUS_CONTINUE;
 }
 
 static inline double sample_to_double(FLAC__int32 x, unsigned bps)

src/ogg_demuxer_flac_decoder.ml

@@ -70,7 +70,11 @@ let decoder os =
       Ogg_flac.Decoder.get_callbacks 
        (fun ret -> feed ret) 
     in
-    Flac.Decoder.process decoder c
+    match Flac.Decoder.state decoder c with
+      | `Search_for_metadata | `Read_metadata | `Search_for_frame_sync
+      | `Read_frame ->
+          Flac.Decoder.process decoder c
+      | _ -> raise Ogg.End_of_stream
   in
   let restart new_os =
     os := new_os;

src/ogg_flac_stubs.c

@@ -184,7 +184,10 @@ static FLAC__StreamDecoderReadStatus ogg_read_callback(const FLAC__StreamDecoder
   caml_release_runtime_system();
 
   *bytes = len;
-  return FLAC__STREAM_DECODER_READ_STATUS_CONTINUE;
+  if (len == 0)
+    return FLAC__STREAM_DECODER_READ_STATUS_END_OF_STREAM;
+  else
+    return FLAC__STREAM_DECODER_READ_STATUS_CONTINUE;
 }
 
 CAMLprim value ocaml_flac_decoder_ogg_update_os(value v, value os)