1. /*
  2. * Copyright 2001-2004 The Apache Software Foundation.
  3. *
  4. * Licensed under the Apache License, Version 2.0 (the "License");
  5. * you may not use this file except in compliance with the License.
  6. * You may obtain a copy of the License at
  7. *
  8. * http://www.apache.org/licenses/LICENSE-2.0
  9. *
  10. * Unless required by applicable law or agreed to in writing, software
  11. * distributed under the License is distributed on an "AS IS" BASIS,
  12. * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13. * See the License for the specific language governing permissions and
  14. * limitations under the License.
  15. */
  16. /*
  17. * $Id: StringLengthCall.java,v 1.5 2004/02/16 22:24:29 minchau Exp $
  18. */
  19. package com.sun.org.apache.xalan.internal.xsltc.compiler;
  20. import java.util.Vector;
  21. import com.sun.org.apache.bcel.internal.generic.ConstantPoolGen;
  22. import com.sun.org.apache.bcel.internal.generic.INVOKEVIRTUAL;
  23. import com.sun.org.apache.bcel.internal.generic.InstructionList;
  24. import com.sun.org.apache.xalan.internal.xsltc.compiler.util.ClassGenerator;
  25. import com.sun.org.apache.xalan.internal.xsltc.compiler.util.MethodGenerator;
  26. import com.sun.org.apache.xalan.internal.xsltc.compiler.util.Type;
  27. /**
  28. * @author Jacek Ambroziak
  29. * @author Santiago Pericas-Geertsen
  30. */
  31. final class StringLengthCall extends FunctionCall {
  32. public StringLengthCall(QName fname, Vector arguments) {
  33. super(fname, arguments);
  34. }
  35. public void translate(ClassGenerator classGen, MethodGenerator methodGen) {
  36. final ConstantPoolGen cpg = classGen.getConstantPool();
  37. final InstructionList il = methodGen.getInstructionList();
  38. if (argumentCount() > 0) {
  39. argument().translate(classGen, methodGen);
  40. }
  41. else {
  42. il.append(methodGen.loadContextNode());
  43. Type.Node.translateTo(classGen, methodGen, Type.String);
  44. }
  45. il.append(new INVOKEVIRTUAL(cpg.addMethodref(STRING_CLASS,
  46. "length", "()I")));
  47. }
  48. }