// Copyright (C) 2020 François Laignel <fengalin@free.fr>
//
// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Library General Public
// License as published by the Free Software Foundation; either
// version 2 of the License, or (at your option) any later version.
//
// This library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
// Library General Public License for more details.
//
// You should have received a copy of the GNU Library General Public
// License along with this library; if not, write to the
// Free Software Foundation, Inc., 51 Franklin Street, Suite 500,
// Boston, MA 02110-1335, USA.
//
// SPDX-License-Identifier: LGPL-2.1-or-later

use gst::prelude::*;

use std::sync::mpsc;

use once_cell::sync::Lazy;

static CAT: Lazy<gst::DebugCategory> = Lazy::new(|| {
    gst::DebugCategory::new(
        "ts-test",
        gst::DebugColorFlags::empty(),
        Some("Thread-sharing test"),
    )
});

fn init() {
    use std::sync::Once;
    static INIT: Once = Once::new();

    INIT.call_once(|| {
        gst::init().unwrap();
        gstthreadshare::plugin_register_static().expect("gstthreadshare jitterbuffer test");
    });
}

#[test]
fn jb_pipeline() {
    init();

    const CONTEXT_WAIT: u32 = 20;
    const LATENCY: u32 = 20;
    const BUFFER_NB: i32 = 3;

    let pipeline = gst::Pipeline::new(None);

    let src = gst::ElementFactory::make("audiotestsrc", Some("audiotestsrc")).unwrap();
    src.set_property("is-live", true);
    src.set_property("num-buffers", BUFFER_NB);

    let enc = gst::ElementFactory::make("alawenc", Some("alawenc")).unwrap();
    let pay = gst::ElementFactory::make("rtppcmapay", Some("rtppcmapay")).unwrap();

    let jb = gst::ElementFactory::make("ts-jitterbuffer", Some("ts-jitterbuffer")).unwrap();
    jb.set_property("context", "jb_pipeline");
    jb.set_property("context-wait", CONTEXT_WAIT);
    jb.set_property("latency", LATENCY);

    let depay = gst::ElementFactory::make("rtppcmadepay", Some("rtppcmadepay")).unwrap();
    let dec = gst::ElementFactory::make("alawdec", Some("alawdec")).unwrap();

    let sink = gst::ElementFactory::make("appsink", Some("appsink")).unwrap();
    sink.set_property("sync", false);
    sink.set_property("async", false);
    sink.set_property("emit-signals", true);

    pipeline
        .add_many(&[&src, &enc, &pay, &jb, &depay, &dec, &sink])
        .unwrap();
    gst::Element::link_many(&[&src, &enc, &pay, &jb, &depay, &dec, &sink]).unwrap();

    let appsink = sink.dynamic_cast::<gst_app::AppSink>().unwrap();
    let (sender, receiver) = mpsc::channel();
    appsink.set_callbacks(
        gst_app::AppSinkCallbacks::builder()
            .new_sample(move |appsink| {
                let _sample = appsink.pull_sample().unwrap();

                sender.send(()).unwrap();
                Ok(gst::FlowSuccess::Ok)
            })
            .build(),
    );

    pipeline.set_state(gst::State::Playing).unwrap();

    gst::debug!(CAT, "jb_pipeline: waiting for {} buffers", BUFFER_NB);
    for idx in 0..BUFFER_NB {
        receiver.recv().unwrap();
        gst::debug!(CAT, "jb_pipeline: received buffer #{}", idx);
    }

    pipeline.set_state(gst::State::Null).unwrap();
}

#[test]
fn jb_ts_pipeline() {
    init();

    const CONTEXT_WAIT: u32 = 20;
    const LATENCY: u32 = 20;
    const BUFFER_NB: i32 = 3;

    let pipeline = gst::Pipeline::new(None);

    let src = gst::ElementFactory::make("audiotestsrc", Some("audiotestsrc")).unwrap();
    src.set_property("is-live", true);
    src.set_property("num-buffers", BUFFER_NB);

    let queue = gst::ElementFactory::make("ts-queue", Some("ts-queue")).unwrap();
    queue.set_property("context", "jb_ts_pipeline_queue");
    queue.set_property("context-wait", CONTEXT_WAIT);

    let enc = gst::ElementFactory::make("alawenc", Some("alawenc")).unwrap();
    let pay = gst::ElementFactory::make("rtppcmapay", Some("rtppcmapay")).unwrap();

    let jb = gst::ElementFactory::make("ts-jitterbuffer", Some("ts-jitterbuffer")).unwrap();
    jb.set_property("context", "jb_ts_pipeline");
    jb.set_property("context-wait", CONTEXT_WAIT);
    jb.set_property("latency", LATENCY);

    let depay = gst::ElementFactory::make("rtppcmadepay", Some("rtppcmadepay")).unwrap();
    let dec = gst::ElementFactory::make("alawdec", Some("alawdec")).unwrap();

    let sink = gst::ElementFactory::make("appsink", Some("appsink")).unwrap();
    sink.set_property("sync", false);
    sink.set_property("async", false);
    sink.set_property("emit-signals", true);

    pipeline
        .add_many(&[&src, &queue, &enc, &pay, &jb, &depay, &dec, &sink])
        .unwrap();
    gst::Element::link_many(&[&src, &queue, &enc, &pay, &jb, &depay, &dec, &sink]).unwrap();

    let appsink = sink.dynamic_cast::<gst_app::AppSink>().unwrap();
    let (sender, receiver) = mpsc::channel();
    appsink.set_callbacks(
        gst_app::AppSinkCallbacks::builder()
            .new_sample(move |appsink| {
                let _sample = appsink.pull_sample().unwrap();

                sender.send(()).unwrap();
                Ok(gst::FlowSuccess::Ok)
            })
            .build(),
    );

    pipeline.set_state(gst::State::Playing).unwrap();

    gst::debug!(CAT, "jb_ts_pipeline: waiting for {} buffers", BUFFER_NB);
    for idx in 0..BUFFER_NB {
        receiver.recv().unwrap();
        gst::debug!(CAT, "jb_ts_pipeline: received buffer #{}", idx);
    }

    pipeline.set_state(gst::State::Null).unwrap();
}
