--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/gpu/hsail/vm/hsailArgumentsBase.hpp	Wed Mar 26 17:33:54 2014 +0100
@@ -0,0 +1,146 @@
+/*
+ * Copyright (c) 2013, Oracle and/or its affiliates. All rights reserved.
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This code is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License version 2 only, as
+ * published by the Free Software Foundation.
+ *
+ * This code is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+ * version 2 for more details (a copy is included in the LICENSE file that
+ * accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License version
+ * 2 along with this work; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
+ * or visit www.oracle.com if you need additional information or have any
+ * questions.
+ *
+ */
+
+#ifndef BASE_ARGUMENTS_HSAIL_HPP
+#define BASE_ARGUMENTS_HSAIL_HPP
+
+#include "runtime/signature.hpp"
+
+
+/***
+ * Base class which iterates thru a signature and pulls from a
+ * objArrayOop of boxed values.  Used as base for HSAILKernelArguments
+ * and HSAILJavaCallArguments The derived classes specify how to push
+ * args onto their data structure
+ ***/
+
+class HSAILArgumentsBase : public SignatureIterator {
+
+public:
+
+private:
+  // Array of java argument oops
+  objArrayOop _args;
+  // Length of args array
+  int   _length;
+  // Current index into _args
+  int _index;
+  // number of parameters in the signature
+  int _parameter_count;
+
+  Symbol * _signature;
+  bool _is_static;
+
+  // records first null parameter seen
+  int _first_null_parameter_index;
+  
+  // Get next java argument
+  oop next_arg(BasicType expectedType);
+
+    virtual char *argsBuilderName() = 0;
+    virtual void pushObject(void * obj) = 0;
+    virtual void pushBool(jboolean z) = 0;
+    virtual void pushByte(jbyte b) = 0;
+    virtual void pushDouble(jdouble d) = 0;
+    virtual void pushFloat(jfloat f) = 0;
+    virtual void pushInt(jint i) = 0;
+    virtual void pushLong(jlong j) = 0;
+    virtual void handleFinalIntParameter() = 0;
+    virtual void handleFinalObjParameter(void *obj) = 0;
+    virtual void pushTrailingArgs() = 0;
+
+    void recordNullObjectParameter() {
+        if (_first_null_parameter_index == -1) _first_null_parameter_index = _parameter_index;
+    }
+
+ public:
+  HSAILArgumentsBase(Symbol* signature, objArrayOop args, bool is_static) : SignatureIterator(signature) {
+    this->_return_type = T_ILLEGAL;
+    _index = 0;
+    _args = args;
+    _is_static = is_static;
+    _signature = signature;
+
+    _length = args->length();
+    _parameter_count = ArgumentCount(signature).size();
+
+    _first_null_parameter_index = -1;
+
+  }
+
+  int getFirstNullParameterIndex() {
+    return _first_null_parameter_index;
+  }
+
+  void collectArgs() {
+    if (TraceGPUInteraction) {
+      tty->print_cr("[HSAIL] %s::collectArgs, sig:%s  args length=%d", argsBuilderName(), _signature->as_C_string(), _length);
+    }    
+    if (!_is_static) {      
+      // First object in args should be 'this'
+      oop arg = _args->obj_at(_index++);
+      assert(arg->is_instance() && (! arg->is_array()), "First arg should be 'this'");
+      if (TraceGPUInteraction) {
+        tty->print_cr("[HSAIL] %s, instance method, this " PTR_FORMAT ", is a %s", argsBuilderName(), (address) arg, arg->klass()->external_name());
+      }
+      pushObject(arg);
+    } else {
+      if (TraceGPUInteraction) {
+          tty->print_cr("[HSAIL] %s, static method", argsBuilderName());
+      }
+    }
+    // Iterate over the entire signature
+    iterate();
+    
+    pushTrailingArgs();
+  }
+
+  void do_bool();
+  void do_byte();
+  void do_double();
+  void do_float();
+  void do_int();
+  void do_long();
+  void do_array(int begin, int end);
+  void do_object();
+  void do_object(int begin, int end);
+
+  void do_void();
+
+  inline void do_char()   {
+    /* TODO : To be implemented */
+    guarantee(false, "do_char:NYI");
+  }
+  inline void do_short()  {
+    /* TODO : To be implemented */
+    guarantee(false, "do_short:NYI");
+  }
+
+  bool isLastParameter() {
+      return  (_index == (_is_static ?  _parameter_count - 1 : _parameter_count));
+  }
+
+};
+
+#endif  // BASE_ARGUMENTS_HSAIL_HPP