Packages

cttest

6.0.10
6.0.18 retired 6.0.17 retired 6.0.16 retired 6.0.14 retired 6.0.13 retired 6.0.11 retired 6.0.10 retired 6.0.7 retired 6.0.6 retired 6.0.4 retired 6.0.3 retired 1.0.2 retired

TEST TEST TEST just for me testing hex publishing

Retired package: Release invalid - This package is only for testing
HexDocs

Current section

Files

Jump to
Readme
12 Versions
6 Dependencies
Dependants
Files
Activity
cttest src xep0158.erl
Raw

src/xep0158.erl 

%% Created automatically by XML generator (fxml_gen.erl)

%% Source: xmpp_codec.spec



-module(xep0158).



-compile(export_all).



do_decode(<<"captcha">>, <<"urn:xmpp:captcha">>, El,

          Opts) ->

    decode_captcha(<<"urn:xmpp:captcha">>, Opts, El);

do_decode(Name, <<>>, _, _) ->

    erlang:error({xmpp_codec, {missing_tag_xmlns, Name}});

do_decode(Name, XMLNS, _, _) ->

    erlang:error({xmpp_codec, {unknown_tag, Name, XMLNS}}).



tags() -> [{<<"captcha">>, <<"urn:xmpp:captcha">>}].



do_encode({xcaptcha, _} = Captcha, TopXMLNS) ->

    encode_captcha(Captcha, TopXMLNS).



do_get_name({xcaptcha, _}) -> <<"captcha">>.



do_get_ns({xcaptcha, _}) -> <<"urn:xmpp:captcha">>.



pp(xcaptcha, 1) -> [xdata];

pp(_, _) -> no.



records() -> [{xcaptcha, 1}].



decode_captcha(__TopXMLNS, __Opts,

               {xmlel, <<"captcha">>, _attrs, _els}) ->

    Xdata = decode_captcha_els(__TopXMLNS,

                               __Opts,

                               _els,

                               error),

    {xcaptcha, Xdata}.



decode_captcha_els(__TopXMLNS, __Opts, [], Xdata) ->

    case Xdata of

        error ->

            erlang:error({xmpp_codec,

                          {missing_tag, <<"x">>, __TopXMLNS}});

        {value, Xdata1} -> Xdata1

    end;

decode_captcha_els(__TopXMLNS, __Opts,

                   [{xmlel, <<"x">>, _attrs, _} = _el | _els], Xdata) ->

    case xmpp_codec:get_attr(<<"xmlns">>,

                             _attrs,

                             __TopXMLNS)

        of

        <<"jabber:x:data">> ->

            decode_captcha_els(__TopXMLNS,

                               __Opts,

                               _els,

                               {value,

                                xep0004:decode_xdata(<<"jabber:x:data">>,

                                                     __Opts,

                                                     _el)});

        _ -> decode_captcha_els(__TopXMLNS, __Opts, _els, Xdata)

    end;

decode_captcha_els(__TopXMLNS, __Opts, [_ | _els],

                   Xdata) ->

    decode_captcha_els(__TopXMLNS, __Opts, _els, Xdata).



encode_captcha({xcaptcha, Xdata}, __TopXMLNS) ->

    __NewTopXMLNS =

        xmpp_codec:choose_top_xmlns(<<"urn:xmpp:captcha">>,

                                    [],

                                    __TopXMLNS),

    _els = lists:reverse('encode_captcha_$xdata'(Xdata,

                                                 __NewTopXMLNS,

                                                 [])),

    _attrs = xmpp_codec:enc_xmlns_attrs(__NewTopXMLNS,

                                        __TopXMLNS),

    {xmlel, <<"captcha">>, _attrs, _els}.



'encode_captcha_$xdata'(Xdata, __TopXMLNS, _acc) ->

    [xep0004:encode_xdata(Xdata, __TopXMLNS) | _acc].