Added rudimentary parser, and connected to JS

Added rudimentary parser, and connected to JS

squash! Added rudimentary parser, and connected to JS
This commit is contained in:
Jonatan Pålsson 2011-01-31 15:44:09 +01:00
parent 1f3f7daa9a
commit f8cf749e5f
10 changed files with 15501 additions and 23 deletions

View file

@ -72,10 +72,10 @@ handle_cast(stop, State) ->
{stop, normal, State}.
handle_info({tcp, Socket, RawData}, State) ->
%do_JSCall(Socket, RawData),
Parsed = ggs_protocol:parse(RawData),
do_JSDefine(Socket, RawData),
%Parsed = ggs_protocol:parse(RawData),
RequestCount = State#state.request_count,
gen_tcp:send(Socket, io_lib:fwrite("~p~n", [Parsed])),
%gen_tcp:send(Socket, io_lib:fwrite("~p~n", [Parsed])),
{noreply, State#state{request_count = RequestCount + 1}};
handle_info(timeout, #state{lsock = LSock} = State) ->
@ -94,8 +94,17 @@ code_change(_OldVsn, State, _Extra) ->
do_JSDefine(Socket, Data) ->
JSVM = js_runner:boot(),
Ret = js_runner:define(JSVM, Data),
gen_tcp:send(Socket, io_lib:fwrite("~p~n", [Ret])).
js_runner:define(JSVM, "function userCommand(cmd, par) {return cmd+' '+ par}"),
Parsed = ggs_protocol:parse(Data),
case Parsed of
{cmd, Command, Parameter} ->
Ret = js_runner:call(JSVM, "userCommand",
[list_to_binary(Command),
list_to_binary(Parameter)]),
gen_tcp:send(Socket, io_lib:fwrite("JS says: ~p~n", [Ret]));
Other ->
ok
end.
do_JSCall(Socket, Function, Parameters) ->
ok.