[Sguil-cvs] sguil/client/lib extdata.tcl,1.8,1.9

[Bamm V. <ba...@us...>]

Update of /cvsroot/sguil/sguil/client/lib
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv28045/lib

Modified Files:
	extdata.tcl 
Log Message:
Load non-tcp pcap data into ethereal from sancp/sessions panes.


Index: extdata.tcl
===================================================================
RCS file: /cvsroot/sguil/sguil/client/lib/extdata.tcl,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** extdata.tcl	15 Jul 2004 16:28:03 -0000	1.8
--- extdata.tcl	29 Jul 2004 12:39:34 -0000	1.9
***************
*** 303,317 ****
      set cnxID [$winParents.xidFrame.list get $eventIndex]
      set timestamp [$winParents.startTimeFrame.list get $eventIndex]
!     set proto 6
    } else {
      set proto [$winParents.protoFrame.list get $eventIndex]
-     if { $type == "xscript" && $proto != "6" } {
-       tk_messageBox -type ok -icon warning -message\
-        "Transcripts can only be generated for TCP traffic at this time."
-       return
-     }
      set cnxID [lindex [split [$winParents.eventIDFrame.list get $eventIndex] .] 1]
      set timestamp [$winParents.dateTimeFrame.list get $eventIndex]
    }
    set sensor [$winParents.sensorFrame.list get $eventIndex]
    set srcIP [$winParents.srcIPFrame.list get $eventIndex]
--- 303,317 ----
      set cnxID [$winParents.xidFrame.list get $eventIndex]
      set timestamp [$winParents.startTimeFrame.list get $eventIndex]
!     set proto [$winParents.ipProtoFrame.list get $eventIndex]
    } else {
      set proto [$winParents.protoFrame.list get $eventIndex]
      set cnxID [lindex [split [$winParents.eventIDFrame.list get $eventIndex] .] 1]
      set timestamp [$winParents.dateTimeFrame.list get $eventIndex]
    }
+   if { $type == "xscript" && $proto != "6" } {
+     tk_messageBox -type ok -icon warning -message\
+      "Transcripts can only be generated for TCP traffic at this time."
+     return
+   }
    set sensor [$winParents.sensorFrame.list get $eventIndex]
    set srcIP [$winParents.srcIPFrame.list get $eventIndex]