text:
// Copyright 2000-2005 the Contributors, as shown in the revision logs.
// Licensed under the Apache License 2.0 ("the License").
// You may not use this file except in compliance with the License.

// Copyright 2003 Brian Alliet
// Based on org.xwt.imp.MIPS by Adam Megacz
// Portions Copyright 2003 Adam Megacz

package org.ibex.nestedvm;

import org.ibex.nestedvm.util.*;
import java.io.*;

public abstract class Runtime implements UsermodeConstants,Registers,Cloneable {
    public static final String VERSION = "1.0";

    /** True to write useful diagnostic information to stderr when things go wrong */
    final static boolean STDERR_DIAG = true;

    /** Number of bits to shift to get the page number (1<<<pageShift == pageSize) */
    protected final int pageShift;
    /** Bottom of region of memory allocated to the stack */
    private final int stackBottom;

    /** Readable main memory pages */
    protected int[][] readPages;
    /** Writable main memory pages.
        If the page is writable writePages[x] == readPages[x]; if not writePages[x] == null. */
    protected int[][] writePages;

    /** The address of the end of the heap */
    private int heapEnd;

    /** Number of guard pages to keep between the stack and the heap */
    private static final int STACK_GUARD_PAGES = 4;

    /** The last address the executable uses (other than the heap/stack) */
    protected abstract int heapStart();

    /** The program's entry point */
    protected abstract int entryPoint();

    /** The location of the _user_info block (or 0 is there is none) */
    protected int userInfoBase() { return 0; }
    protected int userInfoSize() { return 0; }

    /** The location of the global pointer */
    protected abstract int gp();

    /** When the process started */
    private long startTime;

    /** Program is executing instructions */
    public final static int RUNNING = 0; // Horrible things will happen if this isn't 0
    /**  Text/Data loaded in memory  */
    public final static int STOPPED = 1;
    /** Prgram has been started but is paused */
    public final static int PAUSED = 2;
    /** Program is executing a callJava() method */
    public final static int CALLJAVA = 3;
    /** Program has exited (it cannot currently be restarted) */
    public final static int EXITED = 4;
    /** Program has executed a successful exec(), a new Runtime needs to be run (used by UnixRuntime) */
    public final static int EXECED = 5;

    /** The current state */
    protected int state = STOPPED;
    /** @see Runtime#state state */
    public final int getState() { return state; }

    /** The exit status if the process (only valid if state==DONE)
        @see Runtime#state */
    private int exitStatus;
    public ExecutionException exitException;

    /** Table containing all open file descriptors. (Entries are null if the fd is not in use */
    FD[] fds; // package-private for UnixRuntime
    boolean closeOnExec[];

    /** Pointer to a SecurityManager for this process */
    SecurityManager sm;
    public void setSecurityManager(SecurityManager sm) { this.sm = sm; }

    /** Pointer to a callback for the call_java syscall */
    private CallJavaCB callJavaCB;
    public void setCallJavaCB(CallJavaCB callJavaCB) { this.callJavaCB = callJavaCB; }

    /** Temporary buffer for read/write operations */
    private byte[] _byteBuf;
    /** Max size of temporary buffer
        @see Runtime#_byteBuf */
    final static int MAX_CHUNK = 16*1024*1024 - 1024;

    /** Subclasses should actually execute program in this method. They should continue
        executing until state != RUNNING. Only syscall() can modify state. It is safe
        to only check the state attribute after a call to syscall() */
    protected abstract void _execute() throws ExecutionException;

    /** Subclasses should return the address of the symbol symbol or -1 it it doesn't exits in this method
        This method is only required if the call() function is used */
    public int lookupSymbol(String symbol) { return -1; }

    /** Subclasses should populate a CPUState object representing the cpu state */
    protected abstract void getCPUState(CPUState state);

    /** Subclasses should set the CPUState to the state held in state */
    protected abstract void setCPUState(CPUState state);

    /** True to enabled a few hacks to better support the win32 console */
    final static boolean win32Hacks;

    static {
        String os = Platform.getProperty("os.name");
        String prop = Platform.getProperty("nestedvm.win32hacks");
        if(prop != null) { win32Hacks = Boolean.valueOf(prop).booleanValue(); }
        else { win32Hacks = os != null && os.toLowerCase().indexOf("windows") != -1; }
    }

    protected Object clone() throws CloneNotSupportedException {
        Runtime r = (Runtime) super.clone();
        r._byteBuf = null;
        r.startTime = 0;
        r.fds = new FD[OPEN_MAX];
        for(int i=0;i<OPEN_MAX;i++) if(fds[i] != null) r.fds[i] = fds[i].dup();
        int totalPages = writePages.length;
        r.readPages = new int[totalPages][];
        r.writePages = new int[totalPages][];
        for(int i=0;i<totalPages;i++) {
            if(readPages[i] == null) continue;
            if(writePages[i] == null) r.readPages[i] = readPages[i];
            else r.readPages[i] = r.writePages[i] = (int[])writePages[i].clone();
        }
        return r;
    }

    protected Runtime(int pageSize, int totalPages) { this(pageSize, totalPages,false); }
    protected Runtime(int pageSize, int totalPages, boolean exec) {
        if(pageSize <= 0) throw new IllegalArgumentException("pageSize <= 0");
        if(totalPages <= 0) throw new IllegalArgumentException("totalPages <= 0");
        if((pageSize&(pageSize-1)) != 0) throw new IllegalArgumentException("pageSize not a power of two");

        int _pageShift = 0;
        while(pageSize>>>_pageShift != 1) _pageShift++;
        pageShift = _pageShift;

        int heapStart = heapStart();
        int totalMemory = totalPages * pageSize;
        int stackSize = max(totalMemory/512,ARG_MAX+65536);
        int stackPages = 0;
        if(totalPages > 1) {
            stackSize = max(stackSize,pageSize);
            stackSize = (stackSize + pageSize - 1) & ~(pageSize-1);
            stackPages = stackSize >>> pageShift;
            heapStart = (heapStart + pageSize - 1) & ~(pageSize-1);
            if(stackPages + STACK_GUARD_PAGES + (heapStart >>> pageShift) >= totalPages)
                throw new IllegalArgumentException("total pages too small");
        } else {
            if(pageSize < heapStart + stackSize) throw new IllegalArgumentException("total memory too small");
            heapStart = (heapStart + 4095) & ~4096;
        }

        stackBottom = totalMemory - stackSize;
        heapEnd = heapStart;

        readPages = new int[totalPages][];
        writePages = new int[totalPages][];

        if(totalPages == 1) {
            readPages[0] = writePages[0] = new int[pageSize>>2];
        } else {
            for(int i=(stackBottom >>> pageShift);i<writePages.length;i++) {
                readPages[i] = writePages[i] = new int[pageSize>>2];
            }
        }

        if(!exec) {
            fds = new FD[OPEN_MAX];
            closeOnExec = new boolean[OPEN_MAX];

            InputStream stdin = win32Hacks ? new Win32ConsoleIS(System.in) : System.in;
            addFD(new TerminalFD(stdin));
            addFD(new TerminalFD(System.out));
            addFD(new TerminalFD(System.err));
        }
    }

    /** Copy everything from src to addr initializing uninitialized pages if required.
       Newly initalized pages will be marked read-only if ro is set */
    protected final void initPages(int[] src, int addr, boolean ro) {
        int pageWords = (1<<pageShift)>>>2;
        int pageMask = (1<<pageShift) - 1;

        for(int i=0;i<src.length;) {
            int page = addr >>> pageShift;
            int start = (addr&pageMask)>>2;
            int elements = min(pageWords-start,src.length-i);
            if(readPages[page]==null) {
                initPage(page,ro);
            } else if(!ro) {
                if(writePages[page] == null) writePages[page] = readPages[page];
            }
            System.arraycopy(src,i,readPages[page],start,elements);
            i += elements;
            addr += elements*4;
        }
    }

    /** Initialize words of pages starting at addr to 0 */
    protected final void clearPages(int addr, int words) {
        int pageWords = (1<<pageShift)>>>2;
        int pageMask = (1<<pageShift) - 1;

        for(int i=0;i<words;) {
            int page = addr >>> pageShift;
            int start = (addr&pageMask)>>2;
            int elements = min(pageWords-start,words-i);
            if(readPages[page]==null) {
                readPages[page] = writePages[page] = new int[pageWords];
            } else {
                if(writePages[page] == null) writePages[page] = readPages[page];
                for(int j=start;j<start+elements;j++) writePages[page][j] = 0;
            }
            i += elements;
            addr += elements*4;
        }
    }

    /** Copies length bytes from the processes memory space starting at
        addr INTO a java byte array a */
    public final void copyin(int addr, byte[] buf, int count) throws ReadFaultException {
        int pageWords = (1<<pageShift)>>>2;
        int pageMask = pageWords - 1;

        int x=0;
        if(count == 0) return;
        if((addr&3)!=0) {
            int word = memRead(addr&~3);
            switch(addr&3) {
                case 1: buf[x++] = (byte)((word>>>16)&0xff); if(--count==0) break;
                case 2: buf[x++] = (byte)((word>>> 8)&0xff); if(--count==0) break;
                case 3: buf[x++] = (byte)((word>>> 0)&0xff); if(--count==0) break;
            }
            addr = (addr&~3)+4;
        }
        if((count&~3) != 0) {
            int c = count>>>2;
            int a = addr>>>2;
            while(c != 0) {
                int[] page = readPages[a >>> (pageShift-2)];
                if(page == null) throw new ReadFaultException(a<<2);
                int index = a&pageMask;
                int n = min(c,pageWords-index);
                for(int i=0;i<n;i++,x+=4) {
                    int word = page[index+i];
                    buf[x+0] = (byte)((word>>>24)&0xff); buf[x+1] = (byte)((word>>>16)&0xff);
                    buf[x+2] = (byte)((word>>> 8)&0xff); buf[x+3] = (byte)((word>>> 0)&0xff);
                }
                a += n; c -=n;
            }
            addr = a<<2; count &=3;
        }
        if(count != 0) {
            int word = memRead(addr);
            switch(count) {
                case 3: buf[x+2] = (byte)((word>>>8)&0xff);
                case 2: buf[x+1] = (byte)((word>>>16)&0xff);
                case 1: buf[x+0] = (byte)((word>>>24)&0xff);
            }
        }
    }

    /** Copies length bytes OUT OF the java array a into the processes memory
        space at addr */
    public final void copyout(byte[] buf, int addr, int count) throws FaultException {
        int pageWords = (1<<pageShift)>>>2;
        int pageWordMask = pageWords - 1;

        int x=0;
        if(count == 0) return;
        if((addr&3)!=0) {
            int word = memRead(addr&~3);
            switch(addr&3) {
                case 1: word = (word&0xff00ffff)|((buf[x++]&0xff)<<16); if(--count==0) break;
                case 2: word = (word&0xffff00ff)|((buf[x++]&0xff)<< 8); if(--count==0) break;
                case 3: word = (word&0xffffff00)|((buf[x++]&0xff)<< 0); if(--count==0) break;
            }
            memWrite(addr&~3,word);
            addr += x;
        }

        if((count&~3) != 0) {
            int c = count>>>2;
            int a = addr>>>2;
            while(c != 0) {
                int[] page = writePages[a >>> (pageShift-2)];
                if(page == null) throw new WriteFaultException(a<<2);
                int index = a&pageWordMask;
                int n = min(c,pageWords-index);
                for(int i=0;i<n;i++,x+=4)
                    page[index+i] = ((buf[x+0]&0xff)<<24)|((buf[x+1]&0xff)<<16)|((buf[x+2]&0xff)<<8)|((buf[x+3]&0xff)<<0);
                a += n; c -=n;
            }
            addr = a<<2; count&=3;
        }

        if(count != 0) {
            int word = memRead(addr);
            switch(count) {
                case 1: word = (word&0x00ffffff)|((buf[x+0]&0xff)<<24); break;
                case 2: word = (word&0x0000ffff)|((buf[x+0]&0xff)<<24)|((buf[x+1]&0xff)<<16); break;
                case 3: word = (word&0x000000ff)|((buf[x+0]&0xff)<<24)|((buf[x+1]&0xff)<<16)|((buf[x+2]&0xff)<<8); break;
            }
            memWrite(addr,word);
        }
    }

