1
2/* ------------------------------------------------------------
3 *  utility methods for char strings
4 * ------------------------------------------------------------ */
5%fragment("SWIG_AsCharPtrAndSize", "header", fragment="SWIG_pchar_descriptor") {
6SWIGINTERN int
7SWIG_AsCharPtrAndSize(v8::Handle<v8::Value> valRef, char** cptr, size_t* psize, int *alloc)
8{
9  if(valRef->IsString()) {
10    v8::Handle<v8::String> js_str = SWIGV8_TO_STRING(valRef);
11
12    size_t len = SWIGV8_UTF8_LENGTH(js_str) + 1;
13    char* cstr = new char[len];
14    SWIGV8_WRITE_UTF8(js_str, cstr, len);
15
16    if(alloc) *alloc = SWIG_NEWOBJ;
17    if(psize) *psize = len;
18    if(cptr) *cptr = cstr;
19
20    return SWIG_OK;
21  } else {
22    if(valRef->IsObject()) {
23      v8::Handle<v8::Object> obj = SWIGV8_TO_OBJECT(valRef);
24      // try if the object is a wrapped char[]
25      swig_type_info* pchar_descriptor = SWIG_pchar_descriptor();
26      if (pchar_descriptor) {
27        void* vptr = 0;
28        if (SWIG_ConvertPtr(obj, &vptr, pchar_descriptor, 0) == SWIG_OK) {
29          if (cptr) *cptr = (char *) vptr;
30          if (psize) *psize = vptr ? (strlen((char *)vptr) + 1) : 0;
31          if (alloc) *alloc = SWIG_OLDOBJ;
32          return SWIG_OK;
33        }
34      }
35      return SWIG_TypeError;
36    } else {
37      return SWIG_TypeError;
38    }
39  }
40}
41}
42
43%fragment("SWIG_FromCharPtrAndSize","header",fragment="SWIG_pchar_descriptor") {
44SWIGINTERNINLINE v8::Handle<v8::Value>
45SWIG_FromCharPtrAndSize(const char* carray, size_t size)
46{
47  if (carray) {
48    if (size > INT_MAX) {
49      // TODO: handle extra long strings
50      return SWIGV8_UNDEFINED();
51    } else {
52      v8::Handle<v8::String> js_str = SWIGV8_STRING_NEW2(carray, size);
53      return js_str;
54    }
55  } else {
56    return SWIGV8_UNDEFINED();
57  }
58}
59}
60