using System;
using System.Linq;
using System.Threading;
using Aaru.Decoders.CD;
using Aaru.Decoders.SCSI;
using Aaru.Devices;
using Aaru.Helpers;
using Aaru.Logging;

namespace Aaru.Tests.Devices;

static partial class ScsiMmc
{
    static void ReadLeadOutUsingTrapDisc(string devPath, Device dev)
    {
        bool               tocIsNotBcd = false;
        bool               sense;
        ReadOnlySpan<byte> senseBuffer;

    start:
        Console.Clear();

        AaruLogging.WriteLine(Localization.Ejecting_disc);

        dev.AllowMediumRemoval(out _, dev.Timeout, out _);
        dev.EjectTray(out _, dev.Timeout, out _);

        AaruLogging.WriteLine(Localization.Please_insert_a_data_only_disc_inside);
        AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
        Console.ReadLine();

        AaruLogging.WriteLine(Localization.Sending_READ_FULL_TOC_to_the_device);

        int retries = 0;

        do
        {
            retries++;
            sense = dev.ScsiTestUnitReady(out senseBuffer, dev.Timeout, out _);

            if(!sense) break;

            DecodedSense? decodedSense = Sense.Decode(senseBuffer);

            if(decodedSense.Value.ASC != 0x04) break;

            if(decodedSense.Value.ASCQ != 0x01) break;

            Thread.Sleep(2000);
        } while(retries < 25);

        sense = dev.ReadRawToc(out byte[] buffer, out senseBuffer, 1, dev.Timeout, out _);

        if(sense)
        {
            AaruLogging.WriteLine(Localization.READ_FULL_TOC_failed);
            AaruLogging.WriteLine("{0}", Sense.PrettifySense(senseBuffer.ToArray()));
            AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
            Console.ReadLine();

            return;
        }

        FullTOC.CDFullTOC? decodedToc = FullTOC.Decode(buffer);

        if(decodedToc is null)
        {
            AaruLogging.WriteLine(Localization.Could_not_decode_TOC);
            AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
            Console.ReadLine();

            return;
        }

        FullTOC.CDFullTOC toc = decodedToc.Value;

        FullTOC.TrackDataDescriptor leadOutTrack = toc.TrackDescriptors.FirstOrDefault(t => t.POINT == 0xA2);

        if(leadOutTrack.POINT != 0xA2)
        {
            AaruLogging.WriteLine(Localization.Cannot_find_lead_out);
            AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
            Console.ReadLine();

            return;
        }

        int min   = (leadOutTrack.PMIN   >> 4) * 10 + (leadOutTrack.PMIN   & 0x0F);
        int sec   = (leadOutTrack.PSEC   >> 4) * 10 + (leadOutTrack.PSEC   & 0x0F);
        int frame = (leadOutTrack.PFRAME >> 4) * 10 + (leadOutTrack.PFRAME & 0x0F);

        int sectors = min * 60 * 75 + sec * 75 + frame - 150;

        AaruLogging.WriteLine(Localization.Data_disc_shows_0_sectors, sectors);

        AaruLogging.WriteLine(Localization.Ejecting_disc);

        dev.AllowMediumRemoval(out _, dev.Timeout, out _);
        dev.EjectTray(out _, dev.Timeout, out _);

        AaruLogging.WriteLine(Localization.Please_insert_trap_disc_inside);
        AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
        Console.ReadLine();

        AaruLogging.WriteLine(Localization.Sending_READ_FULL_TOC_to_the_device);

        retries = 0;

        do
        {
            retries++;
            sense = dev.ScsiTestUnitReady(out senseBuffer, dev.Timeout, out _);

            if(!sense) break;

            DecodedSense? decodedSense = Sense.Decode(senseBuffer);

            if(decodedSense.Value.ASC != 0x04) break;

            if(decodedSense.Value.ASCQ != 0x01) break;

            Thread.Sleep(2000);
        } while(retries < 25);

        sense = dev.ReadRawToc(out buffer, out senseBuffer, 1, dev.Timeout, out _);

        if(sense)
        {
            AaruLogging.WriteLine(Localization.READ_FULL_TOC_failed);
            AaruLogging.WriteLine("{0}", Sense.PrettifySense(senseBuffer.ToArray()));
            AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
            Console.ReadLine();

            return;
        }

        decodedToc = FullTOC.Decode(buffer);

        if(decodedToc is null)
        {
            AaruLogging.WriteLine(Localization.Could_not_decode_TOC);
            AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
            Console.ReadLine();

            return;
        }

        toc = decodedToc.Value;

        leadOutTrack = toc.TrackDescriptors.FirstOrDefault(t => t.POINT == 0xA2);

        if(leadOutTrack.POINT != 0xA2)
        {
            AaruLogging.WriteLine(Localization.Cannot_find_lead_out);
            AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
            Console.ReadLine();

            return;
        }

        min = 0;

        switch(leadOutTrack.PMIN)
        {
            case 122:
                tocIsNotBcd = true;

                break;
            case >= 0xA0 when !tocIsNotBcd:
                min               += 90;
                leadOutTrack.PMIN -= 0x90;

                break;
        }

        if(tocIsNotBcd)
        {
            min   = leadOutTrack.PMIN;
            sec   = leadOutTrack.PSEC;
            frame = leadOutTrack.PFRAME;
        }
        else
        {
            min   += (leadOutTrack.PMIN   >> 4) * 10 + (leadOutTrack.PMIN   & 0x0F);
            sec   =  (leadOutTrack.PSEC   >> 4) * 10 + (leadOutTrack.PSEC   & 0x0F);
            frame =  (leadOutTrack.PFRAME >> 4) * 10 + (leadOutTrack.PFRAME & 0x0F);
        }

        int trapSectors = min * 60 * 75 + sec * 75 + frame - 150;

        AaruLogging.WriteLine(Localization.Trap_disc_shows_0_sectors, trapSectors);

        if(trapSectors < sectors + 100)
        {
            AaruLogging.WriteLine(Localization.Trap_disc_doesnt_have_enough_sectors);
            AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
            Console.ReadLine();

            return;
        }

        AaruLogging.WriteLine(Localization.Stopping_motor);

        dev.StopUnit(out _, dev.Timeout, out _);

        AaruLogging.WriteLine(Localization.Please_MANUALLY_get_the_trap_disc_out_and_put_the_data_disc_back_inside);
        AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
        Console.ReadLine();

        AaruLogging.WriteLine(Localization.Waiting_5_seconds);
        Thread.Sleep(5000);

        AaruLogging.WriteLine(Localization.Sending_READ_FULL_TOC_to_the_device);

        retries = 0;

        do
        {
            retries++;
            sense = dev.ReadRawToc(out buffer, out senseBuffer, 1, dev.Timeout, out _);

            if(!sense) break;

            DecodedSense? decodedSense = Sense.Decode(senseBuffer);

            if(decodedSense.Value.ASC != 0x04) break;

            if(decodedSense.Value.ASCQ != 0x01) break;
        } while(retries < 25);

        if(sense)
        {
            AaruLogging.WriteLine(Localization.READ_FULL_TOC_failed);
            AaruLogging.WriteLine("{0}", Sense.PrettifySense(senseBuffer.ToArray()));
            AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
            Console.ReadLine();

            return;
        }

        decodedToc = FullTOC.Decode(buffer);

        if(decodedToc is null)
        {
            AaruLogging.WriteLine(Localization.Could_not_decode_TOC);
            AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
            Console.ReadLine();

            return;
        }

        toc = decodedToc.Value;

        FullTOC.TrackDataDescriptor newLeadOutTrack = toc.TrackDescriptors.FirstOrDefault(t => t.POINT == 0xA2);

        if(newLeadOutTrack.POINT != 0xA2)
        {
            AaruLogging.WriteLine(Localization.Cannot_find_lead_out);
            AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
            Console.ReadLine();

            return;
        }

        if(newLeadOutTrack.PMIN >= 0xA0 && !tocIsNotBcd) newLeadOutTrack.PMIN -= 0x90;

        if(newLeadOutTrack.PMIN   != leadOutTrack.PMIN ||
           newLeadOutTrack.PSEC   != leadOutTrack.PSEC ||
           newLeadOutTrack.PFRAME != leadOutTrack.PFRAME)
        {
            AaruLogging.WriteLine(Localization.Lead_out_has_changed_this_drive_does_not_support_hot_swapping_discs);
            AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
            Console.ReadLine();

            return;
        }

        AaruLogging.Write(Localization.Reading_LBA_0, sectors + 5);

        bool dataResult = dev.ReadCd(out byte[] dataBuffer,
                                     out ReadOnlySpan<byte> dataSense,
                                     (uint)(sectors + 5),
                                     2352,
                                     1,
                                     MmcSectorTypes.AllTypes,
                                     false,
                                     false,
                                     true,
                                     MmcHeaderCodes.AllHeaders,
                                     true,
                                     true,
                                     MmcErrorField.None,
                                     MmcSubchannel.None,
                                     dev.Timeout,
                                     out _);

        AaruLogging.WriteLine(dataResult ? Localization.FAIL : Localization.Success);

        AaruLogging.Write(Localization.Reading_LBA_0_as_audio_scrambled, sectors + 5);

        bool scrambledResult = dev.ReadCd(out byte[] scrambledBuffer,
                                          out ReadOnlySpan<byte> scrambledSense,
                                          (uint)(sectors + 5),
                                          2352,
                                          1,
                                          MmcSectorTypes.Cdda,
                                          false,
                                          false,
                                          false,
                                          MmcHeaderCodes.None,
                                          true,
                                          false,
                                          MmcErrorField.None,
                                          MmcSubchannel.None,
                                          dev.Timeout,
                                          out _);

        AaruLogging.WriteLine(scrambledResult ? Localization.FAIL : Localization.Success);

        AaruLogging.Write(Localization.Reading_LBA_0_PQ_subchannel, sectors + 5);

        bool pqResult = dev.ReadCd(out byte[] pqBuffer,
                                   out ReadOnlySpan<byte> pqSense,
                                   (uint)(sectors + 5),
                                   16,
                                   1,
                                   MmcSectorTypes.AllTypes,
                                   false,
                                   false,
                                   false,
                                   MmcHeaderCodes.None,
                                   false,
                                   false,
                                   MmcErrorField.None,
                                   MmcSubchannel.Q16,
                                   dev.Timeout,
                                   out _);

        if(pqResult)
        {
            pqResult = dev.ReadCd(out pqBuffer,
                                  out pqSense,
                                  (uint)(sectors + 5),
                                  16,
                                  1,
                                  MmcSectorTypes.AllTypes,
                                  false,
                                  false,
                                  false,
                                  MmcHeaderCodes.None,
                                  false,
                                  false,
                                  MmcErrorField.None,
                                  MmcSubchannel.Q16,
                                  dev.Timeout,
                                  out _);
        }

        AaruLogging.WriteLine(pqResult ? Localization.FAIL : Localization.Success);

        AaruLogging.Write(Localization.Reading_LBA_0_RW_subchannel, sectors + 5);

        bool rwResult = dev.ReadCd(out byte[] rwBuffer,
                                   out ReadOnlySpan<byte> rwSense,
                                   (uint)(sectors + 5),
                                   16,
                                   1,
                                   MmcSectorTypes.AllTypes,
                                   false,
                                   false,
                                   false,
                                   MmcHeaderCodes.None,
                                   false,
                                   false,
                                   MmcErrorField.None,
                                   MmcSubchannel.Rw,
                                   dev.Timeout,
                                   out _);

        if(rwResult)
        {
            rwResult = dev.ReadCd(out rwBuffer,
                                  out rwSense,
                                  (uint)(sectors + 5),
                                  16,
                                  1,
                                  MmcSectorTypes.Cdda,
                                  false,
                                  false,
                                  false,
                                  MmcHeaderCodes.None,
                                  false,
                                  false,
                                  MmcErrorField.None,
                                  MmcSubchannel.Rw,
                                  dev.Timeout,
                                  out _);
        }

        AaruLogging.WriteLine(pqResult ? Localization.FAIL : Localization.Success);

    menu:
        Console.Clear();
        AaruLogging.WriteLine(Localization.Device_0, devPath);

        AaruLogging.WriteLine(dataResult && scrambledResult
                                  ? Localization.Device_cannot_read_Lead_Out
                                  : Localization.Device_can_read_Lead_Out);

        AaruLogging.WriteLine(Localization.LBA_0_sense_is_1_buffer_is_2_sense_buffer_is_3,
                              sectors + 5,
                              dataResult,
                              dataBuffer is null
                                  ? Localization._null
                                  : ArrayHelpers.ArrayIsNullOrEmpty(dataBuffer)
                                      ? Localization.empty
                                      : string.Format(Localization._0_bytes, dataBuffer.Length),
                              dataSense.IsEmpty ? Localization.empty : $"{dataSense.Length}");

        AaruLogging.WriteLine(Localization.LBA_0_scrambled_sense_is_1_buffer_is_2_sense_buffer_is_3,
                              sectors + 5,
                              scrambledResult,
                              scrambledBuffer is null
                                  ? Localization._null
                                  : ArrayHelpers.ArrayIsNullOrEmpty(scrambledBuffer)
                                      ? Localization.empty
                                      : string.Format(Localization._0_bytes, scrambledBuffer.Length),
                              scrambledSense.IsEmpty ? Localization.empty : $"{scrambledSense.Length}");

        AaruLogging.WriteLine(Localization.LBA_0_PQ_sense_is_1_buffer_is_2_sense_buffer_is_3,
                              sectors + 5,
                              pqResult,
                              pqBuffer is null
                                  ? Localization._null
                                  : ArrayHelpers.ArrayIsNullOrEmpty(pqBuffer)
                                      ? Localization.empty
                                      : string.Format(Localization._0_bytes, pqBuffer.Length),
                              pqSense.IsEmpty ? Localization.empty : $"{pqSense.Length}");

        AaruLogging.WriteLine(Localization.LBA_0_RW_sense_is_1_buffer_is_2_sense_buffer_is_3,
                              sectors + 5,
                              rwResult,
                              rwBuffer is null
                                  ? Localization._null
                                  : ArrayHelpers.ArrayIsNullOrEmpty(rwBuffer)
                                      ? Localization.empty
                                      : string.Format(Localization._0_bytes, rwBuffer.Length),
                              rwSense.IsEmpty ? Localization.empty : $"{rwSense.Length}");

        AaruLogging.WriteLine();
        AaruLogging.WriteLine(Localization.Choose_what_to_do);
        AaruLogging.WriteLine(Localization._1_Print_LBA_0_buffer,                  sectors + 5);
        AaruLogging.WriteLine(Localization._2_Print_LBA_0_sense_buffer,            sectors + 5);
        AaruLogging.WriteLine(Localization._3_Decode_LBA_0_sense_buffer,           sectors + 5);
        AaruLogging.WriteLine(Localization._4_Print_LBA_0_scrambled_buffer,        sectors + 5);
        AaruLogging.WriteLine(Localization._5_Print_LBA_0_scrambled_sense_buffer,  sectors + 5);
        AaruLogging.WriteLine(Localization._6_Decode_LBA_0_scrambled_sense_buffer, sectors + 5);
        AaruLogging.WriteLine(Localization._7_Print_LBA_0_PQ_buffer,               sectors + 5);
        AaruLogging.WriteLine(Localization._8_Print_LBA_0_PQ_sense_buffer,         sectors + 5);
        AaruLogging.WriteLine(Localization._9_Decode_LBA_0_PQ_sense_buffer,        sectors + 5);
        AaruLogging.WriteLine(Localization._10_Print_LBA_0_RW_buffer,              sectors + 5);
        AaruLogging.WriteLine(Localization._11_Print_LBA_0_RW_sense_buffer,        sectors + 5);
        AaruLogging.WriteLine(Localization._12_Decode_LBA_0_RW_sense_buffer,       sectors + 5);
        AaruLogging.WriteLine(Localization._13_Send_command_again);
        AaruLogging.WriteLine(Localization.Return_to_special_SCSI_MultiMedia_Commands_menu);
        AaruLogging.Write(Localization.Choose);

        string strDev = Console.ReadLine();

        if(!int.TryParse(strDev, out int item))
        {
            AaruLogging.WriteLine(Localization.Not_a_number_Press_any_key_to_continue);
            Console.ReadKey();
            Console.Clear();

            goto menu;
        }

        switch(item)
        {
            case 0:
                AaruLogging.WriteLine(Localization.Returning_to_special_SCSI_MultiMedia_Commands_menu);

                return;
            case 1:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,       devPath);
                AaruLogging.WriteLine(Localization.LBA_0_response, sectors + 5);

                if(buffer != null) PrintHex.PrintHexArray(dataBuffer, 64);

                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 2:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,    devPath);
                AaruLogging.WriteLine(Localization.LBA_0_sense, sectors + 5);

