/***
    * Created by IntelliJ IDEA.
    * User: gareth
    * Date: 05-May-2005
    * Time: 22:59:42
    * To change this template use File | Settings | File Templates.
    */
   package com.tapina.robe.swi.clib;
   
  import com.tapina.robe.runtime.ByteArrayUtils;
  import com.tapina.robe.runtime.CPU;
  import com.tapina.robe.runtime.Environment;
  import com.tapina.robe.runtime.RawDataBlock;
  import com.tapina.robe.swi.OS;
  import com.tapina.robe.swi.clib.stdlib.RandomState;
  
  import java.util.StringTokenizer;
  
  public class CLibrary {
      private final static CLibrary ourInstance = new CLibrary();
      public static final int EOF = -1;
  
      public static CLibrary getInstance() {
          return ourInstance;
      }
  
      private CLibrary() {
      }
  
      public final Stub dummy(final int stubId) {
          return new Stub() {
              public void executeStub(Environment environment) {
                  log.warning("Attempt to call unknown clib shared library stub &" + Integer.toHexString(stubId));
                  throw new UnknownSharedLibraryCall(2, stubId);
              }
          };
      }
  
      public final Stub traphandler() {
          return new Stub() {
              public void executeStub(Environment environment) {
                  log.warning("traphandler() not implemented");
                  throw new UnknownSharedLibraryCall(2, 0);
              }
          };
      }
  
      public Stub initialise() {
          return new Stub() {
              public void executeStub(Environment environment) {
                  log.warning("initialise() not implemented");
              }
          };
      }
  
      public Stub xdudivide() {
          return new Stub() {
              public void executeStub(Environment environment) {
                  final int[] R = environment.getCpu().R;
                  final long numerator = ((long) R[1]) & 0xffffffffL;
                  final long denominator = ((long) R[0]) & 0xffffffffL;
                  final long result = numerator / denominator;
                  R[0] = (int) result & 0xffffffff;
              }
          };
      }
  
      public Stub xduremainder() {
          return new Stub() {
              public void executeStub(Environment environment) {
                  final int[] R = environment.getCpu().R;
                  final long numerator = ((long) R[1]) & 0xffffffffL;
                  final long denominator = ((long) R[0]) & 0xffffffffL;
                  final long result = numerator % denominator;
                  R[0] = (int) result & 0xffffffff;
              }
          };
      }
  
      public Stub xddivide() {
          return new Stub() {
              public void executeStub(Environment environment) {
                  final int[] R = environment.getCpu().R;
                  R[0] = R[1] / R[0];
              }
          };
      }
  
      public Stub xdremainder() {
          return new Stub() {
              public void executeStub(Environment environment) {
                  final int[] R = environment.getCpu().R;
                  R[0] = R[1] % R[0];
              }
          };
      }
  
      public Stub main() {
          return new Stub() {
             public void execute(Environment environment) {
                 // Don't unwind after entering this one, R1 contains the PC
                 final CPU cpu = environment.getCpu();
                 final int[] R = cpu.R;
                 cpu.setPC(R[1]);
                 final String commandLine = OS.getInstance().getEnv().getCommandLine();
                 if (commandLine.indexOf('\"') >= 0) {
                     log.warning("argv does not handle quoted arguments correctly for command line: " + commandLine);
                 }
                 StringTokenizer tokenizer = new StringTokenizer(commandLine, " ");
                 final int argc = tokenizer.countTokens();
                 RawDataBlock argv = environment.getMemoryMap().createSystemDataBlock((argc + 1) * 4);
                 for (int i = 0; tokenizer.hasMoreTokens(); i++) {
                     String token = tokenizer.nextToken();
                     RawDataBlock tokenData = environment.getMemoryMap().createSystemDataBlock(token);
                     ByteArrayUtils.putInt(argv.getBytes(), i * 4, tokenData.getAddress());
                 }
                 // argv should be terminated by a null
                 ByteArrayUtils.putInt(argv.getBytes(), argc * 4, 0);
                 cpu.R[0] = argc;
                 cpu.R[1] = argv.getAddress();
             }
 
             public void executeStub(Environment environment) {
             }
         };
     }
 
     public final RandomState random = new RandomState();
 
     public Stub strtoul() {
         return new Stub() {
             public void executeStub(Environment environment) {
 //                final int[] R = environment.getCpu().R;
 //                final String s = environment.getMemoryMap().loadString0(R[0]);
 //                final int base = R[2];
                 log.warning("Ignore call to strtoul()");
             }
         };
     }
 
 }