Scribd Logo
Upload

Welcome to Scribd!

  • 29 views

    Experiment 6: Aim:-Program To Implement Wireless Topology

    Uploaded by

    Anurag Shelar
    This experiment aims to implement a wireless topology using NS2. It defines simulation parameters like the channel type, radio propagation model, and MAC type. It creates 3 mobile nodes, attaches them to the wireless channel, and configures their properties. It provides the initial locations of nodes and generates node movements. A TCP connection is set up between two nodes and an FTP application is attached. The simulation is run for 150 seconds, after which the nodes are reset and the simulation is ended.

    Copyright:

    © All Rights Reserved
    Download as DOCX, PDF, TXT or read online from Scribd

    Experiment 6: Aim:-Program To Implement Wireless Topology

    Uploaded by

    Anurag Shelar
    29 views5 pages
    This experiment aims to implement a wireless topology using NS2. It defines simulation parameters like the channel type, radio propagation model, and MAC type. It creates 3 mobile nodes, attaches them to the wireless channel, and configures their properties. It provides the initial locations of nodes and generates node movements. A TCP connection is set up between two nodes and an FTP application is attached. The simulation is run for 150 seconds, after which the nodes are reset and the simulation is ended.

    Original Title

    Cn final exp6

    Copyright

    © © All Rights Reserved

    Available Formats

    DOCX, PDF, TXT or read online from Scribd

    Did you find this document useful?

    Is this content inappropriate?

    This experiment aims to implement a wireless topology using NS2. It defines simulation parameters like the channel type, radio propagation model, and MAC type. It creates 3 mobile nodes, attaches them to the wireless channel, and configures their properties. It provides the initial locations of nodes and generates node movements. A TCP connection is set up between two nodes and an FTP application is attached. The simulation is run for 150 seconds, after which the nodes are reset and the simulation is ended.

    Copyright:

    © All Rights Reserved
    Download as DOCX, PDF, TXT or read online from Scribd
    Download as docx, pdf, or txt
    29 views5 pages

    Experiment 6: Aim:-Program To Implement Wireless Topology

    Uploaded by

    Anurag Shelar
    This experiment aims to implement a wireless topology using NS2. It defines simulation parameters like the channel type, radio propagation model, and MAC type. It creates 3 mobile nodes, attaches them to the wireless channel, and configures their properties. It provides the initial locations of nodes and generates node movements. A TCP connection is set up between two nodes and an FTP application is attached. The simulation is run for 150 seconds, after which the nodes are reset and the simulation is ended.

    Copyright:

    © All Rights Reserved
    Download as DOCX, PDF, TXT or read online from Scribd
    Download as docx, pdf, or txt
    of 5

    Experiment 6

    Aim:- Program to implement wireless topology.

    # Define options
    set val(chan) Channel/WirelessChannel ; # channel type
    set val(prop) Propagation/TwoRayGround ; # radio-propagation model
    set val(netif) Phy/WirelessPhy ; # network interface type
    set val(mac) Mac/802_11 ; # MAC type
    set val(ifq) Queue/DropTail/PriQueue ; # interface queue type
    set val(ll) LL ; # link layer type
    set val(ant) Antenna/OmniAntenna ; # antenna model
    set val(ifqlen) 50 ; # max packet in ifq
    set val(nn) 3 ; # number of mobile nodes
    set val(rp) DSDV ; # routing protocol
    set val(x) 500 ; # X dimension of topography
    set val(y) 400 ; # Y dimension of topography
    set val(stop) 150 ; # time of simulation end

    set ns [new Simulator] #creating simulator object

    set tracefd [open simple-dsdv.tr w] #opening traces file in write mode


    set windowVsTime2 [open win.tr w]
    set namtrace [open simwrls.nam w]

    #for visual implementation


    $ns trace-all $tracefd
    $ns use-newtrace
    $ns namtrace-all-wireless $namtrace $val(x) $val(y)

    # create a topology object that keeps track of movements of mobilenodes within the
    topological boundary.
    set topo [new Topography]
    $topo load_flatgrid $val(x) $val(y)

    #create god object contains real time positions of all the nodes created so that connectivity
    is maintained
    create-god $val(nn)
    # Create nn mobilenodes [$val(nn)] and attach them to the channel.
    # configure the nodes
    $ns node-config -adhocRouting $val(rp) \
    -llType $val(ll) \
    -macType $val(mac) \
    -ifqType $val(ifq) \
    -ifqLen $val(ifqlen) \
    -antType $val(ant) \
    -propType $val(prop) \
    -phyType $val(netif) \
    -channelType $val(chan) \
    -topoInstance $topo \
    -agentTrace ON \
    -routerTrace ON \
    -macTrace OFF \
    -movementTrace ON

    for {set i 0} {$i < $val(nn) } { incr i } {


    set node_($i) [$ns node]
    }

    # Provide initial location of mobilenodes


    $node_(0) set X_ 5.0
    $node_(0) set Y_ 5.0
    $node_(0) set Z_ 0.0
    $node_(1) set X_ 490.0
    $node_(1) set Y_ 285.0
    $node_(1) set Z_ 0.0
    $node_(2) set X_ 150.0
    $node_(2) set Y_ 240.0
    $node_(2) set Z_ 0.0

    # Generation of movements
    $ns at 10.0 "$node_(0) setdest 250.0 250.0 3.0"
    $ns at 15.0 "$node_(1) setdest 45.0 285.0 5.0"
    $ns at 110.0 "$node_(0) setdest 480.0 300.0 5.0"

    # Set a TCP connection between node_(0) and node_(1)


    set tcp [new Agent/TCP/Newreno]
    set sink [new Agent/TCPSink]
    $ns attach-agent $node_(0) $tcp
    $ns attach-agent $node_(1) $sink
    $ns connect $tcp $sink

    set ftp [new Application/FTP]


    $ftp attach-agent $tcp
    $ns at 10.0 "$ftp start"

    # Define node initial position in nam


    for {set i 0} {$i < $val(nn)} { incr i } {
    # 30 defines the node size for nam
    $ns initial_node_pos $node_($i) 30
    }

    # Telling nodes when the simulation ends


    for {set i 0} {$i < $val(nn) } { incr i } {
    $ns at $val(stop) "$node_($i) reset";
    }

    # ending nam and the simulation


    $ns at $val(stop) "$ns nam-end-wireless $val(stop)"
    $ns at $val(stop) "stop"
    $ns at 150.01 "puts \"end simulation\" ; $ns halt"

    proc stop {} {
    global ns tracefd namtrace
    $ns flush-trace
    close $tracefd
    close $namtrace

    exec nam simwrls.nam &


    exit
    }
    $ns run

    Output:-
    Start:-

    Midway:-

    End:-

    You might also like