// /***************************************************************************
// The Disc Image Chef
// ----------------------------------------------------------------------------
//
// Filename       : ATIP.cs
// Author(s)      : Natalia Portillo <claunia@claunia.com>
//
// Component      : Device structures decoders.
//
// --[ Description ] ----------------------------------------------------------
//
//     Decodes CD Absolute-Time-In-Pregroove
//
// --[ 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 System;
using DiscImageChef.Console;
using System.Text;

namespace DiscImageChef.Decoders.CD
{
    /// <summary>
    /// Information from the following standards:
    /// ANSI X3.304-1997
    /// T10/1048-D revision 9.0
    /// T10/1048-D revision 10a
    /// T10/1228-D revision 7.0c
    /// T10/1228-D revision 11a
    /// T10/1363-D revision 10g
    /// T10/1545-D revision 1d
    /// T10/1545-D revision 5
    /// T10/1545-D revision 5a
    /// T10/1675-D revision 2c
    /// T10/1675-D revision 4
    /// T10/1836-D revision 2g
    /// </summary>
    public static class ATIP
    {
        public struct CDATIP
        {
            /// <summary>
            /// Bytes 1 to 0
            /// Total size of returned session information minus this field
            /// </summary>
            public ushort DataLength;
            /// <summary>
            /// Byte 2
            /// Reserved
            /// </summary>
            public byte Reserved1;
            /// <summary>
            /// Byte 3
            /// Reserved
            /// </summary>
            public byte Reserved2;
            /// <summary>
            /// Byte 4, bits 7 to 4
            /// Indicative target writing power
            /// </summary>
            public byte ITWP;
            /// <summary>
            /// Byte 4, bit 3
            /// Set if DDCD
            /// </summary>
            public bool DDCD;
            /// <summary>
            /// Byte 4, bits 2 to 0
            /// Reference speed
            /// </summary>
            public byte ReferenceSpeed;
            /// <summary>
            /// Byte 5, bit 7
            /// Always unset
            /// </summary>
            public bool AlwaysZero;
            /// <summary>
            /// Byte 5, bit 6
            /// Unrestricted media
            /// </summary>
            public bool URU;
            /// <summary>
            /// Byte 5, bits 5 to 0
            /// Reserved
            /// </summary>
            public byte Reserved3;
            /// <summary>
            /// Byte 6, bit 7
            /// Always set
            /// </summary>
            public bool AlwaysOne;
            /// <summary>
            /// Byte 6, bit 6
            /// Set if rewritable (CD-RW or DDCD-RW)
            /// </summary>
            public bool DiscType;
            /// <summary>
            /// Byte 6, bits 5 to 3
            /// Disc subtype
            /// </summary>
            public byte DiscSubType;
            /// <summary>
            /// Byte 6, bit 2
            /// A1 values are valid
            /// </summary>
            public bool A1Valid;
            /// <summary>
            /// Byte 6, bit 1
            /// A2 values are valid
            /// </summary>
            public bool A2Valid;
            /// <summary>
            /// Byte 6, bit 0
            /// A3 values are valid
            /// </summary>
            public bool A3Valid;
            /// <summary>
            /// Byte 7
            /// Reserved
            /// </summary>
            public byte Reserved4;
            /// <summary>
            /// Byte 8
            /// ATIP Start time of Lead-In (Minute)
            /// </summary>
            public byte LeadInStartMin;
            /// <summary>
            /// Byte 9
            /// ATIP Start time of Lead-In (Second)
            /// </summary>
            public byte LeadInStartSec;
            /// <summary>
            /// Byte 10
            /// ATIP Start time of Lead-In (Frame)
            /// </summary>
            public byte LeadInStartFrame;
            /// <summary>
            /// Byte 11
            /// Reserved
            /// </summary>
            public byte Reserved5;
            /// <summary>
            /// Byte 12
            /// ATIP Last possible start time of Lead-Out (Minute)
            /// </summary>
            public byte LeadOutStartMin;
            /// <summary>
            /// Byte 13
            /// ATIP Last possible start time of Lead-Out (Second)
            /// </summary>
            public byte LeadOutStartSec;
            /// <summary>
            /// Byte 14
            /// ATIP Last possible start time of Lead-Out (Frame)
            /// </summary>
            public byte LeadOutStartFrame;
            /// <summary>
            /// Byte 15
            /// Reserved
            /// </summary>
            public byte Reserved6;
            /// <summary>
            /// Bytes 16 to 18
            /// A1 values
            /// </summary>
            public byte[] A1Values;
            /// <summary>
            /// Byte 19
            /// Reserved
            /// </summary>
            public byte Reserved7;
            /// <summary>
            /// Bytes 20 to 22
            /// A2 values
            /// </summary>
            public byte[] A2Values;
            /// <summary>
            /// Byte 23
            /// Reserved
            /// </summary>
            public byte Reserved8;
            /// <summary>
            /// Bytes 24 to 26
            /// A3 values
            /// </summary>
            public byte[] A3Values;
            /// <summary>
            /// Byte 27
            /// Reserved
            /// </summary>
            public byte Reserved9;
            /// <summary>
            /// Bytes 28 to 30
            /// S4 values
            /// </summary>
            public byte[] S4Values;
            /// <summary>
            /// Byte 31
            /// Reserved
            /// </summary>
            public byte Reserved10;
        }

