!7

set flag OpusFromStream_debug.

cm TestOpusFromStream > DynPrintLog {
  S oggSnippetID = #1400517;
  transient SimulatedPartialInputStream in;
  transient OpusFromStream opusReader;
  transient L<short[]> samples;
  
  switchable int firstChunk = 0;
  switchable int chunkSize = 512;

  start-thread {
    File f = loadLibrary(#1400517);
    printFileInfo(f);
    in = new SimulatedPartialInputStream(fileInputStream(f));
    in.cutOffPoint = firstChunk;
    samples = new L;
    
    temp opusReader = new OpusFromStream(in, 1);
    
    int safety = 0;
    while (!in.streamEnded() && safety++ < 1000) {
      in.cutOffPoint += chunkSize;
      var samples = opusReader.nextSamples();
      print("samples", samples);
      addIfNotNull(TestOpusFromStream.this.samples, samples);
    }
    
    File wavFile = programFile("output.wav");
    multiShortArraysToWAVE(samples, wavFile, format := javaSound_opusMono());
    printFileInfo(wavFile);
    
    showGraph();
  }
  
  void showGraph {
    var pcm = random(samples);
    if (empty(pcm)) ret;
    print("Chose PCM: " + l(pcm));
    dm_showImageAs("Decoded Audio Sample", shortArrayToGraph(pcm));
  }
}