[SOLUCIONADO] APORTE: Llamar a Prolog desde Php y tener un sistema experto en la web

[NSD]

Hola gente, actualmente me encuentro en la facultad desarrollando un proyecto para una materia en lenguaje Prolog el cual quiero utilizar desde php para permitir que los usuarios lo usen desde la web, encontre temas en este foro viejos y sin respuesta o con respuestas que ya no funcionan, asi que hago este post para compartir una breve demo de como se puede hacer esto. El proyecto en si es un juego de damas online en el cual el visitante de la web juega contra una IA Prolog que a su vez, esta jugando en simultaneo contra todos los visitantes.
Como el proyecto es basicamente de Prolog, aqui solo pondre lo relativo a PHP para no hacer off-topic.

Lo que viene a continuación es una explicación de mi escenario de trabajo, se podría hacer en otras plataformas supongo, pero asi es como lo tengo andando yo:

1) Requerimientos
1.a) Swi-Prolog instalado en una pc con Windows 7.
1.b) Wamp server con php 5.4 o superior.
1.c) PHP debe tener el safe_mode apagado, esto permitira llamar a programas que no se encuentran en la misma carpeta que el php que los llama. En el php.ini hay una directiva para esto que debe estar en Off pero aun asi puede que no funcione, para asegurarte debes agregar esto al final del httpd.conf y reiniciar el servidor:

Código Apache:

php_admin_flag safe_mode off
 

1.d) Debes tener agregada la carpeta de binarios de la instalacion de Prolog incorporada en el Path de Windows, por ejemplo en mi caso es: C:\Program Files\swipl\bin, si no sabes como hacer esto, aquí hay un tutorial paso a paso para Windows 7.
1.e) Dentro de la carpeta www del servidor, creare un directorio llamado "prolog" el cual por supuesto puede tener cualquier otro nombre, dentro de este directorio es donde trabajaremos.

2) El Prolog
Dentro de la carpeta del servidor creada anteriormente, vamos a tener un archvo llamado ejemplo.pl con un functor de prueba:

Código prolog:

test :- write( 'Prolog \nwas called \nfrom PHP \nsuccessfully.' ).
 

3) La prueba previa de la consola
3.a) Antes de meterte con el PHP por primera vez, debes realizar una prueba de la consola para asegurarte que todos los pasos previos los hisiste bien, sobre todo porque en caso de error, php no explota ni lanza errores/warning/notices ni nada, sigue como si nada pasara con lo cual puede ser muy desconcertante.
3.b) Abres la consola de Windows (Simbolo de sistema o cmd.exe) y alli te diriges a la carpeta de tu servidor escribiendo:

Código BAT:

cd C:\servidor\www\prolog
 

reemplazando por la ubicacion de donde esta instalado tu wampserver y el nombre de la carpeta que creaste anteriormente.
3.c) Ahora escribes en la consola el siguiente comando:

Código BAT:

swipl -s ejemplo.pl -g "test." -t halt.
 

3.d) Si todo esta bien, estaras viendo este mensaje:

% C:/servidor/www/prolog/ejemplo.pl compiled 0.00 sec, 2 clauses
Prolog
was called
from PHP
successfully.

caso contrario, deberás revisar que los pasos previos esten correctos.

4) El PHP
4.a) Como punto de partida destacar que a mi no me funcionaron ninguna de las funciones de ejecucion de programas y cuando digo ninguna, me refiero a ninguna de las del manual, todas fallaban, o mejor dicho, "no hacian nada" porque fallar implica un error y PHP no arrojo ni un notice, en lugar de estas funciones, tube que recurrir a el operador de comillas invertidas razon por la cual previamente tuvimos que desactivar el safe_mode con tanto énfasis.
4.b) En la misma carpeta prolog del servidor, donde pusimos a ejemplo.pl vamos a crear un index.php con el siguiente contenido:

Código PHP:

<?php  
  $output = `swipl -s ejemplo.pl -g "test." -t halt.`;
  var_dump($output);
 

con lo cual deberiamos tener esta salida al ingresar por el navegador:

string 'Prolog
was called
from PHP
successfully.' (length=43)

4.c) El envio de parametros a Prolog es muy simple, si se fijan en el comando que ejecutamos, tenemos esto "test." entre comillas, ahi dentro podemos escribir lo que queramos ya que esa una sentencia que se ejecuta en Prolog de forma directa, podemos pasar listas, variables, otros functores, lo que se quiera.
4.d) La recepcion de respuestas es en forma de texto, asi que debemos asegurarnos de que nuestro prolog retorne su respuesta en un formato que luego podamos desglosar con las funciones de string o expresiones regulares.

