import audioop
import logging
import math
import time
import sounddevice
import pyaudio
import discord
import numpy
from pprint import pformat

voice_connection = None

LOGGER = logging.getLogger("Discord_Radio_Bot.NoiseGateV2")
DEFAULT = 0


# noinspection PyUnresolvedReferences
class AudioStream:
    def __init__(self, _channels: int = 2, _sample_rate: int = 48000, _frames_per_buffer: int = 1024,
                 _device_index: int = None, _init_on_startup: bool = True):
        self.sd_kwargs = {
            'dtype': 'int16',
            'channels': _channels,
            'samplerate': _sample_rate,
            'blocksize': _frames_per_buffer
        }

        if _device_index:
            self.sd_kwargs['device'] = _device_index

        # Define and initialize stream object if we have been passed a device ID (pyaudio.open)
        self.stream = None

        if _device_index:
            if _init_on_startup:
                LOGGER.info("Init stream")
                self.init_stream()

    def init_stream(self, _new_device_index: int = None):
        # Check what device was asked to be changed (or set)
        if _new_device_index:
            self.sd_kwargs['device'] = _new_input_device_index

        self.close_if_open()

        # Open the stream
        self.stream = sounddevice.RawStream(**self.sd_kwargs)

    def close_if_open(self):
        # Stop the stream if it is started
        if self.stream:
            if self.stream.active:
                self.stream.stop()
                self.stream.close()
                LOGGER.debug(f"[ReopenStream.close_if_open]:\t Stream was open; It was closed.")

    async def stop(self):
        await voice_connection.disconnect()
        self.close_if_open()
        self.stream.close()
        self.paInstance.terminate()


# noinspection PyUnresolvedReferences
class NoiseGate(AudioStream):
    def __init__(self, _voice_connection, _noise_gate_threshold: int, **kwargs):
        super(NoiseGate, self).__init__(_init_on_startup=True, **kwargs)
        global voice_connection
        voice_connection = _voice_connection
        self.THRESHOLD = _noise_gate_threshold
        self.NGStream = NoiseGateStream(self)
        self.Voice_Connection_Thread = None

    def run(self) -> None:
        global voice_connection
        # Start the audio stream
        LOGGER.debug(f"Starting stream")
        self.stream.start()
        # Start the stream to discord
        self.core()

    def core(self, error=None):
        if error:
            LOGGER.info('Error in the core')
            LOGGER.warning(error)

        while not voice_connection.is_connected():
            time.sleep(.2)

        if not voice_connection.is_playing():
            LOGGER.debug(f"Playing stream to discord")
            voice_connection.play(discord.PCMAudio(self.NGStream), after=self.core)

    def list_devices(self):
        return query_devices()

    async def close(self):
        LOGGER.debug(f"Closing")
        await voice_connection.disconnect()
        if self.stream.active:
            self.stream.stop()
            LOGGER.debug(f"Stopping stream")


# noinspection PyUnresolvedReferences
class NoiseGateStream(discord.AudioSource):
    def __init__(self, _stream):
        super(NoiseGateStream, self).__init__()
        self.stream = _stream       # The actual audio stream object
        self.NG_fadeout = 240/20    # Fadeout value used to hold the noisegate after de-triggering
        self.NG_fadeout_count = 0   # A count set when the noisegate is triggered and was de-triggered
        self.process_set_count = 0  # Counts how many processes have been made

    def read(self, num_bytes):
        num_frames = num_bytes / 4
        try:
            while voice_connection.is_connected():
                curr_buffer = bytearray(self.stream.stream.read(num_frames))
                buffer_rms = audioop.rms(curr_buffer, 2)
                if buffer_rms > 0:
                    buffer_decibel = 20 * math.log10(buffer_rms)

                    if self.process_set_count % 10 == 0:
                        if buffer_decibel >= self.stream.THRESHOLD:
                            LOGGER.debug(f"[Noisegate Open] {buffer_decibel} db")
                        else:
                            LOGGER.debug(f"[Noisegate Closed] {buffer_decibel} db")

                    if buffer_decibel >= self.stream.THRESHOLD:
                        self.NG_fadeout_count = self.NG_fadeout
                        self.process_set_count += 1
                        if curr_buffer:
                            return bytes(curr_buffer)

                    else:
                        if self.NG_fadeout_count > 0:
                            self.NG_fadeout_count -= 1
                            LOGGER.debug(f"Frames in fadeout remaining: {self.NG_fadeout_count}")
                            self.process_set_count += 1
                            if curr_buffer:
                                return bytes(curr_buffer)

        except OSError as e:
            LOGGER.warning(e)
            pass

    def audio_datalist_set_volume(self, datalist, volume):
        """ Change value of list of audio chunks """
        sound_level = (volume / 100.)

        for i in range(len(datalist)):
            chunk = numpy.fromstring(datalist[i], numpy.int16)

            chunk = chunk * sound_level

            datalist[i] = chunk.astype(numpy.int16)


class DeviceNotFoundError(Exception):
    def __init__(self):
        self.devices = sounddevice.query_devices()
        self.host_apis = sounddevice.query_hostapis()
        super().__init__("No Devices Found")
    def __str__(self):
        return (
            f"Devices \n"
            f"{self.devices} \n "
            f"Host APIs \n"
            f"{pformat(self.host_apis)}"
        )


def query_devices():
    options = {
        device.get("name"): index
        for index, device in enumerate(sounddevice.query_devices())
        if (device.get("max_input_channels") > 0 and device.get("hostapi") == DEFAULT)
    }
    if not options:
        raise DeviceNotFoundError()
    return options


if __name__ == '__main__':

    input_index = int(input("Input:\t"))
    output_index = int(input("Output:\t"))

    ng = NoiseGate(_input_device_index=input_index, _output_device_index=output_index)

    ng.list_devices()

    ng.start()