forks/erlang-sqlite3
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Improved large numbers test

Browse Source
This commit is contained in:
Alexey Romanov
2010-11-19 16:59:25 +03:00
parent 864d01aec1
commit 6d9819c7c1
2 changed files with 18 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
c_src/sqlite3_drv.c
View File

@@ -191,11 +191,14 @@ static inline int decode_and_bind_param(
double double_val; double double_val;
char* char_buf_val; char* char_buf_val;
switch (*type) { switch (*type) {
// case ERL_SMALL_INTEGER_EXT:
// ei_decode_long(buffer, index, &long_val);
// result = sqlite3_bind_int(statement, param_index, long_val);
// break;
case ERL_SMALL_INTEGER_EXT: case ERL_SMALL_INTEGER_EXT:
ei_decode_long(buffer, index, &long_val);
result = sqlite3_bind_int(statement, param_index, long_val);
break;
case ERL_INTEGER_EXT: case ERL_INTEGER_EXT:
case ERL_SMALL_BIG_EXT:
case ERL_LARGE_BIG_EXT:
ei_decode_longlong(buffer, index, &int64_val); ei_decode_longlong(buffer, index, &int64_val);
result = sqlite3_bind_int64(statement, param_index, int64_val); result = sqlite3_bind_int64(statement, param_index, int64_val);
break; break;

19
test/sqlite3_test.erl
View File

@@ -30,8 +30,10 @@ drop_table_if_exists(Db, Table) ->
end. end.
rows(SqlExecReply) -> rows(SqlExecReply) ->
[{columns, _Columns}, {rows, Rows}] = SqlExecReply, case SqlExecReply of
Rows. [{columns, _Columns}, {rows, Rows}] -> Rows;
{error, Reason} -> {error, Reason}
end.
all_test_() -> all_test_() ->
{setup, {setup,
@@ -109,10 +111,10 @@ parametrized() ->
sqlite3:sql_exec(ct, "INSERT INTO user1 (id, name) VALUES (?, ?)", [{1, 1}, {2, "john"}]), sqlite3:sql_exec(ct, "INSERT INTO user1 (id, name) VALUES (?, ?)", [{1, 1}, {2, "john"}]),
sqlite3:sql_exec(ct, "INSERT INTO user1 (id, name) VALUES (?3, ?5)", [{3, 2}, {5, "joe"}]), sqlite3:sql_exec(ct, "INSERT INTO user1 (id, name) VALUES (?3, ?5)", [{3, 2}, {5, "joe"}]),
sqlite3:sql_exec(ct, "INSERT INTO user1 (id, name) VALUES (:id, @name)", [{":id", 3}, {'@name', <<"jack">>}]), sqlite3:sql_exec(ct, "INSERT INTO user1 (id, name) VALUES (:id, @name)", [{":id", 3}, {'@name', <<"jack">>}]),
sqlite3:sql_exec(ct, "INSERT INTO user1 (id, name) VALUES (?, ?)", [4, "james"]), sqlite3:sql_exec(ct, "INSERT INTO user1 (id, name) VALUES (?, ?)", [4294967295, "james"]),
?assertEqual( ?assertEqual(
[{columns, ["id", "name"]}, [{columns, ["id", "name"]},
{rows, [{1, <<"john">>}, {2, <<"joe">>}, {3, <<"jack">>}, {4, <<"james">>}]}], {rows, [{1, <<"john">>}, {2, <<"joe">>}, {3, <<"jack">>}, {4294967295, <<"james">>}]}],
sqlite3:read_all(ct, user1)), sqlite3:read_all(ct, user1)),
sqlite3:drop_table(ct, user1), sqlite3:drop_table(ct, user1),
sqlite3:create_table(ct, user1, [{i, integer}, {d, double}, {b, blob}]), sqlite3:create_table(ct, user1, [{i, integer}, {d, double}, {b, blob}]),
@@ -188,10 +190,13 @@ nonexistent_table_info() ->
?assertEqual(table_does_not_exist, sqlite3:table_info(ct, nonexistent)). ?assertEqual(table_does_not_exist, sqlite3:table_info(ct, nonexistent)).
large_number() -> large_number() ->
N1 = 4294967295, N1 = 9223372036854775807,
N2 = (N1 + 1) div 2, N2 = -9223372036854775808,
Query1 = io_lib:format("select ~p, ~p", [N1, N2]), Query1 = io_lib:format("select ~p, ~p", [N1, N2]),
?assertEqual([{N1, N2}], rows(sqlite3:sql_exec(ct, Query1))). ?assertEqual([{N1, N2}], rows(sqlite3:sql_exec(ct, Query1))),
Query2 = "select ?, ?",
?assertEqual([{N1, N2}], rows(sqlite3:sql_exec(ct, Query2, [N1, N2]))),
?assertNot([{N1 + 1, N2 - 1}] == rows(sqlite3:sql_exec(ct, Query2, [N1 + 1, N2 - 1]))).
% create, read, update, delete % create, read, update, delete
%%==================================================================== %%====================================================================