hex_core

%% @private
%% -*- coding: utf-8 -*-
%% Automatically generated, do not edit
%% Generated by gpb_compile version 3.28.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]).



-spec encode_msg(map(),'RetirementStatus' | 'Dependency' | 'Release' | 'Package') -> binary().
encode_msg(Msg, MsgName) ->
    encode_msg(Msg, MsgName, []).


-spec encode_msg(map(),'RetirementStatus' | 'Dependency' | 'Release' | 'Package', list()) -> binary().
encode_msg(Msg, MsgName, Opts) ->
    verify_msg(Msg, MsgName, Opts),
    TrUserData = proplists:get_value(user_data, Opts),
    case MsgName of
      'RetirementStatus' ->
	  e_msg_RetirementStatus(Msg, TrUserData);
      'Dependency' -> e_msg_Dependency(Msg, TrUserData);
      'Release' -> e_msg_Release(Msg, TrUserData);
      'Package' -> e_msg_Package(Msg, TrUserData)
    end.



e_msg_RetirementStatus(Msg, TrUserData) ->
    e_msg_RetirementStatus(Msg, <<>>, TrUserData).


e_msg_RetirementStatus(#{reason := F1} = M, Bin,
		       TrUserData) ->
    B1 = begin
	   TrF1 = id(F1, TrUserData),
	   e_enum_RetirementReason(TrF1, <<Bin/binary, 8>>)
	 end,
    case M of
      #{message := F2} ->
	  begin
	    TrF2 = id(F2, TrUserData),
	    e_type_string(TrF2, <<B1/binary, 18>>)
	  end;
      _ -> B1
    end.

e_msg_Dependency(Msg, TrUserData) ->
    e_msg_Dependency(Msg, <<>>, TrUserData).


e_msg_Dependency(#{package := F1, requirement := F2} =
		     M,
		 Bin, TrUserData) ->
    B1 = begin
	   TrF1 = id(F1, TrUserData),
	   e_type_string(TrF1, <<Bin/binary, 10>>)
	 end,
    B2 = begin
	   TrF2 = id(F2, TrUserData),
	   e_type_string(TrF2, <<B1/binary, 18>>)
	 end,
    B3 = case M of
	   #{optional := F3} ->
	       begin
		 TrF3 = id(F3, TrUserData),
		 e_type_bool(TrF3, <<B2/binary, 24>>)
	       end;
	   _ -> B2
	 end,
    B4 = case M of
	   #{app := F4} ->
	       begin
		 TrF4 = id(F4, TrUserData),
		 e_type_string(TrF4, <<B3/binary, 34>>)
	       end;
	   _ -> B3
	 end,
    case M of
      #{repository := F5} ->
	  begin
	    TrF5 = id(F5, TrUserData),
	    e_type_string(TrF5, <<B4/binary, 42>>)
	  end;
      _ -> B4
    end.

e_msg_Release(Msg, TrUserData) ->
    e_msg_Release(Msg, <<>>, TrUserData).


e_msg_Release(#{version := F1, checksum := F2} = M, Bin,
	      TrUserData) ->
    B1 = begin
	   TrF1 = id(F1, TrUserData),
	   e_type_string(TrF1, <<Bin/binary, 10>>)
	 end,
    B2 = begin
	   TrF2 = id(F2, TrUserData),
	   e_type_bytes(TrF2, <<B1/binary, 18>>)
	 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),
	    e_mfield_Release_retired(TrF4, <<B3/binary, 34>>,
				     TrUserData)
	  end;
      _ -> B3
    end.

e_msg_Package(Msg, TrUserData) ->
    e_msg_Package(Msg, <<>>, TrUserData).


e_msg_Package(#{} = M, Bin, TrUserData) ->
    case M of
      #{releases := F1} ->
	  TrF1 = id(F1, TrUserData),
	  if TrF1 == [] -> Bin;
	     true -> e_field_Package_releases(TrF1, Bin, TrUserData)
	  end;
      _ -> Bin
    end.

e_mfield_Release_dependencies(Msg, Bin, TrUserData) ->
    SubBin = e_msg_Dependency(Msg, <<>>, TrUserData),
    Bin2 = e_varint(byte_size(SubBin), Bin),
    <<Bin2/binary, SubBin/binary>>.

e_field_Release_dependencies([Elem | Rest], Bin,
			     TrUserData) ->
    Bin2 = <<Bin/binary, 26>>,
    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),
    <<Bin2/binary, SubBin/binary>>.

e_mfield_Package_releases(Msg, Bin, TrUserData) ->
    SubBin = e_msg_Release(Msg, <<>>, TrUserData),
    Bin2 = e_varint(byte_size(SubBin), Bin),
    <<Bin2/binary, SubBin/binary>>.

e_field_Package_releases([Elem | Rest], Bin,
			 TrUserData) ->
    Bin2 = <<Bin/binary, 10>>,
    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_enum_RetirementReason('RETIRED_OTHER', Bin) ->
    <<Bin/binary, 0>>;
e_enum_RetirementReason('RETIRED_INVALID', Bin) ->
    <<Bin/binary, 1>>;
e_enum_RetirementReason('RETIRED_SECURITY', Bin) ->
    <<Bin/binary, 2>>;
e_enum_RetirementReason('RETIRED_DEPRECATED', Bin) ->
    <<Bin/binary, 3>>;
e_enum_RetirementReason('RETIRED_RENAMED', Bin) ->
    <<Bin/binary, 4>>;
e_enum_RetirementReason(V, Bin) -> e_varint(V, Bin).

e_type_bool(true, Bin) -> <<Bin/binary, 1>>;
e_type_bool(false, Bin) -> <<Bin/binary, 0>>;
e_type_bool(1, Bin) -> <<Bin/binary, 1>>;
e_type_bool(0, Bin) -> <<Bin/binary, 0>>.

