#include <sstream>
#include <cmath>
+#include <sys/types.h>
+#include <sys/socket.h>
+#include <netinet/in.h>
+#include <sys/un.h>
+
#include "Parser.hpp"
#include "Cycript.tab.hh"
return CYUTF16String(JSStringGetCharactersPtr(value), JSStringGetLength(value));
}
-static CYUTF8String CYPoolUTF8String(apr_pool_t *pool, JSContextRef context, JSStringRef value) {
+template <typename Type_>
+_finline size_t iconv_(size_t (*iconv)(iconv_t, Type_, size_t *, char **, size_t *), iconv_t cd, char **inbuf, size_t *inbytesleft, char **outbuf, size_t *outbytesleft) {
+ return iconv(cd, const_cast<Type_>(inbuf), inbytesleft, outbuf, outbytesleft);
+}
+
+CYUTF8String CYPoolUTF8String(apr_pool_t *pool, JSContextRef context, JSStringRef value) {
_assert(pool != NULL);
CYUTF16String utf16(CYCastUTF16String(value));
const char *in(reinterpret_cast<const char *>(utf16.data));
-#ifdef __APPLE__
- iconv_t conversion(_syscall(iconv_open("UTF-8", "UCS-2-INTERNAL")));
-#else
+#ifdef __GLIBC__
iconv_t conversion(_syscall(iconv_open("UTF-8", "UCS-2")));
+#else
+ iconv_t conversion(_syscall(iconv_open("UTF-8", "UCS-2-INTERNAL")));
#endif
size_t size(JSStringGetMaximumUTF8CStringSize(value));
CYUTF8String utf8(out, size);
size = utf16.size * 2;
- _syscall(iconv(conversion, const_cast<char **>(&in), &size, &out, &utf8.size));
+ _syscall(iconv_(&iconv, conversion, const_cast<char **>(&in), &size, &out, &utf8.size));
*out = '\0';
utf8.size = out - utf8.data;
break;
default:
+ // this test is designed to be "awewsome", generating neither warnings nor incorrect results
if (*value < 0x20 || *value >= 0x7f)
- str << "\\x" << std::setbase(16) << std::setw(2) << std::setfill('0') << unsigned(*value);
+ str << "\\x" << std::setbase(16) << std::setw(2) << std::setfill('0') << unsigned(uint8_t(*value));
else simple:
str << *value;
}
{NULL, NULL, 0}
};
+static JSObjectRef (*JSObjectMakeArray$)(JSContextRef, size_t, const JSValueRef[], JSValueRef *);
+
void CYSetArgs(int argc, const char *argv[]) {
JSContextRef context(CYGetJSContext());
JSValueRef args[argc];
for (int i(0); i != argc; ++i)
args[i] = CYCastJSValue(context, argv[i]);
-#ifdef __APPLE__
- JSValueRef exception(NULL);
- JSObjectRef array(JSObjectMakeArray(context, argc, args, &exception));
- CYThrow(context, exception);
-#else
- JSValueRef value(CYCallAsFunction(context, Array_, NULL, argc, args));
- JSObjectRef array(CYCastJSObject(context, value));
-#endif
+
+ JSObjectRef array;
+ if (JSObjectMakeArray$ != NULL) {
+ JSValueRef exception(NULL);
+ array = (*JSObjectMakeArray$)(context, argc, args, &exception);
+ CYThrow(context, exception);
+ } else {
+ JSValueRef value(CYCallAsFunction(context, Array_, NULL, argc, args));
+ array = CYCastJSObject(context, value);
+ }
+
CYSetProperty(context, System_, CYJSString("args"), array);
}
_aprcall(apr_initialize());
_aprcall(apr_pool_create(&Pool_, NULL));
_sqlcall(sqlite3_open("/usr/lib/libcycript.db", &Bridge_));
+
+ JSObjectMakeArray$ = reinterpret_cast<JSObjectRef (*)(JSContextRef, size_t, const JSValueRef[], JSValueRef *)>(dlsym(RTLD_DEFAULT, "JSObjectMakeArray"));
}
apr_pool_t *CYGetGlobalPool() {
CYThrow(context, exception);
}
-void CYObjectiveC(JSContextRef context, JSObjectRef global);
-
JSGlobalContextRef CYGetJSContext() {
CYInitialize();
Result_ = JSStringCreateWithUTF8CString("_");
-// XXX: this is very wrong and sad
-#ifdef __APPLE__
- CYObjectiveC(context, global);
-#endif
+ if (hooks_ != NULL && hooks_->SetupContext != NULL)
+ (*hooks_->SetupContext)(context);
}
return Context_;