        public static CDATIP? Decode(byte[] CDATIPResponse)
        {
            if(CDATIPResponse == null)
                return null;

            CDATIP decoded = new CDATIP();

            BigEndianBitConverter.IsLittleEndian = BitConverter.IsLittleEndian;

            if(CDATIPResponse.Length != 32 && CDATIPResponse.Length != 28)
            {
                DicConsole.DebugWriteLine("CD ATIP decoder", "Expected CD ATIP size (32 bytes) is not received size ({0} bytes), not decoding", CDATIPResponse.Length);
                return null;
            }

            decoded.DataLength = BigEndianBitConverter.ToUInt16(CDATIPResponse, 0);
            decoded.Reserved1 = CDATIPResponse[2];
            decoded.Reserved2 = CDATIPResponse[3];
            decoded.ITWP = (byte)((CDATIPResponse[4] & 0xF0) >> 4);
            decoded.DDCD = Convert.ToBoolean(CDATIPResponse[4] & 0x08);
            decoded.ReferenceSpeed = (byte)(CDATIPResponse[4] & 0x07);
            decoded.AlwaysZero = Convert.ToBoolean(CDATIPResponse[5] & 0x80);
            decoded.URU = Convert.ToBoolean(CDATIPResponse[5] & 0x40);
            decoded.Reserved3 = (byte)(CDATIPResponse[5] & 0x3F);

            decoded.AlwaysOne = Convert.ToBoolean(CDATIPResponse[6] & 0x80);
            decoded.DiscType = Convert.ToBoolean(CDATIPResponse[6] & 0x40);
            decoded.DiscSubType = (byte)((CDATIPResponse[6] & 0x38) >> 3);
            decoded.A1Valid = Convert.ToBoolean(CDATIPResponse[6] & 0x04);
            decoded.A2Valid = Convert.ToBoolean(CDATIPResponse[6] & 0x02);
            decoded.A3Valid = Convert.ToBoolean(CDATIPResponse[6] & 0x01);

            decoded.Reserved4 = CDATIPResponse[7];
            decoded.LeadInStartMin = CDATIPResponse[8];
            decoded.LeadInStartSec = CDATIPResponse[9];
            decoded.LeadInStartFrame = CDATIPResponse[10];
            decoded.Reserved5 = CDATIPResponse[11];
            decoded.LeadOutStartMin = CDATIPResponse[12];
            decoded.LeadOutStartSec = CDATIPResponse[13];
            decoded.LeadOutStartFrame = CDATIPResponse[14];
            decoded.Reserved6 = CDATIPResponse[15];

            decoded.A1Values = new byte[3];
            decoded.A2Values = new byte[3];
            decoded.A3Values = new byte[3];

            Array.Copy(CDATIPResponse, 16, decoded.A1Values, 0, 3);
            Array.Copy(CDATIPResponse, 20, decoded.A2Values, 0, 3);
            Array.Copy(CDATIPResponse, 24, decoded.A3Values, 0, 3);

            decoded.Reserved7 = CDATIPResponse[19];
            decoded.Reserved8 = CDATIPResponse[23];
            decoded.Reserved9 = CDATIPResponse[27];

            if(CDATIPResponse.Length >= 32)
            {
                decoded.S4Values = new byte[3];
                Array.Copy(CDATIPResponse, 28, decoded.S4Values, 0, 3);
                decoded.Reserved10 = CDATIPResponse[31];
            }

            return decoded;
        }

