/* Date: 27.7.2015, Time: 19:54 */
using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Text;

namespace walotcsres
{
    class Program
    {
        public static void Main(string[] args)
        {
            string file = "warcr100.rsc";
            var stream = File.Open(file, FileMode.Open);
            using(BinaryReader reader = new BinaryReader(stream, Encoding.ASCII))
            {
                string sig = new string(reader.ReadChars(4));
                stream.Position = 0x10; //Start of the main "subfile"

                var first = new Subfile(reader, true); //Covers the whole file
                var enc = Encoding.GetEncoding(1252);
                for(int i = 0; i < first.RecordData.Length; i++)
                {
                    var data = first.RecordData[i];
                    File.WriteAllBytes("outx/"+i, data);
                }
            }
            Console.ReadKey(true);
        }
    }

    class Subfile
    {
        public long SubfileStart{get; private set;} //Absolute starting offset
        public int Tags{get; private set;} //Number of "tags"
        public int Start{get; private set;} //Relative data offset (to SubfileStart)
        public int Records{get; private set;} //Number of records
        public byte[][] RecordData{get; private set;} //Record data
        public RecordInfo[] RecordInfos{get; private set;}
        public Dictionary<string, int> TagData{get; private set;} //Tags
        public long SubfileEnd{get; private set;} //Absolute end offset (computed as maximum record end offset)

        public Subfile(BinaryReader reader, bool first)
        {
            var stream = reader.BaseStream;
            SubfileStart = stream.Position;
            Tags = reader.ReadInt32();
            Start = reader.ReadInt32();
            if(first)
            {
                Start -= 0x10;
            }
            stream.Position += 0x08;

            TagData = new Dictionary<string, int>();
            for(int i = 0; i < Tags; i++)
            {
                TagData[new string(reader.ReadChars(4))] = reader.ReadInt32();
            }

            Records = (Start - 0x10 - Tags * 8)/20;
            RecordInfos = new RecordInfo[Records];
            for(int i = 0; i < Records; i++)
            {
                RecordInfos[i] = new RecordInfo(reader);
            }
            RecordData = new byte[Records][];
            for(int i = 0; i < Records; i++)
            {
                int start = RecordInfos[i].Start;
                int length = RecordInfos[i].Length;
                byte[] data = new byte[length];
                if(length > 0)
                {
                    stream.Position = SubfileStart+start;
                    stream.Read(data, 0, length);
                }
                RecordData[i] = data;
            }
            SubfileEnd = SubfileStart+RecordInfos.Max(i => i.Start+i.Length);
        }

        public struct RecordInfo
        {
            public int Start{get; private set;}
            public int Length{get; private set;}
            public byte[] Unknown{get; private set;}

            public RecordInfo(BinaryReader reader) : this()
            {
                Start = reader.ReadInt32();
                Length = reader.ReadInt32();
                Unknown = reader.ReadBytes(20-8);
                if(Unknown[6] == 3)
                {
                    Start -= 0x10;
                }
            }
        }
    }
}