Linux on 390 Port <LINUX-390@vm.marist.edu> wrote on 02/27/2013 11:04:11
AM:

> From: David Boyes <dbo...@sinenomine.net>
> To: LINUX-390@vm.marist.edu
> Date: 02/27/2013 11:10 AM
> Subject: Re: x3270 scripting?
> Sent by: Linux on 390 Port <LINUX-390@vm.marist.edu>
>
> Try using s3270 instead of x3270. s3270 is intended for commandline
> work (although it should work with x3270 as well, but...)
>
> ----------------------------------------------------------------------
> For LINUX-390 subscribe / signoff / archive access instructions,
> send email to lists...@vm.marist.edu with the message: INFO LINUX-390 or
visit
> http://www.marist.edu/htbin/wlvindex?LINUX-390
> ----------------------------------------------------------------------
> For more information on Linux on System z, visit
> http://wiki.linuxvm.org/
>


We use these tools to automate our cecsim runs.  Like David suggested,
s3270 and x3270 are interchangeable for the peer script mode with the
child process.  I like to debug with x3270 because I can watch what is
happening.  Our production stuff runs with s3270 though.  We don't use the
transfer() function, but here are some traces to log into vm in both
interactive and text mode.  Maybe there is something there that'll help.

sim::system_cmd(): mknod /tmp/ip.10879024 p
sim::system_cmd(): mknod /tmp/op.10879024 p
sim::system_cmd(): /afs/apd/func/cs1/suite3270/bin/x3270 -trace -tracefile
stdout -script -model 4 </tmp/ip.10879024 >/tmp/op.10879024 &
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "Connect(xxx.xxx.xxx.xxx)"
5>/tmp/ip.10879024 6</tmp/op.10879024 >> ../error/3270.err 2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "Enter" 5>/tmp/ip.10879024
6</tmp/op.10879024 >> ../error/3270.err 2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "String(\"logon fcpsim here
storage 10G\")" 5>/tmp/ip.10879024 6</tmp/op.10879024 >> ../error/3270.err
2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "Enter" 5>/tmp/ip.10879024
6</tmp/op.10879024 >> ../error/3270.err 2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "Wait(\"Unlock\")"
5>/tmp/ip.10879024 6</tmp/op.10879024 >> ../error/3270.err 2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "String(\"xxxxxx\")"
5>/tmp/ip.10879024 6</tmp/op.10879024 >> ../error/3270.err 2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "Enter" 5>/tmp/ip.10879024
6</tmp/op.10879024 >> ../error/3270.err 2>&1

sim::system_cmd(): mknod /tmp/ip.1286162 p
sim::system_cmd(): mknod /tmp/op.1286162 p
sim::system_cmd(): /afs/apd/func/cs1/suite3270/bin/s3270 -trace -tracefile
stdout -model 4 </tmp/ip.1286162 >/tmp/op.1286162 &
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "Connect(xxx.xxx.xxx.xxx)"
5>/tmp/ip.1286162 6</tmp/op.1286162 >> ../error/3270.err 2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "Enter" 5>/tmp/ip.1286162
6</tmp/op.1286162 >> ../error/3270.err 2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "String(\"logon fcpsim here
storage 10G\")" 5>/tmp/ip.1286162 6</tmp/op.1286162 >> ../error/3270.err
2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "Enter" 5>/tmp/ip.1286162
6</tmp/op.1286162 >> ../error/3270.err 2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "Wait(\"Unlock\")"
5>/tmp/ip.1286162 6</tmp/op.1286162 >> ../error/3270.err 2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "String(\"xxxxxx\")"
5>/tmp/ip.1286162 6</tmp/op.1286162 >> ../error/3270.err 2>&1
sim::system_cmd(): X3270OUTPUT=6 X3270INPUT=5
/afs/apd/func/cs1/suite3270/bin/x3270if -v "Enter" 5>/tmp/ip.1286162
6</tmp/op.1286162 >> ../error/3270.err 2>&1

The -trace and -tracefile parameters are very useful.

Regards,

Ray Higgs
System z FCP Firmware Development
Bld. 706, B42
2455 South Road
Poughkeepsie, NY 12601
(845) 435-8666,  T/L 295-8666
rayhi...@us.ibm.com

----------------------------------------------------------------------
For LINUX-390 subscribe / signoff / archive access instructions,
send email to lists...@vm.marist.edu with the message: INFO LINUX-390 or visit
http://www.marist.edu/htbin/wlvindex?LINUX-390
----------------------------------------------------------------------
For more information on Linux on System z, visit
http://wiki.linuxvm.org/

Reply via email to