Você não pode selecionar mais de 25 tópicos
Os tópicos devem começar com uma letra ou um número, podem incluir traços ('-') e podem ter até 35 caracteres.
550 linhas
14 KiB
550 linhas
14 KiB
-module(test).
|
|
|
|
-include("protoMsg.hrl").
|
|
-compile(export_all).
|
|
|
|
test1() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tbool{bool = true}))).
|
|
|
|
test21() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tint8{int1 = 123, int2 = -22}))).
|
|
|
|
test22() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tuint8{int1 = 123, int2 = 182}))).
|
|
|
|
test31() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tint16{int1 = 12343, int2 = -3422}))).
|
|
test32() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tuint16{int1 = 43244, int2 = 43243}))).
|
|
|
|
test41() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tint32{int1 = 12343434, int2 = -34434322}))).
|
|
test42() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tuint32{int1 = 432444343, int2 = 432443433}))).
|
|
|
|
test51() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tint64{int1 = 12344343434, int2 = -344343434322}))).
|
|
test52() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tuint64{int1 = 4343432444343, int2 = 4324434343433}))).
|
|
|
|
test6() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tinteger{int1 = -1, int2 = 1, int3 = 128, int4 = -128, int5 = -3244232, int6 = 432423432, int7 = -43434343434434, int8 = 432424242434}))).
|
|
|
|
test7() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tnumber{int1 = -1, int2 = 1, int3 = 128, int4 = -128, int5 = -3244232, int6 = 432423432, int7 = -43434343434434, int8 = 432424242434, float1 = -34234343.343, float2 = 43242342342342.434}))).
|
|
|
|
test81() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tfloat{int1 = -34234343.343, int2 = 42342342.434}))).
|
|
test82() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tdouble{int1 = -342343433333.343, int2 = 423423423333.434}))).
|
|
|
|
test9() ->
|
|
protoMsg:decode(iolist_to_binary(protoMsg:encode(#tstring{int1 = "dfdf143242", int2 = "发地方撒发送"}))).
|
|
|
|
allType() ->
|
|
AllType = #allType{
|
|
bool = false
|
|
,int8 = -66
|
|
,uint8 = 66
|
|
,int16 = -666
|
|
,uint16 = 666
|
|
,int32 = -66666
|
|
,uint32 = 66666
|
|
,int64 = -5294967296
|
|
,uint64 = 5294967296
|
|
,inte8 = -88
|
|
,uinte8 = 88
|
|
,inte16 = -8888
|
|
,uinte16 = 8888
|
|
,inte32 = -888888
|
|
,uinte32 = 888888
|
|
,inte64 = -8888888888
|
|
,uinte64 = 8888888888
|
|
,num8 = -99
|
|
,unum8 = 99
|
|
,num16 = -9999
|
|
,unum16 = 9999
|
|
,num32 = -999999
|
|
,unum32 = 999999
|
|
,num64 = -9999999999
|
|
,unum64 = 9999999999
|
|
,numfloat = 999999.99999
|
|
,numdouble = 9999999999.99999
|
|
,float = 123456.789321
|
|
,double = 4300000000.789321
|
|
,string1 = "this is a test!!!!"
|
|
,string2 = "这是一个测试， 等会看结果~！！！"
|
|
,lbool = [true, false, true, false]
|
|
,lint8 = [123, -123, 66, -66, 88, -88]
|
|
,luint8 = [1,2,3,123,67,88]
|
|
,lint16 = [-12345, 12345, 6666, -6666]
|
|
,luint16 = [12345, 12345, 6666, 6666]
|
|
,lint32 = [-12345, 12345, 6666, -6666, -4000000000, 66666666]
|
|
,luint32 = [12345, 12345, 6666, 6666, 4000000000, 66666666]
|
|
,lint64 = [-12345, 12345, -6666, 6666, 400000000000, -66666666666666666]
|
|
,luint64 = [12345, 12345, 6666, 6666, 400000000000, 66666666666666666]
|
|
,linte8 = [123, 12, -66, 66, 34]
|
|
,linte16 = [12334, 12, -6666, 6666, 3412]
|
|
,linte32 = [12334, 12, -666666666, 6666, 3412]
|
|
,linte64 = [12334, 12, -666666666666, 6666, 3412]
|
|
,lnum8 = [123, 12.123, -66.456789, 66, 34]
|
|
,lnum16 = [12334, -12, -6666.6666, 6666, 3412]
|
|
,lnum32 = [12334, 12.7777, -666666666.666777, 6666, 3412]
|
|
,lnum64 = [12334, 12, -666666666666.88888, 6666, 3412.9999]
|
|
,lnfloat32 = [-666666.88888,4434.434, 434.43, 3434]
|
|
,lnfloat64 = [-666666666666.88888,4434.434, 434.43, 11111111111.34343,5566]
|
|
,lfloat = [1.1, 2.2, 3.3, 666666.666]
|
|
,ldouble = [111111111.1, 22222222.2, 3.3, 66666622333333.666]
|
|
,lstring = ["fdsafsdfsfs", "电风扇打法胜多负少的", <<"fdsfasdfsfs">>, <<"大丰收大丰收的方式">>]
|
|
,lunion = [#union{}, #union{type = 1, test = "aaaaa"}, #union{type = 2, test = "嘿嘿嘿嘿"}]
|
|
},
|
|
List = protoMsg:encode(AllType),
|
|
io:format("~p~n",[List]),
|
|
protoMsg:decode(iolist_to_binary(List)).
|
|
|
|
tall1(0) ->
|
|
ok;
|
|
tall1(N) ->
|
|
AllType = #allType{
|
|
bool = false
|
|
,int8 = -66
|
|
,uint8 = 66
|
|
,int16 = -666
|
|
,uint16 = 666
|
|
,int32 = -66666
|
|
,uint32 = 66666
|
|
,int64 = -5294967296
|
|
,uint64 = 5294967296
|
|
,inte8 = -88
|
|
,uinte8 = 88
|
|
,inte16 = -8888
|
|
,uinte16 = 8888
|
|
,inte32 = -888888
|
|
,uinte32 = 888888
|
|
,inte64 = -8888888888
|
|
,uinte64 = 8888888888
|
|
,num8 = -99
|
|
,unum8 = 99
|
|
,num16 = -9999
|
|
,unum16 = 9999
|
|
,num32 = -999999
|
|
,unum32 = 999999
|
|
,num64 = -9999999999
|
|
,unum64 = 9999999999
|
|
,numfloat = 999999.99999
|
|
,numdouble = 9999999999.99999
|
|
,float = 123456.789321
|
|
,double = 4300000000.789321
|
|
,string1 = "this is a test!!!!"
|
|
,string2 = "这是一个测试， 等会看结果~！！！"
|
|
,lbool = [true, false, true, false]
|
|
,lint8 = [123, -123, 66, -66, 88, -88]
|
|
,luint8 = [1,2,3,123,67,88]
|
|
,lint16 = [-12345, 12345, 6666, -6666]
|
|
,luint16 = [12345, 12345, 6666, 6666]
|
|
,lint32 = [-12345, 12345, 6666, -6666, -4000000000, 66666666]
|
|
,luint32 = [12345, 12345, 6666, 6666, 4000000000, 66666666]
|
|
,lint64 = [-12345, 12345, -6666, 6666, 400000000000, -66666666666666666]
|
|
,luint64 = [12345, 12345, 6666, 6666, 400000000000, 66666666666666666]
|
|
,linte8 = [123, 12, -66, 66, 34]
|
|
,linte16 = [12334, 12, -6666, 6666, 3412]
|
|
,linte32 = [12334, 12, -666666666, 6666, 3412]
|
|
,linte64 = [12334, 12, -666666666666, 6666, 3412]
|
|
,lnum8 = [123, 12.123, -66.456789, 66, 34]
|
|
,lnum16 = [12334, -12, -6666.6666, 6666, 3412]
|
|
,lnum32 = [12334, 12.7777, -666666666.666777, 6666, 3412]
|
|
,lnum64 = [12334, 12, -666666666666.88888, 6666, 3412.9999]
|
|
,lnfloat32 = [-666666.88888,4434.434, 434.43, 3434]
|
|
,lnfloat64 = [-666666666666.88888,4434.434, 434.43, 11111111111.34343,5566]
|
|
,lfloat = [1.1, 2.2, 3.3, 666666.666]
|
|
,ldouble = [111111111.1, 22222222.2, 3.3, 66666622333333.666]
|
|
,lstring = ["fdsafsdfsfs", "电风扇打法胜多负少的", <<"fdsfasdfsfs">>, <<"大丰收大丰收的方式">>]
|
|
,lunion = [#union{}, #union{type = 1, test = "aaaaa"}, #union{type = 2, test = "嘿嘿嘿嘿"}]
|
|
},
|
|
%protoMsg:encode(AllType),
|
|
term_to_binary(AllType),
|
|
tall1(N - 1).
|
|
|
|
|
|
tall(N) ->
|
|
AllType = #allType{
|
|
bool = false
|
|
,int8 = -66
|
|
,uint8 = 66
|
|
,int16 = -666
|
|
,uint16 = 666
|
|
,int32 = -66666
|
|
,uint32 = 66666
|
|
,int64 = -5294967296
|
|
,uint64 = 5294967296
|
|
,inte8 = -88
|
|
,uinte8 = 88
|
|
,inte16 = -8888
|
|
,uinte16 = 8888
|
|
,inte32 = -888888
|
|
,uinte32 = 888888
|
|
,inte64 = -8888888888
|
|
,uinte64 = 8888888888
|
|
,num8 = -99
|
|
,unum8 = 99
|
|
,num16 = -9999
|
|
,unum16 = 9999
|
|
,num32 = -999999
|
|
,unum32 = 999999
|
|
,num64 = -9999999999
|
|
,unum64 = 9999999999
|
|
,numfloat = 999999.99999
|
|
,numdouble = 9999999999.99999
|
|
,float = 123456.789321
|
|
,double = 4300000000.789321
|
|
,string1 = "this is a test!!!!"
|
|
,string2 = "这是一个测试， 等会看结果~！！！"
|
|
,lbool = [true, false, true, false]
|
|
,lint8 = [123, -123, 66, -66, 88, -88]
|
|
,luint8 = [1,2,3,123,67,88]
|
|
,lint16 = [-12345, 12345, 6666, -6666]
|
|
,luint16 = [12345, 12345, 6666, 6666]
|
|
,lint32 = [-12345, 12345, 6666, -6666, -4000000000, 66666666]
|
|
,luint32 = [12345, 12345, 6666, 6666, 4000000000, 66666666]
|
|
,lint64 = [-12345, 12345, -6666, 6666, 400000000000, -66666666666666666]
|
|
,luint64 = [12345, 12345, 6666, 6666, 400000000000, 66666666666666666]
|
|
,linte8 = [123, 12, -66, 66, 34]
|
|
,linte16 = [12334, 12, -6666, 6666, 3412]
|
|
,linte32 = [12334, 12, -666666666, 6666, 3412]
|
|
,linte64 = [12334, 12, -666666666666, 6666, 3412]
|
|
,lnum8 = [123, 12.123, -66.456789, 66, 34]
|
|
,lnum16 = [12334, -12, -6666.6666, 6666, 3412]
|
|
,lnum32 = [12334, 12.7777, -666666666.666777, 6666, 3412]
|
|
,lnum64 = [12334, 12, -666666666666.88888, 6666, 3412.9999]
|
|
,lnfloat32 = [-666666.88888,4434.434, 434.43, 3434]
|
|
,lnfloat64 = [-666666666666.88888,4434.434, 434.43, 11111111111.34343,5566]
|
|
,lfloat = [1.1, 2.2, 3.3, 666666.666]
|
|
,ldouble = [111111111.1, 22222222.2, 3.3, 66666622333333.666]
|
|
,lstring = ["fdsafsdfsfs", "电风扇打法胜多负少的", <<"fdsfasdfsfs">>, <<"大丰收大丰收的方式">>]
|
|
,lunion = [#union{}, #union{type = 1, test = "aaaaa"}, #union{type = 2, test = "嘿嘿嘿嘿"}]
|
|
},
|
|
%List = protoMsg:encode(AllType),
|
|
tall(N, term_to_binary(AllType)).
|
|
|
|
tall(0, Bin) ->
|
|
Bin;
|
|
tall(N, Bin) ->
|
|
%protoMsg:decode(Bin),
|
|
binary_to_term(Bin),
|
|
tall(N - 1, Bin).
|
|
|
|
|
|
hh1(0) ->
|
|
ok;
|
|
hh1(N) ->
|
|
A = [tt1,tt2,tt3,tt4,{tet,tt1},{tet, tt2},{tet,tt3}, yyy],
|
|
test(A),
|
|
hh1(N -1).
|
|
|
|
hh2(0) ->
|
|
ok;
|
|
hh2(N) ->
|
|
A = [tt1,tt2,tt3,tt4,{tet,tt1},{tet, tt2},{tet,tt3}, yyy],
|
|
tet(A),
|
|
hh2(N -1).
|
|
|
|
test([]) ->
|
|
ok;
|
|
test([A | T]) ->
|
|
case A of
|
|
tt1 ->
|
|
ok;
|
|
tt2 ->
|
|
ok;
|
|
tt3 ->
|
|
ok;
|
|
tt4 ->
|
|
ok;
|
|
{tet, tt1} ->
|
|
ok;
|
|
{tet, tt2} ->
|
|
ok;
|
|
{tet, tt3} ->
|
|
ok;
|
|
_ ->
|
|
ok
|
|
end,
|
|
test(T).
|
|
|
|
|
|
tet([]) ->
|
|
ok;
|
|
tet([tt1 | T]) ->
|
|
ok,
|
|
tet(T);
|
|
tet([tt2 | T]) ->
|
|
ok,
|
|
tet(T);
|
|
tet([tt3 | T]) ->
|
|
ok,
|
|
tet(T);
|
|
tet([tt4 | T]) ->
|
|
ok,
|
|
tet(T);
|
|
tet([{tet, tt1} | T]) ->
|
|
ok,
|
|
tet(T);
|
|
tet([{tet, tt2} | T]) ->
|
|
ok,
|
|
tet(T);
|
|
tet([{tet, tt3} | T]) ->
|
|
ok,
|
|
tet(T);
|
|
tet([YY | T]) ->
|
|
ok,
|
|
tet(T).
|
|
|
|
tt1(0)->
|
|
AddressBook = #addressBook{
|
|
person = [
|
|
#person{
|
|
name = "Alice",
|
|
id = 10000,
|
|
phone = [
|
|
#phoneNumber{ number = #test{aa = "123456789"} , type = 1 },
|
|
#phoneNumber{ number = #test{aa = "87654321"} , type = 2 }
|
|
]
|
|
},
|
|
#person{
|
|
name = "Bob",
|
|
id = 20000,
|
|
phone = [
|
|
#phoneNumber{number = #test{aa = "01234567890"} , type = 3 }
|
|
]
|
|
}
|
|
]
|
|
},
|
|
Bin = protoMsg:encode(AddressBook);
|
|
tt1(N) ->
|
|
tt1(),
|
|
tt1(N- 1).
|
|
|
|
tt1() ->
|
|
AddressBook = #addressBook{
|
|
person = [
|
|
#person{
|
|
name = "Alice",
|
|
id = 10000,
|
|
phone = [
|
|
#phoneNumber{ number = #test{aa = "123456789"} , type = 1 },
|
|
#phoneNumber{ number = #test{aa = "87654321"} , type = 2 }
|
|
]
|
|
},
|
|
#person{
|
|
name = "Bob",
|
|
id = 20000,
|
|
phone = [
|
|
#phoneNumber{number = #test{aa = "01234567890"} , type = 3 }
|
|
]
|
|
}
|
|
]
|
|
},
|
|
%"others" => [
|
|
% #{
|
|
% "name" => "Carol",
|
|
% "id" => 30000,
|
|
% "phone" => [
|
|
% #{ "number" => #{"aa" => "9876543210"} }
|
|
% ]
|
|
% }
|
|
%]
|
|
%AddressBook = #person{name = "1232134", id = 11111,email = "aaa" ,phone = [#phoneNumber{}] },
|
|
%AddressBook = #phoneNumber{number =#test{aa = "dffsaf"},type = 12 },
|
|
Bin = protoMsg:encode(AddressBook).
|
|
%ok = file:write_file("fff.bin", Bin),
|
|
%print_bin(Bin),
|
|
%Bin = protoCode:encode(AddressBook),
|
|
%ok = file:write_file("fff.bin", Bin),
|
|
%print_bin(Bin),
|
|
%MsgId = protoMsg:getMsgId(element(1, AddressBook)),
|
|
%<<MsgId:16/little, Bin/binary>>.
|
|
|
|
|
|
tt(N) ->
|
|
AddressBook = #addressBook{
|
|
person = [
|
|
#person{
|
|
name = "Alice",
|
|
id = 10000,
|
|
phone = [
|
|
#phoneNumber{ number = #test{aa = "123456789"} , type = 1 },
|
|
#phoneNumber{ number = #test{aa = "87654321"} , type = 2 }
|
|
]
|
|
},
|
|
#person{
|
|
name = "Bob",
|
|
id = 20000,
|
|
phone = [
|
|
#phoneNumber{number = #test{aa = "01234567890"} , type = 3 }
|
|
]
|
|
}
|
|
]
|
|
},
|
|
%"others" => [
|
|
% #{
|
|
% "name" => "Carol",
|
|
% "id" => 30000,
|
|
% "phone" => [
|
|
% #{ "number" => #{"aa" => "9876543210"} }
|
|
% ]
|
|
% }
|
|
%]
|
|
%AddressBook = #person{name = "1232134", id = 11111,email = "aaa" ,phone = [#phoneNumber{}] },
|
|
%AddressBook = #phoneNumber{number =#test{aa = "dffsaf"},type = 12 },
|
|
Bin = protoMsg:encode(AddressBook),
|
|
%ok = file:write_file("fff.bin", Bin),
|
|
%print_bin(Bin),
|
|
tt(N, iolist_to_binary(Bin)).
|
|
tt(0, Bin) ->
|
|
protoMsg:decode(Bin);
|
|
tt(N, Bin) ->
|
|
protoMsg:decode(Bin),
|
|
tt(N-1, Bin).
|
|
|
|
|
|
%{Len, List, RestBin} = protoMsg("AddressBook", Bin),
|
|
%io:format("Len:~p, RestBin:~p~n", [Len, RestBin]),
|
|
%io:format("List:~p~n", [List]),
|
|
%{Map, _, _} = sproto:decode2("AddressBook", Bin),
|
|
%Map.
|
|
|
|
|
|
ttt1(0)->
|
|
AddressBook = #addressBook{
|
|
person = [
|
|
#person{
|
|
name = "Alice",
|
|
id = 10000,
|
|
phone = [
|
|
#phoneNumber{ number = #test{aa = "你好啊 嘿嘿"} , type = 1 },
|
|
#phoneNumber{ number = #test{aa = "87654321"} , type = 2 }
|
|
]
|
|
},
|
|
#person{
|
|
name = "Bob",
|
|
id = 20000,
|
|
phone = [
|
|
#phoneNumber{number = #test{aa = "范德萨地方范德萨发"} , type = 3 }
|
|
]
|
|
}
|
|
]
|
|
},
|
|
term_to_binary(AddressBook);
|
|
ttt1(N) ->
|
|
ttt1(),
|
|
ttt1(N- 1).
|
|
|
|
ttt1() ->
|
|
AddressBook = #addressBook{
|
|
person = [
|
|
#person{
|
|
name = "Alice",
|
|
id = 10000,
|
|
phone = [
|
|
#phoneNumber{ number = #test{aa = "你好啊 嘿嘿"} , type = 1 },
|
|
#phoneNumber{ number = #test{aa = "87654321"} , type = 2 }
|
|
]
|
|
},
|
|
#person{
|
|
name = "Bob",
|
|
id = 20000,
|
|
phone = [
|
|
#phoneNumber{number = #test{aa = "范德萨地方范德萨发"} , type = 3 }
|
|
]
|
|
}
|
|
]
|
|
},
|
|
%"others" => [
|
|
% #{
|
|
% "name" => "Carol",
|
|
% "id" => 30000,
|
|
% "phone" => [
|
|
% #{ "number" => #{"aa" => "9876543210"} }
|
|
% ]
|
|
% }
|
|
%]
|
|
%AddressBook = #person{name = "1232134", id = 11111,email = "aaa" ,phone = [#phoneNumber{}] },
|
|
%AddressBook = #phoneNumber{number =#test{aa = "dffsaf"},type = 12 },
|
|
Bin = term_to_binary(AddressBook).
|
|
%ok = file:write_file("fff.bin", Bin),
|
|
%print_bin(Bin),
|
|
%Bin = protoCode:encode(AddressBook),
|
|
%ok = file:write_file("fff.bin", Bin),
|
|
%print_bin(Bin),
|
|
%MsgId = protoMsg:getMsgId(element(1, AddressBook)),
|
|
%<<MsgId:16/little, Bin/binary>>.
|
|
|
|
|
|
ttt(N) ->
|
|
AddressBook = #addressBook{
|
|
person = [
|
|
#person{
|
|
name = "Alice",
|
|
id = 10000,
|
|
phone = [
|
|
#phoneNumber{ number = #test{aa = "123456789"} , type = 1 },
|
|
#phoneNumber{ number = #test{aa = "87654321"} , type = 2 }
|
|
]
|
|
},
|
|
#person{
|
|
name = "Bob",
|
|
id = 20000,
|
|
phone = [
|
|
#phoneNumber{number = #test{aa = "01234567890"} , type = 3 }
|
|
]
|
|
}
|
|
]
|
|
},
|
|
%"others" => [
|
|
% #{
|
|
% "name" => "Carol",
|
|
% "id" => 30000,
|
|
% "phone" => [
|
|
% #{ "number" => #{"aa" => "9876543210"} }
|
|
% ]
|
|
% }
|
|
%]
|
|
%AddressBook = #person{name = "1232134", id = 11111,email = "aaa" ,phone = [#phoneNumber{}] },
|
|
%AddressBook = #phoneNumber{number =#test{aa = "dffsaf"},type = 12 },
|
|
%ok = file:write_file("fff.bin", Bin),
|
|
%print_bin(Bin),
|
|
ttt(N, term_to_binary(AddressBook)).
|
|
ttt(0, Bin) ->
|
|
binary_to_term(Bin);
|
|
ttt(N, Bin) ->
|
|
binary_to_term(Bin),
|
|
ttt(N-1, Bin).
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
print_bin(Bin) ->
|
|
ByteList = lists:reverse(bin_to_hex(Bin, [])),
|
|
Fun = fun(Byte, Acc) ->
|
|
io:format("~2.16.0b ", [Byte]),
|
|
case Acc rem 8 =:= 0 of
|
|
true -> io:format("~n", []);
|
|
false -> ok
|
|
end,
|
|
Acc + 1
|
|
end,
|
|
lists:foldl(Fun, 1, ByteList),
|
|
io:format("bytes:~p~n", [byte_size(Bin)]).
|
|
|
|
bin_to_hex(<<>>, Acc) ->
|
|
Acc;
|
|
bin_to_hex(Bin, Acc) ->
|
|
<<A:8, Bin2/binary>> = Bin,
|
|
bin_to_hex(Bin2, [A|Acc]).
|