    public final void memcpy(int dst, int src, int count) throws FaultException {
        int pageWords = (1<<pageShift)>>>2;
        int pageWordMask = pageWords - 1;
        if((dst&3) == 0 && (src&3)==0) {
            if((count&~3) != 0) {
                int c = count>>2;
                int s = src>>>2;
                int d = dst>>>2;
                while(c != 0) {
                    int[] srcPage = readPages[s>>>(pageShift-2)];
                    if(srcPage == null) throw new ReadFaultException(s<<2);
                    int[] dstPage = writePages[d>>>(pageShift-2)];
                    if(dstPage == null) throw new WriteFaultException(d<<2);
                    int srcIndex = s&pageWordMask;
                    int dstIndex = d&pageWordMask;
                    int n = min(c,pageWords-max(srcIndex,dstIndex));
                    System.arraycopy(srcPage,srcIndex,dstPage,dstIndex,n);
                    s += n; d += n; c -= n;
                }
                src = s<<2; dst = d<<2; count&=3;
            }
            if(count != 0) {
                int word1 = memRead(src);
                int word2 = memRead(dst);
                switch(count) {
                    case 1: memWrite(dst,(word1&0xff000000)|(word2&0x00ffffff)); break;
                    case 2: memWrite(dst,(word1&0xffff0000)|(word2&0x0000ffff)); break;
                    case 3: memWrite(dst,(word1&0xffffff00)|(word2&0x000000ff)); break;
                }
            }
        } else {
            while(count > 0) {
                int n = min(count,MAX_CHUNK);
                byte[] buf = byteBuf(n);
                copyin(src,buf,n);
                copyout(buf,dst,n);
                count -= n; src += n; dst += n;
            }
        }
    }

    public final void memset(int addr, int ch, int count) throws FaultException {
        int pageWords = (1<<pageShift)>>>2;
        int pageWordMask = pageWords - 1;

        int fourBytes = ((ch&0xff)<<24)|((ch&0xff)<<16)|((ch&0xff)<<8)|((ch&0xff)<<0);
        if((addr&3)!=0) {
            int word = memRead(addr&~3);
            switch(addr&3) {
                case 1: word = (word&0xff00ffff)|((ch&0xff)<<16); if(--count==0) break;
                case 2: word = (word&0xffff00ff)|((ch&0xff)<< 8); if(--count==0) break;
                case 3: word = (word&0xffffff00)|((ch&0xff)<< 0); if(--count==0) break;
            }
            memWrite(addr&~3,word);
            addr = (addr&~3)+4;
        }
        if((count&~3) != 0) {
            int c = count>>2;
            int a = addr>>>2;
            while(c != 0) {
                int[] page = readPages[a>>>(pageShift-2)];
                if(page == null) throw new WriteFaultException(a<<2);
                int index = a&pageWordMask;
                int n = min(c,pageWords-index);
                /* Arrays.fill(page,index,index+n,fourBytes);*/
                for(int i=index;i<index+n;i++) page[i] = fourBytes;
                a += n; c -= n;
            }
            addr = a<<2; count&=3;
        }
        if(count != 0) {
            int word = memRead(addr);
            switch(count) {
                case 1: word = (word&0x00ffffff)|(fourBytes&0xff000000); break;
                case 2: word = (word&0x0000ffff)|(fourBytes&0xffff0000); break;
                case 3: word = (word&0x000000ff)|(fourBytes&0xffffff00); break;
            }
            memWrite(addr,word);
        }
    }

    /** Read a word from the processes memory at addr */
    public final int memRead(int addr) throws ReadFaultException  {
        if((addr & 3) != 0) throw new ReadFaultException(addr);
        return unsafeMemRead(addr);
    }

    protected final int unsafeMemRead(int addr) throws ReadFaultException {
        int page = addr >>> pageShift;
        int entry = (addr&(1<<pageShift) - 1)>>2;
        try {
            return readPages[page][entry];
        } catch(ArrayIndexOutOfBoundsException e) {
            if(page < 0 || page >= readPages.length) throw new ReadFaultException(addr);
            throw e; // should never happen
        } catch(NullPointerException e) {
            throw new ReadFaultException(addr);
        }
    }

    /** Writes a word to the processes memory at addr */
    public final void memWrite(int addr, int value) throws WriteFaultException  {
        if((addr & 3) != 0) throw new WriteFaultException(addr);
        unsafeMemWrite(addr,value);
    }

    protected final void unsafeMemWrite(int addr, int value) throws WriteFaultException {
        int page = addr >>> pageShift;
        int entry = (addr&(1<<pageShift) - 1)>>2;
        try {
            writePages[page][entry] = value;
        } catch(ArrayIndexOutOfBoundsException e) {
            if(page < 0 || page >= writePages.length) throw new WriteFaultException(addr);
            throw e; // should never happen
        } catch(NullPointerException e) {
            throw new WriteFaultException(addr);
        }
    }

    /** Created a new non-empty writable page at page number page */
    private final int[] initPage(int page) { return initPage(page,false); }
    /** Created a new non-empty page at page number page. If ro is set the page will be read-only */
    private final int[] initPage(int page, boolean ro) {
        int[] buf = new int[(1<<pageShift)>>>2];
        writePages[page] = ro ? null : buf;
        readPages[page] = buf;
        return buf;
    }

    /** Returns the exit status of the process. (only valid if state == DONE)
        @see Runtime#state */
    public final int exitStatus() {
        if(state != EXITED) throw new IllegalStateException("exitStatus() called in an inappropriate state");
        return exitStatus;
    }

    private int addStringArray(String[] strings, int topAddr) throws FaultException {
        int count = strings.length;
        int total = 0; /* null last table entry  */
        for(int i=0;i<count;i++) total += strings[i].length() + 1;
        total += (count+1)*4;
        int start = (topAddr - total)&~3;
        int addr = start + (count+1)*4;
        int[] table = new int[count+1];
        try {
            for(int i=0;i<count;i++) {
                byte[] a = getBytes(strings[i]);
                table[i] = addr;
                copyout(a,addr,a.length);
                memset(addr+a.length,0,1);
                addr += a.length + 1;
            }
            addr=start;
            for(int i=0;i<count+1;i++) {
                memWrite(addr,table[i]);
                addr += 4;
            }
        } catch(FaultException e) {
            throw new RuntimeException(e.toString());
        }
        return start;
    }

    String[] createEnv(String[] extra) { if(extra == null) extra = new String[0]; return extra; }

    /** Sets word number index in the _user_info table to word
     * The user_info table is a chunk of memory in the program's memory defined by the
     * symbol "user_info". The compiler/interpreter automatically determine the size
     * and location of the user_info table from the ELF symbol table. setUserInfo and
     * getUserInfo are used to modify the words in the user_info table. */
    public void setUserInfo(int index, int word) {
        if(index < 0 || index >= userInfoSize()/4) throw new IndexOutOfBoundsException("setUserInfo called with index >= " + (userInfoSize()/4));
        try {
            memWrite(userInfoBase()+index*4,word);
        } catch(FaultException e) { throw new RuntimeException(e.toString()); }
    }

    /** Returns the word in the _user_info table entry index
        @see Runtime#setUserInfo(int,int) setUserInfo */
    public int getUserInfo(int index) {
        if(index < 0 || index >= userInfoSize()/4) throw new IndexOutOfBoundsException("setUserInfo called with index >= " + (userInfoSize()/4));
        try {
            return memRead(userInfoBase()+index*4);
        } catch(FaultException e) { throw new RuntimeException(e.toString()); }
    }

    /** Calls _execute() (subclass's execute()) and catches exceptions */
    private void __execute() {
        try {
            _execute();
        } catch(FaultException e) {
            if(STDERR_DIAG) e.printStackTrace();
            exit(128+11,true); // SIGSEGV
            exitException = e;
        } catch(ExecutionException e) {
            if(STDERR_DIAG) e.printStackTrace();
            exit(128+4,true); // SIGILL
            exitException = e;
        }
    }

    /** Executes the process until the PAUSE syscall is invoked or the process exits. Returns true if the process exited. */
    public final boolean execute()  {
        if(state != PAUSED) throw new IllegalStateException("execute() called in inappropriate state");
        if(startTime == 0) startTime = System.currentTimeMillis();
        state = RUNNING;
        __execute();
        if(state != PAUSED && state != EXITED && state != EXECED)
            throw new IllegalStateException("execute() ended up in an inappropriate state (" + state + ")");
        return state != PAUSED;
    }

    static String[] concatArgv(String argv0, String[] rest) {
        String[] argv = new String[rest.length+1];
        System.arraycopy(rest,0,argv,1,rest.length);
        argv[0] = argv0;
        return argv;
    }

    public final int run() { return run(null); }
    public final int run(String argv0, String[] rest) { return run(concatArgv(argv0,rest)); }
    public final int run(String[] args) { return run(args,null); }

    /** Runs the process until it exits and returns the exit status.
        If the process executes the PAUSE syscall execution will be paused for 500ms and a warning will be displayed */
    public final int run(String[] args, String[] env) {
        start(args,env);
        for(;;) {
            if(execute()) break;
            if(STDERR_DIAG) System.err.println("WARNING: Pause requested while executing run()");
        }
        if(state == EXECED && STDERR_DIAG) System.err.println("WARNING: Process exec()ed while being run under run()");
        return state == EXITED ? exitStatus() : 0;
    }

    public final void start() { start(null); }
    public final void start(String[] args) { start(args,null); }

    /** Initializes the process and prepairs it to be executed with execute() */
    public final void start(String[] args, String[] environ)  {
        int top, sp, argsAddr, envAddr;
        if(state != STOPPED) throw new IllegalStateException("start() called in inappropriate state");
        if(args == null) args = new String[]{getClass().getName()};

        sp = top = writePages.length*(1<<pageShift);
        try {
            sp = argsAddr = addStringArray(args,sp);
            sp = envAddr = addStringArray(createEnv(environ),sp);
        } catch(FaultException e) {
            throw new IllegalArgumentException("args/environ too big");
        }
        sp &= ~15;
        if(top - sp > ARG_MAX) throw new IllegalArgumentException("args/environ too big");

        // HACK: heapStart() isn't always available when the constructor
        // is run and this sometimes doesn't get initialized
        if(heapEnd == 0) {
            heapEnd = heapStart();
            if(heapEnd == 0) throw new Error("heapEnd == 0");
            int pageSize = writePages.length == 1 ? 4096 : (1<<pageShift);
            heapEnd = (heapEnd + pageSize - 1) & ~(pageSize-1);
        }

        CPUState cpuState = new CPUState();
        cpuState.r[A0] = argsAddr;
        cpuState.r[A1] = envAddr;
        cpuState.r[SP] = sp;
        cpuState.r[RA] = 0xdeadbeef;
        cpuState.r[GP] = gp();
        cpuState.pc = entryPoint();
        setCPUState(cpuState);

        state = PAUSED;

        _started();
    }

    public final void stop() {
        if (state != RUNNING && state != PAUSED) throw new IllegalStateException("stop() called in inappropriate state");
        exit(0, false);
    }

    /** Hook for subclasses to do their own startup */
    void _started() {  }

