projects
/
euphorik.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
MOD la feuille de style est maintenant prédéfini définit dans le html envoyé
[euphorik.git]
/
modules
/
erl
/
euphorik_bd.erl
diff --git
a/modules/erl/euphorik_bd.erl
b/modules/erl/euphorik_bd.erl
index
91d6f67
..
56b7d7f
100755
(executable)
--- a/
modules/erl/euphorik_bd.erl
+++ b/
modules/erl/euphorik_bd.erl
@@
-33,7
+33,7
@@
% users :
nouveau_user/2,
nouveau_user/3,
% users :
nouveau_user/2,
nouveau_user/3,
- set_profile/
9
,
+ set_profile/
11
,
update_date_derniere_connexion/1,
update_ip/2,
update_pseudo_user/2,
update_date_derniere_connexion/1,
update_ip/2,
update_pseudo_user/2,
@@
-46,6
+46,7
@@
user_by_login_password/2,
user_by_mess/1,
toggle_ek_master/1,
user_by_login_password/2,
user_by_mess/1,
toggle_ek_master/1,
+ css_from_user_cookie/1,
% messages :
nouveau_message/3,
% messages :
nouveau_message/3,
@@
-110,6
+111,10
@@
create_tables() ->
{attributes, record_info(fields, counter)},
{disc_copies, [node()]}
]),
{attributes, record_info(fields, counter)},
{disc_copies, [node()]}
]),
+ mnesia:create_table(proprietes, [
+ {attributes, record_info(fields, proprietes)},
+ {disc_copies, [node()]}
+ ]),
mnesia:create_table(minichat, [
{attributes, record_info(fields, minichat)},
{index, [auteur_id, troll_id]},
mnesia:create_table(minichat, [
{attributes, record_info(fields, minichat)},
{index, [auteur_id, troll_id]},
@@
-154,7
+159,8
@@
reset() ->
mnesia:clear_table(troll),
mnesia:clear_table(ip_table),
\r
% crée l'utilisateur root
\r
mnesia:clear_table(troll),
mnesia:clear_table(ip_table),
\r
% crée l'utilisateur root
\r
- mnesia:transaction(fun() ->
\r
+ mnesia:transaction(fun() ->
+ mnesia:write(#proprietes{nom = version, valeur = ?VERSION_BD}),
\r
User = #user{id = 0, pseudo = "Sys", login = "Sys", date_creation = now(), date_derniere_connexion = now(), ek_master = true},
\r
mnesia:write(User),
\r
User
\r
User = #user{id = 0, pseudo = "Sys", login = "Sys", date_creation = now(), date_derniere_connexion = now(), ek_master = true},
\r
mnesia:write(User),
\r
User
\r
@@
-184,12
+190,12
@@
nouveau_user(Login, Password, Cookie) ->
% Mise à par Cookie les autres peuvent être undefined ce qui veut dire qu'ils ne seront pas modifié.
% Mise à par Cookie les autres peuvent être undefined ce qui veut dire qu'ils ne seront pas modifié.
-set_profile(Cookie, Login, Password, Pseudo, Email, Css, Nick_format, Page_principale, Conversations) ->
+set_profile(Cookie, Login, Password, Pseudo, Email, Css, Nick_format,
View_times, View_tooltips,
Page_principale, Conversations) ->
if Nick_format =:= nick; Nick_format =:= login; Nick_format =:= nick_login ->
resultat_transaction(mnesia:transaction(
fun() ->
case user_by_cookie(Cookie) of
if Nick_format =:= nick; Nick_format =:= login; Nick_format =:= nick_login ->
resultat_transaction(mnesia:transaction(
fun() ->
case user_by_cookie(Cookie) of
- {ok, User} ->
+ {ok, User} ->
case user_by_login(Login) of
{ok, U} when Login =/= [], U#user.id =/= User#user.id ->
login_deja_pris;
case user_by_login(Login) of
{ok, U} when Login =/= [], U#user.id =/= User#user.id ->
login_deja_pris;
@@
-203,6
+209,8
@@
set_profile(Cookie, Login, Password, Pseudo, Email, Css, Nick_format, Page_princ
email = if is_list(Email) -> Email; true -> User#user.email end,
css = if is_list(Css) -> Css; true -> User#user.css end,
nick_format = Nick_format,
email = if is_list(Email) -> Email; true -> User#user.email end,
css = if is_list(Css) -> Css; true -> User#user.css end,
nick_format = Nick_format,
+ view_times = View_times,
+ view_tooltips = View_tooltips,
page_principale = if is_integer(Page_principale), Page_principale > 0 -> Page_principale; true -> User#user.page_principale end,
conversations = if is_list(Conversations) -> Conversations; true -> User#user.conversations end
},
page_principale = if is_integer(Page_principale), Page_principale > 0 -> Page_principale; true -> User#user.page_principale end,
conversations = if is_list(Conversations) -> Conversations; true -> User#user.conversations end
},
@@
-359,7
+367,19
@@
toggle_ek_master(User_id) ->
end
)).
end
)).
+
+% Renvoie une chaine représentant le cookie ou undefined si pas trouvé.
+css_from_user_cookie(Cookie) ->
+ case user_by_cookie(Cookie) of
+ {ok, User} ->
+ User#user.css;
+ _ ->
+ undefined
+ end.
+
+
+
user_by_login_password(Login, Password) ->
resultat_transaction(mnesia:transaction(
fun() ->
user_by_login_password(Login, Password) ->
resultat_transaction(mnesia:transaction(
fun() ->