Visit Our UNIX and Linux User Community


TCL/Expect not working as expected


 
Thread Tools Search this Thread
Top Forums Shell Programming and Scripting TCL/Expect not working as expected
# 1  
Old 07-20-2009
TCL/Expect not working as expected

I am having an issue with TCL\Expect; I am passing arguments via the commandline that are read in via "lrange $argv". One of those var's is a password with characters that need to be escapaed, after escaping them an hitting enter expect is placing curly braces around my password... why?!

Code:
#!/usr/bin/expect

## Setting stdin arguments as vars

set user [lrange $argv 0 0]
set password [lrange $argv 1 1]
set bladen [lrange $argv 2 2]
set ilomuser [lrange $argv 3 3]
set ilompasswd [lrange $argv 4 4]
set frame [lrange $argv 5 5]

## Verify that all arguments have been fullfilled


puts "Am citit:\n";
puts "user: $ilomuser";
puts "password: $ilompasswd";

#check if all were provided

if { $user == "" || $password == "" || $bladen == "" || $ilomuser == "" || $ilompasswd == "" || $frame == "" }  {
   puts "Syntax error\r"
   puts "Usage: <Username> <Password> <Blade number in frame> <New ILOM User> <passwd for ILOM user> <Frame IP>\r"
      exit 1
 }


Example. I ctrl+c to kill.. but as you can see the password has been curly braced.
Code:
-(~/work/sun6kchassis/working)------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------(14:40 Mon Jul 20)
risk@Heavyarms [161] --> ./setuprilo.exp root thisisapass 3 drrib \$bu\!d1t 1.4.132.123
Am citit:

user: drrib
password: {$bu!d1t}
^Czsh: exit 130   ./setuprilo.exp root thisisapass 3 drrib \$bu!d1t 1.4.132.123



---------- Post updated at 05:53 PM ---------- Previous update was at 02:58 PM ----------

tried it in bash, no avail, also tried quoting, nothing... running out of ideas.
# 2  
Old 07-21-2009
The curly braces are special in TCL, the strings inside them are not interpolated. I suppose that's the correct behavior if you want the string to be passed as is.
# 3  
Old 07-21-2009
Well, the problem is, when it updates the password with that the password truely IS {$bu!d1t} when I need it to be $bu!d1t, any ideas?
# 4  
Old 07-21-2009
Why aren't you using lindex?

Code:
set ilompasswd [lindex $argv 4]

Quote:
Note: ``lrange list first first'' does not always produce the same result as ``lindex list first'' (although it often does for simple fields that aren't enclosed in braces); it does, however, produce exactly the same results as ``list [lindex list first]''
# 5  
Old 07-21-2009
Quote:
Originally Posted by radoulov
Why aren't you using lindex?

Code:
set ilompasswd [lindex $argv 4]


Because I know no better Smilie

But that fixed it !

Previous Thread | Next Thread
Test Your Knowledge in Computers #993
Difficulty: Medium
Illumination is a free and open-source Unix operating system based on OpenSolaris.
True or False?

10 More Discussions You Might Find Interesting

1. Red Hat

Issue in installing expect and Tcl

Hi I need to install expect in redhat. through net I came to know that I must install tcl too in order to make expect work. I have downloaded both packages but not able to install # ls -lrt total 3720 18:33 tcl8.4.20-src.tar.gz 18:33 expect5.45.3.tar.gz 18:40 expect5.45.3... (7 Replies)
Discussion started by: scriptor
7 Replies

2. Shell Programming and Scripting

expect TCL script

Hello, I write a TCL script for Expect/ Telnet. I want to send command to the telnet server. But I want to close after the command is sent. Anybody know which command can flush the expect so I can sure the command is sent to the telnet server??? EX: send "./command1\r" close... (0 Replies)
Discussion started by: linboco
0 Replies

3. UNIX for Dummies Questions & Answers

how to save the output of command in tcl/expect

hi, everyone: I just wonder how to save the output of command, I mean everything, save as a string into a variable. another question is I try to ls the details of a directory, but it works in the shell, not in the script. for example code: ls -ltr *se100* | grep ^- | tail -1 | awk '... (1 Reply)
Discussion started by: allenxiao7
1 Replies

4. UNIX for Dummies Questions & Answers

Expect/Tcl help

hi, I am new in Expect. I have a question about expect timeout. suppose I have a structure of expect { ".."{ send"............"} timeout{ ............... } } The silly question is if I reach timeout, how can I store the error message showing on the screen to... (2 Replies)
Discussion started by: allenxiao7
2 Replies

5. Shell Programming and Scripting

Help with TCL/Expect in Solaris 5.3

I'm having this problem with a very simple tcl expect script that is running on Solaris 5.3 with TCL version 8.4.7 and expect version 5.0. below is the simplified version of the code snippet, which I think has everything to illustrate the problem, the full version is at the very bottom in... (0 Replies)
Discussion started by: pinchharmonic
0 Replies

6. Shell Programming and Scripting

tcl/expect

Can someone identify what is the problem here?. no children while executing "exp_wait -nowait -i -1" (procedure "logOptions" line 45) invoked from within "logOptions" (procedure "doExecute" line 98) invoked from within "doExecute" (procedure "main" line 32) ... (7 Replies)
Discussion started by: calsum
7 Replies

7. Shell Programming and Scripting

Tcl expect HELP

In the following "for" loop I assume the the script will expect "anyway", "first" NOT in any paticular order and send "yes" when there found, breaking out of the loop when "$prompt" is found. The way it is working is like 3 individual expect lines, and they MUST be in cronological order. ANY help... (0 Replies)
Discussion started by: dave_m
0 Replies

8. UNIX for Dummies Questions & Answers

Expect/Tcl help?

Does anyone know of an expect/tcl forum that is as helpful as this one is for shell scripting? Or if anyone has any expect knowledge, can you please provide some guidance on how to write to a local error log based on output from a ssh session? I have something like this: foreach host... (2 Replies)
Discussion started by: earnstaf
2 Replies

9. Shell Programming and Scripting

Expect with tcl/tk

hai all, i have an tcl script in which i have been reading the DUT Command prompt of an cisco switch as DUT Command Prompt : cisco* and running the test case of stp now the problem is if i have given any blank space in between the cisco or at the startup then the Expect is not identifying the... (0 Replies)
Discussion started by: sanjustudy
0 Replies

10. Shell Programming and Scripting

TCL/Expect project questions

I am rewriting the first big script project I ever coded to clean up some issues, mainly my really clumsy bash code, and to migrate to TCL/Expect. I have a couple of questions that I could use some help with. 1.) The script needs to know where it is located. I realize that I could use "find /... (1 Reply)
Discussion started by: thumper
1 Replies

Featured Tech Videos