NS2 and TORA routing protocol

kekesaks · #1 10-Nov-2008, 11:00

Hi mates!!
May anyone who has run TORA routing protocol successfully help me!
I have this problem that has been really impeding my progress for sometime now!
I want to run the TORA protocol in ns2 and it really gives me headache as it shows some errors I can't resolve.'
I have created so many scenarios and tested them to run other protocols namely DSR and AODV but when I use TORA, the same scripts and scenarios give errors.

I understand there must be a modification to do to either the protocol itself or the ns2 and I have no idea what to do.

below is the error message I get

Code:

(_o17 cmd line 1)
    invoked from within
"_o17 cmd port-dmux _o28"
    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 "_o17" line 2)
    (SplitObject unknown line 2)
    invoked from within
"$agent port-dmux $dmux_"
    (procedure "_o14" line 11)
    (Node/MobileNode add-target-rtagent line 11)
    invoked from within
"$self add-target-rtagent $agent $port"
    (procedure "_o14" line 23)
    (Node/MobileNode add-target line 23)
    invoked from within
"$self add-target $agent $port"
    (procedure "_o14" line 15)
    (Node attach line 15)
    invoked from within
"$node attach $ragent [Node set rtagent_port_]"
    (procedure "_o3" line 72)
    (Simulator create-wireless-node line 72)
    invoked from within
"_o3 create-wireless-node"
    ("eval" body line 1)
    invoked from within
"eval $self create-wireless-node $args"
    (procedure "_o3" line 23)
    (Simulator node line 23)
    invoked from within
"$ns node"
    ("for" body line 2)
    invoked from within
"for {set i 0} {$i < $val(nn) } { incr i } {
                set node_($i) [$ns node]
        }"
    (file "wrls-tora1.tcl" line 56)

kekesaks · #2 14-Nov-2008, 02:09

For those who may face the problem I had some clarification is made from the link below.
http://mailman.isi.edu/pipermail/ns-developers/2006-March/002250.html

There were some few modifications to make there.

gmp · #3 31-Mar-2009, 13:34

Hey,

I'm am getting the same error while using TORA and its blocking my work. Can you please let me know how you fixed the issue.

eagerly awaiting your reply,

Thanks.

abhilashreddy · #4 01-Apr-2009, 16:04

HI,

I am also getting the same erro.i developed a code which works fine for AODV and DSR,but getting the same error when simulated using TORA.Can u please reply (abhilashkoppula@gmail.com).My project is at halt due to this reason

kekesaks · #5 01-Apr-2009, 17:25

Below is what I modified for my code:
in the .cc file, below is the command code

Code:

int
toraAgent::command(int argc, const char*const* argv)
{
    if(argc == 2) {
        Tcl& tcl = Tcl::instance();

        if(strncasecmp(argv[1], "id", 2) == 0) {
            tcl.resultf("%d", index);
            return TCL_OK;
            }
        }
        
    else if(argc == 3) {

        if(strcmp(argv[1], "log-target") == 0 || strcmp(argv[1], "tracetarget") == 0 ) {
            logtarget = (Trace*) TclObject::lookup(argv[2]);
            if(logtarget == 0)
                return TCL_ERROR;
            return TCL_OK;
        }
        else if(strcmp(argv[1], "drop-target") == 0) {
                int stat = rqueue.command(argc,argv);
            if (stat != TCL_OK) return stat;
                    return Agent::command(argc, argv);
        }
        else if(strcmp(argv[1], "if-queue") == 0) {
            ifqueue = (PriQueue*) TclObject::lookup(argv[2]);
            if(ifqueue == 0)
                return TCL_ERROR;
            return TCL_OK;
        }
        else if(strcmp(argv[1], "imep-agent") == 0) {
            imepagent = (imepAgent*) TclObject::lookup(argv[2]);
            if(imepagent == 0)
                return TCL_ERROR;
            imepagent->imepRegister((rtAgent*) this);
            return TCL_OK;
        }
        //******************************************************************************
        //======Extra coding to introduce port-dmux=======
        else if(strcmp(argv[1], "port-dmux") == 0) {
            dmux_ = (PortClassifier*) TclObject::lookup(argv[2]);
            if(dmux_ == 0){
                //fprintf(stderr, "%s: %s lookup of %s failed\n", _FILE_, argv[1], argv[2]);
                printf("%s lookup of %s failed\n", argv[1], argv[2]);
                return TCL_ERROR;
                }
            return TCL_OK;
            }
        //====================================
        //*******************************************************************************
    }
    return Agent::command(argc, argv);
}

and in the .h it's only to introduce the port dmux like so

Code:

//added for the port -dmux, for passing packets up to agents
    protected: PortClassifier  *dmux_;

always remember to recompile so to effect the changes you made to your code!

kekesaks · #6 01-Apr-2009, 17:31

Hey guys!

Does any one have a code for GeoTora? if so please help me with the source code as I want to implement something similar but mostly on confining the flooding area to only a triangular expected zone and not the rectangular one that GeoTora implements which is similar to LAR!!

Please help!

Thread Tools	Search this Thread
Show Printable Version Email this Page	Search this Thread: Advanced Search
Rate This Thread
Rate This Thread:

NS2 and TORA routing protocol

Re: NS2 and TORA routing protocol

Re: NS2 and TORA routing protocol

Re: NS2 and TORA routing protocol

Re: NS2 and TORA routing protocol

Re: NS2 and TORA routing protocol