PHP

Php et Ocaml

Recherche :

Sujet(s) à lire :
- [Résolu] executer un fichier et afficher le résultat

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Php et Ocaml

goodspirit

Salut
Pour un projet de TIPe, je cherche a communiqué entre PHP et OCaml : je m'explique :
Je voudrais que l'utilisateur entre des entrées, que Caml résoud le problème et que php affiche le résultat sur une page html.
J'ai pensé a ce que le fichier php créé (ou modifie plus exactement) mon fichier test.ml, puis qu'il lance la complation grace a la commande exec(ocamlc -o test.ml ...). J'obtiendrais ainsi un fichier executable. Il me faut alors lire les informations qui sortent de ce ficier executable par php et les traitées... Je voulaus éssayé par exec aussi, mais je n'y arrive pas (cf sujet [php] 66467).

Existe t-il une manière plsu simlpe de communiqué entre php et OCaml ou quelqu'un peut-il m'aiguiller sur une alternative a ma tentative?
Merci d'avance ...

Publicité

el muchacho

Comfortably Numb

Je ne vois pas l'interet de compiler ton prog ocaml a la volee. Tu compiles une bonne fois pour toutes et tu appelles l'exe genere via PHP avec les parametres qui vont bien. C'est pas plus complique que ca.

goodspirit

mais je ne sais pas comment envoyé des paramétres a un programme caml d"ja compilé. Peux-tu m'expliqué stp?
Sinon, j'ai quand même du mal à récupéré le retour avec php

goodspirit

Je réussi a ratrappé le retour, mais comment peut-on envoyé des paramètres en entrée d'un fichier déja compilé stp? (ca m'éviterais pas mal de ligne de code ...

Pillow

'cos the trees won't talk

goodspirit a écrit :

Je réussi a ratrappé le retour, mais comment peut-on envoyé des paramètres en entrée d'un fichier déja compilé stp? (ca m'éviterais pas mal de ligne de code ...

Soit tu passes tes paramètres en arguments quand tu appelles ton programme [:petrus75] , soit tu utilises des sockets [:spamafote]

goodspirit

oui, ca j'avais bien compris mais ma question consistait surtout a savoir comment les arguments sont-ils récupérer par le programme Caml (comment faire mon programme caml et que passer en argument pour qu'il l'utilise?) (Désolé, je suis moins bon en Caml qu'en php et j'ai conscience que ce post traite maintenant plus de Caml que de php)

Pillow

'cos the trees won't talk

goodspirit a écrit :

(ça tombe très bien, je ne connais rien du tout au php [:petrus75] )

Les arguments sont dans Sys.argv. C'est une array (de string), donc tu peux avoir le nombre d'arguments avec

Code :

Array.length Sys.argv;;

Pour récupérer le premier argument:

Code :

Sys.argv.(1);;