        public static string Prettify(CDATIP? CDATIPResponse)
        {
            if(CDATIPResponse == null)
                return null;

            CDATIP response = CDATIPResponse.Value;

            StringBuilder sb = new StringBuilder();

            if(response.DDCD)
            {
                sb.AppendFormat("Indicative Target Writing Power: 0x{0:X2}", response.ITWP).AppendLine();
                if(response.DiscType)
                    sb.AppendLine("Disc is DDCD-RW");
                else
                    sb.AppendLine("Disc is DDCD-R");
                switch(response.ReferenceSpeed)
                {
                    case 2:
                        sb.AppendLine("Reference speed is 4x");
                        break;
                    case 3:
                        sb.AppendLine("Reference speed is 8x");
                        break;
                    default:
                        sb.AppendFormat("Reference speed set is unknown: {0}", response.ReferenceSpeed).AppendLine();
                        break;
                }
                sb.AppendFormat("ATIP Start time of Lead-in: 0x{0:X6}", (response.LeadInStartMin << 16) + (response.LeadInStartSec << 8) + response.LeadInStartFrame).AppendLine();
                sb.AppendFormat("ATIP Last possible start time of Lead-out: 0x{0:X6}", (response.LeadOutStartMin << 16) + (response.LeadOutStartSec << 8) + response.LeadOutStartFrame).AppendLine();
                sb.AppendFormat("S4 value: 0x{0:X6}", (response.S4Values[0] << 16) + (response.S4Values[1] << 8) + response.S4Values[2]).AppendLine();
            }
            else
            {
                sb.AppendFormat("Indicative Target Writing Power: 0x{0:X2}", response.ITWP & 0x07).AppendLine();
                if(response.DiscType)
                {
                    switch(response.DiscSubType)
                    {
                        case 0:
                            sb.AppendLine("Disc is CD-RW");
                            break;
                        case 1:
                            sb.AppendLine("Disc is High-Speed CD-RW");
                            break;
                        case 2:
                            sb.AppendLine("Disc is Ultra-Speed CD-RW");
                            break;
                        case 3:
                            sb.AppendLine("Disc is Ultra-Speed+ CD-RW");
                            break;
                        case 4:
                            sb.AppendLine("Disc is medium type B, low beta category (B-) CD-RW");
                            break;
                        case 5:
                            sb.AppendLine("Disc is medium type B, high beta category (B+) CD-RW");
                            break;
                        case 6:
                            sb.AppendLine("Disc is medium type C, low beta category (C-) CD-RW");
                            break;
                        case 7:
                            sb.AppendLine("Disc is medium type C, high beta category (C+) CD-RW");
                            break;
                        default:
                            sb.AppendFormat("Unknown CD-RW disc subtype: {0}", response.DiscSubType).AppendLine();
                            break;
                    }
                    switch(response.ReferenceSpeed)
                    {
                        case 1:
                            sb.AppendLine("Reference speed is 2x");
                            break;
                        default:
                            sb.AppendFormat("Reference speed set is unknown: {0}", response.ReferenceSpeed).AppendLine();
                            break;
                    }
                }
                else
                {
                    sb.AppendLine("Disc is CD-R");
                    switch(response.DiscSubType)
                    {
                        case 0:
                            sb.AppendLine("Disc is normal speed (CLV) CD-R");
                            break;
                        case 1:
                            sb.AppendLine("Disc is high speed (CAV) CD-R");
                            break;
                        case 2:
                            sb.AppendLine("Disc is medium type A, low beta category (A-) CD-R");
                            break;
                        case 3:
                            sb.AppendLine("Disc is medium type A, high beta category (A+) CD-R");
                            break;
                        case 4:
                            sb.AppendLine("Disc is medium type B, low beta category (B-) CD-R");
                            break;
                        case 5:
                            sb.AppendLine("Disc is medium type B, high beta category (B+) CD-R");
                            break;
                        case 6:
                            sb.AppendLine("Disc is medium type C, low beta category (C-) CD-R");
                            break;
                        case 7:
                            sb.AppendLine("Disc is medium type C, high beta category (C+) CD-R");
                            break;
                        default:
                            sb.AppendFormat("Unknown CD-R disc subtype: {0}", response.DiscSubType).AppendLine();
                            break;
                    }
                }

                if(response.URU)
                    sb.AppendLine("Disc use is unrestricted");
                else
                    sb.AppendLine("Disc use is restricted");

                sb.AppendFormat("ATIP Start time of Lead-in: {0}:{1:D2}:{2:D2}", response.LeadInStartMin, response.LeadInStartSec, response.LeadInStartFrame).AppendLine();
                sb.AppendFormat("ATIP Last possible start time of Lead-out: {0}:{1:D2}:{2:D2}", response.LeadOutStartMin, response.LeadOutStartSec, response.LeadOutStartFrame).AppendLine();
                if(response.A1Valid)
                    sb.AppendFormat("A1 value: 0x{0:X6}", (response.A1Values[0] << 16) + (response.A1Values[1] << 8) + response.A1Values[2]).AppendLine();
                if(response.A2Valid)
                    sb.AppendFormat("A2 value: 0x{0:X6}", (response.A2Values[0] << 16) + (response.A2Values[1] << 8) + response.A2Values[2]).AppendLine();
                if(response.A3Valid)
                    sb.AppendFormat("A3 value: 0x{0:X6}", (response.A3Values[0] << 16) + (response.A3Values[1] << 8) + response.A3Values[2]).AppendLine();
                if(response.S4Values != null)
                    sb.AppendFormat("S4 value: 0x{0:X6}", (response.S4Values[0] << 16) + (response.S4Values[1] << 8) + response.S4Values[2]).AppendLine();
            }

            if(response.LeadInStartMin == 97)
            {
                int type = response.LeadInStartFrame % 10;
                int frm = response.LeadInStartFrame - type;
                string manufacturer = "";

                if(response.DiscType)
                    sb.AppendLine("Disc uses phase change");
                else
                {
                    if(type < 5)
                        sb.AppendLine("Disc uses long strategy type dye (Cyanine, AZO, etc...)");
                    else
                        sb.AppendLine("Disc uses short strategy type dye (Phthalocyanine, etc...)");
                }

                manufacturer = ManufacturerFromATIP(response.LeadInStartSec, frm);

                if(manufacturer != "")
                    sb.AppendFormat("Disc manufactured by: {0}", manufacturer).AppendLine();
            }

            return sb.ToString();
        }

