aboutsummaryrefslogtreecommitdiffstats
path: root/examples/websocket/src/ws_h.erl
diff options
context:
space:
mode:
Diffstat (limited to 'examples/websocket/src/ws_h.erl')
-rw-r--r--examples/websocket/src/ws_h.erl24
1 files changed, 24 insertions, 0 deletions
diff --git a/examples/websocket/src/ws_h.erl b/examples/websocket/src/ws_h.erl
new file mode 100644
index 0000000..63055df
--- /dev/null
+++ b/examples/websocket/src/ws_h.erl
@@ -0,0 +1,24 @@
+-module(ws_h).
+
+-export([init/2]).
+-export([websocket_init/1]).
+-export([websocket_handle/2]).
+-export([websocket_info/2]).
+
+init(Req, Opts) ->
+ {cowboy_websocket, Req, Opts}.
+
+websocket_init(State) ->
+ erlang:start_timer(1000, self(), <<"Hello!">>),
+ {ok, State}.
+
+websocket_handle({text, Msg}, State) ->
+ {reply, {text, << "That's what she said! ", Msg/binary >>}, State};
+websocket_handle(_Data, State) ->
+ {ok, State}.
+
+websocket_info({timeout, _Ref, Msg}, State) ->
+ erlang:start_timer(1000, self(), <<"How' you doin'?">>),
+ {reply, {text, Msg}, State};
+websocket_info(_Info, State) ->
+ {ok, State}.