Clean up in javascripttypemaps.swg.

- following the same layout/order as pytypemaps
- added typemaps for `long long` and `unsigned long long`, which are
  only copies of those for `long` and `unsigned long` and hence are
  just experimental.

Lib/javascript/v8/javascriptfragments.swg

@@ -0,0 +1,23 @@
+/*
+
+  Create a file with this name, 'javascriptfragments.swg', in your working
+  directory and add all the %fragments you want to take precedence
+  over the default ones defined by swig.
+
+  For example, if you add:
+  
+  %fragment(SWIG_AsVal_frag(int),"header") {
+   SWIGINTERNINLINE int
+   SWIG_AsVal(int)(PyObject *obj, int *val)
+   { 
+     <your code here>;
+   }
+  }
+  
+  this will replace the code used to retrieve an integer value for all
+  the typemaps that need it, including:
+  
+    int, std::vector<int>, std::list<std::pair<int,int> >, etc.
+
+    
+*/

Lib/javascript/v8/javascriptprimtypes.swg

@@ -1,6 +1,12 @@
+/* ------------------------------------------------------------
+ * Primitive Types
+ * ------------------------------------------------------------ */
+
+/* boolean */
+
 %fragment(SWIG_From_frag(bool),"header") {
-SWIGINTERNINLINE 
-v8::Handle<v8::Value> 
+SWIGINTERNINLINE
+v8::Handle<v8::Value>
 SWIG_From_dec(bool)(bool value)
 {
   return v8::Boolean::New(value);
@@ -15,12 +21,14 @@ int SWIG_AsVal_dec(bool)(v8::Handle<v8::Value> obj, bool *val)
   if(!obj->IsBoolean()) {
     return SWIG_ERROR;
   }
-  
+
   if (val) *val = obj->BooleanValue();
   return SWIG_OK;
 }
 }
 
+/* int */
+
 %fragment(SWIG_From_frag(int),"header") {
 SWIGINTERNINLINE
 v8::Handle<v8::Value> SWIG_From_dec(int)(int value)
@@ -30,18 +38,19 @@ v8::Handle<v8::Value> SWIG_From_dec(int)(int value)
 }
 
 %fragment(SWIG_AsVal_frag(int),"header") {
-SWIGINTERN 
+SWIGINTERN
 int SWIG_AsVal_dec(int)(v8::Handle<v8::Value> valRef, int* val)
 {
   if (!valRef->IsNumber()) {
     return SWIG_TypeError;
   }
   if(val) *val = valRef->IntegerValue();
-  
+
   return SWIG_OK;
 }
 }
 
