aboutsummaryrefslogblamecommitdiffstats
path: root/test/ws_SUITE_data/ws_subprotocol.erl
blob: 3079bc60678ab60798031f5f4c390baa1d2f9406 (plain) (tree)
1
2
3
4
5
6
7




                                                           

                              





                                                                                       

                                  
 

                               
%% Feel free to use, reuse and abuse the code in this file.

-module(ws_subprotocol).

-export([init/2]).
-export([websocket_handle/2]).
-export([websocket_info/2]).

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, State) ->
	{ok, State}.

websocket_info(_Info, State) ->
	{ok, State}.