    public final int call(String sym, Object[] args) throws CallException, FaultException {
        if(state != PAUSED && state != CALLJAVA) throw new IllegalStateException("call() called in inappropriate state");
        if(args.length > 7) throw new IllegalArgumentException("args.length > 7");
        CPUState state = new CPUState();
        getCPUState(state);

        int sp = state.r[SP];
        int[] ia = new int[args.length];
        for(int i=0;i<args.length;i++) {
            Object o = args[i];
            byte[] buf = null;
            if(o instanceof String) {
                buf = getBytes((String)o);
            } else if(o instanceof byte[]) {
                buf = (byte[]) o;
            } else if(o instanceof Number) {
                ia[i] = ((Number)o).intValue();
            }
            if(buf != null) {
                sp -= buf.length;
                copyout(buf,sp,buf.length);
                ia[i] = sp;
            }
        }
        int oldSP = state.r[SP];
        if(oldSP == sp) return call(sym,ia);

        state.r[SP] = sp;
        setCPUState(state);
        int ret = call(sym,ia);
        state.r[SP] = oldSP;
        setCPUState(state);
        return ret;
    }

    public final int call(String sym) throws CallException { return call(sym,new int[]{}); }
    public final int call(String sym, int a0) throws CallException  { return call(sym,new int[]{a0}); }
    public final int call(String sym, int a0, int a1) throws CallException  { return call(sym,new int[]{a0,a1}); }

    /** Calls a function in the process with the given arguments */
    public final int call(String sym, int[] args) throws CallException {
        int func = lookupSymbol(sym);
        if(func == -1) throw new CallException(sym + " not found");
        int helper = lookupSymbol("_call_helper");
        if(helper == -1) throw new CallException("_call_helper not found");
        return call(helper,func,args);
    }

    /** Executes the code at addr in the process setting A0-A3 and S0-S3 to the given arguments
        and returns the contents of V1 when the the pause syscall is invoked */
    //public final int call(int addr, int a0, int a1, int a2, int a3, int s0, int s1, int s2, int s3) {
    public final int call(int addr, int a0, int[] rest) throws CallException {
        if(rest.length > 7) throw new IllegalArgumentException("rest.length > 7");
        if(state != PAUSED && state != CALLJAVA) throw new IllegalStateException("call() called in inappropriate state");
        int oldState = state;
        CPUState saved = new CPUState();
        getCPUState(saved);
        CPUState cpustate = saved.dup();

        cpustate.r[SP] = cpustate.r[SP]&~15;
        cpustate.r[RA] = 0xdeadbeef;
        cpustate.r[A0] = a0;
        switch(rest.length) {
            case 7: cpustate.r[S3] = rest[6];
            case 6: cpustate.r[S2] = rest[5];
            case 5: cpustate.r[S1] = rest[4];
            case 4: cpustate.r[S0] = rest[3];
            case 3: cpustate.r[A3] = rest[2];
            case 2: cpustate.r[A2] = rest[1];
            case 1: cpustate.r[A1] = rest[0];
        }
        cpustate.pc = addr;

        state = RUNNING;

        setCPUState(cpustate);
        __execute();
        getCPUState(cpustate);
        setCPUState(saved);

        if(state != PAUSED) throw new CallException("Process exit()ed while servicing a call() request");
        state = oldState;

        return cpustate.r[V1];
    }

    /** Allocated an entry in the FileDescriptor table for fd and returns the number.
        Returns -1 if the table is full. This can be used by subclasses to use custom file
        descriptors */
    public final int addFD(FD fd) {
        if(state == EXITED || state == EXECED) throw new IllegalStateException("addFD called in inappropriate state");
        int i;
        for(i=0;i<OPEN_MAX;i++) if(fds[i] == null) break;
        if(i==OPEN_MAX) return -1;
        fds[i] = fd;
        closeOnExec[i] = false;
        return i;
    }

    /** Hooks for subclasses before and after the process closes an FD */
    void _preCloseFD(FD fd) {  }
    void _postCloseFD(FD fd) {  }

    /** Closes file descriptor fdn and removes it from the file descriptor table */
    public final boolean closeFD(int fdn) {
        if(state == EXITED || state == EXECED) throw new IllegalStateException("closeFD called in inappropriate state");
        if(fdn < 0 || fdn >= OPEN_MAX) return false;
        if(fds[fdn] == null) return false;
        _preCloseFD(fds[fdn]);
        fds[fdn].close();
        _postCloseFD(fds[fdn]);
        fds[fdn] = null;
        return true;
    }

    /** Duplicates the file descriptor fdn and returns the new fs */
    public final int dupFD(int fdn) {
        int i;
        if(fdn < 0 || fdn >= OPEN_MAX) return -1;
        if(fds[fdn] == null) return -1;
        for(i=0;i<OPEN_MAX;i++) if(fds[i] == null) break;
        if(i==OPEN_MAX) return -1;
        fds[i] = fds[fdn].dup();
        return i;
    }

    public static final int RD_ONLY = 0;
    public static final int WR_ONLY = 1;
    public static final int RDWR = 2;

    public static final int O_CREAT = 0x0200;
    public static final int O_EXCL = 0x0800;
    public static final int O_APPEND = 0x0008;
    public static final int O_TRUNC = 0x0400;
    public static final int O_NONBLOCK = 0x4000;
    public static final int O_NOCTTY = 0x8000;

    FD hostFSOpen(final File f, int flags, int mode, final Object data) throws ErrnoException {
        if((flags & ~(3|O_CREAT|O_EXCL|O_APPEND|O_TRUNC)) != 0) {
            if(STDERR_DIAG)
                System.err.println("WARNING: Unsupported flags passed to open(\"" + f + "\"): " + toHex(flags & ~(3|O_CREAT|O_EXCL|O_APPEND|O_TRUNC)));
            throw new ErrnoException(ENOTSUP);
        }
        boolean write = (flags&3) != RD_ONLY;

        if(sm != null && !(write ? sm.allowWrite(f) : sm.allowRead(f))) throw new ErrnoException(EACCES);

        if((flags & (O_EXCL|O_CREAT)) == (O_EXCL|O_CREAT)) {
            try {
                if(!Platform.atomicCreateFile(f)) throw new ErrnoException(EEXIST);
            } catch(IOException e) {
                throw new ErrnoException(EIO);
            }
        } else if(!f.exists()) {
            if((flags&O_CREAT)==0) return null;
        } else if(f.isDirectory()) {
            return hostFSDirFD(f,data);
        }

        final Seekable.File sf;
        try {
            sf = new Seekable.File(f,write,(flags & O_TRUNC) != 0);
        } catch(FileNotFoundException e) {
            if(e.getMessage() != null && e.getMessage().indexOf("Permission denied") >= 0) throw new ErrnoException(EACCES);
            return null;
        } catch(IOException e) { throw new ErrnoException(EIO); }

        return new SeekableFD(sf,flags) { protected FStat _fstat() { return hostFStat(f,sf,data); } };
    }

    FStat hostFStat(File f, Seekable.File sf, Object data) { return new HostFStat(f,sf); }

    FD hostFSDirFD(File f, Object data) { return null; }

    FD _open(String path, int flags, int mode) throws ErrnoException {
        return hostFSOpen(new File(path),flags,mode,null);
    }

    /** The open syscall */
    private int sys_open(int addr, int flags, int mode) throws ErrnoException, FaultException {
        String name = cstring(addr);

        // HACK: TeX, or GPC, or something really sucks
        if(name.length() == 1024 && getClass().getName().equals("tests.TeX")) name = name.trim();

        flags &= ~O_NOCTTY; // this is meaningless under nestedvm
        FD fd = _open(name,flags,mode);
        if(fd == null) return -ENOENT;
        int fdn = addFD(fd);
        if(fdn == -1) { fd.close(); return -ENFILE; }
        return fdn;
    }

    /** The write syscall */

    private int sys_write(int fdn, int addr, int count) throws FaultException, ErrnoException {
        count = Math.min(count,MAX_CHUNK);
        if(fdn < 0 || fdn >= OPEN_MAX) return -EBADFD;
        if(fds[fdn] == null) return -EBADFD;
        byte[] buf = byteBuf(count);
        copyin(addr,buf,count);
        try {
            return fds[fdn].write(buf,0,count);
        } catch(ErrnoException e) {
            if(e.errno == EPIPE) sys_exit(128+13);
            throw e;
        }
    }

    /** The read syscall */
    private int sys_read(int fdn, int addr, int count) throws FaultException, ErrnoException {
        count = Math.min(count,MAX_CHUNK);
        if(fdn < 0 || fdn >= OPEN_MAX) return -EBADFD;
        if(fds[fdn] == null) return -EBADFD;
        byte[] buf = byteBuf(count);
        int n = fds[fdn].read(buf,0,count);
        copyout(buf,addr,n);
        return n;
    }

    /** The ftruncate syscall */
    private int sys_ftruncate(int fdn, long length) {
      if (fdn < 0 || fdn >= OPEN_MAX) return -EBADFD;
      if (fds[fdn] == null) return -EBADFD;

      Seekable seekable = fds[fdn].seekable();
      if (length < 0 || seekable == null) return -EINVAL;
      try { seekable.resize(length); } catch (IOException e) { return -EIO; }
      return 0;
    }

    /** The close syscall */
    private int sys_close(int fdn) {
        return closeFD(fdn) ? 0 : -EBADFD;
    }

    /** The seek syscall */
    private int sys_lseek(int fdn, int offset, int whence) throws ErrnoException {
        if(fdn < 0 || fdn >= OPEN_MAX) return -EBADFD;
        if(fds[fdn] == null) return -EBADFD;
        if(whence != SEEK_SET && whence !=  SEEK_CUR && whence !=  SEEK_END) return -EINVAL;
        int n = fds[fdn].seek(offset,whence);
        return n < 0 ? -ESPIPE : n;
    }

    /** The stat/fstat syscall helper */
    int stat(FStat fs, int addr) throws FaultException {
        memWrite(addr+0,(fs.dev()<<16)|(fs.inode()&0xffff)); // st_dev (top 16), // st_ino (bottom 16)
        memWrite(addr+4,((fs.type()&0xf000))|(fs.mode()&0xfff)); // st_mode
        memWrite(addr+8,fs.nlink()<<16|fs.uid()&0xffff); // st_nlink (top 16) // st_uid (bottom 16)
        memWrite(addr+12,fs.gid()<<16|0); // st_gid (top 16) // st_rdev (bottom 16)
        memWrite(addr+16,fs.size()); // st_size
        memWrite(addr+20,fs.atime()); // st_atime
        // memWrite(addr+24,0) // st_spare1
        memWrite(addr+28,fs.mtime()); // st_mtime
        // memWrite(addr+32,0) // st_spare2
        memWrite(addr+36,fs.ctime()); // st_ctime
        // memWrite(addr+40,0) // st_spare3
        memWrite(addr+44,fs.blksize()); // st_bklsize;
        memWrite(addr+48,fs.blocks()); // st_blocks
        // memWrite(addr+52,0) // st_spare4[0]
        // memWrite(addr+56,0) // st_spare4[1]
        return 0;
    }

    /** The fstat syscall */
    private int sys_fstat(int fdn, int addr) throws FaultException {
        if(fdn < 0 || fdn >= OPEN_MAX) return -EBADFD;
        if(fds[fdn] == null) return -EBADFD;
        return stat(fds[fdn].fstat(),addr);
    }

    /*
    struct timeval {
    long tv_sec;
    long tv_usec;
    };
    */
    private int sys_gettimeofday(int timevalAddr, int timezoneAddr) throws FaultException {
        long now = System.currentTimeMillis();
        int tv_sec = (int)(now / 1000);
        int tv_usec = (int)((now%1000)*1000);
        memWrite(timevalAddr+0,tv_sec);
        memWrite(timevalAddr+4,tv_usec);
        return 0;
    }

