/*

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

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

import jdk.nashorn.internal.runtime.ConsString;

import jdk.nashorn.internal.runtime.Context;

import jdk.nashorn.internal.runtime.JSType;

import jdk.nashorn.internal.runtime.ScriptFunction;

import jdk.nashorn.internal.runtime.ScriptObject;

import jdk.nashorn.internal.runtime.ScriptRuntime;

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 double hoursPerDay      = 24;

    private static final double minutesPerHour   = 60;

    private static final double secondsPerMinute = 60;

    private static final double msPerSecond   = 1_000;

    private static final double 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 InvokeByName TO_ISO_STRING = new InvokeByName("toISOString", ScriptObject.class, Object.class,

            Object.class);

    private double time;

    private final TimeZone timezone;

    NativeDate() {

        this(System.currentTimeMillis());

    }

    NativeDate(final double time) {

        final Context context = Global.getThisContext();

        this.time = time;

        this.timezone = context.getTimeZone();

        this.setProto(Global.instance().getDatePrototype());

    }

    @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

     */

    @SpecializedConstructor

    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) {

        NativeDate result;

        switch (args.length) {

        case 0:

            result = new NativeDate();

            break;

        case 1:

            double num;

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

            if (arg instanceof String || arg instanceof ConsString) {

                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 isNew ? result : toStringImpl(new NativeDate(), FORMAT_DATE_TIME);

    }

    @Override

    public String safeToString() {

        return "[Date " + toISOStringImpl(this) + "]";

    }

    @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 Object 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 Object 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 Object now(final Object self) {

        return (double)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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object 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 Object getUTCSeconds(final Object self) {

        return getUTCField(self, SECOND);

    }

    /**

     * ECMA 15.9.5.24 Date.prototype.getMilliseconds ( )

     *

     * @param self self reference

     * @return milliseconds

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static Object getMilliseconds(final Object self) {

        return getField(self, MILLISECOND);

    }

    /**

     * ECMA 15.9.5.25 Date.prototype.getUTCMilliseconds ( )

     *

     * @param self self reference

     * @return UTC milliseconds

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static Object getUTCMilliseconds(final Object self) {

        return getUTCField(self, MILLISECOND);

    }

    /**

     * ECMA 15.9.5.26 Date.prototype.getTimezoneOffset ( )

     *

     * @param self self reference

     * @return time zone offset or NaN if N/A

     */

    @Function(attributes = Attribute.NOT_ENUMERABLE)

    public static Object getTimezoneOffset(final Object self) {

        final NativeDate nd = getNativeDate(self);

        if (nd != null) {

            final long msec = (long) nd.getTime();

            return - nd.getTimeZone().getOffset(msec) / msPerMinute;

        }

        return Double.NaN;

    }

    /**