4.3.1 Funciones de interfaz con C para enlaces dinámicos

Las siguientes funciones están relacionadas con las llamadas a funciones externas escritas en leguaje C y enlazadas dinámicamente con el sistema LE-LISP:

• (defextern símbolo ltipo tipo). Esta función asocia dinámicamente una función LE-LISP con un procedimiento externo, de tal modo que el procedimiento externo de nombre símbolo se convertirá en una nueva función LE-LISP. Los tipos de los argumentos a dicha función externa se indican en la lista ltipo, mientras que tipo indica el tipo del valor devuelto.
• (cload string). El argumento string es el nombre del módulo compilado que va a ser enlazado dinámicamente. Esta función llama al editor de enlaces ld de Unix para enlazar el módulo C con el sistema LE-LISP, de tal modo que el código compilado de dicho módulo se carga en la zona de memoria de código del LE-LISP, lo que a su vez permite que sea salvado en la imagen de memoria del LE-LISP.

Para ilustrar los pasos necesarios para realizar enlaces dinámicos vamos a suponer que se tiene un módulo llamado toto.c escrito en lenguaje C. Desde el propio entorno LE-LISP podemos compilar toto.c haciando una llamada al shell mediante la utilización del carácter macro !:

? !cc -c toto.c
= t

El siguiente paso consiste en enlazar el módulo toto.o al sistema:

? (cload "toto.o")
= (18 . 2684)

La función cload pasa su argumento, sin realizar ningún cambio en él, al editor de enlaces ld. Esto permite emplear cualquier opción válida para ld, incluyendo las que permiten cargar librerías o enlazar a la vez varios módulos. A continuación se muestran dos ejemplos:

• Para cargar el punto de entrada correspondiente a la función de la librería matemática que calcula el seno hiperbólico se emplearía la siguiente llamada a cload:

          (cload "-u _sinh -lm")

• Para cargar juntos los módulos toto.o, pepe.o y foo.o se utilizaría la siguiente llamada:

          (cload "toto.o pepe.o foo.o")

En general, la llamada(cload string ) generará la siguiente llamada al aditor de enlaces:

ld -A lelispbin -Bstatic -N -x -T fin -o temporal string -lc

donde lelispbin se corresponde con el path que contiene el directorio donde está localizado el binario del sistema LE-LISP que se está ejecutando, fin es la primera dirección disponible en la zona de LE-LISP reservada para código compilado y temporal es un fichero temporal único en el directorio /tmp.

Una vez que se ha realizado el enlace, el fichero temporal contendrá el código del módulo C, que se cargará en la zona code de LE-LISP. Este fichero temporal se utilizará en lugar de lelispbin en las siguientes llamadas a cload. De este modo, se pueden realizar numerosas llamadas a cload para modificar secuencialmente una imagen ejecutable.