For each serial interface shutdown respective hdlc.

(in l3node.destroy)

Bug found by:MM
Submitted by:
Requested by:
Reviewed by:
Approved by:
Obtained from:

diff --git a/exec.tcl b/exec.tcl
index 25481e92866eb3710ffc8353a5978ec0452eed34..644c8621a57bf7c9bc023496385221d6b22168b6 100755 (executable)
--- a/exec.tcl
+++ b/exec.tcl
@@ -476,6 +476,11 @@ proc l3node.destroy {eid node } {
     set node_id "$eid\_$node"
     foreach ifc [ifcList $node] {
        catch { nexec ngctl msg $ifc@$node_id: shutdown }
+        set ifnum [string range $ifc 3 end]
+        set ifname [string range $ifc 0 2]
+        if { $ifname == "ser" } {
+           catch { nexec ngctl msg hdlc$ifnum@$node_id: shutdown }
+        }
     }
     catch {nexec vimage -d $node_id}
     nexec rm -fr /tmp/$node_id

diff --git a/imunes b/imunes
index 67eafc0e4b20ba6ea7e9a93af49f88acbfee6226..6f60ee29b3670fe29fd50da10734d294f5d88873 100755 (executable)
--- a/imunes
+++ b/imunes
@@ -57,7 +57,7 @@ case $1 in
     exec tclsh8.4 $imunes "$@" 
     ;; 
 -v | --version) 
-    exec echo IMUNES version 2006-03-06
+    exec echo IMUNES version 2006-03-07
     ;; 
 *) 
     exec wish8.4 $imunes "$@"