/*

 * Copyright (c) 2010, 2013, 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.  Oracle designates this

 * particular file as subject to the "Classpath" exception as provided

 * by Oracle in the LICENSE file that accompanied this code.

 *

 * 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.

 */

package jdk.nashorn.internal.objects;

import static java.lang.Double.NaN;

import static java.lang.Double.isInfinite;

import static java.lang.Double.isNaN;

import static jdk.nashorn.internal.runtime.ECMAErrors.rangeError;

import static jdk.nashorn.internal.runtime.ECMAErrors.typeError;

import java.util.Locale;

import java.util.TimeZone;

import java.util.concurrent.Callable;

import jdk.nashorn.internal.objects.annotations.Attribute;

import jdk.nashorn.internal.objects.annotations.Constructor;

import jdk.nashorn.internal.objects.annotations.Function;

import jdk.nashorn.internal.objects.annotations.ScriptClass;

import jdk.nashorn.internal.objects.annotations.SpecializedFunction;

import jdk.nashorn.internal.objects.annotations.Where;

import jdk.nashorn.internal.parser.DateParser;

import jdk.nashorn.internal.runtime.JSType;

import jdk.nashorn.internal.runtime.PropertyMap;

import jdk.nashorn.internal.runtime.ScriptEnvironment;

import jdk.nashorn.internal.runtime.ScriptObject;

import jdk.nashorn.internal.runtime.ScriptRuntime;

import jdk.nashorn.internal.runtime.linker.Bootstrap;

import jdk.nashorn.internal.runtime.linker.InvokeByName;

/**

 * ECMA 15.9 Date Objects

 *

 */

@ScriptClass("Date")

public final class NativeDate extends ScriptObject {

    private static final String INVALID_DATE = "Invalid Date";

    private static final int YEAR        = 0;

    private static final int MONTH       = 1;

    private static final int DAY         = 2;

    private static final int HOUR        = 3;

    private static final int MINUTE      = 4;

    private static final int SECOND      = 5;

    private static final int MILLISECOND = 6;

    private static final int FORMAT_DATE_TIME       = 0;

    private static final int FORMAT_DATE            = 1;

    private static final int FORMAT_TIME            = 2;

    private static final int FORMAT_LOCAL_DATE_TIME = 3;

    private static final int FORMAT_LOCAL_DATE      = 4;

    private static final int FORMAT_LOCAL_TIME      = 5;

    // Constants defined in ECMA 15.9.1.10

    private static final int    hoursPerDay      = 24;

    private static final int    minutesPerHour   = 60;

    private static final int    secondsPerMinute = 60;

    private static final int    msPerSecond   = 1_000;

    private static final int    msPerMinute  = 60_000;

    private static final double msPerHour = 3_600_000;

    private static final double msPerDay = 86_400_000;

    private static int[][] firstDayInMonth = {

            {0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334}, // normal year

            {0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335}  // leap year

    };

    private static String[] weekDays = {

            "Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"

    };

    private static String[] months = {

            "Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"

    };

    private static final Object TO_ISO_STRING = new Object();

    private static InvokeByName getTO_ISO_STRING() {

        return Global.instance().getInvokeByName(TO_ISO_STRING,

                new Callable<InvokeByName>() {

                    @Override

                    public InvokeByName call() {

                        return new InvokeByName("toISOString", ScriptObject.class, Object.class, Object.class);

                    }

                });

    }

    private double time;

    private final TimeZone timezone;

    // initialized by nasgen

    private static PropertyMap $nasgenmap$;

    private NativeDate(final double time, final ScriptObject proto, final PropertyMap map) {

        super(proto, map);

        final ScriptEnvironment env = Global.getEnv();

        this.time = time;

        this.timezone = env._timezone;

    }

    NativeDate(final double time, final Global global) {

        this(time, global.getDatePrototype(), $nasgenmap$);

    }

    private NativeDate (final double time) {

        this(time, Global.instance());

    }

    private NativeDate() {

        this(System.currentTimeMillis());

    }

    @Override

    public String getClassName() {

        return "Date";

    }

    // ECMA 8.12.8 [[DefaultValue]] (hint)

    @Override

    public Object getDefaultValue(final Class<?> hint) {

        // When the [[DefaultValue]] internal method of O is called with no hint,

        // then it behaves as if the hint were Number, unless O is a Date object

        // in which case it behaves as if the hint were String.

        return super.getDefaultValue(hint == null ? String.class : hint);

    }

    /**

     * Constructor - ECMA 15.9.3.1 new Date

     *

     * @param isNew is this Date constructed with the new operator

     * @param self  self references

     * @return Date representing now

     */

