/* -*- Mode: java; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
 *
 * The contents of this file are subject to the Netscape Public
 * License Version 1.1 (the "License"); you may not use this file
 * except in compliance with the License. You may obtain a copy of
 * the License at http://www.mozilla.org/NPL/
 *
 * Software distributed under the License is distributed on an "AS
 * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
 * implied. See the License for the specific language governing
 * rights and limitations under the License.
 *
 * The Original Code is Rhino code, released
 * May 6, 1999.
 *
 * The Initial Developer of the Original Code is Netscape
 * Communications Corporation.  Portions created by Netscape are
 * Copyright (C) 1997-1999 Netscape Communications Corporation. All
 * Rights Reserved.
 *
 * Contributor(s):
 * Norris Boyd
 * Mike McCabe
 *
 * Alternatively, the contents of this file may be used under the
 * terms of the GNU Public License (the "GPL"), in which case the
 * provisions of the GPL are applicable instead of those above.
 * If you wish to allow use of your version of this file only
 * under the terms of the GPL and not to allow others to use your
 * version of this file under the NPL, indicate your decision by
 * deleting the provisions above and replace them with the notice
 * and other provisions required by the GPL.  If you do not delete
 * the provisions above, a recipient may use your version of this
 * file under either the NPL or the GPL.
 */

package org.mozilla.javascript;

import java.util.Hashtable;

/**
 * This class implements the Object native object.
 * See ECMA 15.2.
 * @author Norris Boyd
 */
public class NativeObject extends IdScriptable {

    public static void init(Context cx, Scriptable scope, boolean sealed) {
        NativeObject obj = new NativeObject();
        obj.prototypeFlag = true;
        obj.addAsPrototype(MAX_PROTOTYPE_ID, cx, scope, sealed);
    }

    public String getClassName() {
        return "Object";
    }

    public int methodArity(int methodId) {
        if (prototypeFlag) {
            switch (methodId) {
                case Id_constructor:           return 1;
                case Id_toString:              return 0;
                case Id_toLocaleString:        return 0;
                case Id_valueOf:               return 0;
                case Id_hasOwnProperty:        return 1;
                case Id_propertyIsEnumerable:  return 1;
                case Id_isPrototypeOf:         return 1;
            }
        }
        return super.methodArity(methodId);
    }

    public Object execMethod
        (int methodId, IdFunction f,
         Context cx, Scriptable scope, Scriptable thisObj, Object[] args)
        throws JavaScriptException
    {
        if (prototypeFlag) {
            switch (methodId) {
                case Id_constructor:
                    return jsConstructor(cx, args, f, thisObj == null);

                case Id_toString:
                    return jsFunction_toString(cx, thisObj);

                case Id_toLocaleString:
                    return jsFunction_toLocaleString(cx, thisObj);

                case Id_valueOf:
                    return jsFunction_valueOf(thisObj);

                case Id_hasOwnProperty:
                    return jsFunction_hasOwnProperty(thisObj, args);

                case Id_propertyIsEnumerable:
                    return jsFunction_propertyIsEnumerable(cx, thisObj, args);

                case Id_isPrototypeOf:
                    return jsFunction_isPrototypeOf(cx, thisObj, args);
            }
        }
        return super.execMethod(methodId, f, cx, scope, thisObj, args);
    }

    private static Object jsConstructor(Context cx, Object[] args,
                                        Function ctorObj, boolean inNewExpr)
        throws JavaScriptException
    {
        if (!inNewExpr) {
            // FunctionObject.construct will set up parent, proto
            return ctorObj.construct(cx, ctorObj.getParentScope(), args);
        }
        if (args.length == 0 || args[0] == null ||
            args[0] == Undefined.instance)
        {
            return new NativeObject();
        }
        return ScriptRuntime.toObject(cx, ctorObj.getParentScope(), args[0]);
    }

    public String toString() {
        Context cx = Context.getCurrentContext();
        if (cx != null)
            return jsFunction_toString(cx, this);
        else
            return "[object " + getClassName() + "]";
    }

    private static String jsFunction_toString(Context cx, Scriptable thisObj)
    {
        if (cx.getLanguageVersion() != cx.VERSION_1_2)
            return "[object " + thisObj.getClassName() + "]";

        return toSource(cx, thisObj);
    }

    private static String jsFunction_toLocaleString(Context cx,
                                                    Scriptable thisObj)
    {
        return jsFunction_toString(cx, thisObj);
    }