e_type_string(S, Bin) ->
    Utf8 = unicode:characters_to_binary(S),
    Bin2 = e_varint(byte_size(Utf8), Bin),
    <<Bin2/binary, Utf8/binary>>.

e_type_bytes(Bytes, Bin) when is_binary(Bytes) ->
    Bin2 = e_varint(byte_size(Bytes), Bin),
    <<Bin2/binary, Bytes/binary>>;
e_type_bytes(Bytes, Bin) when is_list(Bytes) ->
    BytesBin = iolist_to_binary(Bytes),
    Bin2 = e_varint(byte_size(BytesBin), Bin),
    <<Bin2/binary, BytesBin/binary>>.

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),
    case MsgName of
      'RetirementStatus' ->
	  try d_msg_RetirementStatus(Bin, TrUserData) catch
	    Class:Reason ->
		StackTrace = erlang:get_stacktrace(),
		error({gpb_error,
		       {decoding_failure,
			{Bin, 'RetirementStatus',
			 {Class, Reason, StackTrace}}}})
	  end;
      'Dependency' ->
	  try d_msg_Dependency(Bin, TrUserData) catch
	    Class:Reason ->
		StackTrace = erlang:get_stacktrace(),
		error({gpb_error,
		       {decoding_failure,
			{Bin, 'Dependency', {Class, Reason, StackTrace}}}})
	  end;
      'Release' ->
	  try d_msg_Release(Bin, TrUserData) catch
	    Class:Reason ->
		StackTrace = erlang:get_stacktrace(),
		error({gpb_error,
		       {decoding_failure,
			{Bin, 'Release', {Class, Reason, StackTrace}}}})
	  end;
      'Package' ->
	  try d_msg_Package(Bin, TrUserData) catch
	    Class:Reason ->
		StackTrace = erlang:get_stacktrace(),
		error({gpb_error,
		       {decoding_failure,
			{Bin, 'Package', {Class, Reason, StackTrace}}}})
	  end
    end.



d_msg_RetirementStatus(Bin, TrUserData) ->
    dfp_read_field_def_RetirementStatus(Bin, 0, 0,
					id('$undef', TrUserData),
					id('$undef', TrUserData), TrUserData).

dfp_read_field_def_RetirementStatus(<<8, Rest/binary>>,
				    Z1, Z2, F1, F2, TrUserData) ->
    d_field_RetirementStatus_reason(Rest, Z1, Z2, F1, F2,
				    TrUserData);
dfp_read_field_def_RetirementStatus(<<18, Rest/binary>>,
				    Z1, Z2, F1, F2, TrUserData) ->
    d_field_RetirementStatus_message(Rest, Z1, Z2, F1, F2,
				     TrUserData);
dfp_read_field_def_RetirementStatus(<<>>, 0, 0, F1, F2,
				    _) ->
    S1 = #{reason => F1},
    if F2 == '$undef' -> S1;
       true -> S1#{message => F2}
    end;
dfp_read_field_def_RetirementStatus(Other, Z1, Z2, F1,
				    F2, TrUserData) ->
    dg_read_field_def_RetirementStatus(Other, Z1, Z2, F1,
				       F2, TrUserData).

dg_read_field_def_RetirementStatus(<<1:1, X:7,
				     Rest/binary>>,
				   N, Acc, F1, F2, TrUserData)
    when N < 32 - 7 ->
    dg_read_field_def_RetirementStatus(Rest, N + 7,
				       X bsl N + Acc, F1, F2, TrUserData);
dg_read_field_def_RetirementStatus(<<0:1, X:7,
				     Rest/binary>>,
				   N, Acc, F1, F2, TrUserData) ->
    Key = X bsl N + Acc,
    case Key of
      8 ->
	  d_field_RetirementStatus_reason(Rest, 0, 0, F1, F2,
					  TrUserData);
      18 ->
	  d_field_RetirementStatus_message(Rest, 0, 0, F1, F2,
					   TrUserData);
      _ ->
	  case Key band 7 of
	    0 ->
		skip_varint_RetirementStatus(Rest, 0, 0, F1, F2,
					     TrUserData);
	    1 ->
		skip_64_RetirementStatus(Rest, 0, 0, F1, F2,
					 TrUserData);
	    2 ->
		skip_length_delimited_RetirementStatus(Rest, 0, 0, F1,
						       F2, TrUserData);
	    3 ->
		skip_group_RetirementStatus(Rest, Key bsr 3, 0, F1, F2,
					    TrUserData);
	    5 ->
		skip_32_RetirementStatus(Rest, 0, 0, F1, F2, TrUserData)
	  end
    end;
dg_read_field_def_RetirementStatus(<<>>, 0, 0, F1, F2,
				   _) ->
    S1 = #{reason => F1},
    if F2 == '$undef' -> S1;
       true -> S1#{message => F2}
    end.

d_field_RetirementStatus_reason(<<1:1, X:7,
				  Rest/binary>>,
				N, Acc, F1, F2, TrUserData)
    when N < 57 ->
    d_field_RetirementStatus_reason(Rest, N + 7,
				    X bsl N + Acc, F1, F2, TrUserData);
d_field_RetirementStatus_reason(<<0:1, X:7,
				  Rest/binary>>,
				N, Acc, _, F2, TrUserData) ->
    <<Tmp:32/signed-native>> = <<(X bsl N +
				    Acc):32/unsigned-native>>,
    NewFValue = d_enum_RetirementReason(Tmp),
    dfp_read_field_def_RetirementStatus(Rest, 0, 0,
					NewFValue, F2, TrUserData).


