%% -*- coding: utf-8 -*- %% Automatically generated, do not edit %% Generated by gpb_compile version 4.2.1 -module(hex_pb_package). -export([encode_msg/2, encode_msg/3]). -export([decode_msg/2, decode_msg/3]). -export([merge_msgs/3, merge_msgs/4]). -export([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([enum_symbol_by_value_RetirementReason/1, enum_value_by_symbol_RetirementReason/1]). -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([get_package_name/0]). -export([gpb_version_as_string/0, gpb_version_as_list/0]). %% enumerated types -type 'RetirementReason'() :: 'RETIRED_OTHER' | 'RETIRED_INVALID' | 'RETIRED_SECURITY' | 'RETIRED_DEPRECATED' | 'RETIRED_RENAMED'. -export_type(['RetirementReason'/0]). %% message types -type 'Package'() :: #{releases => ['Release'()] % = 1 %% name => iodata() % = 2 %% repository => iodata() % = 3 }. -type 'Release'() :: #{%% version => iodata(), % = 1 %% checksum => iodata(), % = 2 dependencies => ['Dependency'()] % = 3 %% retired => 'RetirementStatus'() % = 4 }. -type 'RetirementStatus'() :: #{%% reason => 'RETIRED_OTHER' | 'RETIRED_INVALID' | 'RETIRED_SECURITY' | 'RETIRED_DEPRECATED' | 'RETIRED_RENAMED' | integer() % = 1, enum RetirementReason %% message => iodata() % = 2 }. -type 'Dependency'() :: #{%% package => iodata() % = 1 %% requirement => iodata() % = 2 %% optional => boolean() | 0 | 1 % = 3 %% app => iodata() % = 4 %% repository => iodata() % = 5 }. -export_type(['Package'/0, 'Release'/0, 'RetirementStatus'/0, 'Dependency'/0]). -spec encode_msg('Package'() | 'Release'() | 'RetirementStatus'() | 'Dependency'(),'Package' | 'Release' | 'RetirementStatus' | 'Dependency') -> binary(). encode_msg(Msg, MsgName) -> encode_msg(Msg, MsgName, []). -spec encode_msg('Package'() | 'Release'() | 'RetirementStatus'() | 'Dependency'(),'Package' | 'Release' | 'RetirementStatus' | 'Dependency', list()) -> binary(). encode_msg(Msg, MsgName, Opts) -> verify_msg(Msg, MsgName, Opts), TrUserData = proplists:get_value(user_data, Opts), case MsgName of 'Package' -> e_msg_Package(Msg, TrUserData); 'Release' -> e_msg_Release(Msg, TrUserData); 'RetirementStatus' -> e_msg_RetirementStatus(Msg, TrUserData); 'Dependency' -> e_msg_Dependency(Msg, TrUserData) end. e_msg_Package(Msg, TrUserData) -> e_msg_Package(Msg, <<>>, TrUserData). e_msg_Package(#{} = M, Bin, TrUserData) -> B1 = case M of #{releases := F1} -> TrF1 = id(F1, TrUserData), if TrF1 == [] -> Bin; true -> e_field_Package_releases(TrF1, Bin, TrUserData) end; _ -> Bin end, B2 = case M of #{name := F2} -> begin TrF2 = id(F2, TrUserData), case is_empty_string(TrF2) of true -> B1; false -> e_type_string(TrF2, <>) end end; _ -> B1 end, case M of #{repository := F3} -> begin TrF3 = id(F3, TrUserData), case is_empty_string(TrF3) of true -> B2; false -> e_type_string(TrF3, <>) end end; _ -> B2 end. e_msg_Release(Msg, TrUserData) -> e_msg_Release(Msg, <<>>, TrUserData). e_msg_Release(#{} = M, Bin, TrUserData) -> B1 = case M of #{version := F1} -> begin TrF1 = id(F1, TrUserData), case is_empty_string(TrF1) of true -> Bin; false -> e_type_string(TrF1, <>) end end; _ -> Bin end, B2 = case M of #{checksum := F2} -> begin TrF2 = id(F2, TrUserData), case iolist_size(TrF2) of 0 -> B1; _ -> e_type_bytes(TrF2, <>) end end; _ -> B1 end, B3 = case M of #{dependencies := F3} -> TrF3 = id(F3, TrUserData), if TrF3 == [] -> B2; true -> e_field_Release_dependencies(TrF3, B2, TrUserData) end; _ -> B2 end, case M of #{retired := F4} -> begin TrF4 = id(F4, TrUserData), if TrF4 =:= undefined -> B3; true -> e_mfield_Release_retired(TrF4, <>, TrUserData) end end; _ -> B3 end. e_msg_RetirementStatus(Msg, TrUserData) -> e_msg_RetirementStatus(Msg, <<>>, TrUserData). e_msg_RetirementStatus(#{} = M, Bin, TrUserData) -> B1 = case M of #{reason := F1} -> begin TrF1 = id(F1, TrUserData), if TrF1 =:= 'RETIRED_OTHER'; TrF1 =:= 0 -> Bin; true -> e_enum_RetirementReason(TrF1, <>) end end; _ -> Bin end, case M of #{message := F2} -> begin TrF2 = id(F2, TrUserData), case is_empty_string(TrF2) of true -> B1; false -> e_type_string(TrF2, <>) end end; _ -> B1 end. e_msg_Dependency(Msg, TrUserData) -> e_msg_Dependency(Msg, <<>>, TrUserData). e_msg_Dependency(#{} = M, Bin, TrUserData) -> B1 = case M of #{package := F1} -> begin TrF1 = id(F1, TrUserData), case is_empty_string(TrF1) of true -> Bin; false -> e_type_string(TrF1, <>) end end; _ -> Bin end, B2 = case M of #{requirement := F2} -> begin TrF2 = id(F2, TrUserData), case is_empty_string(TrF2) of true -> B1; false -> e_type_string(TrF2, <>) end end; _ -> B1 end, B3 = case M of #{optional := F3} -> begin TrF3 = id(F3, TrUserData), if TrF3 =:= false -> B2; true -> e_type_bool(TrF3, <>) end end; _ -> B2 end, B4 = case M of #{app := F4} -> begin TrF4 = id(F4, TrUserData), case is_empty_string(TrF4) of true -> B3; false -> e_type_string(TrF4, <>) end end; _ -> B3 end, case M of #{repository := F5} -> begin TrF5 = id(F5, TrUserData), case is_empty_string(TrF5) of true -> B4; false -> e_type_string(TrF5, <>) end end; _ -> B4 end. e_mfield_Package_releases(Msg, Bin, TrUserData) -> SubBin = e_msg_Release(Msg, <<>>, TrUserData), Bin2 = e_varint(byte_size(SubBin), Bin), <>. e_field_Package_releases([Elem | Rest], Bin, TrUserData) -> Bin2 = <>, Bin3 = e_mfield_Package_releases(id(Elem, TrUserData), Bin2, TrUserData), e_field_Package_releases(Rest, Bin3, TrUserData); e_field_Package_releases([], Bin, _TrUserData) -> Bin. e_mfield_Release_dependencies(Msg, Bin, TrUserData) -> SubBin = e_msg_Dependency(Msg, <<>>, TrUserData), Bin2 = e_varint(byte_size(SubBin), Bin), <>. e_field_Release_dependencies([Elem | Rest], Bin, TrUserData) -> Bin2 = <>, Bin3 = e_mfield_Release_dependencies(id(Elem, TrUserData), Bin2, TrUserData), e_field_Release_dependencies(Rest, Bin3, TrUserData); e_field_Release_dependencies([], Bin, _TrUserData) -> Bin. e_mfield_Release_retired(Msg, Bin, TrUserData) -> SubBin = e_msg_RetirementStatus(Msg, <<>>, TrUserData), Bin2 = e_varint(byte_size(SubBin), Bin), <>. e_enum_RetirementReason('RETIRED_OTHER', Bin) -> <>; e_enum_RetirementReason('RETIRED_INVALID', Bin) -> <>; e_enum_RetirementReason('RETIRED_SECURITY', Bin) -> <>; e_enum_RetirementReason('RETIRED_DEPRECATED', Bin) -> <>; e_enum_RetirementReason('RETIRED_RENAMED', Bin) -> <>; e_enum_RetirementReason(V, Bin) -> e_varint(V, Bin). e_type_bool(true, Bin) -> <>; e_type_bool(false, Bin) -> <>; e_type_bool(1, Bin) -> <>; e_type_bool(0, Bin) -> <>. e_type_string(S, Bin) -> Utf8 = unicode:characters_to_binary(S), Bin2 = e_varint(byte_size(Utf8), Bin), <>. e_type_bytes(Bytes, Bin) when is_binary(Bytes) -> Bin2 = e_varint(byte_size(Bytes), Bin), <>; e_type_bytes(Bytes, Bin) when is_list(Bytes) -> BytesBin = iolist_to_binary(Bytes), Bin2 = e_varint(byte_size(BytesBin), Bin), <>. e_varint(N, Bin) when N =< 127 -> <>; e_varint(N, Bin) -> Bin2 = <>, e_varint(N bsr 7, Bin2). is_empty_string("") -> true; is_empty_string(<<>>) -> true; is_empty_string(L) when is_list(L) -> not string_has_chars(L); is_empty_string(B) when is_binary(B) -> false. string_has_chars([C | _]) when is_integer(C) -> true; string_has_chars([H | T]) -> case string_has_chars(H) of true -> true; false -> string_has_chars(T) end; string_has_chars(B) when is_binary(B), byte_size(B) =/= 0 -> true; string_has_chars(C) when is_integer(C) -> true; string_has_chars(<<>>) -> false; string_has_chars([]) -> false. 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. -ifdef('GPB_PATTERN_STACK'). 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. -endif. decode_msg_2_doit('Package', Bin, TrUserData) -> d_msg_Package(Bin, TrUserData); decode_msg_2_doit('Release', Bin, TrUserData) -> d_msg_Release(Bin, TrUserData); decode_msg_2_doit('RetirementStatus', Bin, TrUserData) -> d_msg_RetirementStatus(Bin, TrUserData); decode_msg_2_doit('Dependency', Bin, TrUserData) -> d_msg_Dependency(Bin, TrUserData). d_msg_Package(Bin, TrUserData) -> dfp_read_field_def_Package(Bin, 0, 0, id([], TrUserData), id(<<>>, TrUserData), id(<<>>, TrUserData), TrUserData). dfp_read_field_def_Package(<<10, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, TrUserData) -> d_field_Package_releases(Rest, Z1, Z2, F@_1, F@_2, F@_3, TrUserData); dfp_read_field_def_Package(<<18, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, TrUserData) -> d_field_Package_name(Rest, Z1, Z2, F@_1, F@_2, F@_3, TrUserData); dfp_read_field_def_Package(<<26, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, TrUserData) -> d_field_Package_repository(Rest, Z1, Z2, F@_1, F@_2, F@_3, TrUserData); dfp_read_field_def_Package(<<>>, 0, 0, R1, F@_2, F@_3, TrUserData) -> S1 = #{releases => lists_reverse(R1, TrUserData)}, S2 = if F@_2 == '$undef' -> S1; true -> S1#{name => F@_2} end, if F@_3 == '$undef' -> S2; true -> S2#{repository => F@_3} end; dfp_read_field_def_Package(Other, Z1, Z2, F@_1, F@_2, F@_3, TrUserData) -> dg_read_field_def_Package(Other, Z1, Z2, F@_1, F@_2, F@_3, TrUserData). dg_read_field_def_Package(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, TrUserData) when N < 32 - 7 -> dg_read_field_def_Package(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, TrUserData); dg_read_field_def_Package(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, TrUserData) -> Key = X bsl N + Acc, case Key of 10 -> d_field_Package_releases(Rest, 0, 0, F@_1, F@_2, F@_3, TrUserData); 18 -> d_field_Package_name(Rest, 0, 0, F@_1, F@_2, F@_3, TrUserData); 26 -> d_field_Package_repository(Rest, 0, 0, F@_1, F@_2, F@_3, TrUserData); _ -> case Key band 7 of 0 -> skip_varint_Package(Rest, 0, 0, F@_1, F@_2, F@_3, TrUserData); 1 -> skip_64_Package(Rest, 0, 0, F@_1, F@_2, F@_3, TrUserData); 2 -> skip_length_delimited_Package(Rest, 0, 0, F@_1, F@_2, F@_3, TrUserData); 3 -> skip_group_Package(Rest, Key bsr 3, 0, F@_1, F@_2, F@_3, TrUserData); 5 -> skip_32_Package(Rest, 0, 0, F@_1, F@_2, F@_3, TrUserData) end end; dg_read_field_def_Package(<<>>, 0, 0, R1, F@_2, F@_3, TrUserData) -> S1 = #{releases => lists_reverse(R1, TrUserData)}, S2 = if F@_2 == '$undef' -> S1; true -> S1#{name => F@_2} end, if F@_3 == '$undef' -> S2; true -> S2#{repository => F@_3} end. d_field_Package_releases(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, TrUserData) when N < 57 -> d_field_Package_releases(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, TrUserData); d_field_Package_releases(<<0:1, X:7, Rest/binary>>, N, Acc, Prev, F@_2, F@_3, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(d_msg_Release(Bs, TrUserData), TrUserData), Rest2} end, dfp_read_field_def_Package(RestF, 0, 0, cons(NewFValue, Prev, TrUserData), F@_2, F@_3, TrUserData). d_field_Package_name(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, TrUserData) when N < 57 -> d_field_Package_name(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, TrUserData); d_field_Package_name(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, _, F@_3, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {binary:copy(Bytes), Rest2} end, dfp_read_field_def_Package(RestF, 0, 0, F@_1, NewFValue, F@_3, TrUserData). d_field_Package_repository(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, TrUserData) when N < 57 -> d_field_Package_repository(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, TrUserData); d_field_Package_repository(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, _, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {binary:copy(Bytes), Rest2} end, dfp_read_field_def_Package(RestF, 0, 0, F@_1, F@_2, NewFValue, TrUserData). skip_varint_Package(<<1:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, TrUserData) -> skip_varint_Package(Rest, Z1, Z2, F@_1, F@_2, F@_3, TrUserData); skip_varint_Package(<<0:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, TrUserData) -> dfp_read_field_def_Package(Rest, Z1, Z2, F@_1, F@_2, F@_3, TrUserData). skip_length_delimited_Package(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, TrUserData) when N < 57 -> skip_length_delimited_Package(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, TrUserData); skip_length_delimited_Package(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, TrUserData) -> Length = X bsl N + Acc, <<_:Length/binary, Rest2/binary>> = Rest, dfp_read_field_def_Package(Rest2, 0, 0, F@_1, F@_2, F@_3, TrUserData). skip_group_Package(Bin, FNum, Z2, F@_1, F@_2, F@_3, TrUserData) -> {_, Rest} = read_group(Bin, FNum), dfp_read_field_def_Package(Rest, 0, Z2, F@_1, F@_2, F@_3, TrUserData). skip_32_Package(<<_:32, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, TrUserData) -> dfp_read_field_def_Package(Rest, Z1, Z2, F@_1, F@_2, F@_3, TrUserData). skip_64_Package(<<_:64, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, TrUserData) -> dfp_read_field_def_Package(Rest, Z1, Z2, F@_1, F@_2, F@_3, TrUserData). d_msg_Release(Bin, TrUserData) -> dfp_read_field_def_Release(Bin, 0, 0, id(<<>>, TrUserData), id(<<>>, TrUserData), id([], TrUserData), id(undefined, TrUserData), TrUserData). dfp_read_field_def_Release(<<10, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData) -> d_field_Release_version(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData); dfp_read_field_def_Release(<<18, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData) -> d_field_Release_checksum(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData); dfp_read_field_def_Release(<<26, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData) -> d_field_Release_dependencies(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData); dfp_read_field_def_Release(<<34, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData) -> d_field_Release_retired(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData); dfp_read_field_def_Release(<<>>, 0, 0, F@_1, F@_2, R1, F@_4, TrUserData) -> S1 = #{dependencies => lists_reverse(R1, TrUserData)}, S2 = if F@_1 == '$undef' -> S1; true -> S1#{version => F@_1} end, S3 = if F@_2 == '$undef' -> S2; true -> S2#{checksum => F@_2} end, if F@_4 == '$undef' -> S3; true -> S3#{retired => F@_4} end; dfp_read_field_def_Release(Other, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData) -> dg_read_field_def_Release(Other, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData). dg_read_field_def_Release(<<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_Release(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData); dg_read_field_def_Release(<<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_Release_version(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData); 18 -> d_field_Release_checksum(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData); 26 -> d_field_Release_dependencies(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData); 34 -> d_field_Release_retired(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData); _ -> case Key band 7 of 0 -> skip_varint_Release(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData); 1 -> skip_64_Release(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData); 2 -> skip_length_delimited_Release(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData); 3 -> skip_group_Release(Rest, Key bsr 3, 0, F@_1, F@_2, F@_3, F@_4, TrUserData); 5 -> skip_32_Release(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData) end end; dg_read_field_def_Release(<<>>, 0, 0, F@_1, F@_2, R1, F@_4, TrUserData) -> S1 = #{dependencies => lists_reverse(R1, TrUserData)}, S2 = if F@_1 == '$undef' -> S1; true -> S1#{version => F@_1} end, S3 = if F@_2 == '$undef' -> S2; true -> S2#{checksum => F@_2} end, if F@_4 == '$undef' -> S3; true -> S3#{retired => F@_4} end. d_field_Release_version(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData) when N < 57 -> d_field_Release_version(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData); d_field_Release_version(<<0:1, X:7, Rest/binary>>, N, Acc, _, F@_2, F@_3, F@_4, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {binary:copy(Bytes), Rest2} end, dfp_read_field_def_Release(RestF, 0, 0, NewFValue, F@_2, F@_3, F@_4, TrUserData). d_field_Release_checksum(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData) when N < 57 -> d_field_Release_checksum(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData); d_field_Release_checksum(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, _, F@_3, F@_4, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {binary:copy(Bytes), Rest2} end, dfp_read_field_def_Release(RestF, 0, 0, F@_1, NewFValue, F@_3, F@_4, TrUserData). d_field_Release_dependencies(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData) when N < 57 -> d_field_Release_dependencies(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData); d_field_Release_dependencies(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, Prev, F@_4, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(d_msg_Dependency(Bs, TrUserData), TrUserData), Rest2} end, dfp_read_field_def_Release(RestF, 0, 0, F@_1, F@_2, cons(NewFValue, Prev, TrUserData), F@_4, TrUserData). d_field_Release_retired(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData) when N < 57 -> d_field_Release_retired(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData); d_field_Release_retired(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, Prev, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(d_msg_RetirementStatus(Bs, TrUserData), TrUserData), Rest2} end, dfp_read_field_def_Release(RestF, 0, 0, F@_1, F@_2, F@_3, if Prev == '$undef' -> NewFValue; true -> merge_msg_RetirementStatus(Prev, NewFValue, TrUserData) end, TrUserData). skip_varint_Release(<<1:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData) -> skip_varint_Release(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData); skip_varint_Release(<<0:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData) -> dfp_read_field_def_Release(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData). skip_length_delimited_Release(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData) when N < 57 -> skip_length_delimited_Release(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData); skip_length_delimited_Release(<<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_Release(Rest2, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData). skip_group_Release(Bin, FNum, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData) -> {_, Rest} = read_group(Bin, FNum), dfp_read_field_def_Release(Rest, 0, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData). skip_32_Release(<<_:32, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData) -> dfp_read_field_def_Release(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData). skip_64_Release(<<_:64, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData) -> dfp_read_field_def_Release(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData). d_msg_RetirementStatus(Bin, TrUserData) -> dfp_read_field_def_RetirementStatus(Bin, 0, 0, id('RETIRED_OTHER', TrUserData), id(<<>>, TrUserData), TrUserData). dfp_read_field_def_RetirementStatus(<<8, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData) -> d_field_RetirementStatus_reason(Rest, Z1, Z2, F@_1, F@_2, TrUserData); dfp_read_field_def_RetirementStatus(<<18, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData) -> d_field_RetirementStatus_message(Rest, Z1, Z2, F@_1, F@_2, TrUserData); dfp_read_field_def_RetirementStatus(<<>>, 0, 0, F@_1, F@_2, _) -> S1 = #{}, S2 = if F@_1 == '$undef' -> S1; true -> S1#{reason => F@_1} end, if F@_2 == '$undef' -> S2; true -> S2#{message => F@_2} end; dfp_read_field_def_RetirementStatus(Other, Z1, Z2, F@_1, F@_2, TrUserData) -> dg_read_field_def_RetirementStatus(Other, Z1, Z2, F@_1, F@_2, TrUserData). dg_read_field_def_RetirementStatus(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData) when N < 32 - 7 -> dg_read_field_def_RetirementStatus(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData); dg_read_field_def_RetirementStatus(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData) -> Key = X bsl N + Acc, case Key of 8 -> d_field_RetirementStatus_reason(Rest, 0, 0, F@_1, F@_2, TrUserData); 18 -> d_field_RetirementStatus_message(Rest, 0, 0, F@_1, F@_2, TrUserData); _ -> case Key band 7 of 0 -> skip_varint_RetirementStatus(Rest, 0, 0, F@_1, F@_2, TrUserData); 1 -> skip_64_RetirementStatus(Rest, 0, 0, F@_1, F@_2, TrUserData); 2 -> skip_length_delimited_RetirementStatus(Rest, 0, 0, F@_1, F@_2, TrUserData); 3 -> skip_group_RetirementStatus(Rest, Key bsr 3, 0, F@_1, F@_2, TrUserData); 5 -> skip_32_RetirementStatus(Rest, 0, 0, F@_1, F@_2, TrUserData) end end; dg_read_field_def_RetirementStatus(<<>>, 0, 0, F@_1, F@_2, _) -> S1 = #{}, S2 = if F@_1 == '$undef' -> S1; true -> S1#{reason => F@_1} end, if F@_2 == '$undef' -> S2; true -> S2#{message => F@_2} end. d_field_RetirementStatus_reason(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData) when N < 57 -> d_field_RetirementStatus_reason(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData); d_field_RetirementStatus_reason(<<0:1, X:7, Rest/binary>>, N, Acc, _, F@_2, TrUserData) -> {NewFValue, RestF} = {d_enum_RetirementReason(begin <> = <<(X bsl N + Acc):32/unsigned-native>>, Res end), Rest}, dfp_read_field_def_RetirementStatus(RestF, 0, 0, NewFValue, F@_2, TrUserData). d_field_RetirementStatus_message(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData) when N < 57 -> d_field_RetirementStatus_message(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData); d_field_RetirementStatus_message(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, _, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {binary:copy(Bytes), Rest2} end, dfp_read_field_def_RetirementStatus(RestF, 0, 0, F@_1, NewFValue, TrUserData). skip_varint_RetirementStatus(<<1:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData) -> skip_varint_RetirementStatus(Rest, Z1, Z2, F@_1, F@_2, TrUserData); skip_varint_RetirementStatus(<<0:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData) -> dfp_read_field_def_RetirementStatus(Rest, Z1, Z2, F@_1, F@_2, TrUserData). skip_length_delimited_RetirementStatus(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData) when N < 57 -> skip_length_delimited_RetirementStatus(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData); skip_length_delimited_RetirementStatus(<<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_RetirementStatus(Rest2, 0, 0, F@_1, F@_2, TrUserData). skip_group_RetirementStatus(Bin, FNum, Z2, F@_1, F@_2, TrUserData) -> {_, Rest} = read_group(Bin, FNum), dfp_read_field_def_RetirementStatus(Rest, 0, Z2, F@_1, F@_2, TrUserData). skip_32_RetirementStatus(<<_:32, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData) -> dfp_read_field_def_RetirementStatus(Rest, Z1, Z2, F@_1, F@_2, TrUserData). skip_64_RetirementStatus(<<_:64, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData) -> dfp_read_field_def_RetirementStatus(Rest, Z1, Z2, F@_1, F@_2, TrUserData). d_msg_Dependency(Bin, TrUserData) -> dfp_read_field_def_Dependency(Bin, 0, 0, id(<<>>, TrUserData), id(<<>>, TrUserData), id(false, TrUserData), id(<<>>, TrUserData), id(<<>>, TrUserData), TrUserData). dfp_read_field_def_Dependency(<<10, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> d_field_Dependency_package(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); dfp_read_field_def_Dependency(<<18, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> d_field_Dependency_requirement(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); dfp_read_field_def_Dependency(<<24, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> d_field_Dependency_optional(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); dfp_read_field_def_Dependency(<<34, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> d_field_Dependency_app(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); dfp_read_field_def_Dependency(<<42, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> d_field_Dependency_repository(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); dfp_read_field_def_Dependency(<<>>, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, _) -> S1 = #{}, S2 = if F@_1 == '$undef' -> S1; true -> S1#{package => F@_1} end, S3 = if F@_2 == '$undef' -> S2; true -> S2#{requirement => F@_2} end, S4 = if F@_3 == '$undef' -> S3; true -> S3#{optional => F@_3} end, S5 = if F@_4 == '$undef' -> S4; true -> S4#{app => F@_4} end, if F@_5 == '$undef' -> S5; true -> S5#{repository => F@_5} end; dfp_read_field_def_Dependency(Other, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> dg_read_field_def_Dependency(Other, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData). dg_read_field_def_Dependency(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) when N < 32 - 7 -> dg_read_field_def_Dependency(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); dg_read_field_def_Dependency(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> Key = X bsl N + Acc, case Key of 10 -> d_field_Dependency_package(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); 18 -> d_field_Dependency_requirement(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); 24 -> d_field_Dependency_optional(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); 34 -> d_field_Dependency_app(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); 42 -> d_field_Dependency_repository(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); _ -> case Key band 7 of 0 -> skip_varint_Dependency(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); 1 -> skip_64_Dependency(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); 2 -> skip_length_delimited_Dependency(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); 3 -> skip_group_Dependency(Rest, Key bsr 3, 0, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); 5 -> skip_32_Dependency(Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) end end; dg_read_field_def_Dependency(<<>>, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, _) -> S1 = #{}, S2 = if F@_1 == '$undef' -> S1; true -> S1#{package => F@_1} end, S3 = if F@_2 == '$undef' -> S2; true -> S2#{requirement => F@_2} end, S4 = if F@_3 == '$undef' -> S3; true -> S3#{optional => F@_3} end, S5 = if F@_4 == '$undef' -> S4; true -> S4#{app => F@_4} end, if F@_5 == '$undef' -> S5; true -> S5#{repository => F@_5} end. d_field_Dependency_package(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) when N < 57 -> d_field_Dependency_package(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); d_field_Dependency_package(<<0:1, X:7, Rest/binary>>, N, Acc, _, F@_2, F@_3, F@_4, F@_5, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {binary:copy(Bytes), Rest2} end, dfp_read_field_def_Dependency(RestF, 0, 0, NewFValue, F@_2, F@_3, F@_4, F@_5, TrUserData). d_field_Dependency_requirement(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) when N < 57 -> d_field_Dependency_requirement(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); d_field_Dependency_requirement(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, _, F@_3, F@_4, F@_5, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {binary:copy(Bytes), Rest2} end, dfp_read_field_def_Dependency(RestF, 0, 0, F@_1, NewFValue, F@_3, F@_4, F@_5, TrUserData). d_field_Dependency_optional(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) when N < 57 -> d_field_Dependency_optional(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); d_field_Dependency_optional(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, _, F@_4, F@_5, TrUserData) -> {NewFValue, RestF} = {X bsl N + Acc =/= 0, Rest}, dfp_read_field_def_Dependency(RestF, 0, 0, F@_1, F@_2, NewFValue, F@_4, F@_5, TrUserData). d_field_Dependency_app(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) when N < 57 -> d_field_Dependency_app(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); d_field_Dependency_app(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, _, F@_5, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {binary:copy(Bytes), Rest2} end, dfp_read_field_def_Dependency(RestF, 0, 0, F@_1, F@_2, F@_3, NewFValue, F@_5, TrUserData). d_field_Dependency_repository(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) when N < 57 -> d_field_Dependency_repository(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); d_field_Dependency_repository(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, _, TrUserData) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {binary:copy(Bytes), Rest2} end, dfp_read_field_def_Dependency(RestF, 0, 0, F@_1, F@_2, F@_3, F@_4, NewFValue, TrUserData). skip_varint_Dependency(<<1:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> skip_varint_Dependency(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); skip_varint_Dependency(<<0:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> dfp_read_field_def_Dependency(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData). skip_length_delimited_Dependency(<<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) when N < 57 -> skip_length_delimited_Dependency(Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData); skip_length_delimited_Dependency(<<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> Length = X bsl N + Acc, <<_:Length/binary, Rest2/binary>> = Rest, dfp_read_field_def_Dependency(Rest2, 0, 0, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData). skip_group_Dependency(Bin, FNum, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> {_, Rest} = read_group(Bin, FNum), dfp_read_field_def_Dependency(Rest, 0, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData). skip_32_Dependency(<<_:32, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> dfp_read_field_def_Dependency(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData). skip_64_Dependency(<<_:64, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData) -> dfp_read_field_def_Dependency(Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, F@_5, TrUserData). d_enum_RetirementReason(0) -> 'RETIRED_OTHER'; d_enum_RetirementReason(1) -> 'RETIRED_INVALID'; d_enum_RetirementReason(2) -> 'RETIRED_SECURITY'; d_enum_RetirementReason(3) -> 'RETIRED_DEPRECATED'; d_enum_RetirementReason(4) -> 'RETIRED_RENAMED'; d_enum_RetirementReason(V) -> V. read_group(Bin, FieldNum) -> {NumBytes, EndTagLen} = read_gr_b(Bin, 0, 0, 0, 0, FieldNum), <> = Bin, {Group, Rest}. %% Like skipping over fields, but record the total length, %% Each field is <(FieldNum bsl 3) bor FieldType> ++ %% 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, MsgName) -> merge_msgs(Prev, New, MsgName, []). merge_msgs(Prev, New, MsgName, Opts) -> TrUserData = proplists:get_value(user_data, Opts), case MsgName of 'Package' -> merge_msg_Package(Prev, New, TrUserData); 'Release' -> merge_msg_Release(Prev, New, TrUserData); 'RetirementStatus' -> merge_msg_RetirementStatus(Prev, New, TrUserData); 'Dependency' -> merge_msg_Dependency(Prev, New, TrUserData) end. merge_msg_Package(PMsg, NMsg, TrUserData) -> S1 = #{}, S2 = case {PMsg, NMsg} of {#{releases := PFreleases}, #{releases := NFreleases}} -> S1#{releases => 'erlang_++'(PFreleases, NFreleases, TrUserData)}; {_, #{releases := NFreleases}} -> S1#{releases => NFreleases}; {#{releases := PFreleases}, _} -> S1#{releases => PFreleases}; {_, _} -> S1 end, S3 = case {PMsg, NMsg} of {_, #{name := NFname}} -> S2#{name => NFname}; {#{name := PFname}, _} -> S2#{name => PFname}; _ -> S2 end, case {PMsg, NMsg} of {_, #{repository := NFrepository}} -> S3#{repository => NFrepository}; {#{repository := PFrepository}, _} -> S3#{repository => PFrepository}; _ -> S3 end. merge_msg_Release(PMsg, NMsg, TrUserData) -> S1 = #{}, S2 = case {PMsg, NMsg} of {_, #{version := NFversion}} -> S1#{version => NFversion}; {#{version := PFversion}, _} -> S1#{version => PFversion}; _ -> S1 end, S3 = case {PMsg, NMsg} of {_, #{checksum := NFchecksum}} -> S2#{checksum => NFchecksum}; {#{checksum := PFchecksum}, _} -> S2#{checksum => PFchecksum}; _ -> S2 end, S4 = case {PMsg, NMsg} of {#{dependencies := PFdependencies}, #{dependencies := NFdependencies}} -> S3#{dependencies => 'erlang_++'(PFdependencies, NFdependencies, TrUserData)}; {_, #{dependencies := NFdependencies}} -> S3#{dependencies => NFdependencies}; {#{dependencies := PFdependencies}, _} -> S3#{dependencies => PFdependencies}; {_, _} -> S3 end, case {PMsg, NMsg} of {#{retired := PFretired}, #{retired := NFretired}} -> S4#{retired => merge_msg_RetirementStatus(PFretired, NFretired, TrUserData)}; {_, #{retired := NFretired}} -> S4#{retired => NFretired}; {#{retired := PFretired}, _} -> S4#{retired => PFretired}; {_, _} -> S4 end. merge_msg_RetirementStatus(PMsg, NMsg, _) -> S1 = #{}, S2 = case {PMsg, NMsg} of {_, #{reason := NFreason}} -> S1#{reason => NFreason}; {#{reason := PFreason}, _} -> S1#{reason => PFreason}; _ -> S1 end, case {PMsg, NMsg} of {_, #{message := NFmessage}} -> S2#{message => NFmessage}; {#{message := PFmessage}, _} -> S2#{message => PFmessage}; _ -> S2 end. merge_msg_Dependency(PMsg, NMsg, _) -> S1 = #{}, S2 = case {PMsg, NMsg} of {_, #{package := NFpackage}} -> S1#{package => NFpackage}; {#{package := PFpackage}, _} -> S1#{package => PFpackage}; _ -> S1 end, S3 = case {PMsg, NMsg} of {_, #{requirement := NFrequirement}} -> S2#{requirement => NFrequirement}; {#{requirement := PFrequirement}, _} -> S2#{requirement => PFrequirement}; _ -> S2 end, S4 = case {PMsg, NMsg} of {_, #{optional := NFoptional}} -> S3#{optional => NFoptional}; {#{optional := PFoptional}, _} -> S3#{optional => PFoptional}; _ -> S3 end, S5 = case {PMsg, NMsg} of {_, #{app := NFapp}} -> S4#{app => NFapp}; {#{app := PFapp}, _} -> S4#{app => PFapp}; _ -> S4 end, case {PMsg, NMsg} of {_, #{repository := NFrepository}} -> S5#{repository => NFrepository}; {#{repository := PFrepository}, _} -> S5#{repository => PFrepository}; _ -> S5 end. verify_msg(Msg, MsgName) -> verify_msg(Msg, MsgName, []). verify_msg(Msg, MsgName, Opts) -> TrUserData = proplists:get_value(user_data, Opts), case MsgName of 'Package' -> v_msg_Package(Msg, ['Package'], TrUserData); 'Release' -> v_msg_Release(Msg, ['Release'], TrUserData); 'RetirementStatus' -> v_msg_RetirementStatus(Msg, ['RetirementStatus'], TrUserData); 'Dependency' -> v_msg_Dependency(Msg, ['Dependency'], TrUserData); _ -> mk_type_error(not_a_known_message, Msg, []) end. v_msg_Package(#{} = M, Path, TrUserData) -> case M of #{releases := F1} -> if is_list(F1) -> _ = [v_msg_Release(Elem, [releases | Path], TrUserData) || Elem <- F1], ok; true -> mk_type_error({invalid_list_of, {msg, 'Release'}}, F1, [releases | Path]) end; _ -> ok end, case M of #{name := F2} -> v_type_string(F2, [name | Path]); _ -> ok end, case M of #{repository := F3} -> v_type_string(F3, [repository | Path]); _ -> ok end, lists:foreach(fun (releases) -> ok; (name) -> ok; (repository) -> ok; (OtherKey) -> mk_type_error({extraneous_key, OtherKey}, M, Path) end, maps:keys(M)), ok; v_msg_Package(M, Path, _TrUserData) when is_map(M) -> mk_type_error({missing_fields, [] -- maps:keys(M), 'Package'}, M, Path); v_msg_Package(X, Path, _TrUserData) -> mk_type_error({expected_msg, 'Package'}, X, Path). v_msg_Release(#{} = M, Path, TrUserData) -> case M of #{version := F1} -> v_type_string(F1, [version | Path]); _ -> ok end, case M of #{checksum := F2} -> v_type_bytes(F2, [checksum | Path]); _ -> ok end, case M of #{dependencies := F3} -> if is_list(F3) -> _ = [v_msg_Dependency(Elem, [dependencies | Path], TrUserData) || Elem <- F3], ok; true -> mk_type_error({invalid_list_of, {msg, 'Dependency'}}, F3, [dependencies | Path]) end; _ -> ok end, case M of #{retired := F4} -> v_msg_RetirementStatus(F4, [retired | Path], TrUserData); _ -> ok end, lists:foreach(fun (version) -> ok; (checksum) -> ok; (dependencies) -> ok; (retired) -> ok; (OtherKey) -> mk_type_error({extraneous_key, OtherKey}, M, Path) end, maps:keys(M)), ok; v_msg_Release(M, Path, _TrUserData) when is_map(M) -> mk_type_error({missing_fields, [] -- maps:keys(M), 'Release'}, M, Path); v_msg_Release(X, Path, _TrUserData) -> mk_type_error({expected_msg, 'Release'}, X, Path). v_msg_RetirementStatus(#{} = M, Path, _) -> case M of #{reason := F1} -> v_enum_RetirementReason(F1, [reason | Path]); _ -> ok end, case M of #{message := F2} -> v_type_string(F2, [message | Path]); _ -> ok end, lists:foreach(fun (reason) -> ok; (message) -> ok; (OtherKey) -> mk_type_error({extraneous_key, OtherKey}, M, Path) end, maps:keys(M)), ok; v_msg_RetirementStatus(M, Path, _TrUserData) when is_map(M) -> mk_type_error({missing_fields, [] -- maps:keys(M), 'RetirementStatus'}, M, Path); v_msg_RetirementStatus(X, Path, _TrUserData) -> mk_type_error({expected_msg, 'RetirementStatus'}, X, Path). v_msg_Dependency(#{} = M, Path, _) -> case M of #{package := F1} -> v_type_string(F1, [package | Path]); _ -> ok end, case M of #{requirement := F2} -> v_type_string(F2, [requirement | Path]); _ -> ok end, case M of #{optional := F3} -> v_type_bool(F3, [optional | Path]); _ -> ok end, case M of #{app := F4} -> v_type_string(F4, [app | Path]); _ -> ok end, case M of #{repository := F5} -> v_type_string(F5, [repository | Path]); _ -> ok end, lists:foreach(fun (package) -> ok; (requirement) -> ok; (optional) -> ok; (app) -> ok; (repository) -> ok; (OtherKey) -> mk_type_error({extraneous_key, OtherKey}, M, Path) end, maps:keys(M)), ok; v_msg_Dependency(M, Path, _TrUserData) when is_map(M) -> mk_type_error({missing_fields, [] -- maps:keys(M), 'Dependency'}, M, Path); v_msg_Dependency(X, Path, _TrUserData) -> mk_type_error({expected_msg, 'Dependency'}, X, Path). v_enum_RetirementReason('RETIRED_OTHER', _Path) -> ok; v_enum_RetirementReason('RETIRED_INVALID', _Path) -> ok; v_enum_RetirementReason('RETIRED_SECURITY', _Path) -> ok; v_enum_RetirementReason('RETIRED_DEPRECATED', _Path) -> ok; v_enum_RetirementReason('RETIRED_RENAMED', _Path) -> ok; v_enum_RetirementReason(V, Path) when is_integer(V) -> v_type_sint32(V, Path); v_enum_RetirementReason(X, Path) -> mk_type_error({invalid_enum, 'RetirementReason'}, X, Path). v_type_sint32(N, _Path) when -2147483648 =< N, N =< 2147483647 -> ok; v_type_sint32(N, Path) when is_integer(N) -> mk_type_error({value_out_of_range, sint32, signed, 32}, N, Path); v_type_sint32(X, Path) -> mk_type_error({bad_integer, sint32, signed, 32}, X, Path). v_type_bool(false, _Path) -> ok; v_type_bool(true, _Path) -> ok; v_type_bool(0, _Path) -> ok; v_type_bool(1, _Path) -> ok; v_type_bool(X, Path) -> mk_type_error(bad_boolean_value, X, Path). v_type_string(S, Path) 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) -> mk_type_error(bad_unicode_string, X, Path). v_type_bytes(B, _Path) when is_binary(B) -> ok; v_type_bytes(B, _Path) when is_list(B) -> ok; v_type_bytes(X, Path) -> mk_type_error(bad_binary_value, X, Path). -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}]}}). prettify_path([]) -> top_level; prettify_path(PathR) -> list_to_atom(string:join(lists:map(fun atom_to_list/1, lists:reverse(PathR)), ".")). -compile({inline,id/2}). id(X, _TrUserData) -> X. -compile({inline,cons/3}). cons(Elem, Acc, _TrUserData) -> [Elem | Acc]. -compile({inline,lists_reverse/2}). 'lists_reverse'(L, _TrUserData) -> lists:reverse(L). -compile({inline,'erlang_++'/3}). 'erlang_++'(A, B, _TrUserData) -> A ++ B. get_msg_defs() -> [{{enum, 'RetirementReason'}, [{'RETIRED_OTHER', 0}, {'RETIRED_INVALID', 1}, {'RETIRED_SECURITY', 2}, {'RETIRED_DEPRECATED', 3}, {'RETIRED_RENAMED', 4}]}, {{msg, 'Package'}, [#{name => releases, fnum => 1, rnum => 2, type => {msg, 'Release'}, occurrence => repeated, opts => []}, #{name => name, fnum => 2, rnum => 3, type => string, occurrence => optional, opts => []}, #{name => repository, fnum => 3, rnum => 4, type => string, occurrence => optional, opts => []}]}, {{msg, 'Release'}, [#{name => version, fnum => 1, rnum => 2, type => string, occurrence => optional, opts => []}, #{name => checksum, fnum => 2, rnum => 3, type => bytes, occurrence => optional, opts => []}, #{name => dependencies, fnum => 3, rnum => 4, type => {msg, 'Dependency'}, occurrence => repeated, opts => []}, #{name => retired, fnum => 4, rnum => 5, type => {msg, 'RetirementStatus'}, occurrence => optional, opts => []}]}, {{msg, 'RetirementStatus'}, [#{name => reason, fnum => 1, rnum => 2, type => {enum, 'RetirementReason'}, occurrence => optional, opts => []}, #{name => message, fnum => 2, rnum => 3, type => string, occurrence => optional, opts => []}]}, {{msg, 'Dependency'}, [#{name => package, fnum => 1, rnum => 2, type => string, occurrence => optional, opts => []}, #{name => requirement, fnum => 2, rnum => 3, type => string, occurrence => optional, opts => []}, #{name => optional, fnum => 3, rnum => 4, type => bool, occurrence => optional, opts => []}, #{name => app, fnum => 4, rnum => 5, type => string, occurrence => optional, opts => []}, #{name => repository, fnum => 5, rnum => 6, type => string, occurrence => optional, opts => []}]}]. get_msg_names() -> ['Package', 'Release', 'RetirementStatus', 'Dependency']. get_group_names() -> []. get_msg_or_group_names() -> ['Package', 'Release', 'RetirementStatus', 'Dependency']. get_enum_names() -> ['RetirementReason']. fetch_msg_def(MsgName) -> case find_msg_def(MsgName) of Fs when is_list(Fs) -> Fs; error -> erlang:error({no_such_msg, MsgName}) end. fetch_enum_def(EnumName) -> case find_enum_def(EnumName) of Es when is_list(Es) -> Es; error -> erlang:error({no_such_enum, EnumName}) end. find_msg_def('Package') -> [#{name => releases, fnum => 1, rnum => 2, type => {msg, 'Release'}, occurrence => repeated, opts => []}, #{name => name, fnum => 2, rnum => 3, type => string, occurrence => optional, opts => []}, #{name => repository, fnum => 3, rnum => 4, type => string, occurrence => optional, opts => []}]; find_msg_def('Release') -> [#{name => version, fnum => 1, rnum => 2, type => string, occurrence => optional, opts => []}, #{name => checksum, fnum => 2, rnum => 3, type => bytes, occurrence => optional, opts => []}, #{name => dependencies, fnum => 3, rnum => 4, type => {msg, 'Dependency'}, occurrence => repeated, opts => []}, #{name => retired, fnum => 4, rnum => 5, type => {msg, 'RetirementStatus'}, occurrence => optional, opts => []}]; find_msg_def('RetirementStatus') -> [#{name => reason, fnum => 1, rnum => 2, type => {enum, 'RetirementReason'}, occurrence => optional, opts => []}, #{name => message, fnum => 2, rnum => 3, type => string, occurrence => optional, opts => []}]; find_msg_def('Dependency') -> [#{name => package, fnum => 1, rnum => 2, type => string, occurrence => optional, opts => []}, #{name => requirement, fnum => 2, rnum => 3, type => string, occurrence => optional, opts => []}, #{name => optional, fnum => 3, rnum => 4, type => bool, occurrence => optional, opts => []}, #{name => app, fnum => 4, rnum => 5, type => string, occurrence => optional, opts => []}, #{name => repository, fnum => 5, rnum => 6, type => string, occurrence => optional, opts => []}]; find_msg_def(_) -> error. find_enum_def('RetirementReason') -> [{'RETIRED_OTHER', 0}, {'RETIRED_INVALID', 1}, {'RETIRED_SECURITY', 2}, {'RETIRED_DEPRECATED', 3}, {'RETIRED_RENAMED', 4}]; find_enum_def(_) -> error. enum_symbol_by_value('RetirementReason', Value) -> enum_symbol_by_value_RetirementReason(Value). enum_value_by_symbol('RetirementReason', Sym) -> enum_value_by_symbol_RetirementReason(Sym). enum_symbol_by_value_RetirementReason(0) -> 'RETIRED_OTHER'; enum_symbol_by_value_RetirementReason(1) -> 'RETIRED_INVALID'; enum_symbol_by_value_RetirementReason(2) -> 'RETIRED_SECURITY'; enum_symbol_by_value_RetirementReason(3) -> 'RETIRED_DEPRECATED'; enum_symbol_by_value_RetirementReason(4) -> 'RETIRED_RENAMED'. enum_value_by_symbol_RetirementReason('RETIRED_OTHER') -> 0; enum_value_by_symbol_RetirementReason('RETIRED_INVALID') -> 1; enum_value_by_symbol_RetirementReason('RETIRED_SECURITY') -> 2; enum_value_by_symbol_RetirementReason('RETIRED_DEPRECATED') -> 3; enum_value_by_symbol_RetirementReason('RETIRED_RENAMED') -> 4. 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}). get_package_name() -> undefined. gpb_version_as_string() -> "4.2.1". gpb_version_as_list() -> [4,2,1].