Guest User

Untitled

a guest
Dec 18th, 2018
59
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.37 KB | None | 0 0
  1. #!/usr/bin/expect -f
  2. #
  3. # This Expect script was generated by autoexpect on Tue Dec 18 09:42:08 2018
  4. # Expect and autoexpect were both written by Don Libes, NIST.
  5. #
  6. # Note that autoexpect does not guarantee a working script. It
  7. # necessarily has to guess about certain things. Two reasons a script
  8. # might fail are:
  9. #
  10. # 1) timing - A surprising number of programs (rn, ksh, zsh, telnet,
  11. # etc.) and devices discard or ignore keystrokes that arrive "too
  12. # quickly" after prompts. If you find your new script hanging up at
  13. # one spot, try adding a short sleep just before the previous send.
  14. # Setting "force_conservative" to 1 (see below) makes Expect do this
  15. # automatically - pausing briefly before sending each character. This
  16. # pacifies every program I know of. The -c flag makes the script do
  17. # this in the first place. The -C flag allows you to define a
  18. # character to toggle this mode off and on.
  19.  
  20. set force_conservative 0 ;# set to 1 to force conservative mode even if
  21. ;# script wasn't run conservatively originally
  22. if {$force_conservative} {
  23. set send_slow {1 .1}
  24. proc send {ignore arg} {
  25. sleep .1
  26. exp_send -s -- $arg
  27. }
  28. }
  29.  
  30. #
  31. # 2) differing output - Some programs produce different output each time
  32. # they run. The "date" command is an obvious example. Another is
  33. # ftp, if it produces throughput statistics at the end of a file
  34. # transfer. If this causes a problem, delete these patterns or replace
  35. # them with wildcards. An alternative is to use the -p flag (for
  36. # "prompt") which makes Expect only look for the last line of output
  37. # (i.e., the prompt). The -P flag allows you to define a character to
  38. # toggle this mode off and on.
  39. #
  40. # Read the man page for more info.
  41. #
  42. # -Don
  43.  
  44.  
  45. set timeout -1
  46. spawn $env(SHELL)
  47. match_max 100000
  48. expect -exact " r
  49. Type ha for help on aliasesr
  50. r
  51. ]0;luoric@linux-pc-64:/home/luoric/tmp[01;34mluoric@linux-pc-64[01;34m tmp $[00m "
  52. send -- "lsr"
  53. expect -exact "lsr
  54. [0m[00;32manswerbot[0m [00;32mexecmds.sh[0m [00;32mexecmds.sh.exp[0m [00;32mgdb.sh[0m [00min[0m [00mnohup.out[0m [00;32mquestions[0m [00;32mscript.exp[0m [00mspawn[0m [00;32mstb.sh[0m [00;32mtarget.exp[0m [00;32mtarget.sh[0m [00;32mtel[0m [00mtel.log[0m [00;32mterm[0mr
  55. ]0;luoric@linux-pc-64:/home/luoric/tmp[01;34mluoric@linux-pc-64[01;34m tmp $[00m "
  56. send -- "ls -lr"
  57. expect -exact "ls -lr
  58. total 56r
  59. -rwxrwxr-x 1 luoric ccuser 256 Dec 10 14:26 [0m[00;32manswerbot[0mr
  60. -rwxrwxr-x 1 luoric ccuser 264 Dec 13 17:07 [00;32mexecmds.sh[0mr
  61. -rwxrwxr-x 1 luoric ccuser 424 Dec 13 17:13 [00;32mexecmds.sh.exp[0mr
  62. -rwxrwxr-x 1 luoric ccuser 118 Dec 17 13:44 [00;32mgdb.sh[0mr
  63. -rw-rw-r-- 1 luoric ccuser 8 Dec 10 12:13 [00min[0mr
  64. -rw------- 1 luoric ccuser 6920 Dec 14 15:35 [00mnohup.out[0mr
  65. -rwxrwxr-x 1 luoric ccuser 160 Dec 10 14:30 [00;32mquestions[0mr
  66. -rwxrwxr-x 1 luoric ccuser 0 Dec 18 09:42 [00;32mscript.exp[0mr
  67. -rw-rw-r-- 1 luoric ccuser 0 Dec 13 12:56 [00mspawn[0mr
  68. -rwxrwxr-x 1 luoric ccuser 103 Dec 10 14:41 [00;32mstb.sh[0mr
  69. -rwxrwxr-x 1 luoric ccuser 463 Dec 17 14:57 [00;32mtarget.exp[0mr
  70. -rwxrwxr-x 1 luoric ccuser 140 Dec 17 13:50 [00;32mtarget.sh[0mr
  71. -rwxrwxr-x 1 luoric ccuser 864 Dec 17 11:46 [00;32mtel[0mr
  72. -rw-rw-r-- 1 luoric ccuser 1201 Dec 11 14:03 [00mtel.log[0mr
  73. -rwxrwxr-x 1 luoric ccuser 153 Dec 13 13:13 [00;32mterm[0mr
  74. ]0;luoric@linux-pc-64:/home/luoric/tmp[01;34mluoric@linux-pc-64[01;34m tmp $[00m "
  75. send -- "exitr"
  76. expect eof
Add Comment
Please, Sign In to add comment