// /***************************************************************************
// The Disc Image Chef
// ----------------------------------------------------------------------------
//
// Filename       : BlockTape.cs
// Version        : 1.0
// Author(s)      : Natalia Portillo
//
// Component      : Component
//
// Revision       : $Revision$
// Last change by : $Author$
// Date           : $Date$
//
// --[ Description ] ----------------------------------------------------------
//
// Description
//
// --[ License ] --------------------------------------------------------------
//
//     This program is free software: you can redistribute it and/or modify
//     it under the terms of the GNU General Public License as
//     published by the Free Software Foundation, either version 3 of the
//     License, or (at your option) any later version.
//
//     This program 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 General Public License for more details.
//
//     You should have received a copy of the GNU General Public License
//     along with this program.  If not, see <http://www.gnu.org/licenses/>.
//
// ----------------------------------------------------------------------------
// Copyright (C) 2011-2015 Claunia.com
// ****************************************************************************/
// //$Id$

using System.Collections.Generic;
using Schemas;
using System.IO;

namespace DiscImageChef.Core
{
    public static partial class Sidecar
    {
        public static CICMMetadataType Create(string folderName, List<string> files, int blockSize)
        {
            CICMMetadataType sidecar = new CICMMetadataType
            {
                BlockMedia = new[]
	            {
	                new BlockMediaType
	                {
	                    Image = new ImageType
	                    {
	                        format = "Directory",
	                        offsetSpecified = false,
	                        Value = folderName
	                    },
	                    Sequence = new SequenceType
	                    {
	                        MediaTitle = folderName,
	                        MediaSequence = 1,
	                        TotalMedia = 1
	                    },
	                    PhysicalBlockSize = (int)blockSize,
	                    LogicalBlockSize = (int)blockSize,
	                    TapeInformation = new []
	                    {
	                        new TapePartitionType
	                        {
	                            Image = new ImageType
	                            {
	                                format = "Directory",
	                                offsetSpecified = false,
	                                Value = folderName
	                            }
	                        }
	                    }
	                }
                }
            };

            long currentBlock = 0;
            long totalSize = 0;
            Checksum tapeWorker = new Checksum();
            List<TapeFileType> tapeFiles = new List<TapeFileType>();

            for(int i = 0; i < files.Count; i++)
            {
                FileStream fs = new FileStream(files[i], FileMode.Open, FileAccess.Read);
                Checksum fileWorker = new Checksum();
                TapeFileType tapeFile = new TapeFileType
                {
                    Image = new ImageType
                    {
                        format = "Raw disk image (sector by sector copy)",
                        offset = 0,
                        Value = Path.GetFileName(files[i])
                    },
                    Size = fs.Length,
                    BlockSize = blockSize,
                    StartBlock = currentBlock,
                    Sequence = i
                };

                uint sectorsToRead = 512;
                long sectors = fs.Length / blockSize;
                long doneSectors = 0;

                InitProgress2();
                while(doneSectors < sectors)
                {
                    byte[] sector;

                    if((sectors - doneSectors) >= sectorsToRead)
                    {
                        sector = new byte[sectorsToRead * blockSize];
                        fs.Read(sector, 0, sector.Length);
                        UpdateProgress2(string.Format("Hashing block {0} of {1} on file {2} of {3}", doneSectors, sectors, i + 1, files.Count), doneSectors, sectors);
                        doneSectors += sectorsToRead;
                    }
                    else
                    {
                        sector = new byte[(uint)(sectors - doneSectors) * blockSize];
                        fs.Read(sector, 0, sector.Length);
                        UpdateProgress2(string.Format("Hashing block {0} of {1} on file {2} of {3}", doneSectors, sectors, i + 1, files.Count), doneSectors, sectors);
                        doneSectors += (sectors - doneSectors);
                    }

                    fileWorker.Update(sector);
                    tapeWorker.Update(sector);
                }

                tapeFile.EndBlock = (tapeFile.StartBlock + sectors) - 1;
                currentBlock += sectors;
                totalSize += fs.Length;
                tapeFile.Checksums = fileWorker.End().ToArray();
                tapeFiles.Add(tapeFile);

                EndProgress2();
            }

            sidecar.BlockMedia[0].Checksums = tapeWorker.End().ToArray();
            sidecar.BlockMedia[0].ContentChecksums = sidecar.BlockMedia[0].Checksums;
            sidecar.BlockMedia[0].Size = totalSize;
            sidecar.BlockMedia[0].LogicalBlocks = currentBlock;
            sidecar.BlockMedia[0].TapeInformation[0].EndBlock = currentBlock - 1;
            sidecar.BlockMedia[0].TapeInformation[0].Size = totalSize;
            sidecar.BlockMedia[0].TapeInformation[0].Checksums = sidecar.BlockMedia[0].Checksums;
            sidecar.BlockMedia[0].TapeInformation[0].File = tapeFiles.ToArray();

            // This is purely for convenience, as typically these kind of data represents QIC tapes
            if(blockSize == 512)
            {
                sidecar.BlockMedia[0].DiskType = "Quarter-inch cartridge";

                if(totalSize <= 20 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-11";
                else if(totalSize <= 40 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-40";
                else if(totalSize <= 60 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-24";
                else if(totalSize <= 80 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-80";
                else if(totalSize <= 120 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-120";
                else if(totalSize <= 150 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-150";
                else if(totalSize <= 320 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-320";
                else if(totalSize <= 340 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-3010";
                else if(totalSize <= 525 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-525";
                else if(totalSize <= 670 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-3020";
                else if(totalSize <= 1200 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-3080";
                else if(totalSize <= 1350 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-1350";
                else if(totalSize <= (long)4000 * 1048576)
                    sidecar.BlockMedia[0].DiskSubType = "QIC-3095";
                else
                {
                    sidecar.BlockMedia[0].DiskType = "Unknown tape";
                    sidecar.BlockMedia[0].DiskSubType = "Unknown tape";
                }
            }
            else
            {
                sidecar.BlockMedia[0].DiskType = "Unknown tape";
                sidecar.BlockMedia[0].DiskSubType = "Unknown tape";
            }

            return sidecar;
        }
    }
}