//
// Copyright (C) 2009 the Open Toolkit (http://www.opentk.com)
//
// Permission is hereby granted, free of charge, to any person obtaining
// a copy of this software and associated documentation files (the
// "Software"), to deal in the Software without restriction, including
// without limitation the rights to use, copy, modify, merge, publish,
// distribute, sublicense, and/or sell copies of the Software, and to
// permit persons to whom the Software is furnished to do so, subject to
// the following conditions:
// 
// The above copyright notice and this permission notice shall be
// included in all copies or substantial portions of the Software.
// 
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
//

using System;
using System.Collections.Generic;
using System.Diagnostics;
using System.IO;
using System.Linq;
using System.Xml;
using System.Xml.Linq;
using Mono.Options;

namespace CHeaderToXML
{
    class EnumTokenComparer : IEqualityComparer<XNode>
    {
        public bool Equals (XNode a, XNode b)
        {
            return ((XElement) a).Attribute("name").Equals(((XElement) b).Attribute("name"));
        }

        public int GetHashCode (XNode a)
        {
            return ((XElement) a).Attribute("name").GetHashCode();
        }
    }

    class EntryPoint
    {
        static void Main(string[] args)
        {
            try
            {
                bool showHelp = false;
                string prefix = "gl";
                string version = null;
                OptionSet opts = new OptionSet {
                { "p=", "The {PREFIX} to remove from parsed functions and constants.  " +
                    "Defaults to \"" + prefix + "\".",
                    v => prefix = v },
                { "v=", "The {VERSION} of the headers being parsed.",
                    v => version = v },
                { "?|h|help", "Show this message and exit.",
                    v => showHelp = v != null },
            };
                var headers = opts.Parse(args);
                var app = Path.GetFileName(Environment.GetCommandLineArgs()[0]);
                if (showHelp)
                {
                    Console.WriteLine("usage: {0} -p:PREFIX -v:VERSION HEADERS", app);
                    Console.WriteLine();
                    Console.WriteLine("Options:");
                    opts.WriteOptionDescriptions(Console.Out);
                    Console.WriteLine();
                    Console.WriteLine("HEADERS are the header files to parse into XML.");
                    return;
                }
                if (version == null)
                {
                    Console.WriteLine("{0}: missing required parameter -p.", app);
                    Console.WriteLine("Use '{0} --help' for usage.", app);
                    return;
                }
                var sigs = headers.Select(h => new ESCLParser
                {
                    Prefix = prefix,
                    Version = version
                }.Parse(h));

                // Merge any duplicate enum entries (in case an enum is declared
                // in multiple files with different entries in each file).
                var entries = new Dictionary<string, XElement>();
                foreach (var e in sigs.SelectMany(s => s).Where(s => s.Name.LocalName == "enum"))
                {
                    var name = (string)e.Attribute("name");
                    if (entries.ContainsKey(name) && e.Name.LocalName == "enum")
                    {
                        var p = entries[name];
                        var curTokens = p.Nodes().ToList();
                        p.RemoveNodes();
                        p.Add(curTokens.Concat(e.Nodes()).Distinct(new EnumTokenComparer()));
                    }
                    else
                        entries.Add(name, e);
                }

                // sort enum tokens
                foreach (var e in entries)
                {
                    if (e.Value.Name.LocalName != "enum")
                        continue;
                    var tokens = e.Value.Elements()
                        .OrderBy(t => (string)t.Attribute("name"))
                        .ToList();
                    e.Value.RemoveNodes();
                    e.Value.Add(tokens);
                }

                var settings = new XmlWriterSettings();
                settings.Indent = true;

                using (var writer = XmlWriter.Create(Console.Out, settings))
                {
                    new XElement("signatures",
                        entries.Values.OrderBy(s => s.Attribute("name").Value),  // only enums
                        sigs.SelectMany(s => s).Where(s => s.Name.LocalName == "function").OrderBy(s => s.Attribute("name").Value)   // only functions
                    ).WriteTo(writer);
                    writer.Flush();
                    writer.Close();
                }
            }
            finally
            {
                Console.WriteLine();
                if (Debugger.IsAttached)
                {
                    Console.WriteLine("Press any key to continue...");
                    Console.ReadKey(true);
                }
            }
        }
    }
}