    private static String toSource(Context cx, Scriptable thisObj)
    {
        Scriptable m = thisObj;

        if (cx.iterating == null)
            cx.iterating = new Hashtable(31);

        if (cx.iterating.get(m) == Boolean.TRUE) {
            return "{}";  // stop recursion
        } else {
            StringBuffer result = new StringBuffer("{");
            Object[] ids = m.getIds();

            for(int i=0; i < ids.length; i++) {
                if (i > 0)
                    result.append(", ");

                Object id = ids[i];
                String idString = ScriptRuntime.toString(id);
                Object p = (id instanceof String)
                    ? m.get((String) id, m)
                    : m.get(((Number) id).intValue(), m);
                if (p instanceof String) {
                    result.append(idString + ":\""
                        + ScriptRuntime
                          .escapeString(ScriptRuntime.toString(p))
                        + "\"");
                } else {
                    /* wrap changes to cx.iterating in a try/finally
                     * so that the reference always gets removed, and
                     * we don't leak memory.  Good place for weak
                     * references, if we had them.
                     */
                    try {
                        cx.iterating.put(m, Boolean.TRUE); // stop recursion.
                        result.append(idString + ":" + ScriptRuntime.toString(p));
                    } finally {
                        cx.iterating.remove(m);
                    }
                }
            }
            result.append('}');
            return result.toString();
        }
    }

    private static Object jsFunction_valueOf(Scriptable thisObj) {
        return thisObj;
    }

    private static Object jsFunction_hasOwnProperty(Scriptable thisObj,
                                                    Object[] args)
    {
        if (args.length != 0) {
            if (thisObj.has(ScriptRuntime.toString(args[0]), thisObj))
                return Boolean.TRUE;
        }
        return Boolean.FALSE;
    }

    private static Object jsFunction_propertyIsEnumerable(Context cx,
                                                          Scriptable thisObj,
                                                          Object[] args)
    {
        try {
            if (args.length != 0) {
                String name = ScriptRuntime.toString(args[0]);
                if (thisObj.has(name, thisObj)) {
                    int a = ((ScriptableObject)thisObj).getAttributes(name, thisObj);
                    if ((a & ScriptableObject.DONTENUM) == 0)
                        return Boolean.TRUE;
                }
            }
        }
        catch (PropertyException x) {
        }
        catch (ClassCastException x) {
        }
        return Boolean.FALSE;
    }

    private static Object jsFunction_isPrototypeOf(Context cx,
                                                   Scriptable thisObj,
                                                   Object[] args)
    {
        if (args.length != 0 && args[0] instanceof Scriptable) {
            Scriptable v = (Scriptable) args[0];
            do {
                v = v.getPrototype();
                if (v == thisObj)
                    return Boolean.TRUE;
            } while (v != null);
        }
        return Boolean.FALSE;
    }

    protected String getIdName(int id) {
        if (prototypeFlag) {
            switch (id) {
                case Id_constructor:          return "constructor";
                case Id_toString:             return "toString";
                case Id_toLocaleString:       return "toLocaleString";
                case Id_valueOf:              return "valueOf";
                case Id_hasOwnProperty:       return "hasOwnProperty";
                case Id_propertyIsEnumerable: return "propertyIsEnumerable";
                case Id_isPrototypeOf:        return "isPrototypeOf";
            }
        }
        return null;
    }

// #string_id_map#

    protected int mapNameToId(String s) {
        if (!prototypeFlag) { return 0; }
        int id;
// #generated# Last update: 2001-04-24 12:37:03 GMT+02:00
        L0: { id = 0; String X = null; int c;
            L: switch (s.length()) {
            case 7: X="valueOf";id=Id_valueOf; break L;
            case 8: X="toString";id=Id_toString; break L;
            case 11: X="constructor";id=Id_constructor; break L;
            case 13: X="isPrototypeOf";id=Id_isPrototypeOf; break L;
            case 14: c=s.charAt(0);
                if (c=='h') { X="hasOwnProperty";id=Id_hasOwnProperty; }
                else if (c=='t') { X="toLocaleString";id=Id_toLocaleString; }
                break L;
            case 20: X="propertyIsEnumerable";id=Id_propertyIsEnumerable; break L;
            }
            if (X!=null && X!=s && !X.equals(s)) id = 0;
        }
// #/generated#
        return id;
    }

    private static final int
        Id_constructor           = 1,
        Id_toString              = 2,
        Id_toLocaleString        = 3,
        Id_valueOf               = 4,
        Id_hasOwnProperty        = 5,
        Id_propertyIsEnumerable  = 6,
        Id_isPrototypeOf         = 7,
        MAX_PROTOTYPE_ID         = 7;

// #/string_id_map#

    private boolean prototypeFlag;
}
