Chapril/xmpp.chapril.org-ejabberd
24
1
Fork 0
mirror of https://github.com/processone/ejabberd.git synced 2024-06-20 22:22:09 +02:00
Code Releases Activity

Move SQL queries from vcard_odbc to odbc_queries.

Browse Source
This commit is contained in:
Emilio Bustos 2010-03-31 16:33:18 -03:00
parent fd990cf4d8
commit b85b63018d
2 changed files with 19 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/mod_vcard_odbc.erl
View File

@ -474,12 +474,7 @@ search(LServer, Data) ->
[{matches, Val}, ?JUD_MATCHES]),
[" LIMIT ", integer_to_list(?JUD_MATCHES)]
end,
case catch ejabberd_odbc:sql_query(
LServer,
["select username, fn, family, given, middle, "
" nickname, bday, ctry, locality, "
" email, orgname, orgunit from vcard_search ",
MatchSpec, Limit, ";"]) of
case catch odbc_queries:search_vcard(LServer, MatchSpec, Limit) of
{selected, ["username", "fn", "family", "given", "middle",
"nickname", "bday", "ctry", "locality",
"email", "orgname", "orgunit"],
@ -620,7 +615,4 @@ remove_user(User, Server) when is_binary(User), is_binary(Server) ->
LUser = binary_to_list(exmpp_stringprep:nodeprep(User)),
LServer = binary_to_list(exmpp_stringprep:nameprep(Server)),
Username = ejabberd_odbc:escape(LUser),
ejabberd_odbc:sql_transaction(
LServer,
[["delete from vcard where username='", Username, "';"],
["delete from vcard_search where lusername='", Username, "';"]]).
odbc_queries:del_vcard(LServer, Username).

17
src/odbc/odbc_queries.erl
View File

@ -77,6 +77,8 @@
del_privacy_lists/3,
set_vcard/26,
get_vcard/2,
del_vcard/2,
search_vcard/3,
escape/1,
count_records_where/3,
get_roster_version/2,
@ -436,6 +438,21 @@ get_vcard(LServer, Username) ->
["select vcard from vcard "
"where username='", Username, "';"]).
del_vcard(LServer, Username) ->
ejabberd_odbc:sql_transaction(
LServer,
[["delete from vcard where username='", Username, "';"],
["delete from vcard_search where lusername='", Username, "';"]]).
search_vcard(LServer, MatchSpec, Limit) ->
ejabberd_odbc:sql_query(
LServer,
["select username, fn, family, given, middle, "
" nickname, bday, ctry, locality, "
" email, orgname, orgunit from vcard_search ",
MatchSpec, Limit, ";"]).
get_default_privacy_list(LServer, Username) ->
ejabberd_odbc:sql_query(
LServer,