Ejemplos de uso de Expect

Ejemplo #1 Ejemplo de uso de Expect

Este ejemplo conecta a un host remoto mediante SSH, y muestra el tiempo que lleva en funcionamiento dicho host con uptime.

<?php
ini_set
("expect.loguser""Off");

$stream fopen("expect://ssh root@remotehost uptime""r");

$cases = array (
    array (
=> "password:"=> PASSWORD)
);

switch (
expect_expectl ($stream$cases)) {
    case 
PASSWORD:
        
fwrite ($stream"password\n");
        break;
 
    default:
        die (
"Error al tratar de conectar con el host remoto\n");
}

while (
$line fgets($stream)) {
      print 
$line;
}
fclose ($stream);
?>

El siguiente ejemplo conecta con un host remoto, determina si el SO instalado es de 32 o de 64 bits, y finalmente actualiza el paquete que corresponda.

Ejemplo #2 Otro ejemplo de uso de Expect

<?php
ini_set
("expect.timeout", -1);
ini_set("expect.loguser""Off");

$stream expect_popen("ssh root@remotehost");

while (
true) {
    switch (
expect_expectl ($stream, array (
            array (
"password:"PASSWORD), // SSH pide contraseña
            
array ("yes/no)?"YESNO), // SSH pide si almacenar o no el host
            
array ("~$ "SHELLEXP_EXACT), // ¡Hemos conectado!
    
))) {
        case 
PASSWORD:
            
fwrite ($stream"secret\n");
            break;

        case 
YESNO:
            
fwrite ($stream"yes\n");
            break;

        case 
SHELL:
            
fwrite ($stream"uname -a\n");
            while (
true) {
                    switch (
expect_expectl ($stream, array (
                            array (
"~$ "SHELLEXP_EXACT), // ¡Hemos conectado!
                            
array ("^Linux.*$"UNAMEEXP_REGEXP), // salida de uname -a
                    
), $match)) {
                        case 
UNAME:
                            
$uname .= $match[0];
                            break;

                        case 
SHELL:
                            
// Run update:
                            
if (strstr ($uname"x86_64")) {
                                    
fwrite ($stream"rpm -Uhv http://mirrorsite/somepath/some_64bit.rpm\n");
                            } else {
                                    
fwrite ($stream"rpm -Uhv http://mirrorsite/somepath/some_32bit.rpm\n");
                            }
                            
fwrite ($stream"exit\n");
                            break 
2;

                        case 
EXP_TIMEOUT:
                        case 
EXP_EOF:
                            break 
2;

                        default:
                            die (
"Ha ocurrido un error\n");
                    }
            }
            break 
2;

        case 
EXP_TIMEOUT:
        case 
EXP_EOF:
            break 
2;

        default:
            die (
"Ha ocurrido un error\n");
    }
}

fclose ($stream);
?>