using System;
using System.IO;
using UnityEngine;
using UnityEngine.Events;
using UnityEngine.UI;
using System.Collections;


public class MicroPhoneManager : MonoBehaviour
{
    public static MicroPhoneManager instance;
    public int DeviceLength;
    /// <summary>
    /// 录音频率
    /// </summary>
    public string Frequency = "44100";
    public int Samplerate = 44100;
    /// <summary>
    /// 最长录音时长（半小时）
    /// </summary>
    int MaxSecond = 1800;
    /// <summary>
    /// 实际录音时长
    /// </summary>
    public int realTime = 0;
    /// <summary>
    /// 文件夹路径
    /// </summary>
    string filePath;


    AudioSource _curAudioSource;
    public void Awake()
    {
        instance = this;
    }
    public AudioSource Init()
    {
        if (_curAudioSource == null)
        {
            _curAudioSource = this.gameObject.AddComponent<AudioSource>();
        }
        else
        {
            _curAudioSource = GetComponent<AudioSource>();
        }
        return _curAudioSource;
    }
    //AudioSource CurAudioSource
    //{
    //    get
    //    {
    //        if (_curAudioSource == null)
    //        {
    //            _curAudioSource = gameObject.AddComponent<AudioSource>();
    //        }
    //        return _curAudioSource;
    //    }
    //}

    #region ［public Way］
    //public Text text;
    //public Button startBtn, endBtn, recordBtn, getSoundData, getDevice;
    void Start()
    {
        //startBtn.onClick.AddListener(StartRecordAudio);
        //endBtn.onClick.AddListener(StopRecordAudio);
        //recordBtn.onClick.AddListener(PlayRecordAudio);
        //getSoundData.onClick.AddListener(PrintRecordData);
        //getDevice.onClick.AddListener(GetMicrophoneDevice);
    }

    /// <summary>
    /// 获取麦克风设备
    /// </summary>
    public bool GetMicrophoneDevice()
    {
        string[] mDevice = Microphone.devices;
        DeviceLength = mDevice.Length;
        if (DeviceLength == 0)
        {
            ShowInfoLog("找不到麦克风设备！");
            return false;
        }
        else
        {
            Debug.Log("找到麦克风....." + mDevice[0]);
            return true;
        }

    }

    /// <summary>
    /// 开始录音
    /// </summary>
    public void StartRecordAudio()
    {
        _curAudioSource.Stop();
        _curAudioSource.loop = false;
        _curAudioSource.mute = true;
        _curAudioSource.clip = Microphone.Start(null, true, MaxSecond, int.Parse(Frequency));
        while (!(Microphone.GetPosition(null) > 0))
        {

        }
        _curAudioSource.Play();
        realTime = 0; // 录音计时

        if (IsInvoking("startTime"))
            CancelInvoke("startTime");

        InvokeRepeating("startTime", 1, 1);

        ShowInfoLog("开始录音.....");
    }

