1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/src/clojure/asm/commons/StaticInitMerger.java	Sat Aug 21 06:25:44 2010 -0400
     1.3 @@ -0,0 +1,102 @@
     1.4 +/***
     1.5 + * ASM: a very small and fast Java bytecode manipulation framework
     1.6 + * Copyright (c) 2000-2005 INRIA, France Telecom
     1.7 + * All rights reserved.
     1.8 + *
     1.9 + * Redistribution and use in source and binary forms, with or without
    1.10 + * modification, are permitted provided that the following conditions
    1.11 + * are met:
    1.12 + * 1. Redistributions of source code must retain the above copyright
    1.13 + *    notice, this list of conditions and the following disclaimer.
    1.14 + * 2. Redistributions in binary form must reproduce the above copyright
    1.15 + *    notice, this list of conditions and the following disclaimer in the
    1.16 + *    documentation and/or other materials provided with the distribution.
    1.17 + * 3. Neither the name of the copyright holders nor the names of its
    1.18 + *    contributors may be used to endorse or promote products derived from
    1.19 + *    this software without specific prior written permission.
    1.20 + *
    1.21 + * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
    1.22 + * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
    1.23 + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
    1.24 + * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
    1.25 + * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
    1.26 + * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
    1.27 + * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
    1.28 + * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
    1.29 + * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
    1.30 + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
    1.31 + * THE POSSIBILITY OF SUCH DAMAGE.
    1.32 + */
    1.33 +package clojure.asm.commons;
    1.34 +
    1.35 +import clojure.asm.ClassAdapter;
    1.36 +import clojure.asm.ClassVisitor;
    1.37 +import clojure.asm.MethodVisitor;
    1.38 +import clojure.asm.Opcodes;
    1.39 +
    1.40 +/**
    1.41 + * A {@link ClassAdapter} that merges clinit methods into a single one.
    1.42 + *
    1.43 + * @author Eric Bruneton
    1.44 + */
    1.45 +public class StaticInitMerger extends ClassAdapter{
    1.46 +
    1.47 +private String name;
    1.48 +
    1.49 +private MethodVisitor clinit;
    1.50 +
    1.51 +private String prefix;
    1.52 +
    1.53 +private int counter;
    1.54 +
    1.55 +public StaticInitMerger(final String prefix, final ClassVisitor cv){
    1.56 +	super(cv);
    1.57 +	this.prefix = prefix;
    1.58 +}
    1.59 +
    1.60 +public void visit(
    1.61 +		final int version,
    1.62 +		final int access,
    1.63 +		final String name,
    1.64 +		final String signature,
    1.65 +		final String superName,
    1.66 +		final String[] interfaces){
    1.67 +	cv.visit(version, access, name, signature, superName, interfaces);
    1.68 +	this.name = name;
    1.69 +}
    1.70 +
    1.71 +public MethodVisitor visitMethod(
    1.72 +		final int access,
    1.73 +		final String name,
    1.74 +		final String desc,
    1.75 +		final String signature,
    1.76 +		final String[] exceptions){
    1.77 +	MethodVisitor mv;
    1.78 +	if(name.equals("<clinit>"))
    1.79 +		{
    1.80 +		int a = Opcodes.ACC_PRIVATE + Opcodes.ACC_STATIC;
    1.81 +		String n = prefix + counter++;
    1.82 +		mv = cv.visitMethod(a, n, desc, signature, exceptions);
    1.83 +
    1.84 +		if(clinit == null)
    1.85 +			{
    1.86 +			clinit = cv.visitMethod(a, name, desc, null, null);
    1.87 +			}
    1.88 +		clinit.visitMethodInsn(Opcodes.INVOKESTATIC, this.name, n, desc);
    1.89 +		}
    1.90 +	else
    1.91 +		{
    1.92 +		mv = cv.visitMethod(access, name, desc, signature, exceptions);
    1.93 +		}
    1.94 +	return mv;
    1.95 +}
    1.96 +
    1.97 +public void visitEnd(){
    1.98 +	if(clinit != null)
    1.99 +		{
   1.100 +		clinit.visitInsn(Opcodes.RETURN);
   1.101 +		clinit.visitMaxs(0, 0);
   1.102 +		}
   1.103 +	cv.visitEnd();
   1.104 +}
   1.105 +}