\r
this.cookie = null
this.regexCookie = new RegExp("^cookie=([^;]*)")
- \r
- // Obsolète
- //this.captchaCrypt = null
// données personnels\r
this.resetDonneesPersonnelles()
return XMLDocument
}
-\r
-/* Obsolète
-Client.prototype.getXMLloginCaptcha = function(captchaCrypt, captchaInput)
-{
- var XMLDocument = this.util.creerDocumentXMLAction()
- XMLDocument.documentElement.setAttribute("name", "loginCaptcha")
-
- var nodecaptchaCrypt = XMLDocument.createElement("captchaCrypt")
- nodecaptchaCrypt.appendChild(XMLDocument.createTextNode(captchaCrypt))
- XMLDocument.documentElement.appendChild(nodecaptchaCrypt)
-
- var nodecaptchaInput = XMLDocument.createElement("captchaInput")
- nodecaptchaInput.appendChild(XMLDocument.createTextNode(captchaInput))
- XMLDocument.documentElement.appendChild(nodecaptchaInput)
-
- return XMLDocument
-}*/
-\r
-/* Obsolète
-Client.prototype.getXMLgenerationCaptcha = function()
-{
- var XMLDocument = this.util.creerDocumentXMLAction()
- XMLDocument.documentElement.setAttribute("name", "generationCaptcha")
-
- return XMLDocument
-}*/
Client.prototype.getXMLEnregistrement = function(login, password)
{
\r
this.statut = statut \r
this.majMenu()
-}\r
-
-/**
- * Demande la génération d'un captcha au serveur et l'affiche.
- */\r
- /* Obsolète
-Client.prototype.afficherCaptcha = function(query)
-{
- var thisClient = this
-
- $.post("request", this.util.xmlVersAction(this.getXMLgenerationCaptcha()),
- function(data, textStatus)
- {
- var chemin = jQuery("chemin", data.documentElement).text()
- thisClient.captchaCrypt = jQuery("captchaCrypt", data.documentElement).text()
- jQuery(query).prepend(
- "<p id=\"captcha\" >Es-tu un bot ? <img class=\"captchaImg\" src=\"" + chemin + "\" />" +
- "<input name=\"captchaInput\" type=\"text\" size=\"5\" max_length=\"5\" ></p>"
- )
- }
- )
}
-
-Client.prototype.cacherCaptcha = function()
-{
- jQuery("#captcha").remove()
-}*/
\r
/**\r
* Effectue la connexion vers le serveur.\r
Client.prototype.connexionLogin = function(login, password)
{
return this.connexion(this.util.xmlVersAction(this.getXMLlogin(login, password)))
-}
-\r
-/* Obsolète\r
-Client.prototype.connexionCaptcha = function()
-{
- return this.connexion(this.util.xmlVersAction(this.getXMLloginCaptcha(this.captchaCrypt, jQuery("#captcha input").val())))
-}*/
+}\r
Client.prototype.enregistrement = function(login, password)
{
mnesia:write({minichat, now(), "Paul", "Salut à toi !"})
end
).
-
-
-module(euphorik_protocole).
-export([
- %generation_captcha/1, Obsolète
- %nouveau_user_captcha/1, Obsolète
nouveau_user_login/1,
login/1,
logout/1,
-include("../include/euphorik_bd.hrl").\r
-include("../include/euphorik_defines.hrl").\r
-
-% Génère un nouveau captchat dans ?DOSSIER_CAPTCHA\r
-% Obsolète
-%~ generation_captcha(_) ->
- %~ {Mot_crypt, Nom_fichier} = captcha:create(5, ?DOSSIER_CAPTCHA),
- %~ simple_xml_to_string(xml_reponse_generation_captcha(?DOSSIER_CAPTCHA_RELATIF "/" ++ Nom_fichier, Mot_crypt)).
-
-\r
-% Un nouvel utilisateur doit être créé.\r
-% Obolète : le captcha n'existe plus
-% Action est un xmlElement().
-%~ nouveau_user_captcha(Action) ->
- %~ simple_xml_to_string(\r
- %~ case {xmerl_xpath:string("captchaCrypt", Action), xmerl_xpath:string("captchaInput", Action)} of\r
- %~ {[#xmlElement{content = [#xmlText{value = C1}]}], [#xmlElement{content = [#xmlText{value = C2}]}]} ->\r
- %~ C2_crypt = common:crypt(C2),\r
- %~ if C1 =:= C2_crypt ->\r
- %~ Cookie = generer_cookie(),\r
- %~ User = euphorik_minichat:nouveau_user("Paul", Cookie),\r
- %~ xml_reponse_login_ok(User);\r
- %~ true ->
- %~ xml_reponse_login_pas_ok("Captcha incorrect")\r
- %~ end;
- %~ _ ->
- %~ xml_reponse_login_pas_ok("XML malformé")\r
- %~ end
- %~ ).
-
% Une utilisateur s'enregistre avec un tuple {Login, Password}.\r
% @spec nouveau_user_login(xmerl:xmlElement()) -> string()
]\r
}\r
].
-\r
-\r
-% Obsolète
-%~ xml_reponse_generation_captcha(Chemin, Captcha) ->
- %~ [
- %~ {reponse, [{name, "generationCaptcha"}],
- %~ [
- %~ {chemin, [], [Chemin]},
- %~ {captchaCrypt, [], [Captcha]}
- %~ ]
- %~ }
- %~ ].
+
%%%%%%%%% </réponses XML> %%%%%%%%%
-include_lib("yaws/include/yaws_api.hrl").
\r
% Test du module\r
-tester() ->\r
- %~ {XML, _} = xmerl_scan:string(\r
- %~ "<action name=\"loginCaptcha\">"\r
- %~ " <captchaCrypt>b1b1b4e72e6f3d00e477cf37cced5851</captchaCrypt>"\r
- %~ " <captchaInput>LKJDLA</captchaInput>"\r
- %~ "</action>"),\r
- %~ io:format("Nouvel user : ~p~n", [nouveau_user(XML)]).
+tester() ->
\r
%~ {XML2, _} = xmerl_scan:string(\r
%~ "<action name=\"login\">"\r
%~ "<cookie>4UDUSY6Z2IZNTQO484S8X</cookie>"\r
%~ "<pseudo>Pifou</pseudo>"\r
%~ "<contenu>test & plop</contenu>"\r
- %~ "</action>").
- %~ traiter_xml(
- %~ "<action name=\"generationCaptcha\">"
%~ "</action>").\r
\r
traiter_xml(Contenu) ->\r
{XML, _} = xmerl_scan:string(Contenu),\r
traiter_action(XML#xmlElement.attributes, XML).\r
-
-
-% un client demande la génération d'un captcha (obsolète)
-%~ traiter_action([#xmlAttribute{value="generationCaptcha"}], XML) ->
- %~ euphorik_protocole:generation_captcha(XML); \r
-% un client se log pour la première fois (obsolète)\r
-%~ traiter_action([#xmlAttribute{value="loginCaptcha"}], XML) ->\r
- %~ euphorik_protocole:nouveau_user_captcha(XML); \r
\r
% un client s'enregistre (pseudo + password)
key,\r
value\r
}).\r
+ \r
\r
% décrit un enregistrement d'un message\r
-record(minichat,
page_principale = 1, % la page de la conversation principale
conversations = [] % [{integer(), integer()}], la liste des messages correspondant au conversation ainsi que la page affichée\r
}).
-
-
\ No newline at end of file
--define(DOSSIER_CAPTCHA_RELATIF, "img/tmp").
--define(DOSSIER_CAPTCHA, "/var/www/euphorik/" ?DOSSIER_CAPTCHA_RELATIF).
-