    private int sys_sleep(int sec) {
        if(sec < 0) sec = Integer.MAX_VALUE;
        try {
            Thread.sleep((long)sec*1000);
            return 0;
        } catch(InterruptedException e) {
            return -1;
        }
    }

    /*
      #define _CLOCKS_PER_SEC_ 1000
      #define    _CLOCK_T_    unsigned long
    struct tms {
      clock_t   tms_utime;
      clock_t   tms_stime;
      clock_t   tms_cutime;
      clock_t   tms_cstime;
    };*/

    private int sys_times(int tms) {
        long now = System.currentTimeMillis();
        int userTime = (int)((now - startTime)/16);
        int sysTime = (int)((now - startTime)/16);

        try {
            if(tms!=0) {
                memWrite(tms+0,userTime);
                memWrite(tms+4,sysTime);
                memWrite(tms+8,userTime);
                memWrite(tms+12,sysTime);
            }
        } catch(FaultException e) {
            return -EFAULT;
        }
        return (int)now;
    }

    private int sys_sysconf(int n) {
        switch(n) {
            case _SC_CLK_TCK: return 1000;
            case _SC_PAGESIZE: return  writePages.length == 1 ? 4096 : (1<<pageShift);
            case _SC_PHYS_PAGES: return writePages.length == 1 ? (1<<pageShift)/4096 : writePages.length;
            default:
                if(STDERR_DIAG) System.err.println("WARNING: Attempted to use unknown sysconf key: " + n);
                return -EINVAL;
        }
    }

    /** The sbrk syscall. This can also be used by subclasses to allocate memory.
        incr is how much to increase the break by */
    public final int sbrk(int incr) {
        if(incr < 0) return -ENOMEM;
        if(incr==0) return heapEnd;
        incr = (incr+3)&~3;
        int oldEnd = heapEnd;
        int newEnd = oldEnd + incr;
        if(newEnd >= stackBottom) return -ENOMEM;

        if(writePages.length > 1) {
            int pageMask = (1<<pageShift) - 1;
            int pageWords = (1<<pageShift) >>> 2;
            int start = (oldEnd + pageMask) >>> pageShift;
            int end = (newEnd + pageMask) >>> pageShift;
            try {
                for(int i=start;i<end;i++) readPages[i] = writePages[i] = new int[pageWords];
            } catch(OutOfMemoryError e) {
                if(STDERR_DIAG) System.err.println("WARNING: Caught OOM Exception in sbrk: " + e);
                return -ENOMEM;
            }
        }
        heapEnd = newEnd;
        return oldEnd;
    }

    /** The getpid syscall */
    private int sys_getpid() { return getPid(); }
    int getPid() { return 1; }

    public static interface CallJavaCB { public int call(int a, int b, int c, int d); }

    private int sys_calljava(int a, int b, int c, int d) {
        if(state != RUNNING) throw new IllegalStateException("wound up calling sys_calljava while not in RUNNING");
        if(callJavaCB != null) {
            state = CALLJAVA;
            int ret;
            try {
                ret = callJavaCB.call(a,b,c,d);
            } catch(RuntimeException e) {
                System.err.println("Error while executing callJavaCB");
                e.printStackTrace();
                ret = 0;
            }
            state = RUNNING;
            return ret;
        } else {
            if(STDERR_DIAG) System.err.println("WARNING: calljava syscall invoked without a calljava callback set");
            return 0;
        }
    }

    private int sys_pause() {
        state = PAUSED;
        return 0;
    }

    private int sys_getpagesize() { return writePages.length == 1 ? 4096 : (1<<pageShift); }

    /** Hook for subclasses to do something when the process exits  */
    void _exited() {  }

    void exit(int status, boolean fromSignal) {
        if(fromSignal && fds[2] != null) {
            try {
                byte[] msg = getBytes("Process exited on signal " + (status - 128) + "\n");
                fds[2].write(msg,0,msg.length);
            } catch(ErrnoException e) { }
        }
        exitStatus = status;
        for(int i=0;i<fds.length;i++) if(fds[i] != null) closeFD(i);
        state = EXITED;
        _exited();
    }

    private int sys_exit(int status) {
        exit(status,false);
        return 0;
    }

    final int sys_fcntl(int fdn, int cmd, int arg) throws FaultException {
        int i;

        if(fdn < 0 || fdn >= OPEN_MAX) return -EBADFD;
        if(fds[fdn] == null) return -EBADFD;
        FD fd = fds[fdn];

        switch(cmd) {
            case F_DUPFD:
                if(arg < 0 || arg >= OPEN_MAX) return -EINVAL;
                for(i=arg;i<OPEN_MAX;i++) if(fds[i]==null) break;
                if(i==OPEN_MAX) return -EMFILE;
                fds[i] = fd.dup();
                return i;
            case F_GETFL:
                return fd.flags();
            case F_SETFD:
                closeOnExec[fdn] = arg != 0;
                return 0;
            case F_GETFD:
                return closeOnExec[fdn] ? 1 : 0;
            case F_GETLK:
            case F_SETLK:
                if(STDERR_DIAG) System.err.println("WARNING: file locking requires UnixRuntime");
                return -ENOSYS;
            default:
                if(STDERR_DIAG) System.err.println("WARNING: Unknown fcntl command: " + cmd);
                return -ENOSYS;
        }
    }

    final int fsync(int fdn) {
        if(fdn < 0 || fdn >= OPEN_MAX) return -EBADFD;
        if(fds[fdn] == null) return -EBADFD;
        FD fd = fds[fdn];

        Seekable s = fd.seekable();
        if (s == null) return -EINVAL;

        try {
            s.sync();
            return 0;
        } catch (IOException e) {
            return -EIO;
        }
    }

    /** The syscall dispatcher.
        The should be called by subclasses when the syscall instruction is invoked.
        syscall should be the contents of V0 and a, b, c, and d should be
        the contenst of A0, A1, A2, and A3. The call MAY change the state
        @see Runtime#state state */
    protected final int syscall(int syscall, int a, int b, int c, int d, int e, int f) {
        try {
            int n = _syscall(syscall,a,b,c,d,e,f);
            //if(n<0) throw new ErrnoException(-n);
            return n;
        } catch(ErrnoException ex) {
            //System.err.println("While executing syscall: " + syscall + ":");
            //if(syscall == SYS_open) try { System.err.println("Failed to open " + cstring(a) + " errno " + ex.errno); } catch(Exception e2) { }
            //ex.printStackTrace();
            return -ex.errno;
        } catch(FaultException ex) {
            return -EFAULT;
        } catch(RuntimeException ex) {
            ex.printStackTrace();
            throw new Error("Internal Error in _syscall()");
        }
    }

    protected int _syscall(int syscall, int a, int b, int c, int d, int e, int f) throws ErrnoException, FaultException {
        switch(syscall) {
            case SYS_null: return 0;
            case SYS_exit: return sys_exit(a);
            case SYS_pause: return sys_pause();
            case SYS_write: return sys_write(a,b,c);
            case SYS_fstat: return sys_fstat(a,b);
            case SYS_sbrk: return sbrk(a);
            case SYS_open: return sys_open(a,b,c);
            case SYS_close: return sys_close(a);
            case SYS_read: return sys_read(a,b,c);
            case SYS_lseek: return sys_lseek(a,b,c);
            case SYS_ftruncate: return sys_ftruncate(a,b);
            case SYS_getpid: return sys_getpid();
            case SYS_calljava: return sys_calljava(a,b,c,d);
            case SYS_gettimeofday: return sys_gettimeofday(a,b);
            case SYS_sleep: return sys_sleep(a);
            case SYS_times: return sys_times(a);
            case SYS_getpagesize: return sys_getpagesize();
            case SYS_fcntl: return sys_fcntl(a,b,c);
            case SYS_sysconf: return sys_sysconf(a);
            case SYS_getuid: return sys_getuid();
            case SYS_geteuid: return sys_geteuid();
            case SYS_getgid: return sys_getgid();
            case SYS_getegid: return sys_getegid();

            case SYS_fsync: return fsync(a);
            case SYS_memcpy: memcpy(a,b,c); return a;
            case SYS_memset: memset(a,b,c); return a;

            case SYS_kill:
            case SYS_fork:
            case SYS_pipe:
            case SYS_dup2:
            case SYS_waitpid:
            case SYS_stat:
            case SYS_mkdir:
            case SYS_getcwd:
            case SYS_chdir:
                if(STDERR_DIAG) System.err.println("Attempted to use a UnixRuntime syscall in Runtime (" + syscall + ")");
                return -ENOSYS;
            default:
                if(STDERR_DIAG) System.err.println("Attempted to use unknown syscall: " + syscall);
                return -ENOSYS;
        }
    }

    private int sys_getuid() { return 0; }
    private int sys_geteuid() { return 0; }
    private int sys_getgid() { return 0; }
    private int sys_getegid() { return 0; }

    public int xmalloc(int size) { int p=malloc(size); if(p==0) throw new RuntimeException("malloc() failed"); return p; }
    public int xrealloc(int addr,int newsize) { int p=realloc(addr,newsize); if(p==0) throw new RuntimeException("realloc() failed"); return p; }
    public int realloc(int addr, int newsize) { try { return call("realloc",addr,newsize); } catch(CallException e) { return 0; } }
    public int malloc(int size) { try { return call("malloc",size); } catch(CallException e) { return 0; } }
    public void free(int p) { try { if(p!=0) call("free",p); } catch(CallException e) { /*noop*/ } }

    /** Helper function to create a cstring in main memory */
    public int strdup(String s) {
        byte[] a;
        if(s == null) s = "(null)";
        byte[] a2 = getBytes(s);
        a = new byte[a2.length+1];
        System.arraycopy(a2,0,a,0,a2.length);
        int addr = malloc(a.length);
        if(addr == 0) return 0;
        try {
            copyout(a,addr,a.length);
        } catch(FaultException e) {
            free(addr);
            return 0;
        }
        return addr;
    }

    // TODO: less memory copying (custom utf-8 reader)
    //       or at least roll strlen() into copyin()
    public final String utfstring(int addr) throws ReadFaultException {
        if (addr == 0) return null;

        // determine length
        int i=addr;
        for(int word = 1; word != 0; i++) {
            word = memRead(i&~3);
            switch(i&3) {
                case 0: word = (word>>>24)&0xff; break;
                case 1: word = (word>>>16)&0xff; break;
                case 2: word = (word>>> 8)&0xff; break;
                case 3: word = (word>>> 0)&0xff; break;
            }
        }
        if (i > addr) i--; // do not count null

        byte[] bytes = new byte[i-addr];
        copyin(addr, bytes, bytes.length);

        try {
            return new String(bytes, "UTF-8");
        } catch (UnsupportedEncodingException e) {
            throw new RuntimeException(e); // should never happen with UTF-8
        }
    }

    /** Helper function to read a cstring from main memory */
    public final String cstring(int addr) throws ReadFaultException {
        if (addr == 0) return null;
        StringBuffer sb = new StringBuffer();
        for(;;) {
            int word = memRead(addr&~3);
            switch(addr&3) {
                case 0: if(((word>>>24)&0xff)==0) return sb.toString(); sb.append((char)((word>>>24)&0xff)); addr++;
                case 1: if(((word>>>16)&0xff)==0) return sb.toString(); sb.append((char)((word>>>16)&0xff)); addr++;
                case 2: if(((word>>> 8)&0xff)==0) return sb.toString(); sb.append((char)((word>>> 8)&0xff)); addr++;
                case 3: if(((word>>> 0)&0xff)==0) return sb.toString(); sb.append((char)((word>>> 0)&0xff)); addr++;
            }
        }
    }

    /** File Descriptor class */
    public static abstract class FD {
        private int refCount = 1;
        private String normalizedPath = null;
        private boolean deleteOnClose = false;

        public void setNormalizedPath(String path) { normalizedPath = path; }
        public String getNormalizedPath() { return normalizedPath; }

