it works!!!!
authoradam <adam@megacz.com>
Sat, 21 Feb 2004 21:45:10 +0000 (21:45 +0000)
committeradam <adam@megacz.com>
Sat, 21 Feb 2004 21:45:10 +0000 (21:45 +0000)
darcs-hash:20040221214510-5007d-873a1978193a0ca8a5a53c8dadeb3a08d9c104d1.gz

Makefile
Makefile.upstream
src/org/ibex/HTTP.java
src/org/ibex/Ibex.java
src/org/ibex/Main.java
src/org/ibex/Template.java
src/org/ibex/XMLRPC.java
src/org/ibex/plat/GCJ.java
src/org/ibex/plat/X11.cc
src/org/ibex/util/BytecodePruner.java
src/org/ibex/util/Log.java

index 671af44..560042d 100644 (file)
--- a/Makefile
+++ b/Makefile
@@ -19,9 +19,9 @@ dist-clean:
        find upstream -name config.cache -exec rm {} \;
        test -e upstream/mips && make -C upstream/mips clean
 
-libwing_Linux := -Lupstream/install/i686-pc-linux-gnu/lib/
-libwing_Linux +=   upstream/install/i686-pc-linux-gnu/lib/libWINGs.a
-libwing_Linux +=   upstream/install/i686-pc-linux-gnu/lib/libwraster.a
+#libwing_Linux := -Lupstream/install/i686-pc-linux-gnu/lib/
+#libwing_Linux +=   upstream/install/i686-pc-linux-gnu/lib/libWINGs.a
+#libwing_Linux +=   upstream/install/i686-pc-linux-gnu/lib/libwraster.a
 
 libwing_Solaris := -Lupstream/install/sparc-sun-solaris2.7/lib/
 libwing_Solaris +=   upstream/install/sparc-sun-solaris2.7/lib/libWINGs.a
@@ -64,7 +64,7 @@ gcc                := upstream/install/bin/$(target)-gcc $(gcc_flags)
 jar                := $(shell ((type fastjar &>/dev/null) && echo fastjar) || echo jar)
 
 gcj: .install_gcc-3.3_$(target)
-       make compile
+#      make compile
        make build/$(platform)/$(target_bin) link_flags="$(link_flags)" platform=$(platform)
 
 include Makefile.upstream
@@ -142,13 +142,13 @@ compile: .jikes .install_mips2java
        @make -s $(java_sources:build/java/%.java=build/class/%.class)
 .compile: compile
 
-#.compile: $(java_sources) .jikes .install_mips2java
-#      @echo -e "\n\033[1mcompiling          .java -> .class: src/**/*.java\033[0m"
-#      @rm -f $(java_sources:build/java/%.java=build/class/%.class)
-#      mkdir -p build/class
-#      cd build/java; for A in `find . -name \*.java`; do mkdir -p ../class/`dirname $$A`; done
-#      @./.jikes -Xlint:deprecation $(java_sources)
-#      touch .compile
+.compile: $(java_sources) .jikes .install_mips2java
+       @echo -e "\n\033[1mcompiling          .java -> .class: src/**/*.java\033[0m"
+       @rm -f $(java_sources:build/java/%.java=build/class/%.class)
+       mkdir -p build/class
+       cd build/java; for A in `find . -name \*.java`; do mkdir -p ../class/`dirname $$A`; done
+       @./.jikes $(java_sources)
+       touch .compile
 
 build/JVM/ibex.jar: .compile build/res/builtin.jar build/class/org/ibex/translators/MIPSApps.class
        @echo -e "\n\033[1marchiving         .class -> .jar:   build/JVM/ibex.jar\033[0m"
