1
0
mirror of https://github.com/php/doc-es.git synced 2026-03-23 23:12:09 +01:00
Files
archived-doc-es/reference/expect/examples.xml
2026-01-18 22:08:20 +00:00

138 lines
3.8 KiB
XML

<?xml version="1.0" encoding="utf-8"?>
<!-- $Revision$ -->
<!-- EN-Revision: ca6054f609661c9d0513aad1e7db1d8fdf33bed8 Maintainer: chuso Status: ready -->
<chapter xmlns="http://docbook.org/ns/docbook" xmlns:xlink="http://www.w3.org/1999/xlink" xml:id="expect.examples">
&reftitle.examples;
<section xml:id="expect.examples-usage">
<title>Ejemplos de uso de Expect</title>
<example>
<title>Ejemplo de uso de Expect</title>
<simpara>
Este ejemplo conecta a un host remoto mediante SSH, y muestra el tiempo
que lleva en funcionamiento dicho host con uptime.
</simpara>
<programlisting role="php">
<![CDATA[
<?php
ini_set("expect.loguser", "Off");
$stream = fopen("expect://ssh root@remotehost uptime", "r");
$cases = array (
array (0 => "password:", 1 => 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);
?>
]]>
</programlisting>
</example>
<simpara>
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.
</simpara>
<example>
<title>Otro ejemplo de uso de Expect</title>
<programlisting role="php">
<![CDATA[
<?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 ("~$ ", SHELL, EXP_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 ("~$ ", SHELL, EXP_EXACT), // ¡Hemos conectado!
array ("^Linux.*$", UNAME, EXP_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);
?>
]]>
</programlisting>
</example>
</section>
</chapter>
<!-- Keep this comment at the end of the file
Local variables:
mode: sgml
sgml-omittag:t
sgml-shorttag:t
sgml-minimize-attributes:nil
sgml-always-quote-attributes:t
sgml-indent-step:1
sgml-indent-data:t
indent-tabs-mode:nil
sgml-parent-document:nil
sgml-default-dtd-file:"~/.phpdoc/manual.ced"
sgml-exposed-tags:nil
sgml-local-catalogs:nil
sgml-local-ecat-files:nil
End:
vim600: syn=xml fen fdm=syntax fdl=2 si
vim: et tw=78 syn=sgml
vi: ts=1 sw=1
-->