        public void markDeleteOnClose() { deleteOnClose = true; }
        public boolean isMarkedForDeleteOnClose() { return deleteOnClose; }

        /** Read some bytes. Should return the number of bytes read, 0 on EOF, or throw an IOException on error */
        public int read(byte[] a, int off, int length) throws ErrnoException { throw new ErrnoException(EBADFD); }
        /** Write. Should return the number of bytes written or throw an IOException on error */
        public int write(byte[] a, int off, int length) throws ErrnoException { throw new ErrnoException(EBADFD); }

        /** Seek in the filedescriptor. Whence is SEEK_SET, SEEK_CUR, or SEEK_END. Should return -1 on error or the new position. */
        public int seek(int n, int whence)  throws ErrnoException  { return -1; }

        public int getdents(byte[] a, int off, int length) throws ErrnoException { throw new ErrnoException(EBADFD); }

        /** Return a Seekable object representing this file descriptor (can be read only)
            This is required for exec() */
        Seekable seekable() { return null; }

        private FStat cachedFStat = null;
        public final FStat fstat() {
            if(cachedFStat == null) cachedFStat = _fstat();
            return cachedFStat;
        }

        protected abstract FStat _fstat();
        public abstract int  flags();

        /** Closes the fd */
        public final void close() { if(--refCount==0) _close(); }
        protected void _close() { /* noop*/ }

        FD dup() { refCount++; return this; }
    }

    /** FileDescriptor class for normal files */
    public abstract static class SeekableFD extends FD {
        private final int flags;
        private final Seekable data;

        SeekableFD(Seekable data, int flags) { this.data = data; this.flags = flags; }

        protected abstract FStat _fstat();
        public int flags() { return flags; }

        Seekable seekable() { return data; }

        public int seek(int n, int whence) throws ErrnoException {
            try {
                switch(whence) {
                        case SEEK_SET: break;
                        case SEEK_CUR: n += data.pos(); break;
                        case SEEK_END: n += data.length(); break;
                        default: return -1;
                }
                data.seek(n);
                return n;
            } catch(IOException e) {
                throw new ErrnoException(ESPIPE);
            }
        }

        public int write(byte[] a, int off, int length) throws ErrnoException {
            if((flags&3) == RD_ONLY) throw new ErrnoException(EBADFD);
            // NOTE: There is race condition here but we can't fix it in pure java
            if((flags&O_APPEND) != 0) seek(0,SEEK_END);
            try {
                return data.write(a,off,length);
            } catch(IOException e) {
                throw new ErrnoException(EIO);
            }
        }

        public int read(byte[] a, int off, int length) throws ErrnoException {
            if((flags&3) == WR_ONLY) throw new ErrnoException(EBADFD);
            try {
                int n = data.read(a,off,length);
                return n < 0 ? 0 : n;
            } catch(IOException e) {
                throw new ErrnoException(EIO);
            }
        }

        protected void _close() { try { data.close(); } catch(IOException e) { /*ignore*/ } }
    }

    public static class InputOutputStreamFD extends FD {
        private final InputStream is;
        private final OutputStream os;

        public InputOutputStreamFD(InputStream is) { this(is,null); }
        public InputOutputStreamFD(OutputStream os) { this(null,os); }
        public InputOutputStreamFD(InputStream is, OutputStream os) {
            this.is = is;
            this.os = os;
            if(is == null && os == null) throw new IllegalArgumentException("at least one stream must be supplied");
        }

        public int flags() {
            if(is != null && os != null) return O_RDWR;
            if(is != null) return O_RDONLY;
            if(os != null) return O_WRONLY;
            throw new Error("should never happen");
        }

        public void _close() {
            if(is != null) try { is.close(); } catch(IOException e) { /*ignore*/ }
            if(os != null) try { os.close(); } catch(IOException e) { /*ignore*/ }
        }

        public int read(byte[] a, int off, int length) throws ErrnoException {
            if(is == null) return super.read(a,off,length);
            try {
                int n = is.read(a,off,length);
                return n < 0 ? 0 : n;
            } catch(IOException e) {
                throw new ErrnoException(EIO);
            }
        }

        public int write(byte[] a, int off, int length) throws ErrnoException {
            if(os == null) return super.write(a,off,length);
            try {
                os.write(a,off,length);
                return length;
            } catch(IOException e) {
                throw new ErrnoException(EIO);
            }
        }

        public FStat _fstat() { return new SocketFStat(); }
    }

    static class TerminalFD extends InputOutputStreamFD {
        public TerminalFD(InputStream is) { this(is,null); }
        public TerminalFD(OutputStream os) { this(null,os); }
        public TerminalFD(InputStream is, OutputStream os) { super(is,os); }
        public void _close() { /* noop */ }
        public FStat _fstat() { return new SocketFStat() { public int type() { return S_IFCHR; } public int mode() { return 0600; } }; }
    }

    // This is pretty inefficient but it is only used for reading from the console on win32
    static class Win32ConsoleIS extends InputStream {
        private int pushedBack = -1;
        private final InputStream parent;
        public Win32ConsoleIS(InputStream parent) { this.parent = parent; }
        public int read() throws IOException {
            if(pushedBack != -1) { int c = pushedBack; pushedBack = -1; return c; }
            int c = parent.read();
            if(c == '\r' && (c = parent.read()) != '\n') { pushedBack = c; return '\r'; }
            return c;
        }
        public int read(byte[] buf, int pos, int len) throws IOException {
            boolean pb = false;
            if(pushedBack != -1 && len > 0) {
                buf[0] = (byte) pushedBack;
                pushedBack = -1;
                pos++; len--; pb = true;
            }
            int n = parent.read(buf,pos,len);
            if(n == -1) return pb ? 1 : -1;
            for(int i=0;i<n;i++) {
                if(buf[pos+i] == '\r') {
                    if(i==n-1) {
                        int c = parent.read();
                        if(c == '\n') buf[pos+i] = '\n';
                        else pushedBack = c;
                    } else if(buf[pos+i+1] == '\n') {
                        System.arraycopy(buf,pos+i+1,buf,pos+i,len-i-1);
                        n--;
                    }
                }
            }
            return n + (pb ? 1 : 0);
        }
    }

    public abstract static class FStat {
        public static final int S_IFIFO =  0010000;
        public static final int S_IFCHR =  0020000;
        public static final int S_IFDIR =  0040000;
        public static final int S_IFREG =  0100000;
        public static final int S_IFSOCK = 0140000;

        public int mode() { return 0; }
        public int nlink() { return 0; }
        public int uid() { return 0; }
        public int gid() { return 0; }
        public int size() { return 0; }
        public int atime() { return 0; }
        public int mtime() { return 0; }
        public int ctime() { return 0; }
        public int blksize() { return 512; }
        public int blocks() { return (size()+blksize()-1)/blksize(); }

        public abstract int dev();
        public abstract int type();
        public abstract int inode();
    }

    public static class SocketFStat extends FStat {
        public int dev() { return -1; }
        public int type() { return S_IFSOCK; }
        public int inode() { return hashCode() & 0x7fff; }
    }

    static class HostFStat extends FStat {
        private final File f;
        private final Seekable.File sf;
        private final boolean executable;
        public HostFStat(File f, Seekable.File sf) { this(f,sf,false); }
        public HostFStat(File f, boolean executable) {this(f,null,executable);}
        public HostFStat(File f, Seekable.File sf, boolean executable) {
            this.f = f;
            this.sf = sf;
            this.executable = executable;
        }
        public int dev() { return 1; }
        public int inode() { return f.getAbsolutePath().hashCode() & 0x7fff; }
        public int type() { return f.isDirectory() ? S_IFDIR : S_IFREG; }
        public int nlink() { return 1; }
        public int mode() {
            int mode = 0;
            boolean canread = f.canRead();
            if(canread && (executable || f.isDirectory())) mode |= 0111;
            if(canread) mode |= 0444;
            if(f.canWrite()) mode |= 0222;
            return mode;
        }
        public int size() {
          try {
            return sf != null ? (int)sf.length() : (int)f.length();
          } catch (Exception x) {
            return (int)f.length();
          }
        }
        public int mtime() { return (int)(f.lastModified()/1000); }
    }

    // Exceptions
    public static class ReadFaultException extends FaultException {
        public ReadFaultException(int addr) { super(addr); }
    }
    public static class WriteFaultException extends FaultException {
        public WriteFaultException(int addr) { super(addr); }
    }
    public static class FaultException extends ExecutionException {
        public final int addr;
        public final RuntimeException cause;
        public FaultException(int addr) { super("fault at: " + toHex(addr)); this.addr = addr; cause = null; }
        public FaultException(RuntimeException e) { super(e.toString()); addr = -1; cause = e; }
    }
    public static class ExecutionException extends Exception {
        private String message = "(null)";
        private String location = "(unknown)";
        public ExecutionException() { /* noop */ }
        public ExecutionException(String s) { if(s != null) message = s; }
        void setLocation(String s) { location = s == null ? "(unknown)" : s; }
        public final String getMessage() { return message + " at " + location; }
    }
    public static class CallException extends Exception {
        public CallException(String s) { super(s); }
    }

    protected static class ErrnoException extends Exception {
        public int errno;
        public ErrnoException(int errno) { super("Errno: " + errno); this.errno = errno; }
    }

    // CPU State
    protected static class CPUState {
        public CPUState() { /* noop */ }
        /* GPRs */
        public int[] r = new int[32];
        /* Floating point regs */
        public int[] f = new int[32];
        public int hi, lo;
        public int fcsr;
        public int pc;

        public CPUState dup() {
            CPUState c = new CPUState();
            c.hi = hi;
            c.lo = lo;
            c.fcsr = fcsr;
            c.pc = pc;
            for(int i=0;i<32;i++) {
                    c.r[i] = r[i];
                c.f[i] = f[i];
            }
            return c;
        }
    }

    public static class SecurityManager {
        public boolean allowRead(File f) { return true; }
        public boolean allowWrite(File f) { return true; }
        public boolean allowStat(File f) { return true; }
        public boolean allowUnlink(File f) { return true; }
    }

    // Null pointer check helper function
    protected final void nullPointerCheck(int addr) throws ExecutionException {
        if(addr < 65536)
            throw new ExecutionException("Attempted to dereference a null pointer " + toHex(addr));
    }

    // Utility functions
    byte[] byteBuf(int size) {
        if(_byteBuf==null) _byteBuf = new byte[size];
        else if(_byteBuf.length < size)
            _byteBuf = new byte[min(max(_byteBuf.length*2,size),MAX_CHUNK)];
        return _byteBuf;
    }

    /** Decode a packed string */
    protected static final int[] decodeData(String s, int words) {
        if(s.length() % 8 != 0) throw new IllegalArgumentException("string length must be a multiple of 8");
        if((s.length() / 8) * 7 < words*4) throw new IllegalArgumentException("string isn't big enough");
        int[] buf = new int[words];
        int prev = 0, left=0;
        for(int i=0,n=0;n<words;i+=8) {
            long l = 0;
            for(int j=0;j<8;j++) { l <<= 7; l |= s.charAt(i+j) & 0x7f; }
            if(left > 0) buf[n++] = prev | (int)(l>>>(56-left));
            if(n < words) buf[n++] = (int) (l >>> (24-left));
            left = (left + 8) & 0x1f;
            prev = (int)(l << left);
        }
        return buf;
    }

    static byte[] getBytes(String s) {
        try {
            return s.getBytes("UTF-8");
        } catch(UnsupportedEncodingException e) {
            return null; // should never happen
        }
    }

    static byte[] getNullTerminatedBytes(String s) {
        byte[] buf1 = getBytes(s);
        byte[] buf2 = new byte[buf1.length+1];
        System.arraycopy(buf1,0,buf2,0,buf1.length);
        return buf2;
    }