(c'est la même chose que Array.get Sys.argv 1)

Tu peux bien sûr faire un open Array;; au début si tu ne veux pas te taper le "Array.bidule" et utiliser directement "bidule"

Je ne sais pas trop quel est ton niveau, donc un petit exemple bien détaillé:

Code :

open Array;;
open Sys;;
(* pour l'exemple, je vais considérer que tu passes en argument deux entiers *)
(* traiter prend deux strings contenant un nombre en argument et retourne une
* string contenant le résultat *)
let traiter x y =
let a = int_of_string x in
let b = int_of_string y in
(* ici tu fais ton gros calcul très compliqué *)
let resultat = a + b in
string_of_int resultat
;;
(* on n'a plus qu'à récupérer les arguments *)
if length argv > 2
(* et à afficher le résultat après l'avoir calculé *)
then print_endline (traiter argv.(1) argv.(2));;

Bien sûr, tu n'es pas obligé d'utiliser une demi douzaine d'identifiants pour rien, tu peux vérifier que les arguments passés à "traiter" sont corrects (int_of_string lève une exception si ce n'est pas le cas, tu peux l'attraper avec try...with), tu peux passer toutes tes variables en un seul argument (en utilisant des guillemets) puis parser à coup de Scanf.sscanf [:petrus75] , etc...

Et là normalement:

$ ./le_nom_du_programme 12 15
27

Si veux apprendre un peu l'ocaml, tu peux en trouver la référence sur le site du langage, et parcourir ce bouquin.

goodspirit

Merci beaucoup, ta réponse est très précise et claire, c'est parfait. Je vais testé ca dès que possible et te dire quoi. Merci...

goodspirit

ok, ca marche, j'arrive a récupéré mes arguments.
Cependant, j'ai pas compris ce passage de ta réponse : existerait-il une méthode simple pour récupéré plusieurs arguments (j'ai 48 entiers a passer en arguments mais je peux utiliser Sys.argv.(1);; ... Sys.argv.(48);; puisque l'ordre et rigoureux et je n'ai à les utiliser qu'une seule fois dans le programme.

Pillow a écrit :

(ça tombe très bien, je ne connais rien du tout au php [:petrus75] )
Bien sûr, tu n'es pas obligé d'utiliser une demi douzaine d'identifiants pour rien, tu peux vérifier que les arguments passés à "traiter" sont corrects (int_of_string lève une exception si ce n'est pas le cas, tu peux l'attraper avec try...with), tu peux passer toutes tes variables en un seul argument (en utilisant des guillemets) puis parser à coup de Scanf.sscanf [:petrus75] , etc...

En tout cas, merci beaucoup, ca me simplifie pas mal le travail...

Pillow

'cos the trees won't talk

goodspirit a écrit :

Ce que je disais, c'est que tu pourrais par exemple appeller ton programme comme ça :

Code :

mon_programe "8 6"

Et ensuite récupérer les données comme ça:

Code :

let mes_donnees = Scanf.sscanf Sys.argv.(1) "%i %i" (fun a b c-> [a; b]);;
(* mes_donnees est dorénavant la liste [8; 6]

L'intérêt? Il n'y en a pas. Je voulais juste montrer qu'il y a d'autres possibilités [:petrus75]

Je voulais aussi souligner que si par malheur un de tes arguments n'est pas un entier, l'application s'arrêtera. Dans ton cas il y a probablement très peu de chances que ça se produise et ce ne serait certainement pas vraiment grave, mais si on voulait être complet on traiterait le cas. Comme ça:

Code :

try
(* tout les exceptions levées dans ce bloc pourront être traitées avec le
* with *)
let a = int_of_string x in
let b = int_of_string y in
print_int (a + b);
print_newline ()
with (* Ici on rattape les exceptions en utilisant le filtrage *)
_ -> print_endline "Oulalah il y a une erreur!!"

L'underscore (_) signifiant qu'on rattrape toutes les exceptions, mais je suppose que tu savais déjà ça. Bien sûr on peux faire tout ce qu'on veut quand on rattrape une exception, et on peut faire un traitement séparé pour chaque exception:

Code :

with
Failure "int_of_string" -> print_endline "La chaine n'était pas un entier"
| Invalid_argument _ -> (
print_string "argument invalide! Pour la peine je vais écrire 25 000 000";
print_endline " fois \"foo\" à l'écran et je lève une exception. ";
ecrire_foo 25000000;
raise (Failure "Attrape moi si tu peux!" )
)

Bref, je crois que j'ai un peu digressé :whistle:

J'imagine que tu sais déjà ça, mais au cas où : pour transformer tes 48 arguments en entiers, l'idéal serait de faire un tableau et une boucle:

Code :

let donnees = Array.make 48 0;; (* un tableau de 48 éléments, qui valent tous 0 *)
for i=1 to 48
do
donnees.(i-1) <- int_of_string Sys.argv.(i);
done;;

Ensuite tu peux bien sûr utiliser les données à coup de donnees.(0), donnees.(1), etc.
A la rigueur si ton traitement est simple (par exemple, faire l'addition de tous les paramètres) tu peux te passer de cette étape.

FORUM HardWare.fr

Programmation

PHP

Php et Ocaml

Sujets relatifs
CSS et PHP	[PHP] Chargement page
[ Pocket PC ] gestion des code barre et PHP ?	[Help] intreface en PHP sur mon FTP
[PHP + bd mysql] Supprimer le champ de ma table	[PHP] envoie fichier pb
[topic unik] [PHP] Existe t-il une fonction qui....?	PHP : vérifier si des caractères sont alphanumériques
[C & HTML] Du C de l'HTML et p-e du Php, j'ai besoin d'aide...	inclusion conditionnelle en PHP?
Plus de sujets relatifs à : Php et Ocaml

Page générée en 0.069 secondes