    @SpecializedFunction(isConstructor=true)

    public static Object construct(final boolean isNew, final Object self) {

        final NativeDate result = new NativeDate();

        return isNew ? result : toStringImpl(result, FORMAT_DATE_TIME);

    }

    /**

     * Constructor - ECMA 15.9.3.1 new Date (year, month [, date [, hours [, minutes [, seconds [, ms ] ] ] ] ] )

     *

     * @param isNew is this Date constructed with the new operator

     * @param self  self reference

     * @param args  arguments

     * @return new Date

     */

    @Constructor(arity = 7)

    public static Object construct(final boolean isNew, final Object self, final Object... args) {

        if (! isNew) {

            return toStringImpl(new NativeDate(), FORMAT_DATE_TIME);

        }

        NativeDate result;

        switch (args.length) {

        case 0:

            result = new NativeDate();

            break;

        case 1:

            double num;

            final Object arg = JSType.toPrimitive(args[0]);

                num = parseDateString(arg.toString());

            } else {

                num = timeClip(JSType.toNumber(args[0]));

            }

            result = new NativeDate(num);

            break;

        default:

            result = new NativeDate(0);

            final double[] d = convertCtorArgs(args);

            if (d == null) {

                result.setTime(Double.NaN);

            } else {

                final double time = timeClip(utc(makeDate(d), result.getTimeZone()));

                result.setTime(time);

            }

            break;

         }