+/* long */
 
 %fragment(SWIG_From_frag(long),"header") {
 SWIGINTERNINLINE
@@ -53,14 +62,14 @@ v8::Handle<v8::Value> SWIG_From_dec(long)(long value)
 
 %fragment(SWIG_AsVal_frag(long),"header",
           fragment="SWIG_CanCastAsInteger") {
-SWIGINTERN 
+SWIGINTERN
 int SWIG_AsVal_dec(long)(v8::Handle<v8::Value> obj, long* val)
 {
   if (!obj->IsNumber()) {
     return SWIG_TypeError;
   }
   if(val) *val = (long) obj->IntegerValue();
-  
+
   return SWIG_OK;
 }
 }
@@ -69,37 +78,98 @@ int SWIG_AsVal_dec(long)(v8::Handle<v8::Value> obj, long* val)
 
 %fragment(SWIG_From_frag(unsigned long),"header",
           fragment=SWIG_From_frag(long)) {
-SWIGINTERNINLINE 
+SWIGINTERNINLINE
 v8::Handle<v8::Value> SWIG_From_dec(unsigned long)(unsigned long value)
 {
   return (value > LONG_MAX) ?
-    v8::Integer::NewFromUnsigned(value) : v8::Integer::New(%numeric_cast(value,long)); 
+    v8::Integer::NewFromUnsigned(value) : v8::Integer::New(%numeric_cast(value,long));
 }
 }
 
 %fragment(SWIG_AsVal_frag(unsigned long),"header",
           fragment="SWIG_CanCastAsInteger") {
-SWIGINTERN 
-int SWIG_AsVal_dec(unsigned long)(v8::Handle<v8::Value> obj, unsigned long *val) 
+SWIGINTERN
+int SWIG_AsVal_dec(unsigned long)(v8::Handle<v8::Value> obj, unsigned long *val)
 {
   if(!obj->IsNumber()) {
     return SWIG_TypeError;
   }
-  
+
   long longVal = (long) obj->NumberValue();
-  
+
   if(longVal < 0) {
       return SWIG_OverflowError;
   }
-  
-  if(val) *val = longVal; 
-  
+
+  if(val) *val = longVal;
+
   return SWIG_OK;
 }
 }
 
+/* long long */
+// Note: these are copied from 'long' and probably need fixing
+
+%fragment(SWIG_From_frag(long long),"header") {
+SWIGINTERNINLINE
+v8::Handle<v8::Value> SWIG_From_dec(long long)(long long value)
+{
+  return v8::Number::New(value);
+}
+}
+
+%fragment(SWIG_AsVal_frag(long long),"header",
+          fragment="SWIG_CanCastAsInteger") {
+SWIGINTERN
+int SWIG_AsVal_dec(long)(v8::Handle<v8::Value> obj, long long* val)
+{
+  if (!obj->IsNumber()) {
+    return SWIG_TypeError;
+  }
+  if(val) *val = (long long) obj->IntegerValue();
+
+  return SWIG_OK;
+}
+}
+
+/* unsigned long long */
+// Note: these are copied from 'unsigned long' and probably need fixing
+
+%fragment(SWIG_From_frag(unsigned long long),"header",
+          fragment=SWIG_From_frag(long long)) {
+SWIGINTERNINLINE
+v8::Handle<v8::Value> SWIG_From_dec(unsigned long long)(unsigned long long value)
+{
+  return (value > LONG_MAX) ?
+    v8::Integer::NewFromUnsigned(value) : v8::Integer::New(%numeric_cast(value,long));
+}
+}
+
+%fragment(SWIG_AsVal_frag(unsigned long long),"header",
+          fragment="SWIG_CanCastAsInteger") {
+SWIGINTERN
+int SWIG_AsVal_dec(unsigned long)(v8::Handle<v8::Value> obj, unsigned long long *val)
+{
+  if(!obj->IsNumber()) {
+    return SWIG_TypeError;
+  }
+
+  long long longVal = (long long) obj->NumberValue();
+
+  if(longVal < 0) {
+      return SWIG_OverflowError;
+  }
+
+  if(val) *val = longVal;
+
+  return SWIG_OK;
+}
+}
+
+/* double */
+
 %fragment(SWIG_From_frag(double),"header") {
-SWIGINTERN 
+SWIGINTERN
 v8::Handle<v8::Value> SWIG_From_dec(double) (double val)
 {
   return v8::Number::New(val);
@@ -107,21 +177,15 @@ v8::Handle<v8::Value> SWIG_From_dec(double) (double val)
 }
 
 %fragment(SWIG_AsVal_frag(double),"header") {
-SWIGINTERN 
+SWIGINTERN
 int SWIG_AsVal_dec(double)(v8::Handle<v8::Value> obj, double *val)
 {
   if(!obj->IsNumber()) {
     return SWIG_TypeError;
   }
   if(val) *val = obj->NumberValue();
-  
+
   return SWIG_OK;
 }
 }
 
-%typemap(in) char *
-%{
-    v8::String::Utf8Value _$1($input);
-    $1 = *_$1;
-%}
-

Lib/javascript/v8/javascripttypemaps.swg

@@ -1,16 +1,43 @@
-#define SWIG_Object                     v8::Handle<v8::Value>
-#define VOID_Object                     v8::Undefined()
-#define SWIG_AppendOutput(result, obj)
-#define SWIG_SetConstant(name, obj)
-#define SWIG_Raise(obj, type, desc)  SWIG_V8_Raise(type)
+/* ------------------------------------------------------------
+ *  Typemap specializations for Javascript
+ * ------------------------------------------------------------ */
+
+/* ------------------------------------------------------------
+ *  Fragment section
+ * ------------------------------------------------------------ */
 
 /* Include fundamental fragemt definitions */
 %include <typemaps/fragments.swg>
 
-/* Python fragments for fundamental types */
-%include <javascriptprimitives.swg>
- 
+/* Look for user fragments file. */
+%include <javascriptfragments.swg>
+
+/* Javascript fragments for fundamental types */
+%include <javascriptprimtypes.swg>
+
+/* Javascript fragments for char* strings */
 %include <javascriptstrings.swg>
 
+
+/* ------------------------------------------------------------
+ *  Unified typemap section
+ * ------------------------------------------------------------ */
+
+/* Javascript types */
+
+#define SWIG_Object                     v8::Handle<v8::Value>
+#define VOID_Object                     v8::Undefined()
+
+/* Overload of the output/constant/exception/dirout handling */
+
+/* append output */
+#define SWIG_AppendOutput(result, obj)
+
+/* set constant */
+#define SWIG_SetConstant(name, obj)
+
+/* raise */
+#define SWIG_Raise(obj, type, desc)  SWIG_V8_Raise(type)
+ 
 /* Include the unified typemap library */
 %include <typemaps/swigtypemaps.swg>