・頑張ってtarget_に代入するやつを探す ・アプリ層にTCP機能実装して中継ノードと宛先ノードを選べるようにする ・TCPを改造して中継できるようにさせる ・Tclでできるか探す(´・ω・｀)どれも地獄だぜふぅーははぁー

普通にリポジトリにパッケージがあるみたいなので $ sudo aptitude install mongodb 普通に起動すると $ mongod mongod --help for help and startup options Tue Nov 30 16:38:32 Mongo DB : starting : pid = 3474 port = 27017 dbpath = /data/db/ master…

やっぱりIPヘッダのSrc/Dstは送信元/宛先だったってね宛先がに-1が入るのはなんなんだろう

AODV* aodvagent; // set i to be the node id char command[256]; sprintf(command, "foreach aodvagent [Agent/AODV info instances]\ {\nif { [$aodvagent id] == %d} {\nset i $aodvagent}}\nset t $i\n", i); // <-- 真ん中に実行する文いれる Tcl& tcl…

| ＼ __ ／ ＿ （ｍ） ＿ﾋﾟｺｰﾝ |ミ| ／ ｀´ ＼ ('A`) ノヽノヽ くくIPヘッダの宛先変えればよくね？ >なんか違うっぽいTCPヘッダ AOMDVヘッダ そのへんのSourceとDestination確認してみるよ

Connectorクラスのtarget_を変えてあげればいいと思いますよっとtarget_は target_ = (NsObject*)TclObject::lookup(str); みたいな感じで入れましょう。 strにはtcl側で使われてるノードの識別子 -> _o6とかそのへん 判断の仕方が不明

・TCPでtarget_を変更できるようにする ・ノードの隣接判定しないといけないよね ・Tclから呼び出せるようにcommand作らないとね ・てかパケットごとに送ってる部分ってどこなのこれ ・やっぱりScheduler？ ・でもoutputってとこでもやってそうな感じだった…

tcl側で set god_ [create-god $val(nn)]; # <-- $val(nn)はノード数 # ... # ノード生成のとこで $god_ new_node $node_($i); # <-- $iはカウンタ for文でノード作るときのやつ int node_num = God::instance()->nodes(); // <-- 総ノード数 printf("nextHo…

大元からいじるのは大変そう？ # NsObjectの隣接ノードは一つしかないとかコメントに... class Connector : public NsObject { public: Connector(); inline NsObject* target() { return target_; } void target (NsObject *target) { target_ = target; } …

キャストしてあげないとだめっぽい。 でもキャストしてあげれば大丈夫そう

23型ぐらいの液晶が欲しいなぁ プログラミングの効率が大分かわりそう1024*768だとやっぱりきびしい

ちょっと前にこれで怒られた。tclcl/tcl-oject.tclを見て対処法確認してくれ -> 対処法が3つあるっぽい？1番目 -> tcl-default.tclにデフォ値を設定しろこれやったらうまく通ったので、他2つは試してない。

bsd-list.h リスト構造を作ってくれる。 自分が指定した型で作ってくれるなんて超便利！LIST_HEADやらなんやら 書いてることしてくれるぽい

Makefileの195行目付近に追記 tcp/tcp-crosslayer.o \とりあえずtcp-newreno全コピ tcp-crosslayer.ccクラス名やらTclClassの中やらを CrossLayerとかに変更ns-default.tclのNewrenoあたりの初期値をそのままコピペでCrossLayerにして終わり

ns-lib.tcl 1543行目 attach-agentのプロシージャ Simulator instproc attach-agent { node agent } { # このへん $node attach $agent ; # <-- このプロシージャで色々やってる if {[lindex [split [$agent info class] "/"] 1] == "SCTP"} { $agent instva…