        public static string Prettify(byte[] CDATIPResponse)
        {
            CDATIP? decoded = Decode(CDATIPResponse);
            return Prettify(decoded);
        }

        public static string ManufacturerFromATIP(byte sec, int frm)
        {
            switch(sec)
            {
                case 15:
                    if(frm == 00)
                        return "TDK Corporation";
                    if(frm == 10)
                        return "Ritek Co.";
                    if(frm == 20)
                        return "Mitsubishi Chemical Corporation";
                    if(frm == 30)
                        return "NAN-YA Plastics Corporation";
                    break;
                case 16:
                    if(frm == 20)
                        return "Shenzen SG&Gast Digital Optical Discs";
                    if(frm == 30)
                        return "Grand Advance Technology Ltd.";
                    break;
                case 17:
                    if(frm == 00)
                        return "Moser Baer India Limited";
                    break;
                case 18:
                    if(frm == 10)
                        return "Wealth Fair Investment Ltd.";
                    if(frm == 60)
                        return "Taroko International Co. Ltd.";
                    break;
                case 20:
                    if(frm == 10)
                        return "CDA Datenträger Albrechts GmbH";
                    break;
                case 21:
                    if(frm == 10)
                        return "Grupo Condor S.L.";
                    if(frm == 30)
                        return "Bestdisc Technology Corporation";
                    if(frm == 40)
                        return "Optical Disc Manufacturing Equipment";
                    if(frm == 50)
                        return "Sound Sound Multi-Media Development Ltd.";
                    break;
                case 22:
                    if(frm == 00)
                        return "Woongjin Media Corp.";
                    if(frm == 10)
                        return "Seantram Technology Inc.";
                    if(frm == 20)
                        return "Advanced Digital Media";
                    if(frm == 30)
                        return "EXIMPO";
                    if(frm == 40)
                        return "CIS Technology Inc.";
                    if(frm == 50)
                        return "Hong Kong Digital Technology Co., Ltd.";
                    if(frm == 60)
                        return "Acer Media Technology, Inc.";
                    break;
                case 23:
                    if(frm == 00)
                        return "Matsushita Electric Industrial Co., Ltd.";
                    if(frm == 10)
                        return "Doremi Media Co., Ltd.";
                    if(frm == 20)
                        return "Nacar Media s.r.l.";
                    if(frm == 30)
                        return "Audio Distributors Co., Ltd.";
                    if(frm == 40)
                        return "Victor Company of Japan, Ltd.";
                    if(frm == 50)
                        return "Optrom Inc.";
                    if(frm == 60)
                        return "Customer Pressing Oosterhout";
                    break;
                case 24:
                    if(frm == 00)
                        return "Taiyo Yuden Company Ltd.";
                    if(frm == 10)
                        return "SONY Corporation";
                    if(frm == 20)
                        return "Computer Support Italy s.r.l.";
                    if(frm == 30)
                        return "Unitech Japan Inc.";
                    if(frm == 40)
                        return "kdg mediatech AG";
                    if(frm == 50)
                        return "Guann Yinn Co., Ltd.";
                    if(frm == 60)
                        return "Harmonic Hall Optical Disc Ltd.";
                    break;
                case 25:
                    if(frm == 00)
                        return "MPO";
                    if(frm == 20)
                        return "Hitachi Maxell, Ltd.";
                    if(frm == 30)
                        return "Infodisc Technology Co. Ltd.";
                    if(frm == 40)
                        return "Vivastar AG";
                    if(frm == 50)
                        return "AMS Technology Inc.";
                    if(frm == 60)
                        return "Xcitec Inc.";
                    break;
                case 26:
                    if(frm == 00)
                        return "Fornet International Pte Ltd.";
                    if(frm == 10)
                        return "POSTECH Corporation";
                    if(frm == 20)
                        return "SKC Co., Ltd.";
                    if(frm == 30)
                        return "Optical Disc Corporation";
                    if(frm == 40)
                        return "FUJI Photo Film Co., Ltd.";
                    if(frm == 50)
                        return "Lead Data Inc.";
                    if(frm == 60)
                        return "CMC Magnetics Corporation";
                    break;
                case 27:
                    if(frm == 00)
                        return "Digital Storage Technology Co., Ltd.";
                    if(frm == 10)
                        return "Plasmon Data systems Ltd.";
                    if(frm == 20)
                        return "Princo Corporation";
                    if(frm == 30)
                        return "Pioneer Video Corporation";
                    if(frm == 40)
                        return "Kodak Japan Ltd.";
                    if(frm == 50)
                        return "Mitsui Chemicals, Inc.";
                    if(frm == 60)
                        return "Ricoh Company Ltd.";
                    break;
                case 28:
                    if(frm == 00)
                        return "Opti.Me.S. S.p.A.";
                    if(frm == 10)
                        return "Gigastore Corporation";
                    if(frm == 20)
                        return "Multi Media Masters & Machinary SA";
                    if(frm == 30)
                        return "Auvistar Industry Co., Ltd.";
                    if(frm == 40)
                        return "King Pro Mediatek Inc.";
                    if(frm == 50)
                        return "Delphi Technology Inc.";
                    if(frm == 60)
                        return "Friendly CD-Tek Co.";
                    break;
                case 29:
                    if(frm == 00)
                        return "Taeil Media Co., Ltd.";
                    if(frm == 10)
                        return "Vanguard Disc Inc.";
                    if(frm == 20)
                        return "Unidisc Technology Co., Ltd.";
                    if(frm == 30)
                        return "Hile Optical Disc Technology Corp.";
                    if(frm == 40)
                        return "Viva Magnetics Ltd.";
                    if(frm == 50)
                        return "General Magnetics Ltd.";
                    break;
                case 30:
                    if(frm == 10)
                        return "CDA Datenträger Albrechts GmbH";
                    break;
                case 31:
                    if(frm == 00)
                        return "Ritek Co.";
                    if(frm == 30)
                        return "Grand Advance Technology Ltd.";
                    break;
                case 32:
                    if(frm == 00)
                        return "TDK Corporation";
                    if(frm == 10)
                        return "Prodisc Technology Inc.";
                    break;
                case 34:
                    if(frm == 20)
                        return "Mitsubishi Chemical Corporation";
                    break;
                case 42:
                    if(frm == 20)
                        return "Advanced Digital Media";
                    break;
                case 45:
                    if(frm == 00)
                        return "Fornet International Pte Ltd.";
                    if(frm == 10)
                        return "Unitech Japan Inc.";
                    if(frm == 20)
                        return "Acer Media Technology, Inc.";
                    if(frm == 40)
                        return "CIS Technology Inc.";
                    if(frm == 50)
                        return "Guann Yinn Co., Ltd.";
                    if(frm == 60)
                        return "Xcitec Inc.";
                    break;
                case 46:
                    if(frm == 00)
                        return "Taiyo Yuden Company Ltd.";
                    if(frm == 10)
                        return "Hong Kong Digital Technology Co., Ltd.";
                    if(frm == 20)
                        return "Multi Media Masters & Machinary SA";
                    if(frm == 30)
                        return "Computer Support Italy s.r.l.";
                    if(frm == 40)
                        return "FUJI Photo Film Co., Ltd.";
                    if(frm == 50)
                        return "Auvistar Industry Co., Ltd.";
                    if(frm == 60)
                        return "CMC Magnetics Corporation";
                    break;
                case 47:
                    if(frm == 10)
                        return "Hitachi Maxell, Ltd.";
                    if(frm == 20)
                        return "Princo Corporation";
                    if(frm == 40)
                        return "POSTECH Corporation";
                    if(frm == 50)
                        return "Ritek Co.";
                    if(frm == 60)
                        return "Prodisc Technology Inc.";
                    break;
                case 48:
                    if(frm == 00)
                        return "Ricoh Company Ltd.";
                    if(frm == 10)
                        return "Kodak Japan Ltd.";
                    if(frm == 20)
                        return "Plasmon Data systems Ltd.";
                    if(frm == 30)
                        return "Pioneer Video Corporation";
                    if(frm == 40)
                        return "Digital Storage Technology Co., Ltd.";
                    if(frm == 50)
                        return "Mitsui Chemicals, Inc.";
                    if(frm == 60)
                        return "Lead Data Inc.";
                    break;
                case 49:
                    if(frm == 00)
                        return "TDK Corporation";
                    if(frm == 10)
                        return "Gigastore Corporation";
                    if(frm == 20)
                        return "King Pro Mediatek Inc.";
                    if(frm == 30)
                        return "Opti.Me.S. S.p.A.";
                    if(frm == 40)
                        return "Victor Company of Japan, Ltd.";
                    if(frm == 60)
                        return "Matsushita Electric Industrial Co., Ltd.";
                    break;
                case 50:
                    if(frm == 10)
                        return "Vanguard Disc Inc.";
                    if(frm == 20)
                        return "Mitsubishi Chemical Corporation";
                    if(frm == 30)
                        return "CDA Datenträger Albrechts GmbH";
                    break;
                case 51:
                    if(frm == 10)
                        return "Grand Advance Technology Ltd.";
                    if(frm == 20)
                        return "Infodisc Technology Co. Ltd.";
                    if(frm == 50)
                        return "Hile Optical Disc Technology Corp.";
                    break;
            }

            return "";
        }
    }
}

