/* }}} */
#include "cycript.hpp"
+#include "JavaScript.hpp"
#include "Pooling.hpp"
#include "Parser.hpp"
#include <unistd.h>
#include <sstream>
+#include <sys/types.h>
+#include <sys/socket.h>
+#include <netinet/in.h>
+#include <sys/un.h>
+
struct CYExecute_ {
apr_pool_t *pool_;
const char * volatile data_;
CYExecute_ *execute(reinterpret_cast<CYExecute_ *>([value pointerValue]));
const char *data(execute->data_);
execute->data_ = NULL;
- execute->data_ = CYExecute(execute->pool_, data);
+ execute->data_ = CYExecute(execute->pool_, CYUTF8String(data));
}
@end
CYClient_ *client = [[[CYClient_ alloc] init] autorelease];
+ bool dispatch;
+ if (CFStringRef mode = CFRunLoopCopyCurrentMode(CFRunLoopGetMain())) {
+ dispatch = true;
+ CFRelease(mode);
+ } else
+ dispatch = false;
+
for (;;) {
size_t size;
if (!CYRecvAll(socket_, &size, sizeof(size)))
return;
data[size] = '\0';
- CYDriver driver("");
+ CYDriver driver;
cy::parser parser(driver);
driver.data_ = data;
json = NULL;
size = _not(size_t);
} else {
- CYContext context(driver.pool_);
+ NSAutoreleasePool *ar = [[NSAutoreleasePool alloc] init];
+
+ CYOptions options;
+ CYContext context(driver.pool_, options);
driver.program_->Replace(context);
std::ostringstream str;
- CYOutput out(str);
+ CYOutput out(str, options);
out << *driver.program_;
std::string code(str.str());
CYExecute_ execute = {pool, code.c_str()};
- [client performSelectorOnMainThread:@selector(execute:) withObject:[NSValue valueWithPointer:&execute] waitUntilDone:YES];
+ NSValue *value([NSValue valueWithPointer:&execute]);
+ if (dispatch)
+ [client performSelectorOnMainThread:@selector(execute:) withObject:value waitUntilDone:YES];
+ else
+ [client execute:value];
json = execute.data_;
size = json == NULL ? _not(size_t) : strlen(json);
+
+ [ar release];
}
if (!CYSendAll(socket_, &size, sizeof(size)))
_aprcall(apr_threadattr_create(&attr, client->pool_));
_aprcall(apr_thread_create(&client->thread_, attr, &OnClient, client, client->pool_));
}
+
+extern "C" void CYHandleServer(pid_t pid) {
+ CYInitializeDynamic();
+
+ int socket(_syscall(::socket(PF_UNIX, SOCK_STREAM, 0))); try {
+ struct sockaddr_un address;
+ memset(&address, 0, sizeof(address));
+ address.sun_family = AF_UNIX;
+ sprintf(address.sun_path, "/tmp/.s.cy.%u", pid);
+
+ _syscall(connect(socket, reinterpret_cast<sockaddr *>(&address), SUN_LEN(&address)));
+
+ apr_pool_t *pool;
+ apr_pool_create(&pool, NULL);
+
+ CYHandleClient(pool, socket);
+ } catch (const CYException &error) {
+ CYPool pool;
+ fprintf(stderr, "%s\n", error.PoolCString(pool));
+ }
+}