如何在NS-2中添加协议［转载］

struct hdr_mflood {
u_int32_t       seq_;

static int offset_; // required by PacketHeaderManager
inline static int& offset() { return offset_; }
inline static hdr_sptree* access(const Packet* p) {
return (hdr_sptree*) p->access(offset_);
}
};

class MFlood: public Agent {
public:
MFlood();
void recv(Packet *p, Handler *);
int command(int, const char *const *);

protected:
inline int initialized() { return 1 && target_; }
//发送函数，其实就是调用目的节点的接受函数
inline void send(Packet *p){ target_->recv(p); }
};

static class MFloodclass : public TclClass {
public:
MFloodclass() : TclClass("Agent/MFlood") {}
TclObject* create(int argc, const char*const* argv) {
assert(argc == 5);
return (new MFlood((nsaddr_t) atoi(argv[4])));      // PBO agrv[4] is index_}
}
} class_rtProtoMFlood;

int hdr_mflood::offset_;
static class MFloodHeaderClass : public PacketHeaderClass {
public:
MFloodHeaderClass() : PacketHeaderClass("PacketHeader/MFlood",
sizeof(hdr_mflood)) {
bind_offset(&hdr_mflood::offset_);
}
} class_mfloodhdr;

foreach prot {
# add by season
MFlood
……
}

enum packet_t {
// insert new packet types here
//add by season
PT_MFLOOD,     //Trace用到
PT_NTYPE       // This MUST be the LAST one
}
class p_info {
public:
p_info() {
//add by season
name_[PT_MFLOOD]=“MFlood”;//与前面对应
name_[PT_NTYPE]= "undefined";
}

Simulator instproc create-wireless-node args {
MFlood  {
set ragent [$self create-mflood-agent $node]
}
…}

Simulator instproc create-mflood-agent { node } {
set ragent [new Agent/MFlood [$node id]]
$node set ragent_ $ragent
return $ragent
}

# Special processing for AODV
set aodvonly [string first "AODV" [$agent info class]]
if {$aodvonly != -1 } {
$agent if-queue [$self set ifq_(0)]   ;# ifq between LL and MAC
}