    final static String toHex(int n) { return "0x" + Long.toString(n & 0xffffffffL, 16); }
    final static int min(int a, int b) { return a  b ? a : b; }
}


text:
from game.pythonapi import PyDisplay
from game.pythonapi import PyNetworking
from connection import Port

def help():
	PyDisplay.write(terminal, 'Programs available:' +
	'\n   open_port {target IP} {program} {port} - opens a port on the device' +
	'\n   close_port {target IP} {port} - connects to the device')

def open_port():
	if len(parameters) != 3:
		PyDisplay.write(terminal, 'Missing arguments.')
	else:
		ip = parameters[0]
		program = parameters[1]
		port = int(parameters[2])

		d = PyNetworking.get_device(ip)
		d.openPort(Port(program, port))

def close_port():
	if len(parameters) != 2:
		PyDisplay.write(terminal, 'Missing arguments.')
	else:
		ip = parameters[0]
		port = int(parameters[1])

		d = PyNetworking.get_device(ip)
		try:
			d.closePort(port)
		except IOError:
			PyDisplay.write(terminal, 'Port does not exist.')

try:
	parameters
except NameError:
	PyDisplay.write(terminal, 'Please provide some arguments. Type -h for help.')

else:
	p = parameters[0]
	del parameters[0]

	if p == '-h':
		help()
	elif p == 'open_port':
		open_port()
	elif p == 'close_port':
		close_port()

redpajama_set_name: RedPajamaGithub


text:
package org.apache.isis.viewer.dnd.view;

public interface InteractionSpyWindow {

    void close();

    void display(int event, String label[][], String[] trace, int traceIndex);

    void open();
}


text:
/* Install script */

IF NOT EXISTS (SELECT * FROM sysobjects WHERE id = OBJECT_ID(N'[rb_HtmlText]') AND OBJECTPROPERTY(id, N'IsUserTable') = 1)
 BEGIN
CREATE TABLE [rb_HtmlText] (
	[ModuleID] [int] NOT NULL ,
	[DesktopHtml] [ntext] NOT NULL ,
	[MobileSummary] [ntext] NOT NULL ,
	[MobileDetails] [ntext] NOT NULL
	CONSTRAINT [PK_rb_HtmlText] PRIMARY KEY  NONCLUSTERED
	(
		[ModuleID]
	),
	CONSTRAINT [FK_rb_HtmlText_rb_Modules] FOREIGN KEY
	(
		[ModuleID]
	) REFERENCES [rb_Modules] (
		[ModuleID]
	) ON DELETE CASCADE  NOT FOR REPLICATION
)
END
GO

IF NOT EXISTS (SELECT * FROM sysobjects WHERE id = OBJECT_ID(N'[rb_HtmlText_st]') AND OBJECTPROPERTY(id, N'IsUserTable') = 1)
 BEGIN
CREATE TABLE [rb_HtmlText_st] (
	[ModuleID] [int] NOT NULL ,
	[DesktopHtml] [ntext] NOT NULL ,
	[MobileSummary] [ntext] NOT NULL ,
	[MobileDetails] [ntext] NOT NULL
	CONSTRAINT [PK_rb_HtmlText_st] PRIMARY KEY  NONCLUSTERED
	(
		[ModuleID]
	),
	CONSTRAINT [FK_rb_HtmlText_st_rb_Modules] FOREIGN KEY
	(
		[ModuleID]
	) REFERENCES [rb_Modules] (
		[ModuleID]
	) ON DELETE CASCADE  NOT FOR REPLICATION
)
END
GO

IF EXISTS (SELECT * FROM sysobjects WHERE id = OBJECT_ID(N'[rb_HtmlText_stModified]') AND OBJECTPROPERTY(id, N'IsTrigger') = 1)
drop trigger [rb_HtmlText_stModified]
GO

CREATE    TRIGGER [rb_HtmlText_stModified]
ON [rb_HtmlText_st]
FOR DELETE, INSERT, UPDATE
AS
BEGIN
	DECLARE ChangedModules CURSOR FOR
		SELECT ModuleID
		FROM inserted
		UNION
		SELECT ModuleID
		FROM deleted

	DECLARE @ModID	int

	OPEN ChangedModules

	FETCH NEXT FROM ChangedModules
	INTO @ModID

	WHILE @@FETCH_STATUS = 0
	BEGIN
		EXEC rb_ModuleEdited @ModID

		FETCH NEXT FROM ChangedModules
		INTO @ModID
	END

	CLOSE ChangedModules
	DEALLOCATE ChangedModules
END
GO

IF EXISTS (SELECT * FROM sysobjects WHERE id = OBJECT_ID(N'[rb_GetHtmlText]') AND OBJECTPROPERTY(id, N'IsProcedure') = 1)
DROP PROCEDURE [rb_GetHtmlText]
GO

CREATE   PROCEDURE rb_GetHtmlText
(
    @ModuleID int,
    @WorkflowVersion int
)
AS

IF ( @WorkflowVersion = 1 )
	SELECT *
	FROM
	    rb_HtmlText
	WHERE
	    ModuleID = @ModuleID
ELSE
	SELECT *
	FROM
	    rb_HtmlText_st
	WHERE
	    ModuleID = @ModuleID
GO

IF EXISTS (SELECT * FROM sysobjects WHERE id = OBJECT_ID(N'[rb_UpdateHtmlText]') AND OBJECTPROPERTY(id, N'IsProcedure') = 1)
DROP PROCEDURE [rb_UpdateHtmlText]
GO

CREATE   PROCEDURE rb_UpdateHtmlText
(
    @ModuleID      int,
    @DesktopHtml   ntext,
    @MobileSummary ntext,
    @MobileDetails ntext
)
AS

IF NOT EXISTS (
    SELECT
        *
    FROM
        rb_HtmlText_st
    WHERE
        ModuleID = @ModuleID
)
INSERT INTO rb_HtmlText_st (
    ModuleID,
    DesktopHtml,
    MobileSummary,
    MobileDetails
)
VALUES (
    @ModuleID,
    @DesktopHtml,
    @MobileSummary,
    @MobileDetails
)
ELSE
UPDATE
    rb_HtmlText_st

SET
    DesktopHtml   = @DesktopHtml,
    MobileSummary = @MobileSummary,
    MobileDetails = @MobileDetails

WHERE
    ModuleID = @ModuleID
GO


text:
<?php

require_once 'Sweety/Runner.php';
require_once 'Sweety/TestLocator.php';
require_once 'Sweety/Reporter.php';

/**
 * Base functionality for the Sweety_Runner.
 * @package Sweety
 * @author Chris Corbyn
 */
abstract class Sweety_Runner_AbstractTestRunner implements Sweety_Runner
{

 /**
  * The reporter used for showing progress.
  * @var Sweety_Reporter
  * @access private
  */
 private $_reporter;

  /**
   * TestLocator strategies.
   * @var Sweety_TestLocator[]
   * @access private
   */
  private $_testLocators = array();

  /**
   * Regular expression for classes which should be ignored.
   * @var string
   * @access private
   */
  private $_ignoredClassRegex = '/^$/D';

  /**
   * Set the reporter used for showing results.
   * @param Sweety_Reporter $reporter
   */
  public function setReporter(Sweety_Reporter $reporter)
  {
    $this->_reporter = $reporter;
  }

  /**
   * Get the reporter used for showing results.
   * @return Sweety_Reporter
   */
  public function getReporter()
  {
    return $this->_reporter;
  }

  /**
   * Register a test locator instance.
   * @param Sweety_TestLocator $locator
   */
  public function registerTestLocator(Sweety_TestLocator $locator)
  {
    $this->_testLocators[] = $locator;
  }

  /**
   * Set the regular expression used to filter out certain class names.
   * @param string $ignoredClassRegex
   */
  public function setIgnoredClassRegex($ignoredClassRegex)
  {
    $this->_ignoredClassRegex = $ignoredClassRegex;
  }

  /**
   * Get the filtering regular expression for ignoring certain classes.
   * @return string
   */
  public function getIgnoredClassRegex()
  {
    return $this->_ignoredClassRegex;
  }

  /**
   * Run a single test case with the given name, using the provided output format.
   * @param string $testName
   * @param string $format (xml, text or html)
   * @return int
   */
  public function runTestCase($testName, $format = Sweety_Runner::REPORT_TEXT)
  {
    foreach ($this->_testLocators as $locator)
    {
      if ($locator->includeTest($testName))
      {
        break;
      }
    }

    $testClass = new ReflectionClass($testName);
    if ($testClass->getConstructor())
    {
      //We don't want test output to be cached
      if (!SimpleReporter::inCli())
      {
        header("Cache-Control: no-cache, must-revalidate");
        header("Pragma: no-cache");
        header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
      }

      switch ($format)
      {
        case Sweety_Runner::REPORT_HTML:
          $reporter = new HtmlReporter();
          break;
        case Sweety_Runner::REPORT_XML:
          if (!SimpleReporter::inCli())
          {
            header("Content-Type: text/xml"); //Sigh! SimpleTest (skip() issues).
          }
          $reporter = new XmlReporter();
          break;
        case Sweety_Runner::REPORT_TEXT:
        default:
          $reporter = new TextReporter();
          break;
      }
      $test = $testClass->newInstance();
      return $test->run($reporter) ? 0 : 1;
    }

    return 1;
  }

  /**
   * Use strategies to find tests which are runnable.
   * @param string[] $dirs
   * @return string[]
   */
  protected function findTests($dirs = array())
  {
    $tests = array();
    foreach ($this->_testLocators as $locator)
    {
      $tests += $locator->getTests($dirs);
    }
    return $tests;
  }

  /**
   * Parse an XML response from a test case an report to the reporter.
   * @param string $xml
   * @param string $testCase
   */
  protected function parseXml($xml, $testCase)
  {
    $reporter = $this->_reporter->getReporterFor($testCase);
    if (!$reporter->isStarted())
    {
      $reporter->start();
    }

    $xml = str_replace("\0", '?', trim($xml));
    $xml = preg_replace('/[^\x01-\x7F]/e', 'sprintf("&#%d;", ord("$0"));', $xml); //Do something better?
    if (!empty($xml))
    {
      $document = @simplexml_load_string($xml);
      if ($document)
      {
        $this->_parseDocument($document, $testCase, $reporter);
        $reporter->finish();
        return;
      }
    }

    $reporter->reportException(
      'Invalid XML response: ' .
      trim(strip_tags(
        preg_replace('/^\s*<\?xml.+<\/(?:name|pass|fail|exception)>/s', '', $xml)
        )),
      $testCase
      );
  }

  /**
   * Parse formatted test output.
   * @param SimpleXMLElement The node containing the output
   * @param string $path to this test method
   * @access private
   */
  private function _parseFormatted(SimpleXMLElement $formatted, $path = '',
    Sweety_Reporter $reporter)
  {
    $reporter->reportOutput((string)$formatted, $path);
  }

  /**
   * Parse test output.
   * @param SimpleXMLElement The node containing the output
   * @param string $path to this test method
   * @access private
   */
  private function _parseMessage(SimpleXMLElement $message, $path = '',
    Sweety_Reporter $reporter)
  {
    $reporter->reportOutput((string)$message, $path);
  }

  /**
   * Parse a test failure.
   * @param SimpleXMLElement The node containing the fail
   * @param string $path to this test method
   * @access private
   */
  private function _parseFailure(SimpleXMLElement $failure, $path = '',
    Sweety_Reporter $reporter)
  {
    $reporter->reportFail((string)$failure, $path);
  }

  /**
   * Parse an exception.
   * @param SimpleXMLElement The node containing the exception
   * @param string $path to this test method
   * @access private
   */
  private function _parseException(SimpleXMLElement $exception, $path = '',
    Sweety_Reporter $reporter)
  {
    $reporter->reportException((string)$exception, $path);
  }

