/*

 * Copyright (c) 1994, 2003, 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 sun.tools.tree;

import sun.tools.java.*;

import sun.tools.asm.*;

import java.io.PrintStream;

import java.util.Hashtable;

/**

 * WARNING: The contents of this source file are not part of any

 * supported API.  Code that depends on them does so at its own risk:

 * they are subject to change or removal without notice.

 */

public

class ArrayExpression extends NaryExpression {

    /**

     * Constructor

     */

    public ArrayExpression(long where, Expression args[]) {

        super(ARRAY, where, Type.tError, null, args);

    }

    /**

     * Check expression type

     */

    public Vset checkValue(Environment env, Context ctx, Vset vset, Hashtable exp) {

        env.error(where, "invalid.array.expr");

        return vset;

    }

    public Vset checkInitializer(Environment env, Context ctx, Vset vset, Type t, Hashtable exp) {

        if (!t.isType(TC_ARRAY)) {

            if (!t.isType(TC_ERROR)) {

                env.error(where, "invalid.array.init", t);

            }

            return vset;

        }

        type = t;

        t = t.getElementType();

        for (int i = 0 ; i < args.length ; i++) {

            vset = args[i].checkInitializer(env, ctx, vset, t, exp);

            args[i] = convert(env, ctx, t, args[i]);

        }

        return vset;

    }

    /**

     * Inline

     */

    public Expression inline(Environment env, Context ctx) {

        Expression e = null;

        for (int i = 0 ; i < args.length ; i++) {

            args[i] = args[i].inline(env, ctx);

            if (args[i] != null) {

                e = (e == null) ? args[i] : new CommaExpression(where, e, args[i]);

            }

        }

        return e;

    }

    public Expression inlineValue(Environment env, Context ctx) {

        for (int i = 0 ; i < args.length ; i++) {

            args[i] = args[i].inlineValue(env, ctx);

        }

        return this;

    }

    /**

     * Code

     */

    public void codeValue(Environment env, Context ctx, Assembler asm) {

        int t = 0;

        asm.add(where, opc_ldc, new Integer(args.length));

        switch (type.getElementType().getTypeCode()) {

          case TC_BOOLEAN:      asm.add(where, opc_newarray, new Integer(T_BOOLEAN));   break;

          case TC_BYTE:         asm.add(where, opc_newarray, new Integer(T_BYTE));      break;

          case TC_SHORT:        asm.add(where, opc_newarray, new Integer(T_SHORT));     break;

          case TC_CHAR:         asm.add(where, opc_newarray, new Integer(T_CHAR));      break;

          case TC_INT:          asm.add(where, opc_newarray, new Integer(T_INT));       break;

          case TC_LONG:         asm.add(where, opc_newarray, new Integer(T_LONG));      break;

          case TC_FLOAT:        asm.add(where, opc_newarray, new Integer(T_FLOAT));     break;

          case TC_DOUBLE:       asm.add(where, opc_newarray, new Integer(T_DOUBLE));    break;

          case TC_ARRAY:

            asm.add(where, opc_anewarray, type.getElementType());

            break;

          case TC_CLASS:

            asm.add(where, opc_anewarray, env.getClassDeclaration(type.getElementType()));

            break;

          default:

            throw new CompilerError("codeValue");

        }

        for (int i = 0 ; i < args.length ; i++) {

            // If the array element is the default initial value,

            // then don't bother generating code for this element.

            if (args[i].equalsDefault()) continue;

            asm.add(where, opc_dup);

            asm.add(where, opc_ldc, new Integer(i));

            args[i].codeValue(env, ctx, asm);

            switch (type.getElementType().getTypeCode()) {

              case TC_BOOLEAN:

              case TC_BYTE:

                asm.add(where, opc_bastore);

                break;

              case TC_CHAR:

                asm.add(where, opc_castore);

                break;

              case TC_SHORT:

                asm.add(where, opc_sastore);

                break;

              default:

                asm.add(where, opc_iastore + type.getElementType().getTypeCodeOffset());

            }

        }

    }

}