Cisco Support Community
cancel
Showing results for 
Search instead for 
Did you mean: 
Announcements

Welcome to Cisco Support Community. We would love to have your feedback.

For an introduction to the new site, click here. And see here for current known issues.

New Member

Tcl Script Check Please Pt1

Hello Community,

I've compiled the attached script with the help of others from this forum.

During the registration I get the following error:

Router(config)#even ma p ISPTest.tcl

Compile check and registration failed:syntax error in expression "$arr_einfo(condition) == Occurred"

    ("if" test expression)

    while compiling

"if {$arr_einfo(condition) == Occurred} {

    if [catch {cli_open} result] {

        error $result $errorInfo

    } else {

        array set cli1 $res..."

Tcl policy execute failed: syntax error in expression "$arr_einfo(condition) == Occurred"couldn't compile policy file to bytecode: Unknown error 0

Embedded Event Manager configuration: failed to retrieve intermediate registration result for policy ISPTest.tcl: Unknown error 0

I wonder if someone could take a look at the script and let me know how I might fix it?

Cheers

1 ACCEPTED SOLUTION

Accepted Solutions
Cisco Employee

Re: Tcl Script Check Please Pt1

Try this version.              

8 REPLIES
Cisco Employee

Re: Tcl Script Check Please Pt1

Try this version.

New Member

Re: Tcl Script Check Please Pt1

Joseph,

Thanks ever-so-much for responding.

I will check out your version and let you if it works?

Cheers mate

Sent from Cisco Technical Support iPad App

New Member

Re: Tcl Script Check Please Pt1

Hi Joseph,

I tried your script. However, I'm getting the following error message when I try to register the script

Router(config)#even man p ISPTest.tcl

Compile check and registration failed:invalid command name "::cisco::eem::event_register_ipsla"

    while executing

"::cisco::eem::event_register_ipsla operation_id 102 reaction_type timeout

"

Tcl policy execute failed: invalid command name "::cisco::eem::event_register_ipsla"

Embedded Event Manager configuration: failed to retrieve intermediate registration result for policy ISPTest.tcl: Unknown error 0

Router(config)#

New Member

Re: Tcl Script Check Please Pt1

Hello Joseph,

It worked!

I was trying to register on router that didn't support event ip sla.

Star man.


Cheers mate.

New Member

Re: Tcl Script Check Please Pt1

Joseph,

While carrying out a full test with the script I incurred the following error:

*Feb  2 19:47:58.511: %HA_EM-6-LOG: ISPTest.tcl: Primary Internet Circuit UP

*Feb  2 19:47:58.515: %HA_EM-6-LOG: ISPTest.tcl: can't read "cli1(fd)": no such variable

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl:     while executing

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl: "cli_exec $cli1(fd) "enable""

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl:     invoked from within

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl: "$slave eval $Contents"

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl:     (procedure "eval_script" line 7)

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl:     invoked from within

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl: "eval_script slave $scriptname"

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl:     invoked from within

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl: "if {$security_level == 1} {       #untrusted script

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl:      interp create -safe slave

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl:      interp share {} stdin slave

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl:      interp share {} stdout slave

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl: ..."

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl:     (file "tmpsys:/lib/tcl/base.tcl" line 50)

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl: Tcl policy execute failed:

*Feb  2 19:47:58.519: %HA_EM-6-LOG: ISPTest.tcl: can't read "cli1(fd)": no such variable

I wonder if you could take another look and let me know where it might be going wrong?

Cheers

Carlton

Cisco Employee

Re: Tcl Script Check Please Pt1

Try this version.              

New Member

Re: Tcl Script Check Please Pt1

Hi Joseph,

Going to try it now.

Will let you know.

Thanks in advance

New Member

Re: Tcl Script Check Please Pt1

Joseph,

Perfect.

Cheers mate.

Carlton

531
Views
0
Helpful
8
Replies
CreatePlease login to create content