/*
 * Created on Jan 28, 2005
 *
 * TODO To change the template for this generated file go to
 * Window - Preferences - Java - Code Style - Code Templates
 */
package org.unicode.cldr.test;

import java.io.File;
import java.io.IOException;
import java.io.PrintWriter;
import java.text.Collator;
import java.text.ParseException;
import java.util.Date;
import java.util.HashMap;
import java.util.Iterator;
import java.util.Locale;
import java.util.Map;
import java.util.Set;
import java.util.TreeMap;
import java.util.TreeSet;

import javax.xml.parsers.SAXParser;
import javax.xml.parsers.SAXParserFactory;

import org.unicode.cldr.draft.FileUtilities;
//import org.unicode.cldr.test.TestCLDRTests.Handler;
//import org.unicode.cldr.test.TestCLDRTests.MutableInteger;
import org.unicode.cldr.util.CLDRPaths;
import org.unicode.cldr.util.CldrUtility;
import org.unicode.cldr.util.Level;
import org.unicode.cldr.util.LocaleIDParser;
import org.unicode.cldr.util.Organization;
import org.unicode.cldr.util.StandardCodes;
import org.xml.sax.Attributes;
import org.xml.sax.SAXException;
import org.xml.sax.helpers.DefaultHandler;

import com.ibm.icu.dev.test.TestFmwk;
import com.ibm.icu.text.DateFormat;
import com.ibm.icu.text.NumberFormat;
import com.ibm.icu.text.SimpleDateFormat;
import com.ibm.icu.util.TimeZone;
import com.ibm.icu.util.ULocale;

/**
 * Test the tests themselves. Internal use.
 */
public class TestCLDRTests extends TestFmwk {
    static final boolean DEBUG = false;

    ULocale uLocale = ULocale.ENGLISH;
    Locale oLocale = Locale.ENGLISH; // TODO Drop once ICU4J has ULocale everywhere
    PrintWriter log;
    SAXParser SAX;
    TreeMap<String, MutableInteger> results = new TreeMap<String, MutableInteger>();

    public static void main(String[] args) throws Exception {
        double deltaTime = System.currentTimeMillis();
        TestCLDRTests me = new TestCLDRTests();
        me.run(args);
        me.closeLog();
        deltaTime = System.currentTimeMillis() - deltaTime;
        System.out.println("Seconds: " + deltaTime / 1000);
    }

    /**
     *
     */
    private void closeLog() {
        log.close();
    }

    TestCLDRTests() throws IOException {
        log = FileUtilities.openUTF8Writer(CLDRPaths.GEN_DIRECTORY, "collationTestLog.txt");
        log.write(0xFEFF);
    }

    Set<String> languagesToTest;

    public void TestAll() throws Exception {
        Map<Organization, Map<String, Level>> platform_locale_status = StandardCodes.make().getLocaleTypes();
        Map<String, Level> onlyLocales = platform_locale_status.get(Organization.ibm);
        Set<String> locales = onlyLocales.keySet();
        languagesToTest = (Set<String>) new CldrUtility.CollectionTransform() {
            LocaleIDParser lip = new LocaleIDParser();

            public Object transform(Object source) {
                return lip.set(source.toString()).getLanguageScript();
            }
        }.transform(locales, new TreeSet());
        languagesToTest.remove("th"); // JDK endless loop in collation

        File[] list = new File(CLDRPaths.TEST_DIR).listFiles();
        for (int i = 0; i < list.length; ++i) {
            String name = list[i].getName();
            if (!name.endsWith(".xml")) continue;
            doSingle(name.substring(0, name.length() - 4));
        }
        logln("Testing done");
        if (results.size() != 0) {
            errln("Cummulative errors: " + results);
        }
    }

    public void doSingle(String localeName) throws Exception {
        if (!languagesToTest.contains(localeName)) {
            logln("Skipping " + localeName);
            return;
        }
        logln("Testing " + localeName);
        uLocale = new ULocale(localeName);
        oLocale = uLocale.toLocale();

        File f = new File(CLDRPaths.TEST_DIR, localeName + ".xml");
        SAX.parse(f, DEFAULT_HANDLER);
    }

    // ============ SAX Handler Infrastructure ============

    abstract public class Handler {
        Map<String, String> settings = new TreeMap<String, String>();
        String name;
        String attributes;

        void setName(String name) {
            this.name = name;
        }

        void set(String attributeName, String attributeValue) {
            // if (DEBUG) System.out.println(attributeName + " \u2192 " + attributeValue);
            settings.put(attributeName, attributeValue);
        }

