/*
 * Copyright (c) 2007, 2018, Oracle and/or its affiliates. All rights reserved.
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
 *
 * This code is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License version 2 only, as
 * published by the Free Software Foundation.
 *
 * This code 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
 * version 2 for more details (a copy is included in the LICENSE file that
 * accompanied this code).
 *
 * You should have received a copy of the GNU General Public License version
 * 2 along with this work; if not, write to the Free Software Foundation,
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
 *
 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
 * or visit www.oracle.com if you need additional information or have any
 * questions.
 */

import java.io.*;
import java.text.*;
import java.util.*;
import java.util.regex.*;
import java.util.stream.Collectors;

public class PropertiesTest {
    public static void main(String[] args) throws Exception {
        if (args.length == 2 && args[0].equals("-d")) {
            dump(args[1]);
        } else if (args.length == 4 && args[0].equals("-c")) {
            compare(args[1], args[2], args[3]);
        } else if (args.length == 1 && args[0].equals("bug7102969")) {
            bug7102969();
        } else if (args.length == 1 && args[0].equals("bug8157138")) {
            bug8157138();
        } else if (args.length == 1 && args[0].equals("bug8190904")) {
            bug8190904();
        } else {
            System.err.println("Usage:  java PropertiesTest -d <dumpfile>");
            System.err.println("        java PropertiesTest -c <beforedump> <afterdump> <propsfile>");
            System.err.println("        java PropertiesTest bug[JBS bug id number] e.g. bug7102969");
            System.exit(-1);
        }
    }

    private static void dump(String outfile) {
        File f = new File(outfile);
        PrintWriter pw;
        try {
            f.createNewFile();
            pw = new PrintWriter(f);
        } catch (Exception fnfe) {
            throw new RuntimeException(fnfe);
        }
        for (char c1 = 'A'; c1 <= 'Z'; c1++) {
            for (char c2 = 'A'; c2 <= 'Z'; c2++) {
                String ctry = new StringBuilder().append(c1).append(c2).toString();
                try {
                    Currency c = Currency.getInstance(new Locale("", ctry));
                    if (c != null) {
                        pw.printf(Locale.ROOT, "%s=%s,%03d,%1d\n",
                            ctry,
                            c.getCurrencyCode(),
                            c.getNumericCode(),
                            c.getDefaultFractionDigits());
                    }
                } catch (IllegalArgumentException iae) {
                    // invalid country code
                    continue;
                }
            }
        }
        pw.flush();
        pw.close();
    }

    private static void compare(String beforeFile, String afterFile, String propsFile)
        throws IOException
    {
        // load file contents
        Properties before = new Properties();
        try (Reader reader = new FileReader(beforeFile)) {
            before.load(reader);
        }
        Properties after = new Properties();
        try (Reader reader = new FileReader(afterFile)) {
            after.load(reader);
        }

        // remove the same contents from the 'after' properties
        Set<String> keys = before.stringPropertyNames();
        for (String key: keys) {
            String beforeVal = before.getProperty(key);
            String afterVal = after.getProperty(key);
            System.out.printf("Removing country: %s. before: %s, after: %s", key, beforeVal, afterVal);
            if (beforeVal.equals(afterVal)) {
                after.remove(key);
                System.out.printf(" --- removed\n");
            } else {
                System.out.printf(" --- NOT removed\n");
            }
        }

        // now look at the currency.properties
        Properties p = new Properties();
        try (Reader reader = new FileReader(propsFile)) {
            p.load(reader);
        }

        // test each replacements
        keys = p.stringPropertyNames();
        Pattern propertiesPattern =
            Pattern.compile("([A-Z]{3})\\s*,\\s*(\\d{3})\\s*,\\s*" +
                "(\\d+)\\s*,?\\s*(\\d{4}-\\d{2}-\\d{2}T\\d{2}:" +
                "\\d{2}:\\d{2})?");
        for (String key: keys) {
            String val = p.getProperty(key);
            try {
                if (val.chars().map(c -> c == ',' ? 1 : 0).sum() >= 3
                        && !isPastCutoverDate(val)) {
                    System.out.println("Skipping " + key + " since date is in future");
                    continue; // skip since date in future (no effect)
                }
            } catch (ParseException pe) {
                // swallow - currency class should not honour this value
                continue;
            }
            String afterVal = after.getProperty(key);
            System.out.printf("Testing key: %s, val: %s... ", key, val);
            System.out.println("AfterVal is : " + afterVal);

            if (afterVal == null) {
                System.out.println("Testing key " + key + " is ignored"
                        + " because of the inconsistent numeric code and/or"
                        + " dfd for the given currency code: "+val);
                continue;
            }

            Matcher m = propertiesPattern.matcher(val.toUpperCase(Locale.ROOT));
            if (!m.find()) {
                // format is not recognized.
                System.out.printf("Format is not recognized.\n");
                if (afterVal != null) {
                    throw new RuntimeException("Currency data replacement for "+key+" failed: It was incorrectly altered to "+afterVal);
                }

                // ignore this
                continue;
            }

            String code = m.group(1);
            int numeric = Integer.parseInt(m.group(2));
            int fraction = Integer.parseInt(m.group(3));
            if (fraction > 9) {
                System.out.println("Skipping since the fraction is greater than 9");
                continue;
            }

            Matcher mAfter = propertiesPattern.matcher(afterVal);
            mAfter.find();

            String codeAfter = mAfter.group(1);
            int numericAfter = Integer.parseInt(mAfter.group(2));
            int fractionAfter = Integer.parseInt(mAfter.group(3));
            if (code.equals(codeAfter) &&
                (numeric == numericAfter)&&
                (fraction == fractionAfter)) {
                after.remove(key);
            } else {
                throw new RuntimeException("Currency data replacement for "+key+" failed: actual: (alphacode: "+codeAfter+", numcode: "+numericAfter+", fraction: "+fractionAfter+"), expected:  (alphacode: "+code+", numcode: "+numeric+", fraction: "+fraction+")");
            }
            System.out.printf("Success!\n");
        }
        if (!after.isEmpty()) {

            keys = after.stringPropertyNames();
            for (String key : keys) {
                String modified = after.getProperty(key);
                if(!p.containsValue(modified)) {
                    throw new RuntimeException("Unnecessary modification was"
                            + " made to county: "+ key + " with currency value:"
                                    + " " + modified);
                } else {
                    System.out.println(key + " modified by an entry in"
                            + " currency.properties with currency value "
                            + modified);
                }
            }
        }
    }