                if(senseBuffer != null) PrintHex.PrintHexArray(dataSense.ToArray(), 64);

                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 3:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,            devPath);
                AaruLogging.WriteLine(Localization.LBA_0_decoded_sense, sectors + 5);
                AaruLogging.Write("{0}", Sense.PrettifySense(dataSense.ToArray()));
                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 4:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,                 devPath);
                AaruLogging.WriteLine(Localization.LBA_0_scrambled_response, sectors + 5);

                if(buffer != null) PrintHex.PrintHexArray(scrambledBuffer, 64);

                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 5:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,              devPath);
                AaruLogging.WriteLine(Localization.LBA_0_scrambled_sense, sectors + 5);

                if(senseBuffer != null) PrintHex.PrintHexArray(scrambledSense.ToArray(), 64);

                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 6:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,                      devPath);
                AaruLogging.WriteLine(Localization.LBA_0_scrambled_decoded_sense, sectors + 5);
                AaruLogging.Write("{0}", Sense.PrettifySense(scrambledSense.ToArray()));
                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 7:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,          devPath);
                AaruLogging.WriteLine(Localization.LBA_PQ_0_response, sectors + 5);

                if(buffer != null) PrintHex.PrintHexArray(pqBuffer, 64);

                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 8:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,       devPath);
                AaruLogging.WriteLine(Localization.LBA_PQ_0_sense, sectors + 5);

                if(senseBuffer != null) PrintHex.PrintHexArray(pqSense.ToArray(), 64);

                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 9:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,             devPath);
                AaruLogging.WriteLine(Localization.LBA_PQ_decoded_sense, sectors + 5);
                AaruLogging.Write("{0}", Sense.PrettifySense(pqSense.ToArray()));
                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 10:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,          devPath);
                AaruLogging.WriteLine(Localization.LBA_RW_0_response, sectors + 5);

                if(buffer != null) PrintHex.PrintHexArray(rwBuffer, 64);

                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 11:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,       devPath);
                AaruLogging.WriteLine(Localization.LBA_RW_0_sense, sectors + 5);

                if(senseBuffer != null) PrintHex.PrintHexArray(rwSense.ToArray(), 64);

                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 12:
                Console.Clear();
                AaruLogging.WriteLine(Localization.Device_0,               devPath);
                AaruLogging.WriteLine(Localization.LBA_RW_0_decoded_sense, sectors + 5);
                AaruLogging.Write("{0}", Sense.PrettifySense(rwSense.ToArray()));
                AaruLogging.WriteLine(Localization.Press_any_key_to_continue);
                Console.ReadKey();

                goto menu;
            case 13:
                goto start;
            default:
                AaruLogging.WriteLine(Localization.Incorrect_option_Press_any_key_to_continue);
                Console.ReadKey();
                Console.Clear();

                goto menu;
        }
    }
}