d_field_RetirementStatus_message(<<1:1, X:7,
				   Rest/binary>>,
				 N, Acc, F1, F2, TrUserData)
    when N < 57 ->
    d_field_RetirementStatus_message(Rest, N + 7,
				     X bsl N + Acc, F1, F2, TrUserData);
d_field_RetirementStatus_message(<<0:1, X:7,
				   Rest/binary>>,
				 N, Acc, F1, _, TrUserData) ->
    Len = X bsl N + Acc,
    <<Bytes:Len/binary, Rest2/binary>> = Rest,
    NewFValue = binary:copy(Bytes),
    dfp_read_field_def_RetirementStatus(Rest2, 0, 0, F1,
					NewFValue, TrUserData).


skip_varint_RetirementStatus(<<1:1, _:7, Rest/binary>>,
			     Z1, Z2, F1, F2, TrUserData) ->
    skip_varint_RetirementStatus(Rest, Z1, Z2, F1, F2,
				 TrUserData);
skip_varint_RetirementStatus(<<0:1, _:7, Rest/binary>>,
			     Z1, Z2, F1, F2, TrUserData) ->
    dfp_read_field_def_RetirementStatus(Rest, Z1, Z2, F1,
					F2, TrUserData).


skip_length_delimited_RetirementStatus(<<1:1, X:7,
					 Rest/binary>>,
				       N, Acc, F1, F2, TrUserData)
    when N < 57 ->
    skip_length_delimited_RetirementStatus(Rest, N + 7,
					   X bsl N + Acc, F1, F2, TrUserData);
skip_length_delimited_RetirementStatus(<<0:1, X:7,
					 Rest/binary>>,
				       N, Acc, F1, F2, TrUserData) ->
    Length = X bsl N + Acc,
    <<_:Length/binary, Rest2/binary>> = Rest,
    dfp_read_field_def_RetirementStatus(Rest2, 0, 0, F1, F2,
					TrUserData).


skip_group_RetirementStatus(Bin, FNum, Z2, F1, F2,
			    TrUserData) ->
    {_, Rest} = read_group(Bin, FNum),
    dfp_read_field_def_RetirementStatus(Rest, 0, Z2, F1, F2,
					TrUserData).


skip_32_RetirementStatus(<<_:32, Rest/binary>>, Z1, Z2,
			 F1, F2, TrUserData) ->
    dfp_read_field_def_RetirementStatus(Rest, Z1, Z2, F1,
					F2, TrUserData).


skip_64_RetirementStatus(<<_:64, Rest/binary>>, Z1, Z2,
			 F1, F2, TrUserData) ->
    dfp_read_field_def_RetirementStatus(Rest, Z1, Z2, F1,
					F2, TrUserData).


d_msg_Dependency(Bin, TrUserData) ->
    dfp_read_field_def_Dependency(Bin, 0, 0,
				  id('$undef', TrUserData),
				  id('$undef', TrUserData),
				  id('$undef', TrUserData),
				  id('$undef', TrUserData),
				  id('$undef', TrUserData), TrUserData).

dfp_read_field_def_Dependency(<<10, Rest/binary>>, Z1,
			      Z2, F1, F2, F3, F4, F5, TrUserData) ->
    d_field_Dependency_package(Rest, Z1, Z2, F1, F2, F3, F4,
			       F5, TrUserData);
dfp_read_field_def_Dependency(<<18, Rest/binary>>, Z1,
			      Z2, F1, F2, F3, F4, F5, TrUserData) ->
    d_field_Dependency_requirement(Rest, Z1, Z2, F1, F2, F3,
				   F4, F5, TrUserData);
dfp_read_field_def_Dependency(<<24, Rest/binary>>, Z1,
			      Z2, F1, F2, F3, F4, F5, TrUserData) ->
    d_field_Dependency_optional(Rest, Z1, Z2, F1, F2, F3,
				F4, F5, TrUserData);
dfp_read_field_def_Dependency(<<34, Rest/binary>>, Z1,
			      Z2, F1, F2, F3, F4, F5, TrUserData) ->
    d_field_Dependency_app(Rest, Z1, Z2, F1, F2, F3, F4, F5,
			   TrUserData);
dfp_read_field_def_Dependency(<<42, Rest/binary>>, Z1,
			      Z2, F1, F2, F3, F4, F5, TrUserData) ->
    d_field_Dependency_repository(Rest, Z1, Z2, F1, F2, F3,
				  F4, F5, TrUserData);
dfp_read_field_def_Dependency(<<>>, 0, 0, F1, F2, F3,
			      F4, F5, _) ->
    S1 = #{package => F1, requirement => F2},
    S2 = if F3 == '$undef' -> S1;
	    true -> S1#{optional => F3}
	 end,
    S3 = if F4 == '$undef' -> S2;
	    true -> S2#{app => F4}
	 end,
    if F5 == '$undef' -> S3;
       true -> S3#{repository => F5}
    end;
dfp_read_field_def_Dependency(Other, Z1, Z2, F1, F2, F3,
			      F4, F5, TrUserData) ->
    dg_read_field_def_Dependency(Other, Z1, Z2, F1, F2, F3,
				 F4, F5, TrUserData).

dg_read_field_def_Dependency(<<1:1, X:7, Rest/binary>>,
			     N, Acc, F1, F2, F3, F4, F5, TrUserData)
    when N < 32 - 7 ->
    dg_read_field_def_Dependency(Rest, N + 7, X bsl N + Acc,
				 F1, F2, F3, F4, F5, TrUserData);
