aboutsummaryrefslogtreecommitdiffstats
path: root/test/ws_SUITE_data
diff options
context:
space:
mode:
Diffstat (limited to 'test/ws_SUITE_data')
-rw-r--r--test/ws_SUITE_data/ws_subprotocol.erl18
1 files changed, 18 insertions, 0 deletions
diff --git a/test/ws_SUITE_data/ws_subprotocol.erl b/test/ws_SUITE_data/ws_subprotocol.erl
new file mode 100644
index 0000000..a042dd2
--- /dev/null
+++ b/test/ws_SUITE_data/ws_subprotocol.erl
@@ -0,0 +1,18 @@
+%% Feel free to use, reuse and abuse the code in this file.
+
+-module(ws_subprotocol).
+
+-export([init/2]).
+-export([websocket_handle/3]).
+-export([websocket_info/3]).
+
+init(Req, Opts) ->
+ [Protocol | _] = cowboy_req:parse_header(<<"sec-websocket-protocol">>, Req),
+ Req2 = cowboy_req:set_resp_header(<<"sec-websocket-protocol">>, Protocol, Req),
+ {cowboy_websocket, Req2, Opts, 1000}.
+
+websocket_handle(_Frame, Req, State) ->
+ {ok, Req, State}.
+
+websocket_info(_Info, Req, State) ->
+ {ok, Req, State}.