fso-antenna.cc

fso antenna model for ns2

// FSO antenna.cc @ RPI, David Partyka

#include "fso-antenna.h"
#include <iostream>

using namespace std;

static class FSOAntennaClass : public TclClass {
	public:
		FSOAntennaClass() : TclClass("Antenna/FSOAntenna") {}
		TclObject* create(int, const char*const*) {
			return (new FSOAntenna);
		}
} class_FSOAntenna;

FSOAntenna::FSOAntenna() {
	Gt_ = 1.0;
	Gr_ = 1.0;
	bind("Gt_", & Gt_);
	bind("Gr_", & Gr_);

	bind("Tx_Power", & Tx_Power);
	bind("Tx_Dia", & Tx_Dia);
	bind("Tx_Angle", & Tx_Angle);

	bind("Rx_Sensitivity", & Rx_Sensitivity);
	bind("Rx_Dia", & Rx_Dia);
	bind("Rx_Angle", & Rx_Angle);
}

int
FSOAntenna::command(int argc, const char*const* argv)
{
	TclObject *obj; 
	
	if (argc == 5) {
		if(strcmp(argv[1], "set-los") == 0) {
			set_normal(atof(argv[2]),atof(argv[3]),atof(argv[4]));
			return TCL_OK;
		} if(strcmp(argv[1], "set-pos") == 0) {
			set_position(atof(argv[2]),atof(argv[3]),atof(argv[4]));
			return TCL_OK;
		} 
	}
	return TclObject::command(argc,argv);
}