dg_read_field_def_Dependency(<<0:1, X:7, Rest/binary>>,
			     N, Acc, F1, F2, F3, F4, F5, TrUserData) ->
    Key = X bsl N + Acc,
    case Key of
      10 ->
	  d_field_Dependency_package(Rest, 0, 0, F1, F2, F3, F4,
				     F5, TrUserData);
      18 ->
	  d_field_Dependency_requirement(Rest, 0, 0, F1, F2, F3,
					 F4, F5, TrUserData);
      24 ->
	  d_field_Dependency_optional(Rest, 0, 0, F1, F2, F3, F4,
				      F5, TrUserData);
      34 ->
	  d_field_Dependency_app(Rest, 0, 0, F1, F2, F3, F4, F5,
				 TrUserData);
      42 ->
	  d_field_Dependency_repository(Rest, 0, 0, F1, F2, F3,
					F4, F5, TrUserData);
      _ ->
	  case Key band 7 of
	    0 ->
		skip_varint_Dependency(Rest, 0, 0, F1, F2, F3, F4, F5,
				       TrUserData);
	    1 ->
		skip_64_Dependency(Rest, 0, 0, F1, F2, F3, F4, F5,
				   TrUserData);
	    2 ->
		skip_length_delimited_Dependency(Rest, 0, 0, F1, F2, F3,
						 F4, F5, TrUserData);
	    3 ->
		skip_group_Dependency(Rest, Key bsr 3, 0, F1, F2, F3,
				      F4, F5, TrUserData);
	    5 ->
		skip_32_Dependency(Rest, 0, 0, F1, F2, F3, F4, F5,
				   TrUserData)
	  end
    end;
dg_read_field_def_Dependency(<<>>, 0, 0, F1, F2, F3, F4,
			     F5, _) ->
    S1 = #{package => F1, requirement => F2},
    S2 = if F3 == '$undef' -> S1;
	    true -> S1#{optional => F3}
	 end,
    S3 = if F4 == '$undef' -> S2;
	    true -> S2#{app => F4}
	 end,
    if F5 == '$undef' -> S3;
       true -> S3#{repository => F5}
    end.

d_field_Dependency_package(<<1:1, X:7, Rest/binary>>, N,
			   Acc, F1, F2, F3, F4, F5, TrUserData)
    when N < 57 ->
    d_field_Dependency_package(Rest, N + 7, X bsl N + Acc,
			       F1, F2, F3, F4, F5, TrUserData);
d_field_Dependency_package(<<0:1, X:7, Rest/binary>>, N,
			   Acc, _, F2, F3, F4, F5, TrUserData) ->
    Len = X bsl N + Acc,
    <<Bytes:Len/binary, Rest2/binary>> = Rest,
    NewFValue = binary:copy(Bytes),
    dfp_read_field_def_Dependency(Rest2, 0, 0, NewFValue,
				  F2, F3, F4, F5, TrUserData).


d_field_Dependency_requirement(<<1:1, X:7,
				 Rest/binary>>,
			       N, Acc, F1, F2, F3, F4, F5, TrUserData)
    when N < 57 ->
    d_field_Dependency_requirement(Rest, N + 7,
				   X bsl N + Acc, F1, F2, F3, F4, F5,
				   TrUserData);
d_field_Dependency_requirement(<<0:1, X:7,
				 Rest/binary>>,
			       N, Acc, F1, _, F3, F4, F5, TrUserData) ->
    Len = X bsl N + Acc,
    <<Bytes:Len/binary, Rest2/binary>> = Rest,
    NewFValue = binary:copy(Bytes),
    dfp_read_field_def_Dependency(Rest2, 0, 0, F1,
				  NewFValue, F3, F4, F5, TrUserData).


d_field_Dependency_optional(<<1:1, X:7, Rest/binary>>,
			    N, Acc, F1, F2, F3, F4, F5, TrUserData)
    when N < 57 ->
    d_field_Dependency_optional(Rest, N + 7, X bsl N + Acc,
				F1, F2, F3, F4, F5, TrUserData);
d_field_Dependency_optional(<<0:1, X:7, Rest/binary>>,
			    N, Acc, F1, F2, _, F4, F5, TrUserData) ->
    NewFValue = X bsl N + Acc =/= 0,
    dfp_read_field_def_Dependency(Rest, 0, 0, F1, F2,
				  NewFValue, F4, F5, TrUserData).


d_field_Dependency_app(<<1:1, X:7, Rest/binary>>, N,
		       Acc, F1, F2, F3, F4, F5, TrUserData)
    when N < 57 ->
    d_field_Dependency_app(Rest, N + 7, X bsl N + Acc, F1,
			   F2, F3, F4, F5, TrUserData);
d_field_Dependency_app(<<0:1, X:7, Rest/binary>>, N,
		       Acc, F1, F2, F3, _, F5, TrUserData) ->
    Len = X bsl N + Acc,
    <<Bytes:Len/binary, Rest2/binary>> = Rest,
    NewFValue = binary:copy(Bytes),
    dfp_read_field_def_Dependency(Rest2, 0, 0, F1, F2, F3,
				  NewFValue, F5, TrUserData).


d_field_Dependency_repository(<<1:1, X:7, Rest/binary>>,
			      N, Acc, F1, F2, F3, F4, F5, TrUserData)
    when N < 57 ->
    d_field_Dependency_repository(Rest, N + 7,
				  X bsl N + Acc, F1, F2, F3, F4, F5,
				  TrUserData);
d_field_Dependency_repository(<<0:1, X:7, Rest/binary>>,
			      N, Acc, F1, F2, F3, F4, _, TrUserData) ->
    Len = X bsl N + Acc,
    <<Bytes:Len/binary, Rest2/binary>> = Rest,
    NewFValue = binary:copy(Bytes),
    dfp_read_field_def_Dependency(Rest2, 0, 0, F1, F2, F3,
				  F4, NewFValue, TrUserData).


