%% -*- coding: utf-8 -*- %% @private %% Automatically generated, do not edit %% Generated by gpb_compile version 4.8.0 -module(aql_pb). -export([encode_msg/1, encode_msg/2, encode_msg/3]). -export([decode_msg/2, decode_msg/3]). -export([merge_msgs/2, merge_msgs/3, merge_msgs/4]). -export([verify_msg/1, verify_msg/2, verify_msg/3]). -export([get_msg_defs/0]). -export([get_msg_names/0]). -export([get_group_names/0]). -export([get_msg_or_group_names/0]). -export([get_enum_names/0]). -export([find_msg_def/1, fetch_msg_def/1]). -export([find_enum_def/1, fetch_enum_def/1]). -export([enum_symbol_by_value/2, enum_value_by_symbol/2]). -export(['enum_symbol_by_value_Request.Type'/1, 'enum_value_by_symbol_Request.Type'/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([fqbin_to_service_name/1]). -export([service_name_to_fqbin/1]). -export([fqbins_to_service_and_rpc_name/2]). -export([service_and_rpc_name_to_fqbins/2]). -export([fqbin_to_msg_name/1]). -export([msg_name_to_fqbin/1]). -export([fqbin_to_enum_name/1]). -export([enum_name_to_fqbin/1]). -export([get_package_name/0]). -export([uses_packages/0]). -export([source_basename/0]). -export([get_all_source_basenames/0]). -export([get_all_proto_names/0]). -export([get_msg_containment/1]). -export([get_pkg_containment/1]). -export([get_service_containment/1]). -export([get_rpc_containment/1]). -export([get_enum_containment/1]). -export([get_proto_by_msg_name_as_fqbin/1]). -export([get_proto_by_service_name_as_fqbin/1]). -export([get_proto_by_enum_name_as_fqbin/1]). -export([get_protos_by_pkg_name_as_fqbin/1]). -export([gpb_version_as_string/0, gpb_version_as_list/0]). -include("aql_pb.hrl"). -include("gpb.hrl"). %% enumerated types -type 'Request.Type'() :: 'QUERY' | 'METADATA' | 'QUERY_AND_METADATA' | 'START_TRANSACTION' | 'COMMIT_TRANSACTION' | 'ABORT_TRANSACTION'. -export_type(['Request.Type'/0]). %% message types -type 'Request'() :: #'Request'{}. -type 'Response'() :: #'Response'{}. -type 'StartTransactionResponse'() :: #'StartTransactionResponse'{}. -type 'ACTransactionResponse'() :: #'ACTransactionResponse'{}. -export_type(['Request'/0, 'Response'/0, 'StartTransactionResponse'/0, 'ACTransactionResponse'/0]). -spec encode_msg( #'Request'{} | #'Response'{} | #'StartTransactionResponse'{} | #'ACTransactionResponse'{} ) -> binary(). encode_msg(Msg) when tuple_size(Msg) >= 1 -> encode_msg(Msg, element(1, Msg), []). -spec encode_msg( #'Request'{} | #'Response'{} | #'StartTransactionResponse'{} | #'ACTransactionResponse'{}, atom() | list() ) -> binary(). encode_msg(Msg, MsgName) when is_atom(MsgName) -> encode_msg(Msg, MsgName, []); encode_msg(Msg, Opts) when tuple_size(Msg) >= 1, is_list(Opts) -> encode_msg(Msg, element(1, Msg), Opts). -spec encode_msg( #'Request'{} | #'Response'{} | #'StartTransactionResponse'{} | #'ACTransactionResponse'{}, atom(), list() ) -> binary(). encode_msg(Msg, MsgName, Opts) -> case proplists:get_bool(verify, Opts) of true -> verify_msg(Msg, MsgName, Opts); false -> ok end, TrUserData = proplists:get_value(user_data, Opts), case MsgName of 'Request' -> encode_msg_Request(id(Msg, TrUserData), TrUserData); 'Response' -> encode_msg_Response(id(Msg, TrUserData), TrUserData); 'StartTransactionResponse' -> encode_msg_StartTransactionResponse( id(Msg, TrUserData), TrUserData ); 'ACTransactionResponse' -> encode_msg_ACTransactionResponse( id(Msg, TrUserData), TrUserData ) end. encode_msg_Request(Msg, TrUserData) -> encode_msg_Request(Msg, <<>>, TrUserData). encode_msg_Request( #'Request'{ type = F1, query = F2, tables = F3, transaction = F4 }, Bin, TrUserData ) -> B1 = if F1 == undefined -> Bin; true -> begin TrF1 = id(F1, TrUserData), if TrF1 =:= 'QUERY'; TrF1 =:= 0 -> Bin; true -> 'e_enum_Request.Type'( TrF1, <>, TrUserData ) end end end, B2 = if F2 == undefined -> B1; true -> begin TrF2 = id(F2, TrUserData), case iolist_size(TrF2) of 0 -> B1; _ -> e_type_bytes(TrF2, <>, TrUserData) end end end, B3 = if F3 == undefined -> B2; true -> begin TrF3 = id(F3, TrUserData), case is_empty_string(TrF3) of true -> B2; false -> e_type_string(TrF3, <>, TrUserData) end end end, if F4 == undefined -> B3; true -> begin TrF4 = id(F4, TrUserData), case iolist_size(TrF4) of 0 -> B3; _ -> e_type_bytes(TrF4, <>, TrUserData) end end end. encode_msg_Response(Msg, TrUserData) -> encode_msg_Response(Msg, <<>>, TrUserData). encode_msg_Response( #'Response'{ query = F1, query_error = F2, metadata = F3, metadata_error = F4 }, Bin, TrUserData ) -> B1 = if F1 == undefined -> Bin; true -> begin TrF1 = id(F1, TrUserData), case iolist_size(TrF1) of 0 -> Bin; _ -> e_type_bytes(TrF1, <>, TrUserData) end end end, B2 = if F2 == undefined -> B1; true -> begin TrF2 = id(F2, TrUserData), case iolist_size(TrF2) of 0 -> B1; _ -> e_type_bytes(TrF2, <>, TrUserData) end end end, B3 = if F3 == undefined -> B2; true -> begin TrF3 = id(F3, TrUserData), case iolist_size(TrF3) of 0 -> B2; _ -> e_type_bytes(TrF3, <>, TrUserData) end end end, if F4 == undefined -> B3; true -> begin TrF4 = id(F4, TrUserData), case iolist_size(TrF4) of 0 -> B3; _ -> e_type_bytes(TrF4, <>, TrUserData) end end end. encode_msg_StartTransactionResponse(Msg, TrUserData) -> encode_msg_StartTransactionResponse( Msg, <<>>, TrUserData ). encode_msg_StartTransactionResponse( #'StartTransactionResponse'{ transaction = F1, transaction_error = F2 }, Bin, TrUserData ) -> B1 = if F1 == undefined -> Bin; true -> begin TrF1 = id(F1, TrUserData), case iolist_size(TrF1) of 0 -> Bin; _ -> e_type_bytes(TrF1, <>, TrUserData) end end end, if F2 == undefined -> B1; true -> begin TrF2 = id(F2, TrUserData), case iolist_size(TrF2) of 0 -> B1; _ -> e_type_bytes(TrF2, <>, TrUserData) end end end. encode_msg_ACTransactionResponse(Msg, TrUserData) -> encode_msg_ACTransactionResponse(Msg, <<>>, TrUserData). encode_msg_ACTransactionResponse( #'ACTransactionResponse'{ ok = F1, error = F2 }, Bin, TrUserData ) -> B1 = if F1 == undefined -> Bin; true -> begin TrF1 = id(F1, TrUserData), if TrF1 =:= false -> Bin; true -> e_type_bool(TrF1, <>, TrUserData) end end end, if F2 == undefined -> B1; true -> begin TrF2 = id(F2, TrUserData), case iolist_size(TrF2) of 0 -> B1; _ -> e_type_bytes(TrF2, <>, TrUserData) end end end. 'e_enum_Request.Type'('QUERY', Bin, _TrUserData) -> <>; 'e_enum_Request.Type'('METADATA', Bin, _TrUserData) -> <>; 'e_enum_Request.Type'( 'QUERY_AND_METADATA', Bin, _TrUserData ) -> <>; 'e_enum_Request.Type'( 'START_TRANSACTION', Bin, _TrUserData ) -> <>; 'e_enum_Request.Type'( 'COMMIT_TRANSACTION', Bin, _TrUserData ) -> <>; 'e_enum_Request.Type'( 'ABORT_TRANSACTION', Bin, _TrUserData ) -> <>; 'e_enum_Request.Type'(V, Bin, _TrUserData) -> e_varint(V, Bin). -compile({nowarn_unused_function, e_type_sint/3}). e_type_sint(Value, Bin, _TrUserData) when Value >= 0 -> e_varint(Value * 2, Bin); e_type_sint(Value, Bin, _TrUserData) -> e_varint(Value * -2 - 1, Bin). -compile({nowarn_unused_function, e_type_int32/3}). e_type_int32(Value, Bin, _TrUserData) when 0 =< Value, Value =< 127 -> <>; e_type_int32(Value, Bin, _TrUserData) -> <> = <>, e_varint(N, Bin). -compile({nowarn_unused_function, e_type_int64/3}). e_type_int64(Value, Bin, _TrUserData) when 0 =< Value, Value =< 127 -> <>; e_type_int64(Value, Bin, _TrUserData) -> <> = <>, e_varint(N, Bin). -compile({nowarn_unused_function, e_type_bool/3}). e_type_bool(true, Bin, _TrUserData) -> <>; e_type_bool(false, Bin, _TrUserData) -> <>; e_type_bool(1, Bin, _TrUserData) -> <>; e_type_bool(0, Bin, _TrUserData) -> <>. -compile({nowarn_unused_function, e_type_string/3}). e_type_string(S, Bin, _TrUserData) -> Utf8 = unicode:characters_to_binary(S), Bin2 = e_varint(byte_size(Utf8), Bin), <>. -compile({nowarn_unused_function, e_type_bytes/3}). e_type_bytes(Bytes, Bin, _TrUserData) when is_binary(Bytes) -> Bin2 = e_varint(byte_size(Bytes), Bin), <>; e_type_bytes(Bytes, Bin, _TrUserData) when is_list(Bytes) -> BytesBin = iolist_to_binary(Bytes), Bin2 = e_varint(byte_size(BytesBin), Bin), <>. -compile({nowarn_unused_function, e_type_fixed32/3}). e_type_fixed32(Value, Bin, _TrUserData) -> <>. -compile({nowarn_unused_function, e_type_sfixed32/3}). e_type_sfixed32(Value, Bin, _TrUserData) -> <>. -compile({nowarn_unused_function, e_type_fixed64/3}). e_type_fixed64(Value, Bin, _TrUserData) -> <>. -compile({nowarn_unused_function, e_type_sfixed64/3}). e_type_sfixed64(Value, Bin, _TrUserData) -> <>. -compile({nowarn_unused_function, e_type_float/3}). e_type_float(V, Bin, _) when is_number(V) -> <>; e_type_float(infinity, Bin, _) -> <>; e_type_float('-infinity', Bin, _) -> <>; e_type_float(nan, Bin, _) -> <>. -compile({nowarn_unused_function, e_type_double/3}). e_type_double(V, Bin, _) when is_number(V) -> <>; e_type_double(infinity, Bin, _) -> <>; e_type_double('-infinity', Bin, _) -> <>; e_type_double(nan, Bin, _) -> <>. -compile({nowarn_unused_function, e_varint/3}). e_varint(N, Bin, _TrUserData) -> e_varint(N, Bin). -compile({nowarn_unused_function, e_varint/2}). e_varint(N, Bin) when N =< 127 -> <>; 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. decode_msg_1_catch(Bin, MsgName, TrUserData) -> try decode_msg_2_doit(MsgName, Bin, TrUserData) catch Class:Reason -> StackTrace = erlang:get_stacktrace(), error({gpb_error, {decoding_failure, {Bin, MsgName, {Class, Reason, StackTrace}}}}) end. -endif. decode_msg_2_doit('Request', Bin, TrUserData) -> id(decode_msg_Request(Bin, TrUserData), TrUserData); decode_msg_2_doit('Response', Bin, TrUserData) -> id(decode_msg_Response(Bin, TrUserData), TrUserData); decode_msg_2_doit( 'StartTransactionResponse', Bin, TrUserData ) -> id( decode_msg_StartTransactionResponse(Bin, TrUserData), TrUserData ); decode_msg_2_doit( 'ACTransactionResponse', Bin, TrUserData ) -> id( decode_msg_ACTransactionResponse(Bin, TrUserData), TrUserData ). decode_msg_Request(Bin, TrUserData) -> dfp_read_field_def_Request( Bin, 0, 0, id('QUERY', TrUserData), id(<<>>, TrUserData), id(<<>>, TrUserData), id(<<>>, TrUserData), TrUserData ). dfp_read_field_def_Request( <<8, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> d_field_Request_type( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ); dfp_read_field_def_Request( <<18, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> d_field_Request_query( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ); dfp_read_field_def_Request( <<26, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> d_field_Request_tables( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ); dfp_read_field_def_Request( <<34, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> d_field_Request_transaction( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ); dfp_read_field_def_Request( <<>>, 0, 0, F@_1, F@_2, F@_3, F@_4, _ ) -> #'Request'{ type = F@_1, query = F@_2, tables = F@_3, transaction = F@_4 }; dfp_read_field_def_Request( Other, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> dg_read_field_def_Request( Other, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ). dg_read_field_def_Request( <<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_Request( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); dg_read_field_def_Request( <<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 8 -> d_field_Request_type( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 18 -> d_field_Request_query( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 26 -> d_field_Request_tables( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 34 -> d_field_Request_transaction( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); _ -> case Key band 7 of 0 -> skip_varint_Request( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 1 -> skip_64_Request( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 2 -> skip_length_delimited_Request( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 3 -> skip_group_Request( Rest, Key bsr 3, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 5 -> skip_32_Request( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ) end end; dg_read_field_def_Request( <<>>, 0, 0, F@_1, F@_2, F@_3, F@_4, _ ) -> #'Request'{ type = F@_1, query = F@_2, tables = F@_3, transaction = F@_4 }. d_field_Request_type( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ) when N < 57 -> d_field_Request_type( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); d_field_Request_type( <<0:1, X:7, Rest/binary>>, N, Acc, _, F@_2, F@_3, F@_4, TrUserData ) -> {NewFValue, RestF} = {id( 'd_enum_Request.Type'(begin <> = <<(X bsl N + Acc):32/unsigned-native>>, id(Res, TrUserData) end), TrUserData ), Rest}, dfp_read_field_def_Request( RestF, 0, 0, NewFValue, F@_2, F@_3, F@_4, TrUserData ). d_field_Request_query( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ) when N < 57 -> d_field_Request_query( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); d_field_Request_query( <<0:1, X:7, Rest/binary>>, N, Acc, F@_1, _, F@_3, F@_4, TrUserData ) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(binary:copy(Bytes), TrUserData), Rest2} end, dfp_read_field_def_Request( RestF, 0, 0, F@_1, NewFValue, F@_3, F@_4, TrUserData ). d_field_Request_tables( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ) when N < 57 -> d_field_Request_tables( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); d_field_Request_tables( <<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, _, F@_4, TrUserData ) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(binary:copy(Bytes), TrUserData), Rest2} end, dfp_read_field_def_Request( RestF, 0, 0, F@_1, F@_2, NewFValue, F@_4, TrUserData ). d_field_Request_transaction( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ) when N < 57 -> d_field_Request_transaction( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); d_field_Request_transaction( <<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, _, TrUserData ) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(binary:copy(Bytes), TrUserData), Rest2} end, dfp_read_field_def_Request( RestF, 0, 0, F@_1, F@_2, F@_3, NewFValue, TrUserData ). skip_varint_Request( <<1:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> skip_varint_Request( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ); skip_varint_Request( <<0:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> dfp_read_field_def_Request( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ). skip_length_delimited_Request( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ) when N < 57 -> skip_length_delimited_Request( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); skip_length_delimited_Request( <<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_Request( Rest2, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ). skip_group_Request( Bin, FNum, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> {_, Rest} = read_group(Bin, FNum), dfp_read_field_def_Request( Rest, 0, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ). skip_32_Request( <<_:32, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> dfp_read_field_def_Request( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ). skip_64_Request( <<_:64, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> dfp_read_field_def_Request( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ). decode_msg_Response(Bin, TrUserData) -> dfp_read_field_def_Response( Bin, 0, 0, id(<<>>, TrUserData), id(<<>>, TrUserData), id(<<>>, TrUserData), id(<<>>, TrUserData), TrUserData ). dfp_read_field_def_Response( <<10, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> d_field_Response_query( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ); dfp_read_field_def_Response( <<18, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> d_field_Response_query_error( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ); dfp_read_field_def_Response( <<26, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> d_field_Response_metadata( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ); dfp_read_field_def_Response( <<34, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> d_field_Response_metadata_error( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ); dfp_read_field_def_Response( <<>>, 0, 0, F@_1, F@_2, F@_3, F@_4, _ ) -> #'Response'{ query = F@_1, query_error = F@_2, metadata = F@_3, metadata_error = F@_4 }; dfp_read_field_def_Response( Other, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> dg_read_field_def_Response( Other, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ). dg_read_field_def_Response( <<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_Response( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); dg_read_field_def_Response( <<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_Response_query( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 18 -> d_field_Response_query_error( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 26 -> d_field_Response_metadata( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 34 -> d_field_Response_metadata_error( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); _ -> case Key band 7 of 0 -> skip_varint_Response( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 1 -> skip_64_Response( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 2 -> skip_length_delimited_Response( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 3 -> skip_group_Response( Rest, Key bsr 3, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ); 5 -> skip_32_Response( Rest, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ) end end; dg_read_field_def_Response( <<>>, 0, 0, F@_1, F@_2, F@_3, F@_4, _ ) -> #'Response'{ query = F@_1, query_error = F@_2, metadata = F@_3, metadata_error = F@_4 }. d_field_Response_query( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ) when N < 57 -> d_field_Response_query( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); d_field_Response_query( <<0:1, X:7, Rest/binary>>, N, Acc, _, F@_2, F@_3, F@_4, TrUserData ) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(binary:copy(Bytes), TrUserData), Rest2} end, dfp_read_field_def_Response( RestF, 0, 0, NewFValue, F@_2, F@_3, F@_4, TrUserData ). d_field_Response_query_error( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ) when N < 57 -> d_field_Response_query_error( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); d_field_Response_query_error( <<0:1, X:7, Rest/binary>>, N, Acc, F@_1, _, F@_3, F@_4, TrUserData ) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(binary:copy(Bytes), TrUserData), Rest2} end, dfp_read_field_def_Response( RestF, 0, 0, F@_1, NewFValue, F@_3, F@_4, TrUserData ). d_field_Response_metadata( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ) when N < 57 -> d_field_Response_metadata( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); d_field_Response_metadata( <<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, _, F@_4, TrUserData ) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(binary:copy(Bytes), TrUserData), Rest2} end, dfp_read_field_def_Response( RestF, 0, 0, F@_1, F@_2, NewFValue, F@_4, TrUserData ). d_field_Response_metadata_error( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ) when N < 57 -> d_field_Response_metadata_error( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); d_field_Response_metadata_error( <<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, _, TrUserData ) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(binary:copy(Bytes), TrUserData), Rest2} end, dfp_read_field_def_Response( RestF, 0, 0, F@_1, F@_2, F@_3, NewFValue, TrUserData ). skip_varint_Response( <<1:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> skip_varint_Response( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ); skip_varint_Response( <<0:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> dfp_read_field_def_Response( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ). skip_length_delimited_Response( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ) when N < 57 -> skip_length_delimited_Response( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, F@_3, F@_4, TrUserData ); skip_length_delimited_Response( <<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_Response( Rest2, 0, 0, F@_1, F@_2, F@_3, F@_4, TrUserData ). skip_group_Response( Bin, FNum, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> {_, Rest} = read_group(Bin, FNum), dfp_read_field_def_Response( Rest, 0, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ). skip_32_Response( <<_:32, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> dfp_read_field_def_Response( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ). skip_64_Response( <<_:64, Rest/binary>>, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ) -> dfp_read_field_def_Response( Rest, Z1, Z2, F@_1, F@_2, F@_3, F@_4, TrUserData ). decode_msg_StartTransactionResponse(Bin, TrUserData) -> dfp_read_field_def_StartTransactionResponse( Bin, 0, 0, id(<<>>, TrUserData), id(<<>>, TrUserData), TrUserData ). dfp_read_field_def_StartTransactionResponse( <<10, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> d_field_StartTransactionResponse_transaction( Rest, Z1, Z2, F@_1, F@_2, TrUserData ); dfp_read_field_def_StartTransactionResponse( <<18, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> d_field_StartTransactionResponse_transaction_error( Rest, Z1, Z2, F@_1, F@_2, TrUserData ); dfp_read_field_def_StartTransactionResponse( <<>>, 0, 0, F@_1, F@_2, _ ) -> #'StartTransactionResponse'{ transaction = F@_1, transaction_error = F@_2 }; dfp_read_field_def_StartTransactionResponse( Other, Z1, Z2, F@_1, F@_2, TrUserData ) -> dg_read_field_def_StartTransactionResponse( Other, Z1, Z2, F@_1, F@_2, TrUserData ). dg_read_field_def_StartTransactionResponse( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData ) when N < 32 - 7 -> dg_read_field_def_StartTransactionResponse( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData ); dg_read_field_def_StartTransactionResponse( <<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData ) -> Key = X bsl N + Acc, case Key of 10 -> d_field_StartTransactionResponse_transaction( Rest, 0, 0, F@_1, F@_2, TrUserData ); 18 -> d_field_StartTransactionResponse_transaction_error( Rest, 0, 0, F@_1, F@_2, TrUserData ); _ -> case Key band 7 of 0 -> skip_varint_StartTransactionResponse( Rest, 0, 0, F@_1, F@_2, TrUserData ); 1 -> skip_64_StartTransactionResponse( Rest, 0, 0, F@_1, F@_2, TrUserData ); 2 -> skip_length_delimited_StartTransactionResponse( Rest, 0, 0, F@_1, F@_2, TrUserData ); 3 -> skip_group_StartTransactionResponse( Rest, Key bsr 3, 0, F@_1, F@_2, TrUserData ); 5 -> skip_32_StartTransactionResponse( Rest, 0, 0, F@_1, F@_2, TrUserData ) end end; dg_read_field_def_StartTransactionResponse( <<>>, 0, 0, F@_1, F@_2, _ ) -> #'StartTransactionResponse'{ transaction = F@_1, transaction_error = F@_2 }. d_field_StartTransactionResponse_transaction( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData ) when N < 57 -> d_field_StartTransactionResponse_transaction( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData ); d_field_StartTransactionResponse_transaction( <<0:1, X:7, Rest/binary>>, N, Acc, _, F@_2, TrUserData ) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(binary:copy(Bytes), TrUserData), Rest2} end, dfp_read_field_def_StartTransactionResponse( RestF, 0, 0, NewFValue, F@_2, TrUserData ). d_field_StartTransactionResponse_transaction_error( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData ) when N < 57 -> d_field_StartTransactionResponse_transaction_error( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData ); d_field_StartTransactionResponse_transaction_error( <<0:1, X:7, Rest/binary>>, N, Acc, F@_1, _, TrUserData ) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(binary:copy(Bytes), TrUserData), Rest2} end, dfp_read_field_def_StartTransactionResponse( RestF, 0, 0, F@_1, NewFValue, TrUserData ). skip_varint_StartTransactionResponse( <<1:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> skip_varint_StartTransactionResponse( Rest, Z1, Z2, F@_1, F@_2, TrUserData ); skip_varint_StartTransactionResponse( <<0:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> dfp_read_field_def_StartTransactionResponse( Rest, Z1, Z2, F@_1, F@_2, TrUserData ). skip_length_delimited_StartTransactionResponse( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData ) when N < 57 -> skip_length_delimited_StartTransactionResponse( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData ); skip_length_delimited_StartTransactionResponse( <<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_StartTransactionResponse( Rest2, 0, 0, F@_1, F@_2, TrUserData ). skip_group_StartTransactionResponse( Bin, FNum, Z2, F@_1, F@_2, TrUserData ) -> {_, Rest} = read_group(Bin, FNum), dfp_read_field_def_StartTransactionResponse( Rest, 0, Z2, F@_1, F@_2, TrUserData ). skip_32_StartTransactionResponse( <<_:32, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> dfp_read_field_def_StartTransactionResponse( Rest, Z1, Z2, F@_1, F@_2, TrUserData ). skip_64_StartTransactionResponse( <<_:64, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> dfp_read_field_def_StartTransactionResponse( Rest, Z1, Z2, F@_1, F@_2, TrUserData ). decode_msg_ACTransactionResponse(Bin, TrUserData) -> dfp_read_field_def_ACTransactionResponse( Bin, 0, 0, id(false, TrUserData), id(<<>>, TrUserData), TrUserData ). dfp_read_field_def_ACTransactionResponse( <<8, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> d_field_ACTransactionResponse_ok( Rest, Z1, Z2, F@_1, F@_2, TrUserData ); dfp_read_field_def_ACTransactionResponse( <<18, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> d_field_ACTransactionResponse_error( Rest, Z1, Z2, F@_1, F@_2, TrUserData ); dfp_read_field_def_ACTransactionResponse( <<>>, 0, 0, F@_1, F@_2, _ ) -> #'ACTransactionResponse'{ok = F@_1, error = F@_2}; dfp_read_field_def_ACTransactionResponse( Other, Z1, Z2, F@_1, F@_2, TrUserData ) -> dg_read_field_def_ACTransactionResponse( Other, Z1, Z2, F@_1, F@_2, TrUserData ). dg_read_field_def_ACTransactionResponse( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData ) when N < 32 - 7 -> dg_read_field_def_ACTransactionResponse( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData ); dg_read_field_def_ACTransactionResponse( <<0:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData ) -> Key = X bsl N + Acc, case Key of 8 -> d_field_ACTransactionResponse_ok( Rest, 0, 0, F@_1, F@_2, TrUserData ); 18 -> d_field_ACTransactionResponse_error( Rest, 0, 0, F@_1, F@_2, TrUserData ); _ -> case Key band 7 of 0 -> skip_varint_ACTransactionResponse( Rest, 0, 0, F@_1, F@_2, TrUserData ); 1 -> skip_64_ACTransactionResponse( Rest, 0, 0, F@_1, F@_2, TrUserData ); 2 -> skip_length_delimited_ACTransactionResponse( Rest, 0, 0, F@_1, F@_2, TrUserData ); 3 -> skip_group_ACTransactionResponse( Rest, Key bsr 3, 0, F@_1, F@_2, TrUserData ); 5 -> skip_32_ACTransactionResponse( Rest, 0, 0, F@_1, F@_2, TrUserData ) end end; dg_read_field_def_ACTransactionResponse( <<>>, 0, 0, F@_1, F@_2, _ ) -> #'ACTransactionResponse'{ok = F@_1, error = F@_2}. d_field_ACTransactionResponse_ok( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData ) when N < 57 -> d_field_ACTransactionResponse_ok( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData ); d_field_ACTransactionResponse_ok( <<0:1, X:7, Rest/binary>>, N, Acc, _, F@_2, TrUserData ) -> {NewFValue, RestF} = {id( X bsl N + Acc =/= 0, TrUserData ), Rest}, dfp_read_field_def_ACTransactionResponse( RestF, 0, 0, NewFValue, F@_2, TrUserData ). d_field_ACTransactionResponse_error( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData ) when N < 57 -> d_field_ACTransactionResponse_error( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData ); d_field_ACTransactionResponse_error( <<0:1, X:7, Rest/binary>>, N, Acc, F@_1, _, TrUserData ) -> {NewFValue, RestF} = begin Len = X bsl N + Acc, <> = Rest, {id(binary:copy(Bytes), TrUserData), Rest2} end, dfp_read_field_def_ACTransactionResponse( RestF, 0, 0, F@_1, NewFValue, TrUserData ). skip_varint_ACTransactionResponse( <<1:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> skip_varint_ACTransactionResponse( Rest, Z1, Z2, F@_1, F@_2, TrUserData ); skip_varint_ACTransactionResponse( <<0:1, _:7, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> dfp_read_field_def_ACTransactionResponse( Rest, Z1, Z2, F@_1, F@_2, TrUserData ). skip_length_delimited_ACTransactionResponse( <<1:1, X:7, Rest/binary>>, N, Acc, F@_1, F@_2, TrUserData ) when N < 57 -> skip_length_delimited_ACTransactionResponse( Rest, N + 7, X bsl N + Acc, F@_1, F@_2, TrUserData ); skip_length_delimited_ACTransactionResponse( <<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_ACTransactionResponse( Rest2, 0, 0, F@_1, F@_2, TrUserData ). skip_group_ACTransactionResponse( Bin, FNum, Z2, F@_1, F@_2, TrUserData ) -> {_, Rest} = read_group(Bin, FNum), dfp_read_field_def_ACTransactionResponse( Rest, 0, Z2, F@_1, F@_2, TrUserData ). skip_32_ACTransactionResponse( <<_:32, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> dfp_read_field_def_ACTransactionResponse( Rest, Z1, Z2, F@_1, F@_2, TrUserData ). skip_64_ACTransactionResponse( <<_:64, Rest/binary>>, Z1, Z2, F@_1, F@_2, TrUserData ) -> dfp_read_field_def_ACTransactionResponse( Rest, Z1, Z2, F@_1, F@_2, TrUserData ). 'd_enum_Request.Type'(0) -> 'QUERY'; 'd_enum_Request.Type'(1) -> 'METADATA'; 'd_enum_Request.Type'(2) -> 'QUERY_AND_METADATA'; 'd_enum_Request.Type'(3) -> 'START_TRANSACTION'; 'd_enum_Request.Type'(4) -> 'COMMIT_TRANSACTION'; 'd_enum_Request.Type'(5) -> 'ABORT_TRANSACTION'; 'd_enum_Request.Type'(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 % 4 = group_end {FieldNum, 4} -> {NumBytes, TagLen1}; % 0 = varint {_, 0} -> read_gr_vi(Tl, 0, NumBytes + TagLen1, FieldNum); % 1 = bits64 {_, 1} -> <<_:64, Tl2/binary>> = Tl, read_gr_b(Tl2, 0, 0, NumBytes + TagLen1 + 8, 0, FieldNum); % 2 = length_delimited {_, 2} -> read_gr_ld(Tl, 0, 0, NumBytes + TagLen1, FieldNum); % 3 = group_start {_, 3} -> read_gr_b(Tl, 0, 0, NumBytes + TagLen1, 0, FieldNum); % 4 = group_end {_, 4} -> read_gr_b(Tl, 0, 0, NumBytes + TagLen1, 0, FieldNum); % 5 = bits32 {_, 5} -> <<_:32, Tl2/binary>> = Tl, read_gr_b(Tl2, 0, 0, NumBytes + TagLen1 + 4, 0, FieldNum) end. read_gr_vi(<<1:1, _:7, Tl/binary>>, N, NumBytes, FieldNum) when N < (64 - 7) -> read_gr_vi(Tl, N + 7, NumBytes + 1, FieldNum); read_gr_vi(<<0:1, _:7, Tl/binary>>, _, NumBytes, FieldNum) -> read_gr_b(Tl, 0, 0, NumBytes + 1, 0, FieldNum). read_gr_ld(<<1:1, X:7, Tl/binary>>, N, Acc, NumBytes, FieldNum) when N < (64 - 7) -> read_gr_ld(Tl, N + 7, X bsl N + Acc, NumBytes + 1, FieldNum); read_gr_ld(<<0:1, X:7, Tl/binary>>, N, Acc, NumBytes, FieldNum) -> Len = X bsl N + Acc, NumBytes1 = NumBytes + 1, <<_:Len/binary, Tl2/binary>> = Tl, read_gr_b(Tl2, 0, 0, NumBytes1 + Len, 0, FieldNum). merge_msgs(Prev, New) when element(1, Prev) =:= element(1, New) -> merge_msgs(Prev, New, element(1, Prev), []). merge_msgs(Prev, New, MsgName) when is_atom(MsgName) -> merge_msgs(Prev, New, MsgName, []); merge_msgs(Prev, New, Opts) when element(1, Prev) =:= element(1, New), is_list(Opts) -> merge_msgs(Prev, New, element(1, Prev), Opts). merge_msgs(Prev, New, MsgName, Opts) -> TrUserData = proplists:get_value(user_data, Opts), case MsgName of 'Request' -> merge_msg_Request(Prev, New, TrUserData); 'Response' -> merge_msg_Response(Prev, New, TrUserData); 'StartTransactionResponse' -> merge_msg_StartTransactionResponse( Prev, New, TrUserData ); 'ACTransactionResponse' -> merge_msg_ACTransactionResponse(Prev, New, TrUserData) end. -compile({nowarn_unused_function, merge_msg_Request/3}). merge_msg_Request( #'Request'{ type = PFtype, query = PFquery, tables = PFtables, transaction = PFtransaction }, #'Request'{ type = NFtype, query = NFquery, tables = NFtables, transaction = NFtransaction }, _ ) -> #'Request'{ type = if NFtype =:= undefined -> PFtype; true -> NFtype end, query = if NFquery =:= undefined -> PFquery; true -> NFquery end, tables = if NFtables =:= undefined -> PFtables; true -> NFtables end, transaction = if NFtransaction =:= undefined -> PFtransaction; true -> NFtransaction end }. -compile({nowarn_unused_function, merge_msg_Response/3}). merge_msg_Response( #'Response'{ query = PFquery, query_error = PFquery_error, metadata = PFmetadata, metadata_error = PFmetadata_error }, #'Response'{ query = NFquery, query_error = NFquery_error, metadata = NFmetadata, metadata_error = NFmetadata_error }, _ ) -> #'Response'{ query = if NFquery =:= undefined -> PFquery; true -> NFquery end, query_error = if NFquery_error =:= undefined -> PFquery_error; true -> NFquery_error end, metadata = if NFmetadata =:= undefined -> PFmetadata; true -> NFmetadata end, metadata_error = if NFmetadata_error =:= undefined -> PFmetadata_error; true -> NFmetadata_error end }. -compile({nowarn_unused_function, merge_msg_StartTransactionResponse/3}). merge_msg_StartTransactionResponse( #'StartTransactionResponse'{ transaction = PFtransaction, transaction_error = PFtransaction_error }, #'StartTransactionResponse'{ transaction = NFtransaction, transaction_error = NFtransaction_error }, _ ) -> #'StartTransactionResponse'{ transaction = if NFtransaction =:= undefined -> PFtransaction; true -> NFtransaction end, transaction_error = if NFtransaction_error =:= undefined -> PFtransaction_error; true -> NFtransaction_error end }. -compile({nowarn_unused_function, merge_msg_ACTransactionResponse/3}). merge_msg_ACTransactionResponse( #'ACTransactionResponse'{ ok = PFok, error = PFerror }, #'ACTransactionResponse'{ ok = NFok, error = NFerror }, _ ) -> #'ACTransactionResponse'{ ok = if NFok =:= undefined -> PFok; true -> NFok end, error = if NFerror =:= undefined -> PFerror; true -> NFerror end }. verify_msg(Msg) when tuple_size(Msg) >= 1 -> verify_msg(Msg, element(1, Msg), []); verify_msg(X) -> mk_type_error(not_a_known_message, X, []). verify_msg(Msg, MsgName) when is_atom(MsgName) -> verify_msg(Msg, MsgName, []); verify_msg(Msg, Opts) when tuple_size(Msg) >= 1 -> verify_msg(Msg, element(1, Msg), Opts); verify_msg(X, _Opts) -> mk_type_error(not_a_known_message, X, []). verify_msg(Msg, MsgName, Opts) -> TrUserData = proplists:get_value(user_data, Opts), case MsgName of 'Request' -> v_msg_Request(Msg, [MsgName], TrUserData); 'Response' -> v_msg_Response(Msg, [MsgName], TrUserData); 'StartTransactionResponse' -> v_msg_StartTransactionResponse( Msg, [MsgName], TrUserData ); 'ACTransactionResponse' -> v_msg_ACTransactionResponse(Msg, [MsgName], TrUserData); _ -> mk_type_error(not_a_known_message, Msg, []) end. -compile({nowarn_unused_function, v_msg_Request/3}). -dialyzer({nowarn_function, v_msg_Request/3}). v_msg_Request( #'Request'{ type = F1, query = F2, tables = F3, transaction = F4 }, Path, TrUserData ) -> if F1 == undefined -> ok; true -> 'v_enum_Request.Type'(F1, [type | Path], TrUserData) end, if F2 == undefined -> ok; true -> v_type_bytes(F2, [query | Path], TrUserData) end, if F3 == undefined -> ok; true -> v_type_string(F3, [tables | Path], TrUserData) end, if F4 == undefined -> ok; true -> v_type_bytes(F4, [transaction | Path], TrUserData) end, ok; v_msg_Request(X, Path, _TrUserData) -> mk_type_error({expected_msg, 'Request'}, X, Path). -compile({nowarn_unused_function, v_msg_Response/3}). -dialyzer({nowarn_function, v_msg_Response/3}). v_msg_Response( #'Response'{ query = F1, query_error = F2, metadata = F3, metadata_error = F4 }, Path, TrUserData ) -> if F1 == undefined -> ok; true -> v_type_bytes(F1, [query | Path], TrUserData) end, if F2 == undefined -> ok; true -> v_type_bytes(F2, [query_error | Path], TrUserData) end, if F3 == undefined -> ok; true -> v_type_bytes(F3, [metadata | Path], TrUserData) end, if F4 == undefined -> ok; true -> v_type_bytes(F4, [metadata_error | Path], TrUserData) end, ok; v_msg_Response(X, Path, _TrUserData) -> mk_type_error({expected_msg, 'Response'}, X, Path). -compile({nowarn_unused_function, v_msg_StartTransactionResponse/3}). -dialyzer({nowarn_function, v_msg_StartTransactionResponse/3}). v_msg_StartTransactionResponse( #'StartTransactionResponse'{ transaction = F1, transaction_error = F2 }, Path, TrUserData ) -> if F1 == undefined -> ok; true -> v_type_bytes(F1, [transaction | Path], TrUserData) end, if F2 == undefined -> ok; true -> v_type_bytes(F2, [transaction_error | Path], TrUserData) end, ok; v_msg_StartTransactionResponse(X, Path, _TrUserData) -> mk_type_error( {expected_msg, 'StartTransactionResponse'}, X, Path ). -compile({nowarn_unused_function, v_msg_ACTransactionResponse/3}). -dialyzer({nowarn_function, v_msg_ACTransactionResponse/3}). v_msg_ACTransactionResponse( #'ACTransactionResponse'{ ok = F1, error = F2 }, Path, TrUserData ) -> if F1 == undefined -> ok; true -> v_type_bool(F1, [ok | Path], TrUserData) end, if F2 == undefined -> ok; true -> v_type_bytes(F2, [error | Path], TrUserData) end, ok; v_msg_ACTransactionResponse(X, Path, _TrUserData) -> mk_type_error( {expected_msg, 'ACTransactionResponse'}, X, Path ). -compile({nowarn_unused_function, 'v_enum_Request.Type'/3}). -dialyzer({nowarn_function, 'v_enum_Request.Type'/3}). 'v_enum_Request.Type'('QUERY', _Path, _TrUserData) -> ok; 'v_enum_Request.Type'('METADATA', _Path, _TrUserData) -> ok; 'v_enum_Request.Type'( 'QUERY_AND_METADATA', _Path, _TrUserData ) -> ok; 'v_enum_Request.Type'( 'START_TRANSACTION', _Path, _TrUserData ) -> ok; 'v_enum_Request.Type'( 'COMMIT_TRANSACTION', _Path, _TrUserData ) -> ok; 'v_enum_Request.Type'( 'ABORT_TRANSACTION', _Path, _TrUserData ) -> ok; 'v_enum_Request.Type'(V, Path, TrUserData) when is_integer(V) -> v_type_sint32(V, Path, TrUserData); 'v_enum_Request.Type'(X, Path, _TrUserData) -> mk_type_error({invalid_enum, 'Request.Type'}, X, Path). -compile({nowarn_unused_function, v_type_sint32/3}). -dialyzer({nowarn_function, v_type_sint32/3}). v_type_sint32(N, _Path, _TrUserData) when -2147483648 =< N, N =< 2147483647 -> ok; v_type_sint32(N, Path, _TrUserData) when is_integer(N) -> mk_type_error( {value_out_of_range, sint32, signed, 32}, N, Path ); v_type_sint32(X, Path, _TrUserData) -> mk_type_error( {bad_integer, sint32, signed, 32}, X, Path ). -compile({nowarn_unused_function, v_type_bool/3}). -dialyzer({nowarn_function, v_type_bool/3}). v_type_bool(false, _Path, _TrUserData) -> ok; v_type_bool(true, _Path, _TrUserData) -> ok; v_type_bool(0, _Path, _TrUserData) -> ok; v_type_bool(1, _Path, _TrUserData) -> ok; v_type_bool(X, Path, _TrUserData) -> mk_type_error(bad_boolean_value, X, Path). -compile({nowarn_unused_function, v_type_string/3}). -dialyzer({nowarn_function, v_type_string/3}). v_type_string(S, Path, _TrUserData) when is_list(S); is_binary(S) -> try unicode:characters_to_binary(S) of B when is_binary(B) -> ok; {error, _, _} -> mk_type_error(bad_unicode_string, S, Path) catch error:badarg -> mk_type_error(bad_unicode_string, S, Path) end; v_type_string(X, Path, _TrUserData) -> mk_type_error(bad_unicode_string, X, Path). -compile({nowarn_unused_function, v_type_bytes/3}). -dialyzer({nowarn_function, v_type_bytes/3}). v_type_bytes(B, _Path, _TrUserData) when is_binary(B) -> ok; v_type_bytes(B, _Path, _TrUserData) when is_list(B) -> ok; v_type_bytes(X, Path, _TrUserData) -> mk_type_error(bad_binary_value, X, Path). -compile({nowarn_unused_function, mk_type_error/3}). -spec mk_type_error(_, _, list()) -> no_return(). mk_type_error(Error, ValueSeen, Path) -> Path2 = prettify_path(Path), erlang:error({gpb_type_error, {Error, [{value, ValueSeen}, {path, Path2}]}}). -compile({nowarn_unused_function, prettify_path/1}). -dialyzer({nowarn_function, prettify_path/1}). prettify_path([]) -> top_level; prettify_path(PathR) -> list_to_atom( lists:append( lists:join( ".", lists:map( fun atom_to_list/1, lists:reverse(PathR) ) ) ) ). -compile({nowarn_unused_function, id/2}). -compile({inline, id/2}). id(X, _TrUserData) -> X. -compile({nowarn_unused_function, v_ok/3}). -compile({inline, v_ok/3}). v_ok(_Value, _Path, _TrUserData) -> ok. -compile({nowarn_unused_function, m_overwrite/3}). -compile({inline, m_overwrite/3}). m_overwrite(_Prev, New, _TrUserData) -> New. -compile({nowarn_unused_function, cons/3}). -compile({inline, cons/3}). cons(Elem, Acc, _TrUserData) -> [Elem | Acc]. -compile({nowarn_unused_function, lists_reverse/2}). -compile({inline, lists_reverse/2}). 'lists_reverse'(L, _TrUserData) -> lists:reverse(L). -compile({nowarn_unused_function, 'erlang_++'/3}). -compile({inline, 'erlang_++'/3}). 'erlang_++'(A, B, _TrUserData) -> A ++ B. get_msg_defs() -> [ {{enum, 'Request.Type'}, [ {'QUERY', 0}, {'METADATA', 1}, {'QUERY_AND_METADATA', 2}, {'START_TRANSACTION', 3}, {'COMMIT_TRANSACTION', 4}, {'ABORT_TRANSACTION', 5} ]}, {{msg, 'Request'}, [ #field{ name = type, fnum = 1, rnum = 2, type = {enum, 'Request.Type'}, occurrence = optional, opts = [] }, #field{ name = query, fnum = 2, rnum = 3, type = bytes, occurrence = optional, opts = [] }, #field{ name = tables, fnum = 3, rnum = 4, type = string, occurrence = optional, opts = [] }, #field{ name = transaction, fnum = 4, rnum = 5, type = bytes, occurrence = optional, opts = [] } ]}, {{msg, 'Response'}, [ #field{ name = query, fnum = 1, rnum = 2, type = bytes, occurrence = optional, opts = [] }, #field{ name = query_error, fnum = 2, rnum = 3, type = bytes, occurrence = optional, opts = [] }, #field{ name = metadata, fnum = 3, rnum = 4, type = bytes, occurrence = optional, opts = [] }, #field{ name = metadata_error, fnum = 4, rnum = 5, type = bytes, occurrence = optional, opts = [] } ]}, {{msg, 'StartTransactionResponse'}, [ #field{ name = transaction, fnum = 1, rnum = 2, type = bytes, occurrence = optional, opts = [] }, #field{ name = transaction_error, fnum = 2, rnum = 3, type = bytes, occurrence = optional, opts = [] } ]}, {{msg, 'ACTransactionResponse'}, [ #field{ name = ok, fnum = 1, rnum = 2, type = bool, occurrence = optional, opts = [] }, #field{ name = error, fnum = 2, rnum = 3, type = bytes, occurrence = optional, opts = [] } ]} ]. get_msg_names() -> [ 'Request', 'Response', 'StartTransactionResponse', 'ACTransactionResponse' ]. get_group_names() -> []. get_msg_or_group_names() -> [ 'Request', 'Response', 'StartTransactionResponse', 'ACTransactionResponse' ]. get_enum_names() -> ['Request.Type']. 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('Request') -> [ #field{ name = type, fnum = 1, rnum = 2, type = {enum, 'Request.Type'}, occurrence = optional, opts = [] }, #field{ name = query, fnum = 2, rnum = 3, type = bytes, occurrence = optional, opts = [] }, #field{ name = tables, fnum = 3, rnum = 4, type = string, occurrence = optional, opts = [] }, #field{ name = transaction, fnum = 4, rnum = 5, type = bytes, occurrence = optional, opts = [] } ]; find_msg_def('Response') -> [ #field{ name = query, fnum = 1, rnum = 2, type = bytes, occurrence = optional, opts = [] }, #field{ name = query_error, fnum = 2, rnum = 3, type = bytes, occurrence = optional, opts = [] }, #field{ name = metadata, fnum = 3, rnum = 4, type = bytes, occurrence = optional, opts = [] }, #field{ name = metadata_error, fnum = 4, rnum = 5, type = bytes, occurrence = optional, opts = [] } ]; find_msg_def('StartTransactionResponse') -> [ #field{ name = transaction, fnum = 1, rnum = 2, type = bytes, occurrence = optional, opts = [] }, #field{ name = transaction_error, fnum = 2, rnum = 3, type = bytes, occurrence = optional, opts = [] } ]; find_msg_def('ACTransactionResponse') -> [ #field{ name = ok, fnum = 1, rnum = 2, type = bool, occurrence = optional, opts = [] }, #field{ name = error, fnum = 2, rnum = 3, type = bytes, occurrence = optional, opts = [] } ]; find_msg_def(_) -> error. find_enum_def('Request.Type') -> [ {'QUERY', 0}, {'METADATA', 1}, {'QUERY_AND_METADATA', 2}, {'START_TRANSACTION', 3}, {'COMMIT_TRANSACTION', 4}, {'ABORT_TRANSACTION', 5} ]; find_enum_def(_) -> error. enum_symbol_by_value('Request.Type', Value) -> 'enum_symbol_by_value_Request.Type'(Value). enum_value_by_symbol('Request.Type', Sym) -> 'enum_value_by_symbol_Request.Type'(Sym). 'enum_symbol_by_value_Request.Type'(0) -> 'QUERY'; 'enum_symbol_by_value_Request.Type'(1) -> 'METADATA'; 'enum_symbol_by_value_Request.Type'(2) -> 'QUERY_AND_METADATA'; 'enum_symbol_by_value_Request.Type'(3) -> 'START_TRANSACTION'; 'enum_symbol_by_value_Request.Type'(4) -> 'COMMIT_TRANSACTION'; 'enum_symbol_by_value_Request.Type'(5) -> 'ABORT_TRANSACTION'. 'enum_value_by_symbol_Request.Type'('QUERY') -> 0; 'enum_value_by_symbol_Request.Type'('METADATA') -> 1; 'enum_value_by_symbol_Request.Type'('QUERY_AND_METADATA') -> 2; 'enum_value_by_symbol_Request.Type'('START_TRANSACTION') -> 3; 'enum_value_by_symbol_Request.Type'('COMMIT_TRANSACTION') -> 4; 'enum_value_by_symbol_Request.Type'('ABORT_TRANSACTION') -> 5. get_service_names() -> []. get_service_def(_) -> error. get_rpc_names(_) -> error. find_rpc_def(_, _) -> error. -spec fetch_rpc_def(_, _) -> no_return(). fetch_rpc_def(ServiceName, RpcName) -> erlang:error({no_such_rpc, ServiceName, RpcName}). %% Convert a a fully qualified (ie with package name) service name %% as a binary to a service name as an atom. -spec fqbin_to_service_name(_) -> no_return(). fqbin_to_service_name(X) -> error({gpb_error, {badservice, X}}). %% Convert a service name as an atom to a fully qualified %% (ie with package name) name as a binary. -spec service_name_to_fqbin(_) -> no_return(). service_name_to_fqbin(X) -> error({gpb_error, {badservice, X}}). %% Convert a a fully qualified (ie with package name) service name %% and an rpc name, both as binaries to a service name and an rpc %% name, as atoms. -spec fqbins_to_service_and_rpc_name(_, _) -> no_return(). fqbins_to_service_and_rpc_name(S, R) -> error({gpb_error, {badservice_or_rpc, {S, R}}}). %% Convert a service name and an rpc name, both as atoms, %% to a fully qualified (ie with package name) service name and %% an rpc name as binaries. -spec service_and_rpc_name_to_fqbins(_, _) -> no_return(). service_and_rpc_name_to_fqbins(S, R) -> error({gpb_error, {badservice_or_rpc, {S, R}}}). fqbin_to_msg_name(<<"Request">>) -> 'Request'; fqbin_to_msg_name(<<"Response">>) -> 'Response'; fqbin_to_msg_name(<<"StartTransactionResponse">>) -> 'StartTransactionResponse'; fqbin_to_msg_name(<<"ACTransactionResponse">>) -> 'ACTransactionResponse'; fqbin_to_msg_name(E) -> error({gpb_error, {badmsg, E}}). msg_name_to_fqbin('Request') -> <<"Request">>; msg_name_to_fqbin('Response') -> <<"Response">>; msg_name_to_fqbin('StartTransactionResponse') -> <<"StartTransactionResponse">>; msg_name_to_fqbin('ACTransactionResponse') -> <<"ACTransactionResponse">>; msg_name_to_fqbin(E) -> error({gpb_error, {badmsg, E}}). fqbin_to_enum_name(<<"Request.Type">>) -> 'Request.Type'; fqbin_to_enum_name(E) -> error({gpb_error, {badenum, E}}). enum_name_to_fqbin('Request.Type') -> <<"Request.Type">>; enum_name_to_fqbin(E) -> error({gpb_error, {badenum, E}}). get_package_name() -> undefined. %% Whether or not the message names %% are prepended with package name or not. uses_packages() -> false. source_basename() -> "aql.proto". %% Retrieve all proto file names, also imported ones. %% The order is top-down. The first element is always the main %% source file. The files are returned with extension, %% see get_all_proto_names/0 for a version that returns %% the basenames sans extension get_all_source_basenames() -> ["aql.proto"]. %% Retrieve all proto file names, also imported ones. %% The order is top-down. The first element is always the main %% source file. The files are returned sans .proto extension, %% to make it easier to use them with the various get_xyz_containment %% functions. get_all_proto_names() -> ["aql"]. get_msg_containment("aql") -> [ 'ACTransactionResponse', 'Request', 'Response', 'StartTransactionResponse' ]; get_msg_containment(P) -> error({gpb_error, {badproto, P}}). get_pkg_containment("aql") -> undefined; get_pkg_containment(P) -> error({gpb_error, {badproto, P}}). get_service_containment("aql") -> []; get_service_containment(P) -> error({gpb_error, {badproto, P}}). get_rpc_containment("aql") -> []; get_rpc_containment(P) -> error({gpb_error, {badproto, P}}). get_enum_containment("aql") -> ['Request.Type']; get_enum_containment(P) -> error({gpb_error, {badproto, P}}). get_proto_by_msg_name_as_fqbin(<<"Request">>) -> "aql"; get_proto_by_msg_name_as_fqbin(<<"StartTransactionResponse">>) -> "aql"; get_proto_by_msg_name_as_fqbin(<<"Response">>) -> "aql"; get_proto_by_msg_name_as_fqbin(<<"ACTransactionResponse">>) -> "aql"; get_proto_by_msg_name_as_fqbin(E) -> error({gpb_error, {badmsg, E}}). -spec get_proto_by_service_name_as_fqbin(_) -> no_return(). get_proto_by_service_name_as_fqbin(E) -> error({gpb_error, {badservice, E}}). get_proto_by_enum_name_as_fqbin(<<"Request.Type">>) -> "aql"; get_proto_by_enum_name_as_fqbin(E) -> error({gpb_error, {badenum, E}}). -spec get_protos_by_pkg_name_as_fqbin(_) -> no_return(). get_protos_by_pkg_name_as_fqbin(E) -> error({gpb_error, {badpkg, E}}). gpb_version_as_string() -> "4.8.0". gpb_version_as_list() -> [4, 8, 0].