        void checkResult(String value) {
            try {
                handleResult(value);
            } catch (Exception e) {
                myerrln("Exception with result: <" + value + ">");
                e.printStackTrace();
            }
        }

        public void myerrln(String message) {
            String temp = uLocale + "\t" + message + "\t[" + name;
            for (Iterator<String> it = settings.keySet().iterator(); it.hasNext();) {
                String attributeName = it.next();
                String attributeValue = settings.get(attributeName);
                temp += " " + attributeName + "=<" + attributeValue + ">";
            }
            temp += "]";
            errln(temp);
            if (log != null) log.println(temp);
            MutableInteger foo = results.get(uLocale.getDisplayName());
            if (foo == null) results.put(uLocale.getDisplayName(), foo = new MutableInteger());
            foo.value++;
        }

        int lookupValue(Object x, Object[] list) {
            for (int i = 0; i < list.length; ++i) {
                if (x.equals(list[i])) return i;
            }
            myerrln("Unknown String: " + x);
            return -1;
        }

        abstract void handleResult(String value) throws Exception;
    }

    static class MutableInteger {
        int value;

        public String toString() {
            return String.valueOf(value);
        }
    }

    private static String show(Attributes attributes) {
        String result = "{";
        for (int i = 0; i < attributes.getLength(); ++i) {
            result += attributes.getQName(i) + "=\"" + attributes.getValue(i) + ";";
        }
        return result + "}";
    }

    public Handler getHandler(String name) {
        if (DEBUG) System.out.println("Creating Handler: " + name);
        Handler result = RegisteredHandlers.get(name);
        if (result == null) System.out.println("Unexpected test type: " + name);
        return result;
    }

    public void addHandler(String name, Handler handler) {
        handler.setName(name);
        RegisteredHandlers.put(name, handler);
    }

    Map<String, Handler> RegisteredHandlers = new HashMap<String, Handler>();

    // ============ Statics for Date/Number Support ============

    static TimeZone utc = TimeZone.getTimeZone("GMT");
    static DateFormat iso = new SimpleDateFormat("yyyy-MM-dd'T'HH:mm:ss'Z'");
    {
        iso.setTimeZone(utc);
    }
    static int[] DateFormatValues = { -1, DateFormat.SHORT, DateFormat.MEDIUM, DateFormat.LONG, DateFormat.FULL };
    static String[] DateFormatNames = { "none", "short", "medium", "long", "full" };

    static String[] NumberNames = { "standard", "integer", "decimal", "percent", "scientific" };

    // ============ Handler for Collation ============
    {
        addHandler("collation", new Handler() {
            public void handleResult(String value) {
                Collator col = Collator.getInstance(uLocale.toLocale());
                boolean showedAttributes = false;
                String lastLine = "";
                for (int pos = 0; pos < value.length();) {
                    int nextPos = value.indexOf('\n', pos);
                    if (nextPos < 0)
                        nextPos = value.length();
                    String line = value.substring(pos, nextPos).trim(); // HACK for SAX
                    if (line.length() != 0) { // HACK for SAX
                        int comp = col.compare(lastLine, line);
                        if (comp > 0) {
                            myerrln("<" + lastLine + "> should be leq <" + line + ">" +
                                (showedAttributes ? "" : " " + attributes));
                            showedAttributes = true;
                        } else if (DEBUG) {
                            logln("OK: " + line);
                            log.println("OK: " + line);
                        }
                    }
                    pos = nextPos + 1;
                    lastLine = line;
                }
            }
        });

        // ============ Handler for Numbers ============
        addHandler("number", new Handler() {
            public void handleResult(String result) {
                NumberFormat nf = null;
                double v = Double.NaN;
                for (Iterator<String> it = settings.keySet().iterator(); it.hasNext();) {
                    String attributeName = it.next();
                    String attributeValue = settings
                        .get(attributeName);
                    if (attributeName.equals("input")) {
                        v = Double.parseDouble(attributeValue);
                        continue;
                    }
                    // must be either numberType at this point
                    int index = lookupValue(attributeValue, NumberNames);
                    switch (index) {
                    case 0:
                        nf = NumberFormat.getInstance(oLocale);
                        break;
                    case 1:
                        nf = NumberFormat.getIntegerInstance(oLocale);
                        break;
                    case 2:
                        nf = NumberFormat.getNumberInstance(oLocale);
                        break;
                    case 3:
                        nf = NumberFormat.getPercentInstance(oLocale);
                        break;
                    case 4:
                        nf = NumberFormat.getScientificInstance(oLocale);
                        break;
                    }
                    String temp = nf.format(v).trim();
                    result = result.trim(); // HACK because of SAX
                    if (!temp.equals(result)) {
                        myerrln("Mismatched Number: CLDR: <" + result + ">, Host: <" + temp + ">");
                    }

                }
            }
        });

        // ============ Handler for Dates ============
        addHandler("date", new Handler() {
            public void handleResult(String result) throws ParseException {
                int dateFormat = DateFormat.DEFAULT;
                int timeFormat = DateFormat.DEFAULT;
                Date date = new Date();
                for (Iterator<String> it = settings.keySet().iterator(); it.hasNext();) {
                    String attributeName = it.next();
                    String attributeValue = settings
                        .get(attributeName);
                    if (attributeName.equals("input")) {
                        date = iso.parse(attributeValue);
                        continue;
                    }
                    // must be either dateType or timeType at this point
                    int index = lookupValue(attributeValue, DateFormatNames);
                    int value = DateFormatValues[index];
                    if (attributeName.equals("dateType"))
                        dateFormat = value;
                    else
                        timeFormat = value;

                }
                DateFormat dt = dateFormat == -1 ? DateFormat.getTimeInstance(timeFormat, oLocale)
                    : timeFormat == -1 ? DateFormat.getDateInstance(dateFormat, oLocale)
                        : DateFormat.getDateTimeInstance(dateFormat, timeFormat, oLocale);
                    dt.setTimeZone(utc);
                    String temp = dt.format(date).trim();
                    result = result.trim(); // HACK because of SAX
                    if (!temp.equals(result)) {
                        myerrln("Mismatched DateTime: CLDR: <" + result + ">, Host: <" + temp + ">");
                    }
            }
        });

    }

