Controles de Conectividad NUEVO

HarbourBuilder proporciona 9 controles de interoperabilidad de lenguajes que te permiten llamar codigo escrito en Python, Swift, Go, Node.js, Rust, Java, .NET, Lua y Ruby directamente desde tus aplicaciones Harbour. Los 9 controles heredan de la clase base TInteropRuntime, que proporciona una API unificada para llamadas entre lenguajes.

Lenguajes Soportados

Clase Base TInteropRuntime

Los 9 controles de conectividad heredan de TInteropRuntime, una clase base abstracta que define la interfaz comun para la comunicacion entre lenguajes. Este diseno asegura que cambiar entre lenguajes solo requiere modificar el nombre de la clase del componente — la API permanece identica.

Propiedades Heredadas

Metodos Abstractos

Cada clase hija debe implementar estos metodos internos, que son llamados por la API publica:

Patron de API Comun

Estos metodos estan definidos en TInteropRuntime y son heredados por todos los controles de conectividad:

Ejemplo de Integracion con Python

El componente TPython es el control de conectividad mas comunmente usado. Incrusta un interprete Python completo en tu aplicacion Harbour:

#include "hbbuilder.ch"

function Main()

   local oPython, cResultado, aDatos

   // Inicializar runtime Python
   oPython := TPython():New()
   oPython:Init()

   // Ejecutar codigo Python
   oPython:Eval( "import math" )
   cResultado := oPython:Call( "math.sqrt", 144 )
   ? "sqrt(144) =", cResultado  // 12.0

   // Llamar una funcion Python desde un archivo de script
   oPython:Eval( ;
      "def greet(name):\n" + ;
      "    return f'¡Hola, {name} desde Python!'\n" + ;
      "def process_list(items):\n" + ;
      "    return [x**2 for x in items]" )

   cResultado := oPython:Call( "greet", "Harbour" )
   ? cResultado  // "¡Hola, Harbour desde Python!"

   aDatos := oPython:Call( "process_list", { 1, 2, 3, 4, 5 } )
   // aDatos = {1, 4, 9, 16, 25}

   oPython:Shutdown()

return nil

Ejemplo de Integracion con Node.js

oNode := TNode():New()
oNode:Init()

// Ejecutar un fragmento JavaScript
cResultado := oNode:Eval( ;
   "const os = require('os');" + ;
   "JSON.stringify({ platform: os.platform(), arch: os.arch() })" )

? cResultado  // {"platform":"darwin","arch":"arm64"}

oNode:Shutdown()

Ejemplo de Integracion con Lua

oLua := TLua():New()
oLua:Init()

// Establecer una variable Harbour visible en Lua
oLua:SetVar( "app_name", "HarbourBuilder" )

// Ejecutar codigo Lua que accede a ella
oLua:Eval( "result = 'Hola desde ' .. app_name" )

? oLua:GetVar( "result" )  // "Hola desde HarbourBuilder"

oLua:Shutdown()

Ejemplo de Integracion con Go

Compila un paquete Go como biblioteca compartida:

// Fuente Go (golib.go)
// export Double
func Double(n C.int) C.int {
    return n * 2
}

// Build: go build -buildmode=c-shared -o golib.so golib.go

oGo := TGo():New()
oGo:cLibPath := "./golib.so"
oGo:Init()

? oGo:Call( "Double", 21 )  // 42

oGo:Shutdown()

Ejemplo de Integracion con Rust

Compila Rust con cdylib y extern "C":

// Fuente Rust (src/lib.rs)
#[no_mangle]
pub extern "C" fn hash_string(s: *const c_char) -> *mut c_char {
    let input = unsafe { CStr::from_ptr(s).to_str().unwrap() };
    let hash = format!("{:x}", md5::compute(input));
    CString::new(hash).unwrap().into_raw()
}

// Build: cargo build --release

oRust := TRust():New()
oRust:cLibPath := "./target/release/libmylib.so"
oRust:Init()

? oRust:Call( "hash_string", "hello" )  // "5d41402abc4b2a76b9719d911017c592"

oRust:Shutdown()

Arquitectura

Consideraciones de Rendimiento