mirror of
https://github.com/ninenines/cowboy.git
synced 2025-07-14 12:20:24 +00:00
19 lines
501 B
Erlang
19 lines
501 B
Erlang
|
%% 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}.
|