| /* |
| * @(#)$Id$ |
| * |
| * The Apache Software License, Version 1.1 |
| * |
| * |
| * Copyright (c) 2001 The Apache Software Foundation. All rights |
| * reserved. |
| * |
| * Redistribution and use in source and binary forms, with or without |
| * modification, are permitted provided that the following conditions |
| * are met: |
| * |
| * 1. Redistributions of source code must retain the above copyright |
| * notice, this list of conditions and the following disclaimer. |
| * |
| * 2. Redistributions in binary form must reproduce the above copyright |
| * notice, this list of conditions and the following disclaimer in |
| * the documentation and/or other materials provided with the |
| * distribution. |
| * |
| * 3. The end-user documentation included with the redistribution, |
| * if any, must include the following acknowledgment: |
| * "This product includes software developed by the |
| * Apache Software Foundation (http://www.apache.org/)." |
| * Alternately, this acknowledgment may appear in the software itself, |
| * if and wherever such third-party acknowledgments normally appear. |
| * |
| * 4. The names "Xalan" and "Apache Software Foundation" must |
| * not be used to endorse or promote products derived from this |
| * software without prior written permission. For written |
| * permission, please contact apache@apache.org. |
| * |
| * 5. Products derived from this software may not be called "Apache", |
| * nor may "Apache" appear in their name, without prior written |
| * permission of the Apache Software Foundation. |
| * |
| * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED |
| * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
| * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE |
| * DISCLAIMED. IN NO EVENT SHALL THE APACHE SOFTWARE FOUNDATION OR |
| * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, |
| * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT |
| * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF |
| * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND |
| * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, |
| * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT |
| * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
| * SUCH DAMAGE. |
| * ==================================================================== |
| * |
| * This software consists of voluntary contributions made by many |
| * individuals on behalf of the Apache Software Foundation and was |
| * originally based on software copyright (c) 2001, Sun |
| * Microsystems., http://www.sun.com. For more |
| * information on the Apache Software Foundation, please see |
| * <http://www.apache.org/>. |
| * |
| * @author Jacek Ambroziak |
| * @author Santiago Pericas-Geertsen |
| * |
| */ |
| |
| package org.apache.xalan.xsltc.compiler; |
| |
| import java.util.Vector; |
| import java.util.Enumeration; |
| import org.apache.xalan.xsltc.compiler.util.Type; |
| import org.apache.bcel.generic.Instruction; |
| import org.apache.bcel.generic.*; |
| import org.apache.xalan.xsltc.compiler.util.*; |
| |
| final class ConcatCall extends FunctionCall { |
| public ConcatCall(QName fname, Vector arguments) { |
| super(fname, arguments); |
| } |
| |
| public Type typeCheck(SymbolTable stable) throws TypeCheckError { |
| for (int i = 0; i < argumentCount(); i++) { |
| final Expression exp = argument(i); |
| if (!exp.typeCheck(stable).identicalTo(Type.String)) { |
| setArgument(i, new CastExpr(exp, Type.String)); |
| } |
| } |
| return _type = Type.String; |
| } |
| |
| /** translate leaves a String on the stack */ |
| public void translate(ClassGenerator classGen, MethodGenerator methodGen) { |
| final ConstantPoolGen cpg = classGen.getConstantPool(); |
| final InstructionList il = methodGen.getInstructionList(); |
| final int nArgs = argumentCount(); |
| |
| switch (nArgs) { |
| case 0: |
| il.append(new PUSH(cpg, EMPTYSTRING)); |
| break; |
| |
| case 1: |
| argument().translate(classGen, methodGen); |
| break; |
| |
| default: |
| final int initBuffer = cpg.addMethodref(STRING_BUFFER_CLASS, |
| "<init>", "()V"); |
| final Instruction append = |
| new INVOKEVIRTUAL(cpg.addMethodref(STRING_BUFFER_CLASS, |
| "append", |
| "("+STRING_SIG+")" |
| +STRING_BUFFER_SIG)); |
| |
| final int toString = cpg.addMethodref(STRING_BUFFER_CLASS, |
| "toString", |
| "()"+STRING_SIG); |
| |
| il.append(new NEW(cpg.addClass(STRING_BUFFER_CLASS))); |
| il.append(DUP); |
| il.append(new INVOKESPECIAL(initBuffer)); |
| for (int i = 0; i < nArgs; i++) { |
| argument(i).translate(classGen, methodGen); |
| il.append(append); |
| } |
| il.append(new INVOKEVIRTUAL(toString)); |
| } |
| } |
| } |