skip_varint_Dependency(<<1:1, _:7, Rest/binary>>, Z1,
		       Z2, F1, F2, F3, F4, F5, TrUserData) ->
    skip_varint_Dependency(Rest, Z1, Z2, F1, F2, F3, F4, F5,
			   TrUserData);
skip_varint_Dependency(<<0:1, _:7, Rest/binary>>, Z1,
		       Z2, F1, F2, F3, F4, F5, TrUserData) ->
    dfp_read_field_def_Dependency(Rest, Z1, Z2, F1, F2, F3,
				  F4, F5, TrUserData).


skip_length_delimited_Dependency(<<1:1, X:7,
				   Rest/binary>>,
				 N, Acc, F1, F2, F3, F4, F5, TrUserData)
    when N < 57 ->
    skip_length_delimited_Dependency(Rest, N + 7,
				     X bsl N + Acc, F1, F2, F3, F4, F5,
				     TrUserData);
skip_length_delimited_Dependency(<<0:1, X:7,
				   Rest/binary>>,
				 N, Acc, F1, F2, F3, F4, F5, TrUserData) ->
    Length = X bsl N + Acc,
    <<_:Length/binary, Rest2/binary>> = Rest,
    dfp_read_field_def_Dependency(Rest2, 0, 0, F1, F2, F3,
				  F4, F5, TrUserData).


skip_group_Dependency(Bin, FNum, Z2, F1, F2, F3, F4, F5,
		      TrUserData) ->
    {_, Rest} = read_group(Bin, FNum),
    dfp_read_field_def_Dependency(Rest, 0, Z2, F1, F2, F3,
				  F4, F5, TrUserData).


skip_32_Dependency(<<_:32, Rest/binary>>, Z1, Z2, F1,
		   F2, F3, F4, F5, TrUserData) ->
    dfp_read_field_def_Dependency(Rest, Z1, Z2, F1, F2, F3,
				  F4, F5, TrUserData).


skip_64_Dependency(<<_:64, Rest/binary>>, Z1, Z2, F1,
		   F2, F3, F4, F5, TrUserData) ->
    dfp_read_field_def_Dependency(Rest, Z1, Z2, F1, F2, F3,
				  F4, F5, TrUserData).


d_msg_Release(Bin, TrUserData) ->
    dfp_read_field_def_Release(Bin, 0, 0,
			       id('$undef', TrUserData),
			       id('$undef', TrUserData), id([], TrUserData),
			       id('$undef', TrUserData), TrUserData).

dfp_read_field_def_Release(<<10, Rest/binary>>, Z1, Z2,
			   F1, F2, F3, F4, TrUserData) ->
    d_field_Release_version(Rest, Z1, Z2, F1, F2, F3, F4,
			    TrUserData);
dfp_read_field_def_Release(<<18, Rest/binary>>, Z1, Z2,
			   F1, F2, F3, F4, TrUserData) ->
    d_field_Release_checksum(Rest, Z1, Z2, F1, F2, F3, F4,
			     TrUserData);
dfp_read_field_def_Release(<<26, Rest/binary>>, Z1, Z2,
			   F1, F2, F3, F4, TrUserData) ->
    d_field_Release_dependencies(Rest, Z1, Z2, F1, F2, F3,
				 F4, TrUserData);
dfp_read_field_def_Release(<<34, Rest/binary>>, Z1, Z2,
			   F1, F2, F3, F4, TrUserData) ->
    d_field_Release_retired(Rest, Z1, Z2, F1, F2, F3, F4,
			    TrUserData);
dfp_read_field_def_Release(<<>>, 0, 0, F1, F2, F3, F4,
			   TrUserData) ->
    S1 = #{version => F1, checksum => F2},
    S2 = if F3 == '$undef' -> S1;
	    true ->
		S1#{dependencies => lists_reverse(F3, TrUserData)}
	 end,
    if F4 == '$undef' -> S2;
       true -> S2#{retired => F4}
    end;
dfp_read_field_def_Release(Other, Z1, Z2, F1, F2, F3,
			   F4, TrUserData) ->
    dg_read_field_def_Release(Other, Z1, Z2, F1, F2, F3, F4,
			      TrUserData).

dg_read_field_def_Release(<<1:1, X:7, Rest/binary>>, N,
			  Acc, F1, F2, F3, F4, TrUserData)
    when N < 32 - 7 ->
    dg_read_field_def_Release(Rest, N + 7, X bsl N + Acc,
			      F1, F2, F3, F4, TrUserData);
dg_read_field_def_Release(<<0:1, X:7, Rest/binary>>, N,
			  Acc, F1, F2, F3, F4, TrUserData) ->
    Key = X bsl N + Acc,
    case Key of
      10 ->
	  d_field_Release_version(Rest, 0, 0, F1, F2, F3, F4,
				  TrUserData);
      18 ->
	  d_field_Release_checksum(Rest, 0, 0, F1, F2, F3, F4,
				   TrUserData);
      26 ->
	  d_field_Release_dependencies(Rest, 0, 0, F1, F2, F3, F4,
				       TrUserData);
      34 ->
	  d_field_Release_retired(Rest, 0, 0, F1, F2, F3, F4,
				  TrUserData);
      _ ->
	  case Key band 7 of
	    0 ->
		skip_varint_Release(Rest, 0, 0, F1, F2, F3, F4,
				    TrUserData);
	    1 ->
		skip_64_Release(Rest, 0, 0, F1, F2, F3, F4, TrUserData);
	    2 ->
		skip_length_delimited_Release(Rest, 0, 0, F1, F2, F3,
					      F4, TrUserData);
	    3 ->
		skip_group_Release(Rest, Key bsr 3, 0, F1, F2, F3, F4,
				   TrUserData);
	    5 ->
		skip_32_Release(Rest, 0, 0, F1, F2, F3, F4, TrUserData)
	  end
    end;
