[Sguil-cvs] sguil/server/contrib incident_report.tcl,1.3,1.4

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

Update of /cvsroot/sguil/sguil/server/contrib
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7858

Modified Files:
	incident_report.tcl 
Log Message:
New snort.org signature ID cgi foo.


Index: incident_report.tcl
===================================================================
RCS file: /cvsroot/sguil/sguil/server/contrib/incident_report.tcl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** incident_report.tcl	24 Jan 2005 20:51:53 -0000	1.3
--- incident_report.tcl	18 Apr 2005 13:20:18 -0000	1.4
***************
*** 404,408 ****
          set sig_id [lindex $tmpRow 1] 
          set sig [lindex $tmpRow 2]
!         set sigRef [::html::minorMenu [list $sig "http://www.snort.org/snort-db/sid.html?sid=${sig_id}"]]
          puts $outFileID [::html::paramRow [list $cnt $sigRef] "" "class=default"]
  
--- 404,408 ----
          set sig_id [lindex $tmpRow 1] 
          set sig [lindex $tmpRow 2]
!         set sigRef [::html::minorMenu [list $sig "http://www.snort.org/pub-bin/sigs.cgi?sid=${sig_id}"]]
          puts $outFileID [::html::paramRow [list $cnt $sigRef] "" "class=default"]
  
***************
*** 453,457 ****
              set sig_id [lindex $tmpRow 1]
              set sig [lindex $tmpRow 2]
!             set sigRef [::html::minorMenu [list $sig "http://www.snort.org/snort-db/sid.html?sid=${sig_id}"]]
              puts $outFileID [::html::paramRow [list $cnt $sigRef] "" "class=default"]
              # Keep a list of these sigs.
--- 453,457 ----
              set sig_id [lindex $tmpRow 1]
              set sig [lindex $tmpRow 2]
!             set sigRef [::html::minorMenu [list $sig "http://www.snort.org/pub-bin/sigs.cgi?sid=${sig_id}"]]
              puts $outFileID [::html::paramRow [list $cnt $sigRef] "" "class=default"]
              # Keep a list of these sigs.
***************
*** 511,515 ****
              set sig_id [lindex $tmpRow 2]
              set sig [lindex $tmpRow 3]
!             set sigRef [::html::minorMenu [list $sig "http://www.snort.org/snort-db/sid.html?sid=${sig_id}"]]
              set whoRef [::html::minorMenu [list $sip "http://www.dnsstuff.com/tools/whois.ch?ip=${sip}"]]
  
--- 511,515 ----
              set sig_id [lindex $tmpRow 2]
              set sig [lindex $tmpRow 3]
!             set sigRef [::html::minorMenu [list $sig "http://www.snort.org/pub-bin/sigs.cgi?sid=${sig_id}"]]
              set whoRef [::html::minorMenu [list $sip "http://www.dnsstuff.com/tools/whois.ch?ip=${sip}"]]
  
***************
*** 560,564 ****
                  set sig_id [lindex $tmpRow 2]
                  set sig [lindex $tmpRow 3]
!                 set sigRef [::html::minorMenu [list $sig "http://www.snort.org/snort-db/sid.html?sid=${sig_id}"]]
                  set whoRef [::html::minorMenu [list $sip "http://www.dnsstuff.com/tools/whois.ch?ip=${sip}"]]
  
--- 560,564 ----
                  set sig_id [lindex $tmpRow 2]
                  set sig [lindex $tmpRow 3]
!                 set sigRef [::html::minorMenu [list $sig "http://www.snort.org/pub-bin/sigs.cgi?sid=${sig_id}"]]
                  set whoRef [::html::minorMenu [list $sip "http://www.dnsstuff.com/tools/whois.ch?ip=${sip}"]]