+++ /dev/null
-// Copyright 2003 Adam Megacz, see the COPYING file for licensing [GPL]
-
-package org.xwt.mips;
-
-import java.util.*;
-import java.io.*;
-
-import org.xwt.mips.util.SeekableData;
-import org.xwt.mips.util.SeekableFile;
-
-public abstract class Compiler implements Registers {
- /** The ELF binary being read */
- protected ELF elf;
-
- /** The name of the class beging generated */
- protected final String fullClassName;
-
- /** The name of the binary this class is begin generated from */
- protected String source = "unknown.mips.binary";
- public void setSource(String source) { this.source = source; }
-
- /** Thrown when the compilation fails for some reason */
- protected static class Exn extends Exception { public Exn(String s) { super(s); } }
-
- // Set this to true to enable fast memory access
- // When this is enabled a Java RuntimeException will be thrown when a page fault occures. When it is disabled
- // a FaultException will be throw which is easier to catch and deal with, however. as the name implies, this is slower
- protected boolean fastMem = true;
-
- // This MUST be a power of two. If it is not horrible things will happen
- // NOTE: This value can be much higher without breaking the classfile
- // specs (around 1024) but Hotstop seems to do much better with smaller
- // methods.
- protected int maxInsnPerMethod = 128;
-
- // non-configurable
- protected int maxBytesPerMethod;
- protected int methodMask;
- protected int methodShift;
- protected void maxInsnPerMethodInit() throws Exn {
- if((maxInsnPerMethod&(maxInsnPerMethod-1)) != 0) throw new Exn("maxBytesPerMethod is not a power of two");
- maxBytesPerMethod = maxInsnPerMethod*4;
- methodMask = ~(maxBytesPerMethod-1);
- while(maxBytesPerMethod>>>methodShift != 1) methodShift++;
- }
-
- // True to try to determine which case statement are needed and only include them
- protected boolean pruneCases = true;
-
- protected boolean assumeTailCalls = true;
-
- protected boolean optimizedMemcpy = true;
-
- // True to insert some code in the output to help diagnore compiler problems
- protected boolean debugCompiler = false;
-
- // True to print various statistics about the compilation
- protected boolean printStats = false;
-
- // True to generate runtime statistics that slow execution down significantly
- protected boolean runtimeStats = false;
-
- protected boolean supportCall = true;
-
- protected boolean nullPointerCheck = false;
-
- protected String runtimeClass = "org.xwt.mips.Runtime";
-
- protected String hashClass = "java.util.Hashtable";
-
- protected boolean unixRuntime;
-
- protected boolean lessConstants = false;
-
- protected int pageSize = 4096;
- protected int totalPages = 65536;
- protected int pageShift;
- protected boolean onePage;
-
- protected void pageSizeInit() throws Exn {
- try {
- Runtime.checkPageSize(pageSize,totalPages);
- } catch(IllegalArgumentException e) {
- throw new Exn(e.getMessage());
- }
- while(pageSize>>>pageShift != 1) pageShift++;
- }
-
- /** The address of the memcpy function in the binary (used for optimizedMemcpy) */
- protected int memcpy;
-
- /** The address of the memset function in the binary (used for optimizedMemcpy) */
- protected int memset;
-
- /** A set of all addresses that can be jumped too (only available if pruneCases == true) */
- protected Set jumpableAddresses;
-
- /** Some important symbols */
- ELF.Symbol userInfo, gp;
-
- private static void usage() {
- System.err.println("Usage: java Compiler [-outfile output.java] [-o options] [-dumpoptions] <classname> <binary.mips>");
- System.err.println("-o takes mount(8) like options and can be specified multiple times");
- System.err.println("Available options:");
- for(int i=0;i<options.length;i+=2)
- System.err.print(options[i] + ": " + wrapAndIndent(options[i+1],18-2-options[i].length(),18,62));
- System.exit(1);
- }
-
- public static void main(String[] args) throws IOException {
- String outfile = null;
- String o = null;
- String className = null;
- String mipsBinaryFileName = null;
- String outformat = null;
- boolean dumpOptions = false;
- int arg = 0;
- while(args.length-arg > 0) {
- if(args[arg].equals("-outfile")) {
- arg++;
- if(arg==args.length) usage();
- outfile = args[arg];
- } else if(args[arg].equals("-outformat")) {
- arg++;
- if(arg==args.length) usage();
- outformat = args[arg];
- } else if(args[arg].equals("-o")) {
- arg++;
- if(arg==args.length) usage();
- if(o==null || o.length() == 0)
- o = args[arg];
- else if(args[arg].length() != 0)
- o += "," + args[arg];
- } else if(args[arg].equals("-dumpoptions")) {
- dumpOptions = true;
- } else if(className == null) {
- className = args[arg];
- } else if(mipsBinaryFileName == null) {
- mipsBinaryFileName = args[arg];
- } else {
- usage();
- }
- arg++;
- }
- if(className == null || mipsBinaryFileName == null) usage();
-
- SeekableData mipsBinary = new SeekableFile(mipsBinaryFileName);
-
- Writer w = null;
- OutputStream os = null;
- Compiler comp = null;
- if(outformat == null || outformat.equals("class")) {
- if(outfile == null) {
- System.err.println("Refusing to write a classfile to stdout - use -outfile foo.class");
- System.exit(1);
- }
- os = new FileOutputStream(outfile);
- comp = new ClassFileCompiler(mipsBinary,className,os);
- } else if(outformat.equals("javasource") || outformat .equals("java")) {
- w = outfile == null ? new OutputStreamWriter(System.out): new FileWriter(outfile);
- comp = new JavaSourceCompiler(mipsBinary,className,w);
- } else {
- System.err.println("Unknown output format: " + outformat);
- System.exit(1);
- }
-
- comp.parseOptions(o);
- comp.setSource(mipsBinaryFileName);
-
- if(dumpOptions) {
- System.err.println("== Options ==");
- for(int i=0;i<options.length;i+=2)
- System.err.println(options[i] + ": " + comp.getOption(options[i]).get());
- System.err.println("== End Options ==");
- }
-
- try {
- comp.go();
- } catch(Exn e) {
- System.err.println("Compiler Error: " + e.getMessage());
- System.exit(1);
- } finally {
- if(w != null) w.close();
- if(os != null) os.close();
- }
- }
-
- public Compiler(SeekableData binary, String fullClassName) throws IOException {
- this.fullClassName = fullClassName;
- elf = new ELF(binary);
-
- if(elf.header.type != ELF.ELFHeader.ET_EXEC) throw new IOException("Binary is not an executable");
- if(elf.header.machine != ELF.ELFHeader.EM_MIPS) throw new IOException("Binary is not for the MIPS I Architecture");
- if(elf.ident.data != ELF.ELFIdent.ELFDATA2MSB) throw new IOException("Binary is not big endian");
- }
-
- protected abstract void _go() throws Exn, IOException;
-
- private boolean used;
- public void go() throws Exn, IOException {
- if(used) throw new RuntimeException("Compiler instances are good for one shot only");
- used = true;
-
- if(onePage && pageSize <= 4096) pageSize = 4*1024*1024;
- if(nullPointerCheck && !fastMem) throw new Exn("fastMem must be enabled for nullPointerCheck to be of any use");
- if(onePage && !fastMem) throw new Exn("fastMem must be enabled for onePage to be of any use");
- if(totalPages == 1 && !onePage) throw new Exn("totalPages == 1 and onePage is not set");
- if(onePage) totalPages = 1;
-
- maxInsnPerMethodInit();
- pageSizeInit();
-
- // Get a copy of the symbol table in the elf binary
- ELF.Symtab symtab = elf.getSymtab();
- if(symtab == null) throw new Exn("Binary has no symtab (did you strip it?)");
- ELF.Symbol sym;
-
- // Check for some functions we can override
- sym = symtab.getGlobalSymbol("memcpy");
- memcpy = sym == null ? -1 : sym.addr;
-
- sym = symtab.getGlobalSymbol("memset");
- memset = sym == null ? -1 : sym.addr;
-
- userInfo = symtab.getGlobalSymbol("user_info");
- gp = symtab.getGlobalSymbol("_gp");
- if(gp == null) throw new Exn("no _gp symbol (did you strip the binary?)");
-
- if(pruneCases) {
- // Find all possible branches
- jumpableAddresses = new HashSet();
-
- jumpableAddresses.add(new Integer(elf.header.entry));
-
- ELF.SHeader text = elf.sectionWithName(".text");
- if(text == null) throw new Exn("No .text segment");
-
- findBranchesInSymtab(symtab,jumpableAddresses);
-
- for(int i=0;i<elf.sheaders.length;i++) {
- ELF.SHeader sheader = elf.sheaders[i];
- String name = sheader.name;
- // if this section doesn't get loaded into our address space don't worry about it
- if(sheader.addr == 0x0) continue;
- if(name.equals(".data") || name.equals(".sdata") || name.equals(".rodata") || name.equals(".ctors") || name.equals(".dtors"))
- findBranchesInData(new DataInputStream(sheader.getInputStream()),sheader.size,jumpableAddresses,text.addr,text.addr+text.size);
- }
-
- findBranchesInText(text.addr,new DataInputStream(text.getInputStream()),text.size,jumpableAddresses);
- }
-
- if(unixRuntime && runtimeClass.startsWith("org.xwt.mips.")) runtimeClass = "org.xwt.mips.UnixRuntime";
-
- for(int i=0;i<elf.sheaders.length;i++) {
- String name = elf.sheaders[i].name;
- if(elf.sheaders[i].addr != 0 && !(
- name.equals(".text")|| name.equals(".data") || name.equals(".sdata") || name.equals(".rodata") ||
- name.equals(".ctors") || name.equals(".dtors") || name.equals(".bss") || name.equals(".sbss")))
- throw new Exn("Unknown section: " + name);
- }
- _go();
- }
-
- private void findBranchesInSymtab(ELF.Symtab symtab, Set jumps) {
- ELF.Symbol[] symbols = symtab.symbols;
- int n=0;
- for(int i=0;i<symbols.length;i++) {
- ELF.Symbol s = symbols[i];
- if(s.type == ELF.Symbol.STT_FUNC) {
- if(jumps.add(new Integer(s.addr))) {
- //System.err.println("Adding symbol from symtab: " + s.name + " at " + toHex(s.addr));
- n++;
- }
- }
- }
- if(printStats) System.err.println("Found " + n + " additional possible branch targets in Symtab");
- }
-
- private void findBranchesInText(int base, DataInputStream dis, int size, Set jumps) throws IOException {
- int count = size/4;
- int pc = base;
- int n=0;
- int[] lui_val = new int[32];
- int[] lui_pc = new int[32];
- //Interpreter inter = new Interpreter(source);
-
- for(int i=0;i<count;i++,pc+=4) {
- int insn = dis.readInt();
- int op = (insn >>> 26) & 0xff;
- int rs = (insn >>> 21) & 0x1f;
- int rt = (insn >>> 16) & 0x1f;
- int signedImmediate = (insn << 16) >> 16;
- int unsignedImmediate = insn & 0xffff;
- int branchTarget = signedImmediate;
- int jumpTarget = (insn & 0x03ffffff);
- int subcode = insn & 0x3f;
-
- switch(op) {
- case 0:
- switch(subcode) {
- case 9: // JALR
- if(jumps.add(new Integer(pc+8))) n++; // return address
- break;
- case 12: // SYSCALL
- if(jumps.add(new Integer(pc+4))) n++;
- break;
- }
- break;
- case 1:
- switch(rt) {
- case 16: // BLTZAL
- case 17: // BGTZAL
- if(jumps.add(new Integer(pc+8))) n++; // return address
- // fall through
- case 0: // BLTZ
- case 1: // BGEZ
- if(jumps.add(new Integer(pc+branchTarget*4+4))) n++;
- break;
- }
- break;
- case 3: // JAL
- if(jumps.add(new Integer(pc+8))) n++; // return address
- // fall through
- case 2: // J
- if(jumps.add(new Integer((pc&0xf0000000)|(jumpTarget << 2)))) n++;
- break;
- case 4: // BEQ
- case 5: // BNE
- case 6: // BLEZ
- case 7: // BGTZ
- if(jumps.add(new Integer(pc+branchTarget*4+4))) n++;
- break;
- case 9: { // ADDIU
- if(pc - lui_pc[rs] <= 4*32) {
- int t = (lui_val[rs]<<16)+signedImmediate;
- if((t&3)==0 && t >= base && t < base+size) {
- if(jumps.add(new Integer(t))) {
- //System.err.println("Possible jump to " + toHex(t) + " (" + inter.sourceLine(t) + ") from " + toHex(pc) + " (" + inter.sourceLine(pc) + ")");
- n++;
- }
- }
- // we just blew it away
- if(rt == rs) lui_pc[rs] = 0;
- }
- break;
- }
- case 15: { // LUI
- lui_val[rt] = unsignedImmediate;
- lui_pc[rt] = pc;
- break;
- }
-
- case 17: // FPU Instructions
- switch(rs) {
- case 8: // BC1F, BC1T
- if(jumps.add(new Integer(pc+branchTarget*4+4))) n++;
- break;
- }
- break;
- }
- }
- dis.close();
- if(printStats) System.err.println("Found " + n + " additional possible branch targets in Text segment");
- }
-
- private void findBranchesInData(DataInputStream dis, int size, Set jumps, int textStart, int textEnd) throws IOException {
- int count = size/4;
- int n=0;
- for(int i=0;i<count;i++) {
- int word = dis.readInt();
- if((word&3)==0 && word >= textStart && word < textEnd) {
- if(jumps.add(new Integer(word))) {
- //System.err.println("Added " + toHex(word) + " as possible branch target (fron data segment)");
- n++;
- }
- }
- }
- dis.close();
- if(n>0 && printStats) System.err.println("Found " + n + " additional possible branch targets in Data segment");
- }
-
- // Helper functions for pretty output
- protected final static String toHex(int n) { return "0x" + Long.toString(n & 0xffffffffL, 16); }
- protected final static String toHex8(int n) {
- String s = Long.toString(n & 0xffffffffL, 16);
- StringBuffer sb = new StringBuffer("0x");
- for(int i=8-s.length();i>0;i--) sb.append('0');
- sb.append(s);
- return sb.toString();
- }
-
- protected final static String toOctal3(int n) {
- char[] buf = new char[3];
- for(int i=2;i>=0;i--) {
- buf[i] = (char) ('0' + (n & 7));
- n >>= 3;
- }
- return new String(buf);
- }
-
- // Option parsing
- private class Option {
- private java.lang.reflect.Field field;
- public Option(String name) throws NoSuchFieldException { field = name==null ? null : Compiler.class.getDeclaredField(name); }
- public void set(Object val) {
- if(field == null) return;
- try {
- field.setAccessible(true);
- field.set(Compiler.this,val);
- } catch(IllegalAccessException e) {
- System.err.println(e);
- }
- }
- public Object get() {
- if(field == null) return null;
- try {
- field.setAccessible(true);
- return field.get(Compiler.this);
- } catch(IllegalAccessException e) {
- System.err.println(e); return null;
- }
- }
- public Class getType() { return field == null ? null : field.getType(); }
- }
-
- private static String[] options = {
- "fastMem", "Enable fast memory access - RuntimeExceptions will be thrown on faults",
- "nullPointerCheck", "Enables checking at runtime for null pointer accessses (slows things down a bit, only applicable with fastMem)",
- "maxInsnPerMethod", "Maximum number of MIPS instructions per java method (128 is optimal with Hotspot)",
- "pruneCases", "Remove unnecessary case 0xAABCCDD blocks from methods - may break some weird code",
- "assumeTailCalls", "Assume the JIT optimizes tail calls",
- "optimizedMemcpy", "Use an optimized java version of memcpy where possible",
- "debugCompiler", "Output information in the generated code for debugging the compiler - will slow down generated code significantly",
- "printStats", "Output some useful statistics about the compilation",
- "runtimeStats", "Keep track of some statistics at runtime in the generated code - will slow down generated code significantly",
- "supportCall", "Keep a stripped down version of the symbol table in the generated code to support the call() method",
- "runtimeClass", "Full classname of the Runtime class (default: Runtime) - use this is you put Runtime in a package",
- "hashClass", "Full classname of a Hashtable class (default: java.util.HashMap) - this must support get() and put()",
- "unixRuntime", "Use the UnixRuntime (has support for fork, wai, du, pipe, etc)",
- "pageSize", "The page size (must be a power of two)",
- "totalPages", "Total number of pages (total mem = pageSize*totalPages, must be a power of two)",
- "onePage", "One page hack (FIXME: document this better)",
- "lessConstants", "Use less constants at the cost of speed (FIXME: document this better)"
- };
-
- private Option getOption(String name) {
- name = name.toLowerCase();
- try {
- for(int i=0;i<options.length;i+=2)
- if(options[i].toLowerCase().equals(name))
- return new Option(options[i]);
- return null;
- } catch(NoSuchFieldException e) {
- return null;
- }
- }
-
- public void parseOptions(String opts) {
- if(opts == null || opts.length() == 0) return;
- StringTokenizer st = new StringTokenizer(opts,",");
- while(st.hasMoreElements()) {
- String tok = st.nextToken();
- String key;
- String val;
- if(tok.indexOf("=") != -1) {
- key = tok.substring(0,tok.indexOf("="));
- val = tok.substring(tok.indexOf("=")+1);
- } else if(tok.startsWith("no")) {
- key = tok.substring(2);
- val = "false";
- } else {
- key = tok;
- val = "true";
- }
- Option opt = getOption(key);
- if(opt == null) {
- System.err.println("WARNING: No such option: " + key);
- continue;
- }
-
- if(opt.getType() == String.class)
- opt.set(val);
- else if(opt.getType() == Integer.TYPE)
- try {
- opt.set(parseInt(val));
- } catch(NumberFormatException e) {
- System.err.println("WARNING: " + val + " is not an integer");
- }
- else if(opt.getType() == Boolean.TYPE)
- opt.set(new Boolean(val.toLowerCase().equals("true")||val.toLowerCase().equals("yes")));
- else
- throw new Error("Unknown type: " + opt.getType());
- }
- }
-
- private static Integer parseInt(String s) {
- int mult = 1;
- s = s.toLowerCase();
- if(!s.startsWith("0x") && s.endsWith("m")) { s = s.substring(0,s.length()-1); mult = 1024*1024; }
- else if(!s.startsWith("0x") && s.endsWith("k")) { s = s.substring(0,s.length()-1); mult = 1024; }
- int n;
- if(s.length() > 2 && s.startsWith("0x")) n = Integer.parseInt(s.substring(2),16);
- else n = Integer.parseInt(s);
- return new Integer(n*mult);
- }
-
- private static String wrapAndIndent(String s, int firstindent, int indent, int width) {
- StringTokenizer st = new StringTokenizer(s," ");
- StringBuffer sb = new StringBuffer();
- for(int i=0;i<firstindent;i++)
- sb.append(' ');
- int sofar = 0;
- while(st.hasMoreTokens()) {
- String tok = st.nextToken();
- if(tok.length() + sofar + 1 > width && sofar > 0) {
- sb.append('\n');
- for(int i=0;i<indent;i++) sb.append(' ');
- sofar = 0;
- } else if(sofar > 0) {
- sb.append(' ');
- sofar++;
- }
- sb.append(tok);
- sofar += tok.length();
- }
- sb.append('\n');
- return sb.toString();
- }
-
- // This ugliness is to work around a gcj static linking bug (Bug 12908)
- // The best solution is to force gnu.java.locale.Calendar to be linked in but this'll do
- protected static String dateTime() {
- try {
- return new Date().toString();
- } catch(RuntimeException e) {
- return "<unknown>";
- }
- }
-}
-
projects / nestedvm.git / blobdiff