dg_read_field_def_Release(<<>>, 0, 0, F1, F2, F3, F4,
			  TrUserData) ->
    S1 = #{version => F1, checksum => F2},
    S2 = if F3 == '$undef' -> S1;
	    true ->
		S1#{dependencies => lists_reverse(F3, TrUserData)}
	 end,
    if F4 == '$undef' -> S2;
       true -> S2#{retired => F4}
    end.

d_field_Release_version(<<1:1, X:7, Rest/binary>>, N,
			Acc, F1, F2, F3, F4, TrUserData)
    when N < 57 ->
    d_field_Release_version(Rest, N + 7, X bsl N + Acc, F1,
			    F2, F3, F4, TrUserData);
d_field_Release_version(<<0:1, X:7, Rest/binary>>, N,
			Acc, _, F2, F3, F4, TrUserData) ->
    Len = X bsl N + Acc,
    <<Bytes:Len/binary, Rest2/binary>> = Rest,
    NewFValue = binary:copy(Bytes),
    dfp_read_field_def_Release(Rest2, 0, 0, NewFValue, F2,
			       F3, F4, TrUserData).


d_field_Release_checksum(<<1:1, X:7, Rest/binary>>, N,
			 Acc, F1, F2, F3, F4, TrUserData)
    when N < 57 ->
    d_field_Release_checksum(Rest, N + 7, X bsl N + Acc, F1,
			     F2, F3, F4, TrUserData);
d_field_Release_checksum(<<0:1, X:7, Rest/binary>>, N,
			 Acc, F1, _, F3, F4, TrUserData) ->
    Len = X bsl N + Acc,
    <<Bytes:Len/binary, Rest2/binary>> = Rest,
    NewFValue = binary:copy(Bytes),
    dfp_read_field_def_Release(Rest2, 0, 0, F1, NewFValue,
			       F3, F4, TrUserData).


d_field_Release_dependencies(<<1:1, X:7, Rest/binary>>,
			     N, Acc, F1, F2, F3, F4, TrUserData)
    when N < 57 ->
    d_field_Release_dependencies(Rest, N + 7, X bsl N + Acc,
				 F1, F2, F3, F4, TrUserData);
d_field_Release_dependencies(<<0:1, X:7, Rest/binary>>,
			     N, Acc, F1, F2, F3, F4, TrUserData) ->
    Len = X bsl N + Acc,
    <<Bs:Len/binary, Rest2/binary>> = Rest,
    NewFValue = id(d_msg_Dependency(Bs, TrUserData),
		   TrUserData),
    dfp_read_field_def_Release(Rest2, 0, 0, F1, F2,
			       cons(NewFValue, F3, TrUserData), F4, TrUserData).


d_field_Release_retired(<<1:1, X:7, Rest/binary>>, N,
			Acc, F1, F2, F3, F4, TrUserData)
    when N < 57 ->
    d_field_Release_retired(Rest, N + 7, X bsl N + Acc, F1,
			    F2, F3, F4, TrUserData);
d_field_Release_retired(<<0:1, X:7, Rest/binary>>, N,
			Acc, F1, F2, F3, F4, TrUserData) ->
    Len = X bsl N + Acc,
    <<Bs:Len/binary, Rest2/binary>> = Rest,
    NewFValue = id(d_msg_RetirementStatus(Bs, TrUserData),
		   TrUserData),
    dfp_read_field_def_Release(Rest2, 0, 0, F1, F2, F3,
			       if F4 =:= '$undef' -> NewFValue;
				  true ->
				      merge_msg_RetirementStatus(F4, NewFValue,
								 TrUserData)
			       end,
			       TrUserData).


skip_varint_Release(<<1:1, _:7, Rest/binary>>, Z1, Z2,
		    F1, F2, F3, F4, TrUserData) ->
    skip_varint_Release(Rest, Z1, Z2, F1, F2, F3, F4,
			TrUserData);
skip_varint_Release(<<0:1, _:7, Rest/binary>>, Z1, Z2,
		    F1, F2, F3, F4, TrUserData) ->
    dfp_read_field_def_Release(Rest, Z1, Z2, F1, F2, F3, F4,
			       TrUserData).


skip_length_delimited_Release(<<1:1, X:7, Rest/binary>>,
			      N, Acc, F1, F2, F3, F4, TrUserData)
    when N < 57 ->
    skip_length_delimited_Release(Rest, N + 7,
				  X bsl N + Acc, F1, F2, F3, F4, TrUserData);
skip_length_delimited_Release(<<0:1, X:7, Rest/binary>>,
			      N, Acc, F1, F2, F3, F4, TrUserData) ->
    Length = X bsl N + Acc,
    <<_:Length/binary, Rest2/binary>> = Rest,
    dfp_read_field_def_Release(Rest2, 0, 0, F1, F2, F3, F4,
			       TrUserData).


skip_group_Release(Bin, FNum, Z2, F1, F2, F3, F4,
		   TrUserData) ->
    {_, Rest} = read_group(Bin, FNum),
    dfp_read_field_def_Release(Rest, 0, Z2, F1, F2, F3, F4,
			       TrUserData).


skip_32_Release(<<_:32, Rest/binary>>, Z1, Z2, F1, F2,
		F3, F4, TrUserData) ->
    dfp_read_field_def_Release(Rest, Z1, Z2, F1, F2, F3, F4,
			       TrUserData).


skip_64_Release(<<_:64, Rest/binary>>, Z1, Z2, F1, F2,
		F3, F4, TrUserData) ->
    dfp_read_field_def_Release(Rest, Z1, Z2, F1, F2, F3, F4,
			       TrUserData).


d_msg_Package(Bin, TrUserData) ->
    dfp_read_field_def_Package(Bin, 0, 0,
			       id([], TrUserData), TrUserData).