         return result;

    }

    @Override

    public String safeToString() {

        final String str = isValidDate() ? toISOStringImpl(this) : INVALID_DATE;

        return "[Date " + str + "]";

    }

    @Override

    public String toString() {

        return isValidDate() ? toString(this).toString() : INVALID_DATE;

    }

    /**

     * ECMA 15.9.4.2 Date.parse (string)

     *

     * @param self self reference

     * @param string string to parse as date

     * @return Date interpreted from the string, or NaN for illegal values

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE, where = Where.CONSTRUCTOR)

    public static double parse(final Object self, final Object string) {

        return parseDateString(JSType.toString(string));

    }

    /**

     * ECMA 15.9.4.3 Date.UTC (year, month [, date [, hours [, minutes [, seconds [, ms ] ] ] ] ] )

     *

     * @param self self reference

     * @param args mandatory args are year, month. Optional are date, hours, minutes, seconds and milliseconds

     * @return a time clip according to the ECMA specification

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE, arity = 7, where = Where.CONSTRUCTOR)

    public static double UTC(final Object self, final Object... args) {

        final NativeDate nd = new NativeDate(0);

        final double[] d = convertCtorArgs(args);

        final double time = d == null ? Double.NaN : timeClip(makeDate(d));

        nd.setTime(time);

        return time;

    }

    /**

     * ECMA 15.9.4.4 Date.now ( )

     *

     * @param self self reference

     * @return a Date that points to the current moment in time

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE, where = Where.CONSTRUCTOR)

    public static long now(final Object self) {

        return System.currentTimeMillis();

    }

    /**

     * ECMA 15.9.5.2 Date.prototype.toString ( )

     *

     * @param self self reference

     * @return string value that represents the Date in the current time zone

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static String toString(final Object self) {

        return toStringImpl(self, FORMAT_DATE_TIME);

    }

    /**

     * ECMA 15.9.5.3 Date.prototype.toDateString ( )

     *

     * @param self self reference

     * @return string value with the "date" part of the Date in the current time zone

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static String toDateString(final Object self) {

        return toStringImpl(self, FORMAT_DATE);

    }

    /**

     * ECMA 15.9.5.4 Date.prototype.toTimeString ( )

     *

     * @param self self reference

     * @return string value with "time" part of Date in the current time zone

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static String toTimeString(final Object self) {

        return toStringImpl(self, FORMAT_TIME);

    }

    /**

     * ECMA 15.9.5.5 Date.prototype.toLocaleString ( )

     *

     * @param self self reference

     * @return string value that represents the Data in the current time zone and locale

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static String toLocaleString(final Object self) {

        return toStringImpl(self, FORMAT_LOCAL_DATE_TIME);

    }

    /**

     * ECMA 15.9.5.6 Date.prototype.toLocaleDateString ( )

     *

     * @param self self reference

     * @return string value with the "date" part of the Date in the current time zone and locale

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static String toLocaleDateString(final Object self) {

        return toStringImpl(self, FORMAT_LOCAL_DATE);

    }

    /**

     * ECMA 15.9.5.7 Date.prototype.toLocaleTimeString ( )

     *

     * @param self self reference

     * @return string value with the "time" part of Date in the current time zone and locale

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static String toLocaleTimeString(final Object self) {

        return toStringImpl(self, FORMAT_LOCAL_TIME);

    }

    /**

     * ECMA 15.9.5.8 Date.prototype.valueOf ( )

     *

     * @param self self reference

     * @return valueOf - a number which is this time value

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double valueOf(final Object self) {

        final NativeDate nd = getNativeDate(self);

        return (nd != null) ? nd.getTime() : Double.NaN;

    }

    /**

     * ECMA 15.9.5.9 Date.prototype.getTime ( )

     *

     * @param self self reference

     * @return time

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getTime(final Object self) {

        final NativeDate nd = getNativeDate(self);

        return (nd != null) ? nd.getTime() : Double.NaN;

    }

    /**

     * ECMA 15.9.5.10 Date.prototype.getFullYear ( )

     *

     * @param self self reference

     * @return full year

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static Object getFullYear(final Object self) {

        return getField(self, YEAR);

    }

    /**

     * ECMA 15.9.5.11 Date.prototype.getUTCFullYear( )

     *

     * @param self self reference

     * @return UTC full year

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getUTCFullYear(final Object self) {

        return getUTCField(self, YEAR);

    }

    /**

     * B.2.4 Date.prototype.getYear ( )

     *

     * @param self self reference

     * @return year

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getYear(final Object self) {

        final NativeDate nd = getNativeDate(self);

        return (nd != null && nd.isValidDate()) ? (yearFromTime(nd.getLocalTime()) - 1900) : Double.NaN;

    }

    /**

     * ECMA 15.9.5.12 Date.prototype.getMonth ( )

     *

     * @param self self reference

     * @return month

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getMonth(final Object self) {

        return getField(self, MONTH);

    }

    /**

     * ECMA 15.9.5.13 Date.prototype.getUTCMonth ( )

     *

     * @param self self reference

     * @return UTC month

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getUTCMonth(final Object self) {

        return getUTCField(self, MONTH);

    }

    /**

     * ECMA 15.9.5.14 Date.prototype.getDate ( )

     *

     * @param self self reference

     * @return date

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getDate(final Object self) {

        return getField(self, DAY);

    }

    /**

     * ECMA 15.9.5.15 Date.prototype.getUTCDate ( )

     *

     * @param self self reference

     * @return UTC Date

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getUTCDate(final Object self) {

        return getUTCField(self, DAY);

    }

    /**

     * ECMA 15.9.5.16 Date.prototype.getDay ( )

     *

     * @param self self reference

     * @return day

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getDay(final Object self) {

        final NativeDate nd = getNativeDate(self);

        return (nd != null && nd.isValidDate()) ? weekDay(nd.getLocalTime()) : Double.NaN;

    }

    /**

     * ECMA 15.9.5.17 Date.prototype.getUTCDay ( )

     *

     * @param self self reference

     * @return UTC day

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getUTCDay(final Object self) {

        final NativeDate nd = getNativeDate(self);

        return (nd != null && nd.isValidDate()) ? weekDay(nd.getTime()) : Double.NaN;

    }

    /**

     * ECMA 15.9.5.18 Date.prototype.getHours ( )

     *

     * @param self self reference

     * @return hours

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getHours(final Object self) {

        return getField(self, HOUR);

    }

    /**

     * ECMA 15.9.5.19 Date.prototype.getUTCHours ( )

     *

     * @param self self reference

     * @return UTC hours

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getUTCHours(final Object self) {

        return getUTCField(self, HOUR);

    }

    /**

     * ECMA 15.9.5.20 Date.prototype.getMinutes ( )

     *

     * @param self self reference

     * @return minutes

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getMinutes(final Object self) {

        return getField(self, MINUTE);

    }

    /**

     * ECMA 15.9.5.21 Date.prototype.getUTCMinutes ( )

     *

     * @param self self reference

     * @return UTC minutes

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getUTCMinutes(final Object self) {

        return getUTCField(self, MINUTE);

    }

    /**

     * ECMA 15.9.5.22 Date.prototype.getSeconds ( )

     *

     * @param self self reference

     * @return seconds

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getSeconds(final Object self) {

        return getField(self, SECOND);

    }

    /**

     * ECMA 15.9.5.23 Date.prototype.getUTCSeconds ( )

     *

     * @param self self reference

     * @return UTC seconds

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static double getUTCSeconds(final Object self) {

        return getUTCField(self, SECOND);

    }

    /**