El proyecto se encuentra en desarrollo en el repositorio: PHP-Prolog-HTML5-Checkers-Game de GitHub.

Una demo del repositorio funcionando puede encontrarse en este lugar, localizado en un VPS gratuito cortesía de vps.me.

Se resolverán dudas y aceptaran criticas tanto en GitHub como en este tema.

Si te interesa estar al día con los nuevos desarrollos del proyecto o quieres participar en ellos, puedes seguir el proyecto en GitHub y comunicarte directamente con migo para obtener acceso al ftp del vps y hacer experimentos en linea.

Saludos.

[Italico76]

Que bueno....

Te tomo la palabra de que subiras el juego de damas

[hhs]

Es una pena que no exista extensión para swi prolog, se podrían hacer cosas muy interesantes.

Suerte con el proyecto NSD

[haggenx]

buen aporte, yo he hecho lo mismo para programas en vb.net y así añadir funciones que no hay en php, pero, esto funcionaría en un servidor externo, por ejemplo www.midominio.com?

[NSD]

Italico76, hhs gracias por el apoyo

haggenx la respuesta es que si, pero necesitaras un servidor dedicado (VPS) ya que dudo mucho que una empresa de hosting te permita desactivar el safe_mode o acceder a la consola en un servidor compartido, mucho menos el instalar el swi-prolog.

No obstante, podrías usar un servicio gratuito como No-IP o DynDNS para direccionar un dominio a tu PC, es decir, montarte tu propio servidor web casero y permitir que los visitantes accedan a la pagina solo si tu tienes la Pc prendida y conectada a internet con el servidor encendido.

Si es algo que se haga con fines lucrativos y que requiere de estar online de forma permanente, es decir un Sistema Experto real, el VPS sera un requerimiento, pero si solo quieres probar para decir "Lo hice y me salio" hay alternativas.

[haggenx]

entiendo, pues mis proyectos de este tipo son locales, de hecho con un servidor local con php y mysql me basta, pero tenía curiosidad por si se podía hacer de otra forma y aprovechar esta funcionalidad, gracias por la información

[md0345]

Hola, he intentado poner a funcionar el código que pusiste, pero a la hora de probar el php me manda como mensaje NULL, tengo php 5.5.11 y lo estoy probando con xampp. El ejemplo.pl si funciona desde la consola de comandos y arroja lo que debería, pero el php no sé que pueda ser.
Lo probé con el código así como está, y también agregandole ?> al final pero sigue arrojando el NULL.

Espero me puedan auxiliar.
Saludos

[NSD]

Hola @md0345, he actualizado el tema con el link al repositorio de GitHub del proyecto y una demo para que puedan jugar en linea y probar el código en funcionamiento.

El hecho de que retorne NULL probablemente este ligado a que no realizaste correctamente el paso 1.
Asegúrate de cambiar los valores en php.ini y agregar el flag en el archivo .htaccess.

En el VPS de prueba esta instalado Debian con Nginx, por lo que también es posible hacerlo funcionar en esta plataforma.

[LupeLipCuro]

Hola, buenas noches me podrías decir por qué me sale NULL a la hora de probarlo en el navegador? Desde el cmd me sale tal cual indicas. Espero tu pronta respuesta, realmente me urge. Gracias

[NSD]

Hola, pueden pasar varias cosas, por ejemplo la primera que no se encuentre el archivo, podrías tener un index.php así:

Código PHP:

<?php  
  if(!file_exists("ejemplo.pl")) die("No se puede localizar el archivo ejemplo.pl, el directorio actual es: ".__DIR__);
  $output = `swipl -s ejemplo.pl -g "test." -t halt.`;
  var_dump($output);
 

Para saber si ese es el caso.

Otra posibilidad es que no tengas los permisos necesarios para ejecutar comandos en la consola, eso lo puedes verificar haciendo:

Código PHP:

<?php  
  if(!file_exists("ejemplo.pl")) die("No se puede localizar el archivo ejemplo.pl, el directorio actual es: ".__DIR__);
  $echo  = `echo anda.`;
  echo "La consola ".($echo ? $echo : "NO anda");
  $output = `swipl -s ejemplo.pl -g "test." -t halt.`;
  var_dump($output);
 

Hay otras variantes posibles, pero prueba esas que son las mas comunes.

[NSD]

Bueno, como me siguen llegando consultas recurrentes por este tema y todas son del estilo "No me anda! No puedo instalarlo!", hice un vídeo donde explico todo el proceso desde cero: https://www.youtube.com/watch?v=3sUj523cfPE