Skip to main content
. 2016 Feb 26;16(3):297. doi: 10.3390/s16030297
Algorithm 1 OVAR routing algorithm.
  • 1:

    procedure ForwardPacket(Ri, P)   

  • 2:

        if forwarding timer expired then   

  • 3:

            F(Ri)=   

  • 4:

            L(Ri)={nk|1kc}  

  • 5:

            G(L(Ri))=NeighGraphL(Ri),Table(Ri)  

  • 6:

            F(Ri)=ForwardingSetSelectG(L(Ri),Φ*   

  • 7:

            for j=1 to r do  

  • 8:

               Calculate EEPA(F,j)  

  • 9:

            jmax=argmaxjEEPA(F,j)      

  • 10:

            for all j>jmax do  

  • 11:

               F(Ri)=F(Ri)nj  

  • 12:

            P.ForwardingListF(Ri)  

  • 13:

            ForwardP  

  • 14:

        else  

  • 15:

            DropP   

  • 16:

        endif  

  • 17:

    endprocedure