    private static void bug7102969() {
        // check the correct overriding of special case entries
        Currency cur = Currency.getInstance(new Locale("", "JP"));
        if (!cur.getCurrencyCode().equals("ABC")) {
            throw new RuntimeException("[Expected: ABC as currency code of JP, found: "
                    + cur.getCurrencyCode() + "]");
        }

        /* check if the currency instance is returned by
         * getAvailableCurrencies() method
         */
        if (!Currency.getAvailableCurrencies().contains(cur)) {
            throw new RuntimeException("[The Currency instance ["
                    + cur.getCurrencyCode() + ", "
                    + cur.getNumericCode() + ", "
                    + cur.getDefaultFractionDigits()
                    + "] is not available in the currencies list]");
        }

    }

    private static void bug8157138() {

        /* check the currencies which exist only as a special case are
         * accessible i.e. it should not throw IllegalArgumentException
         */
        try {
            Currency.getInstance("MAD");
        } catch (IllegalArgumentException ex) {
            throw new RuntimeException("Test Failed: "
                    + "special case currency instance MAD not found"
                    + " via Currency.getInstance(\"MAD\")");
        }

        try {
            Currency.getInstance("ABC");
        } catch (IllegalArgumentException ex) {
            throw new RuntimeException("Test Failed: "
                    + "special case currency instance ABC not found"
                    + " via Currency.getInstance(\"ABC\")");
        }

        /* check the currency value is returned by getAvailableCurrencies()
         * method
        */
        List<Currency> list = Currency.getAvailableCurrencies().stream()
                .filter(cur -> cur.getCurrencyCode().equals("MAD"))
                .collect(Collectors.toList());

        if (list.isEmpty()) {
            throw new RuntimeException("Test Failed: "
                    + "special case currency instance MAD not found"
                    + " in Currency.getAvailableCurrencies() list");
        }

        list = Currency.getAvailableCurrencies().stream()
                .filter(cur -> cur.getCurrencyCode().equals("ABC"))
                .collect(Collectors.toList());

        if (list.isEmpty()) {
            throw new RuntimeException("Test Failed: "
                    + "special case currency instance ABC not found"
                    + " in Currency.getAvailableCurrencies() list");
        }

    }

    private static void bug8190904() {
        // should throw IllegalArgumentException as currency code
        // does not exist as valid ISO 4217 code and failed to load
        // from currency.properties file because of inconsistent numeric/dfd
        try {
            Currency.getInstance("MCC");
            throw new RuntimeException("[FAILED: Should throw"
                    + " IllegalArgumentException for invalid currency code]");
        } catch (IllegalArgumentException ex) {
            // expected to throw IllegalArgumentException
        }

        // should keep the XOF instance as XOF,952,0, as the XOF entries in
        // currency.properties IT=XOF,952,1, XY=XOF,955,0 are ignored because
        // of inconsistency in numeric code and/or dfd
        checkCurrencyInstance("XOF", 952, 0);
        // property entry "AS=USD,841,2" should change all occurences
        // of USD with USD,841,2
        checkCurrencyInstance("USD", 841, 2);
    }

    /**
     * Test the numeric code and fraction of the Currency instance obtained
     * by given currencyCode, with the expected numericCode and fraction
     */
    private static void checkCurrencyInstance(String currencyCode,
            int numericCode, int fraction) {
        Currency cur = Currency.getInstance(currencyCode);
        if (cur.getNumericCode() != numericCode
                || cur.getDefaultFractionDigits() != fraction) {
            throw new RuntimeException("[FAILED: Incorrect numeric code or"
                    + " dfd for currency code: " + currencyCode + "]");
        }
    }

    private static boolean isPastCutoverDate(String s)
            throws IndexOutOfBoundsException, NullPointerException, ParseException {
        String dateString = s.substring(s.lastIndexOf(',')+1, s.length()).trim();
        SimpleDateFormat format = new SimpleDateFormat("yyyy-MM-dd'T'HH:mm:ss", Locale.ROOT);
        format.setTimeZone(TimeZone.getTimeZone("GMT"));
        format.setLenient(false);

        long time = format.parse(dateString).getTime();
        if (System.currentTimeMillis() - time >= 0L) {
            return true;
        } else {
            return false;
        }
    }

}