// /***************************************************************************
// The Disc Image Chef
// ----------------------------------------------------------------------------
//
// Filename       : Ata48.cs
// Author(s)      : Natalia Portillo <claunia@claunia.com>
//
// Component      : ATA commands.
//
// --[ Description ] ----------------------------------------------------------
//
//     Contains 48-bit LBA ATA commands.
//
// --[ License ] --------------------------------------------------------------
//
//     This library is free software; you can redistribute it and/or modify
//     it under the terms of the GNU Lesser General Public License as
//     published by the Free Software Foundation; either version 2.1 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
//     Lesser General Public License for more details.
//
//     You should have received a copy of the GNU Lesser General Public
//     License along with this library; if not, see <http://www.gnu.org/licenses/>.
//
// ----------------------------------------------------------------------------
// Copyright © 2011-2017 Natalia Portillo
// ****************************************************************************/

using DiscImageChef.Console;
using DiscImageChef.Decoders.ATA;

namespace DiscImageChef.Devices
{
    public partial class Device
    {
        public bool GetNativeMaxAddressExt(out ulong lba, out AtaErrorRegistersLBA48 statusRegisters, uint timeout, out double duration)
        {
            lba = 0;
            AtaRegistersLBA48 registers = new AtaRegistersLBA48();
            bool sense;
            byte[] buffer = new byte[0];

            registers.command = (byte)AtaCommands.NativeMaxAddress;
            registers.feature = 0x0000;

            lastError = SendAtaCommand(registers, out statusRegisters, AtaProtocol.NonData, AtaTransferRegister.NoTransfer,
                                       ref buffer, timeout, false, out duration, out sense);
            error = lastError != 0;

            if((statusRegisters.status & 0x23) == 0)
            {
                lba = statusRegisters.lbaHigh;
                lba *= 0x100000000;
                lba += (ulong)(statusRegisters.lbaMid << 16);
                lba += statusRegisters.lbaLow;
            }

            DicConsole.DebugWriteLine("ATA Device", "GET NATIVE MAX ADDRESS EXT took {0} ms.", duration);

            return sense;
        }

        public bool ReadDma(out byte[] buffer, out AtaErrorRegistersLBA48 statusRegisters, ulong lba, ushort count, uint timeout, out double duration)
        {
            if(count == 0)
                buffer = new byte[512 * 65536];
            else
                buffer = new byte[512 * count];
            AtaRegistersLBA48 registers = new AtaRegistersLBA48();
            bool sense;

            registers.command = (byte)AtaCommands.ReadDmaExt;
            registers.sectorCount = count;
            registers.lbaHigh = (ushort)((lba & 0xFFFF00000000) / 0x100000000);
            registers.lbaMid = (ushort)((lba & 0xFFFF0000) / 0x10000);
            registers.lbaLow = (ushort)((lba & 0xFFFF) / 0x1);
            registers.deviceHead += 0x40;

            lastError = SendAtaCommand(registers, out statusRegisters, AtaProtocol.Dma, AtaTransferRegister.SectorCount,
                                       ref buffer, timeout, true, out duration, out sense);
            error = lastError != 0;

            DicConsole.DebugWriteLine("ATA Device", "READ DMA EXT took {0} ms.", duration);

            return sense;
        }

        public bool ReadLog(out byte[] buffer, out AtaErrorRegistersLBA48 statusRegisters, byte logAddress, ushort pageNumber, ushort count, uint timeout, out double duration)
        {
            buffer = new byte[512 * count];
            AtaRegistersLBA48 registers = new AtaRegistersLBA48();
            bool sense;

            registers.command = (byte)AtaCommands.ReadLogExt;
            registers.sectorCount = count;
            registers.lbaLow = (ushort)((pageNumber & 0xFF) * 0x100);
            registers.lbaLow += logAddress;
            registers.lbaHigh = (ushort)((pageNumber & 0xFF00) / 0x100);

            lastError = SendAtaCommand(registers, out statusRegisters, AtaProtocol.PioIn, AtaTransferRegister.SectorCount,
                                       ref buffer, timeout, true, out duration, out sense);
            error = lastError != 0;

            DicConsole.DebugWriteLine("ATA Device", "READ LOG EXT took {0} ms.", duration);

            return sense;
        }

