shadowing.cc
上传用户:rrhhcc
上传日期:2015-12-11
资源大小:54129k
文件大小:5k
源码类别:

通讯编程

开发平台:

Visual C++

  1. /* -*- Mode:C++; c-basic-offset:8; tab-width:8; indent-tabs-mode:t -*- */
  2. /*
  3.  * shadowing.cc
  4.  * Copyright (C) 2000 by the University of Southern California
  5.  * $Id: shadowing.cc,v 1.5 2008/02/20 04:59:14 tom_henderson Exp $
  6.  *
  7.  * This program is free software; you can redistribute it and/or
  8.  * modify it under the terms of the GNU General Public License,
  9.  * version 2, as published by the Free Software Foundation.
  10.  *
  11.  * This program is distributed in the hope that it will be useful,
  12.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.  * GNU General Public License for more details.
  15.  *
  16.  * You should have received a copy of the GNU General Public License along
  17.  * with this program; if not, write to the Free Software Foundation, Inc.,
  18.  * 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
  19.  *
  20.  *
  21.  * The copyright of this module includes the following
  22.  * linking-with-specific-other-licenses addition:
  23.  *
  24.  * In addition, as a special exception, the copyright holders of
  25.  * this module give you permission to combine (via static or
  26.  * dynamic linking) this module with free software programs or
  27.  * libraries that are released under the GNU LGPL and with code
  28.  * included in the standard release of ns-2 under the Apache 2.0
  29.  * license or under otherwise-compatible licenses with advertising
  30.  * requirements (or modified versions of such code, with unchanged
  31.  * license).  You may copy and distribute such a system following the
  32.  * terms of the GNU GPL for this module and the licenses of the
  33.  * other code concerned, provided that you include the source code of
  34.  * that other code when and as the GNU GPL requires distribution of
  35.  * source code.
  36.  *
  37.  * Note that people who make modified versions of this module
  38.  * are not obligated to grant this special exception for their
  39.  * modified versions; it is their choice whether to do so.  The GNU
  40.  * General Public License gives permission to release a modified
  41.  * version without this exception; this exception also makes it
  42.  * possible to release a modified version which carries forward this
  43.  * exception.
  44.  *
  45.  */
  46. /*
  47.  * Shadowing propation model, including the path-loss model.
  48.  * This statistcal model is applicable for both outdoor and indoor.
  49.  * Wei Ye, weiye@isi.edu, 2000
  50.  */
  51. #include <math.h>
  52. #include <delay.h>
  53. #include <packet.h>
  54. #include <packet-stamp.h>
  55. #include <antenna.h>
  56. #include <mobilenode.h>
  57. #include <propagation.h>
  58. #include <wireless-phy.h>
  59. #include <shadowing.h>
  60. static class ShadowingClass: public TclClass {
  61. public:
  62. ShadowingClass() : TclClass("Propagation/Shadowing") {}
  63. TclObject* create(int, const char*const*) {
  64. return (new Shadowing);
  65. }
  66. } class_shadowing;
  67. Shadowing::Shadowing()
  68. {
  69. bind("pathlossExp_", &pathlossExp_);
  70. bind("std_db_", &std_db_);
  71. bind("dist0_", &dist0_);
  72. bind("seed_", &seed_);
  73. ranVar = new RNG;
  74. ranVar->set_seed(RNG::PREDEF_SEED_SOURCE, seed_);
  75. }
  76. Shadowing::~Shadowing()
  77. {
  78. delete ranVar;
  79. }
  80. double Shadowing::Pr(PacketStamp *t, PacketStamp *r, WirelessPhy *ifp)
  81. {
  82. double L = ifp->getL(); // system loss
  83. double lambda = ifp->getLambda();   // wavelength
  84. double Xt, Yt, Zt; // loc of transmitter
  85. double Xr, Yr, Zr; // loc of receiver
  86. t->getNode()->getLoc(&Xt, &Yt, &Zt);
  87. r->getNode()->getLoc(&Xr, &Yr, &Zr);
  88. // Is antenna position relative to node position?
  89. Xr += r->getAntenna()->getX();
  90. Yr += r->getAntenna()->getY();
  91. Zr += r->getAntenna()->getZ();
  92. Xt += t->getAntenna()->getX();
  93. Yt += t->getAntenna()->getY();
  94. Zt += t->getAntenna()->getZ();
  95. double dX = Xr - Xt;
  96. double dY = Yr - Yt;
  97. double dZ = Zr - Zt;
  98. double dist = sqrt(dX * dX + dY * dY + dZ * dZ);
  99. // get antenna gain
  100. double Gt = t->getAntenna()->getTxGain(dX, dY, dZ, lambda);
  101. double Gr = r->getAntenna()->getRxGain(dX, dY, dZ, lambda);
  102. // calculate receiving power at reference distance
  103. double Pr0 = Friis(t->getTxPr(), Gt, Gr, lambda, L, dist0_);
  104. // calculate average power loss predicted by path loss model
  105. double avg_db;
  106.         if (dist > dist0_) {
  107.             avg_db = -10.0 * pathlossExp_ * log10(dist/dist0_);
  108.         } else {
  109.             avg_db = 0.0;
  110.         }
  111.    
  112. // get power loss by adding a log-normal random variable (shadowing)
  113. // the power loss is relative to that at reference distance dist0_
  114. double powerLoss_db = avg_db + ranVar->normal(0.0, std_db_);
  115. // calculate the receiving power at dist
  116. double Pr = Pr0 * pow(10.0, powerLoss_db/10.0);
  117. return Pr;
  118. }
  119. int Shadowing::command(int argc, const char* const* argv)
  120. {
  121. if (argc == 4) {
  122. if (strcmp(argv[1], "seed") == 0) {
  123. int s = atoi(argv[3]);
  124. if (strcmp(argv[2], "raw") == 0) {
  125. ranVar->set_seed(RNG::RAW_SEED_SOURCE, s);
  126. } else if (strcmp(argv[2], "predef") == 0) {
  127. ranVar->set_seed(RNG::PREDEF_SEED_SOURCE, s);
  128. // s is the index in predefined seed array
  129. // 0 <= s < 64
  130. } else if (strcmp(argv[2], "heuristic") == 0) {
  131. ranVar->set_seed(RNG::HEURISTIC_SEED_SOURCE, 0);
  132. }
  133. return(TCL_OK);
  134. }
  135. }
  136. return Propagation::command(argc, argv);
  137. }