    // ============ Gorp for SAX ============

    {
        try {
            SAXParserFactory factory = SAXParserFactory.newInstance();
            factory.setValidating(true);
            SAX = factory.newSAXParser();
        } catch (Exception e) {
            throw new IllegalArgumentException("can't start");
        }
    }

    DefaultHandler DEFAULT_HANDLER = new DefaultHandler() {
        static final boolean DEBUG = false;
        StringBuffer lastChars = new StringBuffer();
        Handler handler;

        public void startElement(
            String uri,
            String localName,
            String qName,
            Attributes attributes)
                throws SAXException {
            // data.put(new ContextStack(contextStack), lastChars);
            // lastChars = "";
            try {
                if (qName.equals("cldrTest")) {
                    // skip
                } else if (qName.equals("result")) {
                    for (int i = 0; i < attributes.getLength(); ++i) {
                        handler.set(attributes.getQName(i), attributes.getValue(i));
                    }
                } else {
                    handler = getHandler(qName);
                    handler.attributes = show(attributes);
                    // handler.set("locale", uLocale.toString());
                }
                // if (DEBUG) System.out.println("startElement:\t" + contextStack);
            } catch (RuntimeException e) {
                e.printStackTrace();
                throw e;
            }
        }

        public void endElement(String uri, String localName, String qName)
            throws SAXException {
            try {
                // if (DEBUG) System.out.println("endElement:\t" + contextStack);
                if (qName.equals("result"))
                    handler.checkResult(lastChars.toString());
                else if (qName.length() != 0) {
                    // logln("Unexpected contents of: " + qName + ", <" + lastChars + ">");
                }
                lastChars.setLength(0);
            } catch (RuntimeException e) {
                e.printStackTrace();
                throw e;
            }
        }

        // Have to hack around the fact that the character data might be in pieces
        public void characters(char[] ch, int start, int length)
            throws SAXException {
            try {
                String value = new String(ch, start, length);
                if (DEBUG) System.out.println("characters:\t" + value);
                lastChars.append(value);
            } catch (RuntimeException e) {
                e.printStackTrace();
                throw e;
            }
        }

        // just for debugging

        public void notationDecl(String name, String publicId, String systemId)
            throws SAXException {
            System.out.println("notationDecl: " + name
                + ", " + publicId
                + ", " + systemId
                );
        }

        public void processingInstruction(String target, String data)
            throws SAXException {
            System.out.println("processingInstruction: " + target + ", " + data);
        }

        public void skippedEntity(String name)
            throws SAXException
        {
            System.out.println("skippedEntity: " + name
                );
        }

        public void unparsedEntityDecl(String name, String publicId,
            String systemId, String notationName)
                throws SAXException {
            System.out.println("unparsedEntityDecl: " + name
                + ", " + publicId
                + ", " + systemId
                + ", " + notationName
                );
        }

    };
}
