expect ejecutar comando
Rino Rondan
Tengo este script del expect
#!/bin/bash
HOST=$1
USER=$2
PASS=$3
VAR=$(expect -c "
#set timeout -1
spawn ssh $USER@$HOST
expect \"*?assword:*\"
send -- \"$PASS\r\"
expect \"$ \"
#send -- \"\r\"
send \"sudo su -\r\"
expect \"$ \"
send \"cd /var/tmp/xxx/xxxgrab\r\"
expect \"$ \"
send \"/usr/bin/bash\r\"
expect \"$ \"
send \"cd outputs\r\"
expect \"$ \"
#send \" ls -la|head -1\r\"
send \"cp `ls -ls |sort -nr -k 7 -k 8 |awk '{print $10}'|head -1` rino\r\"
#send \"cp $(ls -ls |sort -nr -k 7 -k 8 |awk '{print $10}'|head -1 rino\r\"
expect \"$ \"
send \"exit\r\"
")
echo "=======RUN========"
echo "$VAR"
y lo que me hace es me trae (el ls) lo que hay en el equipo donde tire el expect y no donde me acabo de conectar por ssh.
la salida es
xxxx:# cd /var/tmp/emc/emcgrab
xxx:# /usr/bin/bash
xxx:# cd outputs
xxx:# cp grabtesting rino
cp: cannot access grabtesting
xxx:#
cxxxx@xxx:/xxxhome/cxxxxx/bin %
y ese grabtesting lo tengo en mi home directory desde donde ejecute el grab.
cxxx@xxx:/xxxhome/cxxxxx/bin % ls -la grab*
-rwxr----- 1 cxxxxx whsysadm 597 Aug 26 17:31 grabtesting
cxxxxx@xxxxxx:/xxxhome/cxxxxx/bin %
La idea es que al conectarme por ssh al equipo remoto entre a un directorio, filtro para buscar justo el archivo que quiero y luego poder copiarlo asi lo renombro, para luego enviar ese archivo a un ftp, asi que tambien tendria que guardar el nuevo nombre un una variable para que cuando lo suba al ftp le ponga ese valor.
se entiende??
en el mismo proceso que invoco en la variable VAR
1 conectarme por ssh
2 ir al path correspondiente
3 obtener y copiar un file con otro nombre
4 obtener ese file nuevo y guardarlo en una variable para que lo use expect
5 conectarme por ftp
6 enviarlo el archivo guardado en la varia ble al ftp
Me quedo sin saber como hacer el paso 3 porque me devuelve otra cosa, despues nose como sera para guardar la variable.. porque tam bien me toma todo como si fuera el equipo que ejecute el script.
Saludos
--
Viva La Santa Federacion!!
Mueran Los Salvages Unitarios!!
^^^Transcripcion de la epoca ^^^
http://www.rinorondan.com.ar
http://counter.li.org Linux User -> #517918
AngelD
Rino Rondan <villad...@gmail.com> escribió:
Vayamos por partes. ¿Intentas utilizar expect para conectarte a
una máquina por ssh?. Porque eso ya lo hace el propio ssh con las
claves del fichero '~/.ssh/authorized_keys'. Una vez realizado esto,
todo lo que comentas creo que se puede realizar utilizando "ssh MACHINE
comando". ¡Incluso se puede automatizar el ftp con el fichero '.netrc'!
Lo de guardar ficheros en variables es un poco bruto, sobre
todo cuando es innecesario.
saludos --- Angel
--
To UNSUBSCRIBE, email to debian-user-s...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listm...@lists.debian.org
Archive: http://lists.debian.org/20100827122716.67325274@x32
Rino Rondan
Rino Rondan
Me conecto con llaves o con ssh pero no todos tienen instalada las llaves.
La idea es desde un servidor conectarse remotamente a otro servidor, correr un programa, este me genera una archivo, lo tengo que renombrar luego lo tengo que enviar por ftp.
Con ssh no me lo plantee porque tiene que ser totalmente interactivo yaque no todos tienen llaves.
Pero acepto otras soluciones :=)
Saludos
Angel Claudio Alvarez
> Buenas:
>
> Me conecto con llaves o con ssh pero no todos tienen instalada las
> llaves.
> La idea es desde un servidor conectarse remotamente a otro servidor,
> correr un programa, este me genera una archivo, lo tengo que renombrar
> luego lo tengo que enviar por ftp.
> Con ssh no me lo plantee porque tiene que ser totalmente interactivo
> yaque no todos tienen llaves.
> Pero acepto otras soluciones :=)
>
python y su modulos pexpect
(hacerlo en bash es un dolor testicular)
Archive: http://lists.debian.org/1282957786....@gabita2.angel-alvarez.com.ar
Rino Rondan
todo lo que ejecute con esas comillas o con $(ls -la ) lo resuelve primero de donde se ejecuta y no manda el comando al equipo remoto.. asi que voy a tener que leer la documentacion de como funciona bien el send.. pero si alguno ya paso por esto..
Juan Marcos Delgado Alcantar
Yo use esta guía para crear un comando para apagar un servidor local. A
lo mejor te sirve, si te interesa te mando el programa autoexpect, que ya
no esta disponible en el enlace.
http://infolinux.wordpress.com/2007/10/27/automatiza-tus-tareas-en-linux-
sin-saber-programar/
Suerte.
--
Marcos Delgado
--
To UNSUBSCRIBE, email to debian-user-s...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listm...@lists.debian.org
Archive: http://lists.debian.org/i5h0si$qr6$1...@dough.gmane.org
Juan Marcos Delgado Alcantar
Como no he encontrado rápidamente el comando autoexpect, lo mando por
esta vía, es un shell script:
#!/bin/sh
# \
exec expect -- "$0" ${1+"$@"}
# Name: autoexpect - generate an Expect script from watching a session
#
# Description:
#
# Given a program name, autoexpect will run that program. Otherwise
# autoexpect will start a shell. Interact as desired. When done, exit
# the program or shell. Autoexpect will create a script that reproduces
# your interactions. By default, the script is named script.exp.
# See the man page for more info.
#
# Author: Don Libes, NIST
# Date: June 30 1995
# Version: 1.4b
set filename "script.exp"
set verbose 1
set conservative 0
set promptmode 0
set option_keys ""
proc check_for_following {type} {
if {![llength [uplevel set argv]]} {
puts "autoexpect: [uplevel set flag] requires following
$type"
exit 1
}
}
while {[llength $argv]>0} {
set flag [lindex $argv 0]
if {0==[regexp "^-" $flag]} break
set argv [lrange $argv 1 end]
switch -- $flag \
"-c" {
set conservative 1
} "-C" {
check_for_following character
lappend option_keys [lindex $argv 0] ctoggle
set argv [lrange $argv 1 end]
} "-p" {
set promptmode 1
} "-P" {
check_for_following character
lappend option_keys [lindex $argv 0] ptoggle
set argv [lrange $argv 1 end]
} "-Q" {
check_for_following character
lappend option_keys [lindex $argv 0] quote
set argv [lrange $argv 1 end]
} "-f" {
check_for_following filename
set filename [lindex $argv 0]
set argv [lrange $argv 1 end]
} "-quiet" {
set verbose 0
} default {
break
}
}
#############################################################
# Variables Descriptions
#############################################################
# userbuf buffered characters from user
# procbuf buffered characters from process
# lastkey last key pressed by user
# if undefined, last key came from process
# echoing if the process is echoing
#############################################################
# Handle a character that came from user input (i.e., the keyboard)
proc input {c} {
global userbuf lastkey
send -- $c
append userbuf $lastkey
set lastkey $c
}
# Handle a null character from the keyboard
proc input_null {} {
global lastkey userbuf procbuf echoing
send -null
if {$lastkey == ""} {
if {$echoing} {
sendcmd "$userbuf"
}
if {$procbuf != ""} {
expcmd "$procbuf"
}
} else {
sendcmd "$userbuf"
if {$echoing} {
expcmd "$procbuf"
sendcmd "$lastkey"
}
}
cmd "send -null"
set userbuf ""
set procbuf ""
set lastkey ""
set echoing 0
}
# Handle a character that came from the process
proc output {s} {
global lastkey procbuf userbuf echoing
send_user -raw -- $s
if {$lastkey == ""} {
if {!$echoing} {
append procbuf $s
} else {
sendcmd "$userbuf"
expcmd "$procbuf"
set echoing 0
set userbuf ""
set procbuf $s
}
return
}
regexp (.)(.*) $s dummy c tail
if {$c == $lastkey} {
if {$echoing} {
append userbuf $lastkey
set lastkey ""
} else {
if {$procbuf != ""} {
expcmd "$procbuf"
set procbuf ""
}
set echoing 1
}
append procbuf $s
if {[string length $tail]} {
sendcmd "$userbuf$lastkey"
set userbuf ""
set lastkey ""
set echoing 0
}
} else {
if {!$echoing} {
expcmd "$procbuf"
}
sendcmd "$userbuf$lastkey"
set procbuf $s
set userbuf ""
set lastkey ""
set echoing 0
}
}
# rewrite raw strings so that can appear as source code but still
reproduce
# themselves.
proc expand {s} {
regsub -all "\\\\" $s "\\\\\\\\" s
regsub -all "\r" $s "\\r" s
regsub -all "\"" $s "\\\"" s
regsub -all "\\\[" $s "\\\[" s
regsub -all "\\\]" $s "\\\]" s
regsub -all "\\\$" $s "\\\$" s
return $s
}
# generate an expect command
proc expcmd {s} {
global promptmode
if {$promptmode} {
regexp ".*\[\r\n]+(.*)" $s dummy s
}
cmd "expect -exact \"[expand $s]\""
}
# generate a send command
proc sendcmd {s} {
global send_style conservative
if {$conservative} {
cmd "sleep .1"
}
cmd "send$send_style -- \"[expand $s]\""
}
# generate any command
proc cmd {s} {
global fd
puts $fd "$s"
}
proc verbose_send_user {s} {
global verbose
if {$verbose} {
send_user -- $s
}
}
proc ctoggle {} {
global conservative send_style
if {$conservative} {
cmd "# conservative mode off - adding no delays"
verbose_send_user "conservative mode off\n"
set conservative 0
set send_style ""
} else {
cmd "# prompt mode on - adding delays"
verbose_send_user "conservative mode on\n"
set conservative 1
set send_style " -s"
}
}
proc ptoggle {} {
global promptmode
if {$promptmode} {
cmd "# prompt mode off - now looking for complete output"
verbose_send_user "prompt mode off\n"
set promptmode 0
} else {
cmd "# prompt mode on - now looking only for prompts"
verbose_send_user "prompt mode on\n"
set promptmode 1
}
}
# quote the next character from the user
proc quote {} {
expect_user -re .
send -- $expect_out(buffer)
}
if {[catch {set fd [open $filename w]} msg]} {
puts $msg
exit
}
exec chmod +x $filename
verbose_send_user "autoexpect started, file is $filename\n"
# calculate a reasonable #! line
set expectpath /usr/local/bin ;# prepare default
foreach dir [split $env(PATH) :] { ;# now look for real location
if {[file executable $dir/expect] && ![file isdirectory $dir/
expect]} {
set expectpath $dir
break
}
}
cmd "#![set expectpath]/expect -f
#
# This Expect script was generated by autoexpect on [timestamp -format %c]
# Expect and autoexpect were both written by Don Libes, NIST."
cmd {#
# Note that autoexpect does not guarantee a working script. It
# necessarily has to guess about certain things. Two reasons a script
# might fail are:
#
# 1) timing - A surprising number of programs (rn, ksh, zsh, telnet,
# etc.) and devices discard or ignore keystrokes that arrive "too
# quickly" after prompts. If you find your new script hanging up at
# one spot, try adding a short sleep just before the previous send.
# Setting "force_conservative" to 1 (see below) makes Expect do this
# automatically - pausing briefly before sending each character. This
# pacifies every program I know of. The -c flag makes the script do
# this in the first place. The -C flag allows you to define a
# character to toggle this mode off and on.
set force_conservative 0 ;# set to 1 to force conservative mode even if
;# script wasn't run conservatively originally
if {$force_conservative} {
set send_slow {1 .1}
proc send {ignore arg} {
sleep .1
exp_send -s -- $arg
}
}
#
# 2) differing output - Some programs produce different output each time
# they run. The "date" command is an obvious example. Another is
# ftp, if it produces throughput statistics at the end of a file
# transfer. If this causes a problem, delete these patterns or replace
# them with wildcards. An alternative is to use the -p flag (for
# "prompt") which makes Expect only look for the last line of output
# (i.e., the prompt). The -P flag allows you to define a character to
# toggle this mode off and on.
#
# Read the man page for more info.
#
# -Don
}
cmd "set timeout -1"
if {$conservative} {
set send_style " -s"
cmd "set send_slow {1 .1}"
} else {
set send_style ""
}
if {[llength $argv]>0} {
eval spawn -noecho $argv
cmd "spawn $argv"
} else {
spawn -noecho $env(SHELL)
cmd "spawn \$env(SHELL)"
}
cmd "match_max 100000"
set lastkey ""
set procbuf ""
set userbuf ""
set echoing 0
remove_nulls 0
eval interact $option_keys {
-re . {
input $interact_out(0,string)
} -o -re .+ {
output $interact_out(0,string)
} eof {
cmd "expect eof"
return
}
}
close $fd
verbose_send_user "autoexpect done, file is $filename\n"
--
Marcos Delgado
--
To UNSUBSCRIBE, email to debian-user-s...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listm...@lists.debian.org
Archive: http://lists.debian.org/i5h2kh$qrm$1...@dough.gmane.org
AngelD
Juan Marcos Delgado Alcantar <juan...@gmail.com> escribió:
> Como no he encontrado rápidamente el comando autoexpect, lo mando por
> esta vía, es un shell script:
¿No era más fácil buscar en los [1]repositorios que hacer un
cutypaste cerdo?
Saludos --- Angel
--
To UNSUBSCRIBE, email to debian-user-s...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listm...@lists.debian.org
Archive: http://lists.debian.org/20100830223559.20c07360@x32
Juan Marcos Delgado Alcantar
> El Mon, 30 Aug 2010 20:00:19 +0000 (UTC) Juan Marcos Delgado Alcantar
> <juan...@gmail.com> escribió:
>
>> Como no he encontrado rápidamente el comando autoexpect, lo mando por
>> esta vía, es un shell script:
>
> ¿No era más fácil buscar en los [1]repositorios que hacer un
> cutypaste cerdo?
>
> Saludos --- Angel
>
> [1]http://packages.debian.org/search?
searchon=contents&keywords=autoexpect&mode=path&suite=stable&arch=any
De nada Angel, cuando quieras puedo proporcionar la información que tengo.
Esa es un pregunta retorica, evidentemente. Ya que sí, de hecho fue fácil
copiar y pegar.
Es bueno saber que es parte de Debian, cuando lo use no lo era. Creo
recordar.
Y yo si te doy las gracias a ti por la información que mandaste, no por
los modos. Pero que le vamos a hacer, susceptible que es uno.
Buen día.
--
Marcos Delgado
--
To UNSUBSCRIBE, email to debian-user-s...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listm...@lists.debian.org
Archive: http://lists.debian.org/i5h77g$rhl$1...@dough.gmane.org
Juan Marcos Delgado Alcantar
> El Mon, 30 Aug 2010 22:35:59 +0200, AngelD escribió:
>
>> El Mon, 30 Aug 2010 20:00:19 +0000 (UTC) Juan Marcos Delgado Alcantar
>> <juan...@gmail.com> escribió:
>>
>>> Como no he encontrado rápidamente el comando autoexpect, lo mando por
>>> esta vía, es un shell script:
>>
>> ¿No era más fácil buscar en los [1]repositorios que hacer un
>> cutypaste cerdo?
>>
>> Saludos --- Angel
>>
>> [1]http://packages.debian.org/search?
> searchon=contents&keywords=autoexpect&mode=path&suite=stable&arch=any
>
> De nada Angel, cuando quieras puedo proporcionar la información que
> tengo. Esa es un pregunta retorica, evidentemente. Ya que sí, de hecho
> fue fácil copiar y pegar.
> Es bueno saber que es parte de Debian, cuando lo use no lo era. Creo
> recordar.
> Y yo si te doy las gracias a ti por la información que mandaste, no por
> los modos. Pero que le vamos a hacer, susceptible que es uno. Buen día.
>
> --
> Marcos Delgado
Para finalizar:
aptitude install expect-dev
Se instalarán los siguiente paquetes NUEVOS:
expect-dev expectk{a} libexpat1-dev{a} libfontconfig1-dev{a}
libxft-dev{a} libxrender-dev{a} libxss-dev{a} tcl8.5-dev{a} tk8.5-dev
{a}
x11proto-render-dev{a} x11proto-scrnsaver-dev{a}
0 paquetes actualizados, 11 nuevos instalados, 0 para eliminar y 6 sin
actualizar.
Necesito descargar 3392kB de ficheros. Después de desempaquetar se usarán
10.5MB
Incluso sin los paquetes recomendados:
aptitude install -R expect-dev
Se instalarán los siguiente paquetes NUEVOS:
expect-dev tcl8.5-dev{a}
Se RECOMIENDAN los siguientes paquetes, pero NO se instalarán:
expectk tk8.5-dev
0 paquetes actualizados, 2 nuevos instalados, 0 para eliminar y 6 sin
actualizar.
Necesito descargar 1184kB de ficheros. Después de desempaquetar se usarán
3686kB
Se me hace demasiado, para un archivo de 8 kilobites.
Saludos, buen día.
--
Marcos Delgado
--
To UNSUBSCRIBE, email to debian-user-s...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listm...@lists.debian.org
Archive: http://lists.debian.org/i5h9tt$rhl$2...@dough.gmane.org
Robert C. Rodriguez
Javier Barroso
Bueno, también puedes hacer "aptitude download expect-dev" y luego un
dpkg-deb -x *deb ./midir
Si alguien me apoya diciendo por qué es útil bajarse un fichero sólo
de debian, que comente algún motivo que no haya dicho yo ( o que lo
explique mejor) en el bug:
http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=408379
Tendría que volver a mirar el código a ver si del script pudiese pasar
a un parche real. Al mantenedor de apt-file no le parece buena idea :(
Un saludo
--
To UNSUBSCRIBE, email to debian-user-s...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listm...@lists.debian.org
Archive: http://lists.debian.org/AANLkTim64A2yZ7OOeYLNf...@mail.gmail.com