  /**
   * Parse a pass.
   * @param SimpleXMLElement The node containing this pass.
   * @param string $path to this test method
   * @access private
   */
  private function _parsePass(SimpleXMLElement $pass, $path = '',
    Sweety_Reporter $reporter)
  {
    $reporter->reportPass((string)$pass, $path);
  }

  /**
   * Parse a single test case.
   * @param SimpleXMLElement The node containing the test case
   * @param string $path to this test case
   * @access private
   */
  private function _parseTestCase(SimpleXMLElement $testCase, $path = '',
    Sweety_Reporter $reporter)
  {
    foreach ($testCase->xpath('./test') as $testMethod)
    {
      $testMethodName = (string) $this->_firstNodeValue($testMethod->xpath('./name'));

      foreach ($testMethod->xpath('./formatted') as $formatted)
      {
        $this->_parseFormatted(
          $formatted, $path . ' -> ' . $testMethodName, $reporter);
      }

      foreach ($testMethod->xpath('./message') as $message)
      {
        $this->_parseMessage(
          $message, $path . ' -> ' . $testMethodName, $reporter);
      }

      foreach ($testMethod->xpath('./fail') as $failure)
      {
        $this->_parseFailure(
          $failure, $path . ' -> ' . $testMethodName, $reporter);
      }

      foreach ($testMethod->xpath('./exception') as $exception)
      {
        $this->_parseException(
          $exception, $path . ' -> ' . $testMethodName, $reporter);
      }

      foreach ($testMethod->xpath('./pass') as $pass)
      {
        $this->_parsePass($pass, $path . ' -> ' . $testMethodName, $reporter);
      }

      $stdout = trim((string) $testMethod);
      if ($stdout)
      {
        $reporter->reportOutput($stdout, $path . ' -> ' . $testMethodName);
      }
    }
  }

  /**
   * Parse the results of all tests.
   * @param SimpleXMLElement The node containing the tests
   * @param string $path to the tests
   * @access private
   */
  private function _parseResults(SimpleXMLElement $document, $path = '',
    Sweety_Reporter $reporter)
  {
    $groups = $document->xpath('./group');
    if (!empty($groups))
    {
      foreach ($groups as $group)
      {
        $groupName = (string) $this->_firstNodeValue($group->xpath('./name'));
        $this->_parseResults($group, $path . ' -> ' . $groupName, $reporter);
      }
    }
    else
    {
      foreach ($document->xpath('./case') as $testCase)
      {
        $this->_parseTestCase($testCase, $path, $reporter);
      }
    }
  }

  /**
   * Parse the entire SimpleTest XML document from a test case.
   * @param SimpleXMLElement $document to parse
   * @param string $path to the test
   * @access private
   */
  private function _parseDocument(SimpleXMLElement $document, $path = '',
    Sweety_Reporter $reporter)
  {
    if ($everything = $this->_firstNodeValue($document->xpath('/run')))
    {
      $this->_parseResults($everything, $path, $reporter);
    }
    elseif ($skip = $this->_firstNodeValue($document->xpath('/skip')))
    {
      $reporter->reportSkip((string) $skip, $path);
    }
  }

  protected function _sort($a, $b)
  {
    $apkg = preg_replace('/_[^_]+$/D', '', $a);
    $bpkg = preg_replace('/_[^_]+$/D', '', $b);
    if ($apkg == $bpkg)
    {
      if ($a == $b)
      {
        return 0;
      }
      else
      {
        return ($a > $b) ? 1 : -1;
      }
    }
    else
    {
      return ($apkg > $bpkg) ? 1 : -1;
    }
  }

  private function _firstNodeValue($nodeSet)
  {
    $first = array_shift($nodeSet);
    return $first;
  }

}


text:
function(add_test_label NAME)
    set_property(TEST ${NAME} APPEND PROPERTY LABELS ${ARGN})
    # create test classes for each label
    foreach(L ${ARGN})
        add_test_class(${L})
    endforeach()
endfunction()

function(add_test_script NAME SCRIPT INTERP)
    set(RUN_PREFIX ${TEST_PREFIX})
    if(${NAME}_TEST_PREFIX)
        set(RUN_PREFIX ${${NAME}_TEST_PREFIX})
    endif()

    if(NOT INTERP)
        set(INTERP "/bin/sh")
    endif()

    set(RUN_ARGS ${TEST_ARGS})
    if (${NAME}_TEST_ARGS)
        set(RUN_ARGS ${${NAME}_TEST_ARGS})
    endif()

    add_test(NAME ${NAME}
        COMMAND ${RUN_PREFIX} ${INTERP} "${CMAKE_CURRENT_SOURCE_DIR}/${SCRIPT}" ${RUN_ARGS}
        WORKING_DIRECTORY "${CMAKE_CURRENT_BINARY_DIR}")

    # Add test labels
    set(TEST_LABELS ${TEST_LABEL} ${${NAME}_TEST_LABEL})
    if (TEST_LABELS)
        add_test_label(${NAME} ${TEST_LABELS})
    endif()

    if(TEST_ENVIRONMENT)
        set_property(TEST ${NAME} PROPERTY ENVIRONMENT ${TEST_ENVIRONMENT})
    endif()
endfunction()

function(add_test_class)
    string(REPLACE ";" "-" TEST_SUFFIX "${ARGN}")
    string(REPLACE ";" "$$;-L;^" TEST_LOPTS "${ARGN}")

    if(NOT TARGET test-${TEST_SUFFIX})
        add_custom_target("test-${TEST_SUFFIX}"
            COMMAND ${CMAKE_CTEST_COMMAND} -L ^${TEST_LOPTS}$$
            WORKING_DIRECTORY ${${PROJECT_NAME}_BINARY_DIR}
            COMMENT "Running all ${ARGN} tests")
    endif()
endfunction()


text:
package com.amirhome.droidgcmlistsview;

/**
 * Created by www.AmirHome.com on 12/14/2016.
 */

import android.support.v7.widget.RecyclerView;
import android.text.TextUtils;
import android.view.LayoutInflater;
import android.view.View;
import android.view.ViewGroup;
import android.widget.TextView;

import java.util.ArrayList;
import java.util.List;

public class OrdersAdapter extends RecyclerView.Adapter<OrdersAdapter.MyViewHolder> {

    private List<Order> oaOrderList, oaFilterList;

    public class MyViewHolder extends RecyclerView.ViewHolder {
        public TextView order_no, time, cost, status;

        public MyViewHolder(View view) {
            super(view);
            order_no = (TextView) view.findViewById(R.id.order_no);
            time = (TextView) view.findViewById(R.id.time);
            cost = (TextView) view.findViewById(R.id.cost);
            status = (TextView) view.findViewById(R.id.status);
        }
    }

    public OrdersAdapter(List<Order> orderList) {
        oaOrderList = orderList;
        oaFilterList = new ArrayList<Order>();
        // we copy the original list to the filter list and use it for setting row values
        oaFilterList.addAll(oaOrderList);
    }

    @Override
    public MyViewHolder onCreateViewHolder(ViewGroup parent, int viewType) {
        View itemView = LayoutInflater.from(parent.getContext())
                .inflate(R.layout.order_list_row, parent, false);

        return new MyViewHolder(itemView);
    }

    @Override
    public void onBindViewHolder(MyViewHolder holder, int position) {
//        Order order = oaOrderList.get(position);
        Order order = oaFilterList.get(position);
        holder.order_no.setText(order.getOrderNo());
        holder.time.setText(order.getOrderTime());
        holder.cost.setText(order.getCost());
        holder.status.setText(order.getStatus());
    }

    @Override
    public int getItemCount() {
        return (null != oaFilterList ? oaFilterList.size() : 0);
//        return oaOrderList.size();
    }

    // Do Search...
    public void filter(final String text) {

        // Searching could be complex..so we will dispatch it to a different thread...
        new Thread(new Runnable() {
            @Override
            public void run() {

                // Clear the filter list
                oaFilterList.clear();

                // If there is no search value, then add all original list items to filter list
                if (TextUtils.isEmpty(text)) {
                    oaFilterList.addAll(oaOrderList);
                } else {
                    // Iterate in the original List and add it to filter list...
                    for (Order item : oaOrderList) {
                        switch (text) {
                            case "btnNew":
                                if (item.status.toLowerCase().equals(DetailActivity.ONAYLI_BEKLIYOR.toLowerCase()))
                                    oaFilterList.add(item);
                                break;

                            case "btnDeliveryWating":
                                if (item.status.toLowerCase().equals(DetailActivity.TESLIM_BEKLIYOR.toLowerCase()))
                                    oaFilterList.add(item);
                                break;
                            case "btnPenalty":
                                if (item.status.toLowerCase().contains("Reject".toLowerCase()))
                                    oaFilterList.add(item);
                                break;
                            case "btnRejected":
                                if (item.status.toLowerCase().equals("Reject".toLowerCase()))
                                    oaFilterList.add(item);
                                break;
                            case "btnDelivered":
                                if (item.status.toLowerCase().equals("Delivered".toLowerCase()))
                                    oaFilterList.add(item);
                                break;
                            case "btnCustomerRejected":
                                if (item.status.toLowerCase().contains("Reject_".toLowerCase()))
                                    oaFilterList.add(item);
                                break;
                        }
                      /*  if (item.status.toLowerCase().equals(text.toLowerCase()) ) {
                            // Adding Matched items
                            oaFilterList.add(item);
                        }*/
                    }
                }
                // Set on UI Thread
/*                ((Activity) mContext).runOnUiThread(new Runnable() {
                    @Override
                    public void run() {
                        // Notify the List that the DataSet has changed...
                        notifyDataSetChanged();
                    }
                });*/
            }
        }).start();

    }
}


text:
package com.che.test.rxjava.asyncwork;

/**
 * 泛型回调
 */
public interface Callback<T> {
    void onSuccess(T result);

    void onFailure(Exception e);
}


text:
namespace display {
class Display;
}

namespace gfx {
class Rect;
}

namespace ui {
class Window;
}

namespace ash {
namespace mus {

class RootWindowController;
class WmTestHelper;

// Base class for window manager tests that want to configure
// WindowTreeClient without a client to mus.
class WmTestBase : public testing::Test {
 public:
  WmTestBase();
  ~WmTestBase() override;

  // TODO(sky): temporary until http://crbug.com/611563 is fixed.
  bool SupportsMultipleDisplays() const;

  // Update the display configuration as given in |display_spec|.
  // See test::DisplayManagerTestApi::UpdateDisplay for more details.
  void UpdateDisplay(const std::string& display_spec);

  ui::Window* GetPrimaryRootWindow();
  ui::Window* GetSecondaryRootWindow();

  display::Display GetPrimaryDisplay();
  display::Display GetSecondaryDisplay();

  // Creates a top level window visible window in the appropriate container.
  // NOTE: you can explicitly destroy the returned value if necessary, but it
  // will also be automatically destroyed when the WindowTreeClient is
  // destroyed.
  ui::Window* CreateTestWindow(const gfx::Rect& bounds);
  ui::Window* CreateTestWindow(const gfx::Rect& bounds,
                               ui::wm::WindowType window_type);
  ui::Window* CreateFullscreenTestWindow();

  // Creates a window parented to |parent|. The returned window is visible.
  ui::Window* CreateChildTestWindow(ui::Window* parent,
                                    const gfx::Rect& bounds);

 protected:
  // testing::Test:
  void SetUp() override;
  void TearDown() override;

 private:
  // Returns the RootWindowControllers ordered by display id (which we assume
  // correlates with creation order).
  std::vector<RootWindowController*> GetRootsOrderedByDisplayId();

  bool setup_called_ = false;
  bool teardown_called_ = false;
  std::unique_ptr<WmTestHelper> test_helper_;

  DISALLOW_COPY_AND_ASSIGN(WmTestBase);
};

}  // namespace mus
}  // namespace ash

