Monday, April 23, 2012

Re: [ns] vanet networks on ns2

hi
i am working on blackhole attack in aodv and i have install
ns2.34 when i execute blackhole tcl it is not properly work please
solve this problem

my tcl script is following

# ======================================================================
# Default Script Options
# ======================================================================

set opt(ragent) Agent/rtProto/blackholeAODV
set opt(pos) NONE

if { $opt(pos) != "NONE" } {
puts "*** WARNING: blackholeAODV using $opt(pos) position configuration..."
}

# ======================================================================
Agent instproc init args {
$self next $args
}
Agent/rtProto instproc init args {
$self next $args
}
Agent/rtProto/blackholeAODV instproc init args {
$self next $args
}

Agent/rtProto/blackholeAODV set sport_ 0
Agent/rtProto/" set dport_ 0

# ======================================================================

proc create-routing-agent { node id } {
global ns_ ragent_ tracefd opt

#
# Create the Routing Agent and attach it to port 255.
#
set ragent_($id) [new $opt(ragent) $id]
set ragent $ragent_($id)
$node attach $ragent 255

$ragent if-queue [$node set ifq_(0)] ;# ifq between LL and MAC
$ns_ at 0.$id "$ragent_($id) start" ;# start BEACON/HELLO Messages

#
# Drop Target (always on regardless of other tracing)
#
set drpT [cmu-trace Drop "RTR" $node]
$ragent drop-target $drpT

#
# Log Target
#
set T [new Trace/Generic]
$T target [$ns_ set nullAgent_]
$T attach $tracefd
$T set src_ $id
$ragent log-target $T
}


proc create-mobile-node { id } {
global ns_ chan prop topo tracefd opt node_
global chan prop tracefd topo opt

set node_($id) [new MobileNode]

set node $node_($id)
$node random-motion 0 ;# disable random motion
$node topography $topo

#
# This Trace Target is used to log changes in direction
# and velocity for the mobile node.
#
set T [new Trace/Generic]
$T target [$ns_ set nullAgent_]
$T attach $tracefd
$T set src_ $id
$node log-target $T

$node add-interface $chan $prop $opt(ll) $opt(mac) \
$opt(ifq) $opt(ifqlen) $opt(netif) $opt(ant)

#
# Create a Routing Agent for the Node
#
create-routing-agent $node $id

# ============================================================

if { $opt(pos) == "Box" } {

set spacing 200
set maxrow 3
set col [expr ($id - 1) % $maxrow]
set row [expr ($id - 1) / $maxrow]
$node set X_ [expr $col * $spacing]
$node set Y_ [expr $row * $spacing]
$node set Z_ 0.0
$node set speed_ 0.0

$ns_ at 0.0 "$node_($id) start"

} elseif { $opt(pos) == "Random" } {

$node random-motion 1

$ns_ at 0.0 "$node_($id) start"
}

}



On 4/23/12, Fatma LOUATI <fatma.louati@gmail.com> wrote:
>
> hi,
> I'm working on Vanet networks ans I'm about using NS2. but this one seems
> not support radio obstacle. I heard about NS2.1b9a but I'm not sure that
> it's suitable for my ubuntu 11.4 (problem with my gcc version)
> can any one suggest me what version I have to install?
> Ps I have ns2.34 right now
> Any clue will be great
> thkx
> Fatma
>

No comments:

Post a Comment

Counter

blogger analytics