[ns] TCP socket support for NS2

[Hitesh Khandelwal]

I want to have TCP socket support for NS2. On searching I came across
gnutella project which implemented TCP sockets for NS2. (
http://www.cc.gatech.edu/computing/compass/gnutella/install.html). I
followed the instructions given on the page and recompiled NS2 successfully.
But when I tried to compile the test program given
http://www.cc.gatech.edu/computing/compass/gnutella/socket.tcl I got the
following error:

------------------------------
---------------------------------------------------------
$ ns socket.tcl

    (_o3 cmd line 1)
    invoked from within
"_o3 cmd create-sock 0 _o28 6346"
    invoked from within
"catch "$self cmd $args" ret"
    invoked from within
"if [catch "$self cmd $args" ret] {
set cls [$self info class]
global errorInfo
set savedInfo $errorInfo
error "error when calling class $cls: $args" $..."
    (procedure "_o3" line 2)
    (SplitObject unknown line 2)
    invoked from within
"$ns create-sock $id0 $srv 6346"
    invoked from within
"set ssock [$ns create-sock $id0 $srv 6346]"
    (file "socket.tcl" line 8)
---------------------------------------------------------------------------------------

Has anyone else also faced the same problem? Please help me to sort this
problem. (NS2 version 2.31)
Is there any other code available for TCP socket support for NS2 ?
Thanks in advance.

Hitesh Khandelwal
IIT Kanpur, INDIA