    /// <summary>
    /// 停止录音
    /// </summary>
    public bool StopRecordAudio()
    {
        if (realTime>0)
        {
            ShowInfoLog("结束录音.....");
            if (!Microphone.IsRecording(null))
                return false;
            Microphone.End(null);
            _curAudioSource.Stop();
            //WriteHeader(CreateEmpty(Path.Combine( Application.streamingAssetsPath,"AuidoFiles","test.wav")), _curAudioSource.clip);
            PrintRecordData();
            //using (FileStream fs = CreateEmpty(Application.persistentDataPath + "/dd.wav"))
            //{
            //    ConvertAndWrite(fs, _curAudioSource.clip);
            //    WriteHeader(fs, _curAudioSource.clip);
            //}

            if (IsInvoking("startTime"))
                CancelInvoke("startTime");
            ShowInfoLog(realTime + "s");
            return true;
        }
        else
        {
            Debug.Log("录音时长太短");
            return false;
        }
      

    }
    public void Stop()
    {
        ShowInfoLog("结束录音.....");
        if (!Microphone.IsRecording(null))
            return;
        Microphone.End(null);
        _curAudioSource.Stop();

    }
    /// <summary>s
    /// 回放录音
    /// </summary>
    public void PlayRecordAudio()
    {
        if (Microphone.IsRecording(null))
            return;
        if (_curAudioSource.clip == null)
            return;
        _curAudioSource.mute = false;
        _curAudioSource.loop = false;
        _curAudioSource.Play();
        ShowInfoLog("播放录音.....");
    }
    void startTime()
    {
        ++realTime;
        RobotUI.Instance.recordTime = realTime;
        ShowInfoLog("realTime:  " + realTime);
        if (realTime >= MaxSecond)
        {
            //若超出最大时间限制，则保存上传文件，接着上传下一次
            //ULog.Log("超出最大时间，重新监听上传");
            StopRecordAudio();
            StartRecordAudio();
        }
        else
        {

        }
    }
    ///// <summary>
    /////  打印录音信息
    ///// </summary>
    public void PrintRecordData()
    {
        if (Microphone.IsRecording(null))
            return;
        byte[] data = GetClipData();
        #region 用户自由固定录音时长
        int position = _curAudioSource.clip.samples / MaxSecond * realTime;
        var soundata = new float[_curAudioSource.clip.samples * _curAudioSource.clip.channels];
        _curAudioSource.clip.GetData(soundata, 0);

        var newdata = new float[position * _curAudioSource.clip.channels];
        for (int i = 0; i < newdata.Length; i++)
        {
            newdata[i] = soundata[i];
        }
        if (realTime>0)
        {
            _curAudioSource.clip = AudioClip.Create(_curAudioSource.clip.name, position, _curAudioSource.clip.channels, _curAudioSource.clip.frequency, false);
            _curAudioSource.clip.SetData(newdata, 0);
        }
      

        Microphone.End(null);
        #endregion
        using (FileStream fs = CreateEmpty(Application.persistentDataPath + "/dd.wav"))
        {
            ConvertAndWrite(fs, _curAudioSource.clip);
            WriteHeader(fs, _curAudioSource.clip);
        }
    }
    void WriteHeader(FileStream stream, AudioClip clip)
    {
        int hz = clip.frequency;
        int channels = clip.channels;
        int samples = clip.samples;

        stream.Seek(0, SeekOrigin.Begin);

        Byte[] riff = System.Text.Encoding.UTF8.GetBytes("RIFF");
        stream.Write(riff, 0, 4);

        Byte[] chunkSize = BitConverter.GetBytes(stream.Length - 8);
        stream.Write(chunkSize, 0, 4);

        Byte[] wave = System.Text.Encoding.UTF8.GetBytes("WAVE");
        stream.Write(wave, 0, 4);

        Byte[] fmt = System.Text.Encoding.UTF8.GetBytes("fmt ");
        stream.Write(fmt, 0, 4);

        Byte[] subChunk1 = BitConverter.GetBytes(16);
        stream.Write(subChunk1, 0, 4);

        UInt16 two = 2;
        UInt16 one = 1;

        Byte[] audioFormat = BitConverter.GetBytes(one);
        stream.Write(audioFormat, 0, 2);

        Byte[] numChannels = BitConverter.GetBytes(channels);
        stream.Write(numChannels, 0, 2);

        Byte[] sampleRate = BitConverter.GetBytes(hz);
        stream.Write(sampleRate, 0, 4);

        Byte[] byteRate = BitConverter.GetBytes(hz * channels * 2); // sampleRate * bytesPerSample*number of channels, here 44100*2*2  
        stream.Write(byteRate, 0, 4);

        UInt16 blockAlign = (ushort)(channels * 2);
        stream.Write(BitConverter.GetBytes(blockAlign), 0, 2);

        UInt16 bps = 16;
        Byte[] bitsPerSample = BitConverter.GetBytes(bps);
        stream.Write(bitsPerSample, 0, 2);

        Byte[] datastring = System.Text.Encoding.UTF8.GetBytes("data");
        stream.Write(datastring, 0, 4);

        Byte[] subChunk2 = BitConverter.GetBytes(samples * channels * 2);
        stream.Write(subChunk2, 0, 4);

    }
    FileStream CreateEmpty(string filepath)
    {
        ShowInfoLog("录音文件路径为 : " + filepath);
        FileStream fileStream = new FileStream(filepath, FileMode.Create);
        byte emptyByte = new byte();

        for (int i = 0; i < 44; i++) //preparing the header  
        {
            fileStream.WriteByte(emptyByte);
        }

        return fileStream;
    }
    void ConvertAndWrite(FileStream fileStream, AudioClip clip)
    {

        float[] samples = new float[clip.samples];

        clip.GetData(samples, 0);

        Int16[] intData = new Int16[samples.Length];

        Byte[] bytesData = new Byte[samples.Length * 2];

        int rescaleFactor = 32767; //to convert float to Int16  

        for (int i = 0; i < samples.Length; i++)
        {
            intData[i] = (short)(samples[i] * rescaleFactor);
            Byte[] byteArr = new Byte[2];
            byteArr = BitConverter.GetBytes(intData[i]);
            byteArr.CopyTo(bytesData, i * 2);
        }
        fileStream.Write(bytesData, 0, bytesData.Length);
    }
    /// <summary>
    /// 获取音频数据
    /// </summary>
    /// <returns>The clip data.</returns>
    public byte[] GetClipData()
    {
        if (_curAudioSource.clip == null)
        {
            ShowInfoLog("缺少音频资源！");
            return null;
        }

        float[] samples = new float[_curAudioSource.clip.samples];
        _curAudioSource.clip.GetData(samples, 0);

        byte[] outData = new byte[samples.Length * 2];
        int reScaleFactor = 32767;

        for (int i = 0; i < samples.Length; i++)
        {
            short tempShort = (short)(samples[i] * reScaleFactor);
            byte[] tempData = System.BitConverter.GetBytes(tempShort);

            outData[i * 2] = tempData[0];
            outData[i * 2 + 1] = tempData[1];
        }
        if (outData == null || outData.Length <= 0)
        {

            ShowInfoLog("获取音频数据失败！");
            return null;
        }
        return outData;
    }