#endif  // ASH_MUS_TEST_WM_TEST_BASE_H_


text:
package jaeger

import (
	"testing"

	"github.com/uber/jaeger-client-go/log"
)

func TestLogger(t *testing.T) {
	for _, logger := range []Logger{StdLogger, NullLogger} {
		logger.Infof("Hi %s", "there")
		logger.Error("Bad wolf")
	}
}

func TestCompatibility(t *testing.T) {
	for _, logger := range []log.Logger{StdLogger, NullLogger} {
		logger.Infof("Hi %s", "there")
		logger.Error("Bad wolf")
	}

	for _, logger := range []Logger{log.StdLogger, log.NullLogger} {
		logger.Infof("Hi %s", "there")
		logger.Error("Bad wolf")
	}
}


text:
<?php
session_start();
error_reporting(0);
/*
// For PHP 5.4 users
$progress_key = ini_get("session.upload_progress.prefix")."uploadImage"; // uploadImage is a Form name
$current = $_SESSION[$progress_key]["bytes_processed"];
$total = $_SESSION[$progress_key]["content_length"];
echo $current < $total ? ceil($current / $total * 100) : 100;
*/
// For PHP 5.2+ php_apc.dll or php_apc.so holder
if(isset($_GET['progress_key']) and !empty($_GET['progress_key'])){
 $status = apc_fetch('upload_'.$_GET['progress_key']);
    echo $status['current']/$status['total']*100;
 exit;
}
?>


text:
/**
 * @author Kai Salmen / www.kaisalmen.de
 */

'use strict';

if ( KSX.demos.pixelprotest === undefined ) KSX.demos.pixelprotest = {};

KSX.demos.pixelprotest.PixelProtest = (function () {

    PixelProtest.prototype = Object.create(KSX.core.ThreeJsApp.prototype, {
        constructor: {
            configurable: true,
            enumerable: true,
            value: PixelProtest,
            writable: true
        }
    });

    function PixelProtest( elementToBindTo, mobileDevice) {
        KSX.core.ThreeJsApp.call(this);

        this.configure({
            name: 'PixelProtest',
            htmlCanvas: elementToBindTo,
            useScenePerspective: false,
            useSceneOrtho: true
        });

        this.shader = new KSX.shader.PixelProtestShader( this.canvas.getWidth(), this.canvas.getHeight() );
        this.shader.updateDimensions(
            this.canvas.getWidth() / 8, this.canvas.getWidth(),
            this.canvas.getHeight() / 8, this.canvas.getHeight()
        );

        var uiToolsConfig = {
            mobileDevice: mobileDevice,
            useUil: true,
            uilParams: {
                css: 'top: 0px; left: 0px;',
				w: 512,
                colors: {
                    button: '#FF4040',
                    background: 'rgba(40, 40, 40, 0.66)',
                    text: '#E0E0E0'
                }
            },
            paramsDimension: {
                desktop : {
                    numberPrecision : 6
                },
                mobile : {
                    numberPrecision : 6
                }
            },
            useStats: true
        };
        this.uiTools = new KSX.tools.UiTools( uiToolsConfig );

        this.uiElemWidth = null;
        this.uiElemHeight = null;

        this.animateNoise = true;
        this.animationRate = 10;

        this.randomize = true;
        this.randomR = null;
        this.randomG = null;
        this.randomB = null;

        this.saveImageData = false;
        this.dataTools = new KSX.tools.DataTools();
    }

    PixelProtest.prototype.initPreGL = function () {
        var scope = this;

        scope.initUI();
        scope.uiTools.enableStats();

        var callbackOnSuccess = function () {
            scope.preloadDone = true;
        };
        this.shader.loadResources(callbackOnSuccess);
    };

    PixelProtest.prototype.initUI = function () {
        var scope = this;
        var ui = scope.uiTools.ui;

        ui.clear();

        var enableNoiseAnimation = function (enabled) {
            scope.animateNoise = enabled;
            scope.recalcRandom();
        };
        var adjustAnimationRate = function (value) {
            scope.animationRate = value;
        };
        var adjustWidth = function (value) {
            scope.shader.uniforms.width.value = value;
            scope.recalcRandom();
        };
        var adjustHeight = function (value) {
            scope.shader.uniforms.height.value = value;
            scope.recalcRandom();
        };
        var enableRandomize = function (enabled) {
            scope.randomize = enabled;
        };
        var adjustRandomizeR = function (value) {
            scope.shader.uniforms.offsetR.value = value;
        };
        var adjustRandomizeG = function (value) {
            scope.shader.uniforms.offsetG.value = value;
        };
        var adjustRandomizeB = function (value) {
            scope.shader.uniforms.offsetB.value = value;
        };
        var enableR = function (enabled) {
            scope.shader.uniforms.useR.value = enabled;
        };
        var enableG = function (enabled) {
            scope.shader.uniforms.useG.value = enabled;
        };
        var enableB = function (enabled) {
            scope.shader.uniforms.useB.value = enabled;
        };
        var saveImage = function () {
            scope.saveImageData = true;
        };

        var groupAnimation = ui.add('group', {
            name: 'Animation Control',
            height: scope.uiTools.paramsDimension.groupHeight
        });
        groupAnimation.add('bool', {
            name: 'Animate',
            value: scope.animateNoise,
            callback: enableNoiseAnimation,
            height: scope.uiTools.paramsDimension.boolHeight
        });
        groupAnimation.add('slide', {
            name: 'Change nth frame',
            callback: adjustAnimationRate,
            min: 1,
            max: 60,
            value: scope.animationRate,
            precision: 0,
            step: 1,
            width: scope.uiTools.paramsDimension.slidesWidth,
            height: scope.uiTools.paramsDimension.slidesHeight,
            stype: scope.uiTools.paramsDimension.sliderType
        });
        groupAnimation.open();

        var groupDimensions = ui.add('group', {
            name: 'Dimensions',
            height: scope.uiTools.paramsDimension.groupHeight
        });
        scope.uiElemWidth = groupDimensions.add('slide', {
            name: 'Width',
            callback: adjustWidth,
            min: 2,
            max: scope.shader.maxWidth,
            value: scope.shader.uniforms.width.value,
            precision: 0,
            step: 2,
            width: scope.uiTools.paramsDimension.slidesWidth,
            height: scope.uiTools.paramsDimension.slidesHeight,
            stype: scope.uiTools.paramsDimension.sliderType
        });
        scope.uiElemHeight = groupDimensions.add('slide', {
            name: 'Height',
            callback: adjustHeight,
            min: 2,
            max: scope.shader.maxHeight,
            value: scope.shader.uniforms.height.value,
            precision: 0,
            step: 2,
            width: scope.uiTools.paramsDimension.slidesWidth,
            height: scope.uiTools.paramsDimension.slidesHeight,
            stype: scope.uiTools.paramsDimension.sliderType
        });
        groupDimensions.open();

        var groupChannels = ui.add('group', {
            name: 'Channels',
            height: scope.uiTools.paramsDimension.groupHeight
        });
        groupChannels.add('bool', {
            name: 'Randomize on change',
            value: scope.randomize,
            callback: enableRandomize,
            height: scope.uiTools.paramsDimension.boolHeight
        });
        scope.randomR = groupChannels.add('number', {
            name: 'Random Offset R',
            value: this.shader.uniforms.offsetR.value,
            callback: adjustRandomizeR,
            precision: scope.uiTools.paramsDimension.numberPrecision,
            min: 0,
            max: 1
        });
        scope.randomG = groupChannels.add('number', {
            name: 'Random Offset G',
            value: this.shader.uniforms.offsetG.value,
            callback: adjustRandomizeG,
            precision: scope.uiTools.paramsDimension.numberPrecision,
            min: 0,
            max: 1
        });
        scope.randomB = groupChannels.add('number', {
            name: 'Random Offset B',
            value: this.shader.uniforms.offsetB.value,
            callback: adjustRandomizeB,
            precision: scope.uiTools.paramsDimension.numberPrecision,
            min: 0,
            max: 1
        });
        groupChannels.add('bool', {
            name: 'Use R',
            value: scope.shader.uniforms.useR.value,
            callback: enableR,
            height: scope.uiTools.paramsDimension.boolHeight
        });
        groupChannels.add('bool', {
            name: 'Use B',
            value: scope.shader.uniforms.useG.value,
            callback: enableG,
            height: scope.uiTools.paramsDimension.boolHeight
        });
        groupChannels.add('bool', {
            name: 'Use B',
            value: scope.shader.uniforms.useB.value,
            callback: enableB,
            height: scope.uiTools.paramsDimension.boolHeight
        });
        ui.add('button', {
            name: 'Save Image',
            callback: saveImage,
            width: scope.uiTools.paramsDimension.buttonWidth,
            height: scope.uiTools.paramsDimension.buttonHeight
        });
    };

    PixelProtest.prototype.initGL = function () {
        var geometry = new THREE.PlaneGeometry(1, 1, 1, 1);
        var material = this.shader.buildShaderMaterial();
        this.mesh = new THREE.Mesh(geometry, material);

        this.sceneOrtho.scene.add(this.mesh);
    };

    PixelProtest.prototype.resizeDisplayGL = function () {
        this.mesh.scale.x = this.canvas.getWidth();
        this.mesh.scale.y = this.canvas.getHeight();

        var relationWidth = this.canvas.getWidth() * this.uiElemWidth.value / this.uiElemWidth.max;
        var relationHeight = this.canvas.getHeight() * this.uiElemHeight.value / this.uiElemHeight.max;
        this.shader.updateDimensions( relationWidth, this.canvas.getWidth(), relationHeight, this.canvas.getHeight() );

        this.initUI();
    };

    PixelProtest.prototype.renderPre = function () {
        if (this.animateNoise) {
            var proceed = this.frameNumber % this.animationRate === 0;
            if (proceed) {
                this.recalcRandom();
            }
        }
    };

    PixelProtest.prototype.renderPost = function () {
        if (this.saveImageData) {
            // in case of error in sub-sequent section, this block will not be entered again
            this.saveImageData = false;

            var imgData = this.renderer.domElement.toDataURL();

            var blob = this.dataTools.dataURItoBlob(imgData, 'image/png');
            if (blob !== undefined) {
                saveAs(blob, "PixelProtest.png");
            }
            else {
                alert('Unable to save canvas data to image file!');
            }
        }
        this.uiTools.updateStats();
    };

    PixelProtest.prototype.recalcRandom = function () {
        if (this.randomize) {
            this.shader.uniforms.offsetR.value = Math.random();
            this.randomR.setValue(this.shader.uniforms.offsetR.value);

            this.shader.uniforms.offsetG.value = Math.random();
            this.randomG.setValue(this.shader.uniforms.offsetG.value);

            this.shader.uniforms.offsetB.value = Math.random();
            this.randomB.setValue(this.shader.uniforms.offsetB.value);
        }
    };

    return PixelProtest;
})();


text:
using System.Threading.Tasks;
using Orleans.Concurrency;
using Orleans.Providers.Streams.Common;

namespace Orleans.Streams
{
    internal interface IPersistentStreamPullingAgent : ISystemTarget, IStreamProducerExtension
    {
        // The queue adapter have to be Immutable<>, since we want deliberately to pass it by reference.
        Task Initialize(Immutable<IQueueAdapter> queueAdapter, Immutable<IQueueAdapterCache> queueAdapterCache, Immutable<IStreamFailureHandler> deliveryFailureHandler);
        Task Shutdown();
    }

    internal interface IPersistentStreamPullingManager : ISystemTarget
    {
        Task Initialize(Immutable<IQueueAdapter> queueAdapter);
        Task Stop();
        Task StartAgents();
        Task StopAgents();
        Task<object> ExecuteCommand(PersistentStreamProviderCommand command, object arg);
    }
}