        public bool ReadLogDma(out byte[] buffer, out AtaErrorRegistersLBA48 statusRegisters, byte logAddress, ushort pageNumber, ushort count, uint timeout, out double duration)
        {
            buffer = new byte[512 * count];
            AtaRegistersLBA48 registers = new AtaRegistersLBA48();
            bool sense;

            registers.command = (byte)AtaCommands.ReadLogDmaExt;
            registers.sectorCount = count;
            registers.lbaLow = (ushort)((pageNumber & 0xFF) * 0x100);
            registers.lbaLow += logAddress;
            registers.lbaHigh = (ushort)((pageNumber & 0xFF00) / 0x100);

            lastError = SendAtaCommand(registers, out statusRegisters, AtaProtocol.Dma, AtaTransferRegister.SectorCount,
                                       ref buffer, timeout, true, out duration, out sense);
            error = lastError != 0;

            DicConsole.DebugWriteLine("ATA Device", "READ LOG DMA EXT took {0} ms.", duration);

            return sense;
        }

        public bool ReadMultiple(out byte[] buffer, out AtaErrorRegistersLBA48 statusRegisters, ulong lba, ushort count, uint timeout, out double duration)
        {
            if(count == 0)
                buffer = new byte[512 * 65536];
            else
                buffer = new byte[512 * count];
            AtaRegistersLBA48 registers = new AtaRegistersLBA48();
            bool sense;

            registers.command = (byte)AtaCommands.ReadMultipleExt;
            registers.sectorCount = count;
            registers.lbaHigh = (ushort)((lba & 0xFFFF00000000) / 0x100000000);
            registers.lbaMid = (ushort)((lba & 0xFFFF0000) / 0x10000);
            registers.lbaLow = (ushort)((lba & 0xFFFF) / 0x1);
            registers.deviceHead += 0x40;

            lastError = SendAtaCommand(registers, out statusRegisters, AtaProtocol.PioIn, AtaTransferRegister.SectorCount,
                                       ref buffer, timeout, true, out duration, out sense);
            error = lastError != 0;

            DicConsole.DebugWriteLine("ATA Device", "READ MULTIPLE EXT took {0} ms.", duration);

            return sense;
        }

        public bool ReadNativeMaxAddress(out ulong lba, out AtaErrorRegistersLBA48 statusRegisters, uint timeout, out double duration)
        {
            lba = 0;
            byte[] buffer = new byte[0];
            AtaRegistersLBA48 registers = new AtaRegistersLBA48();
            bool sense;

            registers.command = (byte)AtaCommands.ReadNativeMaxAddressExt;
            registers.deviceHead += 0x40;

            lastError = SendAtaCommand(registers, out statusRegisters, AtaProtocol.NonData, AtaTransferRegister.NoTransfer,
                                       ref buffer, timeout, false, out duration, out sense);
            error = lastError != 0;

            if((statusRegisters.status & 0x23) == 0)
            {
                lba = statusRegisters.lbaHigh;
                lba *= 0x100000000;
                lba += (ulong)(statusRegisters.lbaMid << 16);
                lba += statusRegisters.lbaLow;
            }

            DicConsole.DebugWriteLine("ATA Device", "READ NATIVE MAX ADDRESS EXT took {0} ms.", duration);

            return sense;
        }

        public bool Read(out byte[] buffer, out AtaErrorRegistersLBA48 statusRegisters, ulong lba, ushort count, uint timeout, out double duration)
        {
            if(count == 0)
                buffer = new byte[512 * 65536];
            else
                buffer = new byte[512 * count];
            AtaRegistersLBA48 registers = new AtaRegistersLBA48();
            bool sense;

            registers.command = (byte)AtaCommands.ReadExt;
            registers.sectorCount = count;
            registers.lbaHigh = (ushort)((lba & 0xFFFF00000000) / 0x100000000);
            registers.lbaMid = (ushort)((lba & 0xFFFF0000) / 0x10000);
            registers.lbaLow = (ushort)((lba & 0xFFFF) / 0x1);
            registers.deviceHead += 0x40;

            lastError = SendAtaCommand(registers, out statusRegisters, AtaProtocol.PioIn, AtaTransferRegister.SectorCount,
                                       ref buffer, timeout, true, out duration, out sense);
            error = lastError != 0;

            DicConsole.DebugWriteLine("ATA Device", "READ SECTORS EXT took {0} ms.", duration);

            return sense;
        }
    }
}