parent
8b9166d067
commit
b915469f5e
|
@ -337,7 +337,7 @@ queue_find(Pred, Queue) ->
|
||||||
%%% Internal functions
|
%%% Internal functions
|
||||||
%%%===================================================================
|
%%%===================================================================
|
||||||
-spec negotiate_stream_mgmt(xmpp_element(), state()) -> state().
|
-spec negotiate_stream_mgmt(xmpp_element(), state()) -> state().
|
||||||
negotiate_stream_mgmt(Pkt, State) ->
|
negotiate_stream_mgmt(Pkt, #{lang := Lang} = State) ->
|
||||||
Xmlns = xmpp:get_ns(Pkt),
|
Xmlns = xmpp:get_ns(Pkt),
|
||||||
case Pkt of
|
case Pkt of
|
||||||
#sm_enable{} ->
|
#sm_enable{} ->
|
||||||
|
@ -345,7 +345,10 @@ negotiate_stream_mgmt(Pkt, State) ->
|
||||||
_ when is_record(Pkt, sm_a);
|
_ when is_record(Pkt, sm_a);
|
||||||
is_record(Pkt, sm_r);
|
is_record(Pkt, sm_r);
|
||||||
is_record(Pkt, sm_resume) ->
|
is_record(Pkt, sm_resume) ->
|
||||||
Err = #sm_failed{reason = 'unexpected-request', xmlns = Xmlns},
|
Txt = <<"Stream management is not enabled">>,
|
||||||
|
Err = #sm_failed{reason = 'unexpected-request',
|
||||||
|
text = xmpp:mk_text(Txt, Lang),
|
||||||
|
xmlns = Xmlns},
|
||||||
send(State, Err);
|
send(State, Err);
|
||||||
_ ->
|
_ ->
|
||||||
Err = #sm_failed{reason = 'bad-request', xmlns = Xmlns},
|
Err = #sm_failed{reason = 'bad-request', xmlns = Xmlns},
|
||||||
|
@ -363,7 +366,9 @@ perform_stream_mgmt(Pkt, #{mgmt_xmlns := Xmlns, lang := Lang} = State) ->
|
||||||
handle_a(State, Pkt);
|
handle_a(State, Pkt);
|
||||||
_ when is_record(Pkt, sm_enable);
|
_ when is_record(Pkt, sm_enable);
|
||||||
is_record(Pkt, sm_resume) ->
|
is_record(Pkt, sm_resume) ->
|
||||||
|
Txt = <<"Stream management is already enabled">>,
|
||||||
send(State, #sm_failed{reason = 'unexpected-request',
|
send(State, #sm_failed{reason = 'unexpected-request',
|
||||||
|
text = xmpp:mk_text(Txt, Lang),
|
||||||
xmlns = Xmlns});
|
xmlns = Xmlns});
|
||||||
_ ->
|
_ ->
|
||||||
send(State, #sm_failed{reason = 'bad-request',
|
send(State, #sm_failed{reason = 'bad-request',
|
||||||
|
|
Loading…
Reference in New Issue