dfp_read_field_def_Package(<<10, Rest/binary>>, Z1, Z2,
			   F1, TrUserData) ->
    d_field_Package_releases(Rest, Z1, Z2, F1, TrUserData);
dfp_read_field_def_Package(<<>>, 0, 0, F1,
			   TrUserData) ->
    S1 = #{},
    if F1 == '$undef' -> S1;
       true -> S1#{releases => lists_reverse(F1, TrUserData)}
    end;
dfp_read_field_def_Package(Other, Z1, Z2, F1,
			   TrUserData) ->
    dg_read_field_def_Package(Other, Z1, Z2, F1,
			      TrUserData).

dg_read_field_def_Package(<<1:1, X:7, Rest/binary>>, N,
			  Acc, F1, TrUserData)
    when N < 32 - 7 ->
    dg_read_field_def_Package(Rest, N + 7, X bsl N + Acc,
			      F1, TrUserData);
dg_read_field_def_Package(<<0:1, X:7, Rest/binary>>, N,
			  Acc, F1, TrUserData) ->
    Key = X bsl N + Acc,
    case Key of
      10 ->
	  d_field_Package_releases(Rest, 0, 0, F1, TrUserData);
      _ ->
	  case Key band 7 of
	    0 -> skip_varint_Package(Rest, 0, 0, F1, TrUserData);
	    1 -> skip_64_Package(Rest, 0, 0, F1, TrUserData);
	    2 ->
		skip_length_delimited_Package(Rest, 0, 0, F1,
					      TrUserData);
	    3 ->
		skip_group_Package(Rest, Key bsr 3, 0, F1, TrUserData);
	    5 -> skip_32_Package(Rest, 0, 0, F1, TrUserData)
	  end
    end;
dg_read_field_def_Package(<<>>, 0, 0, F1, TrUserData) ->
    S1 = #{},
    if F1 == '$undef' -> S1;
       true -> S1#{releases => lists_reverse(F1, TrUserData)}
    end.

d_field_Package_releases(<<1:1, X:7, Rest/binary>>, N,
			 Acc, F1, TrUserData)
    when N < 57 ->
    d_field_Package_releases(Rest, N + 7, X bsl N + Acc, F1,
			     TrUserData);
d_field_Package_releases(<<0:1, X:7, Rest/binary>>, N,
			 Acc, F1, TrUserData) ->
    Len = X bsl N + Acc,
    <<Bs:Len/binary, Rest2/binary>> = Rest,
    NewFValue = id(d_msg_Release(Bs, TrUserData),
		   TrUserData),
    dfp_read_field_def_Package(Rest2, 0, 0,
			       cons(NewFValue, F1, TrUserData), TrUserData).


skip_varint_Package(<<1:1, _:7, Rest/binary>>, Z1, Z2,
		    F1, TrUserData) ->
    skip_varint_Package(Rest, Z1, Z2, F1, TrUserData);
skip_varint_Package(<<0:1, _:7, Rest/binary>>, Z1, Z2,
		    F1, TrUserData) ->
    dfp_read_field_def_Package(Rest, Z1, Z2, F1,
			       TrUserData).


skip_length_delimited_Package(<<1:1, X:7, Rest/binary>>,
			      N, Acc, F1, TrUserData)
    when N < 57 ->
    skip_length_delimited_Package(Rest, N + 7,
				  X bsl N + Acc, F1, TrUserData);
skip_length_delimited_Package(<<0:1, X:7, Rest/binary>>,
			      N, Acc, F1, TrUserData) ->
    Length = X bsl N + Acc,
    <<_:Length/binary, Rest2/binary>> = Rest,
    dfp_read_field_def_Package(Rest2, 0, 0, F1, TrUserData).


skip_group_Package(Bin, FNum, Z2, F1, TrUserData) ->
    {_, Rest} = read_group(Bin, FNum),
    dfp_read_field_def_Package(Rest, 0, Z2, F1, TrUserData).


skip_32_Package(<<_:32, Rest/binary>>, Z1, Z2, F1,
		TrUserData) ->
    dfp_read_field_def_Package(Rest, Z1, Z2, F1,
			       TrUserData).


skip_64_Package(<<_:64, Rest/binary>>, Z1, Z2, F1,
		TrUserData) ->
    dfp_read_field_def_Package(Rest, Z1, Z2, F1,
			       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),
    <<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, MsgName) ->
    merge_msgs(Prev, New, MsgName, []).

merge_msgs(Prev, New, MsgName, Opts) ->
    TrUserData = proplists:get_value(user_data, Opts),
    case MsgName of
      'RetirementStatus' ->
	  merge_msg_RetirementStatus(Prev, New, TrUserData);
      'Dependency' ->
	  merge_msg_Dependency(Prev, New, TrUserData);
      'Release' -> merge_msg_Release(Prev, New, TrUserData);
      'Package' -> merge_msg_Package(Prev, New, TrUserData)
    end.

