I have all the source code for tkined and scotty from which I built all
the necessary libraries and binaries and installed them.
Below is a part of the main program of the gbrowser.cgi script. Basically
I am trying to invoke this script manually without using the NETSCAPE browser.
i.e.
I tried to set the environment variable
QUERY_STRING to "FILE=X.721&TYPE=class&LABEL=alarmRecord"
and then invoke gbrowser.cgi script.
The gbrowser.cgi script crashes at
gdmo load /home/sehgal/tkined/X721.gdmo
with segmentation fault.
Does anyone know what is wrong with the way I am trying to invoke this script?
Is there any way to debug the script? Any pointers and insights appreciated.
Aditya
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Southwestern Bell Communications, TRI VOICE: (512) 372-5747
9505 Arboretum Blvd. FAX: (512) 372-5791
Austin, Texas 78759 INTERNET: sehgal@tri.sbc.com
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
xxxxxxxxxxxxxxxxxxx code from gbrowser.cgi script xxxxxxxxxxxxxx
##
## The main program starts here. It checks the environment variable
## QUERY_STRING to decide what should be done. After parsing and checking
## the parameters, we call the appropriate proc to do the job.
##
if {![info exists env(QUERY_STRING)] || ($env(QUERY_STRING) == "")} {
Welcome
} else {
set query [split $env(QUERY_STRING) &]
set file ""
set type ""
set label ""
foreach av $query {
set a [lindex [split $av =] 0]
set v [lindex [split $av =] 1]
switch $a {
FILE { set file $v }
TYPE { set type $v }
LABEL { set label $v }
* { lappend args [list $a $v] }
}
}
switch $file {
X.722 {
gdmo load X722.gdmo
}
X.721 {
puts "before gdmo load"
gdmo load /home/sehgal/tkined/X721.gdmo
puts "after gdmo load"
}
X.739 {
gdmo load X739.gdmo
}
oim {
gdmo load OIM.gdmo
}
default {
gdmo load X721.gdmo
gdmo load X739.gdmo
}
}
Browse $file $type $label
}
exit