1
0
mirror of https://github.com/php/doc-es.git synced 2026-03-25 16:02:13 +01:00
Files
archived-doc-es/reference/expect/examples.xml
Jesús Ruiz-Ayúcar Vázquez 415e08d2a7 Finalizo instalacion en Unix, y toda la referencia de expect
git-svn-id: https://svn.php.net/repository/phpdoc/es/trunk@305588 c90b9560-bf6c-de11-be94-00142212c4b1
2010-11-20 22:34:34 +00:00

141 lines
3.8 KiB
XML

<?xml version="1.0" encoding="utf-8"?>
<!-- $Revision$ -->
<!-- EN-Revision: 96c9d88bad9a7d7d44bfb7f26c226df7ee9ddf26 Maintainer: chuso Status: ready -->
<chapter xml:id="expect.examples" xmlns="http://docbook.org/ns/docbook" xmlns:xlink="http://www.w3.org/1999/xlink">
&reftitle.examples;
<section xml:id="expect.examples-usage">
<title>Ejemplos de uso de Expect</title>
<example>
<title>Ejemplo de uso de Expect</title>
<para>
Este ejemplo conecta a un host remoto mediante SSH, y muestra el tiempo
que lleva en funcionamiento dicho host con uptime.
</para>
<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>
<para>
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.
</para>
<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
-->