merge_msg_RetirementStatus(#{} = PMsg,
			   #{reason := NFreason} = NMsg, _) ->
    S1 = #{reason => NFreason},
    case {PMsg, NMsg} of
      {_, #{message := NFmessage}} ->
	  S1#{message => NFmessage};
      {#{message := PFmessage}, _} ->
	  S1#{message => PFmessage};
      _ -> S1
    end.

merge_msg_Dependency(#{} = PMsg,
		     #{package := NFpackage, requirement := NFrequirement} =
			 NMsg,
		     _) ->
    S1 = #{package => NFpackage,
	   requirement => NFrequirement},
    S2 = case {PMsg, NMsg} of
	   {_, #{optional := NFoptional}} ->
	       S1#{optional => NFoptional};
	   {#{optional := PFoptional}, _} ->
	       S1#{optional => PFoptional};
	   _ -> S1
	 end,
    S3 = case {PMsg, NMsg} of
	   {_, #{app := NFapp}} -> S2#{app => NFapp};
	   {#{app := PFapp}, _} -> S2#{app => PFapp};
	   _ -> S2
	 end,
    case {PMsg, NMsg} of
      {_, #{repository := NFrepository}} ->
	  S3#{repository => NFrepository};
      {#{repository := PFrepository}, _} ->
	  S3#{repository => PFrepository};
      _ -> S3
    end.

merge_msg_Release(#{} = PMsg,
		  #{version := NFversion, checksum := NFchecksum} = NMsg,
		  TrUserData) ->
    S1 = #{version => NFversion, checksum => NFchecksum},
    S2 = case {PMsg, NMsg} of
	   {#{dependencies := PFdependencies},
	    #{dependencies := NFdependencies}} ->
	       S1#{dependencies =>
		       'erlang_++'(PFdependencies, NFdependencies,
				   TrUserData)};
	   {_, #{dependencies := NFdependencies}} ->
	       S1#{dependencies => NFdependencies};
	   {#{dependencies := PFdependencies}, _} ->
	       S1#{dependencies => PFdependencies};
	   {_, _} -> S1
	 end,
    case {PMsg, NMsg} of
      {#{retired := PFretired}, #{retired := NFretired}} ->
	  S2#{retired =>
		  merge_msg_RetirementStatus(PFretired, NFretired,
					     TrUserData)};
      {_, #{retired := NFretired}} ->
	  S2#{retired => NFretired};
      {#{retired := PFretired}, _} ->
	  S2#{retired => PFretired};
      {_, _} -> S2
    end.

merge_msg_Package(PMsg, NMsg, TrUserData) ->
    S1 = #{},
    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.



verify_msg(Msg, MsgName) ->
    verify_msg(Msg, MsgName, []).

verify_msg(Msg, MsgName, Opts) ->
    TrUserData = proplists:get_value(user_data, Opts),
    case MsgName of
      'RetirementStatus' ->
	  v_msg_RetirementStatus(Msg, ['RetirementStatus'],
				 TrUserData);
      'Dependency' ->
	  v_msg_Dependency(Msg, ['Dependency'], TrUserData);
      'Release' ->
	  v_msg_Release(Msg, ['Release'], TrUserData);
      'Package' ->
	  v_msg_Package(Msg, ['Package'], TrUserData);
      _ -> mk_type_error(not_a_known_message, Msg, [])
    end.


v_msg_RetirementStatus(#{reason := F1} = M, Path, _) ->
    v_enum_RetirementReason(F1, [reason | Path]),
    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, [reason] -- maps:keys(M),
		   'RetirementStatus'},
		  M, Path);
v_msg_RetirementStatus(X, Path, _TrUserData) ->
    mk_type_error({expected_msg, 'RetirementStatus'}, X,
		  Path).

v_msg_Dependency(#{package := F1, requirement := F2} =
		     M,
		 Path, _) ->
    v_type_string(F1, [package | Path]),
    v_type_string(F2, [requirement | Path]),
    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,
		   [package, requirement] -- maps:keys(M), 'Dependency'},
		  M, Path);
v_msg_Dependency(X, Path, _TrUserData) ->
    mk_type_error({expected_msg, 'Dependency'}, X, Path).

v_msg_Release(#{version := F1, checksum := F2} = M,
	      Path, TrUserData) ->
    v_type_string(F1, [version | Path]),
    v_type_bytes(F2, [checksum | Path]),
    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,
		   [version, checksum] -- maps:keys(M), 'Release'},
		  M, Path);
v_msg_Release(X, Path, _TrUserData) ->
    mk_type_error({expected_msg, 'Release'}, X, Path).

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,
    lists:foreach(fun (releases) -> 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_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, 'RetirementStatus'},
      [#{name => reason, fnum => 1, rnum => 2,
	 type => {enum, 'RetirementReason'},
	 occurrence => required, opts => []},
       #{name => message, fnum => 2, rnum => 3, type => string,
	 occurrence => optional, opts => []}]},
     {{msg, 'Dependency'},
      [#{name => package, fnum => 1, rnum => 2,
	 type => string, occurrence => required, opts => []},
       #{name => requirement, fnum => 2, rnum => 3,
	 type => string, occurrence => required, 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 => []}]},
     {{msg, 'Release'},
      [#{name => version, fnum => 1, rnum => 2,
	 type => string, occurrence => required, opts => []},
       #{name => checksum, fnum => 2, rnum => 3, type => bytes,
	 occurrence => required, 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, 'Package'},
      [#{name => releases, fnum => 1, rnum => 2,
	 type => {msg, 'Release'}, occurrence => repeated,
	 opts => []}]}].


get_msg_names() ->
    ['RetirementStatus', 'Dependency', 'Release',
     'Package'].


get_group_names() -> [].


get_msg_or_group_names() ->
    ['RetirementStatus', 'Dependency', 'Release',
     'Package'].


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('RetirementStatus') ->
    [#{name => reason, fnum => 1, rnum => 2,
       type => {enum, 'RetirementReason'},
       occurrence => required, 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 => required, opts => []},
     #{name => requirement, fnum => 2, rnum => 3,
       type => string, occurrence => required, 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('Release') ->
    [#{name => version, fnum => 1, rnum => 2,
       type => string, occurrence => required, opts => []},
     #{name => checksum, fnum => 2, rnum => 3, type => bytes,
       occurrence => required, 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('Package') ->
    [#{name => releases, fnum => 1, rnum => 2,
       type => {msg, 'Release'}, occurrence => repeated,
       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() ->
    "3.28.1".

gpb_version_as_list() ->
    [3,28,1].