|
%% -*- coding: utf-8 -*-
|
|
%% @private
|
|
%% Automatically generated, do not edit
|
|
%% Generated by gpb_compile version 4.8.0
|
|
-module(mytest).
|
|
|
|
-export([encode_msg/1, encode_msg/2, encode_msg/3]).
|
|
-export([decode_msg/2, decode_msg/3]).
|
|
-export([merge_msgs/2, merge_msgs/3, merge_msgs/4]).
|
|
-export([verify_msg/1, verify_msg/2, verify_msg/3]).
|
|
-export([get_msg_defs/0]).
|
|
-export([get_msg_names/0]).
|
|
-export([get_group_names/0]).
|
|
-export([get_msg_or_group_names/0]).
|
|
-export([get_enum_names/0]).
|
|
-export([find_msg_def/1, fetch_msg_def/1]).
|
|
-export([find_enum_def/1, fetch_enum_def/1]).
|
|
-export([enum_symbol_by_value/2, enum_value_by_symbol/2]).
|
|
-export([get_service_names/0]).
|
|
-export([get_service_def/1]).
|
|
-export([get_rpc_names/1]).
|
|
-export([find_rpc_def/2, fetch_rpc_def/2]).
|
|
-export([fqbin_to_service_name/1]).
|
|
-export([service_name_to_fqbin/1]).
|
|
-export([fqbins_to_service_and_rpc_name/2]).
|
|
-export([service_and_rpc_name_to_fqbins/2]).
|
|
-export([fqbin_to_msg_name/1]).
|
|
-export([msg_name_to_fqbin/1]).
|
|
-export([fqbin_to_enum_name/1]).
|
|
-export([enum_name_to_fqbin/1]).
|
|
-export([get_package_name/0]).
|
|
-export([uses_packages/0]).
|
|
-export([source_basename/0]).
|
|
-export([get_all_source_basenames/0]).
|
|
-export([get_all_proto_names/0]).
|
|
-export([get_msg_containment/1]).
|
|
-export([get_pkg_containment/1]).
|
|
-export([get_service_containment/1]).
|
|
-export([get_rpc_containment/1]).
|
|
-export([get_enum_containment/1]).
|
|
-export([get_proto_by_msg_name_as_fqbin/1]).
|
|
-export([get_proto_by_service_name_as_fqbin/1]).
|
|
-export([get_proto_by_enum_name_as_fqbin/1]).
|
|
-export([get_protos_by_pkg_name_as_fqbin/1]).
|
|
-export([gpb_version_as_string/0, gpb_version_as_list/0]).
|
|
|
|
-include("mytest.hrl").
|
|
-include("gpb.hrl").
|
|
|
|
%% enumerated types
|
|
|
|
-export_type([]).
|
|
|
|
%% message types
|
|
-type test() :: #test{}.
|
|
|
|
-type phoneNumber() :: #phoneNumber{}.
|
|
|
|
-type person() :: #person{}.
|
|
|
|
-type addressBook() :: #addressBook{}.
|
|
|
|
-type tint32() :: #tint32{}.
|
|
|
|
-export_type(['test'/0, 'phoneNumber'/0, 'person'/0, 'addressBook'/0, 'tint32'/0]).
|
|
|
|
-compile(export_all).
|
|
|
|
encode_int32(N) ->
|
|
TT = #tint32{int1 = 1, int2 = -1, int3 = 128, int4 = -128, int5 = 65536,
|
|
int6 = -65536, int7 = 2100000000, int8 = -2100000000, int9 = 678665, int10 = -678665},
|
|
tt1(N, TT).
|
|
|
|
tt1(0, TT) ->
|
|
ok;
|
|
tt1(N, TT) ->
|
|
encode_msg(TT),
|
|
tt1(N - 1, TT).
|
|
|
|
decode_int32(N) ->
|
|
TT = #tint32{int1 = 1, int2 = -1, int3 = 128, int4 = -128, int5 = 65536,
|
|
int6 = -65536, int7 = 2100000000, int8 = -2100000000, int9 = 678665, int10 = -678665},
|
|
Bin = encode_msg(TT),
|
|
tt2(N, Bin).
|
|
|
|
tt2(0, Bin) ->
|
|
Bin;
|
|
tt2(N, Bin) ->
|
|
decode_msg(Bin, tint32),
|
|
tt2(N - 1, Bin).
|
|
|
|
encode_addressBook(N) ->
|
|
Add = #addressBook{
|
|
person1 = [
|
|
#person{
|
|
name = "Alice",
|
|
integer = 10000,
|
|
phone = [
|
|
#phoneNumber{number = #test{aa = "123456789"}, type = 1},
|
|
#phoneNumber{number = #test{aa = "87654321"}, type = 2}
|
|
]
|
|
},
|
|
#person{
|
|
name = "Bob",
|
|
integer = 20000,
|
|
phone = [
|
|
#phoneNumber{number = #test{aa = "01234567890"}, type = 3}
|
|
]
|
|
}
|
|
]
|
|
},
|
|
tt3(N, Add).
|
|
|
|
tt3(0, Add) ->
|
|
ok;
|
|
tt3(N, Add) ->
|
|
encode_msg(Add),
|
|
tt3(N - 1, Add).
|
|
|
|
|
|
decode_addressBook(N) ->
|
|
AddressBook = #addressBook{
|
|
person1 = [
|
|
#person{
|
|
name = "Alice",
|
|
integer = 10000,
|
|
phone = [
|
|
#phoneNumber{number = #test{aa = "123456789"}, type = 1},
|
|
#phoneNumber{number = #test{aa = "87654321"}, type = 2}
|
|
]
|
|
},
|
|
#person{
|
|
name = "Bob",
|
|
integer = 20000,
|
|
phone = [
|
|
#phoneNumber{number = #test{aa = "01234567890"}, type = 3}
|
|
]
|
|
}
|
|
]
|
|
},
|
|
Bin = encode_msg(AddressBook),
|
|
tt4(N, Bin).
|
|
tt4(0, Bin) ->
|
|
Bin;
|
|
tt4(N, Bin) ->
|
|
decode_msg(Bin, addressBook),
|
|
tt4(N - 1, Bin).
|
|
|
|
|
|
-spec encode_msg(#test{} | #phoneNumber{} | #person{} | #addressBook{} | #tint32{}) -> binary().
|
|
encode_msg(Msg) when tuple_size(Msg) >= 1 ->
|
|
encode_msg(Msg, element(1, Msg), []).
|
|
|
|
-spec encode_msg(#test{} | #phoneNumber{} | #person{} | #addressBook{} | #tint32{}, atom() | list()) -> binary().
|
|
encode_msg(Msg, MsgName) when is_atom(MsgName) ->
|
|
encode_msg(Msg, MsgName, []);
|
|
encode_msg(Msg, Opts)
|
|
when tuple_size(Msg) >= 1, is_list(Opts) ->
|
|
encode_msg(Msg, element(1, Msg), Opts).
|
|
|
|
-spec encode_msg(#test{} | #phoneNumber{} | #person{} | #addressBook{} | #tint32{}, atom(), list()) -> binary().
|
|
encode_msg(Msg, MsgName, Opts) ->
|
|
case proplists:get_bool(verify, Opts) of
|
|
true -> verify_msg(Msg, MsgName, Opts);
|
|
false -> ok
|
|
end,
|
|
TrUserData = proplists:get_value(user_data, Opts),
|
|
case MsgName of
|
|
test ->
|
|
encode_msg_test(id(Msg, TrUserData), TrUserData);
|
|
phoneNumber ->
|
|
encode_msg_phoneNumber(id(Msg, TrUserData), TrUserData);
|
|
person ->
|
|
encode_msg_person(id(Msg, TrUserData), TrUserData);
|
|
addressBook ->
|
|
encode_msg_addressBook(id(Msg, TrUserData), TrUserData);
|
|
tint32 ->
|
|
encode_msg_tint32(id(Msg, TrUserData), TrUserData)
|
|
end.
|
|
|
|
|
|
encode_msg_test(Msg, TrUserData) ->
|
|
encode_msg_test(Msg, <<>>, TrUserData).
|
|
|
|
|
|
encode_msg_test(#test{aa = F1}, Bin, TrUserData) ->
|
|
begin
|
|
TrF1 = id(F1, TrUserData),
|
|
e_type_string(TrF1, <<Bin/binary, 10>>, TrUserData)
|
|
end.
|
|
|
|
encode_msg_phoneNumber(Msg, TrUserData) ->
|
|
encode_msg_phoneNumber(Msg, <<>>, TrUserData).
|
|
|
|
|
|
encode_msg_phoneNumber(#phoneNumber{number = F1,
|
|
type = F2},
|
|
Bin, TrUserData) ->
|
|
B1 = begin
|
|
TrF1 = id(F1, TrUserData),
|
|
e_mfield_phoneNumber_number(TrF1, <<Bin/binary, 10>>,
|
|
TrUserData)
|
|
end,
|
|
begin
|
|
TrF2 = id(F2, TrUserData),
|
|
e_type_int32(TrF2, <<B1/binary, 16>>, TrUserData)
|
|
end.
|
|
|
|
encode_msg_person(Msg, TrUserData) ->
|
|
encode_msg_person(Msg, <<>>, TrUserData).
|
|
|
|
|
|
encode_msg_person(#person{name = F1, integer = F2,
|
|
email = F3, phone = F4},
|
|
Bin, TrUserData) ->
|
|
B1 = begin
|
|
TrF1 = id(F1, TrUserData),
|
|
e_type_string(TrF1, <<Bin/binary, 10>>, TrUserData)
|
|
end,
|
|
B2 = begin
|
|
TrF2 = id(F2, TrUserData),
|
|
e_type_int32(TrF2, <<B1/binary, 16>>, TrUserData)
|
|
end,
|
|
B3 = if F3 == undefined -> B2;
|
|
true ->
|
|
begin
|
|
TrF3 = id(F3, TrUserData),
|
|
e_type_string(TrF3, <<B2/binary, 26>>, TrUserData)
|
|
end
|
|
end,
|
|
begin
|
|
TrF4 = id(F4, TrUserData),
|
|
if TrF4 == [] -> B3;
|
|
true -> e_field_person_phone(TrF4, B3, TrUserData)
|
|
end
|
|
end.
|
|
|
|
encode_msg_addressBook(Msg, TrUserData) ->
|
|
encode_msg_addressBook(Msg, <<>>, TrUserData).
|
|
|
|
|
|
encode_msg_addressBook(#addressBook{person1 = F1,
|
|
others = F2},
|
|
Bin, TrUserData) ->
|
|
B1 = begin
|
|
TrF1 = id(F1, TrUserData),
|
|
if TrF1 == [] -> Bin;
|
|
true ->
|
|
e_field_addressBook_person1(TrF1, Bin, TrUserData)
|
|
end
|
|
end,
|
|
begin
|
|
TrF2 = id(F2, TrUserData),
|
|
if TrF2 == [] -> B1;
|
|
true -> e_field_addressBook_others(TrF2, B1, TrUserData)
|
|
end
|
|
end.
|
|
|
|
encode_msg_tint32(Msg, TrUserData) ->
|
|
encode_msg_tint32(Msg, <<>>, TrUserData).
|
|
|
|
|
|
encode_msg_tint32(#tint32{int1 = F1, int2 = F2,
|
|
int3 = F3, int4 = F4, int5 = F5, int6 = F6, int7 = F7,
|
|
int8 = F8, int9 = F9, int10 = F10},
|
|
Bin, TrUserData) ->
|
|
B1 = begin
|
|
TrF1 = id(F1, TrUserData),
|
|
e_type_int32(TrF1, <<Bin/binary, 8>>, TrUserData)
|
|
end,
|
|
B2 = begin
|
|
TrF2 = id(F2, TrUserData),
|
|
e_type_int32(TrF2, <<B1/binary, 16>>, TrUserData)
|
|
end,
|
|
B3 = begin
|
|
TrF3 = id(F3, TrUserData),
|
|
e_type_int32(TrF3, <<B2/binary, 24>>, TrUserData)
|
|
end,
|
|
B4 = begin
|
|
TrF4 = id(F4, TrUserData),
|
|
e_type_int32(TrF4, <<B3/binary, 32>>, TrUserData)
|
|
end,
|
|
B5 = begin
|
|
TrF5 = id(F5, TrUserData),
|
|
e_type_int32(TrF5, <<B4/binary, 40>>, TrUserData)
|
|
end,
|
|
B6 = begin
|
|
TrF6 = id(F6, TrUserData),
|
|
e_type_int32(TrF6, <<B5/binary, 48>>, TrUserData)
|
|
end,
|
|
B7 = begin
|
|
TrF7 = id(F7, TrUserData),
|
|
e_type_int32(TrF7, <<B6/binary, 56>>, TrUserData)
|
|
end,
|
|
B8 = begin
|
|
TrF8 = id(F8, TrUserData),
|
|
e_type_int32(TrF8, <<B7/binary, 64>>, TrUserData)
|
|
end,
|
|
B9 = begin
|
|
TrF9 = id(F9, TrUserData),
|
|
e_type_int32(TrF9, <<B8/binary, 72>>, TrUserData)
|
|
end,
|
|
begin
|
|
TrF10 = id(F10, TrUserData),
|
|
e_type_int32(TrF10, <<B9/binary, 80>>, TrUserData)
|
|
end.
|
|
|
|
e_mfield_phoneNumber_number(Msg, Bin, TrUserData) ->
|
|
SubBin = encode_msg_test(Msg, <<>>, TrUserData),
|
|
Bin2 = e_varint(byte_size(SubBin), Bin),
|
|
<<Bin2/binary, SubBin/binary>>.
|
|
|
|
e_mfield_person_phone(Msg, Bin, TrUserData) ->
|
|
SubBin = encode_msg_phoneNumber(Msg, <<>>, TrUserData),
|
|
Bin2 = e_varint(byte_size(SubBin), Bin),
|
|
<<Bin2/binary, SubBin/binary>>.
|
|
|
|
e_field_person_phone([Elem | Rest], Bin, TrUserData) ->
|
|
Bin2 = <<Bin/binary, 34>>,
|
|
Bin3 = e_mfield_person_phone(id(Elem, TrUserData), Bin2,
|
|
TrUserData),
|
|
e_field_person_phone(Rest, Bin3, TrUserData);
|
|
e_field_person_phone([], Bin, _TrUserData) -> Bin.
|
|
|
|
e_mfield_addressBook_person1(Msg, Bin, TrUserData) ->
|
|
SubBin = encode_msg_person(Msg, <<>>, TrUserData),
|
|
Bin2 = e_varint(byte_size(SubBin), Bin),
|
|
<<Bin2/binary, SubBin/binary>>.
|
|
|
|
e_field_addressBook_person1([Elem | Rest], Bin,
|
|
TrUserData) ->
|
|
Bin2 = <<Bin/binary, 10>>,
|
|
Bin3 = e_mfield_addressBook_person1(id(Elem,
|
|
TrUserData),
|
|
Bin2, TrUserData),
|
|
e_field_addressBook_person1(Rest, Bin3, TrUserData);
|
|
e_field_addressBook_person1([], Bin, _TrUserData) ->
|
|
Bin.
|
|
|
|
e_mfield_addressBook_others(Msg, Bin, TrUserData) ->
|
|
SubBin = encode_msg_person(Msg, <<>>, TrUserData),
|
|
Bin2 = e_varint(byte_size(SubBin), Bin),
|
|
<<Bin2/binary, SubBin/binary>>.
|
|
|
|
e_field_addressBook_others([Elem | Rest], Bin,
|
|
TrUserData) ->
|
|
Bin2 = <<Bin/binary, 18>>,
|
|
Bin3 = e_mfield_addressBook_others(id(Elem, TrUserData),
|
|
Bin2, TrUserData),
|
|
e_field_addressBook_others(Rest, Bin3, TrUserData);
|
|
e_field_addressBook_others([], Bin, _TrUserData) -> Bin.
|
|
|
|
-compile({nowarn_unused_function,e_type_sint/3}).
|
|
e_type_sint(Value, Bin, _TrUserData) when Value >= 0 ->
|
|
e_varint(Value * 2, Bin);
|
|
e_type_sint(Value, Bin, _TrUserData) ->
|
|
e_varint(Value * -2 - 1, Bin).
|
|
|
|
-compile({nowarn_unused_function,e_type_int32/3}).
|
|
e_type_int32(Value, Bin, _TrUserData)
|
|
when 0 =< Value, Value =< 127 ->
|
|
<<Bin/binary, Value>>;
|
|
e_type_int32(Value, Bin, _TrUserData) ->
|
|
<<N:64/unsigned-native>> = <<Value:64/signed-native>>,
|
|
e_varint(N, Bin).
|
|
|
|
-compile({nowarn_unused_function,e_type_int64/3}).
|
|
e_type_int64(Value, Bin, _TrUserData)
|
|
when 0 =< Value, Value =< 127 ->
|
|
<<Bin/binary, Value>>;
|
|
e_type_int64(Value, Bin, _TrUserData) ->
|
|
<<N:64/unsigned-native>> = <<Value:64/signed-native>>,
|
|
e_varint(N, Bin).
|
|
|
|
-compile({nowarn_unused_function,e_type_bool/3}).
|
|
e_type_bool(true, Bin, _TrUserData) ->
|
|
<<Bin/binary, 1>>;
|
|
e_type_bool(false, Bin, _TrUserData) ->
|
|
<<Bin/binary, 0>>;
|
|
e_type_bool(1, Bin, _TrUserData) -> <<Bin/binary, 1>>;
|
|
e_type_bool(0, Bin, _TrUserData) -> <<Bin/binary, 0>>.
|
|
|
|
-compile({nowarn_unused_function,e_type_string/3}).
|
|
e_type_string(S, Bin, _TrUserData) ->
|
|
Utf8 = unicode:characters_to_binary(S),
|
|
Bin2 = e_varint(byte_size(Utf8), Bin),
|
|
<<Bin2/binary, Utf8/binary>>.
|
|
|
|
-compile({nowarn_unused_function,e_type_bytes/3}).
|
|
e_type_bytes(Bytes, Bin, _TrUserData)
|
|
when is_binary(Bytes) ->
|
|
Bin2 = e_varint(byte_size(Bytes), Bin),
|
|
<<Bin2/binary, Bytes/binary>>;
|
|
e_type_bytes(Bytes, Bin, _TrUserData)
|
|
when is_list(Bytes) ->
|
|
BytesBin = iolist_to_binary(Bytes),
|
|
Bin2 = e_varint(byte_size(BytesBin), Bin),
|
|
<<Bin2/binary, BytesBin/binary>>.
|
|
|
|
-compile({nowarn_unused_function,e_type_fixed32/3}).
|
|
e_type_fixed32(Value, Bin, _TrUserData) ->
|
|
<<Bin/binary, Value:32/little>>.
|
|
|
|
-compile({nowarn_unused_function,e_type_sfixed32/3}).
|
|
e_type_sfixed32(Value, Bin, _TrUserData) ->
|
|
<<Bin/binary, Value:32/little-signed>>.
|
|
|
|
-compile({nowarn_unused_function,e_type_fixed64/3}).
|
|
e_type_fixed64(Value, Bin, _TrUserData) ->
|
|
<<Bin/binary, Value:64/little>>.
|
|
|
|
-compile({nowarn_unused_function,e_type_sfixed64/3}).
|
|
e_type_sfixed64(Value, Bin, _TrUserData) ->
|
|
<<Bin/binary, Value:64/little-signed>>.
|
|
|
|
-compile({nowarn_unused_function,e_type_float/3}).
|
|
e_type_float(V, Bin, _) when is_number(V) ->
|
|
<<Bin/binary, V:32/little-float>>;
|
|
e_type_float(infinity, Bin, _) ->
|
|
<<Bin/binary, 0:16, 128, 127>>;
|
|
e_type_float('-infinity', Bin, _) ->
|
|
<<Bin/binary, 0:16, 128, 255>>;
|
|
e_type_float(nan, Bin, _) ->
|
|
<<Bin/binary, 0:16, 192, 127>>.
|
|
|
|
-compile({nowarn_unused_function,e_type_double/3}).
|
|
e_type_double(V, Bin, _) when is_number(V) ->
|
|
<<Bin/binary, V:64/little-float>>;
|
|
e_type_double(infinity, Bin, _) ->
|
|
<<Bin/binary, 0:48, 240, 127>>;
|
|
e_type_double('-infinity', Bin, _) ->
|
|
<<Bin/binary, 0:48, 240, 255>>;
|
|
e_type_double(nan, Bin, _) ->
|
|
<<Bin/binary, 0:48, 248, 127>>.
|
|
|
|
-compile({nowarn_unused_function,e_varint/3}).
|
|
e_varint(N, Bin, _TrUserData) -> e_varint(N, Bin).
|
|
|
|
-compile({nowarn_unused_function,e_varint/2}).
|
|
e_varint(N, Bin) when N =< 127 -> <<Bin/binary, N>>;
|
|
e_varint(N, Bin) ->
|
|
Bin2 = <<Bin/binary, (N band 127 bor 128)>>,
|
|
e_varint(N bsr 7, Bin2).
|
|
|
|
|
|
decode_msg(Bin, MsgName) when is_binary(Bin) ->
|
|
decode_msg(Bin, MsgName, []).
|
|
|
|
decode_msg(Bin, MsgName, Opts) when is_binary(Bin) ->
|
|
TrUserData = proplists:get_value(user_data, Opts),
|
|
decode_msg_1_catch(Bin, MsgName, TrUserData).
|
|
|
|
-ifdef('OTP_RELEASE').
|
|
decode_msg_1_catch(Bin, MsgName, TrUserData) ->
|
|
try decode_msg_2_doit(MsgName, Bin, TrUserData)
|
|
catch Class:Reason:StackTrace -> error({gpb_error,{decoding_failure, {Bin, MsgName, {Class, Reason, StackTrace}}}})
|
|
end.
|
|
-else.
|
|
decode_msg_1_catch(Bin, MsgName, TrUserData) ->
|
|
try decode_msg_2_doit(MsgName, Bin, TrUserData)
|
|
catch Class:Reason ->
|
|
StackTrace = erlang:get_stacktrace(),
|
|
error({gpb_error,{decoding_failure, {Bin, MsgName, {Class, Reason, StackTrace}}}})
|
|
end.
|
|
-endif.
|
|
|
|
decode_msg_2_doit(test, Bin, TrUserData) ->
|
|
id(decode_msg_test(Bin, TrUserData), TrUserData);
|
|
decode_msg_2_doit(phoneNumber, Bin, TrUserData) ->
|
|
id(decode_msg_phoneNumber(Bin, TrUserData), TrUserData);
|
|
decode_msg_2_doit(person, Bin, TrUserData) ->
|
|
id(decode_msg_person(Bin, TrUserData), TrUserData);
|
|
decode_msg_2_doit(addressBook, Bin, TrUserData) ->
|
|
id(decode_msg_addressBook(Bin, TrUserData), TrUserData);
|
|
decode_msg_2_doit(tint32, Bin, TrUserData) ->
|
|
id(decode_msg_tint32(Bin, TrUserData), TrUserData).
|
|
|
|
|
|
|
|
decode_msg_test(Bin, TrUserData) ->
|
|
dfp_read_field_def_test(Bin, 0, 0,
|
|
id(undefined, TrUserData), TrUserData).
|
|
|
|
dfp_read_field_def_test(<<10, Rest/binary>>, Z1, Z2,
|
|
F@_1, TrUserData) ->
|
|
d_field_test_aa(Rest, Z1, Z2, F@_1, TrUserData);
|
|
dfp_read_field_def_test(<<>>, 0, 0, F@_1, _) ->
|
|
#test{aa = F@_1};
|
|
dfp_read_field_def_test(Other, Z1, Z2, F@_1,
|
|
TrUserData) ->
|
|
dg_read_field_def_test(Other, Z1, Z2, F@_1, TrUserData).
|
|
|
|
dg_read_field_def_test(<<1:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, TrUserData)
|
|
when N < 32 - 7 ->
|
|
dg_read_field_def_test(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
TrUserData);
|
|
dg_read_field_def_test(<<0:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, TrUserData) ->
|
|
Key = X bsl N + Acc,
|
|
case Key of
|
|
10 -> d_field_test_aa(Rest, 0, 0, F@_1, TrUserData);
|
|
_ ->
|
|
case Key band 7 of
|
|
0 -> skip_varint_test(Rest, 0, 0, F@_1, TrUserData);
|
|
1 -> skip_64_test(Rest, 0, 0, F@_1, TrUserData);
|
|
2 ->
|
|
skip_length_delimited_test(Rest, 0, 0, F@_1,
|
|
TrUserData);
|
|
3 ->
|
|
skip_group_test(Rest, Key bsr 3, 0, F@_1, TrUserData);
|
|
5 -> skip_32_test(Rest, 0, 0, F@_1, TrUserData)
|
|
end
|
|
end;
|
|
dg_read_field_def_test(<<>>, 0, 0, F@_1, _) ->
|
|
#test{aa = F@_1}.
|
|
|
|
d_field_test_aa(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1,
|
|
TrUserData)
|
|
when N < 57 ->
|
|
d_field_test_aa(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
TrUserData);
|
|
d_field_test_aa(<<0:1, X:7, Rest/binary>>, N, Acc, _,
|
|
TrUserData) ->
|
|
{NewFValue, RestF} = begin
|
|
Len = X bsl N + Acc,
|
|
<<Utf8:Len/binary, Rest2/binary>> = Rest,
|
|
{id(unicode:characters_to_list(Utf8, unicode),
|
|
TrUserData),
|
|
Rest2}
|
|
end,
|
|
dfp_read_field_def_test(RestF, 0, 0, NewFValue,
|
|
TrUserData).
|
|
|
|
skip_varint_test(<<1:1, _:7, Rest/binary>>, Z1, Z2,
|
|
F@_1, TrUserData) ->
|
|
skip_varint_test(Rest, Z1, Z2, F@_1, TrUserData);
|
|
skip_varint_test(<<0:1, _:7, Rest/binary>>, Z1, Z2,
|
|
F@_1, TrUserData) ->
|
|
dfp_read_field_def_test(Rest, Z1, Z2, F@_1, TrUserData).
|
|
|
|
skip_length_delimited_test(<<1:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, TrUserData)
|
|
when N < 57 ->
|
|
skip_length_delimited_test(Rest, N + 7, X bsl N + Acc,
|
|
F@_1, TrUserData);
|
|
skip_length_delimited_test(<<0:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, TrUserData) ->
|
|
Length = X bsl N + Acc,
|
|
<<_:Length/binary, Rest2/binary>> = Rest,
|
|
dfp_read_field_def_test(Rest2, 0, 0, F@_1, TrUserData).
|
|
|
|
skip_group_test(Bin, FNum, Z2, F@_1, TrUserData) ->
|
|
{_, Rest} = read_group(Bin, FNum),
|
|
dfp_read_field_def_test(Rest, 0, Z2, F@_1, TrUserData).
|
|
|
|
skip_32_test(<<_:32, Rest/binary>>, Z1, Z2, F@_1,
|
|
TrUserData) ->
|
|
dfp_read_field_def_test(Rest, Z1, Z2, F@_1, TrUserData).
|
|
|
|
skip_64_test(<<_:64, Rest/binary>>, Z1, Z2, F@_1,
|
|
TrUserData) ->
|
|
dfp_read_field_def_test(Rest, Z1, Z2, F@_1, TrUserData).
|
|
|
|
decode_msg_phoneNumber(Bin, TrUserData) ->
|
|
dfp_read_field_def_phoneNumber(Bin, 0, 0,
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData), TrUserData).
|
|
|
|
dfp_read_field_def_phoneNumber(<<10, Rest/binary>>, Z1,
|
|
Z2, F@_1, F@_2, TrUserData) ->
|
|
d_field_phoneNumber_number(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData);
|
|
dfp_read_field_def_phoneNumber(<<16, Rest/binary>>, Z1,
|
|
Z2, F@_1, F@_2, TrUserData) ->
|
|
d_field_phoneNumber_type(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData);
|
|
dfp_read_field_def_phoneNumber(<<>>, 0, 0, F@_1, F@_2,
|
|
_) ->
|
|
#phoneNumber{number = F@_1, type = F@_2};
|
|
dfp_read_field_def_phoneNumber(Other, Z1, Z2, F@_1,
|
|
F@_2, TrUserData) ->
|
|
dg_read_field_def_phoneNumber(Other, Z1, Z2, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
dg_read_field_def_phoneNumber(<<1:1, X:7, Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, TrUserData)
|
|
when N < 32 - 7 ->
|
|
dg_read_field_def_phoneNumber(Rest, N + 7,
|
|
X bsl N + Acc, F@_1, F@_2, TrUserData);
|
|
dg_read_field_def_phoneNumber(<<0:1, X:7, Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, TrUserData) ->
|
|
Key = X bsl N + Acc,
|
|
case Key of
|
|
10 ->
|
|
d_field_phoneNumber_number(Rest, 0, 0, F@_1, F@_2,
|
|
TrUserData);
|
|
16 ->
|
|
d_field_phoneNumber_type(Rest, 0, 0, F@_1, F@_2,
|
|
TrUserData);
|
|
_ ->
|
|
case Key band 7 of
|
|
0 ->
|
|
skip_varint_phoneNumber(Rest, 0, 0, F@_1, F@_2,
|
|
TrUserData);
|
|
1 ->
|
|
skip_64_phoneNumber(Rest, 0, 0, F@_1, F@_2, TrUserData);
|
|
2 ->
|
|
skip_length_delimited_phoneNumber(Rest, 0, 0, F@_1,
|
|
F@_2, TrUserData);
|
|
3 ->
|
|
skip_group_phoneNumber(Rest, Key bsr 3, 0, F@_1, F@_2,
|
|
TrUserData);
|
|
5 ->
|
|
skip_32_phoneNumber(Rest, 0, 0, F@_1, F@_2, TrUserData)
|
|
end
|
|
end;
|
|
dg_read_field_def_phoneNumber(<<>>, 0, 0, F@_1, F@_2,
|
|
_) ->
|
|
#phoneNumber{number = F@_1, type = F@_2}.
|
|
|
|
d_field_phoneNumber_number(<<1:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, F@_2, TrUserData)
|
|
when N < 57 ->
|
|
d_field_phoneNumber_number(Rest, N + 7, X bsl N + Acc,
|
|
F@_1, F@_2, TrUserData);
|
|
d_field_phoneNumber_number(<<0:1, X:7, Rest/binary>>, N,
|
|
Acc, Prev, F@_2, TrUserData) ->
|
|
{NewFValue, RestF} = begin
|
|
Len = X bsl N + Acc,
|
|
<<Bs:Len/binary, Rest2/binary>> = Rest,
|
|
{id(decode_msg_test(Bs, TrUserData), TrUserData),
|
|
Rest2}
|
|
end,
|
|
dfp_read_field_def_phoneNumber(RestF, 0, 0,
|
|
if Prev == undefined -> NewFValue;
|
|
true ->
|
|
merge_msg_test(Prev, NewFValue,
|
|
TrUserData)
|
|
end,
|
|
F@_2, TrUserData).
|
|
|
|
d_field_phoneNumber_type(<<1:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, F@_2, TrUserData)
|
|
when N < 57 ->
|
|
d_field_phoneNumber_type(Rest, N + 7, X bsl N + Acc,
|
|
F@_1, F@_2, TrUserData);
|
|
d_field_phoneNumber_type(<<0:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, _, TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_phoneNumber(RestF, 0, 0, F@_1,
|
|
NewFValue, TrUserData).
|
|
|
|
skip_varint_phoneNumber(<<1:1, _:7, Rest/binary>>, Z1,
|
|
Z2, F@_1, F@_2, TrUserData) ->
|
|
skip_varint_phoneNumber(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData);
|
|
skip_varint_phoneNumber(<<0:1, _:7, Rest/binary>>, Z1,
|
|
Z2, F@_1, F@_2, TrUserData) ->
|
|
dfp_read_field_def_phoneNumber(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
skip_length_delimited_phoneNumber(<<1:1, X:7,
|
|
Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, TrUserData)
|
|
when N < 57 ->
|
|
skip_length_delimited_phoneNumber(Rest, N + 7,
|
|
X bsl N + Acc, F@_1, F@_2, TrUserData);
|
|
skip_length_delimited_phoneNumber(<<0:1, X:7,
|
|
Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, TrUserData) ->
|
|
Length = X bsl N + Acc,
|
|
<<_:Length/binary, Rest2/binary>> = Rest,
|
|
dfp_read_field_def_phoneNumber(Rest2, 0, 0, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
skip_group_phoneNumber(Bin, FNum, Z2, F@_1, F@_2,
|
|
TrUserData) ->
|
|
{_, Rest} = read_group(Bin, FNum),
|
|
dfp_read_field_def_phoneNumber(Rest, 0, Z2, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
skip_32_phoneNumber(<<_:32, Rest/binary>>, Z1, Z2, F@_1,
|
|
F@_2, TrUserData) ->
|
|
dfp_read_field_def_phoneNumber(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
skip_64_phoneNumber(<<_:64, Rest/binary>>, Z1, Z2, F@_1,
|
|
F@_2, TrUserData) ->
|
|
dfp_read_field_def_phoneNumber(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
decode_msg_person(Bin, TrUserData) ->
|
|
dfp_read_field_def_person(Bin, 0, 0,
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData), id([], TrUserData),
|
|
TrUserData).
|
|
|
|
dfp_read_field_def_person(<<10, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, TrUserData) ->
|
|
d_field_person_name(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, TrUserData);
|
|
dfp_read_field_def_person(<<16, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, TrUserData) ->
|
|
d_field_person_integer(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, TrUserData);
|
|
dfp_read_field_def_person(<<26, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, TrUserData) ->
|
|
d_field_person_email(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, TrUserData);
|
|
dfp_read_field_def_person(<<34, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, TrUserData) ->
|
|
d_field_person_phone(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, TrUserData);
|
|
dfp_read_field_def_person(<<>>, 0, 0, F@_1, F@_2, F@_3,
|
|
R1, TrUserData) ->
|
|
#person{name = F@_1, integer = F@_2, email = F@_3,
|
|
phone = lists_reverse(R1, TrUserData)};
|
|
dfp_read_field_def_person(Other, Z1, Z2, F@_1, F@_2,
|
|
F@_3, F@_4, TrUserData) ->
|
|
dg_read_field_def_person(Other, Z1, Z2, F@_1, F@_2,
|
|
F@_3, F@_4, TrUserData).
|
|
|
|
dg_read_field_def_person(<<1:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, F@_2, F@_3, F@_4, TrUserData)
|
|
when N < 32 - 7 ->
|
|
dg_read_field_def_person(Rest, N + 7, X bsl N + Acc,
|
|
F@_1, F@_2, F@_3, F@_4, TrUserData);
|
|
dg_read_field_def_person(<<0:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, F@_2, F@_3, F@_4, TrUserData) ->
|
|
Key = X bsl N + Acc,
|
|
case Key of
|
|
10 ->
|
|
d_field_person_name(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
TrUserData);
|
|
16 ->
|
|
d_field_person_integer(Rest, 0, 0, F@_1, F@_2, F@_3,
|
|
F@_4, TrUserData);
|
|
26 ->
|
|
d_field_person_email(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
TrUserData);
|
|
34 ->
|
|
d_field_person_phone(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
TrUserData);
|
|
_ ->
|
|
case Key band 7 of
|
|
0 ->
|
|
skip_varint_person(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
TrUserData);
|
|
1 ->
|
|
skip_64_person(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
TrUserData);
|
|
2 ->
|
|
skip_length_delimited_person(Rest, 0, 0, F@_1, F@_2,
|
|
F@_3, F@_4, TrUserData);
|
|
3 ->
|
|
skip_group_person(Rest, Key bsr 3, 0, F@_1, F@_2, F@_3,
|
|
F@_4, TrUserData);
|
|
5 ->
|
|
skip_32_person(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
TrUserData)
|
|
end
|
|
end;
|
|
dg_read_field_def_person(<<>>, 0, 0, F@_1, F@_2, F@_3,
|
|
R1, TrUserData) ->
|
|
#person{name = F@_1, integer = F@_2, email = F@_3,
|
|
phone = lists_reverse(R1, TrUserData)}.
|
|
|
|
d_field_person_name(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, TrUserData)
|
|
when N < 57 ->
|
|
d_field_person_name(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, TrUserData);
|
|
d_field_person_name(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
_, F@_2, F@_3, F@_4, TrUserData) ->
|
|
{NewFValue, RestF} = begin
|
|
Len = X bsl N + Acc,
|
|
<<Utf8:Len/binary, Rest2/binary>> = Rest,
|
|
{id(unicode:characters_to_list(Utf8, unicode),
|
|
TrUserData),
|
|
Rest2}
|
|
end,
|
|
dfp_read_field_def_person(RestF, 0, 0, NewFValue, F@_2,
|
|
F@_3, F@_4, TrUserData).
|
|
|
|
d_field_person_integer(<<1:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, F@_2, F@_3, F@_4, TrUserData)
|
|
when N < 57 ->
|
|
d_field_person_integer(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, TrUserData);
|
|
d_field_person_integer(<<0:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, _, F@_3, F@_4, TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_person(RestF, 0, 0, F@_1, NewFValue,
|
|
F@_3, F@_4, TrUserData).
|
|
|
|
d_field_person_email(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, TrUserData)
|
|
when N < 57 ->
|
|
d_field_person_email(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, TrUserData);
|
|
d_field_person_email(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, _, F@_4, TrUserData) ->
|
|
{NewFValue, RestF} = begin
|
|
Len = X bsl N + Acc,
|
|
<<Utf8:Len/binary, Rest2/binary>> = Rest,
|
|
{id(unicode:characters_to_list(Utf8, unicode),
|
|
TrUserData),
|
|
Rest2}
|
|
end,
|
|
dfp_read_field_def_person(RestF, 0, 0, F@_1, F@_2,
|
|
NewFValue, F@_4, TrUserData).
|
|
|
|
d_field_person_phone(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, TrUserData)
|
|
when N < 57 ->
|
|
d_field_person_phone(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, TrUserData);
|
|
d_field_person_phone(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, Prev, TrUserData) ->
|
|
{NewFValue, RestF} = begin
|
|
Len = X bsl N + Acc,
|
|
<<Bs:Len/binary, Rest2/binary>> = Rest,
|
|
{id(decode_msg_phoneNumber(Bs, TrUserData),
|
|
TrUserData),
|
|
Rest2}
|
|
end,
|
|
dfp_read_field_def_person(RestF, 0, 0, F@_1, F@_2, F@_3,
|
|
cons(NewFValue, Prev, TrUserData), TrUserData).
|
|
|
|
skip_varint_person(<<1:1, _:7, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, TrUserData) ->
|
|
skip_varint_person(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4,
|
|
TrUserData);
|
|
skip_varint_person(<<0:1, _:7, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, TrUserData) ->
|
|
dfp_read_field_def_person(Rest, Z1, Z2, F@_1, F@_2,
|
|
F@_3, F@_4, TrUserData).
|
|
|
|
skip_length_delimited_person(<<1:1, X:7, Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData)
|
|
when N < 57 ->
|
|
skip_length_delimited_person(Rest, N + 7, X bsl N + Acc,
|
|
F@_1, F@_2, F@_3, F@_4, TrUserData);
|
|
skip_length_delimited_person(<<0:1, X:7, Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData) ->
|
|
Length = X bsl N + Acc,
|
|
<<_:Length/binary, Rest2/binary>> = Rest,
|
|
dfp_read_field_def_person(Rest2, 0, 0, F@_1, F@_2, F@_3,
|
|
F@_4, TrUserData).
|
|
|
|
skip_group_person(Bin, FNum, Z2, F@_1, F@_2, F@_3, F@_4,
|
|
TrUserData) ->
|
|
{_, Rest} = read_group(Bin, FNum),
|
|
dfp_read_field_def_person(Rest, 0, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, TrUserData).
|
|
|
|
skip_32_person(<<_:32, Rest/binary>>, Z1, Z2, F@_1,
|
|
F@_2, F@_3, F@_4, TrUserData) ->
|
|
dfp_read_field_def_person(Rest, Z1, Z2, F@_1, F@_2,
|
|
F@_3, F@_4, TrUserData).
|
|
|
|
skip_64_person(<<_:64, Rest/binary>>, Z1, Z2, F@_1,
|
|
F@_2, F@_3, F@_4, TrUserData) ->
|
|
dfp_read_field_def_person(Rest, Z1, Z2, F@_1, F@_2,
|
|
F@_3, F@_4, TrUserData).
|
|
|
|
decode_msg_addressBook(Bin, TrUserData) ->
|
|
dfp_read_field_def_addressBook(Bin, 0, 0,
|
|
id([], TrUserData), id([], TrUserData),
|
|
TrUserData).
|
|
|
|
dfp_read_field_def_addressBook(<<10, Rest/binary>>, Z1,
|
|
Z2, F@_1, F@_2, TrUserData) ->
|
|
d_field_addressBook_person1(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData);
|
|
dfp_read_field_def_addressBook(<<18, Rest/binary>>, Z1,
|
|
Z2, F@_1, F@_2, TrUserData) ->
|
|
d_field_addressBook_others(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData);
|
|
dfp_read_field_def_addressBook(<<>>, 0, 0, R1, R2,
|
|
TrUserData) ->
|
|
#addressBook{person1 = lists_reverse(R1, TrUserData),
|
|
others = lists_reverse(R2, TrUserData)};
|
|
dfp_read_field_def_addressBook(Other, Z1, Z2, F@_1,
|
|
F@_2, TrUserData) ->
|
|
dg_read_field_def_addressBook(Other, Z1, Z2, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
dg_read_field_def_addressBook(<<1:1, X:7, Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, TrUserData)
|
|
when N < 32 - 7 ->
|
|
dg_read_field_def_addressBook(Rest, N + 7,
|
|
X bsl N + Acc, F@_1, F@_2, TrUserData);
|
|
dg_read_field_def_addressBook(<<0:1, X:7, Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, TrUserData) ->
|
|
Key = X bsl N + Acc,
|
|
case Key of
|
|
10 ->
|
|
d_field_addressBook_person1(Rest, 0, 0, F@_1, F@_2,
|
|
TrUserData);
|
|
18 ->
|
|
d_field_addressBook_others(Rest, 0, 0, F@_1, F@_2,
|
|
TrUserData);
|
|
_ ->
|
|
case Key band 7 of
|
|
0 ->
|
|
skip_varint_addressBook(Rest, 0, 0, F@_1, F@_2,
|
|
TrUserData);
|
|
1 ->
|
|
skip_64_addressBook(Rest, 0, 0, F@_1, F@_2, TrUserData);
|
|
2 ->
|
|
skip_length_delimited_addressBook(Rest, 0, 0, F@_1,
|
|
F@_2, TrUserData);
|
|
3 ->
|
|
skip_group_addressBook(Rest, Key bsr 3, 0, F@_1, F@_2,
|
|
TrUserData);
|
|
5 ->
|
|
skip_32_addressBook(Rest, 0, 0, F@_1, F@_2, TrUserData)
|
|
end
|
|
end;
|
|
dg_read_field_def_addressBook(<<>>, 0, 0, R1, R2,
|
|
TrUserData) ->
|
|
#addressBook{person1 = lists_reverse(R1, TrUserData),
|
|
others = lists_reverse(R2, TrUserData)}.
|
|
|
|
d_field_addressBook_person1(<<1:1, X:7, Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, TrUserData)
|
|
when N < 57 ->
|
|
d_field_addressBook_person1(Rest, N + 7, X bsl N + Acc,
|
|
F@_1, F@_2, TrUserData);
|
|
d_field_addressBook_person1(<<0:1, X:7, Rest/binary>>,
|
|
N, Acc, Prev, F@_2, TrUserData) ->
|
|
{NewFValue, RestF} = begin
|
|
Len = X bsl N + Acc,
|
|
<<Bs:Len/binary, Rest2/binary>> = Rest,
|
|
{id(decode_msg_person(Bs, TrUserData), TrUserData),
|
|
Rest2}
|
|
end,
|
|
dfp_read_field_def_addressBook(RestF, 0, 0,
|
|
cons(NewFValue, Prev, TrUserData), F@_2,
|
|
TrUserData).
|
|
|
|
d_field_addressBook_others(<<1:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, F@_2, TrUserData)
|
|
when N < 57 ->
|
|
d_field_addressBook_others(Rest, N + 7, X bsl N + Acc,
|
|
F@_1, F@_2, TrUserData);
|
|
d_field_addressBook_others(<<0:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, Prev, TrUserData) ->
|
|
{NewFValue, RestF} = begin
|
|
Len = X bsl N + Acc,
|
|
<<Bs:Len/binary, Rest2/binary>> = Rest,
|
|
{id(decode_msg_person(Bs, TrUserData), TrUserData),
|
|
Rest2}
|
|
end,
|
|
dfp_read_field_def_addressBook(RestF, 0, 0, F@_1,
|
|
cons(NewFValue, Prev, TrUserData),
|
|
TrUserData).
|
|
|
|
skip_varint_addressBook(<<1:1, _:7, Rest/binary>>, Z1,
|
|
Z2, F@_1, F@_2, TrUserData) ->
|
|
skip_varint_addressBook(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData);
|
|
skip_varint_addressBook(<<0:1, _:7, Rest/binary>>, Z1,
|
|
Z2, F@_1, F@_2, TrUserData) ->
|
|
dfp_read_field_def_addressBook(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
skip_length_delimited_addressBook(<<1:1, X:7,
|
|
Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, TrUserData)
|
|
when N < 57 ->
|
|
skip_length_delimited_addressBook(Rest, N + 7,
|
|
X bsl N + Acc, F@_1, F@_2, TrUserData);
|
|
skip_length_delimited_addressBook(<<0:1, X:7,
|
|
Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, TrUserData) ->
|
|
Length = X bsl N + Acc,
|
|
<<_:Length/binary, Rest2/binary>> = Rest,
|
|
dfp_read_field_def_addressBook(Rest2, 0, 0, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
skip_group_addressBook(Bin, FNum, Z2, F@_1, F@_2,
|
|
TrUserData) ->
|
|
{_, Rest} = read_group(Bin, FNum),
|
|
dfp_read_field_def_addressBook(Rest, 0, Z2, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
skip_32_addressBook(<<_:32, Rest/binary>>, Z1, Z2, F@_1,
|
|
F@_2, TrUserData) ->
|
|
dfp_read_field_def_addressBook(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
skip_64_addressBook(<<_:64, Rest/binary>>, Z1, Z2, F@_1,
|
|
F@_2, TrUserData) ->
|
|
dfp_read_field_def_addressBook(Rest, Z1, Z2, F@_1, F@_2,
|
|
TrUserData).
|
|
|
|
decode_msg_tint32(Bin, TrUserData) ->
|
|
dfp_read_field_def_tint32(Bin, 0, 0,
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData),
|
|
id(undefined, TrUserData), TrUserData).
|
|
|
|
dfp_read_field_def_tint32(<<8, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
d_field_tint32_int1(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
dfp_read_field_def_tint32(<<16, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
d_field_tint32_int2(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
dfp_read_field_def_tint32(<<24, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
d_field_tint32_int3(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
dfp_read_field_def_tint32(<<32, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
d_field_tint32_int4(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
dfp_read_field_def_tint32(<<40, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
d_field_tint32_int5(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
dfp_read_field_def_tint32(<<48, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
d_field_tint32_int6(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
dfp_read_field_def_tint32(<<56, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
d_field_tint32_int7(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
dfp_read_field_def_tint32(<<64, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
d_field_tint32_int8(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
dfp_read_field_def_tint32(<<72, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
d_field_tint32_int9(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
dfp_read_field_def_tint32(<<80, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
d_field_tint32_int10(Rest, Z1, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
dfp_read_field_def_tint32(<<>>, 0, 0, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, _) ->
|
|
#tint32{int1 = F@_1, int2 = F@_2, int3 = F@_3,
|
|
int4 = F@_4, int5 = F@_5, int6 = F@_6, int7 = F@_7,
|
|
int8 = F@_8, int9 = F@_9, int10 = F@_10};
|
|
dfp_read_field_def_tint32(Other, Z1, Z2, F@_1, F@_2,
|
|
F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData) ->
|
|
dg_read_field_def_tint32(Other, Z1, Z2, F@_1, F@_2,
|
|
F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
dg_read_field_def_tint32(<<1:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8,
|
|
F@_9, F@_10, TrUserData)
|
|
when N < 32 - 7 ->
|
|
dg_read_field_def_tint32(Rest, N + 7, X bsl N + Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8,
|
|
F@_9, F@_10, TrUserData);
|
|
dg_read_field_def_tint32(<<0:1, X:7, Rest/binary>>, N,
|
|
Acc, F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8,
|
|
F@_9, F@_10, TrUserData) ->
|
|
Key = X bsl N + Acc,
|
|
case Key of
|
|
8 ->
|
|
d_field_tint32_int1(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
16 ->
|
|
d_field_tint32_int2(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
24 ->
|
|
d_field_tint32_int3(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
32 ->
|
|
d_field_tint32_int4(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
40 ->
|
|
d_field_tint32_int5(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
48 ->
|
|
d_field_tint32_int6(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
56 ->
|
|
d_field_tint32_int7(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
64 ->
|
|
d_field_tint32_int8(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
72 ->
|
|
d_field_tint32_int9(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
80 ->
|
|
d_field_tint32_int10(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
_ ->
|
|
case Key band 7 of
|
|
0 ->
|
|
skip_varint_tint32(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
1 ->
|
|
skip_64_tint32(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5,
|
|
F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
2 ->
|
|
skip_length_delimited_tint32(Rest, 0, 0, F@_1, F@_2,
|
|
F@_3, F@_4, F@_5, F@_6, F@_7, F@_8,
|
|
F@_9, F@_10, TrUserData);
|
|
3 ->
|
|
skip_group_tint32(Rest, Key bsr 3, 0, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
5 ->
|
|
skip_32_tint32(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5,
|
|
F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData)
|
|
end
|
|
end;
|
|
dg_read_field_def_tint32(<<>>, 0, 0, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, _) ->
|
|
#tint32{int1 = F@_1, int2 = F@_2, int3 = F@_3,
|
|
int4 = F@_4, int5 = F@_5, int6 = F@_6, int7 = F@_7,
|
|
int8 = F@_8, int9 = F@_9, int10 = F@_10}.
|
|
|
|
d_field_tint32_int1(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData)
|
|
when N < 57 ->
|
|
d_field_tint32_int1(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
d_field_tint32_int1(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
_, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_tint32(RestF, 0, 0, NewFValue, F@_2,
|
|
F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
d_field_tint32_int2(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData)
|
|
when N < 57 ->
|
|
d_field_tint32_int2(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
d_field_tint32_int2(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, _, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_tint32(RestF, 0, 0, F@_1, NewFValue,
|
|
F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
d_field_tint32_int3(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData)
|
|
when N < 57 ->
|
|
d_field_tint32_int3(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
d_field_tint32_int3(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, _, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_tint32(RestF, 0, 0, F@_1, F@_2,
|
|
NewFValue, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData).
|
|
|
|
d_field_tint32_int4(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData)
|
|
when N < 57 ->
|
|
d_field_tint32_int4(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
d_field_tint32_int4(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, _, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_tint32(RestF, 0, 0, F@_1, F@_2, F@_3,
|
|
NewFValue, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
d_field_tint32_int5(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData)
|
|
when N < 57 ->
|
|
d_field_tint32_int5(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
d_field_tint32_int5(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, _, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_tint32(RestF, 0, 0, F@_1, F@_2, F@_3,
|
|
F@_4, NewFValue, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
d_field_tint32_int6(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData)
|
|
when N < 57 ->
|
|
d_field_tint32_int6(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
d_field_tint32_int6(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, _, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_tint32(RestF, 0, 0, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, NewFValue, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
d_field_tint32_int7(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData)
|
|
when N < 57 ->
|
|
d_field_tint32_int7(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
d_field_tint32_int7(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, _, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_tint32(RestF, 0, 0, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, NewFValue, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
d_field_tint32_int8(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData)
|
|
when N < 57 ->
|
|
d_field_tint32_int8(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
d_field_tint32_int8(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, _, F@_9,
|
|
F@_10, TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_tint32(RestF, 0, 0, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, NewFValue, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
d_field_tint32_int9(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData)
|
|
when N < 57 ->
|
|
d_field_tint32_int9(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
d_field_tint32_int9(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, _,
|
|
F@_10, TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_tint32(RestF, 0, 0, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, NewFValue, F@_10,
|
|
TrUserData).
|
|
|
|
d_field_tint32_int10(<<1:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData)
|
|
when N < 57 ->
|
|
d_field_tint32_int10(Rest, N + 7, X bsl N + Acc, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData);
|
|
d_field_tint32_int10(<<0:1, X:7, Rest/binary>>, N, Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, _,
|
|
TrUserData) ->
|
|
{NewFValue, RestF} = {begin
|
|
<<Res:32/signed-native>> = <<(X bsl N +
|
|
Acc):32/unsigned-native>>,
|
|
id(Res, TrUserData)
|
|
end,
|
|
Rest},
|
|
dfp_read_field_def_tint32(RestF, 0, 0, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, NewFValue,
|
|
TrUserData).
|
|
|
|
skip_varint_tint32(<<1:1, _:7, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
skip_varint_tint32(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData);
|
|
skip_varint_tint32(<<0:1, _:7, Rest/binary>>, Z1, Z2,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9,
|
|
F@_10, TrUserData) ->
|
|
dfp_read_field_def_tint32(Rest, Z1, Z2, F@_1, F@_2,
|
|
F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
skip_length_delimited_tint32(<<1:1, X:7, Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7,
|
|
F@_8, F@_9, F@_10, TrUserData)
|
|
when N < 57 ->
|
|
skip_length_delimited_tint32(Rest, N + 7, X bsl N + Acc,
|
|
F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8,
|
|
F@_9, F@_10, TrUserData);
|
|
skip_length_delimited_tint32(<<0:1, X:7, Rest/binary>>,
|
|
N, Acc, F@_1, F@_2, F@_3, F@_4, F@_5, F@_6, F@_7,
|
|
F@_8, F@_9, F@_10, TrUserData) ->
|
|
Length = X bsl N + Acc,
|
|
<<_:Length/binary, Rest2/binary>> = Rest,
|
|
dfp_read_field_def_tint32(Rest2, 0, 0, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
skip_group_tint32(Bin, FNum, Z2, F@_1, F@_2, F@_3, F@_4,
|
|
F@_5, F@_6, F@_7, F@_8, F@_9, F@_10, TrUserData) ->
|
|
{_, Rest} = read_group(Bin, FNum),
|
|
dfp_read_field_def_tint32(Rest, 0, Z2, F@_1, F@_2, F@_3,
|
|
F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
skip_32_tint32(<<_:32, Rest/binary>>, Z1, Z2, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData) ->
|
|
dfp_read_field_def_tint32(Rest, Z1, Z2, F@_1, F@_2,
|
|
F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
skip_64_tint32(<<_:64, Rest/binary>>, Z1, Z2, F@_1,
|
|
F@_2, F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData) ->
|
|
dfp_read_field_def_tint32(Rest, Z1, Z2, F@_1, F@_2,
|
|
F@_3, F@_4, F@_5, F@_6, F@_7, F@_8, F@_9, F@_10,
|
|
TrUserData).
|
|
|
|
read_group(Bin, FieldNum) ->
|
|
{NumBytes, EndTagLen} = read_gr_b(Bin, 0, 0, 0, 0, FieldNum),
|
|
<<Group:NumBytes/binary, _:EndTagLen/binary, Rest/binary>> = Bin,
|
|
{Group, Rest}.
|
|
|
|
%% Like skipping over fields, but record the total length,
|
|
%% Each field is <(FieldNum bsl 3) bor FieldType> ++ <FieldValue>
|
|
%% Record the length because varints may be non-optimally encoded.
|
|
%%
|
|
%% Groups can be nested, but assume the same FieldNum cannot be nested
|
|
%% because group field numbers are shared with the rest of the fields
|
|
%% numbers. Thus we can search just for an group-end with the same
|
|
%% field number.
|
|
%%
|
|
%% (The only time the same group field number could occur would
|
|
%% be in a nested sub message, but then it would be inside a
|
|
%% length-delimited entry, which we skip-read by length.)
|
|
read_gr_b(<<1:1, X:7, Tl/binary>>, N, Acc, NumBytes, TagLen, FieldNum)
|
|
when N < (32-7) ->
|
|
read_gr_b(Tl, N+7, X bsl N + Acc, NumBytes, TagLen+1, FieldNum);
|
|
read_gr_b(<<0:1, X:7, Tl/binary>>, N, Acc, NumBytes, TagLen,
|
|
FieldNum) ->
|
|
Key = X bsl N + Acc,
|
|
TagLen1 = TagLen + 1,
|
|
case {Key bsr 3, Key band 7} of
|
|
{FieldNum, 4} -> % 4 = group_end
|
|
{NumBytes, TagLen1};
|
|
{_, 0} -> % 0 = varint
|
|
read_gr_vi(Tl, 0, NumBytes + TagLen1, FieldNum);
|
|
{_, 1} -> % 1 = bits64
|
|
<<_:64, Tl2/binary>> = Tl,
|
|
read_gr_b(Tl2, 0, 0, NumBytes + TagLen1 + 8, 0, FieldNum);
|
|
{_, 2} -> % 2 = length_delimited
|
|
read_gr_ld(Tl, 0, 0, NumBytes + TagLen1, FieldNum);
|
|
{_, 3} -> % 3 = group_start
|
|
read_gr_b(Tl, 0, 0, NumBytes + TagLen1, 0, FieldNum);
|
|
{_, 4} -> % 4 = group_end
|
|
read_gr_b(Tl, 0, 0, NumBytes + TagLen1, 0, FieldNum);
|
|
{_, 5} -> % 5 = bits32
|
|
<<_:32, Tl2/binary>> = Tl,
|
|
read_gr_b(Tl2, 0, 0, NumBytes + TagLen1 + 4, 0, FieldNum)
|
|
end.
|
|
|
|
read_gr_vi(<<1:1, _:7, Tl/binary>>, N, NumBytes, FieldNum)
|
|
when N < (64-7) ->
|
|
read_gr_vi(Tl, N+7, NumBytes+1, FieldNum);
|
|
read_gr_vi(<<0:1, _:7, Tl/binary>>, _, NumBytes, FieldNum) ->
|
|
read_gr_b(Tl, 0, 0, NumBytes+1, 0, FieldNum).
|
|
|
|
read_gr_ld(<<1:1, X:7, Tl/binary>>, N, Acc, NumBytes, FieldNum)
|
|
when N < (64-7) ->
|
|
read_gr_ld(Tl, N+7, X bsl N + Acc, NumBytes+1, FieldNum);
|
|
read_gr_ld(<<0:1, X:7, Tl/binary>>, N, Acc, NumBytes, FieldNum) ->
|
|
Len = X bsl N + Acc,
|
|
NumBytes1 = NumBytes + 1,
|
|
<<_:Len/binary, Tl2/binary>> = Tl,
|
|
read_gr_b(Tl2, 0, 0, NumBytes1 + Len, 0, FieldNum).
|
|
|
|
merge_msgs(Prev, New)
|
|
when element(1, Prev) =:= element(1, New) ->
|
|
merge_msgs(Prev, New, element(1, Prev), []).
|
|
|
|
merge_msgs(Prev, New, MsgName) when is_atom(MsgName) ->
|
|
merge_msgs(Prev, New, MsgName, []);
|
|
merge_msgs(Prev, New, Opts)
|
|
when element(1, Prev) =:= element(1, New),
|
|
is_list(Opts) ->
|
|
merge_msgs(Prev, New, element(1, Prev), Opts).
|
|
|
|
merge_msgs(Prev, New, MsgName, Opts) ->
|
|
TrUserData = proplists:get_value(user_data, Opts),
|
|
case MsgName of
|
|
test -> merge_msg_test(Prev, New, TrUserData);
|
|
phoneNumber ->
|
|
merge_msg_phoneNumber(Prev, New, TrUserData);
|
|
person -> merge_msg_person(Prev, New, TrUserData);
|
|
addressBook ->
|
|
merge_msg_addressBook(Prev, New, TrUserData);
|
|
tint32 -> merge_msg_tint32(Prev, New, TrUserData)
|
|
end.
|
|
|
|
-compile({nowarn_unused_function,merge_msg_test/3}).
|
|
merge_msg_test(#test{}, #test{aa = NFaa}, _) ->
|
|
#test{aa = NFaa}.
|
|
|
|
-compile({nowarn_unused_function,merge_msg_phoneNumber/3}).
|
|
merge_msg_phoneNumber(#phoneNumber{number = PFnumber},
|
|
#phoneNumber{number = NFnumber, type = NFtype},
|
|
TrUserData) ->
|
|
#phoneNumber{number =
|
|
merge_msg_test(PFnumber, NFnumber, TrUserData),
|
|
type = NFtype}.
|
|
|
|
-compile({nowarn_unused_function,merge_msg_person/3}).
|
|
merge_msg_person(#person{email = PFemail,
|
|
phone = PFphone},
|
|
#person{name = NFname, integer = NFinteger,
|
|
email = NFemail, phone = NFphone},
|
|
TrUserData) ->
|
|
#person{name = NFname, integer = NFinteger,
|
|
email =
|
|
if NFemail =:= undefined -> PFemail;
|
|
true -> NFemail
|
|
end,
|
|
phone =
|
|
if PFphone /= undefined, NFphone /= undefined ->
|
|
'erlang_++'(PFphone, NFphone, TrUserData);
|
|
PFphone == undefined -> NFphone;
|
|
NFphone == undefined -> PFphone
|
|
end}.
|
|
|
|
-compile({nowarn_unused_function,merge_msg_addressBook/3}).
|
|
merge_msg_addressBook(#addressBook{person1 = PFperson1,
|
|
others = PFothers},
|
|
#addressBook{person1 = NFperson1, others = NFothers},
|
|
TrUserData) ->
|
|
#addressBook{person1 =
|
|
if PFperson1 /= undefined, NFperson1 /= undefined ->
|
|
'erlang_++'(PFperson1, NFperson1, TrUserData);
|
|
PFperson1 == undefined -> NFperson1;
|
|
NFperson1 == undefined -> PFperson1
|
|
end,
|
|
others =
|
|
if PFothers /= undefined, NFothers /= undefined ->
|
|
'erlang_++'(PFothers, NFothers, TrUserData);
|
|
PFothers == undefined -> NFothers;
|
|
NFothers == undefined -> PFothers
|
|
end}.
|
|
|
|
-compile({nowarn_unused_function,merge_msg_tint32/3}).
|
|
merge_msg_tint32(#tint32{},
|
|
#tint32{int1 = NFint1, int2 = NFint2, int3 = NFint3,
|
|
int4 = NFint4, int5 = NFint5, int6 = NFint6,
|
|
int7 = NFint7, int8 = NFint8, int9 = NFint9,
|
|
int10 = NFint10},
|
|
_) ->
|
|
#tint32{int1 = NFint1, int2 = NFint2, int3 = NFint3,
|
|
int4 = NFint4, int5 = NFint5, int6 = NFint6,
|
|
int7 = NFint7, int8 = NFint8, int9 = NFint9,
|
|
int10 = NFint10}.
|
|
|
|
|
|
verify_msg(Msg) when tuple_size(Msg) >= 1 ->
|
|
verify_msg(Msg, element(1, Msg), []);
|
|
verify_msg(X) ->
|
|
mk_type_error(not_a_known_message, X, []).
|
|
|
|
verify_msg(Msg, MsgName) when is_atom(MsgName) ->
|
|
verify_msg(Msg, MsgName, []);
|
|
verify_msg(Msg, Opts) when tuple_size(Msg) >= 1 ->
|
|
verify_msg(Msg, element(1, Msg), Opts);
|
|
verify_msg(X, _Opts) ->
|
|
mk_type_error(not_a_known_message, X, []).
|
|
|
|
verify_msg(Msg, MsgName, Opts) ->
|
|
TrUserData = proplists:get_value(user_data, Opts),
|
|
case MsgName of
|
|
test -> v_msg_test(Msg, [MsgName], TrUserData);
|
|
phoneNumber ->
|
|
v_msg_phoneNumber(Msg, [MsgName], TrUserData);
|
|
person -> v_msg_person(Msg, [MsgName], TrUserData);
|
|
addressBook ->
|
|
v_msg_addressBook(Msg, [MsgName], TrUserData);
|
|
tint32 -> v_msg_tint32(Msg, [MsgName], TrUserData);
|
|
_ -> mk_type_error(not_a_known_message, Msg, [])
|
|
end.
|
|
|
|
|
|
-compile({nowarn_unused_function,v_msg_test/3}).
|
|
-dialyzer({nowarn_function,v_msg_test/3}).
|
|
v_msg_test(#test{aa = F1}, Path, TrUserData) ->
|
|
v_type_string(F1, [aa | Path], TrUserData), ok;
|
|
v_msg_test(X, Path, _TrUserData) ->
|
|
mk_type_error({expected_msg, test}, X, Path).
|
|
|
|
-compile({nowarn_unused_function,v_msg_phoneNumber/3}).
|
|
-dialyzer({nowarn_function,v_msg_phoneNumber/3}).
|
|
v_msg_phoneNumber(#phoneNumber{number = F1, type = F2},
|
|
Path, TrUserData) ->
|
|
v_msg_test(F1, [number | Path], TrUserData),
|
|
v_type_int32(F2, [type | Path], TrUserData),
|
|
ok;
|
|
v_msg_phoneNumber(X, Path, _TrUserData) ->
|
|
mk_type_error({expected_msg, phoneNumber}, X, Path).
|
|
|
|
-compile({nowarn_unused_function,v_msg_person/3}).
|
|
-dialyzer({nowarn_function,v_msg_person/3}).
|
|
v_msg_person(#person{name = F1, integer = F2,
|
|
email = F3, phone = F4},
|
|
Path, TrUserData) ->
|
|
v_type_string(F1, [name | Path], TrUserData),
|
|
v_type_int32(F2, [integer | Path], TrUserData),
|
|
if F3 == undefined -> ok;
|
|
true -> v_type_string(F3, [email | Path], TrUserData)
|
|
end,
|
|
if is_list(F4) ->
|
|
_ = [v_msg_phoneNumber(Elem, [phone | Path], TrUserData)
|
|
|| Elem <- F4],
|
|
ok;
|
|
true ->
|
|
mk_type_error({invalid_list_of, {msg, phoneNumber}}, F4,
|
|
[phone | Path])
|
|
end,
|
|
ok;
|
|
v_msg_person(X, Path, _TrUserData) ->
|
|
mk_type_error({expected_msg, person}, X, Path).
|
|
|
|
-compile({nowarn_unused_function,v_msg_addressBook/3}).
|
|
-dialyzer({nowarn_function,v_msg_addressBook/3}).
|
|
v_msg_addressBook(#addressBook{person1 = F1,
|
|
others = F2},
|
|
Path, TrUserData) ->
|
|
if is_list(F1) ->
|
|
_ = [v_msg_person(Elem, [person1 | Path], TrUserData)
|
|
|| Elem <- F1],
|
|
ok;
|
|
true ->
|
|
mk_type_error({invalid_list_of, {msg, person}}, F1,
|
|
[person1 | Path])
|
|
end,
|
|
if is_list(F2) ->
|
|
_ = [v_msg_person(Elem, [others | Path], TrUserData)
|
|
|| Elem <- F2],
|
|
ok;
|
|
true ->
|
|
mk_type_error({invalid_list_of, {msg, person}}, F2,
|
|
[others | Path])
|
|
end,
|
|
ok;
|
|
v_msg_addressBook(X, Path, _TrUserData) ->
|
|
mk_type_error({expected_msg, addressBook}, X, Path).
|
|
|
|
-compile({nowarn_unused_function,v_msg_tint32/3}).
|
|
-dialyzer({nowarn_function,v_msg_tint32/3}).
|
|
v_msg_tint32(#tint32{int1 = F1, int2 = F2, int3 = F3,
|
|
int4 = F4, int5 = F5, int6 = F6, int7 = F7, int8 = F8,
|
|
int9 = F9, int10 = F10},
|
|
Path, TrUserData) ->
|
|
v_type_int32(F1, [int1 | Path], TrUserData),
|
|
v_type_int32(F2, [int2 | Path], TrUserData),
|
|
v_type_int32(F3, [int3 | Path], TrUserData),
|
|
v_type_int32(F4, [int4 | Path], TrUserData),
|
|
v_type_int32(F5, [int5 | Path], TrUserData),
|
|
v_type_int32(F6, [int6 | Path], TrUserData),
|
|
v_type_int32(F7, [int7 | Path], TrUserData),
|
|
v_type_int32(F8, [int8 | Path], TrUserData),
|
|
v_type_int32(F9, [int9 | Path], TrUserData),
|
|
v_type_int32(F10, [int10 | Path], TrUserData),
|
|
ok;
|
|
v_msg_tint32(X, Path, _TrUserData) ->
|
|
mk_type_error({expected_msg, tint32}, X, Path).
|
|
|
|
-compile({nowarn_unused_function,v_type_int32/3}).
|
|
-dialyzer({nowarn_function,v_type_int32/3}).
|
|
v_type_int32(N, _Path, _TrUserData)
|
|
when -2147483648 =< N, N =< 2147483647 ->
|
|
ok;
|
|
v_type_int32(N, Path, _TrUserData) when is_integer(N) ->
|
|
mk_type_error({value_out_of_range, int32, signed, 32},
|
|
N, Path);
|
|
v_type_int32(X, Path, _TrUserData) ->
|
|
mk_type_error({bad_integer, int32, signed, 32}, X,
|
|
Path).
|
|
|
|
-compile({nowarn_unused_function,v_type_string/3}).
|
|
-dialyzer({nowarn_function,v_type_string/3}).
|
|
v_type_string(S, Path, _TrUserData)
|
|
when is_list(S); is_binary(S) ->
|
|
try unicode:characters_to_binary(S) of
|
|
B when is_binary(B) -> ok;
|
|
{error, _, _} ->
|
|
mk_type_error(bad_unicode_string, S, Path)
|
|
catch
|
|
error:badarg ->
|
|
mk_type_error(bad_unicode_string, S, Path)
|
|
end;
|
|
v_type_string(X, Path, _TrUserData) ->
|
|
mk_type_error(bad_unicode_string, X, Path).
|
|
|
|
-compile({nowarn_unused_function,mk_type_error/3}).
|
|
-spec mk_type_error(_, _, list()) -> no_return().
|
|
mk_type_error(Error, ValueSeen, Path) ->
|
|
Path2 = prettify_path(Path),
|
|
erlang:error({gpb_type_error,
|
|
{Error, [{value, ValueSeen}, {path, Path2}]}}).
|
|
|
|
|
|
-compile({nowarn_unused_function,prettify_path/1}).
|
|
-dialyzer({nowarn_function,prettify_path/1}).
|
|
prettify_path([]) -> top_level;
|
|
prettify_path(PathR) ->
|
|
list_to_atom(lists:append(lists:join(".",
|
|
lists:map(fun atom_to_list/1,
|
|
lists:reverse(PathR))))).
|
|
|
|
|
|
-compile({nowarn_unused_function,id/2}).
|
|
-compile({inline,id/2}).
|
|
id(X, _TrUserData) -> X.
|
|
|
|
-compile({nowarn_unused_function,v_ok/3}).
|
|
-compile({inline,v_ok/3}).
|
|
v_ok(_Value, _Path, _TrUserData) -> ok.
|
|
|
|
-compile({nowarn_unused_function,m_overwrite/3}).
|
|
-compile({inline,m_overwrite/3}).
|
|
m_overwrite(_Prev, New, _TrUserData) -> New.
|
|
|
|
-compile({nowarn_unused_function,cons/3}).
|
|
-compile({inline,cons/3}).
|
|
cons(Elem, Acc, _TrUserData) -> [Elem | Acc].
|
|
|
|
-compile({nowarn_unused_function,lists_reverse/2}).
|
|
-compile({inline,lists_reverse/2}).
|
|
'lists_reverse'(L, _TrUserData) -> lists:reverse(L).
|
|
-compile({nowarn_unused_function,'erlang_++'/3}).
|
|
-compile({inline,'erlang_++'/3}).
|
|
'erlang_++'(A, B, _TrUserData) -> A ++ B.
|
|
|
|
get_msg_defs() ->
|
|
[{{msg, test},
|
|
[#field{name = aa, fnum = 1, rnum = 2, type = string,
|
|
occurrence = required, opts = []}]},
|
|
{{msg, phoneNumber},
|
|
[#field{name = number, fnum = 1, rnum = 2,
|
|
type = {msg, test}, occurrence = required, opts = []},
|
|
#field{name = type, fnum = 2, rnum = 3, type = int32,
|
|
occurrence = required, opts = []}]},
|
|
{{msg, person},
|
|
[#field{name = name, fnum = 1, rnum = 2, type = string,
|
|
occurrence = required, opts = []},
|
|
#field{name = integer, fnum = 2, rnum = 3, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = email, fnum = 3, rnum = 4, type = string,
|
|
occurrence = optional, opts = []},
|
|
#field{name = phone, fnum = 4, rnum = 5,
|
|
type = {msg, phoneNumber}, occurrence = repeated,
|
|
opts = []}]},
|
|
{{msg, addressBook},
|
|
[#field{name = person1, fnum = 1, rnum = 2,
|
|
type = {msg, person}, occurrence = repeated, opts = []},
|
|
#field{name = others, fnum = 2, rnum = 3,
|
|
type = {msg, person}, occurrence = repeated,
|
|
opts = []}]},
|
|
{{msg, tint32},
|
|
[#field{name = int1, fnum = 1, rnum = 2, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int2, fnum = 2, rnum = 3, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int3, fnum = 3, rnum = 4, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int4, fnum = 4, rnum = 5, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int5, fnum = 5, rnum = 6, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int6, fnum = 6, rnum = 7, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int7, fnum = 7, rnum = 8, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int8, fnum = 8, rnum = 9, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int9, fnum = 9, rnum = 10, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int10, fnum = 10, rnum = 11, type = int32,
|
|
occurrence = required, opts = []}]}].
|
|
|
|
|
|
get_msg_names() ->
|
|
[test, phoneNumber, person, addressBook, tint32].
|
|
|
|
|
|
get_group_names() -> [].
|
|
|
|
|
|
get_msg_or_group_names() ->
|
|
[test, phoneNumber, person, addressBook, tint32].
|
|
|
|
|
|
get_enum_names() -> [].
|
|
|
|
|
|
fetch_msg_def(MsgName) ->
|
|
case find_msg_def(MsgName) of
|
|
Fs when is_list(Fs) -> Fs;
|
|
error -> erlang:error({no_such_msg, MsgName})
|
|
end.
|
|
|
|
|
|
-spec fetch_enum_def(_) -> no_return().
|
|
fetch_enum_def(EnumName) ->
|
|
erlang:error({no_such_enum, EnumName}).
|
|
|
|
|
|
find_msg_def(test) ->
|
|
[#field{name = aa, fnum = 1, rnum = 2, type = string,
|
|
occurrence = required, opts = []}];
|
|
find_msg_def(phoneNumber) ->
|
|
[#field{name = number, fnum = 1, rnum = 2,
|
|
type = {msg, test}, occurrence = required, opts = []},
|
|
#field{name = type, fnum = 2, rnum = 3, type = int32,
|
|
occurrence = required, opts = []}];
|
|
find_msg_def(person) ->
|
|
[#field{name = name, fnum = 1, rnum = 2, type = string,
|
|
occurrence = required, opts = []},
|
|
#field{name = integer, fnum = 2, rnum = 3, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = email, fnum = 3, rnum = 4, type = string,
|
|
occurrence = optional, opts = []},
|
|
#field{name = phone, fnum = 4, rnum = 5,
|
|
type = {msg, phoneNumber}, occurrence = repeated,
|
|
opts = []}];
|
|
find_msg_def(addressBook) ->
|
|
[#field{name = person1, fnum = 1, rnum = 2,
|
|
type = {msg, person}, occurrence = repeated, opts = []},
|
|
#field{name = others, fnum = 2, rnum = 3,
|
|
type = {msg, person}, occurrence = repeated,
|
|
opts = []}];
|
|
find_msg_def(tint32) ->
|
|
[#field{name = int1, fnum = 1, rnum = 2, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int2, fnum = 2, rnum = 3, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int3, fnum = 3, rnum = 4, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int4, fnum = 4, rnum = 5, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int5, fnum = 5, rnum = 6, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int6, fnum = 6, rnum = 7, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int7, fnum = 7, rnum = 8, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int8, fnum = 8, rnum = 9, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int9, fnum = 9, rnum = 10, type = int32,
|
|
occurrence = required, opts = []},
|
|
#field{name = int10, fnum = 10, rnum = 11, type = int32,
|
|
occurrence = required, opts = []}];
|
|
find_msg_def(_) -> error.
|
|
|
|
|
|
find_enum_def(_) -> error.
|
|
|
|
|
|
-spec enum_symbol_by_value(_, _) -> no_return().
|
|
enum_symbol_by_value(E, V) ->
|
|
erlang:error({no_enum_defs, E, V}).
|
|
|
|
|
|
-spec enum_value_by_symbol(_, _) -> no_return().
|
|
enum_value_by_symbol(E, V) ->
|
|
erlang:error({no_enum_defs, E, V}).
|
|
|
|
|
|
|
|
get_service_names() -> [].
|
|
|
|
|
|
get_service_def(_) -> error.
|
|
|
|
|
|
get_rpc_names(_) -> error.
|
|
|
|
|
|
find_rpc_def(_, _) -> error.
|
|
|
|
|
|
|
|
-spec fetch_rpc_def(_, _) -> no_return().
|
|
fetch_rpc_def(ServiceName, RpcName) ->
|
|
erlang:error({no_such_rpc, ServiceName, RpcName}).
|
|
|
|
|
|
%% Convert a a fully qualified (ie with package name) service name
|
|
%% as a binary to a service name as an atom.
|
|
-spec fqbin_to_service_name(_) -> no_return().
|
|
fqbin_to_service_name(X) ->
|
|
error({gpb_error, {badservice, X}}).
|
|
|
|
|
|
%% Convert a service name as an atom to a fully qualified
|
|
%% (ie with package name) name as a binary.
|
|
-spec service_name_to_fqbin(_) -> no_return().
|
|
service_name_to_fqbin(X) ->
|
|
error({gpb_error, {badservice, X}}).
|
|
|
|
|
|
%% Convert a a fully qualified (ie with package name) service name
|
|
%% and an rpc name, both as binaries to a service name and an rpc
|
|
%% name, as atoms.
|
|
-spec fqbins_to_service_and_rpc_name(_, _) -> no_return().
|
|
fqbins_to_service_and_rpc_name(S, R) ->
|
|
error({gpb_error, {badservice_or_rpc, {S, R}}}).
|
|
|
|
|
|
%% Convert a service name and an rpc name, both as atoms,
|
|
%% to a fully qualified (ie with package name) service name and
|
|
%% an rpc name as binaries.
|
|
-spec service_and_rpc_name_to_fqbins(_, _) -> no_return().
|
|
service_and_rpc_name_to_fqbins(S, R) ->
|
|
error({gpb_error, {badservice_or_rpc, {S, R}}}).
|
|
|
|
|
|
fqbin_to_msg_name(<<"test">>) -> test;
|
|
fqbin_to_msg_name(<<"phoneNumber">>) -> phoneNumber;
|
|
fqbin_to_msg_name(<<"person">>) -> person;
|
|
fqbin_to_msg_name(<<"addressBook">>) -> addressBook;
|
|
fqbin_to_msg_name(<<"tint32">>) -> tint32;
|
|
fqbin_to_msg_name(E) -> error({gpb_error, {badmsg, E}}).
|
|
|
|
|
|
msg_name_to_fqbin(test) -> <<"test">>;
|
|
msg_name_to_fqbin(phoneNumber) -> <<"phoneNumber">>;
|
|
msg_name_to_fqbin(person) -> <<"person">>;
|
|
msg_name_to_fqbin(addressBook) -> <<"addressBook">>;
|
|
msg_name_to_fqbin(tint32) -> <<"tint32">>;
|
|
msg_name_to_fqbin(E) -> error({gpb_error, {badmsg, E}}).
|
|
|
|
|
|
-spec fqbin_to_enum_name(_) -> no_return().
|
|
fqbin_to_enum_name(E) ->
|
|
error({gpb_error, {badenum, E}}).
|
|
|
|
|
|
-spec enum_name_to_fqbin(_) -> no_return().
|
|
enum_name_to_fqbin(E) ->
|
|
error({gpb_error, {badenum, E}}).
|
|
|
|
|
|
get_package_name() -> undefined.
|
|
|
|
|
|
%% Whether or not the message names
|
|
%% are prepended with package name or not.
|
|
uses_packages() -> false.
|
|
|
|
|
|
source_basename() -> "mytest.proto".
|
|
|
|
|
|
%% Retrieve all proto file names, also imported ones.
|
|
%% The order is top-down. The first element is always the main
|
|
%% source file. The files are returned with extension,
|
|
%% see get_all_proto_names/0 for a version that returns
|
|
%% the basenames sans extension
|
|
get_all_source_basenames() -> ["mytest.proto"].
|
|
|
|
|
|
%% Retrieve all proto file names, also imported ones.
|
|
%% The order is top-down. The first element is always the main
|
|
%% source file. The files are returned sans .proto extension,
|
|
%% to make it easier to use them with the various get_xyz_containment
|
|
%% functions.
|
|
get_all_proto_names() -> ["mytest"].
|
|
|
|
|
|
get_msg_containment("mytest") ->
|
|
[addressBook, person, phoneNumber, test, tint32];
|
|
get_msg_containment(P) ->
|
|
error({gpb_error, {badproto, P}}).
|
|
|
|
|
|
get_pkg_containment("mytest") -> undefined;
|
|
get_pkg_containment(P) ->
|
|
error({gpb_error, {badproto, P}}).
|
|
|
|
|
|
get_service_containment("mytest") -> [];
|
|
get_service_containment(P) ->
|
|
error({gpb_error, {badproto, P}}).
|
|
|
|
|
|
get_rpc_containment("mytest") -> [];
|
|
get_rpc_containment(P) ->
|
|
error({gpb_error, {badproto, P}}).
|
|
|
|
|
|
get_enum_containment("mytest") -> [];
|
|
get_enum_containment(P) ->
|
|
error({gpb_error, {badproto, P}}).
|
|
|
|
|
|
get_proto_by_msg_name_as_fqbin(<<"tint32">>) -> "mytest";
|
|
get_proto_by_msg_name_as_fqbin(<<"phoneNumber">>) -> "mytest";
|
|
get_proto_by_msg_name_as_fqbin(<<"test">>) -> "mytest";
|
|
get_proto_by_msg_name_as_fqbin(<<"addressBook">>) -> "mytest";
|
|
get_proto_by_msg_name_as_fqbin(<<"person">>) -> "mytest";
|
|
get_proto_by_msg_name_as_fqbin(E) ->
|
|
error({gpb_error, {badmsg, E}}).
|
|
|
|
|
|
-spec get_proto_by_service_name_as_fqbin(_) -> no_return().
|
|
get_proto_by_service_name_as_fqbin(E) ->
|
|
error({gpb_error, {badservice, E}}).
|
|
|
|
|
|
-spec get_proto_by_enum_name_as_fqbin(_) -> no_return().
|
|
get_proto_by_enum_name_as_fqbin(E) ->
|
|
error({gpb_error, {badenum, E}}).
|
|
|
|
|
|
-spec get_protos_by_pkg_name_as_fqbin(_) -> no_return().
|
|
get_protos_by_pkg_name_as_fqbin(E) ->
|
|
error({gpb_error, {badpkg, E}}).
|
|
|
|
|
|
|
|
gpb_version_as_string() ->
|
|
"4.8.0".
|
|
|
|
gpb_version_as_list() ->
|
|
[4,8,0].
|