    #endregion


    //void OnGUI()
    //{

    //    if (DeviceLength == 0)
    //    {
    //        if (ShowGUIButton("获取麦克风设备"))
    //        {
    //            GetMicrophoneDevice();
    //        }
    //    }
    //    else if (DeviceLength > 0)
    //    {
    //        GUILayout.Label("录音频率:");
    //        Frequency = GUILayout.TextField(Frequency, GUILayout.Width(Screen.width / 5), GUILayout.Height(Screen.height / 20));
    //        GUILayout.BeginVertical();

    //        if (ShowGUIButton("开始录音"))
    //        {
    //            StartRecordAudio();
    //        }
    //        if (ShowGUIButton("结束录音"))
    //        {
    //            StopRecordAudio();
    //        }
    //        if (ShowGUIButton("回放录音"))
    //        {
    //            PlayRecordAudio();
    //        }
    //        if (ShowGUIButton("获取录音数据"))
    //        {
    //            PrintRecordData();
    //        }

    //        GUILayout.EndVertical();
    //    }
    //    GUILayout.Label(infoLog);

    //}

    #region [Private Way]

    /// <summary>
    /// 显示GUI 按钮
    /// </summary>
    /// <returns><c>true</c>, if GUI button was shown, <c>false</c> otherwise.</returns>
    /// <param name="buttonName">Button name.</param>
    //bool ShowGUIButton(string buttonName)
    //{
    //    return GUILayout.Button(buttonName, GUILayout.Height(Screen.height / 20), GUILayout.Width(Screen.width / 5));
    //}

    void ShowInfoLog(string info)
    {
        Debug.Log(info);
    }

    #endregion
}