@@ -203,14 +203,31 @@ build/$(platform)/$(platform).ar: $(nonplat_java_sources:build/java/%.java=build
 upstream/jpeg-6b/build-$(target)/libjpeg.a: .install_jpeg-6b_$(target)
 
 # note: binaries appear in a different order in the dependency line vs the link line
-build/$(platform)/$(target_bin): upstream/jpeg-6b/build-$(target)/libjpeg.a build/$(platform)/builtin.o build/$(platform)/org/ibex/plat/$(platform).cc.o
+build/$(platform)/$(target_bin): .compile build/$(platform)/builtin.o build/$(platform)/org/ibex/plat/$(platform).cc.o upstream/jpeg-6b/build-$(target)/libjpeg.a 
        @echo -e "\n\033[1mlinking               .o -> $(target_bin)\033[0m"
-       find upstream/gcc-3.3/build-i686-pc-linux-gnu/i686-pc-linux-gnu/libjava/ \
-               -name nat\*.o -or \( -name \*.o -not -name '*[A-Z]*' \) -exec nm {} \; |\
-                grep _ZN | c++filt --format java | grep " U " | sed 's_\.class\$$_.class_' | sed 's_ * U __' | sed 's_(.*__' \
-               > .natcalls
-       make $(java_sources)
+       cd upstream/gcc-3.3/build-$(target)/$(target)/libjava;           \
+                       (find . -name nat\*.o | grep -v JIS;              \
+                       echo boehm.o;\
+                       echo defineclass.o;\
+                       echo exception.o;\
+                       echo posix-threads.o;\
+                       echo posix.o;\
+                       echo prims.o;\
+                       echo jni.o;\
+                       echo resolve.o;\
+                       echo libltdl/ltdl.o;\
+                       find java gnu -name \*.o -not -name '*[A-Z]*';         \
+                       ) > $(shell pwd)/.natbins
+
+# drop gnu regexp library?
+       cd upstream/gcc-3.3/build-$(target)/$(target)/libjava;\
+       cat $(shell pwd)/.natbins | grep -v shs | grep -v SHS |xargs nm |\
+               grep _ZN | c++filt --format java | grep " U " | sed 's_\.class\$$_.class_' | sed 's_ * U __' | sed 's_(.*__' \
+               > $(shell pwd)/.natcalls
+
+#      make $(java_sources)
        rm -rf build/pruned; mkdir -p build/pruned
+#      rm -rf build/pruned; cd build; ln -s class pruned
        javac -classpath lib/bcel-5.1.jar:build/class -d build/class src/org/ibex/util/BytecodePruner.java
        rm -f build/$(platform)/ibex.jar
        cd build/class; \
@@ -225,75 +242,90 @@ build/$(platform)/$(target_bin): upstream/jpeg-6b/build-$(target)/libjpeg.a buil
                -o build/pruned \
                `cat .natcalls`
 
-       rm -rf build/pruned/org/ibex/js/*; cp build/java/org/ibex/js/* build/pruned/org/ibex/js/
+#      rm -rf build/pruned/org/ibex/js/*; cp build/java/org/ibex/js/* build/pruned/org/ibex/js/
 
-       rm build/pruned/java/lang/System.class
+       rm -f build/pruned/java/lang/System.*
        cp upstream/gcc-3.3/src/libjava/java/lang/System.java build/pruned/java/lang/
 
-       rm build/pruned/gnu/gcj/runtime/FirstThread*.class
-       cp upstream/gcc-3.3/src/libjava/gnu/gcj/runtime/FirstThread.java build/pruned/gnu/gcj/runtime/
+#      rm build/pruned/gnu/gcj/runtime/FirstThread*.*
+#      cp upstream/gcc-3.3/src/libjava/gnu/gcj/runtime/FirstThread.java build/pruned/gnu/gcj/runtime/
 
        rm build/pruned/org/ibex/plat/GCJ*.class
        cp build/java/org/ibex/plat/GCJ.java build/pruned/org/ibex/plat/
 
+       rm -rf build/Linux/java
+       rm -rf build/Linux/gnu/gcj
+       rm -rf build/Linux/gnu/java
+       rm -rf build/Linux/gnu/classpath
+
        cp upstream/gcc-3.3/build-$(target)/$(target)/libjava/java/lang/Object.class build/pruned/java/lang/
 
-       find build/pruned/gnu/java/locale/ -name 'LocaleInformation_*' -not -name 'LocaleInformation_en.class' -not -name 'LocaleInformation_en_US.class' -exec rm {} \;
+#      find build/pruned/gnu/java/locale/ -name 'LocaleInformation_*' -not -name 'LocaleInformation_en.class' -not -name 'LocaleInformation_en_US.class' -exec rm {} \;
 
 #      cd build/pruned; fastjar cvf ../../tmp.jar .
-#      java -jar lib/jarg.jar -verbose -verboseufm -normlv -normsf -normsy -normin \
-#                              -normex -nornc -nornf -nornm -nobco tmp.jar
-#      cd build/pruned; fastjar xvf ../../tmp.jar
+#      java -jar lib/jarg.jar -verbose -verbosern -verboseufm -normlv -normsf -normsy -normin \
+#                              -nornc -nornf -nornm \
+#                              -normex -nobco tmp.jar
+#      cd build/pruned; rm -rf *; fastjar xvf ../../tmp_s.jar
 
-# try oneshot compile/link
-# --redefine-sym to merge errorthrowers?   or do this in C++?
-# --rename-section to try to merge Utf8 sections?
+#                              -fnew-ra \
+#                              -ffunction-sections \
+#                              -fdata-sections \
+#                              -fomit-frame-pointer \
+#                              -fno-force-mem \
+#                              -fno-force-addr \
+#                              -fbranch-probabilities \
+#                              -fno-schedule-insns \
+#                              -fno-optimize-sibling-calls \
+#                              -fno-if-conversion \
+#                              -fno-thread-jumps \
+#                              -foptimize-static-class-initialization \
+#                              -fno-store-check \
+#                              -fno-bounds-check \
+#                              -fmerge-all-constants \
+#                              -fno-inline-functions \
+#                              -finline-limit=1 \
 
        cd build/pruned;                                                  \
                for A in `find . -name \*.class -or -name \*.java`; do    \
                        echo compiling $$A....;                           \
                        ../../upstream/install/bin/$(target)-gcj          \
-                               -fdata-sections -ffunction-sections -w -c -Os \
-                               -fCLASSPATH=../../build/$(platform)/ibex.jar $$A &&                     \
+                               -w -c -Os \
+                               -fCLASSPATH=../../build/$(platform)/ibex.jar \
+                               $$A &&                     \
                                (mkdir -p ../../build/$(platform)/`dirname $$A`; mv *.o ../../build/$(platform)/`dirname $$A`); \
                done
+
+#      rm -rf build/Linux/java/security build/Linux/gnu/java/security build/Linux/java/util/jar build/Linux/java/io/Object*
+#      rm -rf build/pruned/java/security build/pruned/gnu/java/security build/pruned/java/util/jar build/pruned/java/io/Object*
+
        rm -f build/$(platform)/ibex.a
+
        cd upstream/gcc-3.3/build-$(target)/$(target)/libjava;           \
                $(shell pwd)/upstream/install/$(target)/bin/ar cq        \
                        $(shell pwd)/build/$(platform)/ibex.a            \
-                       boehm.o  defineclass.o  exception.o              \
-                       posix-threads.o  posix.o  prims.o  resolve.o     \
-                       `find . -name nat\*.o | grep -v JIS`             \
-                       `find . -name \*.o -not -name '*[A-Z]*'`         \
-                       `find $(shell pwd)/build/$(platform) -name \*.o`
-       PATH=upstream/install/bin:$$PATH upstream/install/bin/$(target)-gcj \
-               --main=org.ibex.plat.$(platform)                            \
-               -Lupstream/install/$(target)/lib                            \
-               -Lupstream/install/lib                                      \
-               -ffunction-sections -fdata-sections -Os -w -fCLASSPATH=build/$(platform)/ibex.jar \
-               build/$(platform)/ibex.a                                    \
-               upstream/jpeg-6b/build-$(target)/libjpeg.a                  \
-               $(link_flags)                                               \
+                       `find $(shell pwd)/build/$(platform) -name \*.o` \
+                       `cat $(shell pwd)/.natbins`
+# --relax,-O2,--no-whole-archive,
+       PATH=upstream/install/bin:$$PATH upstream/install/bin/$(target)-gcj          \
+               -Wl,--no-gc-sections,--noinhibit-exec,-rpath,upstream/install/$(target)/lib     \
+               -Wl,-nostdlib,--eh-frame-hdr,-m,elf_i386,-dynamic-linker,/lib/ld-linux.so.2 \
+               --main=org.ibex.plat.$(platform)                                     \
+               -Lupstream/install/$(target)/lib                                     \
+               -Lupstream/install/lib                                               \
+               -Os -w                                                               \
+               build/$(platform)/ibex.a                                             \
+               upstream/jpeg-6b/build-$(target)/libjpeg.a                           \
+               $(link_flags)                                                        \
                upstream/gcc-3.3/build-$(target)/$(target)/boehm-gc/.libs/libgcjgc.a \
-               -lz -ldl -lffi                                                   \
-               -Wl,--noinhibit-exec,--gc-sections \
+               -lz -ldl -lgcc -lm -lpthread -ldl -lgcc -lc -lgcc \
+               upstream/install/bin/../lib/gcc-lib/i686-pc-linux-gnu/3.3/crtend.o \
+               upstream/install/bin/../lib/gcc-lib/i686-pc-linux-gnu/3.3/../../../../i686-pc-linux-gnu/lib/crtn.o \
                -o $@
-
-# linker
-# --no-whole-archive,--relax,-O,2
-# 
-#                              -fomit-frame-pointer \
-#                              -fno-force-mem \
-#                              -fno-force-addr \
-#                              -fno-inline-functions \
-#                              -fnew-ra \
-#                              -fbranch-probabilities \
-#                              -finline-limit=1 \
-#                              -fno-schedule-insns \
-#                              -fno-optimize-sibling-calls \
-#                              -fno-if-conversion \
-#                              -fno-thread-jumps \
-#                              -fno-hosted \
+#      strip build/Linux/ibex.linux
+#      ls -l build/Linux/ibex.linux
+#      upx-ucl-beta --best build/Linux/ibex.linux
+#      ls -l build/Linux/ibex.linux
 
 
 ### Builtin Resources ##############################################################################
@@ -306,7 +338,8 @@ build/res/fonts/vera: .download_vera-1.10
        cd build/res/fonts/vera; ln -fs ../../../../upstream/vera-1.10/ttf-bitstream-vera-1.10/VeraSe.ttf
 build/res/builtin.jar: $(builtin_src:src/%=build/res/%) build/res/fonts/vera
        @echo -e "\n\033[1mzipping            res/* -> .jar: builtin.jar\033[0m"
-       cd build/res; $(jar) cf builtin.jar $(^:build/res/%=%)
+       cd build/res; $(jar) cf builtin.jar org/ibex/builtin/scar.png
+#      cd build/res; $(jar) cf builtin.jar $(^:build/res/%=%)
 build/$(platform)/builtin.o: build/res/builtin.jar
        @echo -e "\n\033[1mwrapping            .jar -> .o: resources.o\033[0m"
        @(echo "unsigned int builtin_length = ";                                \
index c93b9a2..5d43a96 100644 (file)
@@ -61,7 +61,7 @@ endif
 ifneq ($(shell uname),$(platform))
 configure_gcc-3.3                       += --with-headers=$(shell pwd)/upstream/install/$(target)/include
 endif
-configure_gcc-3.3                       += --enable-languages=c,c++,java --enable-gc-type=boehm --disable-jvmpi
+configure_gcc-3.3                       += --enable-languages=c,c++,java --enable-gc-type=boehm --disable-jvmpi --without-libffi
 configure_gcc-3.3                       += --with-ld=$(shell pwd)/upstream/install/bin/$(target)-ld
 configure_gcc-3.3                       += --with-as=$(shell pwd)/upstream/install/bin/$(target)-as
 ifneq ($(platform),Darwin)
@@ -72,8 +72,7 @@ configure_gcc-3.3                       += --disable-shared --enable-static
 configure_binutils-2.13.2.1             += --disable-shared --enable-static
 configure_gcc-3.3_powerpc-apple-darwin  += --enable-threads=posix --disable-hash-synchronization --disable-multilib
 configure_gcc-3.3_i686-pc-mingw32       += --enable-threads=win32 --enable-hash-synchronization
-configure_gcc-3.3_i686-pc-linux-gnu     += --enable-threads=posix --disable-hash-synchronization
-#configure_gcc-3.3_i686-pc-linux-gnu     += --enable-threads=posix --enable-hash-synchronization
+configure_gcc-3.3_i686-pc-linux-gnu     += --enable-threads=posix --enable-hash-synchronization
 configure_gcc-3.3_sparc-sun-solaris2.7  += --enable-threads=posix --disable-hash-synchronization --disable-multilib
 
 configure_WindowMaker-0.80.2_$(target)  += --prefix=$(shell pwd)/upstream/install/$(target)
index a8389b1..2aed806 100644 (file)
@@ -356,7 +356,7 @@ public class HTTP {
         PrintWriter pw = new PrintWriter(new OutputStreamWriter(originalUrl.equals("stdio:") ?
                                                                 System.out : sock.getOutputStream()));
         if (content != null) {
-            pw.print("POST " + path + " HTTP/1.1\r\n");
+            pw.print("POST " + path + " HTTP/1.0\r\n"); // FIXME chunked encoding
             int contentLength = content.substring(0, 2).equals("\r\n") ?
                 content.length() - 2 :
                 (content.length() - content.indexOf("\r\n\r\n") - 4);
index 61b51a8..0aea062 100644 (file)
@@ -357,6 +357,7 @@ public final class Ibex extends JS.Cloneable {
         public JSScope getStatic() {
             try {
                 // FIXME background?
+                System.out.println("parentkey.t == " + parentkey + ".t");
                 if (t == null)
                     t = Template.buildTemplate(parentkey + ".t", parent.get(parentkey + ".t"), ibex);
                 return t.staticScope;
index bfc2abd..267f706 100644 (file)
@@ -58,7 +58,8 @@ public class Main {
                     else if (opt.equals("info")) Log.level = Log.INFO;
                     else if (opt.equals("warn")) Log.level = Log.WARN;
                     else if (opt.equals("error")) Log.level = Log.ERROR;
-                    else if (opt.equals("error")) Log.level = Log.SILENT;
+                    else if (opt.equals("silent")) Log.level = Log.SILENT;
+                    else if (opt.equals("rpc")) Log.rpc = true;
                     else Log.file(opt);
                 }
             }
index 2ef5e1b..28ff215 100644 (file)
@@ -155,18 +155,31 @@ public class Template {
         String initial_uri = "";
 
        public TemplateHelper(String sourceName, Object s, Ibex ibex) throws XML.Exn, IOException, JSExn {
+            System.out.println("1");
             this.sourceName = sourceName;
+            System.out.println("2");
             this.ibex = ibex;
+            System.out.println("3");
             InputStream is = Stream.getInputStream(s);
+            System.out.println("4");
             Ibex.Blessing b = Ibex.Blessing.getBlessing(s).parent;
+            System.out.println("5");
+            /*
             while(b != null) {
                 if(b.parentkey != null) initial_uri = b.parentkey + (initial_uri.equals("") ? "" : "." + initial_uri);
                 b = b.parent;
             }
+            */
+            initial_uri = "";
+            System.out.println("6");
             parse(new InputStreamReader(is));
+            System.out.println("7");
             JS staticScript = parseScript(static_content, static_content_start);
+            System.out.println("8");
             t.staticScope = new PerInstantiationScope(null, ibex, null, null);
+            System.out.println("9");
             if (staticScript != null) JS.cloneWithNewParentScope(staticScript, t.staticScope).call(null, null, null, null, 0);
+            System.out.println("10");
         }
 
         private JS parseScript(StringBuffer content, int content_start) throws IOException {
index 195e3cf..607d34e 100644 (file)
@@ -171,9 +171,9 @@ class XMLRPC extends JS {
         content.append("\r\n");
         content.append("<?xml version=\"1.0\"?>\n");
         content.append("    <methodCall>\n");
-        content.append("        <method>");
+        content.append("        <methodName>");
         content.append(method);
-        content.append("</method>\n");
+        content.append("</methodName>\n");
         content.append("        <params>\n");
         for(int i=0; i<args.length(); i++) {
             content.append("            <param>\n");
@@ -319,11 +319,11 @@ class XMLRPC extends JS {
 
     final void call(final JS.UnpauseCallback callback, final JSArray args) {
         try {
-            if (Log.verbose) Log.info(this, "call to " + url + " : " + method);
+            if (Log.rpc) Log.info(this, "call to " + url + " : " + method);
             if (tracker == null) tracker = new Hash();
             if (objects == null) objects = new Vec();
             String request = buildRequest(args);
-            if (Log.verbose) Log.info(this, "send:\n" + request);
+            if (Log.rpc) Log.info(this, "send:\n" + request);
             InputStream is = http.POST("text/xml", request);
             BufferedReader br = new BufferedReader(new InputStreamReader(is));
             try {
index 183c573..fa8ac9a 100644 (file)
@@ -4,6 +4,8 @@ package org.ibex.plat;
 import org.ibex.*;
 import org.ibex.util.*;
 import java.io.*;
+import java.security.*;
+import java.security.cert.*;
 
 /** common superclass for all platforms that use GCJ to compile a native binary */
 public abstract class GCJ extends Platform {
@@ -17,10 +19,18 @@ public abstract class GCJ extends Platform {
     public static Object c5 = new gnu.gcj.convert.Input_8859_1();
     public static Object c6 = new gnu.java.locale.LocaleInformation();
     public static Object c7 = new gnu.gcj.convert.Output_ASCII();
-    public static Object c8 = new gnu.java.locale.Calendar_en();
-    public static Object c9 = new gnu.java.locale.Calendar_en_US();
+    //public static Object c8 = new gnu.java.locale.Calendar_en();
+    //public static Object c9 = new gnu.java.locale.Calendar_en_US();
     public static Object c10 = new gnu.gcj.protocol.http.Handler();
     public static Object c11 = new gnu.gcj.protocol.jar.Handler();
+    public static Object c12 = new java.security.cert.Certificate("foo") { 
+            public byte[] getEncoded() throws CertificateEncodingException { return null; }
+            public void verify(PublicKey key) { }
+            public void verify(PublicKey key, String sigProvider) { }
+            public String toString() { return "foocert"; }
+            public PublicKey getPublicKey() { return null; }
+        };
+
 
     protected native InputStream _getBuiltinInputStream();
 
index 62672d7..004d2a3 100644 (file)
@@ -769,8 +769,9 @@ void org::ibex::plat::X11::natInit() {
     org::ibex::util::Log::info(this->getClass(), JvNewStringLatin1(buf));
 }
 
-#include "WINGs/WINGs.h"
+//#include "WINGs/WINGs.h"
 jstring org::ibex::plat::X11::_fileDialog(jstring suggestedFileName, jboolean write) {
+#ifdef asfasdfasf
   int argc = 1;
   char* argv[2];
   argv[0] = "Ibex";
@@ -793,6 +794,8 @@ jstring org::ibex::plat::X11::_fileDialog(jstring suggestedFileName, jboolean wr
     if (WMRunModalFilePanelForDirectory(oPanel, NULL, buf, /*title*/ NULL, NULL) != True) return NULL;
     return JvNewStringLatin1(WMGetFilePanelFileName(oPanel));
   }
+#endif
+  return NULL;
 }
 
 
index f5dea9d..459bcca 100644 (file)
@@ -18,10 +18,17 @@ import org.apache.bcel.util.*;
 
 // - if a method is reachable, all the methods it overrides are reachable
 
+// try eliminating instance methods/fields if no ctor is reachable...
+// distinguish between overloaded forms of a given method
+// slim down the set of loadAllMethod() classes
+// field pruning?
+
 // FIXME: nonstatic method invocation or field access implies that object will be constructed (ie hint)
 
 public class BytecodePruner {
 
+    public static final boolean deleteMethods = false;
+
     // FIXME
     public static SyntheticRepository repo = null;
 
@@ -31,14 +38,14 @@ public class BytecodePruner {
 
     public void loadAllMethods(String classname) throws Exception {
         visitJavaClass(repo.loadClass(classname));
-        Method[] meths = repo.loadClass(classname).getMethods();
+        Method[] meths = getMethods(repo.loadClass(classname));
         for(int i=0; i<meths.length; i++) visitJavaMethod(repo.loadClass(classname), meths[i]);
     }
     public void loadMethod(String classAndMethodName) throws Exception {
         String classname = classAndMethodName.substring(0, classAndMethodName.lastIndexOf('.'));
         String methodname = classAndMethodName.substring(classAndMethodName.lastIndexOf('.') + 1);
         visitJavaClass(repo.loadClass(classname));
-        Method[] meths = repo.loadClass(classname).getMethods();
+        Method[] meths = getMethods(repo.loadClass(classname));
         for(int i=0; i<meths.length; i++)
             if (meths[i].getName().equals(methodname))
                 visitJavaMethod(repo.loadClass(classname), meths[i]);
@@ -56,7 +63,7 @@ public class BytecodePruner {
                 } else {
                     JavaClass cl = repo.loadClass(s[i].substring(0, s[i].lastIndexOf('.')));;
                     bcp.visitJavaClass(cl);
-                    Method[] meths = cl.getMethods();
+                    Method[] meths = getMethods(cl);
                     for(int j=0; j<meths.length; j++) {
                         if (meths[j].getName().equals(s[i].substring(s[i].lastIndexOf('.') + 1)))
                             bcp.visitJavaMethod(cl, meths[j]);
@@ -70,17 +77,24 @@ public class BytecodePruner {
 
         // we call start(), but the VM calls run()...
         bcp.loadMethod("java.lang.Thread.run");
+        bcp.loadMethod("java.util.IdentityHashMap.put");
 
+        bcp.loadAllMethods("java.lang.SecurityContext");
+        bcp.visitJavaClass(repo.loadClass("java.awt.AWTPermission"));
         bcp.loadAllMethods("java.lang.Throwable");
         bcp.loadAllMethods("java.io.PrintStream");
+        bcp.loadAllMethods("java.util.PropertyPermission");
+        bcp.loadAllMethods("java.lang.ThreadDeath");
         bcp.loadAllMethods("gnu.gcj.runtime.StringBuffer");
         bcp.loadAllMethods("java.security.cert.Certificate");
+        bcp.loadAllMethods("java.security.cert.CertificateEncodingException");
 
         bcp.loadMethod("java.util.SimpleTimeZone.useDaylightTime");
         bcp.loadMethod("java.util.TimeZone.getAvailableIDs");
         bcp.loadMethod("java.util.TimeZone.getDefaultTimeZoneId");
         bcp.loadMethod("java.util.Collections$SynchronizedIterator.hasNext");
-        bcp.loadMethod("java.util.Hashtable$HashIterator.hasNext");
+        bcp.loadAllMethods("java.util.Hashtable$HashIterator");
+        bcp.loadAllMethods("gnu.gcj.runtime.VMClassLoader");
 
         bcp.visitJavaClass(repo.loadClass("java.util.Stack"));
         bcp.visitJavaClass(repo.loadClass("gnu.classpath.Configuration"));
@@ -99,6 +113,10 @@ public class BytecodePruner {
 
         // often called from native subclasses....
         bcp.loadAllMethods("org.ibex.Surface");
+        bcp.loadAllMethods("org.ibex.Template$TemplateHelper$1");
+        bcp.loadAllMethods("org.ibex.Surface$DoubleBufferedSurface");
+        bcp.loadAllMethods("org.ibex.Surface$3");
+        bcp.loadAllMethods("org.ibex.Surface$2");
         bcp.loadAllMethods("org.ibex.Picture");
         bcp.loadAllMethods("org.ibex.PixelBuffer");
         bcp.loadAllMethods("org.ibex.Platform");
@@ -114,7 +132,7 @@ public class BytecodePruner {
         bcp.loadAllMethods("java.text.NumberFormat");
 
 
-        Method[] meths = repo.loadClass("org.ibex.plat.Linux").getMethods();
+        Method[] meths = getMethods(repo.loadClass("org.ibex.plat.Linux"));
         for(int i=0; i<meths.length; i++) {
             if (meths[i].getName().equals("main"))
                 bcp.visitJavaMethod(repo.loadClass("org.ibex.plat.Linux"), meths[i]);
@@ -141,6 +159,7 @@ public class BytecodePruner {
 
     public static void dump(JavaClass clazz) throws Exception {
         if (clazz.getClassName().startsWith("java.sql.")) return;
+        if (!dest.contains(clazz)) return;
 
         ConstantPoolGen newcpg = new ConstantPoolGen(clazz.getConstantPool());
         ClassGen cg = new ClassGen(clazz);
@@ -159,40 +178,46 @@ public class BytecodePruner {
         // superprune: URLClassLoader, convert.In/Output other than needed, unneeded locales
         // reflective metadata is killing us...
         
-        Method[] methods = clazz.getMethods();
+        Method[] methods = getMethods(clazz);
         int numMethods = 0;
         boolean good = false;
         for(int i=0; i<methods.length; i++)
-            if (clazz.getClassName().startsWith("gnu.")
-                || clazz.getClassName().startsWith("java.lang.")
-                || clazz.getClassName().startsWith("java.io.")
-                || clazz.getClassName().startsWith("org.ibex.")) {
+            if (clazz.getClassName().startsWith("gnu.gcj.runtime.")
+                || clazz.getClassName().startsWith("java.io.FileDescriptor")
+                || clazz.getClassName().startsWith("org.ibex.")
+                || clazz.getClassName().startsWith("java.lang.")) {
                 good = true;
             } else if (dest.contains(methods[i])) {
                 if (!methods[i].getName().equals("<clinit>")) good = true;
             } else {
-                if (methods[i].getCode() != null) {
+                if (methods[i].getCode() == null) {
+                    System.out.println("  empty codeblock: " + clazz.getClassName() + "." + methods[i].getName());
+                } else {
                     System.out.println("  pruning " + clazz.getClassName() + "." + methods[i].getName());
-                    MethodGen mg = new MethodGen(methods[i], clazz.getClassName(), newcpg);
-                    mg.removeExceptions();
-                    InstructionList il = new InstructionList();
-                    mg.setInstructionList(il);
-
-                    InstructionHandle ih_0 = il.append(factory.createNew("java.lang.UnsatisfiedLinkError"));
-                    il.append(InstructionConstants.DUP);
-                    il.append(factory.createInvoke("java.lang.UnsatisfiedLinkError",
-                                                    "<init>", Type.VOID, Type.NO_ARGS, Constants.INVOKESPECIAL));
-                    il.append(InstructionConstants.ATHROW);
-
-                    mg.setMaxStack();
-                    mg.setMaxLocals();
-                    mg.removeExceptions();
-                    mg.removeLocalVariables();
-                    mg.removeExceptionHandlers();
-                    mg.removeLineNumbers();
-
-                    cg.replaceMethod(methods[i], mg.getMethod());
-                    il.dispose();
+                    if (!deleteMethods) {
+                        MethodGen mg = new MethodGen(methods[i], clazz.getClassName(), newcpg);
+                        mg.removeExceptions();
+                        InstructionList il = new InstructionList();
+                        mg.setInstructionList(il);
+                        
+                        InstructionHandle ih_0 = il.append(factory.createNew("java.lang.UnsatisfiedLinkError"));
+                        il.append(InstructionConstants.DUP);
+                        il.append(factory.createInvoke("java.lang.UnsatisfiedLinkError",
+                                                       "<init>", Type.VOID, Type.NO_ARGS, Constants.INVOKESPECIAL));
+                        il.append(InstructionConstants.ATHROW);
+                        
+                        mg.setMaxStack();
+                        mg.setMaxLocals();
+                        mg.removeExceptions();
+                        mg.removeLocalVariables();
+                        mg.removeExceptionHandlers();
+                        mg.removeLineNumbers();
+
+                        cg.replaceMethod(methods[i], mg.getMethod());
+                        il.dispose();
+                    } else {
+                        cg.removeMethod(methods[i]);
+                    }
                 }
             }
         if ((clazz.getClassName().startsWith("gnu.java.locale.LocaleInformation") &&
@@ -200,15 +225,25 @@ public class BytecodePruner {
              !clazz.getClassName().endsWith("LocaleInformation") &&
              !clazz.getClassName().endsWith("LocaleInformation_en_US"))
             ||
+            ((clazz.getClassName().startsWith("gnu.gcj.convert.Input_") ||
+              clazz.getClassName().startsWith("gnu.gcj.convert.Output_")) &&
+             !(clazz.getClassName().endsWith("ASCII") ||
+               clazz.getClassName().endsWith("UTF8") ||
+               clazz.getClassName().endsWith("iconv") ||
+               clazz.getClassName().endsWith("8859_1")))
+            ||
             (!good &&
              !clazz.isInterface() &&
              !clazz.isAbstract() &&
+             !clazz.getClassName().startsWith("java.io.") &&
+             !clazz.getClassName().startsWith("java.lang.") &&
+             !clazz.getClassName().startsWith("gnu.") &&
              !clazz.getClassName().endsWith("Error") &&
              !clazz.getClassName().endsWith("Exception") &&
              !clazz.getClassName().endsWith("Permission"))) {
 
-            System.out.println("DROPPING " + clazz.getClassName());
-            return;
+            //System.out.println("DROPPING " + clazz.getClassName());
+            //return;
         }
         new File(outdir + "/" + new File(clazz.getClassName().replace('.', '/')).getParent()).mkdirs();
         System.out.println("dumping " + clazz.getClassName());
@@ -248,8 +283,7 @@ public class BytecodePruner {
     // hashtable of hashsets
     public static Hashtable subclasses = new Hashtable();
 
-    public String getMethodSignature(Method m) throws Exception {
-        ConstantPoolGen cpg = new ConstantPoolGen(m.getConstantPool());
+    public String getMethodSignature(Method m, ConstantPoolGen cpg) throws Exception {
         return m.getName() + m.getSignature();
     }
 
@@ -259,16 +293,21 @@ public class BytecodePruner {
         for(int j=0; j<argtypes.length; j++) sig += argtypes[j].getSignature();
         return ii.getMethodName(cpg) + "(" + sig + ")" + ii.getReturnType(cpg).getSignature();
     }
+
     public static int level = 0;
     public void visitJavaMethod(JavaClass jc, Method method) throws Exception {
         visitJavaClass(jc);
+        if (jc.getClassName().equals("java.util.Date") && method.getName().equals("readObject")) return;
+        //if (jc.getClassName().equals("java.net.URLClassLoader")) return;
+        if (jc.getClassName().indexOf("SharedLib") != -1) return;
+        if (jc.getClassName().indexOf("Datagram") != -1) return;
         if (dest.contains(method)) return;
         dest.add(method);
         level += 2;
         for(int i=0; i<level; i++) System.out.print(" ");
-        System.out.println(jc.getClassName() + "." + getMethodSignature(method));
-        markMethodInSubclasses(jc, method);
         ConstantPoolGen cpg = new ConstantPoolGen(method.getConstantPool());
+        System.out.println(jc.getClassName() + "." + getMethodSignature(method, cpg));
+        markMethodInSubclasses(jc, method, cpg);
         if (method.getCode() == null) { level -= 2; return; }
         byte[] code = method.getCode().getCode();
         InstructionList il = new InstructionList(code);
@@ -283,17 +322,16 @@ public class BytecodePruner {
                 JavaClass c = sig2class(ii.getLoadClassType(cpg).getSignature());
                 load(ii.getReturnType(cpg));
                 load(ii.getType(cpg));
-                Method[] meths = c.getMethods();
+                Method[] meths = getMethods(c);
                 boolean good = false;
                 for(int i2=0; i2<meths.length; i2++) {
-                    if (getMethodSignature(meths[i2]).equals(ii_sig)) {
+                    if (getMethodSignature(meths[i2], cpg).equals(ii_sig)) {
                         visitJavaMethod(c, meths[i2]);
                         good = true;
                         break;
                     }
-                }
-                if (!good)
-                    throw new Exception("couldn't find method " + getMethodSignature(ii, cpg) + " in " + c.getClassName());
+                } 
+                if (!good) throw new Exception("couldn't find method " + getMethodSignature(ii, cpg) + " in " + c.getClassName());
             }
         }
         level -= 2;
@@ -313,72 +351,89 @@ public class BytecodePruner {
     }
 
     public void visitJavaClass(JavaClass clazz) throws Exception {
-
+        /*
+        if (clazz.getClassName().startsWith("java.security.") &&
+            !clazz.getClassName().equals("java.security.cert.Certificate")) return;
+        */
         if (dest.contains(clazz)) return;
         dest.add(clazz);
 
+        ConstantPoolGen cpg = new ConstantPoolGen(clazz.getConstantPool());
         String name = clazz.getClassName();
+        System.out.println(clazz.getClassName() + ".class");
 
         JavaClass superclass = clazz.getSuperClass();
-
         JavaClass[] interfaces = clazz.getAllInterfaces();
+        for(JavaClass sup = superclass; sup != null; sup = sup.getSuperClass()) {
+            if (subclasses.get(sup) == null) subclasses.put(sup, new HashSet());
+            ((HashSet)subclasses.get(sup)).add(clazz);
+        }
+        for(int i=0; i<interfaces.length; i++) {
+            if (subclasses.get(interfaces[i]) == null) subclasses.put(interfaces[i], new HashSet());
+            ((HashSet)subclasses.get(interfaces[i])).add(clazz);
+        }
+
+        for(JavaClass sup = superclass; sup != null; sup = sup.getSuperClass()) {
+            visitJavaClass(sup);
+            remarkMethods(sup, clazz, cpg);
+        }
+        for(int i=0; i<interfaces.length; i++) {
+            visitJavaClass(interfaces[i]);
+            remarkMethods(interfaces[i], clazz, cpg);
+        }
+
         Field[] fields = clazz.getFields();
-        Method[] methods = clazz.getMethods();
-        System.out.println(clazz.getClassName() + ".class");
-        for(int i=0; i<methods.length; i++)
-            if (methods[i].getName().equals("<clinit>")) visitJavaMethod(clazz, methods[i]);
+        Method[] methods = getMethods(clazz);
+        for(int i=0; i<fields.length; i++) visitJavaField(fields[i]);
         for(int i=0; i<methods.length; i++) {
+            if (methods[i].getName().equals("<clinit>")) visitJavaMethod(clazz, methods[i]);
+
+            // only if ctor reachable (?)
             if (methods[i].getName().equals("equals")) visitJavaMethod(clazz, methods[i]);
             if (methods[i].getName().equals("hashCode")) visitJavaMethod(clazz, methods[i]);
             if (methods[i].getName().equals("finalize")) visitJavaMethod(clazz, methods[i]);
             if (methods[i].getName().equals("clone")) visitJavaMethod(clazz, methods[i]);
             if (methods[i].getName().equals("toString")) visitJavaMethod(clazz, methods[i]);
         }
-        for(int i=0; i<fields.length; i++) visitJavaField(fields[i]);
-        if (superclass != null) {
-            for(JavaClass sup = superclass; sup != null; sup = sup.getSuperClass()) {
-                if (subclasses.get(sup) == null) subclasses.put(sup, new HashSet());
-                ((HashSet)subclasses.get(sup)).add(clazz);
-                visitJavaClass(sup);
-                remarkMethods(sup, clazz);
-            }
-        }
-        for(int i=0; i<interfaces.length; i++) {
-            if (subclasses.get(interfaces[i]) == null) subclasses.put(interfaces[i], new HashSet());
-            ((HashSet)subclasses.get(interfaces[i])).add(clazz);
-            visitJavaClass(interfaces[i]);
-            remarkMethods(interfaces[i], clazz);
-        }
     }
 
-    public void markMethodInSubclasses(JavaClass c, Method m, JavaClass subclass) throws Exception {
+    public void markMethodInSubclasses(JavaClass c, Method m, JavaClass subclass, ConstantPoolGen cpg) throws Exception {
         if (m.isStatic()) return;
-        String sig = getMethodSignature(m);
-        Method[] submethods = subclass.getMethods();
+        String sig = getMethodSignature(m, cpg);
+        Method[] submethods = getMethods(subclass);
         for(int j=0; j<submethods.length; j++)
-            if (getMethodSignature(submethods[j]).equals(sig))
+            if (getMethodSignature(submethods[j], cpg).equals(sig))
                 visitJavaMethod(subclass, submethods[j]);
     }
-    public void markMethodInSubclasses(JavaClass c, Method m) throws Exception {
+    public void markMethodInSubclasses(JavaClass c, Method m, ConstantPoolGen cpg) throws Exception {
         if (m.isStatic()) return;
         HashSet s = (HashSet)subclasses.get(c);
         if (s == null) return;
         Object[] subclasses = s.toArray();
         for(int i=0; i<subclasses.length; i++) {
             JavaClass subclass = (JavaClass)subclasses[i];
+            for(int j=0; j<level; j++) System.out.print(" ");
+            System.out.println("  [subclass " + subclass.getClassName() + "]");
             if (subclass == c) return;
-            markMethodInSubclasses(c, m, subclass);
+            markMethodInSubclasses(c, m, subclass, cpg);
         }
     }
         
-    public void remarkMethods(JavaClass c) throws Exception {
-        Method[] meths = c.getMethods();
-        for(int j=0; j<meths.length; j++) if (dest.contains(meths[j])) markMethodInSubclasses(c, meths[j]);
+    public void remarkMethods(JavaClass c, ConstantPoolGen cpg) throws Exception {
+        Method[] meths =getMethods(c);
+        for(int j=0; j<meths.length; j++) if (dest.contains(meths[j])) markMethodInSubclasses(c, meths[j], cpg);
+    }
+
+    public void remarkMethods(JavaClass c, JavaClass target, ConstantPoolGen cpg) throws Exception {
+        Method[] meths = getMethods(c);
+        for(int j=0; j<meths.length; j++) if (dest.contains(meths[j])) markMethodInSubclasses(c, meths[j], target, cpg);
     }
 
-    public void remarkMethods(JavaClass c, JavaClass target) throws Exception {
-        Method[] meths = c.getMethods();
-        for(int j=0; j<meths.length; j++) if (dest.contains(meths[j])) markMethodInSubclasses(c, meths[j], target);
+    public static Hashtable methodsHashtable = new Hashtable();
+    public static Method[] getMethods(JavaClass c) {
+        Method[] ret = (Method[])methodsHashtable.get(c);
+        if (ret == null) methodsHashtable.put(c, ret = c.getMethods());
+        return ret;
     }
 
 }
index 2046b77..9d03e6e 100644 (file)
@@ -15,6 +15,7 @@ import java.net.*;
 public class Log {
 
     public static boolean on = true;
+    public static boolean rpc = false;
     public static boolean color = false;
     public static boolean verbose = false;
     public static boolean logDates = false;
@@ -77,7 +78,10 @@ public class Log {
         if (firstMessage && !logDates) {
             firstMessage = false;
             logstream.println(colorize(GREEN, false, "==========================================================================="));
-            diag(Log.class, "Logging enabled at " + new java.util.Date());
+
+            // FIXME later: causes problems with method pruning
+            //diag(Log.class, "Logging enabled at " + new java.util.Date());
+
             if (color) diag(Log.class, "logging messages in " +
                 colorize(BLUE, true, "c") +
                 colorize(RED, true, "o") +